summaryrefslogtreecommitdiff
path: root/npc/events
diff options
context:
space:
mode:
Diffstat (limited to 'npc/events')
-rw-r--r--npc/events/MemorialDay_2008.txt1034
-rw-r--r--npc/events/children_week.txt170
-rw-r--r--npc/events/christmas_2008.txt2432
-rw-r--r--npc/events/valentinesday_2009.txt1566
4 files changed, 2601 insertions, 2601 deletions
diff --git a/npc/events/MemorialDay_2008.txt b/npc/events/MemorialDay_2008.txt
index cf8eaa8ad..cbecbdae8 100644
--- a/npc/events/MemorialDay_2008.txt
+++ b/npc/events/MemorialDay_2008.txt
@@ -1,518 +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;
+//===== 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
diff --git a/npc/events/children_week.txt b/npc/events/children_week.txt
index 9a8933be5..e8fcd770e 100644
--- a/npc/events/children_week.txt
+++ b/npc/events/children_week.txt
@@ -1,86 +1,86 @@
-//===== eAthena Script =======================================
-//= Children Week Event
-//===== By: ==================================================
-//= Samuray22
-//===== Current Version: =====================================
-//= 1.1
-//===== Compatible With: =====================================
-//= eAthena SVN
-//===== Description: =========================================
-//= [Aegis Conversion]
-//= Indian Ro: Children Week Event
-//===== Additional Comments: =================================
-//= 1.1 First Beta. [Samuray22]
-//============================================================
-
-prontera,146,91,5 script Pandit chacha#child07 61,{
- if(BaseLevel > 50) {
- mes "[Pandit chacha]";
- mes "Hahaha.";
- mes "It is special day, comes only one time in a year.";
- mes "If you see little adventurers around you send to me~";
- mes "I will give the special gift.";
- close;
- } else if(BaseLevel < 20) {
- mes "[Pandit chacha]";
- mes "Hahaha.";
- mes "You are a baby adventurer not little adventurer.";
- mes "When you more grow up, come back again. hahaha.";
- close;
- } else if(oversea_event9 < 1) {
- mes "[Pandit chacha]";
- mes "Hahaha.";
- mes "Welcome, little adventurers!";
- mes "Today is special day, isn't it~?";
- mes "I would like to give the small gift to little adventurer...";
- mes "What about you? Do you want to take it?";
- next;
- if(select("No. I will take it later.","Sure, i want.") == 1) {
- mes "[Pandit chacha]";
- mes "That's too bad.... hum...";
- mes "I gathered some stuffs from far a way world to make it....";
- mes "Whenever come back again if you want it...";
- close;
- }
- set oversea_event9,1;
- getitem 11705,10; //Children's Potion
- mes "[Pandit chacha]";
- mes "Look. This is a child Potion.";
- mes "The weight is just 1 but recover much HP.";
- mes "If you want to get more, bring the 1 Wedding Bouquet and 1 Witherless Rose.";
- close;
- } else if(oversea_event9 == 1) {
- if(countitem(745) > 0 && countitem(748) > 0) {
- mes "[Pandit chacha]";
- mes "Ahha!!";
- mes "You have remembered my beautiful composition.";
- mes "You did good work.";
- mes "Could you give me 1 Wedding Bouquet and 1 Witherless Rose? ";
- next;
- if(select("Not yet.","Sure, take it.") == 1) {
- mes "[Pandit chacha]";
- mes "If you are not prepared yet, call me when you ready.";
- close;
- }
- mes "[Pandit chacha]";
- mes "Hahaha.";
- mes "Oh~ you get it.";
- mes "Here, I will exchange to the 50 child potion.";
- mes "Once you get this 50 child potion, I won't give any more.";
- close2;
- delitem 745,1; //Wedding Bouquet
- delitem 748,1; //Witherless Rose
- set oversea_event9,2;
- getitem 11705,50; //Children's Potion
- end;
- }
- mes "[Pandit chacha]";
- mes "Little adventurers, you should bring the 1 Wedding Bouquet and 1 Witherless Rose.";
- mes "If you bring these stuffs I will exchange them for child Potion. ";
- close;
- }
- mes "[Pandit chacha]";
- mes "Hahaha.";
- mes "Are you enjoying children week~? ";
- close;
+//===== eAthena Script =======================================
+//= Children Week Event
+//===== By: ==================================================
+//= Samuray22
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= eAthena SVN
+//===== Description: =========================================
+//= [Aegis Conversion]
+//= Indian Ro: Children Week Event
+//===== Additional Comments: =================================
+//= 1.1 First Beta. [Samuray22]
+//============================================================
+
+prontera,146,91,5 script Pandit chacha#child07 61,{
+ if(BaseLevel > 50) {
+ mes "[Pandit chacha]";
+ mes "Hahaha.";
+ mes "It is special day, comes only one time in a year.";
+ mes "If you see little adventurers around you send to me~";
+ mes "I will give the special gift.";
+ close;
+ } else if(BaseLevel < 20) {
+ mes "[Pandit chacha]";
+ mes "Hahaha.";
+ mes "You are a baby adventurer not little adventurer.";
+ mes "When you more grow up, come back again. hahaha.";
+ close;
+ } else if(oversea_event9 < 1) {
+ mes "[Pandit chacha]";
+ mes "Hahaha.";
+ mes "Welcome, little adventurers!";
+ mes "Today is special day, isn't it~?";
+ mes "I would like to give the small gift to little adventurer...";
+ mes "What about you? Do you want to take it?";
+ next;
+ if(select("No. I will take it later.","Sure, i want.") == 1) {
+ mes "[Pandit chacha]";
+ mes "That's too bad.... hum...";
+ mes "I gathered some stuffs from far a way world to make it....";
+ mes "Whenever come back again if you want it...";
+ close;
+ }
+ set oversea_event9,1;
+ getitem 11705,10; //Children's Potion
+ mes "[Pandit chacha]";
+ mes "Look. This is a child Potion.";
+ mes "The weight is just 1 but recover much HP.";
+ mes "If you want to get more, bring the 1 Wedding Bouquet and 1 Witherless Rose.";
+ close;
+ } else if(oversea_event9 == 1) {
+ if(countitem(745) > 0 && countitem(748) > 0) {
+ mes "[Pandit chacha]";
+ mes "Ahha!!";
+ mes "You have remembered my beautiful composition.";
+ mes "You did good work.";
+ mes "Could you give me 1 Wedding Bouquet and 1 Witherless Rose? ";
+ next;
+ if(select("Not yet.","Sure, take it.") == 1) {
+ mes "[Pandit chacha]";
+ mes "If you are not prepared yet, call me when you ready.";
+ close;
+ }
+ mes "[Pandit chacha]";
+ mes "Hahaha.";
+ mes "Oh~ you get it.";
+ mes "Here, I will exchange to the 50 child potion.";
+ mes "Once you get this 50 child potion, I won't give any more.";
+ close2;
+ delitem 745,1; //Wedding Bouquet
+ delitem 748,1; //Witherless Rose
+ set oversea_event9,2;
+ getitem 11705,50; //Children's Potion
+ end;
+ }
+ mes "[Pandit chacha]";
+ mes "Little adventurers, you should bring the 1 Wedding Bouquet and 1 Witherless Rose.";
+ mes "If you bring these stuffs I will exchange them for child Potion. ";
+ close;
+ }
+ mes "[Pandit chacha]";
+ mes "Hahaha.";
+ mes "Are you enjoying children week~? ";
+ close;
} \ No newline at end of file
diff --git a/npc/events/christmas_2008.txt b/npc/events/christmas_2008.txt
index 8e3e4e788..bb08b13a3 100644
--- a/npc/events/christmas_2008.txt
+++ b/npc/events/christmas_2008.txt
@@ -1,1217 +1,1217 @@
-//===== eAthena Script =======================================
-//= iRO 2008 Christmas Event
-//===== By: ==================================================
-//= Kisuka
-//===== Current Version: =====================================
-//= 1.0
-//===== Compatible With: =====================================
-//= eAthena SVN
-//===== Description: =========================================
-//= iRO Christmas Event. (2008)
-//= Create Music Box and Cake.
-//= Play card game with Santa.
-//= Create Santa Suits.
-//==========================================
-//= Must enable X-mas08 items in item_db2 (not in databases).
-//= Must have 'Christmas Carol' skill (not in databases).
-//= Must enable X-mas08 mobs in mob_avail (not in databases).
-//===== Additional Comments: =================================
-//= 1.0 First version. [Kisuka]
-//============================================================
-
-// ============== Carolling - Music Box ================
-// =====================================================
-prontera,226,306,4 script Carolling#iROxmas08 79,{
- if (iROxmas08carol < 1 || iROxmas08carol == 3) {
- if (iROxmas08carol == 3) {
- mes "[Carolling]";
- mes "Jingle Bells! Jingle Bells! Jingle";
- mes "all the way!";
- mes "O' what fun it is to ride in a";
- mes "one-horse open sleeeigh, Hey!";
- next;
- mes "[Carolling]";
- mes "Merry Christmas!";
- mes "Hey! You! What comes to mind when";
- mes "you think about Christmas?";
- next;
- }else{
- mes "[Carolling]";
- mes "Jingle Bells! Jingle Bells! Jingle all the way!";
- next;
- specialeffect 75;
- mes "[Carolling]";
- mes "O' what fun it is to ride in a one-horse open sleigh!";
- next;
- mes "[Carolling]";
- mes "Merry Christmas!";
- if (Sex) {
- mes "Hey, boy! What comes to mind when";
- }else{
- mes "Hey, girl! What comes to mind when";
- }
- mes "you think about Christmas?";
- next;
- }
- switch(select("Santa Claus:Gift Boxes:Carols:Santa Costumes:Fake Santa Antonio")) {
-
- case 1:
- mes "[Carolling]";
- mes "Santa Claus!";
- mes "You're so innocent!!";
- mes "Ah!";
- next;
- mes "[Carolling]";
- mes "Here's a secret!";
- mes "There's a rumor that Santa Claus";
- mes "lives in a certain village all";
- mes "throughout the year.";
- next;
- mes "[Carolling]";
- mes "But now!!!";
- mes "In this Christmas season!!";
- mes "You guys can meet Santa on either";
- mes "of the five possible villages";
- mes "throughout Rune-Midgerts!";
- next;
- mes "[Carolling]";
- mes "If you win over Santa, you can get";
- mes "a gift. Would you go for it?";
- next;
- emotion 18;
- mes "[Carolling]";
- mes "Carolling's hot news! Ha!";
- mes "Isn't that big news?";
- close;
-
- case 2:
- mes "[Carolling]";
- mes "Gift boxes?! All right!";
- mes "Isn't it thrilling to open gifts";
- mes "over your head!!";
- next;
- mes "[Carolling]";
- mes "Anyway, did you know...";
- mes "Some villain, a fake Santa robbed";
- mes "some gifts from the good Santa!";
- next;
- mes "[Carolling]";
- mes "Furthermore, he has put bad magic";
- mes "on the gifts so that they become";
- mes "monsters!";
- next;
- emotion 18;
- mes "[Carolling]";
- mes "Carolling's hot news! Ha!";
- mes "Isn't it amazing?";
- close;
-
- case 3:
- if (iROxmas08carol == 3) {
- mes "[Carolling]";
- mes "Ah, a music box is useful.";
- next;
- mes "[Carolling]";
- mes "Though we can't all play it around";
- mes "the village as we planned, it's";
- mes "cool that you carry it.";
- next;
- mes "[Carolling]";
- mes "We want to enjoy carols all";
- mes "together... I hope to get Crystal";
- mes "Pieces!";
- next;
- mes "[Carolling]";
- mes "If you can get ^0000FFSinging Crystal";
- mes "Pieces^000000, give them to me please?";
- next;
- select("Why not? Sure, I can give you some.");
- if (countitem(6092) < 6) {
- mes "[Carolling]";
- mes "Yes, please.";
- next;
- mes "[Carolling]";
- mes "If you can get ^0000FFSinging Crystal";
- mes "Pieces^000000, give them to me please?";
- close;
- }else{
- mes "[Carolling]";
- mes "Wow, you have them.";
- next;
- mes "[Carolling]";
- mes "I can bake you a cake,";
- mes "and I can carve your name on the";
- mes "cake, if you want!";
- next;
- if (select("No, thanks.:Please name it for me.") == 2) {
- mes "[Carolling]";
- mes "Thank for your help!";
- next;
- mes "[Carolling]";
- mes "Many people live in the giant";
- mes "world!";
- mes "So many people hope to hear";
- mes "carolling, yet I always lack";
- mes "Crystal pieces.";
- next;
- mes "[Carolling]";
- mes "If you can get ^0000FFSinging Crystal Pieces^000000, give them to me please?";
- next;
- emotion 18;
- delitem 6092,6;
- getnameditem 12354,"+strcharinfo(0)+";
- mes "[Carolling]";
- mes "Let's care about others around you";
- mes "on this Christmas season!";
- close;
- }else{
- mes "[Carolling]";
- mes "Oh!";
- mes "Shyness!";
- next;
- mes "[Carolling]";
- mes "Anyway, thanks a lot for your";
- mes "help.";
- next;
- mes "[Carolling]";
- mes "Many people live in the giant";
- mes "world!";
- mes "So many people hope to hear";
- mes "carolling, yet I always lack";
- mes "Crystal pieces.";
- next;
- mes "[Carolling]";
- mes "If you can get ^0000FFSinging Crystal Pieces^000000, give them to me please?";
- next;
- emotion 18;
- delitem 6092,6;
- getitem 12354,1;
- mes "[Carolling]";
- mes "Let's care about others around you";
- mes "on this Christmas season!";
- close;
- }
- }
- }
- mes "[Carolling]";
- mes "You know about Christmas!";
- mes "Talking about Christmas...";
- mes "...it's carols!!!";
- mes "I've been waiting for this for when";
- mes "Christmas comes around!";
- next;
- mes "[Carolling]";
- mes "But there's been no caroling here";
- mes "and there like before, so we can't";
- mes "feel the Christmas spirit.";
- next;
- mes "[Carolling]";
- mes "So, I installed a Singing Crystal";
- mes "in Prontera...";
- next;
- mes "[Carolling]";
- mes "but that jerk Antonio broke the";
- mes "crystal!";
- next;
- mes "[Carolling]";
- mes "The gift boxes have been changing";
- mes "into monsters since Antonio placed";
- mes "some magic on them, so the monsters";
- mes "ate up the crystal fragments!";
- next;
- mes "[Carolling]";
- mes "I am so devastated, since the";
- mes "Singing Crystal has been the hope";
- mes "of many children around the villages.";
- next;
- if (select("There's no other way to carol?:You can hear carols in Lutie.") == 2) {
- mes "[Carolling]";
- mes "And just stay there, every";
- mes "Christmas, for your whole life?";
- next;
- mes "["+strcharinfo(0)+"]";
- mes "What? What do you mean?";
- next;
- mes "[Carolling]";
- mes "Oh, nevermind.";
- mes "Ah...";
- close;
- }
- mes "[Carolling]";
- mes "Maybe, it's quite hard to make a";
- mes "jukebox for the villages, but a";
- mes "music box might be possible.";
- next;
- mes "[Carolling]";
- mes "We need the ^0000FFSinging Crystal Pieces^000000";
- mes "that the monsters ate up.";
- next;
- mes "[Carolling]";
- mes "Please bring me ^0000FF6 Singing Crystal";
- mes "Pieces^000000, and you will be rewarded";
- mes "with presents!";
- next;
- mes "[Carolling]";
- mes "Sounds cool, huh!!";
- next;
- select("........................");
- mes "[Carolling]";
- mes "...Why are you staring at me like";
- mes "that?";
- next;
- mes "[Carolling]";
- mes "You're thinking that we are always";
- mes "getting our plans spoiled, aren't";
- mes "you?";
- next;
- mes "[Carolling]";
- mes "I know that we are not good at";
- mes "controlling stuff, but our rewards";
- mes "are good, right?";
- next;
- select("........................");
- mes "[Carolling]";
- mes "Hey, we treat you good...";
- next;
- select("........................");
- mes "[Carolling]";
- mes "You are so cruel to me!";
- mes "Bad! Bad!";
- next;
- mes "[Carolling]";
- mes "Please, for our children's";
- mes "hope!!!?";
- mes "Please bring me 6 Singing Crystal";
- mes "Pieces from ^0000FFViolent Gift Boxes^000000!";
- next;
- emotion 33;
- mes "[Carolling]";
- mes "They're definitely as";
- mes "harsh as their name.";
- mes "Go on please!";
- set iROxmas08carol,1;
- close;
-
- case 4:
- mes "[Carolling]";
- mes "Santa costumes!!";
- mes "You know, the santa costumes that";
- mes "the monsters are wearing now aren't";
- mes "genuine!";
- next;
- mes "[Carolling]";
- mes "The rumor 'round here is, Lutie's";
- mes "designer made these costumes.";
- next;
- mes "[Carolling]";
- mes "Every year, adventurers challenge";
- mes "to attack Antonio the fake Santa,";
- mes "but there's no way to catch up to";
- mes "him due to his hat and costume!";
- next;
- mes "[Carolling]";
- mes "Are there some spcial abilities";
- mes "within them?";
- mes "There's still the designer in the";
- mes "Christmas village... How about";
- mes "asking her to make that costume?";
- next;
- emotion 18;
- mes "[Carolling]";
- mes "Carolling's hot news! Ha!";
- mes "It's hot, huh?";
- close;
-
-
- case 5:
- mes "[Carolling]";
- mes "A-N-T-O-N-I-O!!!";
- mes "As I heard, this Antonio is quite";
- mes "different from before.";
- next;
- mes "[Carolling]";
- mes "He seems to be quite resolved with";
- mes "himself since he ran away from";
- mes "people before.";
- next;
- mes "[Carolling]";
- mes "And he isn't alone anymore... is";
- mes "what I heard...";
- next;
- emotion 18;
- mes "[Carolling]";
- mes "Carolling's hot news! Ha!";
- mes "Hotness, right?";
- close;
- }
- }
-
- if (iROxmas08carol == 1) {
- if (countitem(6092) < 6) {
- mes "[Carolling]";
- mes "Maybe, it's quite hard to make a";
- mes "jukebox for the villages, but a";
- mes "music box might be possible.";
- next;
- mes "[Carolling]";
- mes "We need the ^0000FFSinging Crystal Pieces^000000";
- mes "that the monsters ate up.";
- next;
- mes "[Carolling]";
- mes "Please bring me ^0000FF6 Singing Crystal Pieces^000000, and you will be rewarded with presents!";
- next;
- mes "[Carolling]";
- mes "For all of the children of this";
- mes "world!!!";
- mes "Please bring me ^0000FF6Singing Crystal";
- mes "Pieces^000000 from ^0000FFViolent Gift Boxes^000000!";
- next;
- emotion 33;
- mes "[Carolling]";
- mes "Be careful!";
- mes "They're definitely as";
- mes "harsh as their name.";
- mes "Take care!!!";
- close;
- }else{
- specialeffect 75;
- mes "[Carolling]";
- mes "Don't cry, don't cry!";
- mes "Santa won't give you a";
- mes "gift if you're crying.";
- next;
- mes "[Carolling]";
- select("I got them!");
- mes "[Carolling]";
- mes "Wow, you got them!";
- mes "They are so cruel, aren't they?";
- mes "I'm happy to see you again.";
- next;
- mes "[Carolling]";
- mes "Let's count together!";
- mes "... ...";
- mes "Six!!";
- next;
- mes "[Carolling]";
- mes "All right! We can start to make our";
- mes "music box with crystal fragments.";
- next;
- mes "[Carolling]";
- mes "We would amplify the sounds of the";
- mes "crystal fragments to sound through";
- mes "the music box.";
- next;
- mes "[Carolling]";
- mes "You know, a music box that sounds";
- mes "like a jukebox!";
- next;
- mes "[Carolling]";
- mes "It's handy. You can carry it, as";
- mes "well as listen to sweet carols";
- mes "anywhere. Doesn't that sound";
- mes "cool!?";
- next;
- mes "[Carolling]";
- mes "So, we need more of some";
- mes "materials.";
- mes "^0000FF10 Wooden Block, 1 Hammer Of";
- mes "Blacksmith, 1 Jubilee, 10 Sticky";
- mes "Mucus, 3-karat Diamond^000000!";
- next;
- delitem 6092,6;
- emotion 33;
- set iROxmas08carol,2;
- mes "[Carolling]";
- mes "Those are all needed.";
- mes "Isn't that easy?";
- close;
- }
- }
-
- if (iROxmas08carol == 2) {
- if (countitem(1019) < 10 || countitem(1005) < 1 || countitem(7312) < 1 || countitem(938) < 10 || countitem(732) < 1) {
- mes "[Carolling]";
- mes "We can make a music box";
- mes "with Singing Crystal Pieces.";
- mes "It's handy, you can hear carols";
- mes "anywhere. Sounds cool?";
- next;
- mes "[Carolling]";
- mes "So, we need more of some materials.";
- mes "^0000FF10 Wooden Block, 1 Hammer Of";
- mes "Blacksmith, 1 Jubilee, 10 Sticky";
- mes "Mucus, 3-karat Diamond^000000!";
- next;
- emotion 33;
- mes "[Carolling]";
- mes "That's all we need.";
- mes "Isn't that easy?";
- close;
- }else{
- specialeffect 75;
- mes "[Carolling]";
- mes "Jingle bells, jingle bells,";
- mes "jingle all the way!";
- mes "O what fun it is to ride, in a";
- mes "one... horse... o-pen... sleigh!!!";
- next;
- mes "[Carolling]";
- mes "Wow!";
- mes "You came back!";
- mes "Did you bring all the";
- mes "materials?";
- next;
- mes "[Carolling]";
- mes "Good!";
- mes "No need to hesitate! Let's get";
- mes "started to make our music box.";
- next;
- mes "[Carolling]";
- specialeffect 101;
- mes "Blacksmith hammers on wooden";
- mes "block... and we shape the frame.";
- next;
- mes "[Carolling]";
- //(effect - stones from ground?)
- mes "Please use the Singing Crystal";
- mes "Pieces for a column, the Diamond as";
- mes "a prop, and the Sticky Mucus as";
- mes "glue.";
- next;
- mes "[Carolling]";
- specialeffect 1;
- mes "And now...";
- mes "we decorate with a Jubilee...";
- next;
- mes "[Carolling]";
- specialeffect 88;
- mes "The last step...!";
- mes "Breating life into it!";
- next;
- mes "[Carolling]";
- mes "It's done now!!!";
- next;
- mes "[Carolling]";
- mes "It's so cool! Isn't it cute!!?!";
- next;
- mes "[Carolling]";
- mes "You did as I requested, so I will";
- mes "give you gifts, as promised.";
- next;
- mes "[Carolling]";
- mes "One, is this music box.";
- mes "Please play this music box all over";
- mes "the villages!";
- next;
- mes "[Carolling]";
- mes "Another present is a Christmas cake";
- mes "especially shaped like your name!";
- mes "I made this cake shaped like your";
- mes "name!";
- next;
- mes "[Carolling]";
- mes "Don't worry, it tastes good.";
- next;
- emotion 33;
- getitem 2784,1;
- getnameditem 12354,"+strcharinfo(0)+";
- delitem 1019,10;
- delitem 1005,1;
- delitem 7312,1;
- delitem 938,10;
- delitem 732,1;
- set iROxmas08carol,3;
- mes "[Carolling]";
- mes "Thanks a lot.";
- mes "Merry Christmas!";
- mes "Have a good holiday season!";
- close;
- }
- }
-}
-
-// ============= Santa Claus - Card Game ===============
-// =====================================================
-- script Santa Claus#iROxmas08::08santa 718,{
- mes "[Santa Claus]";
- mes "Wow! Were you naughty or nice this";
- mes "year?";
- mes "All right, what comes to your mind";
- mes "when you think about Christmas?";
- next;
- switch(select("Carolling:Santa Claus:Gift Boxes:Santa Costume:Not much really...")) {
-
- case 1:
- mes "[Santa Claus]";
- mes "Carolling! That's good!";
- mes "A sweet carol always makes";
- mes "Christmas more happy!!!";
- next;
- mes "[Santa Claus]";
- mes "Yes indeed Carolling spreads Joy";
- mes "throughout the world?";
- close;
-
- case 2:
- mes "[Santa Claus]";
- if (Sex) {
- mes "Ho ho ho! What a good boy!";
- }else{
- mes "Ho ho ho! What a good girl!";
- }
- next;
- mes "[Santa Claus]";
- mes "But you should be wary of a fake";
- mes "Santa romaing around.";
- mes "Have you heard of Antonio, who";
- mes "invades villages every Christmas?";
- next;
- mes "[Santa Claus]";
- mes "He has stolen my gifts, as well as";
- mes "attacked adventurers around Toy and";
- mes "Lutie field.";
- next;
- mes "[Santa Claus]";
- mes "A bad Santa ruins us good Santa's";
- mes "reputations!";
- mes "The World Santa Organization is";
- mes "considering this a grave";
- mes "situation.";
- close;
-
- case 3:
- mes "[Santa Claus]";
- mes "A gift box! That sounds good!";
- mes "It's so exciting to open gift boxes";
- mes "when you wake up on Christmas";
- mes "morning!!!";
- next;
- mes "[Santa Claus]";
- mes "But we have very little gifts now,";
- mes "since Santa Antonio has stolen my";
- mes "gift bag.";
- next;
- mes "[Santa Claus]";
- mes "Many adventurers try to catch up";
- mes "to him, but he is not easy to catch.";
- next;
- mes "[Santa Claus]";
- mes "Anyway let those adventurers try to";
- mes "catch him, I have a small game for";
- mes "you.";
- next;
- mes "[Santa Claus]";
- mes "I will give you a small gift if you";
- mes "beat me!";
- next;
- mes "[Santa Claus]";
- mes "Do you want to play a game with";
- mes "me?";
- next;
- if (select("No, thanks.:Yes, I would.") == 1) {
- mes "[Santa Claus]";
- mes "Aww, don't be afraid. If you've";
- mes "been a little naughty this year I";
- mes "won't stuff your stockings with";
- mes "coal.";
- next;
- mes "[Santa Claus]";
- mes "I will stay here throughout the";
- mes "Christmas season, just visit me";
- mes "when you change your mind.";
- close;
- }
- if (gettimetick(2) < SantaCardTime) {
- mes "[Santa Claus]";
- mes "Um... You've played the game";
- mes "recently haven't you?";
- next;
- mes "[Santa Claus]";
- mes "You can try the game once a hour.";
- mes "Please visit me after the one hour";
- mes "has passed.";
- close;
- }
- set .@SantaCardTurn,0;
- set .@SantaCardWins,0;
- mes "[Santa Claus]";
- mes "Wow! You're so cool!";
- next;
- mes "[Santa Claus]";
- mes "Let me explain how to play this";
- mes "game.";
- next;
- mes "[Santa Claus]";
- mes "It's quite simple. I will pick one";
- mes "of three cards: Poring Card,";
- mes "Ghostring Card, and Angeling Card.";
- mes "Guess which card I pick and";
- mes "you're a winner!";
- next;
- mes "[Santa Claus]";
- mes "If you guess right 3 times out of";
- mes "5, I will give you a gift.";
- mes "Let's get started!";
- next;
- while(.@SantaCardTurn != 5) {
- emotion 56;
- mes "[Santa Claus]";
- mes "First let me shuffle up these";
- mes "cards... Ok!!!";
- next;
- specialeffect 0;
- mes "[Santa Claus]";
- mes "One!";
- next;
- specialeffect 1;
- mes "[Santa Claus]";
- mes "Two!";
- next;
- specialeffect 2;
- mes "[Santa Claus]";
- mes "Three!";
- next;
- specialeffect 18;
- mes "[Santa Claus]";
- mes "I'm picking up only one!";
- next;
- cutin "sorry",4;
- mes "[Santa Claus]";
- mes "I'm picking up only one!";
- mes "Please guess what is is.";
- next;
- switch(select("Poring:Angeling:Ghostring")) {
- case 1:
- mes "["+strcharinfo(0)+"]";
- mes "Um...I choose Poring!";
- set .@SantaCardP,1;
- next;
- break;
-
- case 2:
- mes "["+strcharinfo(0)+"]";
- mes "Um...I choose Angeling!";
- set .@SantaCardP,2;
- next;
- break;
-
- case 3:
- mes "["+strcharinfo(0)+"]";
- mes "Um...I choose Ghostring!";
- set .@SantaCardP,3;
- next;
- }
- mes "[Santa Claus]";
- mes "Let's see!!";
- mes "One! Two! Three!";
- set .@SantaCardNpc, rand(1,3);
- next;
- mes "[Santa Claus]";
- mes "Let's see!!";
- mes "One! Two! Three!";
- if (.@SantaCardNpc == 1) {
- cutin "Æ÷¸µÄ«µå",4;
- }
- else if (.@SantaCardNpc == 2) {
- cutin "¿£Á©¸µÄ«µå",4;
- }
- else if (.@SantaCardNpc == 3) {
- cutin "°í½ºÆ®¸µÄ«µå",4;
- }
- next;
- set .@SantaCardTurn,.@SantaCardTurn+1;
- if (.@SantaCardP == .@SantaCardNpc) {
- set .@SantaCardWins,.@SantaCardWins+1;
- emotion 0;
- emotion 5,1;
- cutin "",255;
- mes "[Santa Claus]";
- mes "You're lucky.";
- mes "Can you guess the right card the";
- mes "next time around?";
- next;
- }else{
- emotion 0;
- emotion 23,1;
- cutin "",255;
- mes "[Santa Claus]";
- mes "Aww maybe next time...";
- next;
- }
- }
- if (.@SantaCardWins < 3) {
- mes "["+strcharinfo(0)+"]";
- mes "This is just luck. Let me try";
- mes "again!!";
- next;
- mes "[Santa Claus]";
- mes "Whenever you want.";
- close;
- }else{
- mes "[Santa Claus]";
- mes "You're so good!";
- next;
- mes "[Santa Claus]";
- mes "Now this gift is for you. Put your";
- mes "hand into the bag and pick only";
- mes "one.";
- set .@SantaCardPrize, rand(1,12);
- next;
- if (.@SantaCardPrize == 1) {
- getitem 12354,2;
- }
- else if (.@SantaCardPrize == 2) {
- getitem 595,3;
- }
- else if (.@SantaCardPrize == 3) {
- getitem 593,3;
- }
- else if (.@SantaCardPrize == 4) {
- getitem 12236,3;
- }
- else if (.@SantaCardPrize == 5) {
- getitem 538,10;
- }
- else if (.@SantaCardPrize == 6) {
- getitem 14546,10;
- }
- else if (.@SantaCardPrize == 7) {
- getitem 5136,1;
- }
- else if (.@SantaCardPrize == 8) {
- getitem 603,1;
- }
- else if (.@SantaCardPrize == 9) {
- getitem 12130,1;
- }
- else if (.@SantaCardPrize == 10) {
- getitem 14550,10;
- }
- else if (.@SantaCardPrize == 11) {
- getitem 12132,3;
- }
- else if (.@SantaCardPrize == 12) {
- getitem 594,3;
- }
- set SantaCardTime,gettimetick(2)+3600;
- mes "[Santa Claus]";
- mes "Good job! Thanks for playing the";
- mes "card game with me! Merry";
- mes "Christmas!";
- close;
- }
-
- case 4:
- mes "[Santa Claus]";
- mes "Do you mean that ever so";
- mes "fashionable costume for Santa's and";
- mes "youngsters!?!";
- mes "Light-weight, fashionable, and";
- mes "keeps you warm!";
- next;
- mes "[Santa Claus]";
- mes "There used to be designer who";
- mes "visited my house to make my Santa";
- mes "costumes. Do you have any ideas?";
- close;
-
- case 5:
- mes "[Santa Claus]";
- mes "........................";
- next;
- mes "[Santa Claus]";
- mes "........................";
- if (Sex) {
- mes "Oh! Poor boy...";
- }else{
- mes "Oh! Poor girl...";
- }
- next;
- mes "[Santa Claus]";
- mes "........................";
- if (Sex) {
- mes "Oh! Poor boy...";
- }else{
- mes "Oh! Poor girl...";
- }
- mes "...";
- next;
- mes "[Santa Claus]";
- mes "You should open your heart to the";
- mes "spirit of Christmas!";
- mes "Once you do, I know you'll be able";
- mes "to think of something.";
- close;
- }
-}
-
-payon,171,109,4 duplicate(08santa) Santa Claus#0801 718
-prontera,156,285,4 duplicate(08santa) Santa Claus#0802 718
-alberta,117,66,4 duplicate(08santa) Santa Claus#0803 718
-geffen,119,70,4 duplicate(08santa) Santa Claus#0804 718
-morocc,158,104,4 duplicate(08santa) Santa Claus#0805 718
-
-
-// ============= Louise Kim - Santa Suit ===============
-// =====================================================
-xmas_in,89,92,4 script Louise Kim#iROxmas08 714,{
- mes "[Louise Kim]";
- mes "I always thought about how boring";
- mes "Santa Claus is wearing a too boring";
- mes "costume. Too boring!";
- next;
- mes "[Louise Kim]";
- mes "I could make a glamorous style for";
- mes "him!";
- next;
- mes "[Louise Kim]";
- mes "I once made a costume for";
- mes "the notorious figure Antonio!";
- mes "The reason catching up to him";
- mes "is so hard, is that his clothes";
- mes "have been given strong power!";
- mes "I blessed them with good luck!";
- next;
- emotion 3;
- mes "[Louise Kim]";
- mes "Preta Porter!!";
- mes "Which is quite luxurious";
- mes "but sold at good price ~";
- next;
- mes "[Louise Kim]";
- mes "Hey loosers! You can share my sense";
- mes "of fashion and wear my look if you";
- mes "run a light mission for me.";
- next;
- mes "[Louise Kim]";
- mes "Are you interested?";
- next;
- if (select("Nope.:Yes, please.") == 1) {
- mes "[Louise Kim]";
- mes "Ah!";
- mes "You're silly! You lost your big";
- mes "chance!";
- next;
- emotion 18;
- mes "[Louise Kim]";
- mes "Come to me later if you";
- mes "want to get the mission.";
- mes "I, Louise Kim, am generous";
- mes "enough to accept you next time.";
- close;
- }
- mes "[Louise Kim]";
- mes "You're so cool.";
- next;
- mes "[Louise Kim]";
- mes "Don't worry about this mission.";
- mes "It's not that difficult.";
- mes "I'm only in need of some";
- mes "materials. Things that are";
- mes "beyond my ability...";
- next;
- mes "[Louise Kim]";
- mes "Anyway, can you bring me some";
- mes "stuff?";
- next;
- if (select("Why not? What do you need?:Sorry, no time.") == 2) {
- emotion 18;
- mes "[Louise Kim]";
- mes "What?";
- mes "You will definitely regret it.";
- mes "No more chances later.";
- close;
- }
- mes "[Louise Kim]";
- mes "All right, you're cool!!";
- mes "You need to bring me: ^0000FFCotton Shirt,";
- mes "3 Red Potion, Holy Water, 4 Wrapping";
- mes "Paper, Wrapping Lace^000000..";
- next;
- mes "[Louise Kim]";
- mes "If you bring me all that stuff, I";
- mes "can make you a glamorous Santa";
- mes "costume.";
- next;
- if (countitem(2301) < 1 || countitem(501) < 3 || countitem(523) < 1 || countitem(7175) < 4 || countitem(7174) < 1) {
- mes "[Louise Kim]";
- mes "If you were to bring me all the";
- mes "stuff, I would make you a wonderful";
- mes "costume, for free...";
- next;
- emotion 3;
- mes "[Louise Kim]";
- mes "Please see me again if you are";
- mes "interested.";
- close;
- }else{
- select("Here you are.");
- emotion 33;
- mes "[Louise Kim]";
- mes "Oh! Good!";
- mes "Let's not delay.";
- mes "I will show you my limitless";
- mes "ability.";
- next;
- mes "-She pours everything in a pot-";
- mes "-even the shirt goes in!-";
- mes "-She takes it out with skill-";
- mes "-and many blessings she sings.-";
- next;
- specialeffect 42;
- emotion 2;
- mes "[Louise Kim]";
- mes "By artist, Louise Kim!";
- mes "All over the world will be blessed";
- mes "tonight!";
- next;
- mes "-Pour red potion in another pot-";
- mes "-then stir all of its parts.-";
- mes "-Put the cotton shirts in-";
- mes "-and dye it for grateful hearts.-";
- mes "-Thread by thread-";
- mes "-String by string-";
- mes "-Count your blessings and sing!-";
- next;
- specialeffect 75;
- emotion 2;
- mes "[Louise Kim]";
- mes "By artist, Louise Kim!";
- mes "All over the world will be blessed";
- mes "tonight!";
- next;
- mes "-She is knitting clothes-";
- mes "-with a hooked needle-";
- mes "-with her great skill.-";
- mes "Spread your blessings,-";
- mes "cheer and goodwill!-";
- next;
- specialeffect 91;
- emotion 3;
- mes "[Louise Kim]";
- mes "This is miraculous!";
- mes "I am a genius of the world.";
- mes "Artist, Louise Kim!!!";
- next;
- mes "[Louise Kim]";
- mes "All right! Isn't it wonderful?";
- mes "You can call it what you wish.";
- mes "My fashion is radiant.";
- mes "I ain't envious of Designer";
- mes "Pierre.";
- next;
- emotion 18;
- mes "[Louise Kim]";
- mes "I am supposed to get paid well,";
- mes "however I will just let it";
- mes "be free, since this is Christmas!";
- next;
- delitem 2301,1;
- delitem 501,3;
- delitem 523,1;
- delitem 7175,4;
- delitem 7174,1;
- getitem 12132,1;
- mes "[Louise Kim]";
- mes "Go brag about these wonderful";
- mes "clothes. There wouldn't be";
- mes "any without me, Louise Kim.";
- close;
- }
-}
-
-//XMAS MOBS
-prt_fild00,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild00,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild00,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild00,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild01,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild01,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild01,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild02,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild02,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild02,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild02,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild03,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild03,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild03,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild03,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild04,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild04,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild04,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild04,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild05,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild05,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild05,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild05,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild06,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild06,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild06,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild06,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild07,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild07,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild07,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild07,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild08,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild08,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild08,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild08,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild09,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild09,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild09,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild09,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild10,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild10,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild10,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild10,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-prt_fild11,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-prt_fild11,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-prt_fild11,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-prt_fild11,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild01,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild01,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild01,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild02,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild02,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild02,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild02,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild03,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild03,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild03,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild03,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild04,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild04,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild04,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild04,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild05,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild05,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild05,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild05,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild06,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild06,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild06,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild06,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild07,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild07,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild07,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild07,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild08,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild08,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild08,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild08,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild09,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild09,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild09,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild09,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild10,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild10,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild10,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild10,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-pay_fild11,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-pay_fild11,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-pay_fild11,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-pay_fild11,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild00,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild00,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild00,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild00,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild01,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild01,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild01,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild02,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild02,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild02,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild02,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild03,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild03,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild03,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild03,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild04,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild04,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild04,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild04,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild05,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild05,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild05,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild05,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild06,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild06,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild06,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild06,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild07,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild07,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild07,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild07,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild08,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild08,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild08,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild08,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild09,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild09,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild09,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild09,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild10,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild10,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild10,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild10,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild11,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild11,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild11,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild11,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild12,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild12,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild12,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild12,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild13,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild13,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild13,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild13,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-gef_fild14,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-gef_fild14,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-gef_fild14,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
-gef_fild14,0,0,0,0 monster Antonio 1247,1,0,0,0
-
-xmas_fild01,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
-xmas_fild01,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
-xmas_fild01,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+//===== eAthena Script =======================================
+//= iRO 2008 Christmas Event
+//===== By: ==================================================
+//= Kisuka
+//===== Current Version: =====================================
+//= 1.0
+//===== Compatible With: =====================================
+//= eAthena SVN
+//===== Description: =========================================
+//= iRO Christmas Event. (2008)
+//= Create Music Box and Cake.
+//= Play card game with Santa.
+//= Create Santa Suits.
+//==========================================
+//= Must enable X-mas08 items in item_db2 (not in databases).
+//= Must have 'Christmas Carol' skill (not in databases).
+//= Must enable X-mas08 mobs in mob_avail (not in databases).
+//===== Additional Comments: =================================
+//= 1.0 First version. [Kisuka]
+//============================================================
+
+// ============== Carolling - Music Box ================
+// =====================================================
+prontera,226,306,4 script Carolling#iROxmas08 79,{
+ if (iROxmas08carol < 1 || iROxmas08carol == 3) {
+ if (iROxmas08carol == 3) {
+ mes "[Carolling]";
+ mes "Jingle Bells! Jingle Bells! Jingle";
+ mes "all the way!";
+ mes "O' what fun it is to ride in a";
+ mes "one-horse open sleeeigh, Hey!";
+ next;
+ mes "[Carolling]";
+ mes "Merry Christmas!";
+ mes "Hey! You! What comes to mind when";
+ mes "you think about Christmas?";
+ next;
+ }else{
+ mes "[Carolling]";
+ mes "Jingle Bells! Jingle Bells! Jingle all the way!";
+ next;
+ specialeffect 75;
+ mes "[Carolling]";
+ mes "O' what fun it is to ride in a one-horse open sleigh!";
+ next;
+ mes "[Carolling]";
+ mes "Merry Christmas!";
+ if (Sex) {
+ mes "Hey, boy! What comes to mind when";
+ }else{
+ mes "Hey, girl! What comes to mind when";
+ }
+ mes "you think about Christmas?";
+ next;
+ }
+ switch(select("Santa Claus:Gift Boxes:Carols:Santa Costumes:Fake Santa Antonio")) {
+
+ case 1:
+ mes "[Carolling]";
+ mes "Santa Claus!";
+ mes "You're so innocent!!";
+ mes "Ah!";
+ next;
+ mes "[Carolling]";
+ mes "Here's a secret!";
+ mes "There's a rumor that Santa Claus";
+ mes "lives in a certain village all";
+ mes "throughout the year.";
+ next;
+ mes "[Carolling]";
+ mes "But now!!!";
+ mes "In this Christmas season!!";
+ mes "You guys can meet Santa on either";
+ mes "of the five possible villages";
+ mes "throughout Rune-Midgerts!";
+ next;
+ mes "[Carolling]";
+ mes "If you win over Santa, you can get";
+ mes "a gift. Would you go for it?";
+ next;
+ emotion 18;
+ mes "[Carolling]";
+ mes "Carolling's hot news! Ha!";
+ mes "Isn't that big news?";
+ close;
+
+ case 2:
+ mes "[Carolling]";
+ mes "Gift boxes?! All right!";
+ mes "Isn't it thrilling to open gifts";
+ mes "over your head!!";
+ next;
+ mes "[Carolling]";
+ mes "Anyway, did you know...";
+ mes "Some villain, a fake Santa robbed";
+ mes "some gifts from the good Santa!";
+ next;
+ mes "[Carolling]";
+ mes "Furthermore, he has put bad magic";
+ mes "on the gifts so that they become";
+ mes "monsters!";
+ next;
+ emotion 18;
+ mes "[Carolling]";
+ mes "Carolling's hot news! Ha!";
+ mes "Isn't it amazing?";
+ close;
+
+ case 3:
+ if (iROxmas08carol == 3) {
+ mes "[Carolling]";
+ mes "Ah, a music box is useful.";
+ next;
+ mes "[Carolling]";
+ mes "Though we can't all play it around";
+ mes "the village as we planned, it's";
+ mes "cool that you carry it.";
+ next;
+ mes "[Carolling]";
+ mes "We want to enjoy carols all";
+ mes "together... I hope to get Crystal";
+ mes "Pieces!";
+ next;
+ mes "[Carolling]";
+ mes "If you can get ^0000FFSinging Crystal";
+ mes "Pieces^000000, give them to me please?";
+ next;
+ select("Why not? Sure, I can give you some.");
+ if (countitem(6092) < 6) {
+ mes "[Carolling]";
+ mes "Yes, please.";
+ next;
+ mes "[Carolling]";
+ mes "If you can get ^0000FFSinging Crystal";
+ mes "Pieces^000000, give them to me please?";
+ close;
+ }else{
+ mes "[Carolling]";
+ mes "Wow, you have them.";
+ next;
+ mes "[Carolling]";
+ mes "I can bake you a cake,";
+ mes "and I can carve your name on the";
+ mes "cake, if you want!";
+ next;
+ if (select("No, thanks.:Please name it for me.") == 2) {
+ mes "[Carolling]";
+ mes "Thank for your help!";
+ next;
+ mes "[Carolling]";
+ mes "Many people live in the giant";
+ mes "world!";
+ mes "So many people hope to hear";
+ mes "carolling, yet I always lack";
+ mes "Crystal pieces.";
+ next;
+ mes "[Carolling]";
+ mes "If you can get ^0000FFSinging Crystal Pieces^000000, give them to me please?";
+ next;
+ emotion 18;
+ delitem 6092,6;
+ getnameditem 12354,"+strcharinfo(0)+";
+ mes "[Carolling]";
+ mes "Let's care about others around you";
+ mes "on this Christmas season!";
+ close;
+ }else{
+ mes "[Carolling]";
+ mes "Oh!";
+ mes "Shyness!";
+ next;
+ mes "[Carolling]";
+ mes "Anyway, thanks a lot for your";
+ mes "help.";
+ next;
+ mes "[Carolling]";
+ mes "Many people live in the giant";
+ mes "world!";
+ mes "So many people hope to hear";
+ mes "carolling, yet I always lack";
+ mes "Crystal pieces.";
+ next;
+ mes "[Carolling]";
+ mes "If you can get ^0000FFSinging Crystal Pieces^000000, give them to me please?";
+ next;
+ emotion 18;
+ delitem 6092,6;
+ getitem 12354,1;
+ mes "[Carolling]";
+ mes "Let's care about others around you";
+ mes "on this Christmas season!";
+ close;
+ }
+ }
+ }
+ mes "[Carolling]";
+ mes "You know about Christmas!";
+ mes "Talking about Christmas...";
+ mes "...it's carols!!!";
+ mes "I've been waiting for this for when";
+ mes "Christmas comes around!";
+ next;
+ mes "[Carolling]";
+ mes "But there's been no caroling here";
+ mes "and there like before, so we can't";
+ mes "feel the Christmas spirit.";
+ next;
+ mes "[Carolling]";
+ mes "So, I installed a Singing Crystal";
+ mes "in Prontera...";
+ next;
+ mes "[Carolling]";
+ mes "but that jerk Antonio broke the";
+ mes "crystal!";
+ next;
+ mes "[Carolling]";
+ mes "The gift boxes have been changing";
+ mes "into monsters since Antonio placed";
+ mes "some magic on them, so the monsters";
+ mes "ate up the crystal fragments!";
+ next;
+ mes "[Carolling]";
+ mes "I am so devastated, since the";
+ mes "Singing Crystal has been the hope";
+ mes "of many children around the villages.";
+ next;
+ if (select("There's no other way to carol?:You can hear carols in Lutie.") == 2) {
+ mes "[Carolling]";
+ mes "And just stay there, every";
+ mes "Christmas, for your whole life?";
+ next;
+ mes "["+strcharinfo(0)+"]";
+ mes "What? What do you mean?";
+ next;
+ mes "[Carolling]";
+ mes "Oh, nevermind.";
+ mes "Ah...";
+ close;
+ }
+ mes "[Carolling]";
+ mes "Maybe, it's quite hard to make a";
+ mes "jukebox for the villages, but a";
+ mes "music box might be possible.";
+ next;
+ mes "[Carolling]";
+ mes "We need the ^0000FFSinging Crystal Pieces^000000";
+ mes "that the monsters ate up.";
+ next;
+ mes "[Carolling]";
+ mes "Please bring me ^0000FF6 Singing Crystal";
+ mes "Pieces^000000, and you will be rewarded";
+ mes "with presents!";
+ next;
+ mes "[Carolling]";
+ mes "Sounds cool, huh!!";
+ next;
+ select("........................");
+ mes "[Carolling]";
+ mes "...Why are you staring at me like";
+ mes "that?";
+ next;
+ mes "[Carolling]";
+ mes "You're thinking that we are always";
+ mes "getting our plans spoiled, aren't";
+ mes "you?";
+ next;
+ mes "[Carolling]";
+ mes "I know that we are not good at";
+ mes "controlling stuff, but our rewards";
+ mes "are good, right?";
+ next;
+ select("........................");
+ mes "[Carolling]";
+ mes "Hey, we treat you good...";
+ next;
+ select("........................");
+ mes "[Carolling]";
+ mes "You are so cruel to me!";
+ mes "Bad! Bad!";
+ next;
+ mes "[Carolling]";
+ mes "Please, for our children's";
+ mes "hope!!!?";
+ mes "Please bring me 6 Singing Crystal";
+ mes "Pieces from ^0000FFViolent Gift Boxes^000000!";
+ next;
+ emotion 33;
+ mes "[Carolling]";
+ mes "They're definitely as";
+ mes "harsh as their name.";
+ mes "Go on please!";
+ set iROxmas08carol,1;
+ close;
+
+ case 4:
+ mes "[Carolling]";
+ mes "Santa costumes!!";
+ mes "You know, the santa costumes that";
+ mes "the monsters are wearing now aren't";
+ mes "genuine!";
+ next;
+ mes "[Carolling]";
+ mes "The rumor 'round here is, Lutie's";
+ mes "designer made these costumes.";
+ next;
+ mes "[Carolling]";
+ mes "Every year, adventurers challenge";
+ mes "to attack Antonio the fake Santa,";
+ mes "but there's no way to catch up to";
+ mes "him due to his hat and costume!";
+ next;
+ mes "[Carolling]";
+ mes "Are there some spcial abilities";
+ mes "within them?";
+ mes "There's still the designer in the";
+ mes "Christmas village... How about";
+ mes "asking her to make that costume?";
+ next;
+ emotion 18;
+ mes "[Carolling]";
+ mes "Carolling's hot news! Ha!";
+ mes "It's hot, huh?";
+ close;
+
+
+ case 5:
+ mes "[Carolling]";
+ mes "A-N-T-O-N-I-O!!!";
+ mes "As I heard, this Antonio is quite";
+ mes "different from before.";
+ next;
+ mes "[Carolling]";
+ mes "He seems to be quite resolved with";
+ mes "himself since he ran away from";
+ mes "people before.";
+ next;
+ mes "[Carolling]";
+ mes "And he isn't alone anymore... is";
+ mes "what I heard...";
+ next;
+ emotion 18;
+ mes "[Carolling]";
+ mes "Carolling's hot news! Ha!";
+ mes "Hotness, right?";
+ close;
+ }
+ }
+
+ if (iROxmas08carol == 1) {
+ if (countitem(6092) < 6) {
+ mes "[Carolling]";
+ mes "Maybe, it's quite hard to make a";
+ mes "jukebox for the villages, but a";
+ mes "music box might be possible.";
+ next;
+ mes "[Carolling]";
+ mes "We need the ^0000FFSinging Crystal Pieces^000000";
+ mes "that the monsters ate up.";
+ next;
+ mes "[Carolling]";
+ mes "Please bring me ^0000FF6 Singing Crystal Pieces^000000, and you will be rewarded with presents!";
+ next;
+ mes "[Carolling]";
+ mes "For all of the children of this";
+ mes "world!!!";
+ mes "Please bring me ^0000FF6Singing Crystal";
+ mes "Pieces^000000 from ^0000FFViolent Gift Boxes^000000!";
+ next;
+ emotion 33;
+ mes "[Carolling]";
+ mes "Be careful!";
+ mes "They're definitely as";
+ mes "harsh as their name.";
+ mes "Take care!!!";
+ close;
+ }else{
+ specialeffect 75;
+ mes "[Carolling]";
+ mes "Don't cry, don't cry!";
+ mes "Santa won't give you a";
+ mes "gift if you're crying.";
+ next;
+ mes "[Carolling]";
+ select("I got them!");
+ mes "[Carolling]";
+ mes "Wow, you got them!";
+ mes "They are so cruel, aren't they?";
+ mes "I'm happy to see you again.";
+ next;
+ mes "[Carolling]";
+ mes "Let's count together!";
+ mes "... ...";
+ mes "Six!!";
+ next;
+ mes "[Carolling]";
+ mes "All right! We can start to make our";
+ mes "music box with crystal fragments.";
+ next;
+ mes "[Carolling]";
+ mes "We would amplify the sounds of the";
+ mes "crystal fragments to sound through";
+ mes "the music box.";
+ next;
+ mes "[Carolling]";
+ mes "You know, a music box that sounds";
+ mes "like a jukebox!";
+ next;
+ mes "[Carolling]";
+ mes "It's handy. You can carry it, as";
+ mes "well as listen to sweet carols";
+ mes "anywhere. Doesn't that sound";
+ mes "cool!?";
+ next;
+ mes "[Carolling]";
+ mes "So, we need more of some";
+ mes "materials.";
+ mes "^0000FF10 Wooden Block, 1 Hammer Of";
+ mes "Blacksmith, 1 Jubilee, 10 Sticky";
+ mes "Mucus, 3-karat Diamond^000000!";
+ next;
+ delitem 6092,6;
+ emotion 33;
+ set iROxmas08carol,2;
+ mes "[Carolling]";
+ mes "Those are all needed.";
+ mes "Isn't that easy?";
+ close;
+ }
+ }
+
+ if (iROxmas08carol == 2) {
+ if (countitem(1019) < 10 || countitem(1005) < 1 || countitem(7312) < 1 || countitem(938) < 10 || countitem(732) < 1) {
+ mes "[Carolling]";
+ mes "We can make a music box";
+ mes "with Singing Crystal Pieces.";
+ mes "It's handy, you can hear carols";
+ mes "anywhere. Sounds cool?";
+ next;
+ mes "[Carolling]";
+ mes "So, we need more of some materials.";
+ mes "^0000FF10 Wooden Block, 1 Hammer Of";
+ mes "Blacksmith, 1 Jubilee, 10 Sticky";
+ mes "Mucus, 3-karat Diamond^000000!";
+ next;
+ emotion 33;
+ mes "[Carolling]";
+ mes "That's all we need.";
+ mes "Isn't that easy?";
+ close;
+ }else{
+ specialeffect 75;
+ mes "[Carolling]";
+ mes "Jingle bells, jingle bells,";
+ mes "jingle all the way!";
+ mes "O what fun it is to ride, in a";
+ mes "one... horse... o-pen... sleigh!!!";
+ next;
+ mes "[Carolling]";
+ mes "Wow!";
+ mes "You came back!";
+ mes "Did you bring all the";
+ mes "materials?";
+ next;
+ mes "[Carolling]";
+ mes "Good!";
+ mes "No need to hesitate! Let's get";
+ mes "started to make our music box.";
+ next;
+ mes "[Carolling]";
+ specialeffect 101;
+ mes "Blacksmith hammers on wooden";
+ mes "block... and we shape the frame.";
+ next;
+ mes "[Carolling]";
+ //(effect - stones from ground?)
+ mes "Please use the Singing Crystal";
+ mes "Pieces for a column, the Diamond as";
+ mes "a prop, and the Sticky Mucus as";
+ mes "glue.";
+ next;
+ mes "[Carolling]";
+ specialeffect 1;
+ mes "And now...";
+ mes "we decorate with a Jubilee...";
+ next;
+ mes "[Carolling]";
+ specialeffect 88;
+ mes "The last step...!";
+ mes "Breating life into it!";
+ next;
+ mes "[Carolling]";
+ mes "It's done now!!!";
+ next;
+ mes "[Carolling]";
+ mes "It's so cool! Isn't it cute!!?!";
+ next;
+ mes "[Carolling]";
+ mes "You did as I requested, so I will";
+ mes "give you gifts, as promised.";
+ next;
+ mes "[Carolling]";
+ mes "One, is this music box.";
+ mes "Please play this music box all over";
+ mes "the villages!";
+ next;
+ mes "[Carolling]";
+ mes "Another present is a Christmas cake";
+ mes "especially shaped like your name!";
+ mes "I made this cake shaped like your";
+ mes "name!";
+ next;
+ mes "[Carolling]";
+ mes "Don't worry, it tastes good.";
+ next;
+ emotion 33;
+ getitem 2784,1;
+ getnameditem 12354,"+strcharinfo(0)+";
+ delitem 1019,10;
+ delitem 1005,1;
+ delitem 7312,1;
+ delitem 938,10;
+ delitem 732,1;
+ set iROxmas08carol,3;
+ mes "[Carolling]";
+ mes "Thanks a lot.";
+ mes "Merry Christmas!";
+ mes "Have a good holiday season!";
+ close;
+ }
+ }
+}
+
+// ============= Santa Claus - Card Game ===============
+// =====================================================
+- script Santa Claus#iROxmas08::08santa 718,{
+ mes "[Santa Claus]";
+ mes "Wow! Were you naughty or nice this";
+ mes "year?";
+ mes "All right, what comes to your mind";
+ mes "when you think about Christmas?";
+ next;
+ switch(select("Carolling:Santa Claus:Gift Boxes:Santa Costume:Not much really...")) {
+
+ case 1:
+ mes "[Santa Claus]";
+ mes "Carolling! That's good!";
+ mes "A sweet carol always makes";
+ mes "Christmas more happy!!!";
+ next;
+ mes "[Santa Claus]";
+ mes "Yes indeed Carolling spreads Joy";
+ mes "throughout the world?";
+ close;
+
+ case 2:
+ mes "[Santa Claus]";
+ if (Sex) {
+ mes "Ho ho ho! What a good boy!";
+ }else{
+ mes "Ho ho ho! What a good girl!";
+ }
+ next;
+ mes "[Santa Claus]";
+ mes "But you should be wary of a fake";
+ mes "Santa romaing around.";
+ mes "Have you heard of Antonio, who";
+ mes "invades villages every Christmas?";
+ next;
+ mes "[Santa Claus]";
+ mes "He has stolen my gifts, as well as";
+ mes "attacked adventurers around Toy and";
+ mes "Lutie field.";
+ next;
+ mes "[Santa Claus]";
+ mes "A bad Santa ruins us good Santa's";
+ mes "reputations!";
+ mes "The World Santa Organization is";
+ mes "considering this a grave";
+ mes "situation.";
+ close;
+
+ case 3:
+ mes "[Santa Claus]";
+ mes "A gift box! That sounds good!";
+ mes "It's so exciting to open gift boxes";
+ mes "when you wake up on Christmas";
+ mes "morning!!!";
+ next;
+ mes "[Santa Claus]";
+ mes "But we have very little gifts now,";
+ mes "since Santa Antonio has stolen my";
+ mes "gift bag.";
+ next;
+ mes "[Santa Claus]";
+ mes "Many adventurers try to catch up";
+ mes "to him, but he is not easy to catch.";
+ next;
+ mes "[Santa Claus]";
+ mes "Anyway let those adventurers try to";
+ mes "catch him, I have a small game for";
+ mes "you.";
+ next;
+ mes "[Santa Claus]";
+ mes "I will give you a small gift if you";
+ mes "beat me!";
+ next;
+ mes "[Santa Claus]";
+ mes "Do you want to play a game with";
+ mes "me?";
+ next;
+ if (select("No, thanks.:Yes, I would.") == 1) {
+ mes "[Santa Claus]";
+ mes "Aww, don't be afraid. If you've";
+ mes "been a little naughty this year I";
+ mes "won't stuff your stockings with";
+ mes "coal.";
+ next;
+ mes "[Santa Claus]";
+ mes "I will stay here throughout the";
+ mes "Christmas season, just visit me";
+ mes "when you change your mind.";
+ close;
+ }
+ if (gettimetick(2) < SantaCardTime) {
+ mes "[Santa Claus]";
+ mes "Um... You've played the game";
+ mes "recently haven't you?";
+ next;
+ mes "[Santa Claus]";
+ mes "You can try the game once a hour.";
+ mes "Please visit me after the one hour";
+ mes "has passed.";
+ close;
+ }
+ set .@SantaCardTurn,0;
+ set .@SantaCardWins,0;
+ mes "[Santa Claus]";
+ mes "Wow! You're so cool!";
+ next;
+ mes "[Santa Claus]";
+ mes "Let me explain how to play this";
+ mes "game.";
+ next;
+ mes "[Santa Claus]";
+ mes "It's quite simple. I will pick one";
+ mes "of three cards: Poring Card,";
+ mes "Ghostring Card, and Angeling Card.";
+ mes "Guess which card I pick and";
+ mes "you're a winner!";
+ next;
+ mes "[Santa Claus]";
+ mes "If you guess right 3 times out of";
+ mes "5, I will give you a gift.";
+ mes "Let's get started!";
+ next;
+ while(.@SantaCardTurn != 5) {
+ emotion 56;
+ mes "[Santa Claus]";
+ mes "First let me shuffle up these";
+ mes "cards... Ok!!!";
+ next;
+ specialeffect 0;
+ mes "[Santa Claus]";
+ mes "One!";
+ next;
+ specialeffect 1;
+ mes "[Santa Claus]";
+ mes "Two!";
+ next;
+ specialeffect 2;
+ mes "[Santa Claus]";
+ mes "Three!";
+ next;
+ specialeffect 18;
+ mes "[Santa Claus]";
+ mes "I'm picking up only one!";
+ next;
+ cutin "sorry",4;
+ mes "[Santa Claus]";
+ mes "I'm picking up only one!";
+ mes "Please guess what is is.";
+ next;
+ switch(select("Poring:Angeling:Ghostring")) {
+ case 1:
+ mes "["+strcharinfo(0)+"]";
+ mes "Um...I choose Poring!";
+ set .@SantaCardP,1;
+ next;
+ break;
+
+ case 2:
+ mes "["+strcharinfo(0)+"]";
+ mes "Um...I choose Angeling!";
+ set .@SantaCardP,2;
+ next;
+ break;
+
+ case 3:
+ mes "["+strcharinfo(0)+"]";
+ mes "Um...I choose Ghostring!";
+ set .@SantaCardP,3;
+ next;
+ }
+ mes "[Santa Claus]";
+ mes "Let's see!!";
+ mes "One! Two! Three!";
+ set .@SantaCardNpc, rand(1,3);
+ next;
+ mes "[Santa Claus]";
+ mes "Let's see!!";
+ mes "One! Two! Three!";
+ if (.@SantaCardNpc == 1) {
+ cutin "Æ÷¸µÄ«µå",4;
+ }
+ else if (.@SantaCardNpc == 2) {
+ cutin "¿£Á©¸µÄ«µå",4;
+ }
+ else if (.@SantaCardNpc == 3) {
+ cutin "°í½ºÆ®¸µÄ«µå",4;
+ }
+ next;
+ set .@SantaCardTurn,.@SantaCardTurn+1;
+ if (.@SantaCardP == .@SantaCardNpc) {
+ set .@SantaCardWins,.@SantaCardWins+1;
+ emotion 0;
+ emotion 5,1;
+ cutin "",255;
+ mes "[Santa Claus]";
+ mes "You're lucky.";
+ mes "Can you guess the right card the";
+ mes "next time around?";
+ next;
+ }else{
+ emotion 0;
+ emotion 23,1;
+ cutin "",255;
+ mes "[Santa Claus]";
+ mes "Aww maybe next time...";
+ next;
+ }
+ }
+ if (.@SantaCardWins < 3) {
+ mes "["+strcharinfo(0)+"]";
+ mes "This is just luck. Let me try";
+ mes "again!!";
+ next;
+ mes "[Santa Claus]";
+ mes "Whenever you want.";
+ close;
+ }else{
+ mes "[Santa Claus]";
+ mes "You're so good!";
+ next;
+ mes "[Santa Claus]";
+ mes "Now this gift is for you. Put your";
+ mes "hand into the bag and pick only";
+ mes "one.";
+ set .@SantaCardPrize, rand(1,12);
+ next;
+ if (.@SantaCardPrize == 1) {
+ getitem 12354,2;
+ }
+ else if (.@SantaCardPrize == 2) {
+ getitem 595,3;
+ }
+ else if (.@SantaCardPrize == 3) {
+ getitem 593,3;
+ }
+ else if (.@SantaCardPrize == 4) {
+ getitem 12236,3;
+ }
+ else if (.@SantaCardPrize == 5) {
+ getitem 538,10;
+ }
+ else if (.@SantaCardPrize == 6) {
+ getitem 14546,10;
+ }
+ else if (.@SantaCardPrize == 7) {
+ getitem 5136,1;
+ }
+ else if (.@SantaCardPrize == 8) {
+ getitem 603,1;
+ }
+ else if (.@SantaCardPrize == 9) {
+ getitem 12130,1;
+ }
+ else if (.@SantaCardPrize == 10) {
+ getitem 14550,10;
+ }
+ else if (.@SantaCardPrize == 11) {
+ getitem 12132,3;
+ }
+ else if (.@SantaCardPrize == 12) {
+ getitem 594,3;
+ }
+ set SantaCardTime,gettimetick(2)+3600;
+ mes "[Santa Claus]";
+ mes "Good job! Thanks for playing the";
+ mes "card game with me! Merry";
+ mes "Christmas!";
+ close;
+ }
+
+ case 4:
+ mes "[Santa Claus]";
+ mes "Do you mean that ever so";
+ mes "fashionable costume for Santa's and";
+ mes "youngsters!?!";
+ mes "Light-weight, fashionable, and";
+ mes "keeps you warm!";
+ next;
+ mes "[Santa Claus]";
+ mes "There used to be designer who";
+ mes "visited my house to make my Santa";
+ mes "costumes. Do you have any ideas?";
+ close;
+
+ case 5:
+ mes "[Santa Claus]";
+ mes "........................";
+ next;
+ mes "[Santa Claus]";
+ mes "........................";
+ if (Sex) {
+ mes "Oh! Poor boy...";
+ }else{
+ mes "Oh! Poor girl...";
+ }
+ next;
+ mes "[Santa Claus]";
+ mes "........................";
+ if (Sex) {
+ mes "Oh! Poor boy...";
+ }else{
+ mes "Oh! Poor girl...";
+ }
+ mes "...";
+ next;
+ mes "[Santa Claus]";
+ mes "You should open your heart to the";
+ mes "spirit of Christmas!";
+ mes "Once you do, I know you'll be able";
+ mes "to think of something.";
+ close;
+ }
+}
+
+payon,171,109,4 duplicate(08santa) Santa Claus#0801 718
+prontera,156,285,4 duplicate(08santa) Santa Claus#0802 718
+alberta,117,66,4 duplicate(08santa) Santa Claus#0803 718
+geffen,119,70,4 duplicate(08santa) Santa Claus#0804 718
+morocc,158,104,4 duplicate(08santa) Santa Claus#0805 718
+
+
+// ============= Louise Kim - Santa Suit ===============
+// =====================================================
+xmas_in,89,92,4 script Louise Kim#iROxmas08 714,{
+ mes "[Louise Kim]";
+ mes "I always thought about how boring";
+ mes "Santa Claus is wearing a too boring";
+ mes "costume. Too boring!";
+ next;
+ mes "[Louise Kim]";
+ mes "I could make a glamorous style for";
+ mes "him!";
+ next;
+ mes "[Louise Kim]";
+ mes "I once made a costume for";
+ mes "the notorious figure Antonio!";
+ mes "The reason catching up to him";
+ mes "is so hard, is that his clothes";
+ mes "have been given strong power!";
+ mes "I blessed them with good luck!";
+ next;
+ emotion 3;
+ mes "[Louise Kim]";
+ mes "Preta Porter!!";
+ mes "Which is quite luxurious";
+ mes "but sold at good price ~";
+ next;
+ mes "[Louise Kim]";
+ mes "Hey loosers! You can share my sense";
+ mes "of fashion and wear my look if you";
+ mes "run a light mission for me.";
+ next;
+ mes "[Louise Kim]";
+ mes "Are you interested?";
+ next;
+ if (select("Nope.:Yes, please.") == 1) {
+ mes "[Louise Kim]";
+ mes "Ah!";
+ mes "You're silly! You lost your big";
+ mes "chance!";
+ next;
+ emotion 18;
+ mes "[Louise Kim]";
+ mes "Come to me later if you";
+ mes "want to get the mission.";
+ mes "I, Louise Kim, am generous";
+ mes "enough to accept you next time.";
+ close;
+ }
+ mes "[Louise Kim]";
+ mes "You're so cool.";
+ next;
+ mes "[Louise Kim]";
+ mes "Don't worry about this mission.";
+ mes "It's not that difficult.";
+ mes "I'm only in need of some";
+ mes "materials. Things that are";
+ mes "beyond my ability...";
+ next;
+ mes "[Louise Kim]";
+ mes "Anyway, can you bring me some";
+ mes "stuff?";
+ next;
+ if (select("Why not? What do you need?:Sorry, no time.") == 2) {
+ emotion 18;
+ mes "[Louise Kim]";
+ mes "What?";
+ mes "You will definitely regret it.";
+ mes "No more chances later.";
+ close;
+ }
+ mes "[Louise Kim]";
+ mes "All right, you're cool!!";
+ mes "You need to bring me: ^0000FFCotton Shirt,";
+ mes "3 Red Potion, Holy Water, 4 Wrapping";
+ mes "Paper, Wrapping Lace^000000..";
+ next;
+ mes "[Louise Kim]";
+ mes "If you bring me all that stuff, I";
+ mes "can make you a glamorous Santa";
+ mes "costume.";
+ next;
+ if (countitem(2301) < 1 || countitem(501) < 3 || countitem(523) < 1 || countitem(7175) < 4 || countitem(7174) < 1) {
+ mes "[Louise Kim]";
+ mes "If you were to bring me all the";
+ mes "stuff, I would make you a wonderful";
+ mes "costume, for free...";
+ next;
+ emotion 3;
+ mes "[Louise Kim]";
+ mes "Please see me again if you are";
+ mes "interested.";
+ close;
+ }else{
+ select("Here you are.");
+ emotion 33;
+ mes "[Louise Kim]";
+ mes "Oh! Good!";
+ mes "Let's not delay.";
+ mes "I will show you my limitless";
+ mes "ability.";
+ next;
+ mes "-She pours everything in a pot-";
+ mes "-even the shirt goes in!-";
+ mes "-She takes it out with skill-";
+ mes "-and many blessings she sings.-";
+ next;
+ specialeffect 42;
+ emotion 2;
+ mes "[Louise Kim]";
+ mes "By artist, Louise Kim!";
+ mes "All over the world will be blessed";
+ mes "tonight!";
+ next;
+ mes "-Pour red potion in another pot-";
+ mes "-then stir all of its parts.-";
+ mes "-Put the cotton shirts in-";
+ mes "-and dye it for grateful hearts.-";
+ mes "-Thread by thread-";
+ mes "-String by string-";
+ mes "-Count your blessings and sing!-";
+ next;
+ specialeffect 75;
+ emotion 2;
+ mes "[Louise Kim]";
+ mes "By artist, Louise Kim!";
+ mes "All over the world will be blessed";
+ mes "tonight!";
+ next;
+ mes "-She is knitting clothes-";
+ mes "-with a hooked needle-";
+ mes "-with her great skill.-";
+ mes "Spread your blessings,-";
+ mes "cheer and goodwill!-";
+ next;
+ specialeffect 91;
+ emotion 3;
+ mes "[Louise Kim]";
+ mes "This is miraculous!";
+ mes "I am a genius of the world.";
+ mes "Artist, Louise Kim!!!";
+ next;
+ mes "[Louise Kim]";
+ mes "All right! Isn't it wonderful?";
+ mes "You can call it what you wish.";
+ mes "My fashion is radiant.";
+ mes "I ain't envious of Designer";
+ mes "Pierre.";
+ next;
+ emotion 18;
+ mes "[Louise Kim]";
+ mes "I am supposed to get paid well,";
+ mes "however I will just let it";
+ mes "be free, since this is Christmas!";
+ next;
+ delitem 2301,1;
+ delitem 501,3;
+ delitem 523,1;
+ delitem 7175,4;
+ delitem 7174,1;
+ getitem 12132,1;
+ mes "[Louise Kim]";
+ mes "Go brag about these wonderful";
+ mes "clothes. There wouldn't be";
+ mes "any without me, Louise Kim.";
+ close;
+ }
+}
+
+//XMAS MOBS
+prt_fild00,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild00,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild00,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild00,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild01,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild01,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild01,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild02,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild02,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild02,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild02,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild03,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild03,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild03,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild03,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild04,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild04,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild04,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild04,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild05,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild05,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild05,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild05,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild06,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild06,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild06,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild06,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild07,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild07,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild07,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild07,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild08,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild08,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild08,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild08,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild09,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild09,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild09,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild09,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild10,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild10,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild10,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild10,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+prt_fild11,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+prt_fild11,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+prt_fild11,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+prt_fild11,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild01,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild01,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild01,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild02,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild02,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild02,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild02,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild03,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild03,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild03,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild03,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild04,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild04,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild04,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild04,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild05,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild05,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild05,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild05,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild06,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild06,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild06,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild06,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild07,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild07,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild07,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild07,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild08,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild08,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild08,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild08,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild09,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild09,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild09,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild09,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild10,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild10,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild10,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild10,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+pay_fild11,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+pay_fild11,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+pay_fild11,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+pay_fild11,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild00,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild00,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild00,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild00,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild01,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild01,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild01,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild02,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild02,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild02,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild02,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild03,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild03,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild03,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild03,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild04,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild04,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild04,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild04,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild05,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild05,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild05,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild05,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild06,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild06,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild06,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild06,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild07,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild07,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild07,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild07,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild08,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild08,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild08,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild08,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild09,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild09,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild09,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild09,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild10,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild10,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild10,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild10,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild11,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild11,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild11,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild11,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild12,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild12,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild12,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild12,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild13,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild13,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild13,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild13,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+gef_fild14,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+gef_fild14,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild14,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
+gef_fild14,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+xmas_fild01,0,0,0,0 monster Christmas Jakk 1244,5,0,0,0
+xmas_fild01,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+xmas_fild01,0,0,0,0 monster Christmas Cookie 1246,5,0,0,0
xmas_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0 \ No newline at end of file
diff --git a/npc/events/valentinesday_2009.txt b/npc/events/valentinesday_2009.txt
index 0ecb45896..02845d3e2 100644
--- a/npc/events/valentinesday_2009.txt
+++ b/npc/events/valentinesday_2009.txt
@@ -1,784 +1,784 @@
-//===== eAthena Script =======================================
-//= iRO Valentine's Day Event (2009)
-//===== By: ==================================================
-//= Kisuka
-//===== Current Version: =====================================
-//= 1.2
-//===== Compatible With: =====================================
-//= eAthena SVN
-//===== Description: =========================================
-//= iRO Valentine's Day Event. (2009)
-//= Make Chocolate/Chocolate Boxes/Home-Made Chocolate.
-//= Make Valentine's Rings/Boxes.
-//= Trade rings to those of opposite gender.
-//= Register rings you have gotten for votes.
-//=
-//= The male and female with the most votes at the end of
-//= the event will receive item (14466) from GM team.
-//=
-//= Must enable the event items in item_db2 and item_trade!
-//===== Additional Comments: =================================
-//= 1.0 First version. [Kisuka]
-//= 1.1-1.2 Fixed exploits with unlimited rings and non deleting choco [Lupus]
-//============================================================
-
-// Marco Bassinio (Chocolate/Chocolate Box maker)
-prontera,164,174,4 script Trader#Val09 58,{
- mes "[Marco Bassinio]";
- mes "Hey, folks! Here's something you don't see everyday!";
- mes "Something you can never find in Rune-Midgarts!";
- mes "Something that makes you happy with just one bite!";
- next;
- mes "[Marco Bassinio]";
- mes "It's the perfect dessert and the perfect gift for loved ones.";
- mes "High-quality, traditional homemade chocolate only 5000z each!";
- next;
- switch(select("I'll take it, please!:I want to wrap the chocolate!:End trading.")) {
- case 1:
- mes "[Marco Bassinio]";
- mes "Ahaha, my dear.";
- mes "This chocolate is";
- mes "nothing like others.";
- mes "Every piece bears the";
- mes "devotion of the person";
- mes "who made it!";
- next;
- mes "[Marco Bassinio]";
- mes "So, that's why I can't sell";
- mes "more than 5 of them at a time.";
- mes "If you really really want more,";
- mes "then talk to me again.";
- mes "How many do you want anyway?";
- next;
- while(.@input <= 0 || .@input > 5) {
- input .@input;
- if (.@input < 1) {
- mes "[Marco Bassinio]";
- mes "Oh, it's such a shame!";
- mes "I'm sure you'll miss";
- mes "this opportunity and";
- mes "regret you didn't buy it.";
- next;
- mes "[Marco Bassinio]";
- mes "Remember, you can never";
- mes "find this anywhere else!";
- mes "Come back anytime,";
- mes "when you change your mind.";
- close;
- }
- if (.@val09choco > 5) {
- mes "[Marco Bassinio]";
- mes "Ugh.. Didn't I tell you?";
- mes "5 is the maximum!";
- mes "I can't sell more than";
- mes "that to the same person.";
- next;
- mes "[Marco Bassinio]";
- mes "And you know it's not";
- mes "like an everyday meal.";
- mes "Eating too much is not";
- mes "really good for you.";
- next;
- }
- }
- if (!checkweight(558, .@input)) {
- mes "[Marco Bassinio]";
- mes "You're carrying too many items.";
- mes "Please use the Kafra Services.";
- close;
- }
- set .@price, .@input * 5000;
- if (Zeny < .@price) {
- mes "[Marco Bassinio]";
- mes "Looks like you don't have";
- mes "enough zeny with ya.";
- mes "Maybe you should borrow";
- mes "some zeny from a friend.";
- mes "Cuz, I'm not gonna";
- mes "be here everyday.";
- close;
- }else{
- mes "[Marco Bassinio]";
- mes "Good for you!";
- mes "It's also perfect as a gift!";
- mes "You know you can't get this";
- mes "kind of chocolate normally.";
- next;
- mes "[Marco Bassinio]";
- mes "If you want more,";
- mes "you should come back.";
- mes "Might be a good idea to";
- mes "buy some more while";
- mes "you have a chance...!";
- set Zeny,Zeny - .@price;
- getitem 558,.@input;
- close;
- }
- case 2:
- mes "[Marco Bassinio]";
- mes "If you want to gift-wrap";
- mes "the chocolate, of course,";
- mes "you need chocolate,";
- mes "plus, wrapping paper,";
- mes "wrapping strap and a box.";
- next;
- mes "[Marco Bassinio]";
- mes "You also need to pay";
- mes "500 zeny to carve your";
- mes "name on the box.";
- mes "Are you all prepared...?";
- next;
- if(countitem(7175) < 1 || countitem(7174) < 1 || countitem(7948) < 1 || Zeny < 500) {
- mes "[Marco Bassinio]";
- mes "Hmm.. Looks like you don't";
- mes "have enough materials to";
- mes "decorate the gift box..";
- mes "You can't just put your gift";
- mes "into some plain looking box..";
- mes "Don't you think?";
- next;
- mes "[Marco Bassinio]";
- mes "You need to bring some";
- mes "wrapping paper,";
- mes "wrapping strap, and a box.";
- mes "Oh, also bring 500 zeny,";
- mes "and don't forget to bring your";
- mes "true loving heart with you!!";
- close;
- }
- if(countitem(558) < 1) {
- mes "[Marco Bassinio]";
- mes "Hey, look, adventurer!";
- mes "I can't create something right away!";
- mes "You know I'm not an alchemist or anything.";
- next;
- mes "[Marco Bassinio]";
- mes "You're not saying that you";
- mes "want an empty chocolate box";
- mes "without any chocolate in it,";
- mes "am I right?";
- close;
- }
- if (!checkweight(12744,1)) {
- mes "[Marco Bassinio]";
- mes "You're carrying too many items.";
- mes "Please use the Kafra Services.";
- close;
- }
- mes "[Marco Bassinio]";
- mes "Here, look!";
- mes "It's your chocolate box";
- mes "with your name on it.";
- mes "Isn't it fabulous?";
- mes "See, your name looks";
- mes "great on the box!";
- next;
- delitem 558,1;
- delitem 7175,1;
- delitem 7174,1;
- delitem 7948,1;
- set Zeny,Zeny-500;
- getnameditem 12744,strcharinfo(0);
- mes "[Marco Bassinio]";
- mes "Happy Valentine's Day!";
- mes "Valentine's the reason I came back.";
- close;
- case 3:
- mes "[Marco Bassinio]";
- mes "Oh, it's such a shame!";
- mes "I'm sure you'll miss";
- mes "this opportunity and";
- mes "regret you didn't buy it.";
- next;
- mes "[Marco Bassinio]";
- mes "Remember, you can never";
- mes "find this anywhere else!";
- mes "Come back anytime,";
- mes "when you change your mind.";
- close;
- }
-}
-
-// Packs Trader (Sells Wrapping Paper, Lace, and Box)
-prontera,147,171,5 script Packs Trader#Val09 58,{
- mes "[Packs Trader]";
- mes "Hello.";
- mes "I am a Packs Trader,";
- mes "I sell paper boxes and";
- mes "supplies for packing presents.";
- next;
- while(1) {
- mes "[Packs Trader]";
- mes "Do you have something to buy?";
- next;
- switch(select("Packing Paper:Packing Ribbon:Box:Cancel.")) {
- case 1:
- mes "[Packs Trader]";
- mes "It's 200 zeny for";
- mes "1 Packing Paper.";
- mes "How many do you want?";
- mes "You can't buy more";
- mes "than 10 items at once.";
- next;
- input .@input;
- if (.@input <= 0) {
- mes "[Packs Trader]";
- mes "Nothing to buy.";
- mes "Come back when";
- mes "you need something.";
- close;
- }
- if (.@input > 10) {
- mes "[Packs Trader]";
- mes "I told you not to buy more than 10...";
- next;
- break;
- }
- if (!checkweight(7175,.@input)) {
- mes "[Packs Trader]";
- mes "You're carrying too many items.";
- mes "Please use the Kafra Services.";
- close;
- }
- set .@price, .@input * 200;
- if (Zeny < .@price) {
- mes "[Packs Trader]";
- mes "You don't have enough money.";
- mes "Please check your wallet.";
- next;
- break;
- }else{
- mes "[Packs Trader]";
- mes "Here they are.";
- mes "Hope it makes your";
- mes "Valentine's Day";
- mes "more pleasing!";
- set Zeny,Zeny-.@price;
- getitem 7175,.@input;
- next;
- break;
- }
- case 2:
- mes "[Packs Trader]";
- mes "It's 200 zeny for";
- mes "1 Packing Ribbon.";
- mes "How many do you want?";
- mes "You can't buy more";
- mes "than 10 items at once.";
- next;
- input .@input;
- if (.@input <= 0) {
- mes "[Packs Trader]";
- mes "Nothing to buy.";
- mes "Come back when";
- mes "you need something.";
- close;
- }
- if (.@input > 10) {
- mes "[Packs Trader]";
- mes "I told you not to buy more than 10...";
- next;
- break;
- }
- if (!checkweight(7174,.@input)) {
- mes "[Packs Trader]";
- mes "You're carrying too many items.";
- mes "Please use the Kafra Services.";
- close;
- }
- set .@price, .@input * 200;
- if (Zeny < .@price) {
- mes "[Packs Trader]";
- mes "You don't have enough money.";
- mes "Please check your wallet.";
- next;
- break;
- }else{
- mes "[Packs Trader]";
- mes "Here they are.";
- mes "Hope it makes your";
- mes "Valentine's Day";
- mes "more pleasing!";
- set Zeny,Zeny-.@price;
- getitem 7174,.@input;
- next;
- break;
- }
- case 3:
- mes "[Packs Trader]";
- mes "It's 600 zeny for";
- mes "1 Box.";
- mes "How many do you want?";
- mes "You can't buy more";
- mes "than 10 items at once.";
- next;
- input .@input;
- if (.@input <= 0) {
- mes "[Packs Trader]";
- mes "Nothing to buy.";
- mes "Come back when";
- mes "you need something.";
- close;
- }
- if (.@input > 10) {
- mes "[Packs Trader]";
- mes "I told you not to buy more than 10...";
- next;
- break;
- }
- if (!checkweight(7948,.@input)) {
- mes "[Packs Trader]";
- mes "You're carrying too many items.";
- mes "Please use the Kafra Services.";
- close;
- }
- set .@price, .@input * 600;
- if (Zeny < .@price) {
- mes "[Packs Trader]";
- mes "You don't have enough money.";
- mes "Please check your wallet.";
- next;
- break;
- }else{
- mes "[Packs Trader]";
- mes "Here they are.";
- mes "Hope it makes your";
- mes "Valentine's Day";
- mes "more pleasing!";
- set Zeny,Zeny-.@price;
- getitem 7948,.@input;
- next;
- break;
- }
- case 4:
- mes "[Packs Trader]";
- mes "Goodbye!";
- mes "And enjoy your";
- mes "Valentine's Day.";
- close;
- }
- }
-}
-
-// Event Ring Maker (Makes ring for players)
-prontera,154,185,5 script Event Ring Maker#Val09 721,{
- if (BaseLevel < 75) {
- mes "[Event Ring Maker]";
- mes "Hello, I only make the";
- mes "Valentine rings to those";
- mes "experienced adventurers";
- mes "Level 75 or above.";
- next;
- mes "[Event Ring Maker]";
- mes "You're not fully";
- mes "experienced yet.";
- mes "Come back when you're";
- mes "experienced enough to";
- mes "handle the quests.";
- close;
- }
-
- if (iROval09ring >= 1) {
- mes "[Event Ring Maker]";
- mes "The box with the ring,";
- mes "carved with your name,";
- mes "is for the one you love.";
- next;
- mes "[Event Ring Maker]";
- mes "As for the rings that you";
- mes "receive from others, they";
- mes "should all be registered";
- mes "with the Vote Manager.";
- mes "She is standing near";
- mes "the Prontera Fountain.";
- next;
- mes "[Event Ring Maker]";
- mes "Only the most popular";
- mes "male and female are";
- mes "subjected to getting rewards.";
- mes "Be aware, and always";
- mes "try to stay popular!";
- close;
- }
-
- mes "[Event Ring Maker]";
- mes "Hi, there, how are ya?";
- mes "Come to me if you're";
- mes "interested in the event,";
- mes "'Who's Valentine's Hottest?'";
- next;
- mes "[Event Ring Maker]";
- mes "I make the most precious";
- mes "rings that you can give";
- mes "to your sweethearts.";
- mes "Those rings are very special";
- mes "because I carve";
- mes "your names on them!";
- next;
- mes "[Event Ring Maker]";
- mes "Isn't it exciting?";
- mes "Isn't it such a brilliant idea?";
- mes "Give these special rings";
- mes "to your sweethearts!";
- next;
- mes "[Event Ring Maker]";
- mes "You should hurry 'cuz";
- mes "this event will only";
- mes "last for two weeks.";
- mes "Give that special someone";
- mes "a gift of a Valentine's ring.";
- next;
- mes "[Event Ring Maker]";
- mes "Remember, you can only";
- mes "generate the ring once.";
- mes "You also need Wrapping Paper,";
- mes "Wrapping Strap and a Box";
- mes "to make the ring.";
- next;
- mes "[Event Ring Maker]";
- mes "So you better be sure";
- mes "of who you give this to.";
- mes "By the way,";
- mes "It costs 1,000 zeny.";
- mes "Would you like to make one?";
- next;
- if(select("Hmm.. I gotta give it a second thought...:Sure.") == 1) {
- mes "[Event Ring Maker]";
- mes "Alrighty!";
- mes "You can't put a rush";
- mes "on such a thing like this.";
- mes "Think about what";
- mes "you truly want.";
- mes "Just follow your heart!";
- close;
- }
- if(countitem(7175) < 1 || countitem(7174) < 1 || countitem(7948) < 1 || Zeny < 1000) {
- mes "[Event Ring Maker]";
- mes "Well, you don't have";
- mes "enough materials";
- mes "to make a gift box.";
- mes "Check what you have,";
- mes "and come back later";
- mes "with all the materials.";
- close;
- }
- mes "[Event Ring Maker]";
- mes "Okie Dokie!";
- mes "I'll make it right away.";
- next;
- delitem 7175,1;
- delitem 7174,1;
- delitem 7948,1;
- set Zeny,Zeny-1000;
- set iROval09ring,1;
- if (Sex) {
- getnameditem 12742,strcharinfo(0);
- }else{
- getnameditem 12743,strcharinfo(0);
- }
- mes "[Event Ring Maker]";
- mes "Here, the most precious";
- mes "ring in the world!";
- mes "Don't forget, you can never";
- mes "make this ring again.";
- next;
- mes "[Event Ring Maker]";
- mes "You must pick out the one";
- mes "that you really really love,";
- mes "and give this ring";
- mes "to that person.";
- next;
- mes "[Event Ring Maker]";
- mes "Of course, you've got to";
- mes "get rings from others,";
- mes "that's the way you can";
- mes "participate in the voting, right?";
- mes "Challenge yourself to become";
- mes "Valentine's Hottest!";
- close;
-}
-
-// Valentine Vote Manager (Registers votes)
-prontera,157,185,4 script Valentine Vote Manager#v 113,{
- mes "[Valentine Vote Manager]";
- mes "Hello, I'm the Valentine's";
- mes "Vote Manager.";
- mes "I'm in charge of collecting";
- mes "rings for this event!";
- next;
- mes "[Valentine Vote Manager]";
- mes "I register the rings";
- mes "you get from others";
- mes "and I calculate the";
- mes "total number of rings.";
- next;
- mes "[Valentine Vote Manager]";
- mes "You know what I do besides";
- mes "just counting those rings?";
- mes "I can tell you the adventurer's";
- mes "name who's got the";
- mes "most number of votes.";
- next;
- mes "[Valentine Vote Manager]";
- mes "Plus, you can also find out how";
- mes "many votes he/she got.";
- next;
- while (1) {
- mes "[Valentine Vote Manager]";
- mes "So, what do you want?";
- next;
- switch(select("Please register my rings.:Please count my votes.:Nothing, for now.")) {
- case 1:
- mes "[Valentine Vote Manager]";
- mes "Please tell me how many";
- mes "rings you want to register.";
- next;
- mes "[Valentine Vote Manager]";
- mes "When you write the";
- mes "number of the rings,";
- mes "the number shouldn't be";
- mes "larger than the number of";
- mes "rings you actually have.";
- mes "'0', cancels everything.";
- next;
- input .@input;
-
- if (.@input <= 0) {
- mes "[Valentine Vote Manager]";
- mes "You have entered 0.";
- mes "Registration is cancelled.";
- next;
- break;
- }
-
- if (Sex) {
- if (countitem(7947) > .@input) {
- mes "[Valentine Vote Manager]";
- mes "Seems like the value you entered is too small.";
- mes "I know you've got more. Be honest, dear.";
- next;
- break;
- }
-
- if (countitem(7947) < .@input) {
- mes "[Valentine Vote Manager]";
- mes "Seems like the value you entered is too large.";
- mes "I know you've got less. Be honest, dear.";
- next;
- break;
- }
-
- mes "[Valentine Vote Manager]";
- mes "I'll take those silver rings,";
- mes "and count the votes for you.";
- mes "Thank you for participating.";
- delitem 7947,.@input;
- set Val09Rings,Val09Rings+.@input;
- if (Val09Rings > $Val09votes_M) {
- set $Val09votes_M,Val09Rings;
- set $Val09name_M$,strcharinfo(0);
- }
- next;
- break;
- }else{
- if (countitem(7946) > .@input) {
- mes "[Valentine Vote Manager]";
- mes "Seems like the value you entered is too small.";
- mes "I know you've got more. Be honest, dear.";
- next;
- break;
- }
-
- if (countitem(7946) < .@input) {
- mes "[Valentine Vote Manager]";
- mes "Seems like the value you entered is too large.";
- mes "I know you've got less. Be honest, dear.";
- next;
- break;
- }
-
- mes "[Valentine Vote Manager]";
- mes "I'll take those gold rings,";
- mes "and count the votes for you.";
- mes "Thank you for participating.";
- delitem 7946,.@input;
- set Val09Rings,Val09Rings+.@input;
- if (Val09Rings > $Val09votes_F) {
- set $Val09votes_F,Val09Rings;
- set $Val09name_F$,strcharinfo(0);
- }
- next;
- break;
- }
- case 2:
- mes "[Valentine Vote Manager]";
- mes "Let's see...";
- mes "You have registered..";
- mes ".."+Val09Rings+" rings so far.";
- mes "and...";
- next;
- mes "[Valentine Vote Manager]";
- mes "The current record shows... "+$Val09name_M$+" is the male vote leader who's registered the total of "+$Val09votes_M+" rings.";
- next;
- mes "[Valentine Vote Manager]";
- mes "The current record shows... "+$Val09name_F$+" is the female vote leader who's registered the total of "+$Val09votes_F+" rings.";
- next;
- break;
-
- case 3:
- mes "[Valentine Vote Manager]";
- mes "Hey, you can be popular too!";
- mes "Anyone can... really!";
- mes "Though you have to try a lot";
- mes "harder, but still~ Hahaha!";
- close;
- }
- }
-}
-
-// Charles Orleans (Makes Home-Made Chocolates)
-prt_castle,42,35,3 script Dessert Manager#Val09 47,{
- if (Sex) {
- mes "[Charles Orleans]";
- mes "Monsieur~! What brings";
- mes "you to my beautiful atelier?";
- mes "What is it that you want?";
- mes "Well, my sparkling eyes";
- mes "get dried and lose their shine";
- mes "if not for the pretty little lady.";
- next;
- mes "[Charles Orleans]";
- mes "Please leave me alone unless";
- mes "you have business with me.";
- mes "Haaaa~ I'm a busy person.";
- mes "Don't bother me....";
- mes "Annoying, annoying, annoying~~!";
- close;
- }
-
- mes "[Charles Orleans]";
- mes "Oh, Mademoiselle!";
- mes "This little trifling space";
- mes "felt like heaven the";
- mes "minute you walked in!";
- mes "Can I help you with";
- mes "anything, if it's alright?";
- next;
- if(select("Please, make me some chocolate.:Don't bother. I'm just passing by.") == 2) {
- mes "[Charles Orleans]";
- mes "Ahhh, this is so heartbreaking.";
- mes "How could you say that?";
- mes "You're just so mean.";
- mes "Don't bother? Just passing by?";
- next;
- mes "[Charles Orleans]";
- mes "What can I do to make you";
- mes "pay a little attention to me?";
- mes "Please.. I feel like my soul is lost..";
- close;
- }
- if(countitem(558) < 3) {
- mes "[Charles Orleans]";
- mes "Ahhh, Mademoiselle.";
- mes "I'm not an alchemist,";
- mes "or a magician.";
- mes "I don't just make chocolate";
- mes "out of anything.";
- next;
- mes "[Charles Orleans]";
- mes "I always think of making";
- mes "chocolate as artistic work.";
- mes "You see, I'm no ordinary cook...";
- mes "I make chocolate with feelings..";
- mes "messages of loving hearts..";
- next;
- mes "[Charles Orleans]";
- mes "I make masterpieces.";
- mes "No one can imitate";
- mes "the looks and the taste.";
- mes "Yes, it's nothing like";
- mes "ordinary chocolate!";
- next;
- mes "[Charles Orleans]";
- mes "I'm afraid I can't make it";
- mes "and prove it to you now.";
- mes "This is really a shame!";
- next;
- mes "[Charles Orleans]";
- mes "I really want to thank";
- mes "you for visiting me";
- mes "and if you only bring";
- mes "^3152ff3 Chocolates^000000,";
- mes "I'll make you chocolate";
- mes "like you've never seen...";
- next;
- mes "[Charles Orleans]";
- mes "never tasted before...";
- mes "Mademoiselle, with your spirit,";
- mes "I'm sure you can bring";
- mes "3 pieces of chocolate.";
- mes "I have no doubt at all.";
- next;
- mes "[Charles Orleans]";
- mes "So... what do you think?";
- mes "Can you bring ^3152ff3 Chocolates^000000?";
- mes "I could get them myself,";
- mes "but I'm tied up with so much";
- mes "work as you see right now.";
- next;
- mes "[Charles Orleans]";
- mes "Adios, Mademoiselle.....";
- mes "I'll be waiting for you.";
- close;
- }else{
- if (!checkweight(559,1)) {
- mes "[Charles Orleans]";
- mes "You're carrying too many items.";
- mes "Please use the Kafra Services.";
- close;
- }
- mes "[Charles Orleans]";
- mes "Oh, Mademoiselle!";
- mes "I'll make the best chocolate";
- mes "with the pieces you've brought.";
- mes "I'm going to put the light of";
- mes "your eyes into this chocolate";
- mes "that no one can resist.";
- next;
- mes "[Charles Orleans]";
- mes "It'll be stronger than a";
- mes "sweet sweet love potion.....";
- next;
- mes "[Charles Orleans]";
- mes "Un, Deux, Trois, Quatre.....";
- mes "Just like the ugly duckling that";
- mes "turned to a beautiful swan-";
- mes "Ordinary chocolate pieces are";
- mes "becoming a piece of art!";
- next;
- mes "[Charles Orleans]";
- mes "They're changing!";
- mes "They're getting warm,";
- mes "softly changing the shape,";
- mes "getting stronger again!";
- mes "Oh, is it a master piece or";
- mes "what...!!";
- next;
- mes "[Charles Orleans]";
- mes "Here you go, Mademoiselle!";
- mes "Ahahahaha, just look at this!";
- mes "I can't believe I made this.";
- mes "Oh, I can't take my eyes off..!!";
- delitem 558,3;
- getitem 559,1;
- next;
- mes "[Charles Orleans]";
- mes "Alright. Mademoiselle,";
- mes "I hope this is just";
- mes "what you wanted,";
- mes "for it bears your";
- mes "beautiful heart inside.";
- close;
- }
-
+//===== eAthena Script =======================================
+//= iRO Valentine's Day Event (2009)
+//===== By: ==================================================
+//= Kisuka
+//===== Current Version: =====================================
+//= 1.2
+//===== Compatible With: =====================================
+//= eAthena SVN
+//===== Description: =========================================
+//= iRO Valentine's Day Event. (2009)
+//= Make Chocolate/Chocolate Boxes/Home-Made Chocolate.
+//= Make Valentine's Rings/Boxes.
+//= Trade rings to those of opposite gender.
+//= Register rings you have gotten for votes.
+//=
+//= The male and female with the most votes at the end of
+//= the event will receive item (14466) from GM team.
+//=
+//= Must enable the event items in item_db2 and item_trade!
+//===== Additional Comments: =================================
+//= 1.0 First version. [Kisuka]
+//= 1.1-1.2 Fixed exploits with unlimited rings and non deleting choco [Lupus]
+//============================================================
+
+// Marco Bassinio (Chocolate/Chocolate Box maker)
+prontera,164,174,4 script Trader#Val09 58,{
+ mes "[Marco Bassinio]";
+ mes "Hey, folks! Here's something you don't see everyday!";
+ mes "Something you can never find in Rune-Midgarts!";
+ mes "Something that makes you happy with just one bite!";
+ next;
+ mes "[Marco Bassinio]";
+ mes "It's the perfect dessert and the perfect gift for loved ones.";
+ mes "High-quality, traditional homemade chocolate only 5000z each!";
+ next;
+ switch(select("I'll take it, please!:I want to wrap the chocolate!:End trading.")) {
+ case 1:
+ mes "[Marco Bassinio]";
+ mes "Ahaha, my dear.";
+ mes "This chocolate is";
+ mes "nothing like others.";
+ mes "Every piece bears the";
+ mes "devotion of the person";
+ mes "who made it!";
+ next;
+ mes "[Marco Bassinio]";
+ mes "So, that's why I can't sell";
+ mes "more than 5 of them at a time.";
+ mes "If you really really want more,";
+ mes "then talk to me again.";
+ mes "How many do you want anyway?";
+ next;
+ while(.@input <= 0 || .@input > 5) {
+ input .@input;
+ if (.@input < 1) {
+ mes "[Marco Bassinio]";
+ mes "Oh, it's such a shame!";
+ mes "I'm sure you'll miss";
+ mes "this opportunity and";
+ mes "regret you didn't buy it.";
+ next;
+ mes "[Marco Bassinio]";
+ mes "Remember, you can never";
+ mes "find this anywhere else!";
+ mes "Come back anytime,";
+ mes "when you change your mind.";
+ close;
+ }
+ if (.@val09choco > 5) {
+ mes "[Marco Bassinio]";
+ mes "Ugh.. Didn't I tell you?";
+ mes "5 is the maximum!";
+ mes "I can't sell more than";
+ mes "that to the same person.";
+ next;
+ mes "[Marco Bassinio]";
+ mes "And you know it's not";
+ mes "like an everyday meal.";
+ mes "Eating too much is not";
+ mes "really good for you.";
+ next;
+ }
+ }
+ if (!checkweight(558, .@input)) {
+ mes "[Marco Bassinio]";
+ mes "You're carrying too many items.";
+ mes "Please use the Kafra Services.";
+ close;
+ }
+ set .@price, .@input * 5000;
+ if (Zeny < .@price) {
+ mes "[Marco Bassinio]";
+ mes "Looks like you don't have";
+ mes "enough zeny with ya.";
+ mes "Maybe you should borrow";
+ mes "some zeny from a friend.";
+ mes "Cuz, I'm not gonna";
+ mes "be here everyday.";
+ close;
+ }else{
+ mes "[Marco Bassinio]";
+ mes "Good for you!";
+ mes "It's also perfect as a gift!";
+ mes "You know you can't get this";
+ mes "kind of chocolate normally.";
+ next;
+ mes "[Marco Bassinio]";
+ mes "If you want more,";
+ mes "you should come back.";
+ mes "Might be a good idea to";
+ mes "buy some more while";
+ mes "you have a chance...!";
+ set Zeny,Zeny - .@price;
+ getitem 558,.@input;
+ close;
+ }
+ case 2:
+ mes "[Marco Bassinio]";
+ mes "If you want to gift-wrap";
+ mes "the chocolate, of course,";
+ mes "you need chocolate,";
+ mes "plus, wrapping paper,";
+ mes "wrapping strap and a box.";
+ next;
+ mes "[Marco Bassinio]";
+ mes "You also need to pay";
+ mes "500 zeny to carve your";
+ mes "name on the box.";
+ mes "Are you all prepared...?";
+ next;
+ if(countitem(7175) < 1 || countitem(7174) < 1 || countitem(7948) < 1 || Zeny < 500) {
+ mes "[Marco Bassinio]";
+ mes "Hmm.. Looks like you don't";
+ mes "have enough materials to";
+ mes "decorate the gift box..";
+ mes "You can't just put your gift";
+ mes "into some plain looking box..";
+ mes "Don't you think?";
+ next;
+ mes "[Marco Bassinio]";
+ mes "You need to bring some";
+ mes "wrapping paper,";
+ mes "wrapping strap, and a box.";
+ mes "Oh, also bring 500 zeny,";
+ mes "and don't forget to bring your";
+ mes "true loving heart with you!!";
+ close;
+ }
+ if(countitem(558) < 1) {
+ mes "[Marco Bassinio]";
+ mes "Hey, look, adventurer!";
+ mes "I can't create something right away!";
+ mes "You know I'm not an alchemist or anything.";
+ next;
+ mes "[Marco Bassinio]";
+ mes "You're not saying that you";
+ mes "want an empty chocolate box";
+ mes "without any chocolate in it,";
+ mes "am I right?";
+ close;
+ }
+ if (!checkweight(12744,1)) {
+ mes "[Marco Bassinio]";
+ mes "You're carrying too many items.";
+ mes "Please use the Kafra Services.";
+ close;
+ }
+ mes "[Marco Bassinio]";
+ mes "Here, look!";
+ mes "It's your chocolate box";
+ mes "with your name on it.";
+ mes "Isn't it fabulous?";
+ mes "See, your name looks";
+ mes "great on the box!";
+ next;
+ delitem 558,1;
+ delitem 7175,1;
+ delitem 7174,1;
+ delitem 7948,1;
+ set Zeny,Zeny-500;
+ getnameditem 12744,strcharinfo(0);
+ mes "[Marco Bassinio]";
+ mes "Happy Valentine's Day!";
+ mes "Valentine's the reason I came back.";
+ close;
+ case 3:
+ mes "[Marco Bassinio]";
+ mes "Oh, it's such a shame!";
+ mes "I'm sure you'll miss";
+ mes "this opportunity and";
+ mes "regret you didn't buy it.";
+ next;
+ mes "[Marco Bassinio]";
+ mes "Remember, you can never";
+ mes "find this anywhere else!";
+ mes "Come back anytime,";
+ mes "when you change your mind.";
+ close;
+ }
+}
+
+// Packs Trader (Sells Wrapping Paper, Lace, and Box)
+prontera,147,171,5 script Packs Trader#Val09 58,{
+ mes "[Packs Trader]";
+ mes "Hello.";
+ mes "I am a Packs Trader,";
+ mes "I sell paper boxes and";
+ mes "supplies for packing presents.";
+ next;
+ while(1) {
+ mes "[Packs Trader]";
+ mes "Do you have something to buy?";
+ next;
+ switch(select("Packing Paper:Packing Ribbon:Box:Cancel.")) {
+ case 1:
+ mes "[Packs Trader]";
+ mes "It's 200 zeny for";
+ mes "1 Packing Paper.";
+ mes "How many do you want?";
+ mes "You can't buy more";
+ mes "than 10 items at once.";
+ next;
+ input .@input;
+ if (.@input <= 0) {
+ mes "[Packs Trader]";
+ mes "Nothing to buy.";
+ mes "Come back when";
+ mes "you need something.";
+ close;
+ }
+ if (.@input > 10) {
+ mes "[Packs Trader]";
+ mes "I told you not to buy more than 10...";
+ next;
+ break;
+ }
+ if (!checkweight(7175,.@input)) {
+ mes "[Packs Trader]";
+ mes "You're carrying too many items.";
+ mes "Please use the Kafra Services.";
+ close;
+ }
+ set .@price, .@input * 200;
+ if (Zeny < .@price) {
+ mes "[Packs Trader]";
+ mes "You don't have enough money.";
+ mes "Please check your wallet.";
+ next;
+ break;
+ }else{
+ mes "[Packs Trader]";
+ mes "Here they are.";
+ mes "Hope it makes your";
+ mes "Valentine's Day";
+ mes "more pleasing!";
+ set Zeny,Zeny-.@price;
+ getitem 7175,.@input;
+ next;
+ break;
+ }
+ case 2:
+ mes "[Packs Trader]";
+ mes "It's 200 zeny for";
+ mes "1 Packing Ribbon.";
+ mes "How many do you want?";
+ mes "You can't buy more";
+ mes "than 10 items at once.";
+ next;
+ input .@input;
+ if (.@input <= 0) {
+ mes "[Packs Trader]";
+ mes "Nothing to buy.";
+ mes "Come back when";
+ mes "you need something.";
+ close;
+ }
+ if (.@input > 10) {
+ mes "[Packs Trader]";
+ mes "I told you not to buy more than 10...";
+ next;
+ break;
+ }
+ if (!checkweight(7174,.@input)) {
+ mes "[Packs Trader]";
+ mes "You're carrying too many items.";
+ mes "Please use the Kafra Services.";
+ close;
+ }
+ set .@price, .@input * 200;
+ if (Zeny < .@price) {
+ mes "[Packs Trader]";
+ mes "You don't have enough money.";
+ mes "Please check your wallet.";
+ next;
+ break;
+ }else{
+ mes "[Packs Trader]";
+ mes "Here they are.";
+ mes "Hope it makes your";
+ mes "Valentine's Day";
+ mes "more pleasing!";
+ set Zeny,Zeny-.@price;
+ getitem 7174,.@input;
+ next;
+ break;
+ }
+ case 3:
+ mes "[Packs Trader]";
+ mes "It's 600 zeny for";
+ mes "1 Box.";
+ mes "How many do you want?";
+ mes "You can't buy more";
+ mes "than 10 items at once.";
+ next;
+ input .@input;
+ if (.@input <= 0) {
+ mes "[Packs Trader]";
+ mes "Nothing to buy.";
+ mes "Come back when";
+ mes "you need something.";
+ close;
+ }
+ if (.@input > 10) {
+ mes "[Packs Trader]";
+ mes "I told you not to buy more than 10...";
+ next;
+ break;
+ }
+ if (!checkweight(7948,.@input)) {
+ mes "[Packs Trader]";
+ mes "You're carrying too many items.";
+ mes "Please use the Kafra Services.";
+ close;
+ }
+ set .@price, .@input * 600;
+ if (Zeny < .@price) {
+ mes "[Packs Trader]";
+ mes "You don't have enough money.";
+ mes "Please check your wallet.";
+ next;
+ break;
+ }else{
+ mes "[Packs Trader]";
+ mes "Here they are.";
+ mes "Hope it makes your";
+ mes "Valentine's Day";
+ mes "more pleasing!";
+ set Zeny,Zeny-.@price;
+ getitem 7948,.@input;
+ next;
+ break;
+ }
+ case 4:
+ mes "[Packs Trader]";
+ mes "Goodbye!";
+ mes "And enjoy your";
+ mes "Valentine's Day.";
+ close;
+ }
+ }
+}
+
+// Event Ring Maker (Makes ring for players)
+prontera,154,185,5 script Event Ring Maker#Val09 721,{
+ if (BaseLevel < 75) {
+ mes "[Event Ring Maker]";
+ mes "Hello, I only make the";
+ mes "Valentine rings to those";
+ mes "experienced adventurers";
+ mes "Level 75 or above.";
+ next;
+ mes "[Event Ring Maker]";
+ mes "You're not fully";
+ mes "experienced yet.";
+ mes "Come back when you're";
+ mes "experienced enough to";
+ mes "handle the quests.";
+ close;
+ }
+
+ if (iROval09ring >= 1) {
+ mes "[Event Ring Maker]";
+ mes "The box with the ring,";
+ mes "carved with your name,";
+ mes "is for the one you love.";
+ next;
+ mes "[Event Ring Maker]";
+ mes "As for the rings that you";
+ mes "receive from others, they";
+ mes "should all be registered";
+ mes "with the Vote Manager.";
+ mes "She is standing near";
+ mes "the Prontera Fountain.";
+ next;
+ mes "[Event Ring Maker]";
+ mes "Only the most popular";
+ mes "male and female are";
+ mes "subjected to getting rewards.";
+ mes "Be aware, and always";
+ mes "try to stay popular!";
+ close;
+ }
+
+ mes "[Event Ring Maker]";
+ mes "Hi, there, how are ya?";
+ mes "Come to me if you're";
+ mes "interested in the event,";
+ mes "'Who's Valentine's Hottest?'";
+ next;
+ mes "[Event Ring Maker]";
+ mes "I make the most precious";
+ mes "rings that you can give";
+ mes "to your sweethearts.";
+ mes "Those rings are very special";
+ mes "because I carve";
+ mes "your names on them!";
+ next;
+ mes "[Event Ring Maker]";
+ mes "Isn't it exciting?";
+ mes "Isn't it such a brilliant idea?";
+ mes "Give these special rings";
+ mes "to your sweethearts!";
+ next;
+ mes "[Event Ring Maker]";
+ mes "You should hurry 'cuz";
+ mes "this event will only";
+ mes "last for two weeks.";
+ mes "Give that special someone";
+ mes "a gift of a Valentine's ring.";
+ next;
+ mes "[Event Ring Maker]";
+ mes "Remember, you can only";
+ mes "generate the ring once.";
+ mes "You also need Wrapping Paper,";
+ mes "Wrapping Strap and a Box";
+ mes "to make the ring.";
+ next;
+ mes "[Event Ring Maker]";
+ mes "So you better be sure";
+ mes "of who you give this to.";
+ mes "By the way,";
+ mes "It costs 1,000 zeny.";
+ mes "Would you like to make one?";
+ next;
+ if(select("Hmm.. I gotta give it a second thought...:Sure.") == 1) {
+ mes "[Event Ring Maker]";
+ mes "Alrighty!";
+ mes "You can't put a rush";
+ mes "on such a thing like this.";
+ mes "Think about what";
+ mes "you truly want.";
+ mes "Just follow your heart!";
+ close;
+ }
+ if(countitem(7175) < 1 || countitem(7174) < 1 || countitem(7948) < 1 || Zeny < 1000) {
+ mes "[Event Ring Maker]";
+ mes "Well, you don't have";
+ mes "enough materials";
+ mes "to make a gift box.";
+ mes "Check what you have,";
+ mes "and come back later";
+ mes "with all the materials.";
+ close;
+ }
+ mes "[Event Ring Maker]";
+ mes "Okie Dokie!";
+ mes "I'll make it right away.";
+ next;
+ delitem 7175,1;
+ delitem 7174,1;
+ delitem 7948,1;
+ set Zeny,Zeny-1000;
+ set iROval09ring,1;
+ if (Sex) {
+ getnameditem 12742,strcharinfo(0);
+ }else{
+ getnameditem 12743,strcharinfo(0);
+ }
+ mes "[Event Ring Maker]";
+ mes "Here, the most precious";
+ mes "ring in the world!";
+ mes "Don't forget, you can never";
+ mes "make this ring again.";
+ next;
+ mes "[Event Ring Maker]";
+ mes "You must pick out the one";
+ mes "that you really really love,";
+ mes "and give this ring";
+ mes "to that person.";
+ next;
+ mes "[Event Ring Maker]";
+ mes "Of course, you've got to";
+ mes "get rings from others,";
+ mes "that's the way you can";
+ mes "participate in the voting, right?";
+ mes "Challenge yourself to become";
+ mes "Valentine's Hottest!";
+ close;
+}
+
+// Valentine Vote Manager (Registers votes)
+prontera,157,185,4 script Valentine Vote Manager#v 113,{
+ mes "[Valentine Vote Manager]";
+ mes "Hello, I'm the Valentine's";
+ mes "Vote Manager.";
+ mes "I'm in charge of collecting";
+ mes "rings for this event!";
+ next;
+ mes "[Valentine Vote Manager]";
+ mes "I register the rings";
+ mes "you get from others";
+ mes "and I calculate the";
+ mes "total number of rings.";
+ next;
+ mes "[Valentine Vote Manager]";
+ mes "You know what I do besides";
+ mes "just counting those rings?";
+ mes "I can tell you the adventurer's";
+ mes "name who's got the";
+ mes "most number of votes.";
+ next;
+ mes "[Valentine Vote Manager]";
+ mes "Plus, you can also find out how";
+ mes "many votes he/she got.";
+ next;
+ while (1) {
+ mes "[Valentine Vote Manager]";
+ mes "So, what do you want?";
+ next;
+ switch(select("Please register my rings.:Please count my votes.:Nothing, for now.")) {
+ case 1:
+ mes "[Valentine Vote Manager]";
+ mes "Please tell me how many";
+ mes "rings you want to register.";
+ next;
+ mes "[Valentine Vote Manager]";
+ mes "When you write the";
+ mes "number of the rings,";
+ mes "the number shouldn't be";
+ mes "larger than the number of";
+ mes "rings you actually have.";
+ mes "'0', cancels everything.";
+ next;
+ input .@input;
+
+ if (.@input <= 0) {
+ mes "[Valentine Vote Manager]";
+ mes "You have entered 0.";
+ mes "Registration is cancelled.";
+ next;
+ break;
+ }
+
+ if (Sex) {
+ if (countitem(7947) > .@input) {
+ mes "[Valentine Vote Manager]";
+ mes "Seems like the value you entered is too small.";
+ mes "I know you've got more. Be honest, dear.";
+ next;
+ break;
+ }
+
+ if (countitem(7947) < .@input) {
+ mes "[Valentine Vote Manager]";
+ mes "Seems like the value you entered is too large.";
+ mes "I know you've got less. Be honest, dear.";
+ next;
+ break;
+ }
+
+ mes "[Valentine Vote Manager]";
+ mes "I'll take those silver rings,";
+ mes "and count the votes for you.";
+ mes "Thank you for participating.";
+ delitem 7947,.@input;
+ set Val09Rings,Val09Rings+.@input;
+ if (Val09Rings > $Val09votes_M) {
+ set $Val09votes_M,Val09Rings;
+ set $Val09name_M$,strcharinfo(0);
+ }
+ next;
+ break;
+ }else{
+ if (countitem(7946) > .@input) {
+ mes "[Valentine Vote Manager]";
+ mes "Seems like the value you entered is too small.";
+ mes "I know you've got more. Be honest, dear.";
+ next;
+ break;
+ }
+
+ if (countitem(7946) < .@input) {
+ mes "[Valentine Vote Manager]";
+ mes "Seems like the value you entered is too large.";
+ mes "I know you've got less. Be honest, dear.";
+ next;
+ break;
+ }
+
+ mes "[Valentine Vote Manager]";
+ mes "I'll take those gold rings,";
+ mes "and count the votes for you.";
+ mes "Thank you for participating.";
+ delitem 7946,.@input;
+ set Val09Rings,Val09Rings+.@input;
+ if (Val09Rings > $Val09votes_F) {
+ set $Val09votes_F,Val09Rings;
+ set $Val09name_F$,strcharinfo(0);
+ }
+ next;
+ break;
+ }
+ case 2:
+ mes "[Valentine Vote Manager]";
+ mes "Let's see...";
+ mes "You have registered..";
+ mes ".."+Val09Rings+" rings so far.";
+ mes "and...";
+ next;
+ mes "[Valentine Vote Manager]";
+ mes "The current record shows... "+$Val09name_M$+" is the male vote leader who's registered the total of "+$Val09votes_M+" rings.";
+ next;
+ mes "[Valentine Vote Manager]";
+ mes "The current record shows... "+$Val09name_F$+" is the female vote leader who's registered the total of "+$Val09votes_F+" rings.";
+ next;
+ break;
+
+ case 3:
+ mes "[Valentine Vote Manager]";
+ mes "Hey, you can be popular too!";
+ mes "Anyone can... really!";
+ mes "Though you have to try a lot";
+ mes "harder, but still~ Hahaha!";
+ close;
+ }
+ }
+}
+
+// Charles Orleans (Makes Home-Made Chocolates)
+prt_castle,42,35,3 script Dessert Manager#Val09 47,{
+ if (Sex) {
+ mes "[Charles Orleans]";
+ mes "Monsieur~! What brings";
+ mes "you to my beautiful atelier?";
+ mes "What is it that you want?";
+ mes "Well, my sparkling eyes";
+ mes "get dried and lose their shine";
+ mes "if not for the pretty little lady.";
+ next;
+ mes "[Charles Orleans]";
+ mes "Please leave me alone unless";
+ mes "you have business with me.";
+ mes "Haaaa~ I'm a busy person.";
+ mes "Don't bother me....";
+ mes "Annoying, annoying, annoying~~!";
+ close;
+ }
+
+ mes "[Charles Orleans]";
+ mes "Oh, Mademoiselle!";
+ mes "This little trifling space";
+ mes "felt like heaven the";
+ mes "minute you walked in!";
+ mes "Can I help you with";
+ mes "anything, if it's alright?";
+ next;
+ if(select("Please, make me some chocolate.:Don't bother. I'm just passing by.") == 2) {
+ mes "[Charles Orleans]";
+ mes "Ahhh, this is so heartbreaking.";
+ mes "How could you say that?";
+ mes "You're just so mean.";
+ mes "Don't bother? Just passing by?";
+ next;
+ mes "[Charles Orleans]";
+ mes "What can I do to make you";
+ mes "pay a little attention to me?";
+ mes "Please.. I feel like my soul is lost..";
+ close;
+ }
+ if(countitem(558) < 3) {
+ mes "[Charles Orleans]";
+ mes "Ahhh, Mademoiselle.";
+ mes "I'm not an alchemist,";
+ mes "or a magician.";
+ mes "I don't just make chocolate";
+ mes "out of anything.";
+ next;
+ mes "[Charles Orleans]";
+ mes "I always think of making";
+ mes "chocolate as artistic work.";
+ mes "You see, I'm no ordinary cook...";
+ mes "I make chocolate with feelings..";
+ mes "messages of loving hearts..";
+ next;
+ mes "[Charles Orleans]";
+ mes "I make masterpieces.";
+ mes "No one can imitate";
+ mes "the looks and the taste.";
+ mes "Yes, it's nothing like";
+ mes "ordinary chocolate!";
+ next;
+ mes "[Charles Orleans]";
+ mes "I'm afraid I can't make it";
+ mes "and prove it to you now.";
+ mes "This is really a shame!";
+ next;
+ mes "[Charles Orleans]";
+ mes "I really want to thank";
+ mes "you for visiting me";
+ mes "and if you only bring";
+ mes "^3152ff3 Chocolates^000000,";
+ mes "I'll make you chocolate";
+ mes "like you've never seen...";
+ next;
+ mes "[Charles Orleans]";
+ mes "never tasted before...";
+ mes "Mademoiselle, with your spirit,";
+ mes "I'm sure you can bring";
+ mes "3 pieces of chocolate.";
+ mes "I have no doubt at all.";
+ next;
+ mes "[Charles Orleans]";
+ mes "So... what do you think?";
+ mes "Can you bring ^3152ff3 Chocolates^000000?";
+ mes "I could get them myself,";
+ mes "but I'm tied up with so much";
+ mes "work as you see right now.";
+ next;
+ mes "[Charles Orleans]";
+ mes "Adios, Mademoiselle.....";
+ mes "I'll be waiting for you.";
+ close;
+ }else{
+ if (!checkweight(559,1)) {
+ mes "[Charles Orleans]";
+ mes "You're carrying too many items.";
+ mes "Please use the Kafra Services.";
+ close;
+ }
+ mes "[Charles Orleans]";
+ mes "Oh, Mademoiselle!";
+ mes "I'll make the best chocolate";
+ mes "with the pieces you've brought.";
+ mes "I'm going to put the light of";
+ mes "your eyes into this chocolate";
+ mes "that no one can resist.";
+ next;
+ mes "[Charles Orleans]";
+ mes "It'll be stronger than a";
+ mes "sweet sweet love potion.....";
+ next;
+ mes "[Charles Orleans]";
+ mes "Un, Deux, Trois, Quatre.....";
+ mes "Just like the ugly duckling that";
+ mes "turned to a beautiful swan-";
+ mes "Ordinary chocolate pieces are";
+ mes "becoming a piece of art!";
+ next;
+ mes "[Charles Orleans]";
+ mes "They're changing!";
+ mes "They're getting warm,";
+ mes "softly changing the shape,";
+ mes "getting stronger again!";
+ mes "Oh, is it a master piece or";
+ mes "what...!!";
+ next;
+ mes "[Charles Orleans]";
+ mes "Here you go, Mademoiselle!";
+ mes "Ahahahaha, just look at this!";
+ mes "I can't believe I made this.";
+ mes "Oh, I can't take my eyes off..!!";
+ delitem 558,3;
+ getitem 559,1;
+ next;
+ mes "[Charles Orleans]";
+ mes "Alright. Mademoiselle,";
+ mes "I hope this is just";
+ mes "what you wanted,";
+ mes "for it bears your";
+ mes "beautiful heart inside.";
+ close;
+ }
+
} \ No newline at end of file