//===== 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;
}
