added a custom event, fixed typos in Shuriken maker

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

1 files changed, 178 insertions, 0 deletions

diff --git a/npc/events/custom/kings_items.txt b/npc/events/custom/kings_items.txt
new file mode 100644
index 000000000..3f315fdf1
--- /dev/null
+++ b/npc/events/custom/kings_items.txt
@@ -0,0 +1,178 @@
+//===== eAthena Script ======================================= 

+//= Event King Items

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

+//= $ephiroth

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

+//= 1.0

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

+//= eAthena Version

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

+//= Grand Circlet Quest combined with Excalibur Quest.

+//= Converted to eAthena format from Fusion.

+//= 2006/09/27: 1.0 Release and fully working. [$ephiroth]

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

+

+prt_castle.gat,80,170,4	script	King of Prontera	 108,{

+	set @npcname$,"[King of Prontera]";

+

+	mes @npcname$;

+	mes "Hello can you help me?";

+	next;

+	menu "Sure, what can I do?",L_Sure,"No sorry I'm busy",L_Quit;

+

+L_Sure:

+	mes @npcname$;

+	mes "Thank you.";

+	mes "Well, my daughter next to me is a little rowdy";

+	mes "if you got her these items I'm sure she would calm down.";

+	mes "If you bring me these items I'll give you my crown or my sword";

+	mes "Both are very special.";

+	next;

+	menu "Ok what do you need?",L_Req,"I have the items",L_Have,"Forget it",L_Quit;

+

+L_Req:

+	mes @npcname$;

+	mes "If you could get me:";

+	mes "^00B6FF30 Chonchon doll^000000";

+	mes "^D5A50050 Poring doll^000000";

+	mes "^0080FF20 Yoyo doll^000000";

+	mes "^CC66331 3carat diamond^000000";

+	mes "^3131FF20 Illusion Flowers^000000";

+	mes "^AA00AA20 Singing Flowers^000000";

+	mes "I'll give you my crown.";

+	next;

+	mes @npcname$;

+	mes "If you could get me:";

+	mes "^0000881 Angel Band^000000";

+	mes "^4422FF1 Heaven Ring^000000";

+	mes "^AA00AA1 Emperium^000000";

+	mes "I'll give my sword.";

+	mes "Once you find those, come back to me.";

+	close;

+

+L_Have:

+	mes @npcname$;

+	mes "What item you want?";

+	next;

+	menu "Crown",L_crown,"Sword",L_sword;

+

+L_crown:

+	if(countitem(742)<30) goto L_Error; 

+	if(countitem(741)<50) goto L_Error1;

+	if(countitem(753)<20) goto L_Error2;

+	if(countitem(732)<1) goto L_Error3;

+	if(countitem(710)<20) goto L_Error4;

+	if(countitem(629)<20) goto L_Error5;

+	delitem 742,30;

+	delitem 741,50;

+	delitem 753,20;

+	delitem 732,1;

+	delitem 710,20;

+	delitem 629,20;

+	mes @npcname$;

+	mes "THANK YOU SOO MUCH!!";

+	mes "This will surely calm her down.";

+	mes "Let me just take the items from you.";

+	next;

+	mes @npcname$;

+	mes "As I promised here is my crown.";

+	getitem 5007,1;

+	next;

+	mes @npcname$;

+	mes "Well, I have to calm her down now.";

+	mes "Thanks again!";

+	close;

+L_sword:

+	if(countitem(2254)<1) goto L_NoAngel;

+	if(countitem(2282)<1) goto L_NoHeaven;

+	if(countitem(714)<1) goto L_NoEmp;

+	delitem 2254,1;

+	delitem 2282,1;

+	delitem 714,1;

+	mes @npcname$;

+	mes "THANK YOU SOO MUCH!!";

+	mes "This will surely calm her down.";

+	mes "Let me just take the items from you.";

+	next;

+	mes @npcname$;

+	mes "As I promised here is my sword.";

+	getitem 1137,1;

+	next;

+	mes @npcname$;

+	mes "Well, I have to calm her down now.";

+	mes "Thanks again!";

+	close;

+

+L_NoAngel:

+	mes @npcname$;

+	mes "Sorry but you must have at least one Angel Band.";

+	mes "Come back after you get ALL the items.";

+	close;

+

+L_NoHeaven:

+	mes @npcname$;

+	mes "Sorry but you must have at least one Heaven Ring.";

+	mes "Come back after you get ALL the items.";

+	close;

+

+L_NoEmp:

+	mes @npcname$;

+	mes "Sorry but you must have at least one Emperium.";

+	mes "Come back after you get ALL the items.";

+	close;

+

+L_Error:

+	mes @npcname$;

+	mes "Oh darn, you need 30 Chonchon Dolls.";

+	close;

+

+L_Error1:

+	mes @npcname$;

+	mes "Oh darn, you need 50 Poring dolls.";

+	close;

+

+L_Error2:

+	mes @npcname$;

+	mes "Oh darn, you need 20 Yoyo dolls.";

+	close;

+

+L_Error3:

+	mes @npcname$;

+	mes "Oh darn, you need one 3 Carat Diamond.";

+	close;

+

+L_Error4:

+	mes @npcname$;

+	mes "Oh darn, you need 20 Illusion Flowers.";

+	close;

+

+L_Error5:

+	mes @npcname$;

+	mes "Oh darn, you need 20 Singing Flowers.";

+	close;

+

+L_Quit:

+	mes @npcname$;

+	mes "Ok, that's fine, I'm sure someone else will help.";

+	close;

+}

+

+prt_castle.gat,84,170,4	script	King's Daughter	62,{

+	set @npcname$,"[King's Daughter]";

+

+	mes @npcname$;

+	mes "Hmph, I hate my dad right now!!";

+	next;

+	menu "Why?",L_Why,"Ok...Whatever..",L_Quit;

+

+L_Why:

+	mes @npcname$;

+	mes "Well, he won't give me what I want!!";

+	mes "He's the King of Prontera, he should be able to get me ANYTHING!!!";

+	close;

+

+L_Quit:

+	mes @npcname$;

+	mes "FINE THEN Hmph!!";

+	close;

+}