AS OF SVN REV. 5901, WE ARE NOW USING TRUNK. ALL UNTESTED BUGFIXES/FEATURES GO INTO TRUNK.

IF YOU HAVE A WORKING AND TESTED BUGFIX PUT IT INTO STABLE AS WELL AS TRUNK.  EVERYTHING ELSE
GOES INTO TRUNK AND WILL BE MERGED INTO STABLE BY VALARIS AND WIZPUTER. -- VALARIS


git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@5094 54d463be-8e91-2dee-dedb-b68131a5f0ec

1 files changed, 144 insertions, 0 deletions

diff --git a/npc/custom/quests/sunglasses.txt b/npc/custom/quests/sunglasses.txt
new file mode 100644
index 000000000..f8830eec6
--- /dev/null
+++ b/npc/custom/quests/sunglasses.txt
@@ -0,0 +1,144 @@
+//===== eAthena Script =======================================

+//= Quest For Slotted Sunglasses

+//===== By: ==================================================

+//= Aegis - amichan

+//===== Current Version: =====================================

+//= 1.5

+//===== Compatible With: =====================================

+//= Any eAthena Version;

+//===== Description: =========================================

+//= Quest to get Slotted Sunglasses

+//===== Additional Comments: =================================

+//= 1.0 by Aegis 1.1 by aichan 1.2 by x[tsk] 1.3 by Darkchild

+//= 1.5 Fixed Exploit [Lupus]

+//============================================================

+

+// quest will reset it self after 1 pair of Slotted Sunglasses is made. 

+// 1st part of the quest

+

+alberta.gat,88,193,5	script	Sunglasses Trader	73,{

+	if(SG_QUEST1 == 1) goto L_SG_Q1_Done;

+	mes "[Sunglasses Trader]";

+	mes "Hello. What can I do for you?";

+	next;

+	menu "I heard that you can make ^0000FFSlotted Sunglasses^000000.",-,"Nothing, sorry to bother you.",L_SG_No;

+

+	mes "[Sunglasses Trader]";

+	mes "I do not make them, but I can tell you where to find the person who does. For a small fee...";

+	next;

+	menu "How much?",L_SG_1,"No way, I will find her, myself!",-;

+

+	mes "[Sunglasses Trader]";

+	mes "Suit yourself, the Maker will not make you ^0000FFSlotted Sunglasses^000000 unless she knows that you are coming.";

+	mes "Only I can tell her you are coming.";

+	next;

+	mes "[Sunglasses Trader]";

+	mes "Come back to me, when you have given up. Hahaha.";

+	close;

+L_SG_1:

+	mes "[Sunglasses Trader]";

+	mes "In order for me to tell you information on ^0000FFSlotted Sunglasses^000000 you need to get me: ";

+	mes "^0000881 Carat Diamond^000000, ";

+	mes "^00008850 Feathers^000000, ";

+	mes "and ^000088100000z^000000.";

+	next;

+	menu "Alright, here.",L_SG_1_Check,"That's too much!",-;

+

+	mes "[Sunglasses Trader]";

+	mes "Suit Yourself.";

+	close;

+L_SG_1_Check:

+	if (countitem(730) < 1) goto L_SG_Diamond;

+	if (countitem(949) < 50) goto L_SG_Feathers;

+	if (zeny<100000) goto L_SG_Funds;

+	delitem 730,1;

+	delitem 949,50;

+	set zeny,zeny-100000;

+	set SG_QUEST1,1;

+	mes "[Sunglasses Trader]";

+	mes "Great. Now, listen carefully.";

+	next;

+	mes "[Sunglasses Trader]";

+	mes "Look for someone name Maseph somewhere in the east of Morroc.";

+	mes "I will send her a message to let her know that you are coming.";

+	close;

+L_SG_Diamond:

+	mes "[Sunglasses Trader]";

+	mes "You do not have the ^0000881 Carat Diamond^000000. Come back to me when you do.";

+	close;

+L_SG_Feathers:

+	mes "[Sunglasses Trader]";

+	mes "You do not have ^00008850 Feathers^000000. Come back to me when you do.";

+	close;

+L_SG_Funds:

+	mes "[Sunglasses Trader]";

+	mes "You do not have ^000088100000z^000000. Come back to me when you do.";

+	close;

+L_SG_Q1_Done:

+	mes "[Sunglasses Trader]";

+	mes "There is nothing more I can tell you.";

+	next;

+	mes "[Sunglasses Trader]";

+	mes "Go see Maseph. She is somewhere east of Morroc.";

+	close;

+L_SG_No:

+	mes "[Sunglasses Trader]";

+	mes "Come back to me than you are ready.";

+	close;

+}

+ 

+// 2nd part of the quest

+

+moc_fild09.gat,209,128,5	script	Maseph	702,{

+	if(SG_QUEST1 == 1) goto L_SG_2;

+	mes "[Maseph]";

+	mes "Lovely Day, isn't it ?";

+	close;

+L_SG_2:

+	mes "[Maseph]";

+	mes "Hello there.";

+	next;

+	mes "[Maseph]";

+	mes "You came for the ^000088Slotted Sunglasses^000000, right?";

+	next;

+	menu "Yes",L_SG_2_Start,"No, sorry to bother you.",-;

+

+	mes "[Maseph]";

+	mes "Off you go, then.";

+	close;

+L_SG_2_Start:

+	mes "[Maseph]";

+	mes "To make one, I will need one pair of ^000088Sunglasses^000000 and 400000z.";

+	next;

+	menu "Here you go.",L_SG_Q2_Check,"No, thanks.",-;

+

+	mes "[Maseph]";

+	mes "As you wish.";

+	close;

+L_SG_Q2_Check:

+	if(countitem(2201) < 1) goto L_SG_Sunglasses;

+	if(zeny<400000) goto L_SG_Funds;

+	delitem 2201,1;

+	set zeny,zeny-400000;

+	mes "[Maseph]";

+	mes "Thank you. I will get on it right away.";

+	next;

+	mes "[Maseph]";

+	mes "Here you go my friend.";

+	getitem 2202,1;

+	next;

+	mes "[Maseph]";

+	mes "Enjoy your ^000088Slotted Sunglasses^000000.";

+// quest reset

+	set SG_QUEST1,0;

+	close;

+L_SG_Sunglasses:

+	mes "[Maseph]";

+	mes "I need one pair of ^000088Sunglasses^000000. Come back to me when you have one.";

+	close;

+L_SG_Funds:

+	mes "[Maseph]";

+	mes "You do not have enough money. Please come back to me when you do.";

+	close;

+}

+