Release: [Script Command] isselling - Discovery if a npc is selling a item by ID

[Zell]

View File

[Script Command] isselling - Discovery if a npc is selling a item by ID

---

This commands verify if a npc is selling, returning 1 to yes and 0 to no.

Its very useful to black market scripts for players who knows item id and don't want to lost time searching where items are sold.

Obs: Didn't test the sample script, but you can have a idea in how to use.

Sample Script:

prontera,150,150,5	Script	Who's Selling	90,{

	.@n$ = "[Who is Selling]";
	mes .@n$;

	// Its nice to put a delay in this script if you use a lot of stores in one map and in your .npc$ array
    // I'm using 5 seconds in this sample.
	if((gettimetick(2) - whosell_delay) < 5)
    {
    	mes "You have to wait 5 seconds to use me again.";
        close;
    }
                                            
    mes "Tell me the item ID you want to know what npc's is selling it!";
    input .@id; // You can test this sample with 607 ID
                                            
	whosell_delay = gettimetick(2);

    for( .@i = 1; .@i < getarraysize(.npcs$); .@i++)
	{
		.@found = isselling( getcharid(0), .npcs$[.@i], .@id );

		if( .@found )
		{
			next;
			mes "Ha, this item is " + getitemname( .@id ) + ", right?";
            next;
            mes .@n$;
            mes "Who is selling it is " + .npcs$[.@i] + "!";
            close2;
			showevent QTYPE_EVENT,QMARK_YELLOW,getcharid(0),.npcs$[.@i]; // Show in npc a ballon to player
			end;
		}
	}

	next;
	mes .@n$;
	mes "No npc selling it :)";
	end;

	OnInit:
		setarray .npcs$[1],"Store 1","Store 2";
		end;
}

prontera,151,150,5	shop	Store 1	90,607:1000
prontera,152,150,5	shop	Store 2	90,610:1000

 

 

 

 

---

• Submitter
  Zell
• Submitted
  03/31/2020
• Category
  Source Modifications
• Video
• Content Author
  Zell

 

[CyberDevil]

Really interesting but I'm not a good coder and I have this error:

Quote

[Error]: script error on npc/custom/utility/isselling.txt line 21
    parse_line: expected ';'
    16 :
    17 :        whosell_delay = gettimetick(2);
    18 :
    19 :     for( [email protected] = 1; [email protected] < getarraysize(.npcs$); [email protected]++)
    20 :        {
*   21 :                [email protected] = isselling( getcharid(0), .npcs$[[email protected]]',' [email protected] );
    22 :
    23 :                if( [email protected] )
    24 :                {
    25 :                        next;
 

Can you fix it for me please?

[Zell]

2 hours ago, CyberDevil said:

Really interesting but I'm not a good coder and I have this error:

Can you fix it for me please?

Hey, I tested and is everything working.

Prob you make the wrong changes. Undo and try again to applay the modifies.

 

 

 

 

 

[CyberDevil]

I tried to copy and load your script as you posted it without making any changes and I continue to receive the error that you can see in the attached screenshot.
Can youn attach here the script you use? Maybe there is some problem in the font encoing by copying it from the forum as it has happened to me in the past... let me try!

 

[Zell]

11 minutes ago, CyberDevil said:

I tried to copy and load your script as you posted it without making any changes and I continue to receive the error that you can see in the attached screenshot.
Can youn attach here the script you use? Maybe there is some problem in the font encoing by copying it from the forum as it has happened to me in the past... let me try!

 

I'm using the same script posted here, its working.

You have to make the source edits wich I post, as you can see you are in "source modifications" section, no "Script Section", so you have to modify the source to script works.

The script sample will work after you make the source modifies I put in txt file donwload

Edited April 1, 2020 by Zell

[3TAJIOH]

Nice, can you make search items selling by vendors?