//===== eAthena Script =======================================1
//= Neris (New Hat Quests)
//===== By: ==================================================
//= Halca (1.0)
//= Mass Zero (1.1)
//===== Current Version: =====================================
//= 1.3a
//===== Compatible With: =====================================
//= Any eAthena Version.
//===== Description: =========================================
//= Seperate New Hat quests.
//===== Additional Comments: =================================
//= 1.2 Fixed wrong labels, added missing text [Lupus]
//= 1.3 Fixed possible exploit, 1.3a fixed coords [Lupus]
//= 1.3b Corrected the fixed coords [Zephiris]
//============================================================
yuno_in03.gat,20,18,7 script Neris 806,{
mes "[Neris]";
mes "So, whatcha want then?";
next;
menu "Golden Bells.",-,"Crown of Mistress.",M_COM,"Crown of Ancient Queen.",M_COAQ,"Nothing, thanks.",M_EXIT;
mes "[Neris]";
mes "Hehe, so you are a fan of Sohee's eh?";
mes "Yeah, I guess I like the bell they carry too!";
next;
mes "[Neris]";
mes "Looks pretty cute when you wear it.";
mes "So... what can I do for you?";
next;
menu "Make me Golden Bells!",-,"What do I need to make it?",M_REQL,"Nothing, thanks.",M_EXIT;
if(countitem(10016) < 1 || countitem(714) < 1 || countitem(969) < 3 || Zeny < 1000) GOTO L_NOITEM;//Items: Golden Bell, Emperium, Gold,
delitem 10016,1;//Items: Golden Bell,
delitem 714,1;//Items: Emperium,
delitem 969,3;//Items: Gold,
set Zeny,Zeny-1000;
mes "[Neris]";
mes "Now, lets swap your items.";
next;
getitem 5091,1;//Items: Golden Bells,
mes "[Neris]";
mes "Thanks, and bye!";
close;
M_REQL:
mes "[Neris]";
mes "Okay all these are gold related:";
mes "1 Golden Bell,";
mes "1 Emperium,";
mes "3 Gold,";
mes "1000 Zeny for the labor.";
close;
M_COM:
mes "[Neris]";
mes "You like mistresses?";
next;
mes "[Neris]";
mes "So... what can I do for you?";
next;
menu "Make me the item.",-,"What do I need to make it?",M_REQC,"Nothing, thanks.",M_EXIT;
if(countitem(2249) < 1 || countitem(714) < 1 || countitem(969) < 3 || Zeny < 1000) GOTO L_NOITEM;//Items: Coronet, Emperium, Gold,
delitem 2249,1;//Items: Coronet,
delitem 714,1;//Items: Emperium,
delitem 969,3;//Items: Gold,
set Zeny,Zeny-1000;
mes "[Neris]";
mes "Now, lets swap your items.";
next;
getitem 5081,1;//Items: Crown of Mistress,
mes "[Neris]";
mes "Thanks, and bye!";
close;
M_REQC:
mes "[Neris]";
mes "Okay all these are gold related:";
mes "1 Coronet,";
mes "1 Emperium,";
mes "3 Gold,";
mes "1000 Zeny for the labor.";
close;
M_COAQ:
mes "[Neris]";
mes "You like ancient queens?";
next;
mes "[Neris]";
mes "So.. what can I do for you?";
next;
menu "Make me the item.",-,"What do I need to make it?",M_REQC2,"Nothing, thanks.",M_EXIT;
if(countitem(10006) < 1 || countitem(714) < 1 || countitem(969) < 3 || Zeny < 1000) GOTO L_NOITEM;//Items: Queen's Hair Ornament, Emperium, Gold,
delitem 10006,1;//Items: Queen's Hair Ornament,
delitem 714,1;//Items: Emperium,
delitem 969,3;//Items: Gold,
set Zeny,Zeny-1000;
mes "[Neris]";
mes "Now, lets swap your items";
next;
getitem 5080,1;//Items: Crown of The Ancient Queen,
mes "[Neris]";
mes "Thanks, and bye!";
close;
M_REQC2:
mes "[Neris]";
mes "Okay all these are gold related:";
mes "1 Queen's Hair Ornament,";
mes "1 Emperium,";
mes "3 Gold,";
mes "1000 Zeny for the labor.";
close;
L_NOITEM:
mes "[Neris]";
mes "Don't take me for a fool!";
mes "No items, no deal!";
close;
M_EXIT:
mes "[Neris]";
mes "Bye! Come again.";
close;
}
