R> Ygg Berry / Seed / Box Of Thunder Trader NPC

[Petey Pablo]

See the image below.

Screenshot:

1.

2.

example.

100pcs Yggdrasil Berry = 1pc Yggdrasil Berry Box

100pcs Yggdrasil Seed = 1pc Yggdrasil Seed Box

100pcs Box Of Thunder = 1pc Box Of Thunder Box

Thank you.

[Flaid]

Try this

prontera.gat,xxx,xxx,4    script    Trader    666,{

   set [email protected]_mpq$, "^4000C0[Trader]^000000";
   mes [email protected]_mpq$;
   mes "Give me 100 Yggdrasil or 100 Box of Thunder product and I'll put them in 1 Box. Which one do you want to trade?";
   next;
   menu "Yggdrasil Berry",L_Berry,"Yggdrasil Seed",L_Seed,"Box of Thunder",L_BOT,"Cancel",L_Exit;

L_Berry:
   mes [email protected]_mpq$;
   mes "How many boxes do you want?";
   input @berry;
   if(countitem(607) < (100*@berry)) goto LNotEnough;
       delitem 607,(100*@berry);
   mes "You really have that many Berrys? Okay, let's trade!";
       getitem YGGBERRYBOXIDHEREIDKTHEID,(1*@berry);
   mes "Thank you sweety. Dont ygg too much!";
   close;

L_Seed:
   mes [email protected]_mpq$;
   mes "How many boxes do you want?";
   input @seed;
   if(countitem(608) < (100*@seed)) goto LNotEnough;
       delitem 608,(100*@seed);
   mes "You really have that many Seeds? Okay, let's trade!";
       getitem YGGSEEDBOXIDHEREIDKTHEID,(1*@seed);
   mes "Thank you sweety. Dont ygg too much!";
   close;

L_BOT:
mes [email protected]_mpq$;
   mes "How many boxes do you want?";
   input @bot;
   if(countitem(12028) < (100*@bot)) goto LNotEnough;
       delitem 12028,(100*@bot);
   mes "You really have that many Boxes of Thunder? Okay, let's trade!";
       getitem BOXOFTHUNDERIDGOESHERE,(1*@bot);
   mes "Thank you sweety. Dont abuse it too much!";
   close;


LNotEnough:
   mes "You dont have the required items...?";
   mes "Come back when you are actually ready. Now gtfo!";
   close;

L_Exit:
   close;
}

[Hades03]

i want tooo

BUMP

BUMP

No one?

[Flaid]

Here you are... You'll need to set the IDs for the boxes and the cordinates yourself.

prontera.gat,xxx,xxx,4	script	Trader	666,{

set [email protected]_mpq$, "^4000C0[Trader]^000000";
mes [email protected]_mpq$;
mes "Would you want to trade some of your items to boxes?";
next;
menu "Yggdrasil Berry",L_Berry,"Yggdrasil Seed",L_Seed,"Box of Thunder",L_BOT,"Cancel",L_Exit;

L_Berry:
mes [email protected]_mpq$;
mes "This is what I need to make you a Yggdrasil Berry Box!";
next;
mes "100x - Yggdrasil Berry";
next;
mes [email protected]_mpq$;
mes "So, you want it or not?";
next;
mes [email protected]_mpq$;
menu "Sure!",-,"No, thanks.",Lnotenuff;

mes [email protected]_mpq$;
if(countitem(607) < 100) goto LNotEnough;
	delitem 607,100;
mes "You really have 100 Berrys? Okay, let's trade!";
	getitem YGGBERRYBOXIDHEREIDKTHEID,1;
mes ". . .";
mes "Thank you sweety. Dont ygg too much!";
close;

L_Seed:
mes [email protected]_mpq$;
mes "This is what I need to make you a Yggdrasil Seed Box!";
next;
mes "100x - Yggdrasil Seed";
next;
mes [email protected]_mpq$;
mes "So, you want it or not?";
next;
mes [email protected]_mpq$;
menu "Sure!",-,"No, thanks!",Lnotenuff;

mes [email protected]_mpq$;
if(countitem(608) < 100) goto LNotEnough;
	delitem 608,100;
mes "You really have 100 Seeds? Okay, let's trade!";
	getitem YGGSEEDBOXIDHEREIDKTHEID,1;
mes ". . .";
mes "Thank you sweety. Dont ygg too much!";
close;

L_BOT:
mes [email protected]_mpq$;
mes "This is what I need to make you a Box of Thunder box!";
next;
mes "100x - Box of Thunder";
next;
mes [email protected]_mpq$;
mes "So, you want it or not?";
next;
mes [email protected]_mpq$;
menu "Sure!",-,"No, thanks!",Lnotenuff;

mes [email protected]_mpq$;
if(countitem(12028) < 100) goto LNotEnough;
	delitem 12028,100;
mes "You really have 100 Boxes of Thunder? Okay, let's trade!";
	getitem BOXOFTHUNDERIDGOESHERE,1;
mes ". . .";
mes "Thank you sweety. Dont abuse it too much!";
close;


LNotEnough:
mes "You dont have the required items...?";
mes "Come back when you are actually ready. Now gtfo!";
close;

Lnotenuff:
mes "Wtf, come back when you got the goods!";
close;
L_Exit:
close;
}

Edited April 28, 2012 by Flaid

[Hades03]

Error Sir

[Flaid]

Fixed it, sorry. Jam, you didn't edit the box id you get by the way.

Edited April 28, 2012 by Flaid

[Hades03]

Slow Script

i need to enter enter can you put this

[Flaid]

I am not sure if this works but try it

prontera.gat,xxx,xxx,4	script	Trader	666,{

set [email protected]_mpq$, "^4000C0[Trader]^000000";
mes [email protected]_mpq$;
mes "Would you want to trade some of your items to boxes?";
next;
menu "Yggdrasil Berry",L_Berry,"Yggdrasil Seed",L_Seed,"Box of Thunder",L_BOT,"Cancel",L_Exit;

L_Berry:
mes [email protected]_mpq$;
mes "This is what I need to make you a Yggdrasil Berry Box!";
next;
mes "100x - Yggdrasil Berry";
next;
mes [email protected]_mpq$;
mes "So, you want it or not?";
next;
mes [email protected]_mpq$;
menu "Sure!",-,"No, thanks.",Lnotenuff;

mes [email protected]_mpq$;
mes "How many boxes do you want?";
input @berry;
if(countitem(607) < (100*@berry)) goto LNotEnough;
	delitem 607,(100*@berry);
mes "You really have that many Berrys? Okay, let's trade!";
	getitem YGGBERRYBOXIDHEREIDKTHEID,(1*@berry);
mes ". . .";
mes "Thank you sweety. Dont ygg too much!";
close;

L_Seed:
mes [email protected]_mpq$;
mes "This is what I need to make you a Yggdrasil Seed Box!";
next;
mes "100x - Yggdrasil Seed";
next;
mes [email protected]_mpq$;
mes "So, you want it or not?";
next;
mes [email protected]_mpq$;
menu "Sure!",-,"No, thanks!",Lnotenuff;

mes [email protected]_mpq$;
mes "How many boxes do you want?";
input @seed;
if(countitem(608) < (100*@seed)) goto LNotEnough;
	delitem 608,(100*@seed);
mes "You really have that many Seeds? Okay, let's trade!";
	getitem YGGSEEDBOXIDHEREIDKTHEID,(1*@seed);
mes ". . .";
mes "Thank you sweety. Dont ygg too much!";
close;

L_BOT:
mes [email protected]_mpq$;
mes "This is what I need to make you a Box of Thunder box!";
next;
mes "100x - Box of Thunder";
next;
mes [email protected]_mpq$;
mes "So, you want it or not?";
next;
mes [email protected]_mpq$;
menu "Sure!",-,"No, thanks!",Lnotenuff;

mes [email protected]_mpq$;
mes "How many boxes do you want?";
input @bot;
if(countitem(12028) < (100*@bot)) goto LNotEnough;
	delitem 12028,(100*@bot);
mes "You really have that many Boxes of Thunder? Okay, let's trade!";
	getitem BOXOFTHUNDERIDGOESHERE,(1*@bot);
mes ". . .";
mes "Thank you sweety. Dont abuse it too much!";
close;


LNotEnough:
mes "You dont have the required items...?";
mes "Come back when you are actually ready. Now gtfo!";
close;

Lnotenuff:
mes "Wtf, come back when you got the goods!";
close;
L_Exit:
close;
}

Edited April 28, 2012 by Flaid

[Hades03]

WTF nice Script Super nice ty

[Flaid]

No problem.

[Hades03]

But Flaid the npc talk much bla bla bla can you pls edit much

Click the Npc and choose and you will see this

[isaw4sal3]

try this one dude. it's more faster

prontera,xx,yy,4 script NameOFTheNPC 911,{

set [email protected]$,"[NameOfTheNPC]";

mes [email protected]$;

menu "Yggdrasil Berry",l_ygg,"Yggdrasil Seed",l_yygs,"Box Of Thunder",l_bot;

l_ygg:

mes [email protected]$;

next;

if(countitem(607) <100) goto l_noitem;

delitem 607,100;

getitem BERRYBOXID,1;

close;

l_noitem:

mes [email protected]npc$;

next;

mes "Not Enough Yggdrasil Berries!";

close;

l_yggs:

mes [email protected]$;

next;

if(countitem(608) <100) goto l_noitem2;

delitem 608,100;

getitem YGGSEEDBOXID,1;

close;

l_noitem2:

mes [email protected]$;

next;

mes "Not Enough Yggdrasil Seeds!";

close;

l_bot:

mes [email protected]$;

next;

if(countitem(12028) <100) goto l_noitem3;

delitem 12028,100;

getitem BOXOFTHUNDERID,1;

close;

l_noitem3:

mes [email protected]$;

next;

mes "Not Enough Box Of Thunder!";

close;

}

[Hades03]

Error dude

[Nameless2you]

You need to input the id's of the separate items yourself.. as well as input the x and y coordinates and remember the tabs at the top.

[Emistry]

i think you can try this also~

http://pastebin.com/raw.php?i=wFuixBD4

edit the menu selection and add a new cases

// Exchange( <ItemGain>,<Item Required>,<AmountRequired> );