diff options
Diffstat (limited to 'npc/events/MemorialDay_2008.txt')
| -rw-r--r-- | npc/events/MemorialDay_2008.txt | 518 |
1 files changed, 518 insertions, 0 deletions
diff --git a/npc/events/MemorialDay_2008.txt b/npc/events/MemorialDay_2008.txt new file mode 100644 index 000000000..cf8eaa8ad --- /dev/null +++ b/npc/events/MemorialDay_2008.txt @@ -0,0 +1,518 @@ +//===== eAthena Script =======================================
+//= In Memory of Heroes (iRO Memorial Day 2008)
+//===== By: ==================================================
+//= Kisuka
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= eAthena SVN
+//===== Description: =========================================
+//
+//===== Additional Comments: =================================
+//= 1.0 First version. [Kisuka]
+//= 1.1 Many Many Fixes. [Kisuka]
+//============================================================
+
+// ================== Lauds ======================
+// ===============================================
+prontera,182,214,4 script Lauds#Memorial 58,{
+ if(Memorial08 < 1) {
+ mes "[Mad Sago Lauds]";
+ mes "Hey, yo!";
+ mes "What are you doing there!?";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "Do you know what day it is!?";
+ mes "It's a very important date!";
+ mes "A very important date to remember!";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "What is this!?";
+ emotion 0;
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "Where is your towel!?";
+ next;
+ mes "[" + strcharinfo(0) + "]";
+ mes "My what?";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "How are you supposed to go on your trip";
+ mes "without your towel!?";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "If you think this is just another";
+ mes "holiday,";
+ mes "I'm not going to waste my breath.";
+ mes "But if you like to pay a tribute to";
+ mes "great soldiers,";
+ mes "I will help you ready yourself";
+ next;
+ if (select("I guess so...:Are you crazy or something?") == 2) {
+ mes "[Mad Sago Lauds]";
+ mes "Fine, be unprepared!";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "";
+ mes "^FF0000YOU WILL RUE THE DAY!^000000";
+ close;
+ }
+ mes "[Mad Sago Lauds]";
+ mes "Great!";
+ mes "Then listen to me carefully.";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "Now before you can pay tribute to";
+ mes "the fallen soldiers";
+ mes "you must be properly equipped";
+ mes "Without your towel you will be";
+ mes "lost!";
+ mes "If you bring me the materials, I can make you a towel.";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "Listen closely.";
+ mes "Bring me ^FF000030 Fabric and 20 Fluffs^000000.";
+ set Memorial08,1;
+ close;
+ }
+
+ else if(Memorial08 == 1) {
+ if (countitem(1059) < 30 || countitem(914) < 20) {
+ mes "[Mad Sago Lauds]";
+ mes "What are these? They aren't";
+ mes "enough?!";
+ mes "*Sigh* Do I really have to tell you";
+ mes "again?!";
+ mes "Bring me ^FF000030 Fabric and 20 Fluffs^000000.";
+ close;
+ }else{
+ mes "***Mad Sago Lauds appears to be";
+ mes "muttering to himself***";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "So, did you bring the towel";
+ mes "materials?";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "Excellent; you've brought them";
+ mes "all.";
+ mes "Then I shall make you a Towel of";
+ mes "Memory as I promised.";
+ mes "Give me a moment.";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "There you go!";
+ delitem 1059,30;
+ delitem 914,20;
+ getitem 6025,1;
+ getnameditem 6025," + strcharinfo(0) + ";
+ set Memorial08,2;
+ close;
+ }
+ }
+
+ else if(Memorial08 == 2) {
+ mes "[Mad Sago Lauds]";
+ mes "Ah, you have fluffy new towel now";
+ mes "I even put your name on it";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "Say, how do you like to go";
+ mes "on a journey to pay a tribute to";
+ mes "Memorial Day?";
+ next;
+ if (select("Sure.:No, I'm Busy.") == 2) {
+ mes "[Mad Sago Lauds]";
+ mes "Don't come crying to me";
+ mes "if someone decides to";
+ mes "build a highway through";
+ mes "your home!";
+ close;
+ }
+ mes "[Mad Sago Lauds]";
+ mes "Good. By the way, do you even know";
+ mes "what the towel is for?";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "It seems you're just carrying it";
+ mes "without understanding its meaning.";
+ mes "What a shame! You should go speak";
+ mes "to ^FF0000Grast in Prontera^000000.";
+ set Memorial08,3;
+ close;
+ }
+
+ else if(Memorial08 == 3) {
+ mes "[Mad Sago Lauds]";
+ mes "What are you still doing here? I";
+ mes "told you to go speak to Grast in";
+ mes "Prontera!";
+ close;
+ }
+
+ else if(Memorial08 == 4 || Memorial08 == 5 || Memorial08 == 6) {
+ mes "[Mad Sago Lauds]";
+ mes "Go help Grast, and then come back.";
+ close;
+ }
+
+ else if(Memorial08 == 7) {
+ mes "[Mad Sago Lauds]";
+ mes "Oh, you've brought them all.";
+ mes "Hahaha!";
+ mes "HAHAHAHAHAHA!!!! cough cough";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "Please give them to me. Thank you";
+ mes "for your hard work, by the way.";
+ mes "Say, have you learned anything from the journey?";
+ mes "Now is to go visit the plaque at 12";
+ mes "o'clock direction in Prontera.";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "What do you mean you were just";
+ mes "there?";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "What? Why are you giving me your";
+ mes "garbage!";
+ mes "Those items are not useful to me at all";
+ mes "You should be going to the plaque!";
+ set Memorial08,8;
+ close;
+ }
+
+ else if(Memorial08 == 8) {
+ mes "[Mad Sago Lauds]";
+ mes "Stop trying to give me your garbage!";
+ mes "Go to the plaque at 12 o'clock";
+ mes "direction in Prontera for your journey!";
+ close;
+ }
+
+ else if(Memorial08 >= 9) {
+ set .@RandomMsg, rand(1,5);
+ if(.@RandomMsg == 1) {
+ mes "[Mad Sago Lauds]";
+ mes "Don't panic!";
+ emotion 0;
+ close;
+ }
+ else if(.@RandomMsg == 2) {
+ mes "[Mad Sago Lauds]";
+ mes "Life... is like a grapefruit.";
+ mes "It's orange and squishy, and has a";
+ mes "few pips in it,";
+ mes "and some folks have half a one for";
+ mes "breakfast.";
+ close;
+ }
+ else if(.@RandomMsg == 3) {
+ mes "[Mad Sago Lauds]";
+ mes "There was a point to this story,";
+ mes "but it has temporarily escaped the";
+ mes "chronicler's mind.";
+ close;
+ }
+ else if(.@RandomMsg == 4) {
+ mes "[Mad Sago Lauds]";
+ mes "42!";
+ close;
+ }
+ else if(.@RandomMsg == 5) {
+ mes "[Mad Sago Lauds]";
+ mes "It is a mistake to think you can";
+ mes "solve any major problems just with";
+ mes "potatoes.";
+ close;
+ }
+ }
+}
+
+// ============== Memorial Plaque ================
+// ===============================================
+prontera,153,286,4 script Memorial Plaque#Memorial 857,{
+ if(Memorial08 < 8) {
+ mes "[" + strcharinfo(0) + "]";
+ mes "- It's a dusty old plaque.-";
+ close;
+ }
+
+ else if(Memorial08 == 8) {
+ mes "[" + strcharinfo(0) + "]";
+ mes "- It's a dusty old plaque.-";
+ mes "'This must be what Lauds was talking about.'";
+ mes "'Let's dust it off with the towel.'";
+ next;
+ set Memorial08,9;
+ getexp 93750,43750;
+ goto L_CleanPlaque;
+ }
+
+ else if(Memorial08 >= 9) {
+ goto L_CleanPlaque;
+ }
+
+ L_CleanPlaque:
+ mes "- You see a message from the cleaned plaque.";
+ next;
+ mes "-Although no sculptured marble";
+ mes "should rise to their memory,-";
+ mes "-nor engraved stone bear record of";
+ mes "their deeds,-";
+ mes "-yet will their remembrance be as";
+ mes "lasting as the land they honored.-";
+ mes "-Daniel Webster-";
+ if(Memorial08 == 9) {
+ getexp 93750,43750;
+ }
+ next;
+ mes "-There's another message.-";
+ next;
+ mes "-I may not have gone where I";
+ mes "intended to go,-";
+ mes "-but I think I have ended up where";
+ mes "I needed to be.-";
+ mes "- Douglas Adams.-";
+ if(Memorial08 == 9) {
+ getexp 93750,43750;
+ }
+ next;
+ mes "-This is the last message.-";
+ next;
+ mes "-True heroism is remarkably sober,";
+ mes "very undramatic.-";
+ mes "-It is not the urge to surpass all";
+ mes "others at whatever cost,-";
+ mes "- but the urge to serve others at";
+ mes "whatever cost. -";
+ mes "- Arthur Ashe -";
+ if(Memorial08 == 9) {
+ getexp 93750,43750;
+ set Memorial08,10;
+ }
+ close;
+}
+
+
+// ==================== Grast ====================
+// ===============================================
+prontera,150,270,4 script Grast#Memorial 900,{
+ if(Memorial08 < 3) {
+ mes "[Grast]";
+ mes "Memorial Day is a sad and yet";
+ mes "glorious day.";
+ mes "I wonder how many people remember";
+ mes "them...";
+ close;
+ }
+
+ else if(Memorial08 == 3) {
+ mes "[Grast]";
+ mes "Oh, isn't that a Towel of Memory?";
+ mes "I'm so glad to meet someone who";
+ mes "understands the meaning of Memorial Day.";
+ next;
+ mes "[Grast]";
+ mes "It is very important to know what";
+ mes "we're celebrating today, don't you think?";
+ next;
+ mes "[Grast]";
+ mes "If you like to go on a journey to";
+ mes "pay a tribute to Memorial Day,";
+ mes "you should bring me some materials";
+ mes "I ask.";
+ next;
+ mes "[Grast]";
+ mes "Please bring me ^FF0000one of each Red";
+ mes "Potion, Green Potion, Awakening";
+ mes "Potion, and Butterfly Wing^000000.";
+ mes "I'll be waiting for your return.";
+ set Memorial08,4;
+ close;
+ }
+
+ else if(Memorial08 == 4) {
+ if (countitem(501) < 1 || countitem(506) < 1 || countitem(656) < 1 || countitem(602) < 1) {
+ mes "[Grast]";
+ mes "Oops, you haven't brought all";
+ mes "materials.";
+ mes "Please make sure you need to bring me";
+ mes " ^FF0000one of each Red Potion, Green";
+ mes "Potion, Awakening Potion, and";
+ mes "Butteryfly Wing^000000.";
+ next;
+ mes "[Grast]";
+ mes "You'll have to bring me more";
+ mes "materials afterwards.";
+ mes "If you feel too burdened to gather";
+ mes "them all,";
+ mes "I can provide you all the";
+ mes "materials.";
+ next;
+ if (select("I'll gather the rest.:Give me the materials.") == 2) {
+ goto L_GiveUp;
+ }
+ goto L_Continue;
+ }else{
+ mes "[Grast]";
+ mes "Oh, you've brought the materials I asked.";
+ next;
+ mes "[Grast]";
+ mes "Hmm, you will need some more things still...";
+ next;
+ mes "[Grast]";
+ mes "Please bring me ^FF0000one of each Trap,";
+ mes "Yggdrasil Leaf, Blue Gemstone,";
+ mes "Crystal Mirror, Meat, and Carrot.^000000";
+ mes "I'll be waiting for your return.";
+ set Memorial08,5;
+ close;
+ }
+ }
+
+ else if(Memorial08 == 5) {
+ if (countitem(1065) < 1 || countitem(610) < 1 || countitem(717) < 1 || countitem(747) < 1 || countitem(517) < 1 || countitem(515) < 1) {
+ mes "[Grast]";
+ mes "Oops, you haven't brought all materials.";
+ mes "Please make sure you'll have to bring me";
+ mes " ^FF0000one of each Trap, Yggdrasil Leaf,";
+ mes "Blue Gemstone, Crystal Mirror,";
+ mes "Meat, and Carrot^000000.";
+ next;
+ mes "[Grast]";
+ mes "You'll have to bring me more";
+ mes "materials afterwards.";
+ mes "If you feel too burdened to gather them all,";
+ mes "I can provide you all the materials.";
+ next;
+ if (select("I'll gather the rest.:Give me the materials.") == 2) {
+ goto L_GiveUp;
+ }
+ goto L_Continue;
+ }else{
+ mes "[Grast]";
+ mes "Oh, you've brought everything I asked.";
+ mes "Hmm, I think you need just a little bit more.";
+ next;
+ mes "[Grast]";
+ mes "Please bring me ^FF0000one of each Pet";
+ mes "Incubator, Firecracker, Poring";
+ mes "Doll, and Bouquet^000000.";
+ set Memorial08,6;
+ close;
+ }
+ }
+
+ else if(Memorial08 == 6) {
+ if (countitem(643) < 1 || countitem(12018) < 1 || countitem(741) < 1 || countitem(745) < 1) {
+ mes "[Grast]";
+ mes "Oops, you haven't brought all materials.";
+ mes "Please make sure you need to bring me";
+ mes " ^FF0000one of each Pet Incubator,";
+ mes "Firecracker, Poring Doll and Bouquet";
+ next;
+ mes "[Grast]";
+ mes "They are the last batch of materials.";
+ mes "If you feel too burdened to gather them all,";
+ mes "I can provide you all the materials.";
+ next;
+ mes "[Grast]";
+ mes "If I provide you all materials, however,";
+ mes "I won't have to thank you for your service.";
+ mes "It's your call, " + strcharinfo(0) + ".";
+ next;
+ if (select("I'll gather the rest.:Give me the materials.") == 2) {
+ goto L_GiveUp;
+ }
+ goto L_Continue;
+ }else{
+ mes "[Grast]";
+ mes "Have you brought the materials I asked?";
+ mes "Ah, thank you for your hard work;";
+ mes "you've brought all of them.";
+ next;
+ mes "[Grast]";
+ mes "I hope you'll learn a valuable";
+ mes "lesson while gathering these materials.";
+ mes "I like to give you a small gift for your service.";
+ next;
+ mes "[Grast]";
+ mes "You see, I have two different gifts";
+ mes "in my each hand.";
+ mes "A best thing would be giving you";
+ mes "both of them, but...";
+ mes "How do you like to test your luck, " + strcharinfo(0) + "?";
+ next;
+ mes "[Grast]";
+ mes "Okay, which hand would you like to pick?";
+ next;
+ if (select("Left hand.:Right hand.") == 2) {
+ mes "[Grast]";
+ mes "You've selected my right hand.";
+ mes "Here's the gift for you.";
+ mes "Now, please bring all these";
+ mes "materials to Lauds.";
+ set Memorial08, 7;
+ getitem 617,1;
+ close;
+ }
+ mes "[Grast]";
+ mes "You've selected my left hand.";
+ mes "Here's the gift for you.";
+ mes "Now, please bring all these";
+ mes "materials to Lauds.";
+ set Memorial08, 7;
+ getitem 12109,1;
+ close;
+ }
+ }
+
+ else if(Memorial08 == 7) {
+ mes "[Grast]";
+ mes "Have you met Lauds?";
+ mes "I hope you'll remember your freedom";
+ mes "and happiness";
+ mes "are built on thousands of lives";
+ mes "sacrificed in war.";
+ close;
+ }
+
+ else if(Memorial08 >= 8) {
+ mes "[Grast]";
+ mes "A towel is about the most massively";
+ mes "useful thing an adventurer can have.";
+ close;
+ }
+
+ L_GiveUp:
+ mes "[Grast]";
+ mes "Oh, I see. I guess you're quite";
+ mes "busy nowadays, huh?";
+ mes "No problem; I'll give you all the";
+ mes "supplies...";
+ next;
+ mes "[Grast]";
+ mes "There you go.";
+ mes "I crushed all the items together";
+ mes "into a more compact form for you";
+ mes "You can thank me later for that";
+ mes "extra service.";
+ mes "Please bring them to Lauds.";
+ set Memorial08,7;
+ getitem 7126,1;
+ next;
+ mes "[Grast]";
+ mes "By the way, he had an unfortunate";
+ mes "accident, and has kind of lost his";
+ mes "mind.";
+ mes "Please don't be alarmed even if he";
+ mes "starts babbling.";
+ close;
+
+ L_Continue:
+ mes "[Grast]";
+ mes "That's a good idea.";
+ mes "Then I'll be waiting for your return.";
+ close;
+}
\ No newline at end of file |