Jump to content
  • 0

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

Petey Pablo

Asked by Petey Pablo,

 Share

Question

Petey Pablo Poring

Petey Pablo

Posted
Posted

See the image below.

Screenshot:

1.

post-524-0-52641000-1335486411_thumb.jpg

2.

post-524-0-91382600-1335486637_thumb.jpg

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.

14 answers to this question

Recommended Posts

Flaid Poring

Flaid

Posted
Posted

Try this

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

   set $@npcname_mpq$, "^4000C0[Trader]^000000";
   mes $@npcname_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 $@npcname_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 $@npcname_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 $@npcname_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;
}

  • 1
Flaid Poring

Flaid

Posted
Posted (edited)

I am not sure if this works but try it

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

set $@npcname_mpq$, "^4000C0[Trader]^000000";
mes $@npcname_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 $@npcname_mpq$;
mes "This is what I need to make you a Yggdrasil Berry Box!";
next;
mes "100x - Yggdrasil Berry";
next;
mes $@npcname_mpq$;
mes "So, you want it or not?";
next;
mes $@npcname_mpq$;
menu "Sure!",-,"No, thanks.",Lnotenuff;

mes $@npcname_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 $@npcname_mpq$;
mes "This is what I need to make you a Yggdrasil Seed Box!";
next;
mes "100x - Yggdrasil Seed";
next;
mes $@npcname_mpq$;
mes "So, you want it or not?";
next;
mes $@npcname_mpq$;
menu "Sure!",-,"No, thanks!",Lnotenuff;

mes $@npcname_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 $@npcname_mpq$;
mes "This is what I need to make you a Box of Thunder box!";
next;
mes "100x - Box of Thunder";
next;
mes $@npcname_mpq$;
mes "So, you want it or not?";
next;
mes $@npcname_mpq$;
menu "Sure!",-,"No, thanks!",Lnotenuff;

mes $@npcname_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 by Flaid
  • Upvote 1
Flaid Poring

Flaid

Posted
Posted (edited)

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 $@npcname_mpq$, "^4000C0[Trader]^000000";
mes $@npcname_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 $@npcname_mpq$;
mes "This is what I need to make you a Yggdrasil Berry Box!";
next;
mes "100x - Yggdrasil Berry";
next;
mes $@npcname_mpq$;
mes "So, you want it or not?";
next;
mes $@npcname_mpq$;
menu "Sure!",-,"No, thanks.",Lnotenuff;

mes $@npcname_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 $@npcname_mpq$;
mes "This is what I need to make you a Yggdrasil Seed Box!";
next;
mes "100x - Yggdrasil Seed";
next;
mes $@npcname_mpq$;
mes "So, you want it or not?";
next;
mes $@npcname_mpq$;
menu "Sure!",-,"No, thanks!",Lnotenuff;

mes $@npcname_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 $@npcname_mpq$;
mes "This is what I need to make you a Box of Thunder box!";
next;
mes "100x - Box of Thunder";
next;
mes $@npcname_mpq$;
mes "So, you want it or not?";
next;
mes $@npcname_mpq$;
menu "Sure!",-,"No, thanks!",Lnotenuff;

mes $@npcname_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 by Flaid
isaw4sal3 Poring

isaw4sal3

Posted
Posted

try this one dude. it's more faster :)

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

set .@npc$,"[NameOfTheNPC]";

mes .@npc$;

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

l_ygg:

mes .@npc$;

next;

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

delitem 607,100;

getitem BERRYBOXID,1;

close;

l_noitem:

mes .@npc$;

next;

mes "Not Enough Yggdrasil Berries!";

close;

l_yggs:

mes .@npc$;

next;

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

delitem 608,100;

getitem YGGSEEDBOXID,1;

close;

l_noitem2:

mes .@npc$;

next;

mes "Not Enough Yggdrasil Seeds!";

close;

l_bot:

mes .@npc$;

next;

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

delitem 12028,100;

getitem BOXOFTHUNDERID,1;

close;

l_noitem3:

mes .@npc$;

next;

mes "Not Enough Box Of Thunder!";

close;

}

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
 Share
Go to question listing

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...