summaryrefslogtreecommitdiff
path: root/npc/re/events
diff options
context:
space:
mode:
authorshennetsind <shennetsind@54d463be-8e91-2dee-dedb-b68131a5f0ec>2012-07-08 19:30:07 +0000
committershennetsind <shennetsind@54d463be-8e91-2dee-dedb-b68131a5f0ec>2012-07-08 19:30:07 +0000
commit31825ccc2dde034a218d9ad466dd721c40b5651d (patch)
tree961b976e45988f7f7158d33b3f11a18688f34b1f /npc/re/events
parent22c75b070526de8b103032f5bf13504af81e0095 (diff)
downloadhercules-31825ccc2dde034a218d9ad466dd721c40b5651d.tar.gz
hercules-31825ccc2dde034a218d9ad466dd721c40b5651d.tar.bz2
hercules-31825ccc2dde034a218d9ad466dd721c40b5651d.tar.xz
hercules-31825ccc2dde034a218d9ad466dd721c40b5651d.zip
Okie ladies and gentleman if this commit breaks anything it's jman's and maki's fault, yes, blame them.
Fixing pre-re / re npc support, moving /config/ folder to src root so other servers may also make use of the #define renewal dir and other stuff. git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@16382 54d463be-8e91-2dee-dedb-b68131a5f0ec
Diffstat (limited to 'npc/re/events')
-rw-r--r--npc/re/events/MemorialDay_2008.txt432
-rw-r--r--npc/re/events/StPatrick_2008.txt717
-rw-r--r--npc/re/events/bossnia.txt89
-rw-r--r--npc/re/events/children_week.txt86
-rw-r--r--npc/re/events/christmas_2005.txt1684
-rw-r--r--npc/re/events/christmas_2008.txt1053
-rw-r--r--npc/re/events/dumplingfestival.txt111
-rw-r--r--npc/re/events/easter_2008.txt837
-rw-r--r--npc/re/events/event_skill_reset.txt109
-rw-r--r--npc/re/events/gdevent_aru.txt1542
-rw-r--r--npc/re/events/gdevent_sch.txt1541
-rw-r--r--npc/re/events/god_se_festival.txt781
-rw-r--r--npc/re/events/halloween_2006.txt1407
-rw-r--r--npc/re/events/halloween_2008.txt276
-rw-r--r--npc/re/events/halloween_2009.txt442
-rw-r--r--npc/re/events/idul_fitri.txt75
-rw-r--r--npc/re/events/lunar_2008.txt283
-rw-r--r--npc/re/events/nguild/nguild_dunsw.txt67
-rw-r--r--npc/re/events/nguild/nguild_ev_agit.txt216
-rw-r--r--npc/re/events/nguild/nguild_flags.txt192
-rw-r--r--npc/re/events/nguild/nguild_guardians.txt89
-rw-r--r--npc/re/events/nguild/nguild_kafras.txt71
-rw-r--r--npc/re/events/nguild/nguild_managers.txt174
-rw-r--r--npc/re/events/nguild/nguild_treas.txt167
-rw-r--r--npc/re/events/nguild/nguild_warper.txt111
-rw-r--r--npc/re/events/twintowers.txt95
-rw-r--r--npc/re/events/valentinesday.txt128
-rw-r--r--npc/re/events/valentinesday_2009.txt630
-rw-r--r--npc/re/events/valentinesday_2012.txt158
-rw-r--r--npc/re/events/whiteday.txt128
-rw-r--r--npc/re/events/xmas.txt374
31 files changed, 14065 insertions, 0 deletions
diff --git a/npc/re/events/MemorialDay_2008.txt b/npc/re/events/MemorialDay_2008.txt
new file mode 100644
index 000000000..d6dae7d78
--- /dev/null
+++ b/npc/re/events/MemorialDay_2008.txt
@@ -0,0 +1,432 @@
+//===== rAthena Script =======================================
+//= In Memory of Heroes (iRO Memorial Day 2008)
+//===== By: ==================================================
+//= Kisuka
+//===== Current Version: =====================================
+//= 1.2
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//
+//===== Additional Comments: =================================
+//= 1.0 First version. [Kisuka]
+//= 1.1 Many Many Fixes. [Kisuka]
+//= 1.2 Some changes. [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 without your towel!?";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "If you think this is just another holiday, I'm not going to waste my breath.";
+ mes "But if you like to pay a tribute to great soldiers, 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 the fallen soldiers you must be properly equipped.";
+ mes "Without your towel you will be 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 enough?!";
+ mes "*Sigh* Do I really have to tell you again?!";
+ mes "Bring me ^FF000030 Fabric and 20 Fluffs^000000.";
+ close;
+ }else{
+ mes "***Mad Sago Lauds appears to be muttering to himself***";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "So, did you bring the towel materials?";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "Excellent; you've brought them all.";
+ mes "Then I shall make you a Towel of 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 I even put your name on it";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "Say, how do you like to go on a journey to pay a tribute to Memorial Day?";
+ next;
+ if (select("Sure.:No, I'm Busy.") == 2) {
+ mes "[Mad Sago Lauds]";
+ mes "Don't come crying to me if someone decides to build a highway through your home!";
+ close;
+ }
+ mes "[Mad Sago Lauds]";
+ mes "Good. By the way, do you even know what the towel is for?";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "It seems you're just carrying it without understanding its meaning.";
+ mes "What a shame! You should go speak to ^FF0000Grast in Prontera^000000.";
+ set Memorial08,3;
+ close;
+ }
+
+ else if(Memorial08 == 3) {
+ mes "[Mad Sago Lauds]";
+ mes "What are you still doing here?";
+ mes "I told you to go speak to Grast in 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 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 o'clock direction in Prontera.";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "What do you mean you were just there?";
+ next;
+ mes "[Mad Sago Lauds]";
+ mes "What? Why are you giving me your 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 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 few pips in it, and some folks have half a one for breakfast.";
+ close;
+ }
+ else if(.@RandomMsg == 3) {
+ mes "[Mad Sago Lauds]";
+ mes "There was a point to this story, but it has temporarily escaped the 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 solve any major problems just with 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 should rise to their memory,-";
+ mes "-nor engraved stone bear record of their deeds,-";
+ mes "-yet will their remembrance be as 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 intended to go,-";
+ mes "-but I think I have ended up where 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, very undramatic.-";
+ mes "-It is not the urge to surpass all others at whatever cost,-";
+ mes "- but the urge to serve others at 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 glorious day.";
+ mes "I wonder how many people remember 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 understands the meaning of Memorial Day.";
+ next;
+ mes "[Grast]";
+ mes "It is very important to know what we're celebrating today, don't you think?";
+ next;
+ mes "[Grast]";
+ mes "If you like to go on a journey to pay a tribute to Memorial Day, you should bring me some materials I ask.";
+ next;
+ mes "[Grast]";
+ mes "Please bring me ^FF0000one of each Red Potion, Green Potion, Awakening 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 materials.";
+ mes "Please make sure you need to bring me";
+ mes "^FF0000one of each Red Potion, Green Potion, Awakening Potion, and Butteryfly Wing^000000.";
+ next;
+ mes "[Grast]";
+ mes "You'll have to bring me more 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 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, Yggdrasil Leaf, Blue Gemstone, 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, Blue Gemstone, Crystal Mirror, Meat, and Carrot^000000.";
+ next;
+ mes "[Grast]";
+ mes "You'll have to bring me more materials afterwards.";
+ mes "If you feel too burdened to gather them all, 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 Incubator, Firecracker, Poring 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, 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, I can provide you all the materials.";
+ next;
+ mes "[Grast]";
+ mes "If I provide you all materials, however, 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 you've brought all of them.";
+ next;
+ mes "[Grast]";
+ mes "I hope you'll learn a valuable 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 in my each hand.";
+ mes "A best thing would be giving you 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 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 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 and happiness are built on thousands of lives sacrificed in war.";
+ close;
+ }
+
+ else if(Memorial08 >= 8) {
+ mes "[Grast]";
+ mes "A towel is about the most massively useful thing an adventurer can have.";
+ close;
+ }
+
+ L_GiveUp:
+ mes "[Grast]";
+ mes "Oh, I see. I guess you're quite busy nowadays, huh?";
+ mes "No problem; I'll give you all the supplies...";
+ next;
+ mes "[Grast]";
+ mes "There you go.";
+ mes "I crushed all the items together into a more compact form for you.";
+ mes "You can thank me later for that 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 accident, and has kind of lost his mind.";
+ mes "Please don't be alarmed even if he starts babbling.";
+ close;
+
+ L_Continue:
+ mes "[Grast]";
+ mes "That's a good idea.";
+ mes "Then I'll be waiting for your return.";
+ close;
+}
diff --git a/npc/re/events/StPatrick_2008.txt b/npc/re/events/StPatrick_2008.txt
new file mode 100644
index 000000000..3e85c8a04
--- /dev/null
+++ b/npc/re/events/StPatrick_2008.txt
@@ -0,0 +1,717 @@
+//===== rAthena Script =======================================
+//= St. Patrick's Day (2008)
+//===== By: ==================================================
+//= Kisuka
+//===== Current Version: =====================================
+//= 1.5
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//= iRO St. Patrick's Day. (2008)
+//= Find O'Riley's treasure for him, then hunt down coinds from
+//= the snakes to get Green Ale in return for them.
+//=
+//= Mobs 1841 through 1844 have been modified for this event
+//= you must use the mob edits provided for this quest.
+//= Enable in mob_db2.txt
+//=
+//= The item 12715 Black_Treasure_Chest contains a script
+//= that relies explicitly on this script being loaded.
+//= Remove the "end" from the item script to enable.
+//= In addition to that, you must enable the item_avail
+//= entries if you are using a kRO client, as the items
+//= were removed from the client between testing and this
+//= updated.
+//===== Additional Comments: =================================
+//= 1.0 First version. [Kisuka]
+//= 1.1 Fixed checkitems for ale, fixed ale prize(gives the correct one now). [Kisuka]
+//= 1.2 Optimized. Uses only one variable now. [L0ne_W0lf]
+//= Corrected EXP rewards, and some typos.
+//= 1.3 Corrected random in item function. [L0ne_W0lf]
+//= 1.4 Replaced effect numerics with constants. [Samuray22]
+//= 1.5 Revamped the script. [Kisuka]
+//============================================================
+
+prt_fild05,170,286,4 script Anxious Leprechaun#8pday 954,{
+ if (StPatrick2008 < 1) {
+ mes "[O'Riley the Leprechaun]";
+ mes "Hmm...";
+ mes "Tis a fine day it be.";
+ mes "If you have a moment to spare.";
+ mes "Come here to me now, come here and I'll tell ya something.";
+ next;
+ select("Go ahead.");
+ mes "[O'Riley the Leprechaun]";
+ mes "These past years I've come to see the world and each time the snakes have stolen me treasure.";
+ next;
+ select("Oh?");
+ mes "[O'Riley the Leprechaun]";
+ mes "Ye fine folks of this land have been so gracious to recover me treasure again and again.";
+ next;
+ mes "[O'Riley the Leprechaun]";
+ mes "I've learned me lesson and will never forget how those vile snakes have wronged me.";
+ next;
+ select("What did you do?");
+ mes "[O'Riley the Leprechaun]";
+ mes "I made a safe place to hide me treasure.";
+ mes "Hidden in a secret place the treasure would be safe until I returned to the world the following year.";
+ next;
+ mes "[O'Riley the Leprechaun]";
+ mes "This year, I have made me journey to see the outside world once again.";
+ mes "I traveled to me cache of gold I found it to be safe and undisturbed.";
+ next;
+ mes "[O'Riley the Leprechaun]";
+ mes "I thought to meself, I am very clever to hide the treasure from the snakes.";
+ mes "Oh, but I was a fool still.";
+ next;
+ select("What happened?");
+ mes "[O'Riley the Leprechaun]";
+ mes "My hiding place was too clever.";
+ mes "I pulled and I heaved and pushed, but the hiding place would not budge.";
+ mes "So once again, I am without treasure this year.";
+ next;
+ mes "[O'Riley the Leprechaun]";
+ mes "I have not even begun brewing me famous green ale on account of this mess.";
+ mes "I will ask ye, will ya help get me treasure back?";
+ next;
+ if (select("Sure, I can help you.:I'm too busy.") == 2) {
+ mes "[O'Riley the Leprechaun]";
+ mes "Aye, I understand.";
+ mes "Thank you for listening to me tale.";
+ close;
+ }
+ mes "[O'Riley the Leprechaun]";
+ mes "To find my treasure it be true.";
+ mes "To my treasure I give my secret to you.";
+ next;
+ mes "[O'Riley the Leprechaun]";
+ mes "So, listen well and make no omissions.";
+ mes "Make the journey to the city of magicians.";
+ mes "Over the bridge and across the water";
+ mes "Climb the mountain until north ye can travel no farther.";
+ next;
+ mes "[O'Riley the Leprechaun]";
+ mes "Passed the stone steps set into the air.";
+ mes "Hidden in the mountain side, me treasure is there.";
+ next;
+ mes "[O'Riley the Leprechaun]";
+ mes "Ye must find a way to break it open.";
+ mes "Ye will need a mighty explosion to free the cache to be sure.";
+ next;
+ mes "[O'Riley the Leprechaun]";
+ mes "Ye might try some Firecrackers.";
+ mes "Course, Ye would need a great number of them, Ye would need at least ^FF0000200 Firecreackers^000000";
+ set StPatrick2008,1;
+ close;
+ }
+ else if (StPatrick2008 == 1) {
+ mes "[O'Riley the Leprechaun]";
+ mes "Tis a fine day it be.";
+ mes "Have you found me treasure yet, have you?";
+ mes "Me hiding spot is a might hard to crack.";
+ next;
+ mes "[O'Riley the Leprechaun]";
+ mes "Ye might try some Firecrackers.";
+ mes "Course, Ye would need a great number of them, Ye would need at least ^FF0000200 Firecreackers^000000";
+ next;
+ mes "[O'Riley the Leprechaun]";
+ mes "I be understanding if you can't get to it to be sure to be sure.";
+ close;
+ }
+ else if (StPatrick2008 == 2) {
+ mes "[O'Riley the Leprechaun]";
+ mes "Oh, welcome back!";
+ mes "Thank you for returning me treasure!";
+ mes "Me gratitude knows no bounds!";
+ next;
+ mes "[O'Riley the Leprechaun]";
+ mes "I am so happy,";
+ mes "I'll be starting up me brew right away";
+ next;
+ mes "[O'Riley the Leprechaun]";
+ mes "It seems that the snakes have returned this year and are here to steal my treasure again.";
+ next;
+ mes "[O'Riley the Leprechaun]";
+ mes "The snakes carry the coins of my kinsmen and must be punished.";
+ mes "But ye have had a long journey, for which I am very grateful.";
+ next;
+ mes "[O'Riley the Leprechaun]";
+ mes "When ye have had a moment to rest ye legs, come talk to me again and we may speak again";
+ close2;
+ set StPatrick2008,3;
+ getexp 200000,70000;
+ delitem 7721,1;
+ end;
+ }
+ else if (StPatrick2008 == 3) {
+ mes "[O'Riley the Leprechaun]";
+ mes "Ah, well rested I hope?";
+ next;
+ mes "[O'Riley the Leprechaun]";
+ mes "Thank you for coming by again.";
+ mes "The snakes carry the coins of my kindsmen and must be punished.";
+ next;
+ mes "[O'Riley the Leprechaun]";
+ mes "I would be so generous to give you some of my famous brew if you would bring me the ill-gotten gains carried by those vile snakes";
+ next;
+ mes "And if you find one of the treasures of my kin please bring me those coins so that the snakes don't get them.";
+ set StPatrick2008,4;
+ close;
+ }
+ else if (StPatrick2008 == 4) {
+ mes "[O'Riley the Leprechaun]";
+ mes "The snakes carry too many of me kinsmen's coin I be passing out pints of me brew as reward for their return.";
+ next;
+ mes "[O'Riley the Leprechaun]";
+ mes "I'll reward ye with one jug of ale for ^0000FF1 Golden Coins^000000, ^0000FF5 Silver Coins^000000, or ^0000FF10 Bronze Coins^000000.";
+ mes "It be a fair bounty for the ill-gotten coins.";
+ mes "So, what kind of coin have ye brought?";
+ next;
+ switch(select("Bronze Coins:Silver Coins:Gold Coins:Quit.")) {
+ case 1:
+ mes "[O'Riley the Leprechaun]";
+ mes "Thank you. Here's your ale~";
+ if (countitem(7915) >= 10) {
+ getitem 12135,1;
+ delitem 7915,10;
+ }
+ close;
+ case 2:
+ mes "[O'Riley the Leprechaun]";
+ mes "Thank you. Here's your ale~";
+ if (countitem(7916) >= 5) {
+ getitem 12135,1;
+ delitem 7916,5;
+ }
+ close;
+ case 3:
+ mes "[O'Riley the Leprechaun]";
+ mes "Thank you. Here's your ale~";
+ if (countitem(7720) >= 1) {
+ getitem 12135,1;
+ delitem 7720,1;
+ }
+ close;
+ case 4:
+ mes "[O'Riley the Leprechaun]";
+ mes "I'll reward ye with one jug of ale for ^0000FF1 Golden Coins^000000, ^0000FF5 Silver Coins^000000, or ^0000FF10 Bronze Coins^000000.";
+ close;
+ }
+ }
+}
+
+mjolnir_01,272,363,4 script Rocks#08StPattysDay -1,1,1,{
+ end;
+
+OnTouch:
+ if (StPatrick2008 < 1) {
+ mes "- You've found a pile of rocks covered with soil. -";
+ close;
+ }
+ if (StPatrick2008 == 1) {
+ mes "- You've found a pile of rocks covered with soil. -";
+ next;
+ if (countitem(12018) < 200) {
+ mes "The rocks won't budge.";
+ mes "Maybe O'Riley knows a way to move the rocks.";
+ close;
+ }
+ else {
+ if (select("Use Firecrackers.:Ignore") == 2) {
+ close;
+ }
+ mes "You buried 200 Firecrackers under the pile of rocks.";
+ mes "You light the fuse.";
+ next;
+ mes "*BOOM!*";
+ specialeffect2 EF_LORD;
+ next;
+ mes "After A cloud of dust and smoke has dissipated,";
+ mes "You've found a box between the rocks and soil.";
+ mes "This box must contain O'Riley's valuables.";
+ mes "Let's bring the box to O'Riley.";
+ close2;
+ set StPatrick2008,2;
+ delitem 12018,200;
+ getitem 7721,1;
+ }
+ }
+ end;
+}
+
+function script F_08stpattyseventbox {
+ switch(rand(1,6)) {
+ case 1:
+ getitem 7915,1;
+ end;
+ case 2:
+ getitem 7915,1;
+ getitem 7916,1;
+ getitem 7720,1;
+ end;
+ case 3:
+ getitem 7720,1;
+ end;
+ case 4:
+ getitem 7915,1;
+ getitem 7916,1;
+ end;
+ case 5:
+ getitem 7916,2;
+ end;
+ case 6:
+ getitem 7915,2;
+ end;
+ }
+}
+
+
+// Snake Spawns.
+ein_fild03,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+ein_fild04,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+ein_fild06,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+ein_fild07,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+ein_fild08,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+ein_fild09,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+ein_fild10,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+gef_fild00,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+gef_fild01,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+gef_fild02,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+gef_fild03,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+gef_fild04,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+gef_fild05,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+gef_fild07,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+gef_fild08,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+gef_fild09,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+gef_fild10,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+gef_fild11,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+gef_fild12,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+gef_fild13,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+gef_fild14,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+glast_01,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+lhz_fild01,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+lhz_fild02,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+lhz_fild03,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+mjolnir_01,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+mjolnir_02,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+mjolnir_03,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+mjolnir_04,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+mjolnir_05,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+mjolnir_06,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+mjolnir_07,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+mjolnir_08,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+mjolnir_09,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+mjolnir_10,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+mjolnir_11,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+mjolnir_12,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+moc_fild01,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+moc_fild02,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+moc_fild03,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+moc_fild04,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+moc_fild05,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+moc_fild06,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+moc_fild07,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+moc_fild08,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+moc_fild09,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+moc_fild10,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+moc_fild11,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+moc_fild12,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+moc_fild13,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+moc_fild14,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+moc_fild03,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+moc_fild16,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+moc_fild17,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+moc_fild18,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+pay_fild01,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+pay_fild02,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+pay_fild03,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+pay_fild04,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+pay_fild05,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+pay_fild06,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+pay_fild07,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+pay_fild08,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+pay_fild09,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+pay_fild10,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+pay_fild11,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+prt_fild00,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+prt_fild01,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+prt_fild02,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+prt_fild03,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+prt_fild04,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+prt_fild05,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+prt_fild06,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+prt_fild07,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+prt_fild08,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+prt_fild09,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+prt_fild10,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+prt_fild11,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+xmas_fild01,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+cmd_fild01,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+cmd_fild02,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+cmd_fild03,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+cmd_fild04,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+cmd_fild05,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+cmd_fild06,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+cmd_fild07,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+cmd_fild08,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+cmd_fild09,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+yuno_fild01,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+yuno_fild02,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+yuno_fild03,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+yuno_fild04,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+yuno_fild05,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+yuno_fild06,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+yuno_fild07,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+yuno_fild08,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+yuno_fild09,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+yuno_fild11,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+yuno_fild12,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+ama_fild01,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+gon_fild01,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+um_fild01,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+um_fild02,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+um_fild03,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+um_fild04,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+nif_fild01,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+nif_fild02,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+lou_fild01,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+hu_fild01,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+hu_fild04,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+hu_fild05,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+hu_fild07,0,0,0,0 monster Snake Lord's Minon 1841,3,0,0,0
+ein_fild03,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+ein_fild04,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+ein_fild06,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+ein_fild07,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+ein_fild08,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+ein_fild09,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+ein_fild10,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+gef_fild00,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+gef_fild01,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+gef_fild02,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+gef_fild03,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+gef_fild04,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+gef_fild05,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+gef_fild07,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+gef_fild08,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+gef_fild09,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+gef_fild10,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+gef_fild11,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+gef_fild12,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+gef_fild13,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+gef_fild14,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+glast_01,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+lhz_fild01,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+lhz_fild02,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+lhz_fild03,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+mjolnir_01,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+mjolnir_02,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+mjolnir_03,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+mjolnir_04,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+mjolnir_05,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+mjolnir_06,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+mjolnir_07,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+mjolnir_08,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+mjolnir_09,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+mjolnir_10,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+mjolnir_11,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+mjolnir_12,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+moc_fild01,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+moc_fild02,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+moc_fild03,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+moc_fild04,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+moc_fild05,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+moc_fild06,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+moc_fild07,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+moc_fild08,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+moc_fild09,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+moc_fild10,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+moc_fild11,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+moc_fild12,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+moc_fild13,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+moc_fild14,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+moc_fild03,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+moc_fild16,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+moc_fild17,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+moc_fild18,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+pay_fild01,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+pay_fild02,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+pay_fild03,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+pay_fild04,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+pay_fild05,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+pay_fild06,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+pay_fild07,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+pay_fild08,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+pay_fild09,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+pay_fild10,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+pay_fild11,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+prt_fild00,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+prt_fild01,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+prt_fild02,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+prt_fild03,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+prt_fild04,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+prt_fild05,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+prt_fild06,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+prt_fild07,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+prt_fild08,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+prt_fild09,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+prt_fild10,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+prt_fild11,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+xmas_fild01,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+cmd_fild01,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+cmd_fild02,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+cmd_fild03,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+cmd_fild04,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+cmd_fild05,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+cmd_fild06,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+cmd_fild07,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+cmd_fild08,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+cmd_fild09,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+yuno_fild01,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+yuno_fild02,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+yuno_fild03,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+yuno_fild04,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+yuno_fild05,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+yuno_fild06,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+yuno_fild07,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+yuno_fild08,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+yuno_fild09,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+yuno_fild11,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+yuno_fild12,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+ama_fild01,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+gon_fild01,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+um_fild01,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+um_fild02,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+um_fild03,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+um_fild04,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+nif_fild01,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+nif_fild02,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+lou_fild01,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+hu_fild01,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+hu_fild04,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+hu_fild05,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+hu_fild07,0,0,0,0 monster Snake Lord's Minon 1842,3,0,0,0
+ein_fild03,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+ein_fild04,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+ein_fild06,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+ein_fild07,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+ein_fild08,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+ein_fild09,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+ein_fild10,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+gef_fild00,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+gef_fild01,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+gef_fild02,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+gef_fild03,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+gef_fild04,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+gef_fild05,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+gef_fild07,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+gef_fild08,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+gef_fild09,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+gef_fild10,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+gef_fild11,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+gef_fild12,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+gef_fild13,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+gef_fild14,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+glast_01,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+lhz_fild01,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+lhz_fild02,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+lhz_fild03,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+mjolnir_01,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+mjolnir_02,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+mjolnir_03,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+mjolnir_04,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+mjolnir_05,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+mjolnir_06,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+mjolnir_07,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+mjolnir_08,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+mjolnir_09,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+mjolnir_10,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+mjolnir_11,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+mjolnir_12,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+moc_fild01,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+moc_fild02,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+moc_fild03,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+moc_fild04,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+moc_fild05,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+moc_fild06,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+moc_fild07,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+moc_fild08,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+moc_fild09,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+moc_fild10,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+moc_fild11,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+moc_fild12,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+moc_fild13,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+moc_fild14,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+moc_fild03,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+moc_fild16,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+moc_fild17,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+moc_fild18,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+pay_fild01,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+pay_fild02,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+pay_fild03,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+pay_fild04,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+pay_fild05,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+pay_fild06,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+pay_fild07,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+pay_fild08,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+pay_fild09,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+pay_fild10,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+pay_fild11,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+prt_fild00,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+prt_fild01,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+prt_fild02,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+prt_fild03,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+prt_fild04,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+prt_fild05,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+prt_fild06,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+prt_fild07,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+prt_fild08,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+prt_fild09,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+prt_fild10,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+prt_fild11,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+xmas_fild01,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+cmd_fild01,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+cmd_fild02,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+cmd_fild03,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+cmd_fild04,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+cmd_fild05,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+cmd_fild06,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+cmd_fild07,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+cmd_fild08,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+cmd_fild09,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+yuno_fild01,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+yuno_fild02,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+yuno_fild03,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+yuno_fild04,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+yuno_fild05,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+yuno_fild06,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+yuno_fild07,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+yuno_fild08,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+yuno_fild09,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+yuno_fild11,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+yuno_fild12,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+ama_fild01,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+gon_fild01,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+um_fild01,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+um_fild02,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+um_fild03,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+um_fild04,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+nif_fild01,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+nif_fild02,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+lou_fild01,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+hu_fild01,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+hu_fild04,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+hu_fild05,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+hu_fild07,0,0,0,0 monster Snake Lord's Minon 1843,2,0,0,0
+ein_fild03,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+ein_fild04,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+ein_fild06,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+ein_fild07,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+ein_fild08,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+ein_fild09,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+ein_fild10,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+gef_fild00,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+gef_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+gef_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+gef_fild03,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+gef_fild04,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+gef_fild05,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+gef_fild07,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+gef_fild08,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+gef_fild09,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+gef_fild10,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+gef_fild11,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+gef_fild11,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+gef_fild13,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+gef_fild14,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+glast_01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+lhz_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+lhz_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+lhz_fild03,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+mjolnir_01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+mjolnir_01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+mjolnir_03,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+mjolnir_04,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+mjolnir_05,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+mjolnir_06,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+mjolnir_07,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+mjolnir_08,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+mjolnir_09,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+mjolnir_10,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+mjolnir_11,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+mjolnir_11,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+moc_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+moc_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+moc_fild03,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+moc_fild04,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+moc_fild05,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+moc_fild06,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+moc_fild07,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+moc_fild08,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+moc_fild09,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+moc_fild10,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+moc_fild11,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+moc_fild11,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+moc_fild13,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+moc_fild14,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+moc_fild03,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+moc_fild16,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+moc_fild17,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+moc_fild18,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+pay_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+pay_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+pay_fild03,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+pay_fild04,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+pay_fild05,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+pay_fild06,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+pay_fild07,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+pay_fild08,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+pay_fild09,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+pay_fild10,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+pay_fild11,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+prt_fild00,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+prt_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+prt_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+prt_fild03,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+prt_fild04,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+prt_fild05,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+prt_fild06,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+prt_fild07,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+prt_fild08,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+prt_fild09,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+prt_fild10,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+prt_fild11,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+xmas_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+cmd_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+cmd_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+cmd_fild03,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+cmd_fild04,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+cmd_fild05,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+cmd_fild06,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+cmd_fild07,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+cmd_fild08,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+cmd_fild09,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+yuno_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+yuno_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+yuno_fild03,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+yuno_fild04,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+yuno_fild05,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+yuno_fild06,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+yuno_fild07,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+yuno_fild08,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+yuno_fild09,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+yuno_fild11,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+yuno_fild11,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+ama_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+gon_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+um_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+um_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+um_fild03,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+um_fild04,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+nif_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+nif_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+lou_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+hu_fild01,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+hu_fild04,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+hu_fild05,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
+hu_fild07,0,0,0,0 monster Snake Lord's Minon 1844,1,0,0,0
diff --git a/npc/re/events/bossnia.txt b/npc/re/events/bossnia.txt
new file mode 100644
index 000000000..514193cbd
--- /dev/null
+++ b/npc/re/events/bossnia.txt
@@ -0,0 +1,89 @@
+//===== rAthena Script =======================================
+//= Bossnia Warp NPCs
+//===== By: ==================================================
+//= Masao
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= rAthena
+//===== Description: =========================================
+//= Bossnia Warp NPC's.
+//===== Additional Comments: =================================
+//= 1.0 Converted from the official script.
+//= 1.1 Optimized. [Euphy]
+//============================================================
+
+prontera,132,125,4 script Bossnia Staff::bsw 908,{
+
+ mes "[Riss]";
+ mes "Hello?";
+ mes "I found some beautiful places";
+ mes "while I travelled all over the world.";
+ mes "I am an adventurer.";
+ mes "Haha~";
+ next;
+ mes "[Riss]";
+ mes "What? My name is...";
+ mes "'Bossnia Staff'?? No no...";
+ mes "Well, my name is not so important.";
+ mes "Sometimes you should be generous.";
+ mes "No time for considering that kind of small stuff";
+ mes "when you have to concentrate on more important things.";
+ next;
+ mes "[Riss]";
+ mes "Hum... anyway I want to say... something..";
+ mes "While I was travelling through some places,";
+ mes "I found a really fearful place.";
+ next;
+ mes "[Riss]";
+ mes "Most of the time when you come to a place,";
+ mes "there is one strong and fearful monster.";
+ mes "Isn't it?";
+ next;
+ mes "[Riss]";
+ mes "But... but... in there...";
+ mes "There are lots of fearful and strong monsters in there...";
+ mes "That was really frightful.";
+ next;
+ mes "[Riss]";
+ mes "If I had reacted a bit later... a few seconds...";
+ mes "I might have been killed.";
+ next;
+ mes "[Riss]";
+ mes "What?";
+ mes "You want to go in there?";
+ mes "Oh~ Boy~ you didn't get me.";
+ mes "In there.......";
+ next;
+ mes "[Riss]";
+ mes "Uh... you already know?";
+ mes "Although you know the place, you want to go in...";
+ mes "Good, I will send you there.";
+ mes "But after you went there, don't hold";
+ mes "a grudge against me. Also it costs 5,000 zeny.";
+ next;
+ if (Zeny > 4999) {
+ mes "[Riss]";
+ mes "Would you really like to take the challenge??";
+ mes "Ok, just choose the course.";
+ next;
+ set .@i, select("First","Second","Third","Fourth");
+ mes "[Riss]";
+ mes "Take care, boy~";
+ mes "Don't hold a grudge against me.";
+ close2;
+ set Zeny, Zeny - 5000;
+ warp "bossnia_0"+.@i,rand(202,204),rand(202,204);
+ end;
+ }
+ mes "[Riss]";
+ mes "You don't have enough money...";
+ mes "Come back when you have at least 5,000 zeny.";
+ close;
+}
+
+geffen,124,169,4 duplicate(bsw) Bossnia Staff#2 908
+payon,165,150,4 duplicate(bsw) Bossnia Staff#3 908
+morocc,142,100,4 duplicate(bsw) Bossnia Staff#4 908
+lighthalzen,203,140,4 duplicate(bsw) Bossnia Staff#5 908
+rachel,132,144,4 duplicate(bsw) Bossnia Staff#6 908
diff --git a/npc/re/events/children_week.txt b/npc/re/events/children_week.txt
new file mode 100644
index 000000000..e0d3fec88
--- /dev/null
+++ b/npc/re/events/children_week.txt
@@ -0,0 +1,86 @@
+//===== rAthena Script =======================================
+//= Children Week Event
+//===== By: ==================================================
+//= Samuray22
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= rAthena 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;
+}
diff --git a/npc/re/events/christmas_2005.txt b/npc/re/events/christmas_2005.txt
new file mode 100644
index 000000000..fd82b553f
--- /dev/null
+++ b/npc/re/events/christmas_2005.txt
@@ -0,0 +1,1684 @@
+//===== rAthena Script =======================================
+//= 2005 ChristMas Event
+//===== By: ==================================================
+//= Brainstorm
+//===== Current Version: =====================================
+//= 1.2
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//= [Aegis Conversion]
+//= Event 1: Louise's Kim creates Louise's Santa Hat.
+//= Event 2: Enjoy Happymerry Chistmas Event summons monsters.
+//= Event 3: Oholy requires you to hunt Deviruchi NPCs.
+//==========================================
+//= Break down of arguments used in the function:
+//= arg(0) Originating NPC (disable)
+//= arg(1) Next NPC to be enabled
+//= arg(2) Map name of originating NPC
+//= arg(3) Coordinate X to be teleported to
+//= arg(4) Coordinate Y to be teleported to
+//===== Additional Comments: =================================
+//= 1.0 First semi-working conversion. [Brainstorm]
+//= 1.1 Refined Brainstorm's conversion. [L0ne_W0lf]
+//= 1.2 Replaced effect numerics with constants. [L0ne_W0lf]
+//= 1.2a Small update to the checkweight. (bugreport:2553). [Paradox924X]
+//============================================================
+
+// Louise's Santa Hat (Event 1)
+xmas_in,89,92,5 script Louise Kim#designer 714,{
+ mes "[Designer Louise Kim]";
+ mes "Cone shaped red Santa hat is too ordinary.";
+ mes "It's old fashioned.";
+ mes "Maybe in 1980's?!";
+ mes "Haha~";
+ next;
+ mes "[Designer Louise Kim]";
+ mes "If you leave it on me,";
+ mes "I'll change it to lastest model.";
+ mes "You know what I mean~!";
+ next;
+ mes "[Designer Louise Kim]";
+ mes "You know Antonio's hat,right?";
+ mes "Guess who made it?";
+ mes "As you know, Antonio is hard to catch,";
+ mes "that's because I blowed some power in the hat. ";
+ mes "";
+ next;
+ mes "[Designer Louise Kim]";
+ mes "If you don't like your hat,";
+ mes "bring it to me.";
+ mes "I'll change it to brand new one.";
+ mes "Stylish Louise's hat.";
+ mes "";
+ emotion e_lv;
+ next;
+ if(countitem(2236) > 0) {
+ if (select("Here.:It's ok.") == 1) {
+ mes "[Designer Louise Kim]";
+ mes "Nice choice!!";
+ mes "If I do it like this ...";
+ mes "and this and...";
+ mes "finally it'll turn into fantastic hat.";
+ mes "But before that,I need some materials to make with.";
+ next;
+ if (select("What are the materials?:So what? I don't want to know.") == 1) {
+ mes "[Designer Louise Kim]";
+ mes "Well, nothing special.";
+ mes "Basically, you need Santa's hat of course.";
+ mes "and with a touch of my magical fingers,";
+ mes "it'll just turn into very special thing.";
+ mes "Well,just little bit prettier and";
+ mes "little bit more practical. Haha...";
+ next;
+ mes "[Designer Louise Kim]";
+ mes "Anyway,to sum up,required materials are....";
+ mes "Basically ^0000FFSanta's Hat^000000 and";
+ mes " ^0000FF 1 Cactus Needle ^000000 for sewing, ";
+ mes "^0000FF 10 Holy Water ^000000 for blessing, ";
+ mes "^0000FF 1 Rosary ^000000 for luckiness.";
+ mes "It's pretty enough to make Louise Hat.";
+ next;
+ if (countitem(952) > 0 && countitem(523) > 9 && countitem(2608) > 0) {
+ select("Here you are.....");
+ mes "[Designer Louise Kim]";
+ mes "Wow~~!! So fast!!";
+ mes "I like your style~.";
+ mes "Ok!! If everything is ready, no need to hesitate.";
+ mes "I'll show you what Designer Louise Kim's power is.";
+ emotion e_no1;
+ next;
+ mes "-She puts the hat in a bucket -";
+ mes "-filled with Holy Water.-";
+ mes "-She rapidly takes it out and starts mending the hat-";
+ mes "-humming a tune.-";
+ next;
+ mes "[Designer Louise Kim]";
+ mes "~With the number one designer, Louise Kim,~";
+ mes "~you are the most blessed soul.~";
+ emotion e_ho;
+ misceffect EF_BLESSING;
+ next;
+ mes "-Immediately, she puts Rosary in an-";
+ mes "-unknown liquid and dissolves it.-";
+ mes "-And with a brush,-";
+ mes "-neatly coats the liquid on -";
+ mes "-a thread of the hat.-";
+ next;
+ mes "[Designer Louise Kim]";
+ mes "~With the number one designer, Louise Kim,~";
+ mes "~you are the luckiest soul.~";
+ emotion e_ho;
+ misceffect EF_GLORIA;
+ next;
+ mes "-She starts sewing the hat with -";
+ mes "-a Cactus Needle and a thread.-";
+ mes " ";
+ next;
+ mes "[Designer Louise Kim]";
+ mes "~This is called the Louise's miracle.~";
+ mes "~The most talented disigner,~";
+ mes "~L_O_U_I_S_E K_I_M~";
+ emotion e_lv;
+ misceffect EF_BENEDICTIO;
+ next;
+ mes "[Designer Louise Kim]";
+ mes "Here!! All done~~";
+ mes "How do you like it?";
+ mes "Isn't it so wonderful?";
+ mes "Take it!! It's a gift.";
+ next;
+ mes "[Designer Louise Kim]";
+ mes "I should have called high price for it";
+ mes "but as you know it's Christmas!";
+ mes "It's a gift for you!";
+ mes "I won't charge anything.";
+ mes "Just tell many people how good it is.";
+ emotion e_heh;
+ next;
+ mes "[Designer Louise Kim]";
+ mes "Wherever you go,";
+ mes "whatever you do,";
+ mes "never take off the hat.";
+ mes "You won't have a chance to buy it";
+ mes "no matter how much you pay.";
+ next;
+ mes "[Designer Louise Kim]";
+ mes "Alright~Go ahead~";
+ mes "Go brag yourself!";
+ mes "~Who would be happier than~";
+ mes "~being with Louise.~";
+ emotion e_ho;
+ delitem 2236,1; //Santa's_Hat
+ delitem 952,1; //Cactus_Needle
+ delitem 523,10; //Holy_Water
+ delitem 2608,1; //Rosary
+ getitem 5136,1; //Santa's_Hat_
+ close;
+ }
+ else {
+ mes "[Designer Louise Kim]";
+ mes "Come on~If you just get me the materials,";
+ mes "I won't chage anything,";
+ mes "Call me if you change your mind.";
+ emotion e_lv;
+ close;
+ }
+ }
+ mes "[Designer Louise Kim]";
+ mes "You'll regret!";
+ mes "Think again!";
+ emotion e_heh;
+ close;
+ }
+ mes "[Designer Louise Kim]";
+ mes "Ok~ whatever~";
+ mes "It's not me,";
+ mes "who's going to lose whose own luck.";
+ emotion e_heh;
+ close;
+ }
+ else {
+ mes "[Designer Louise Kim]";
+ mes "Perhaps you get the chance to acheive Santa's Hat later some time,";
+ mes "think about it carefully.";
+ mes "You can get the better designed hat,";
+ mes "and I can show off my talent.";
+ mes "";
+ emotion e_heh;
+ close;
+ }
+}
+
+// Enjoy Happymerry Chistmas Event (Event 2)
+prontera,155,285,3 script Enjoy#enjoy 753,{
+ if (!christ_solo05){
+ mes "[Enjoy]";
+ mes "Oh~~~";
+ mes "It's already winter again~~!";
+ mes "This chilling weather makes";
+ mes "my body freeze~";
+ mes "And also makes my heart freeze.";
+ mes "Who said that christmas is only for lovers~";
+ mes "Oh~~I'm so lonely~!!!";
+ next;
+ mes "[Enjoy]";
+ mes "Pitiless sister!!";
+ mes "How can she leave me alone on a christmas day~";
+ mes "'Spend your days with family on a chirstmas day'";
+ mes "is our family precept";
+ mes "Hm...I need to get some rest.";
+ mes "I'm so nervous these days~";
+ next;
+ mes "[Enjoy]";
+ mes "Lets make a joyful christmas for ";
+ mes "lonely singles.";
+ mes "Who's with me?!!";
+ mes "!!!!!!!!!!!";
+ mes "!!!!!!!!!!!!!";
+ next;
+ switch(select("Wow!:Hm...I'm not interested.:I have ~")){
+ case 1:
+ mes "[Enjoy]";
+ mes "Alright~~!!!";
+ mes "Let's rock and roll!!";
+ mes "Here's my plan!!";
+ mes "Let's punish those couples";
+ mes "who are so excited about christmas.";
+ mes "I just don't want to see them happy.";
+ next;
+ mes "[Enjoy]";
+ mes "To put in action,";
+ mes "we need to gather many phalanges.";
+ mes "Ok!!Bring our phalanges in every town on a way back here. ";
+ mes "Alright?Let's go!!";
+ next;
+ mes "[Enjoy]";
+ mes "Each should have one person's phone number.";
+ mes "We must keep it secret before we put in action.";
+ mes "So we must be very careful.";
+ mes "Well...";
+ mes "I know ^0000FFHappymerry^000000's phone number.";
+ next;
+ mes "[Enjoy]";
+ mes "First of all, go look for ^0000FFHappymerry^000000";
+ mes "and tell him about our plan.";
+ mes "On a way back, bring as many phalanges as you can. ";
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "Alright,sir!!!";
+ next;
+ mes "[Enjoy]";
+ mes "Oh,and don't forget to bring";
+ mes "5 branch of dead trees!!!";
+ mes "Must bring item to attack town~";
+ mes "hahahaha~~";
+ emotion e_gg;
+ next;
+ mes "[Enjoy]";
+ mes "Get it?!!!!";
+ mes "Let's go punish!!!";
+ mes "We are not being jealous,";
+ mes "It's just not right leading a loose life!";
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "Let's punish!!!!!!!!!!!!!!!!!!!!!!!!!!!";
+ set christ_solo05,1;
+ close;
+ case 2:
+ mes "[Enjoy]";
+ mes "If you are not with me, get away~!!";
+ mes "Get out of my sight!!!!";
+ mes "";
+ close;
+ case 3:
+ mes "[Enjoy]";
+ mes "......";
+ specialeffect EF_BLESSING;
+ next;
+ mes "[Enjoy]";
+ mes ".............";
+ specialeffect EF_INCAGIDEX;
+ next;
+ mes "[Enjoy]";
+ mes "........................";
+ specialeffect EF_STEELBODY;
+ next;
+ mes "[Enjoy]";
+ mes "........................";
+ mes "Get lost,you devil!!!!!!";
+ specialeffect EF_BEGINASURA;
+ specialeffect2 EF_HIT2;
+ set Hp,Hp/2;
+ set Hp,Hp/2;
+ close2;
+ warp "prontera",155,230;
+ end;
+ }
+ }
+ else if((christ_solo05 > 0) && (christ_solo05 < 5)){
+ mes "[Enjoy]";
+ mes "Each should have one person's phone number.";
+ mes "We must keep it secret before we put in action.";
+ mes "So we must be very careful.";
+ mes "Well...";
+ mes "I know ^0000FFHappymerry^000000's phone number.";
+ next;
+ mes "[Enjoy]";
+ mes "First of all, go look for ^0000FFHappymerry^000000";
+ mes "and tell him about our plan.";
+ mes "On a way back, bring as many phalanges as you can.";
+ next;
+ mes "[Enjoy]";
+ mes "Oh,and don't forget to bring";
+ mes "5 branch of dead trees!!!";
+ mes "Let's go punish couples!!!";
+ close;
+ }
+ else if (christ_solo05 == 5) {
+ if (countitem(604) > 4){
+ mes "[Enjoy]";
+ mes "Did you do as I told you to do?!!!";
+ mes "Did you bring branch of dead trees?Let me see~~!!";
+ next;
+ mes "[Enjoy]";
+ mes "Fine!!";
+ mes "You are all ready!!!";
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "Wait!!";
+ mes "Where's other people??";
+ next;
+ mes "[Enjoy]";
+ mes "What are you talking about?!";
+ mes "They are already here.......";
+ next;
+ mes "[Enjoy]";
+ mes "Can't you see?!";
+ mes "Please~!!!!Are you ok?!!!";
+ donpcevent "Happymerry#happymerry02::OnCommandOn";
+ donpcevent "Christ#christ02::OnCommandOn";
+ donpcevent "Mas#mas02::OnCommandOn";
+ donpcevent "Event#event02::OnCommandOn";
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "Oh.. Yup!!!";
+ next;
+ mes "[Enjoy]";
+ mes "Welcome!! Welcome,my phalanges!!!";
+ mes "Being a single is not a sin.";
+ mes "Why do we have to hide ourselves from ";
+ mes "their sight!";
+ mes "I hate couples!!";
+ mes "Poor single!!";
+ next;
+ mes "[Enjoy]";
+ mes "For those of who have friend who just met his/her mate,";
+ mes "or who had to turn his/her back from kissing couples!!";
+ mes "What are you waiting for!!";
+ mes "Why do we have to be the victim!!";
+ mes "";
+ next;
+ mes "[Enjoy]";
+ mes "It's christmas season again!!";
+ mes "";
+ next;
+ mes "[Enjoy]";
+ mes "Are we the soldiers";
+ mes "who have beaten up monsters with our bare hand.";
+ mes "Don't you remember the days?!!We have jumped down from Air ship!!";
+ mes "We are well trained singles!!Haha~!";
+ next;
+ mes "[Enjoy]";
+ mes "We don't have to wipe our tears";
+ mes "looking at party players anymore.";
+ mes "No need to envy!!";
+ mes "This christmas is for singles!! ";
+ mes "Yahoo~";
+ mes "";
+ next;
+ mes "[All]";
+ mes "Christmas for singles!!!";
+ mes "No more envy!!No more sorrow!!No more anger!!!";
+ mes "Christmas for singles!!!";
+ next;
+ mes "-Enjoy takes away branches of dead trees.";
+ mes "-Grabs them tight.-";
+ next;
+ mes "[Enjoy]";
+ mes "Let's punish couples,";
+ mes "those of who leading a loose life!!";
+ mes " ";
+ mes "[All]";
+ mes "Let's punish!!!!!";
+ emotion e_go;
+ emotion e_go,1;
+ donpcevent "Happymerry#happymerry02::OnCommandEmotion";
+ donpcevent "Christ#christ02::OnCommandEmotion";
+ donpcevent "Mas#mas02::OnCommandEmotion";
+ donpcevent "Event#event02::OnCommandEmotion";
+ misceffect 376; //_HITLINE2
+ delitem 604,5; //Branch_of_Dead_Tree
+ set christ_solo05,6;
+ donpcevent "Happymerry#happymerry02::OnCommandOff";
+ donpcevent "Christ#christ02::OnCommandOff";
+ donpcevent "Mas#mas02::OnCommandOff";
+ donpcevent "Event#event02::OnCommandOff";
+ close2;
+ mapannounce "prontera", "Single soldiers "+ strcharinfo(0) +"'s sorrow spread all over the town.",bc_map,0x66FFCC;
+ monster "prontera",155,300,""+ strcharinfo(0) +"'s anguish",1062,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",156,300,""+ strcharinfo(0) +"'s jealousy",1062,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",157,300,""+ strcharinfo(0) +"'s despair",1062,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",158,300,""+ strcharinfo(0) +"'s frustration",1062,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",154,300,""+ strcharinfo(0) +"'s bombing",1062,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",158,299,""+ strcharinfo(0) +"'s grudge",1246,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",157,299,""+ strcharinfo(0) +"'s curse",1246,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",156,299,""+ strcharinfo(0) +"'s anger",1246,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",155,299,""+ strcharinfo(0) +"'s grief",1246,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",154,299,""+ strcharinfo(0) +"'s hatred",1246,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",158,298,""+ strcharinfo(0) +"'s a bitter taste of solo",1245,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",157,298,""+ strcharinfo(0) +"'s couple punisher",1245,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",156,298,""+ strcharinfo(0) +"'s loneliness",1245,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",155,298,""+ strcharinfo(0) +"'s sobbing",1245,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",154,298,""+ strcharinfo(0) +"'s darkness",1245,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",158,297,""+ strcharinfo(0) +"'s depression",1244,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",157,297,""+ strcharinfo(0) +"'s estrangement",1244,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",156,297,""+ strcharinfo(0) +"'s nightmare",1244,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",155,297,""+ strcharinfo(0) +"'s wail",1244,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",154,297,""+ strcharinfo(0) +"'s whisper",1244,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",158,296,""+ strcharinfo(0) +"'s regret",1588,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",157,296,""+ strcharinfo(0) +"'s shadow",1588,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",156,296,""+ strcharinfo(0) +"'s couplebreaker",1588,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",155,296,""+ strcharinfo(0) +"'s sadness",1588,1,"Enjoy#enjoy::OnMyMobDead";
+ monster "prontera",154,296,""+ strcharinfo(0) +"'s symbol of brokenheart",1588,1,"Enjoy#enjoy::OnMyMobDead";
+ donpcevent "Enjoy#enjoy::OnCommandGo";
+ end;
+ }
+ else {
+ mes "[Enjoy]";
+ mes "There's no much time left!!!";
+ mes "No time to hesitate!!";
+ mes "Couples will enjoy their christmas day";
+ mes "so happily.";
+ mes "Are you going to leave them like that!!!!!";
+ mes "Let's go let's go!!";
+ mes "Go get ^0000FF 5 branch of dead tree^000000s!!!";
+ close;
+ }
+ }
+ else {
+ mes "[Enjoy]";
+ mes "Hm.... ";
+ mes "It's no use just blaming oneself!";
+ mes "We lonely fellows can build our own hopeful future.";
+ mes "Let's go!!";
+ mes "Let's go phalanges!!!";
+ next;
+ mes "[Enjoy]";
+ mes "For the day we all get happy~!!";
+ mes "Let's go for it!!!";
+ mes "Cheer up everybody!!!";
+ mes "Let's rock till you get happy~!";
+ mes "";
+ set christ_solo05,0;
+ close;
+ }
+
+OnMyMobDead:
+ end;
+
+OnCommandGo:
+ disablenpc "Enjoy#enjoy";
+ initnpctimer;
+ end;
+
+OnCommandStop:
+ enablenpc "Enjoy#enjoy";
+ killmonster "prontera","Enjoy#enjoy::OnMyMobDead";
+ stopnpctimer;
+ end;
+
+OnTimer3000:
+ mapannounce "prontera", "You must refine by yourself to satisfy!!!!",bc_map,0x66FFCC;
+ end;
+
+OnTimer5000:
+ mapannounce "prontera", "It's a waste to organize party at dungeon!!!",bc_map,0x66FFCC;
+ end;
+
+OnTimer7000:
+ mapannounce "prontera", "There is a NPC flirting me!!!",bc_map,0x66FFCC;
+ end;
+
+OnTimer9000:
+ mapannounce "prontera", "I was always alone from the day I was born!!",bc_map,0x66FFCC;
+ end;
+
+OnTimer11000:
+ mapannounce "prontera", "We dig herbs even on a christmas day!!",bc_map,0x66FFCC;
+ end;
+
+OnTimer13000:
+ mapannounce "prontera", "...We are the insuperable single soldiers!!!",bc_map,0x66FFCC;
+ end;
+
+OnTimer180000:
+ mapannounce "prontera", "Wish every single soldiers have a merry christmas!!",bc_map,0x66FFCC;
+ donpcevent "Enjoy#enjoy::OnCommandStop";
+ end;
+}
+
+prontera,150,286,5 script Happymerry#happymerry02 869,{
+ end;
+
+OnInit:
+ disablenpc "Happymerry#happymerry02";
+ stopnpctimer;
+ end;
+
+OnCommandOn:
+ initnpctimer;
+ enablenpc "Happymerry#happymerry02";
+OnCommandEmotion:
+ emotion e_go;
+ end;
+
+OnCommandOff:
+ disablenpc "Happymerry#happymerry02";
+ stopnpctimer;
+ end;
+
+OnTimer60000:
+ donpcevent "Happymerry#happymerry02::OnCommandOff";
+ donpcevent "Christ#christ02::OnCommandOff";
+ donpcevent "Mas#mas02::OnCommandOff";
+ donpcevent "Event#event02::OnCommandOff";
+ stopnpctimer;
+ end;
+}
+
+prontera,161,286,4 script Christ#christ02 875,{
+ end;
+OnInit:
+ disablenpc "Christ#christ02";
+ end;
+
+OnCommandOn:
+ enablenpc "Christ#christ02";
+OnCommandEmotion:
+ emotion e_go;
+ end;
+
+OnCommandOff:
+ disablenpc "Christ#christ02";
+ end;
+}
+
+prontera,161,281,1 script Mas#mas02 748,{
+ end;
+OnInit:
+ disablenpc "Mas#mas02";
+ end;
+
+OnCommandOn:
+ enablenpc "Mas#mas02";
+OnCommandEmotion:
+ emotion e_go;
+ end;
+
+OnCommandOff:
+ disablenpc "Mas#mas02";
+ end;
+}
+
+prontera,150,281,7 script Event#event02 881,{
+ end;
+OnInit:
+ disablenpc "Event#event02";
+ end;
+
+OnCommandOn:
+ enablenpc "Event#event02";
+OnCommandEmotion:
+ emotion e_go;
+ end;
+
+OnCommandOff:
+ disablenpc "Event#event02";
+ end;
+}
+
+prontera,188,177,4 script Happymerry#happymerry 869,{
+ if (christ_solo05==1) {
+ mes "[Happymerry]";
+ mes "Holgren~~!!";
+ mes "I've never expected you betraying me! Don't wanna get refined~!!!";
+ mes "I hate christmas~!";
+ emotion e_sob;
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "Are...you...?";
+ next;
+ mes "[Happymerry]";
+ mes "What are you laughing at? huh~!";
+ mes "At least, I never borrowed a hand";
+ mes "to get my equips refined!";
+ mes "I was always brave!!";
+ mes "Blessing? Gloria~~?!";
+ mes "Couples~~duh~!!!!!!";
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "You seem to be the right one!!!";
+ mes "Enjoy is waiting for you.";
+ mes "let's go!!!";
+ next;
+ mes "[Happymerry]";
+ mes "...!";
+ mes "The day has come?";
+ mes "He help me last christmas,";
+ mes "when I failed refining my equips.";
+ mes "Oh, holy Enjoy~";
+ mes "";
+ next;
+ mes "[Happymerry]";
+ mes "Alright!I've been waiting for a year!!";
+ mes "I'm ready to mess up christmas day~!!";
+ mes "So,where is Enjoy?";
+ mes "Where is he?!";
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "He's waiting for you!";
+ mes "Go ahead~";
+ mes "I'll follow you after contacting others.";
+ mes "";
+ next;
+ mes "[Happymerry]";
+ mes "Alright!";
+ mes "I was supposed to call ^0000FFChrist^000000!";
+ mes "Call him for me!";
+ mes "I'll go ahead with my bags packed up.";
+ mes "See ya!";
+ set christ_solo05,2;
+ close;
+ }
+ else if (christ_solo05 > 1) {
+ mes "[Happymerry]";
+ mes "Hm...There's more things to pack up than I thought.";
+ mes "Well,it's been a year.....";
+ mes "Anyway,";
+ mes "Don't for get to call ^0000FFChrist^000000!";
+ mes "See ya!";
+ close;
+ }
+ else {
+ mes "[Happymerry]";
+ mes "Holgren!!";
+ mes "I've never expected you betraying me! Don't wanna get refined~!!!";
+ mes "I hate christmas~!";
+ emotion e_sob;
+ next;
+ mes "[Happymerry]";
+ mes "What are you laughing at? huh~!";
+ mes "At least, I never borrowed a hand";
+ mes "to get my equips refined!";
+ mes "I was always brave!!";
+ mes "Blessing? Gloria~~?!";
+ mes "Couples~~duh~!!!!!!";
+ close;
+ }
+}
+
+prontera,62,339,3 script Christ#christ 875,{
+ if (christ_solo05 == 2) {
+ mes "[Christ]";
+ mes "Now~finally!!!";
+ mes "I get to ride Pecopeco~!";
+ mes "Why do need to organize a party with priest?!";
+ mes "I don't need all that.";
+ mes "Only thing I need is this chubby Pecopeco~!";
+ mes "";
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "Um...";
+ next;
+ mes "[Christ]";
+ mes "Who are you!";
+ mes "Don't ever think to get around my Peco~!";
+ mes "Oh~my sweat Peco~~Weren't you scared? It's ok darling.";
+ mes "Enjoy was all alone lonely from the day he were born~";
+ mes "But me?!! Nope!!";
+ mes "I have my sweat peco with me!!";
+ next;
+ mes "[Christ]";
+ mes "I'm going to held party with my peco.";
+ mes "We'll share christmas cake together and.....";
+ mes "I'm not gonna be lonely~";
+ mes "No I won't!!!";
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "Actually Enjoy told me...";
+ next;
+ mes "[Christ]";
+ mes "Huh? What did you say?";
+ mes "Enjoy? You know him? Then,you must be the one whom Happymerry sent!?";
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "Yes~ Happymerry sent me...";
+ next;
+ mes "[Christ]";
+ mes "Finally, the day has come!!";
+ mes "Did you hear it? Peco~";
+ mes "...We have an amazing plan!";
+ mes "This christmas is gonna be fantastic!!";
+ mes "No need to envy couples!!";
+ next;
+ mes "[Christ]";
+ mes "Alright!!";
+ mes "I'll run to Enjoy with my peco~!";
+ mes "Go tell ^0000FFMas^000000";
+ mes "about this!!!";
+ mes "See ya~~!";
+ set christ_solo05,3;
+ close;
+ }
+ else if(christ_solo05 > 2) {
+ mes "[Christ]";
+ mes "Than,see you there!!";
+ mes "I'll go meet Enjoy!";
+ mes "Never forget to tell ^0000FFMas^000000";
+ mes "about this!!!";
+ mes "See ya~~!";
+ close;
+ }
+ else {
+ mes "[Christ]";
+ mes "Now~finally!!!";
+ mes "I get to ride Pecopeco~!";
+ mes "Why do need to organize a party with priest?!";
+ mes "I don't need all that.";
+ mes "Only thing I need is this chubby Pecopeco~!";
+ mes "";
+ next;
+ mes "[Christ]";
+ mes "Who are you!";
+ mes "Don't ever think to get around my Peco~!";
+ mes "Oh~my sweat Peco~~Weren't you scared?It's ok darling.";
+ mes "Enjoy was all alone lonely from the day he were born~";
+ mes "But me?!!Nope!!";
+ mes "I have my sweat peco with me!!";
+ next;
+ mes "[Christ]";
+ mes "I'm going to held party with my peco.";
+ mes "We'll share christmas cake together and.....";
+ mes "I'm not gonna be lonely~";
+ mes "No I won't!!!";
+ close;
+ }
+}
+
+prontera,163,66,7 script Mas#mas 748,{
+ if(christ_solo05 == 3) {
+ mes "[Mas]";
+ mes "Herds!!!!!How long does it take!";
+ mes "Somebody know the regenerating time of Herb?!!";
+ mes "I'll dig herbs and make potions and sell it to singles!!";
+ mes "Hahahaha!!";
+ next;
+ mes "[Mas]";
+ mes "Ah~~";
+ mes "How come I feel so empty~.";
+ mes "although I have herds fill in a storage. ";
+ mes "No~~!!!!!!";
+ mes "No time to waste~~";
+ mes "Let's dig herbs.......";
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "Hey~are you ok? Are you Mas?";
+ next;
+ mes "[Mas]";
+ mes "Who...who are you?!!!";
+ mes "Well, it's been so long since I spoke to a stranger.";
+ mes "Hm...";
+ mes "I feel something warm inside my heart....... ";
+ mes "Never mind!! What am I thinking?!!";
+ mes "Get away~I have dig herbs~";
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "Mas!!";
+ mes "Are you ok?!";
+ mes "Christ sent me.";
+ next;
+ mes "[Mas]";
+ mes "What!!!Already!!";
+ mes "Yeah~right!";
+ mes "I don't need to spend times digging herbs!!";
+ mes "If Enjoy made an order!?!";
+ mes "I'll be there right away~!!!!!";
+ next;
+ mes "[Mas]";
+ mes "...Are going with me?";
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "No~~";
+ mes "I have something left to do.";
+ mes "I have to tell others about this.";
+ next;
+ mes "[Mas]";
+ mes "Oh yeah right!!!";
+ mes "Go look for ^0000FFEvent^000000.";
+ mes "Well,bye~.";
+ mes "I'll meet you there!!...";
+ mes "Herbs~?! Couples?! Whatever~~";
+ set christ_solo05,4;
+ close;
+ }
+ else if(christ_solo05 > 3) {
+ mes "[Mas]";
+ mes "If you excuse me, I'll go ahead and meat Enjoy.";
+ mes "And don't forget to tell ^0000FFEvent^000000 about this.";
+ mes "Herbs~couples~~Whatever~~";
+ mes "This christmas is gonna be fantastic!!";
+ mes "Hahahaha~";
+ close;
+ }
+ else {
+ mes "[Mas]";
+ mes "Herds!!!!!How long does it take!";
+ mes "Somebody know the regenerating time of Herb?!!";
+ mes "I'll dig herbs and make potions and sell it to singles!!";
+ mes "Hahahaha!!";
+ next;
+ mes "Ah~~";
+ mes "How come I feel so empty~.";
+ mes "although I have herds fill in a storage. ";
+ mes "No~~!!!!!!";
+ mes "No time to waste~~";
+ mes "Let's dig herbs.......";
+ close;
+ }
+}
+
+prontera,35,209,5 script Event#event 881,{
+ if(christ_solo05 == 4) {
+ mes "[Event]";
+ mes "........................";
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "...Are... you...?";
+ next;
+ mes "[Event]";
+ mes "...I love you too~!!!";
+ emotion e_omg,1;
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "(Oh,my..)";
+ next;
+ mes "[Event]";
+ mes "It's ok, Tinybee. I'm not lonely at all.";
+ mes "I have Ms.Bathory and Ms.Orclady with me.";
+ mes "Hahahaha~~~";
+ mes "";
+ next;
+ mes "-He laughed talking to his right hand.-";
+ mes "";
+ //Emotion "Event#event" ET_KIK
+ emotion e_kis;
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "Mas sent me here.";
+ mes "You know about Enjoy's plan, right?";
+ mes "...Are you listening?";
+ next;
+ mes "[Event]";
+ mes "...Did you hear?? Tinybee?";
+ mes "The day has come!!";
+ mes "Hahaha~~~~.";
+ next;
+ mes "[Event]";
+ mes "Wait for me miss Kafra~~~";
+ mes "Don't be so lonely~.";
+ mes "I'll make your christmas unforgettably fantastic.";
+ mes "Let's go Tinybee.";
+ mes "";
+ next;
+ mes "-He kept talking to his right hand-";
+ mes "-and packed his stuff and bowed to Kafra.-";
+ mes "";
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "Finally!!! Done telling everyone!!";
+ mes "Now I should get my ^0000FFBranch of Dead Tree^000000s packed up";
+ mes "and go punish singles!!!";
+ mes "Hahahaha..";
+ set christ_solo05,5;
+ close;
+ }
+ else if(christ_solo05 > 4) {
+ mes "[Event]";
+ mes "Wait for me miss Kafra~~~";
+ mes "Don't be so lonely~.";
+ mes "I'll make your christmas unforgettably fantastic.";
+ mes "Let's go Tinybee.";
+ next;
+ mes "-He talked to his right hand-";
+ mes "-and packed his stuff and bowed to Kafra.-";
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "Finally!!! Done telling everyone!!";
+ mes "Now I should get my things packed up";
+ mes "and go punish singles!!!";
+ mes "Hahahaha..";
+ close;
+ }
+ else {
+ mes "[Event]";
+ mes "........................";
+ next;
+ mes "[Event]";
+ mes "...I love you too~!!!";
+ emotion e_omg,1;
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "(Oh.my~)";
+ next;
+ mes "[Event]";
+ mes "It's ok Tinybee.I'm not lonely at all.";
+ mes "I have Ms.Bathory and Ms.Orclady with me.";
+ mes "Hahahaha~~~";
+ mes "";
+ next;
+ mes "-He laughed talking to his right hand.-";
+ mes "";
+ emotion e_kis;
+ close;
+ }
+}
+
+// Oholy (Event 3)
+prontera,156,242,0 script Oholy#pron::OholyDup 79,{
+ if (!christ_carol05) {
+ mes "[Oholy]";
+ mes "Joy to the world!";
+ mes "The Lord has come.";
+ specialeffect EF_GLORIA;
+ next;
+ if (Sex) {
+ mes "[Oholy]";
+ mes "Merry Christmas!";
+ mes "Dear brother, what comes in";
+ mes "your mind when you think of Christmas?";
+ next;
+ }
+ else {
+ mes "[Oholy]";
+ mes "Merry Christmas!";
+ mes "Dear sister, what comes in";
+ mes "your mind when you think of Christmas?";
+ next;
+ }
+ switch(select("Santa Claus:Christmas Gifts:Christmas Carols:Santa Hat:I don't like couples")) {
+ case 1:
+ mes "[Oholy]";
+ mes "Santa Claus!";
+ mes "You still have childish";
+ mes "innocence, kid!!!";
+ mes "Hohoho.";
+ next;
+ mes "[Oholy]";
+ mes "There is a rumor that Santa Claus";
+ mes "in the town where Christmas ";
+ mes "never ends. This is just";
+ mes "between you and me, okay?";
+ next;
+ mes "[Oholy]";
+ mes "The latest headline by Oholy";
+ mes "Isn't it amazing?";
+ emotion e_heh;
+ close;
+ case 2:
+ mes "[Oholy]";
+ mes "Gifts! That's nice!";
+ mes "How exciting it is!!!";
+ mes "You wake up and find";
+ mes "christmas gifts next to your pillow!";
+ next;
+ mes "[Oholy]";
+ mes "Have you heard that";
+ mes "bad santa who makes a suprise";
+ mes "attack in every christmas, has";
+ mes "taken Santa Claus's gifts to";
+ mes "good kids!";
+ next;
+ mes "[Oholy]";
+ mes "So, Santa Claus in Christmas";
+ mes "town has offered a reward for";
+ mes "capturing phony Santa, Antonio.";
+ next;
+ mes "[Oholy]";
+ mes "The latest headline by Oholy";
+ mes "Isn't it amazing?";
+ emotion e_heh;
+ close;
+ case 3:
+ mes "[Oholy]";
+ mes "That's right!";
+ mes "Carol is the essential for";
+ mes "Christmas! When I was";
+ mes "young, my mind used to be";
+ mes "fluttered by carols during";
+ mes "Christmas.";
+ next;
+ mes "[Oholy]";
+ mes "But, in these days, not many";
+ mes "people sing Christmas carols";
+ mes "so it is hard to feel that";
+ mes "Christmas is coming closer";
+ mes " ";
+ next;
+ mes "[Oholy]";
+ mes "Therefore, I decided to wish";
+ mes "a merry christmas to everyone";
+ mes "by singing Christmas carols and";
+ mes "giving gifts to kids from door";
+ mes "to door, but, unfortunately,";
+ mes "wicked devil has torn off my carol music book!!!";
+ next;
+ mes "[Oholy]";
+ mes "I have many houses to visit.";
+ mes "I feel so sad for disappointed";
+ mes "kids who didn't hear the carols.";
+ next;
+ menu "...can I help you?",-;
+ mes "[Oholy]";
+ mes "Good gracious! Are you for real?";
+ mes "Oh? Shee... Can you hear it?";
+ mes "Every kids appreciate your kindness.";
+ emotion e_heh;
+ mes "Don't be afraid. I will not";
+ mes "ask you to make a new christmas carol.";
+ next;
+ mes "[Oholy]";
+ mes "If you have a will,";
+ mes "we got no time to waste.";
+ mes "Let's move on to give hope to kids!";
+ next;
+ mes "[Oholy]";
+ mes "Well, please bring me back";
+ mes "Christmas carol music book, "+ strcharinfo(0) +".";
+ mes "That little devil will be still";
+ mes "in the town because it only happened a few minutes ago.";
+ next;
+ mes "[Oholy]";
+ mes "Please be careful because";
+ mes "you are dealing with devil.";
+ mes "Well then, hope you a good luck!!!";
+ mes " ";
+ emotion e_no1;
+ set christ_carol05,1;
+ close;
+ case 4:
+ mes "[Oholy]";
+ mes "A Santa Hat!!";
+ mes "Did you know that the real";
+ mes "Santa Hat is totally different";
+ mes "from the one that monsters";
+ mes "are wearing?! I heard a rumor";
+ mes "that an anonymous designer";
+ mes "in Lutie, made all of those santa hats.";
+ next;
+ mes "[Oholy]";
+ mes "Also, there is another rumor";
+ mes "about phony Santa, Antonio.";
+ mes "He has been chased by many ";
+ mes "adventurers but never been";
+ mes "caught because of his Santa Costume.";
+ next;
+ mes "[Oholy]";
+ mes "Maybe his hat and clothes have";
+ mes "special functions within...";
+ mes "Maybe that anonymous designer";
+ mes "still lives in Lutie. Why don't";
+ mes "you go visit him and ask to";
+ mes "make you a new Santa Hat?";
+ next;
+ mes "[Oholy]";
+ mes "The latest headline by Oholy";
+ mes "Isn't it amazing?";
+ emotion e_heh;
+ close;
+ case 5:
+ mes "[Oholy]";
+ mes "Oh, dear. I was thinking of";
+ mes "the sa.m..e... Oops, ho..hoho.";
+ mes "Oh well, it's not only me. Many";
+ mes "people think of the same in this Christmas.";
+ next;
+ mes "[Oholy]";
+ mes "I heard a strange rumor that";
+ mes "those people are plotting";
+ mes "something in this Christmas.";
+ mes "...hope it goes well(*murmur*)";
+ next;
+ mes "[Oholy]";
+ mes "The latest headline by Oholy";
+ mes "Isn't it amazing?";
+ emotion e_heh;
+ close;
+ }
+ }
+ else if(christ_carol05 == 1) {
+ mes "[Oholy]";
+ mes "He should not be able to escape";
+ mes "from the town. Please find the";
+ mes "devil and bring me back my";
+ mes "Christmas Carol Music Book.";
+ mes "Punish the wicked devil who is ruining Christmas!!!";
+ close;
+ }
+ else if(christ_carol05 == 2) {
+ if(!checkweight(1201,1)) {
+ mes "^3355FFWait a second!";
+ mes "Right now, you're carrying";
+ mes "too many things with you.";
+ mes "Please come back after";
+ mes "using the Kafra Service";
+ mes "to store some of your items.^000000";
+ close;
+ }
+ set .@now_weight,MaxWeight-Weight;
+ if(.@now_weight < 2000) {
+ mes "^3355FFWait a second!";
+ mes "Right now, you're carrying";
+ mes "too many things with you.";
+ mes "Please come back after";
+ mes "using the Kafra Service";
+ mes "to store some of your items.^000000";
+ close;
+ }
+ if (countitem(1097) > 0) {
+ mes "[Oholy]";
+ mes "Oh, my gracious! ";
+ mes "You have brought me the book!";
+ mes "Didn't the devil trouble you?";
+ mes "I'm glad you have return safely.";
+ next;
+ mes "[Oholy]";
+ mes "In return, I'm going to sing";
+ mes "a carol from the music book.";
+ next;
+ mes "[Oholy]";
+ mes "Hum! Huum!!";
+ mes "~Sleep well, little children,~";
+ mes "~wherever you are;~";
+ mes "~Tomorrow is Christmas~";
+ mes "~beneath every star.~";
+ specialeffect EF_GLORIA;
+ next;
+ mes "-Your mind is overwhelmed by her singing-";
+ mes "-You started humming then,-";
+ mes "-began to sing the next phase-";
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "~Soon the snowflackes will fall~";
+ mes "~and tomorrow you'll see~";
+ mes "~Every wish, one and all,~";
+ mes "~waiting under the tree.~";
+ specialeffect2 EF_GLORIA;
+ next;
+ mes "[Oholy]";
+ mes "Oh, my. You have a wonderful";
+ mes "voice!! Alright!!!";
+ mes "I was going to give these";
+ mes "to kids, but, since you found";
+ mes "my music book and sang a carol to me!";
+ next;
+ mes "-She brought a big sack-";
+ mes "-and opened it in front of you-";
+ next;
+ mes "[Oholy]";
+ mes "OK! Don't look inside.";
+ mes "Just put your hands";
+ mes "grab what you want.";
+ next;
+ switch(rand(1,15)) {
+ case 1:
+ mes "[Oholy]";
+ mes "A Cookie Bag!";
+ mes "I wrapped those indivisually.";
+ mes "There are many sweets in them.";
+ mes "Merry Christmas!";
+ emotion e_heh;
+ delitem 1097,1;//Worn_Out_Page
+ set christ_carol05,3;
+ getitem 12130,7;//Cookie_Bag
+ close;
+ case 2:
+ mes "[Oholy]";
+ mes "Candies!";
+ mes "These were made by";
+ mes "Chief noun.";
+ mes "Very sweet and delicious.";
+ mes "Merry Christmas!";
+ emotion e_heh;
+ delitem 1097,1;//Worn_Out_Page
+ set christ_carol05,3;
+ getitem 529,20;//Candy
+ close;
+ case 3:
+ mes "[Oholy]";
+ mes "Candy Canes!";
+ mes "These were made by";
+ mes "Chief noun.";
+ mes "Very sweet and delicious.";
+ mes "Merry Christmas!";
+ emotion e_heh;
+ delitem 1097,1;//Worn_Out_Page
+ set christ_carol05,3;
+ getitem 530,15;//Candy_Striper
+ close;
+ case 4:
+ mes "[Oholy]";
+ mes "A Piece Of Cake!";
+ mes "These were baked by";
+ mes "Chief Acolyte.";
+ mes "Very soft and delicious.";
+ mes "Merry Christmas!";
+ emotion e_heh;
+ delitem 1097,1;//Worn_Out_Page
+ set christ_carol05,3;
+ getitem 539,5;//Piece_of_Cake
+ close;
+ case 5:
+ mes "[Oholy]";
+ mes "Cookies!";
+ mes "These were baked by";
+ mes "Chief Acolyte.";
+ mes "Very crispy and delicious.";
+ mes "Merry Christmas!";
+ emotion e_heh;
+ delitem 1097,1;//Worn_Out_Page
+ set christ_carol05,3;
+ getitem 538,10;//Well_baked_Cookie
+ close;
+ case 6:
+ mes "[Oholy]";
+ mes "A Spore Doll!";
+ mes "It's made elaborately by";
+ mes "Bishop, Tomas.";
+ mes "Very cute.";
+ mes "Merry Christmas!";
+ emotion e_heh;
+ delitem 1097,1;//Worn_Out_Page
+ set christ_carol05,3;
+ getitem 743,1;//Spore_Doll
+ close;
+ case 7:
+ mes "[Oholy]";
+ mes "A Baphomet Doll!";
+ mes "..........?!..........";
+ mes "How did it get in here..?!";
+ mes "Oops, oh well.";
+ mes "Merry Christmas!";
+ emotion e_heh;
+ delitem 1097,1;//Worn_Out_Page
+ set christ_carol05,3;
+ getitem 750,1;//Baphomet_Doll
+ close;
+ case 8:
+ mes "[Oholy]";
+ mes "A Osiris Doll!";
+ mes "..........?!..........";
+ mes "How did it get in here..?!";
+ mes "Oops, oh well.";
+ mes "Merry Christmas!";
+ emotion e_heh;
+ delitem 1097,1;//Worn_Out_Page
+ set christ_carol05,3;
+ getitem 751,1;//Osiris_Doll
+ close;
+ case 9:
+ mes "[Oholy]";
+ mes "A Rocker Doll!";
+ mes "This was donated by";
+ mes "a knight, Lighten.";
+ mes "Very kind of him.";
+ mes "Merry Christmas!";
+ emotion e_heh;
+ delitem 1097,1;//Worn_Out_Page
+ set christ_carol05,3;
+ getitem 752,1;//Grasshopper_Doll
+ close;
+
+ case 10:
+ mes "[Oholy]";
+ mes "A Yoyo Doll!";
+ mes "This was donated by";
+ mes "an assassin, Marzia.";
+ mes "Very kind of him.";
+ mes "Merry Christmas!";
+ emotion e_heh;
+ delitem 1097,1;//Worn_Out_Page
+ set christ_carol05,3;
+ getitem 753,1;//Monkey_Doll
+ close;
+ case 11:
+ mes "[Oholy]";
+ mes "A Racoon Doll!";
+ mes "This was donated by";
+ mes "a hunter, Raiden Kurs.";
+ mes "Very kind of him.";
+ mes "Merry Christmas!";
+ emotion e_heh;
+ delitem 1097,1;//Worn_Out_Page
+ set christ_carol05,3;
+ getitem 754,1;//Raccoondog_Doll
+ close;
+ case 12:
+ mes "[Oholy]";
+ mes "A Black Cat Doll!";
+ mes "Sister Magareta found the item";
+ mes "from the monster, Loli Ruri.";
+ mes "Very kind of her.";
+ mes "Hope she is doing okay.";
+ mes "Merry Christmas!";
+ emotion e_heh;
+ delitem 1097,1;//Worn_Out_Page
+ set christ_carol05,3;
+ getitem 7206,1;//Black_Kitty_Doll
+ close;
+ case 13:
+ mes "[Oholy]";
+ mes "A Hung Doll!";
+ mes "I made this doll.";
+ mes "Isn't it adorable?!";
+ mes "Merry Christmas!";
+ emotion e_heh;
+ delitem 1097,1;//Worn_Out_Page
+ set christ_carol05,3;
+ getitem 7212,1;//Hanging_Doll
+ close;
+ case 14:
+ mes "[Oholy]";
+ mes "A Munak Doll!";
+ mes "That is from some country";
+ mes "across the ocean.";
+ mes "An artisan made this doll";
+ mes "with his passion.";
+ mes "Merry Christmas!";
+ emotion e_heh;
+ delitem 1097,1;//Worn_Out_Page
+ set christ_carol05,3;
+ getitem 7277,1;//Munak_Doll
+ close;
+ case 15:
+ mes "[Oholy]";
+ mes "A Santa Hat!";
+ mes "This is only produced";
+ mes "during Christmas season.";
+ mes "It is not a common hat.";
+ mes "Merry Christmas!";
+ emotion e_heh;
+ delitem 1097,1;//Worn_Out_Page
+ set christ_carol05,3;
+ getitem 2236,1;//Santa's_Hat
+ close;
+ }
+ }
+ else {
+ mes "[Oholy]";
+ mes "Welcome back!! You look good.";
+ mes "2 arms and 2 legs, you look great.";
+ mes "But, where is my music book?!";
+ close;
+ }
+ }
+ else {
+ mes "[Oholy]";
+ mes "Thank you very much.";
+ mes "People and even Devils are";
+ mes "all excited on Christmas day,";
+ mes "so nobody knows what would";
+ mes "happen. Will you help me";
+ mes "then, won't you? Please~";
+ next;
+ mes "[Oholy]";
+ mes "Let's think about the neighbors";
+ mes "and do a good deed during Christmas!";
+ set christ_carol05,0;
+ close;
+ }
+}
+
+// Deviruchi functions
+function script F_carol_devi {
+ if (christ_carol05 == 1) {
+ mes "[Deviruchi]";
+ mes "Heyhey, human!!";
+ mes "Don't ya wanna sell your";
+ mes "soul and be bound in a beneficial contract with me?";
+ emotion e_kis;
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "Hey, you! Deviruchi!!!";
+ mes "What a brat!!! Gotcha!";
+ next;
+ mes "-You quickly snatched-";
+ mes "-the nape of Deviruchi's neck-";
+ next;
+ switch(rand(1,4)) {
+ case 1:
+ mes "[Deviruchi]";
+ mes "What are you doing!?";
+ mes "Human?";
+ mes "Let go of me...right now!";
+ emotion e_omg;
+ emotion e_omg,1;
+ next;
+ mes "-Deviruchi quickly ran away-";
+ mes "-^4d4dffWhere Deviruchi is gone,-";
+ mes "-there is a worn out paper.^000000-";
+ mes "-Let's read the paper.-";
+ enablenpc getarg(1);
+ disablenpc getarg(0);
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "Rudolph... If... Foggy...";
+ mes "Sledge... Reindeer...";
+ mes "Hmm, I think I got what I need.";
+ mes "Let's go back to Ms.Oholy.";
+ set christ_carol05,2;
+ getitem 1097,1; //Worn_Out_Page
+ close;
+ case 2:
+ mes "[Deviruchi]";
+ mes "What are you doing!?";
+ mes "Human?";
+ mes "Let go of me...right now!";
+ emotion e_omg;
+ emotion e_omg,1;
+ next;
+ mes "-Deviruchi ran away quickly-";
+ mes "-and mumbled something.-";
+ enablenpc getarg(1);
+ disablenpc getarg(0);
+ next;
+ mes "-You are now cursed!!!-";
+ sc_start SC_Curse,5000,0;
+ emotion e_omg,1;
+ close;
+ case 3:
+ mes "[Deviruchi]";
+ mes "What are you doing!?";
+ mes "Human?";
+ mes "Let go of me...right now!";
+ emotion e_omg;
+ emotion e_omg,1;
+ next;
+ mes "-Deviruchi ran away quickly-";
+ mes "-and mumbled something.-";
+ enablenpc getarg(1);
+ disablenpc getarg(0);
+ next;
+ mes "-You are blinded!!!-";
+ sc_start SC_Blind,5000,0;
+ emotion e_omg,1;
+ close;
+ case 4:
+ mes "[Deviruchi]";
+ mes "What are you doing!?";
+ mes "Human?";
+ mes "Let go of me...right now!";
+ emotion e_omg;
+ emotion e_omg,1;
+ next;
+ mes "-Deviruchi ran away quickly-";
+ mes "-and mumbled something.-";
+ enablenpc getarg(1);
+ disablenpc getarg(0);
+ next;
+ mes "-You are poisoned!!!-";
+ sc_start SC_Poison,5000,0;
+ emotion e_omg,1;
+ close;
+ }
+ }
+ else {
+ mes "[Deviruchi]";
+ mes "Heyhey, human!!";
+ mes "Don't ya wanna sell your";
+ mes "soul and be bound in a beneficial contract with me?";
+ emotion e_omg;
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "Hey, you! Deviruchi!!!";
+ mes "What a brat!!! Gotcha!";
+ next;
+ mes "-You quickly snatched-";
+ mes "-the nape of Deviruchi's neck-";
+ next;
+ mes "[Deviruchi]";
+ mes "What are you doing!?";
+ mes "Human?";
+ mes "Let go of me...right now!";
+ emotion e_omg;
+ emotion e_omg,1;
+ next;
+ mes "-Deviruchi ran away quickly-";
+ mes "-and mumbled something.-";
+ mes "-Your body is suddenly floating.-";
+ close2;
+ warp getarg(2),getarg(3),getarg(4);
+ end;
+ }
+}
+
+function script F_carol_devi2 {
+ mes "[Deviruchi]";
+ mes "Heyhey, human!!";
+ mes "Don't ya wanna sell your";
+ mes "soul and be bound in a beneficial contract with me?";
+ emotion e_omg;
+ next;
+ mes "["+ strcharinfo(0) +"]";
+ mes "Hey, you! Deviruchi!!!";
+ mes "What a brat!!! Gotcha!";
+ next;
+ mes "-You quickly snatched-";
+ mes "-the nape of Deviruchi's neck-";
+ next;
+ mes "[Deviruchi]";
+ mes "What are you doing!?";
+ mes "Human?";
+ mes "Let go of me...right now!";
+ emotion e_omg;
+ emotion e_omg,1;
+ next;
+ mes "-Deviruchi ran away quickly-";
+ mes "-and mumbled something.-";
+ mes "-Your body is suddenly floating.-";
+ close2;
+ warp getarg(0),getarg(1),getarg(2);
+ end;
+}
+
+prontera,94,297,3 script Deviruchi#pron_01 738,3,3,{
+ callfunc("F_carol_devi2","prontera",155,230);
+ end;
+
+OnTouch:
+ callfunc("F_carol_devi","Deviruchi#pron_01","Deviruchi#pron_02","prontera",155,230);
+ end;
+}
+
+prontera,205,242,3 script Deviruchi#pron_02 738,3,3,{
+ callfunc("F_carol_devi2","prontera",155,230);
+ end;
+
+OnTouch:
+ callfunc("F_carol_devi","Deviruchi#pron_02","Deviruchi#pron_03","prontera",155,230);
+ end;
+}
+
+prontera,126,118,3 script Deviruchi#pron_03 738,3,3,{
+ callfunc("F_carol_devi2","prontera",155,230);
+ end;
+
+OnTouch:
+ callfunc("F_carol_devi","Deviruchi#pron_03","Deviruchi#pron_01","prontera",155,230);
+ end;
+}
+
+// Payon
+payon,165,153,3 duplicate(OholyDup) Oholy#payon 79
+payon,142,203,3 script Deviruchi#payon_01 738,3,3,{
+ callfunc("F_carol_devi2","payon",166,60);
+ end;
+
+OnTouch:
+ callfunc("F_carol_devi","Deviruchi#payon_01","Deviruchi#payon_02","payon",166,60);
+ end;
+}
+
+payon,248,239,3 script Deviruchi#payon_02 738,3,3,{
+ callfunc("F_carol_devi2","payon",166,60);
+ end;
+
+OnTouch:
+ callfunc("F_carol_devi","Deviruchi#payon_02","Deviruchi#payon_03","payon",166,60);
+ end;
+}
+
+payon,140,56,3 script Deviruchi#payon_03 738,3,3,{
+ callfunc("F_carol_devi2","payon",166,60);
+ end;
+
+OnTouch:
+ callfunc("F_carol_devi","Deviruchi#payon_03","Deviruchi#payon_01","payon",166,60);
+ end;
+}
+
+morocc,161,85,0 duplicate(OholyDup) Oholy#morocc 79
+morocc,52,134,3 script Deviruchi#morocc_01 738,3,3,{
+ callfunc("F_carol_devi2","morocc",160,51);
+ end;
+
+OnTouch:
+ callfunc("F_carol_devi","Deviruchi#morocc_01","Deviruchi#morocc_02","morocc",160,51);
+ end;
+}
+
+morocc,210,264,3 script Deviruchi#morocc_02 738,3,3,{
+ callfunc("F_carol_devi2","morocc",160,51);
+ end;
+
+OnTouch:
+ callfunc("F_carol_devi","Deviruchi#morocc_02","Deviruchi#morocc_03","morocc",160,51);
+ end;
+}
+
+morocc,223,74,3 script Deviruchi#morocc_03 738,3,3,{
+ callfunc("F_carol_devi2","morocc",160,51);
+ end;
+
+OnTouch:
+ callfunc("F_carol_devi","Deviruchi#morocc_03","Deviruchi#morocc_01","morocc",160,51);
+ end;
+}
+
+// Geffen
+geffen,120,188,0 duplicate(OholyDup) Oholy#geffen 79
+geffen,173,163,3 script Deviruchi#geffen_01 738,3,3,{
+ callfunc("F_carol_devi2","geffen",120,34);
+ end;
+
+OnTouch:
+ callfunc("F_carol_devi","Deviruchi#geffen_01","Deviruchi#geffen_02","geffen",120,34);
+ end;
+}
+
+geffen,49,95,3 script Deviruchi#geffen_02 738,3,3,{
+ callfunc("F_carol_devi2","geffen",120,34);
+ end;
+
+OnTouch:
+ callfunc("F_carol_devi","Deviruchi#geffen_02","Deviruchi#geffen_03","geffen",120,34);
+ end;
+}
+
+geffen,111,101,3 script Deviruchi#geffen_03 738,3,3,{
+ callfunc("F_carol_devi2","geffen",120,34);
+ end;
+
+OnTouch:
+ callfunc("F_carol_devi","Deviruchi#geffen_03","Deviruchi#geffen_01","geffen",120,34);
+ end;
+}
+
+// Alberta
+alberta,54,237,0 duplicate(OholyDup) Oholy#alberta 79
+alberta,97,86,3 script Deviruchi#alberta_01 738,3,3,{
+ callfunc("F_carol_devi2","alberta",28,235);
+ end;
+
+OnTouch:
+ callfunc("F_carol_devi","Deviruchi#alberta_01","Deviruchi#alberta_02","alberta",28,235);
+ end;
+}
+
+alberta,180,48,3 script Deviruchi#alberta_02 738,3,3,{
+ callfunc("F_carol_devi2","alberta",28,235);
+ end;
+
+OnTouch:
+ callfunc("F_carol_devi","Deviruchi#alberta_02","Deviruchi#alberta_03","alberta",28,235);
+ end;
+}
+
+alberta,54,132,3 script Deviruchi#alberta_03 738,3,3,{
+ callfunc("F_carol_devi2","alberta",28,235);
+ end;
+
+OnTouch:
+ callfunc("F_carol_devi","Deviruchi#alberta_03","Deviruchi#alberta_01","alberta",28,235);
+ end;
+}
diff --git a/npc/re/events/christmas_2008.txt b/npc/re/events/christmas_2008.txt
new file mode 100644
index 000000000..48c25732f
--- /dev/null
+++ b/npc/re/events/christmas_2008.txt
@@ -0,0 +1,1053 @@
+//===== rAthena Script =======================================
+//= iRO 2008 Christmas Event
+//===== By: ==================================================
+//= Kisuka
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//= iRO Christmas Event. (2008)
+//= Create Music Box and Cake.
+//= Play card game with Santa.
+//= Create Santa Suits.
+//==========================================
+//= Must enable X-mas08 mobs in mob_db2.
+//===== Additional Comments: =================================
+//= 1.0 First version. [Kisuka]
+//= 1.1 Fixed some issues, revamped the whole script. [Kisuka]
+//============================================================
+
+// ============== Caroller - Music Box ================
+// =====================================================
+prontera,226,306,4 script Caroller#iROxmas08 79,{
+ if (iROxmas08carol < 1 || iROxmas08carol == 3) {
+ if (iROxmas08carol == 3) {
+ mes "[Caroller]";
+ mes "Jingle Bells! Jingle Bells! Jingle all the way!";
+ mes "O' what fun it is to ride in a one-horse open sleeeigh, Hey!";
+ next;
+ mes "[Caroller]";
+ mes "Merry Christmas!";
+ mes "Hey! You! What comes to mind when you think about Christmas?";
+ next;
+ }else{
+ mes "[Caroller]";
+ mes "Jingle Bells! Jingle Bells! Jingle all the way!";
+ next;
+ specialeffect EF_GLORIA;
+ mes "[Caroller]";
+ mes "O' what fun it is to ride in a one-horse open sleigh!";
+ next;
+ mes "[Caroller]";
+ 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 "[Caroller]";
+ mes "Santa Claus!";
+ mes "You're so innocent!!";
+ mes "Ah!";
+ next;
+ mes "[Caroller]";
+ mes "Here's a secret!";
+ mes "There's a rumor that Santa Claus lives in a certain village all throughout the year.";
+ next;
+ mes "[Caroller]";
+ mes "But now!!!";
+ mes "In this Christmas season!!";
+ mes "You guys can meet Santa on either of the five possible villages throughout Rune-Midgerts!";
+ next;
+ mes "[Caroller]";
+ mes "If you win over Santa, you can get a gift. Would you go for it?";
+ next;
+ emotion 18;
+ mes "[Caroller]";
+ mes "Caroller's hot news! Ha!";
+ mes "Isn't that big news?";
+ close;
+
+ case 2:
+ mes "[Caroller]";
+ mes "Gift boxes?! All right!";
+ mes "Isn't it thrilling to open gifts over your head!!";
+ next;
+ mes "[Caroller]";
+ mes "Anyway, did you know...";
+ mes "Some villain, a fake Santa robbed some gifts from the good Santa!";
+ next;
+ mes "[Caroller]";
+ mes "Furthermore, he has put bad magic on the gifts so that they become monsters!";
+ next;
+ emotion 18;
+ mes "[Caroller]";
+ mes "Caroller's hot news! Ha!";
+ mes "Isn't it amazing?";
+ close;
+
+ case 3:
+ if (iROxmas08carol == 3) {
+ mes "[Caroller]";
+ mes "Ah, a music box is useful.";
+ next;
+ mes "[Caroller]";
+ mes "Though we can't all play it around the village as we planned, it's cool that you carry it.";
+ next;
+ mes "[Caroller]";
+ mes "We want to enjoy carols all together... I hope to get Crystal Pieces!";
+ next;
+ mes "[Caroller]";
+ mes "If you can get ^0000FFSinging Crystal Pieces^000000, give them to me please?";
+ next;
+ select("Why not? Sure, I can give you some.");
+ if (countitem(6092) < 6) {
+ mes "[Caroller]";
+ mes "Yes, please.";
+ next;
+ mes "[Caroller]";
+ mes "If you can get ^0000FFSinging Crystal Pieces^000000, give them to me please?";
+ close;
+ }else{
+ mes "[Caroller]";
+ mes "Wow, you have them.";
+ next;
+ mes "[Caroller]";
+ mes "I can bake you a cake, and I can carve your name on the cake, if you want!";
+ next;
+ if (select("No, thanks.:Please name it for me.") == 2) {
+ mes "[Caroller]";
+ mes "Thank for your help!";
+ next;
+ mes "[Caroller]";
+ mes "Many people live in the giant world!";
+ mes "So many people hope to hear Caroller, yet I always lack Crystal pieces.";
+ next;
+ mes "[Caroller]";
+ 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 "[Caroller]";
+ mes "Let's care about others around you on this Christmas season!";
+ close;
+ }else{
+ mes "[Caroller]";
+ mes "Oh!";
+ mes "Shyness!";
+ next;
+ mes "[Caroller]";
+ mes "Anyway, thanks a lot for your help.";
+ next;
+ mes "[Caroller]";
+ mes "Many people live in the giant world!";
+ mes "So many people hope to hear Caroller, yet I always lack Crystal pieces.";
+ next;
+ mes "[Caroller]";
+ mes "If you can get ^0000FFSinging Crystal Pieces^000000, give them to me please?";
+ next;
+ emotion 18;
+ delitem 6092,6;
+ getitem 12354,1;
+ mes "[Caroller]";
+ mes "Let's care about others around you on this Christmas season!";
+ close;
+ }
+ }
+ }
+ mes "[Caroller]";
+ 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 "[Caroller]";
+ mes "But there's been no caroling here and there like before, so we can't feel the Christmas spirit.";
+ next;
+ mes "[Caroller]";
+ mes "So, I installed a Singing Crystal in Prontera...";
+ next;
+ mes "[Caroller]";
+ mes "but that jerk Antonio broke the crystal!";
+ next;
+ mes "[Caroller]";
+ mes "The gift boxes have been changing into monsters since Antonio placed some magic on them, so the monsters ate up the crystal fragments!";
+ next;
+ mes "[Caroller]";
+ mes "I am so devastated, since the Singing Crystal has been the hope of many children around the villages.";
+ next;
+ if (select("There's no other way to carol?:You can hear carols in Lutie.") == 2) {
+ mes "[Caroller]";
+ mes "And just stay there, every Christmas, for your whole life?";
+ next;
+ mes "["+strcharinfo(0)+"]";
+ mes "What? What do you mean?";
+ next;
+ mes "[Caroller]";
+ mes "Oh, nevermind.";
+ mes "Ah...";
+ close;
+ }
+ mes "[Caroller]";
+ mes "Maybe, it's quite hard to make a jukebox for the villages, but a music box might be possible.";
+ next;
+ mes "[Caroller]";
+ mes "We need the ^0000FFSinging Crystal Pieces^000000 that the monsters ate up.";
+ next;
+ mes "[Caroller]";
+ mes "Please bring me ^0000FF6 Singing Crystal Pieces^000000, and you will be rewarded with presents!";
+ next;
+ mes "[Caroller]";
+ mes "Sounds cool, huh!!";
+ next;
+ select("........................");
+ mes "[Caroller]";
+ mes "...Why are you staring at me like that?";
+ next;
+ mes "[Caroller]";
+ mes "You're thinking that we are always getting our plans spoiled, aren't you?";
+ next;
+ mes "[Caroller]";
+ mes "I know that we are not good at controlling stuff, but our rewards are good, right?";
+ next;
+ select("........................");
+ mes "[Caroller]";
+ mes "Hey, we treat you good...";
+ next;
+ select("........................");
+ mes "[Caroller]";
+ mes "You are so cruel to me!";
+ mes "Bad! Bad!";
+ next;
+ mes "[Caroller]";
+ mes "Please, for our children's hope!!!?";
+ mes "Please bring me 6 Singing Crystal Pieces from ^0000FFViolent Gift Boxes^000000!";
+ next;
+ emotion 33;
+ mes "[Caroller]";
+ mes "They're definitely as harsh as their name.";
+ mes "Go on please!";
+ set iROxmas08carol,1;
+ close;
+
+ case 4:
+ mes "[Caroller]";
+ mes "Santa costumes!!";
+ mes "You know, the santa costumes that the monsters are wearing now aren't genuine!";
+ next;
+ mes "[Caroller]";
+ mes "The rumor 'round here is, Lutie's designer made these costumes.";
+ next;
+ mes "[Caroller]";
+ mes "Every year, adventurers challenge to attack Antonio the fake Santa, but there's no way to catch up to him due to his hat and costume!";
+ next;
+ mes "[Caroller]";
+ mes "Are there some spcial abilities within them?";
+ mes "There's still the designer in the Christmas village... How about asking her to make that costume?";
+ next;
+ emotion 18;
+ mes "[Caroller]";
+ mes "Caroller's hot news! Ha!";
+ mes "It's hot, huh?";
+ close;
+
+
+ case 5:
+ mes "[Caroller]";
+ mes "A-N-T-O-N-I-O!!!";
+ mes "As I heard, this Antonio is quite different from before.";
+ next;
+ mes "[Caroller]";
+ mes "He seems to be quite resolved with himself since he ran away from people before.";
+ next;
+ mes "[Caroller]";
+ mes "And he isn't alone anymore... is what I heard...";
+ next;
+ emotion 18;
+ mes "[Caroller]";
+ mes "Caroller's hot news! Ha!";
+ mes "Hotness, right?";
+ close;
+ }
+ }
+
+ if (iROxmas08carol == 1) {
+ if (countitem(6092) < 6) {
+ mes "[Caroller]";
+ mes "Maybe, it's quite hard to make a jukebox for the villages, but a music box might be possible.";
+ next;
+ mes "[Caroller]";
+ mes "We need the ^0000FFSinging Crystal Pieces^000000 that the monsters ate up.";
+ next;
+ mes "[Caroller]";
+ mes "Please bring me ^0000FF6 Singing Crystal Pieces^000000, and you will be rewarded with presents!";
+ next;
+ mes "[Caroller]";
+ mes "For all of the children of this world!!!";
+ mes "Please bring me ^0000FFSinging Crystal Pieces^000000 from ^0000FFViolent Gift Boxes^000000!";
+ next;
+ emotion 33;
+ mes "[Caroller]";
+ mes "Be careful!";
+ mes "They're definitely as harsh as their name.";
+ mes "Take care!!!";
+ close;
+ }else{
+ specialeffect EF_GLORIA;
+ mes "[Caroller]";
+ mes "Don't cry, don't cry!";
+ mes "Santa won't give you a gift if you're crying.";
+ next;
+ mes "[Caroller]";
+ select("I got them!");
+ mes "[Caroller]";
+ mes "Wow, you got them!";
+ mes "They are so cruel, aren't they?";
+ mes "I'm happy to see you again.";
+ next;
+ mes "[Caroller]";
+ mes "Let's count together!";
+ mes "... ...";
+ mes "Six!!";
+ next;
+ mes "[Caroller]";
+ mes "All right! We can start to make our music box with crystal fragments.";
+ next;
+ mes "[Caroller]";
+ mes "We would amplify the sounds of the crystal fragments to sound through the music box.";
+ next;
+ mes "[Caroller]";
+ mes "You know, a music box that sounds like a jukebox!";
+ next;
+ mes "[Caroller]";
+ mes "It's handy. You can carry it, as well as listen to sweet carols anywhere.";
+ mes "Doesn't that sound cool!?";
+ next;
+ mes "[Caroller]";
+ mes "So, we need more of some materials.";
+ mes "^0000FF10 Trunk, 1 Hammer Of Blacksmith, 1 Jubilee, 10 Sticky Mucus, 3carat Diamond^000000!";
+ next;
+ delitem 6092,6;
+ emotion 33;
+ set iROxmas08carol,2;
+ mes "[Caroller]";
+ 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 "[Caroller]";
+ mes "We can make a music box with Singing Crystal Pieces.";
+ mes "It's handy, you can hear carols anywhere. Sounds cool?";
+ next;
+ mes "[Caroller]";
+ mes "So, we need more of some materials.";
+ mes "^0000FF10 Trunk, 1 Hammer Of Blacksmith, 1 Jubilee, 10 Sticky Mucus, 3carat Diamond^000000!";
+ next;
+ emotion 33;
+ mes "[Caroller]";
+ mes "That's all we need.";
+ mes "Isn't that easy?";
+ close;
+ }else{
+ specialeffect EF_GLORIA;
+ mes "[Caroller]";
+ 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 "[Caroller]";
+ mes "Wow!";
+ mes "You came back!";
+ mes "Did you bring all the materials?";
+ next;
+ mes "[Caroller]";
+ mes "Good!";
+ mes "No need to hesitate! Let's get started to make our music box.";
+ next;
+ mes "[Caroller]";
+ specialeffect EF_REPAIRWEAPON;
+ mes "Blacksmith hammers on trunk... and we shape the frame.";
+ next;
+ mes "[Caroller]";
+ //(effect - stones from ground?)
+ mes "Please use the Singing Crystal Pieces for a column, the Diamond as a prop, and the Sticky Mucus as glue.";
+ next;
+ mes "[Caroller]";
+ specialeffect EF_HIT2;
+ mes "And now...";
+ mes "we decorate with a Jubilee...";
+ next;
+ mes "[Caroller]";
+ specialeffect EF_SUFFRAGIUM;
+ mes "The last step...!";
+ mes "Breating life into it!";
+ next;
+ mes "[Caroller]";
+ mes "It's done now!!!";
+ next;
+ mes "[Caroller]";
+ mes "It's so cool! Isn't it cute!!?!";
+ next;
+ mes "[Caroller]";
+ mes "You did as I requested, so I will give you gifts, as promised.";
+ next;
+ mes "[Caroller]";
+ mes "One, is this music box.";
+ mes "Please play this music box all over the villages!";
+ next;
+ mes "[Caroller]";
+ mes "Another present is a Christmas cake especially shaped like your name!";
+ mes "I made this cake shaped like your name!";
+ next;
+ mes "[Caroller]";
+ 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 "[Caroller]";
+ 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 year?";
+ mes "All right, what comes to your mind 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 Christmas more happy!!!";
+ next;
+ mes "[Santa Claus]";
+ mes "Yes indeed Carolling spreads Joy 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 Santa romaing around.";
+ mes "Have you heard of Antonio, who invades villages every Christmas?";
+ next;
+ mes "[Santa Claus]";
+ mes "He has stolen my gifts, as well as attacked adventurers around Toy and Lutie field.";
+ next;
+ mes "[Santa Claus]";
+ mes "A bad Santa ruins us good Santa's reputations!";
+ mes "The World Santa Organization is considering this a grave situation.";
+ close;
+
+ case 3:
+ mes "[Santa Claus]";
+ mes "A gift box! That sounds good!";
+ mes "It's so exciting to open gift boxes when you wake up on Christmas morning!!!";
+ next;
+ mes "[Santa Claus]";
+ mes "But we have very little gifts now, since Santa Antonio has stolen my gift bag.";
+ next;
+ mes "[Santa Claus]";
+ mes "Many adventurers try to catch up to him, but he is not easy to catch.";
+ next;
+ mes "[Santa Claus]";
+ mes "Anyway let those adventurers try to catch him, I have a small game for you.";
+ next;
+ mes "[Santa Claus]";
+ mes "I will give you a small gift if you beat me!";
+ next;
+ mes "[Santa Claus]";
+ mes "Do you want to play a game with me?";
+ next;
+ if (select("No, thanks.:Yes, I would.") == 1) {
+ mes "[Santa Claus]";
+ mes "Aww, don't be afraid.";
+ mes "If you've been a little naughty this year I won't stuff your stockings with coal.";
+ next;
+ mes "[Santa Claus]";
+ mes "I will stay here throughout the Christmas season, just visit me when you change your mind.";
+ close;
+ }
+ if (gettimetick(2) < SantaCardTime) {
+ mes "[Santa Claus]";
+ mes "Um... You've played the game 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 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 game.";
+ next;
+ mes "[Santa Claus]";
+ mes "It's quite simple.";
+ mes "I will pick one of three cards: Poring Card, Ghostring Card, and Angeling Card.";
+ mes "Guess which card I pick and you're a winner!";
+ next;
+ mes "[Santa Claus]";
+ mes "If you guess right 3 times out of 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 cards... Ok!!!";
+ next;
+ specialeffect EF_HIT1;
+ mes "[Santa Claus]";
+ mes "One!";
+ next;
+ specialeffect EF_HIT2;
+ mes "[Santa Claus]";
+ mes "Two!";
+ next;
+ specialeffect EF_HIT3;
+ mes "[Santa Claus]";
+ mes "Three!";
+ next;
+ specialeffect EF_STEAL;
+ 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 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.";
+ mes "Let me try 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.";
+ mes "Put your hand into the bag and pick only 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 card game with me!";
+ mes "Merry Christmas!";
+ close;
+ }
+
+ case 4:
+ mes "[Santa Claus]";
+ mes "Do you mean that ever so fashionable costume for Santa's and youngsters!?!";
+ mes "Light-weight, fashionable, and keeps you warm!";
+ next;
+ mes "[Santa Claus]";
+ mes "There used to be designer who visited my house to make my Santa costumes.";
+ mes "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 spirit of Christmas!";
+ mes "Once you do, I know you'll be able 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 Santa Claus is wearing a too boring costume.";
+ mes "Too boring!";
+ next;
+ mes "[Louise Kim]";
+ mes "I could make a glamorous style for him!";
+ next;
+ mes "[Louise Kim]";
+ mes "I once made a costume for the notorious figure Antonio!";
+ mes "The reason catching up to him is so hard, is that his clothes 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 but sold at good price ~";
+ next;
+ mes "[Louise Kim]";
+ mes "Hey loosers!";
+ mes "You can share my sense of fashion and wear my look if you 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 chance!";
+ next;
+ emotion 18;
+ mes "[Louise Kim]";
+ mes "Come to me later if you want to get the mission.";
+ mes "I, Louise Kim, am generous 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 materials. Things that are beyond my ability...";
+ next;
+ mes "[Louise Kim]";
+ mes "Anyway, can you bring me some 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, 3 Red Potion, Holy Water, 4 Wrapping Paper, Wrapping Lace^000000.";
+ next;
+ mes "[Louise Kim]";
+ mes "If you bring me all that stuff, I can make you a glamorous Santa 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 stuff, I would make you a wonderful costume, for free...";
+ next;
+ emotion 3;
+ mes "[Louise Kim]";
+ mes "Please see me again if you are 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 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 EF_BLESSING;
+ emotion 2;
+ mes "[Louise Kim]";
+ mes "By artist, Louise Kim!";
+ mes "All over the world will be blessed 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 EF_GLORIA;
+ emotion 2;
+ mes "[Louise Kim]";
+ mes "By artist, Louise Kim!";
+ mes "All over the world will be blessed 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 EF_BENEDICTIO;
+ 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 Pierre.";
+ next;
+ emotion 18;
+ mes "[Louise Kim]";
+ mes "I am supposed to get paid well, however I will just let it 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 clothes. There wouldn't be 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
diff --git a/npc/re/events/dumplingfestival.txt b/npc/re/events/dumplingfestival.txt
new file mode 100644
index 000000000..78d7e9e56
--- /dev/null
+++ b/npc/re/events/dumplingfestival.txt
@@ -0,0 +1,111 @@
+//===== rAthena Script =======================================
+//= Imitation of Dumpling Festival
+//===== By ===================================================
+//= Massdriller
+//===== Version ==============================================
+//= 1.01
+//===== Compatible With ======================================
+//= rAthena 0.52+
+//===== Description ==========================================
+//= A complete redering of the Dumpling Festival.
+//===== Comments =============================================
+//= Ver 1.0- Duplicate of MRO's Dumpling Event
+//= 1.01 fixed bugs [Lupus]
+//============================================================
+
+payon,93,81,4 script Exorcist Master Fahae 834,{
+
+ mes "[Exorcist Master Fahae]";
+ mes "Greetings young warrior, I'm the Exorcist Master Fahae.";
+ mes "I have been tracking the elusive Bacsojin for some time.";
+ next;
+ mes "[Exorcist Master Fahae]";
+ mes "I feel it is time I let another warrior try to complete";
+ mes "my quest. I have some items to assist you in my quest.";
+ next;
+ menu "I wish to buy",-, "No thanks",M_FIN;
+
+ mes "[Exorcist Master Fahae]";
+ mes "I have 2 items which might become useful to you.";
+ next;
+ menu "Realgar Wine",-, "Exorcize Herb",M_HERB;
+
+ mes "[Exorcist Master Fahae]";
+ mes "How many do you require?";
+ mes "You may only buy 5 at one time.";
+ mes "Each costs 20000z.";
+ mes "(Type in 0 to cancel)";
+ next;
+ input @input;
+ if(@input==0) close;
+ if(@input>5) goto L_SORRY;
+ if(Zeny< @input*20000) goto L_NOZENY;
+ set Zeny,Zeny-20000*@input;
+ getitem 682,@input;
+ mes "[Exorcist Master Fahae]";
+ mes "Here you go, I hope you may succeed in my quest.";
+ close;
+
+L_SORRY:
+ mes "[Exorcist Master Fahae]";
+ mes "You must not be stingy, it is the path of God to be honest.";
+ close;
+
+M_FIN:
+ mes "[Exorcist Master Fahae]";
+ mes "The path of fully venquishing evil is far, help me in the way of God.";
+ close;
+
+M_HERB:
+ mes "[Exorcist Master Fahae]";
+ mes "How many do you require?";
+ mes "You may only buy 5 at one time.";
+ mes "Each costs 10000z.";
+ mes "(Type in 0 to cancel)";
+ next;
+ input @input;
+ if(@input==0) close;
+ if(@input>5) goto L_SORRY;
+ if(Zeny< @input*10000) goto L_NOZENY;
+ set Zeny,Zeny-10000*@input;
+ getitem 683,@input;
+ mes "[Exorcist Master Fahae]";
+ mes "Here you go, I hope you may succeed in my quest.";
+ close;
+
+L_NOZENY:
+ mes "[Exorcist Master Fahae]";
+ mes "Money doesn't bring joy to everyone, but we need it to support the temple and myself. Please, try to kill some monsters and take their drops.";
+ close;
+}
+
+//////////////////////////////////////////////
+// Monster Spawning /\Secial only for event.//
+//////////////////////////////////////////////
+
+// ~Dumpling~
+gef_fild00,0,0,0,0 monster Dumpling 1520,20,60000,66000
+gef_fild07,0,0,0,0 monster Dumpling 1520,20,60000,66000
+gef_fild04,0,0,0,0 monster Dumpling 1520,20,60000,66000
+gef_fild00,0,0,0,0 monster Dumpling 1520,20,60000,66000
+prt_fild06,0,0,0,0 monster Dumpling 1520,20,60000,66000
+prt_fild01,0,0,0,0 monster Dumpling 1520,20,60000,66000
+prt_fild05,0,0,0,0 monster Dumpling 1520,20,60000,66000
+prt_fild08,0,0,0,0 monster Dumpling 1520,20,60000,66000
+pay_fild04,0,0,0,0 monster Dumpling 1520,20,60000,66000
+moc_fild02,0,0,0,0 monster Dumpling 1520,20,60000,66000
+pay_fild01,0,0,0,0 monster Dumpling 1520,20,60000,66000
+pay_fild07,0,0,0,0 monster Dumpling 1520,20,60000,66000
+moc_fild03,0,0,0,0 monster Dumpling 1520,20,60000,66000
+pay_fild06,0,0,0,0 monster Dumpling 1520,20,60000,66000
+pay_fild05,0,0,0,0 monster Dumpling 1520,20,60000,66000
+pay_fild02,0,0,0,0 monster Dumpling 1520,20,60000,66000
+pay_fild09,0,0,0,0 monster Dumpling 1520,20,60000,66000
+
+// ~Bacsojin~
+moc_fild03,0,0,0,0 monster Bacsojin 1518,1,60000,66000
+
+// ~Chung E~
+moc_fild03,0,0,0,0 monster Chung E 1519,1,60000,66000
+moc_fild13,0,0,0,0 monster Chung E 1519,1,60000,66000
+pay_fild01,0,0,0,0 monster Chung E 1519,1,60000,66000
diff --git a/npc/re/events/easter_2008.txt b/npc/re/events/easter_2008.txt
new file mode 100644
index 000000000..026d2a3d2
--- /dev/null
+++ b/npc/re/events/easter_2008.txt
@@ -0,0 +1,837 @@
+//===== rAthena Script =======================================
+//= Easter Event (2008)
+//===== By: ==================================================
+//= Kisuka
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//= iRO Easter Event. (2008)
+//= Create Holy Eggs
+//= Help a suspicious man.
+//===== Additional Comments: =================================
+//= 1.0 First version. [Kisuka]
+//= 1.1 Corrected a small bug. [L0ne_W0lf]
+//============================================================
+
+// Prontera
+prontera,111,99,5 script Egg Salesman#prt::EggVendor 98,{
+ mes "[Egg Salesman]";
+ mes "^FF0000Chicken Eggs^000000! Come and";
+ mes "buy as many Chicken Eggs";
+ mes "as you want, whenever you";
+ mes "want! Hey buddy, you wanna";
+ mes "take a look at the Chicken";
+ mes "Eggs that I'm selling?";
+ next;
+ while(1) {
+ switch(select("What are you doing?:Why Chicken Eggs?:Sure, I'll buy some.:Never mind.")) {
+ case 1:
+ mes "[Egg Salesman]";
+ mes "What am I--? I'm";
+ mes "selling Chicken Eggs!";
+ mes "For this special event";
+ mes "period, I'm selling as many";
+ mes "Chicken Eggs as you could";
+ mes "want for only 500 zeny each!";
+ next;
+ mes "[Egg Salesman]";
+ mes "Boys, girls, friends,";
+ mes "family, old people, young";
+ mes "people, um, maybe not most";
+ mes "vegetarians or raw foodists,";
+ mes "but almost everyone likes eggs!";
+ next;
+ mes "[Egg Salesman]";
+ mes "Can you imagine a world";
+ mes "without eggs? There'd be";
+ mes "no bread, pastries, cake";
+ mes "or frosting... Ice cream";
+ mes "would be a lot runnier...";
+ mes "Pranks wouldn't be as fun...";
+ next;
+ break;
+ case 2:
+ mes "[Egg Salesman]";
+ mes "I'm not really sure why, but";
+ mes "Chicken Eggs are popular";
+ mes "around this time of year.";
+ mes "They're hot items right";
+ mes "now, and I aim to cash in!";
+ next;
+ break;
+ case 3:
+ mes "[Egg Salesman]";
+ mes "Great! How many do you";
+ mes "want? Remember that each";
+ mes "Chicken Egg is 500 zeny.";
+ mes "Remember that you won't";
+ mes "always be able to buy";
+ mes "Chicken Eggs so easily!";
+ next;
+ while(1) {
+ input .@input;
+ if (.@input == 0) {
+ mes "[Egg Salesman]";
+ mes "Hey, if you're not";
+ mes "going to buy anything,";
+ mes "then would you mind getting";
+ mes "out of the way so I can";
+ mes "help out my customers?";
+ close;
+ }
+ else if (.@input < 0 || .@input > 1000) {
+ mes "[Egg Salesman]";
+ mes "Hey, you mind giving";
+ mes "me a real number? I also";
+ mes "can't sell you more than";
+ mes "1,000 Chicken Eggs at a time,";
+ mes "you know. C'mon, tell me how";
+ mes "many you want for real now.";
+ next;
+ }
+ else {
+ set .@egg_zeny,.@input*500;
+ if (zeny < .@egg_zeny) {
+ mes "[Egg Salesman]";
+ mes "You don't have enough Zeny.";
+ next;
+ mes "[Egg Salesman]";
+ mes "No discount, go and get enough Zeny.";
+ close;
+ }
+ else {
+ if (checkweight(7605,.@input) == 0) {
+ mes "[Egg Salesman]";
+ mes "Hey, I know you really";
+ mes "want to buy some Chicken";
+ mes "Eggs, but you won't be able";
+ mes "to carry that much now. Why";
+ mes "don't you free up some";
+ mes "Inventory space first?.";
+ close;
+ }
+ else {
+ mes "[Egg Salesman]";
+ mes "Here's your Chicken Eggs!";
+ mes "I guess there's some festival";
+ mes "happening where you'll need";
+ mes "them, but I don't know anything";
+ mes "about that. Well, have a good";
+ mes "time, and I'll see you again!";
+ set zeny,zeny-.@egg_zeny;
+ getitem 7605,.@input; //Chicken_Egg
+ close;
+ }
+ }
+ }
+ }
+ case 4:
+ mes "[Egg Salesman]";
+ mes "Not interested in buying";
+ mes "Chicken Eggs, huh? Well,";
+ mes "word's going around that";
+ mes "there's some kind of festival";
+ mes "where they'll come in handy...";
+ mes "Can you really pass this up?";
+ close;
+ }
+ }
+}
+
+prontera,113,98,0 script Dowdy Matron#prt::EggMatron 701,{
+ mes "[Dowdy Matron]";
+ mes "This festival is going";
+ mes "to be so much fun! Ooh!";
+ mes "I should buy some Chicken";
+ mes "Eggs to make some decorations.";
+ next;
+ mes "[Dowdy Matron]";
+ mes "Speaking of which,";
+ mes "I've heard the nun that";
+ mes "can make Holy Eggs is back";
+ mes "in Prontera. Though, I think";
+ mes "she's using Chicken Eggs rather";
+ mes "than regular Eggs to make them.";
+ close;
+}
+
+prontera,108,96,5 script Cantankerous Geezer#prt::EggGeezer 709,{
+ mes "[Cantankerous Geezer]";
+ mes ".Hey, do you know how";
+ mes "Chicken Eggs got to be so";
+ mes "expensive? I mean, 500 zeny";
+ mes "is a lot! I think it's because";
+ mes "some guy in Morroc is trying";
+ mes "to amass a ton of Holy Eggs!";
+ next;
+ mes "[Cantankerous Geezer]";
+ mes "I don't know what he's";
+ mes "offering for those Holy";
+ mes "Eggs, but adventurers are";
+ mes "coming to him with Holy Eggs";
+ mes "in droves. I wonder what he's";
+ mes "giving to them in return?";
+ close2;
+ if (easter2008 < 1) {
+ set easter2008,1;
+ }
+ end;
+}
+
+// Payon
+payon,172,173,5 duplicate(EggVendor) Egg Salesman#pay 98
+payon,175,171,1 duplicate(EggMatron) Dowdy Matron#pay 701
+payon,170,171,5 duplicate(EggGeezer) Cantankerous Geezer#pay 709
+
+// Geffen
+geffen,136,64,5 duplicate(EggVendor) Egg Salesman#gef 98
+geffen,138,63,1 duplicate(EggMatron) Dowdy Matron#gef 701
+geffen,133,63,5 duplicate(EggGeezer) Cantankerous Geezer#gef 709
+
+// Al De Baran
+aldebaran,133,119,5 duplicate(EggVendor) Egg Salesman#alde 98
+aldebaran,135,117,1 duplicate(EggMatron) Dowdy Matron#ald 701
+aldebaran,132,116,5 duplicate(EggGeezer) Cantankerous Geezer#ald 709
+
+// Alberta
+alberta,90,55,5 duplicate(EggVendor) Egg Salesman#alb 98
+alberta,92,53,1 duplicate(EggMatron) Dowdy Matron#alb 701
+alberta,88,52,5 duplicate(EggGeezer) Cantankerous Geezer#alb 709
+
+// Create Holy Eggs
+prontera,230,312,3 script Nerlen#es07 79,{
+ mes "[Nerlen]";
+ mes "Hello! If you'd like,";
+ mes "I can take your Chicken";
+ mes "Eggs and transform them";
+ mes "into Holy Eggs. It's something";
+ mes "I do for others in celebration";
+ mes "of this holy season.";
+ next;
+ mes "[Nerlen]";
+ mes "Holy Eggs represent";
+ mes "rebirth and, fittingly,";
+ mes "can be used to restore";
+ mes "life to your friends.";
+ mes "Would you like me to";
+ mes "make some for you?";
+ next;
+ switch(select("What do I need to make Holy Eggs?:I want to make Holy Eggs.:Maybe next time.")) {
+ case 1:
+ mes "[Nerlen]";
+ mes "For each Holy Egg";
+ mes "that you want me to";
+ mes "make, you will need";
+ mes "to bring me...";
+ next;
+ mes "[Nerlen]";
+ mes "^4D4DFF1 White Herb^000000,";
+ mes "^4D4DFF1 Green Herb^000000,";
+ mes "^4D4DFF1 Yellow Herb^000000,";
+ mes "^4D4DFF1 Holy Water^000000, and";
+ mes "^4D4DFF1 Chicken Egg^000000.";
+ close;
+ case 2:
+ mes "[Nerlen]";
+ mes "Alright, how many";
+ mes "Holy Eggs would you";
+ mes "like me to make you?";
+ mes "I can only make up to";
+ mes "10 Holy Eggs at a time.";
+ mes "Enter ''0'' to cancel.";
+ next;
+ while(1) {
+ input .@input;
+ if (.@input == 0) {
+ mes "[Nerlen]";
+ mes "Oh, you changed your";
+ mes "mind? Feel free to visit me";
+ mes "whenever you want me to";
+ mes "make you some Holy Eggs~";
+ close;
+ }
+ else if (.@input < 0 || .@input > 10) {
+ mes "[Nerlen]";
+ mes "I'm sorry, but I can only";
+ mes "make up to 10 Holy Eggs";
+ mes "at a time. If you wanted to";
+ mes "cancel, then just enter ''0.''";
+ next;
+ }
+ else {
+ if ((countitem(509) < .@input) || (countitem(511) < .@input) || (countitem(508) < .@input) || (countitem(523) < .@input) || (countitem(7605) < .@input)) {
+ mes "[Nerlen]";
+ mes "I'm sorry, but you don't";
+ mes "have enough items to make";
+ mes "Holy Eggs. You need the";
+ mes "following for me to create";
+ mes "each Holy Egg for you.";
+ next;
+ mes "[Nerlen]";
+ mes "^4D4DFF1 White Herb^000000,";
+ mes "^4D4DFF1 Green Herb^000000,";
+ mes "^4D4DFF1 Yellow Herb^000000,";
+ mes "^4D4DFF1 Holy Water^000000, and";
+ mes "^4D4DFF1 Chicken Egg^000000.";
+ close;
+ }
+ else {
+ break;
+ }
+ }
+ }
+ if (checkweight(12019,.@input) == 0) {
+ mes "[Nerlen]";
+ mes "I'm sorry, but you";
+ mes "won't be able to carry";
+ mes "that many Holy Eggs now...";
+ mes "You'd better free up more";
+ mes "space in your Inventory first.";
+ close;
+ }
+ else {
+ delitem 509,.@input; //White_Herb
+ delitem 511,.@input; //Green_Herb
+ delitem 508,.@input; //Yellow_Herb
+ delitem 523,.@input; //Holy_Water
+ delitem 7605,.@input; //Egg
+ getitem 12019,.@input; //Holy_Egg
+ mes "[Nerlen]";
+ mes "Thank you!";
+ mes "I hope you enjoy";
+ mes "these Holy Eggs~";
+ mes "Hope you to be with God's love.";
+ close;
+ }
+ case 3:
+ mes "[Nerlen]";
+ mes "Alright, I understand.";
+ mes "May God bless you.";
+ close;
+ }
+}
+
+// Easter Quest
+morocc,131,26,5 script Secret Corps#egg 880,{
+ if (easter2008 == 1) {
+ mes "[Corps Member]";
+ mes "How are you doing?";
+ mes "Death... It's inescapable.";
+ mes "Even you'll die someday. But...";
+ next;
+ if (countitem(12019) > 0) {
+ mes "[Corps Member]";
+ mes "Oh, yes. That's it.";
+ mes "You have it. The egg you";
+ mes "hold has a secret power.";
+ mes "I think that... Yes. Someone";
+ mes "like you would understand";
+ mes "us, fit well into our group.";
+ next;
+ mes "[Corps Member]";
+ mes "Why don't";
+ mes "you... Join us?";
+ next;
+ switch(select("What for?:Um... But you're suspicious!")) {
+ case 1:
+ mes "[Corps Member]";
+ mes "I see I've caught your";
+ mes "interest! Well, if you'd";
+ mes "like to join us and learn";
+ mes "more, then why don't you";
+ mes "bring me 10 Holy Eggs?";
+ mes "That is my condition.";
+ set easter2008,2;
+ close;
+ case 2:
+ mes "[Corps Member]";
+ mes "Really? Well, I suppose";
+ mes "I can't help it. Let me";
+ mes "assure you that our";
+ mes "organization works";
+ mes "for the greater good.";
+ close;
+ }
+ }
+ else {
+ mes "[Corps Member]";
+ mes "We should all enjoy";
+ mes "life while we still can.";
+ mes "Who knows? Perhaps";
+ mes "there will be other lives";
+ mes "to live after this one.";
+ mes "Perhaps, perhaps....";
+ close;
+ }
+ }
+ else if (easter2008 == 2) {
+ mes "[Corps Member]";
+ mes "Ah, you have returned.";
+ mes "Did you still wish to";
+ mes "join our ranks? If so,";
+ mes "I hope you brought the";
+ mes "10 Holy Eggs I require.";
+ next;
+ switch(select("Give Holy Eggs:Don't Give Holy Eggs")) {
+ case 1:
+ mes "[Corps Member]";
+ mes "So you do wish to";
+ mes "join our organization.";
+ mes "First, let me check if you";
+ mes "brought the Holy Eggs...";
+ next;
+ if (countitem(12019) > 9) {
+ mes "[Corps Member]";
+ mes "Very well. In return";
+ mes "for these Holy Eggs, let";
+ mes "me give you a small present";
+ mes "for joining us. Now, I can";
+ mes "tell you about what we do.";
+ delitem 12019,10; //Holy_Egg
+ set easter2008,3;
+ getitem 644,2; //Gift_Box
+ next;
+ mes "[Corps Member]";
+ mes "^333333*Cough Cough*^000000";
+ mes "Excuse me, I've got--";
+ mes "^333333*Cough!*^000000 A... A bit of a";
+ mes "sore throat. Give me a sec...";
+ close;
+ }
+ else {
+ mes "[Corps Member]";
+ mes "Hm. You don't have enough";
+ mes "Holy Eggs to meet the condition";
+ mes "I set for you. Did you leave";
+ mes "them in your Storage?";
+ close;
+ }
+ case 2:
+ mes "[Corps Member]";
+ mes "Hm? I suppose I can't";
+ mes "blame you for being a bit";
+ mes "suspicious of us. Let me";
+ mes "assure you that ours is";
+ mes "a mission of holiness.";
+ close;
+ }
+ }
+ else if (easter2008 == 3) {
+ mes "[Corps Member]";
+ mes "We are an organization";
+ mes "that is dedicated to...";
+ mes "Resurrecting dead heroes!";
+ next;
+ mes "[Corps Member]";
+ mes "Those Holy Eggs that you've";
+ mes "brought have the power to";
+ mes "restore life to the dead.";
+ mes "In large quantities...";
+ mes "They can even revive";
+ mes "ancient fallen heroes!";
+ next;
+ mes "[Corps Member]";
+ mes "When you bring me";
+ mes "33 Holy Eggs, I will";
+ mes "enchant them so that you";
+ mes "can use them on areas where";
+ mes "ancient heroes had died.";
+ next;
+ mes "[Corps Member]";
+ mes "Go and bring me";
+ mes "33 Holy Eggs! I shall be";
+ mes "waiting here for your return...";
+ set easter2008,4;
+ close;
+ }
+ else if (easter2008 == 4) {
+ mes "[Corps Member]";
+ mes "Ah, you've returned";
+ mes "Now, did you bring me";
+ mes "33 Holy Eggs for your task?";
+ next;
+ switch(select("Give Holy Eggs:Don't Give Holy Eggs")) {
+ case 1:
+ if (countitem(12019) > 32) {
+ mes "[Corps Member]";
+ mes "Ah, these will do!";
+ mes "Now, make a note of the";
+ mes "destination I describe as";
+ mes "I infuse these Holy Eggs";
+ mes "with additional magic.";
+ next;
+ if (BaseLevel < 41) {
+ mes "[Corps Member]";
+ mes "You must go to the";
+ mes "entrance of Payon Dungeon,";
+ mes "where a nimble hero has fallen.";
+ mes "Sacrifice the Holy Eggs there,";
+ mes "and then return to me. Now...";
+ mes "Go, and bring him back to life!";
+ set easter2008,5;
+ close;
+ }
+ else if ((BaseLevel > 40) && (BaseLevel < 61)) {
+ mes "[Corps Member]";
+ mes "Go to the 3rd level of";
+ mes "Izlude dungeon... A hero.";
+ mes "that sought wisdom perished";
+ mes "at the entrance to the 4th";
+ mes "level. Sacrifice the Holy Eggs";
+ mes "there, and return him to life!";
+ set easter2008,6;
+ close;
+ }
+ else if ((BaseLevel > 60) && (BaseLevel < 81)) {
+ mes "[Corps Member]";
+ mes "Go to the abandoned mine";
+ mes "dungeon where a brave hero";
+ mes "died to protect his comrades.";
+ mes "Sacrifice the Holy Eggs as soon";
+ mes "as you get to the 3rd floor.";
+ mes "Go, and bring him back to life!";
+ set easter2008,7;
+ close;
+ }
+ else {
+ mes "[Corps Member]";
+ mes "Go to Glastheim, and";
+ mes "sacrifice the Holy Eggs";
+ mes "as soon as you enter the";
+ mes "2nd floor. A hero perished";
+ mes "there, but you shall bring";
+ mes "him back to the living!";
+ set easter2008,8;
+ close;
+ }
+ }
+ else {
+ mes "[Corps Member]";
+ mes "Hm? This isn't";
+ mes "33 Holy Eggs. Did you";
+ mes "leave some in your Storage?";
+ close;
+ }
+ case 2:
+ mes "[Corps Member]";
+ mes "Don't you understand";
+ mes "the righteousness of";
+ mes "our cause? Returning fallen";
+ mes "heroes will bring peace to";
+ mes "our lands much more quickly!";
+ close;
+ }
+ }
+ else if (easter2008 >= 5 && easter2008 <= 8) {
+ mes "[Corps Member]";
+ mes "Did you forget";
+ mes "where you must go?";
+ mes "Let me remind you";
+ mes "so that you do not";
+ mes "lose your way...";
+ next;
+ mes "[Corps Member]";
+ switch(easter2008) {
+ case 5:
+ mes "[Corps Member]";
+ mes "You must go to the";
+ mes "entrance of Payon Dungeon,";
+ mes "where a nimble hero has fallen.";
+ mes "Sacrifice the Holy Eggs there,";
+ mes "and then return to me. Now...";
+ mes "Go, and bring him back to life!";
+ close;
+ case 6:
+ mes "[Corps Member]";
+ mes "Go to the 3rd level of";
+ mes "Izlude dungeon... A hero.";
+ mes "that sought wisdom perished";
+ mes "at the entrance to the 4th";
+ mes "level. Sacrifice the Holy Eggs";
+ mes "there, and return him to life!";
+ close;
+ case 7:
+ mes "[Corps Member]";
+ mes "Go to the abandoned mine";
+ mes "dungeon where a brave hero";
+ mes "died to protect his comrades.";
+ mes "Sacrifice the Holy Eggs as soon";
+ mes "as you get to the 3rd floor.";
+ mes "Go, and bring him back to life!";
+ close;
+ case 8:
+ mes "Go to Glastheim, and";
+ mes "sacrifice the Holy Eggs";
+ mes "as soon as you enter the";
+ mes "2nd floor. A hero perished";
+ mes "there, but you shall bring";
+ mes "him back to the living!";
+ close;
+ }
+ }
+ else if (easter2008 == 9) {
+ mes "[Corps Member]";
+ mes "Ah, I hope you've come";
+ mes "back with good news.";
+ mes "So did it work?";
+ next;
+ mes "[" + strcharinfo(0) + "]";
+ mes "Actually...";
+ mes "Nothing happened....";
+ next;
+ mes "[Corps Member]";
+ mes "What? It can't be.";
+ mes "The magic... It should";
+ mes "have been powerful enough...";
+ mes "Well, it's too bad that we";
+ mes "failed. Even so, I am grateful";
+ mes "for all your help thus far...";
+ next;
+ mes "[Corps Member]";
+ mes "We'll investigate what";
+ mes "could have gone wrong,";
+ mes "and then try again next year.";
+ mes "Farewell, my friend, and I hope";
+ mes "that you'll assist us again.";
+ set easter2008,10;
+ if (BaseLevel < 41) {
+ getexp 5000,0;
+ getexp 5000,0;
+ }
+ else if ((BaseLevel > 40) && (BaseLevel < 61)) {
+ getexp 50000,0;
+ getexp 50000,0;
+ }
+ else if ((BaseLevel > 60) && (BaseLevel < 81)) {
+ getexp 500000,0;
+ }
+ else if ((BaseLevel > 80) && (BaseLevel < 99)) {
+ getexp 1000000,0;
+ }
+ else {
+ if (Upper == 2) {
+ getexp 0,10000000;
+ }
+ else {
+ getexp 2000000,0;
+ }
+ }
+ close;
+ }
+ else {
+ mes "[Corps Member]";
+ mes "Shh! Tell no one";
+ mes "that I am here.";
+ close;
+ }
+}
+
+pay_dun00,22,127,0 script Trace#egg1 844,{
+ if (easter2008 == 5) {
+ mes "[" + strcharinfo(0) + "]";
+ mes "Well...";
+ mes "This is the place";
+ mes "the Corps Member";
+ mes "wanted me to find...";
+ mes "Time to use all of";
+ mes "these Holy Eggs.";
+ next;
+ if (countitem(12019) > 32) {
+ mes "[" + strcharinfo(0) + "]";
+ mes "Here we go...";
+ mes "Will this really bring";
+ mes "this ancient hero";
+ mes "back to life? I'm...";
+ mes "I'm kind of scared!";
+ next;
+ mes "[" + strcharinfo(0) + "]";
+ mes "...............................";
+ mes "...............................";
+ mes "...............................";
+ mes "...............................";
+ mes "...............................";
+ next;
+ mes "[" + strcharinfo(0) + "]";
+ mes "^333333*Whew!*^000000 Nothing happened!";
+ mes "I guess I better go back to";
+ mes "that Corps Member and let";
+ mes "him know that it didn't work.";
+ close2;
+ delitem 12019,33; //Holy_Egg
+ set easter2008,9;
+ end;
+ }
+ else {
+ mes "[" + strcharinfo(0) + "]";
+ mes "Huh? Where did I put";
+ mes "those 33 Holy Eggs";
+ mes "that I needed for this?";
+ close;
+ }
+ }
+ else {
+ mes "[" + strcharinfo(0) + "]";
+ mes "There was something";
+ mes "here, but I can't tell";
+ mes "for sure what it was...";
+ close;
+ }
+}
+
+iz_dun02,340,346,0 script Trace#egg 844,{
+ if (easter2008 == 6) {
+ mes "[" + strcharinfo(0) + "]";
+ mes "Well...";
+ mes "This is the place";
+ mes "the Corps Member";
+ mes "wanted me to find...";
+ mes "Time to use all of";
+ mes "these Holy Eggs.";
+ next;
+ if (countitem(12019) > 32) {
+ mes "[" + strcharinfo(0) + "]";
+ mes "Here we go...";
+ mes "Will this really bring";
+ mes "this ancient hero";
+ mes "back to life? I'm...";
+ mes "I'm kind of scared!";
+ next;
+ mes "[" + strcharinfo(0) + "]";
+ mes "...............................";
+ mes "...............................";
+ mes "...............................";
+ mes "...............................";
+ mes "...............................";
+ next;
+ mes "[" + strcharinfo(0) + "]";
+ mes "^333333*Whew!*^000000 Nothing happened!";
+ mes "I guess I better go back to";
+ mes "that Corps Member and let";
+ mes "him know that it didn't work.";
+ close2;
+ delitem 12019,33; //Holy_Egg
+ set easter2008,9;
+ end;
+ }
+ else {
+ mes "[" + strcharinfo(0) + "]";
+ mes "Huh? Where did I put";
+ mes "those 33 Holy Eggs";
+ mes "that I needed for this?";
+ close;
+ }
+ }
+ else {
+ mes "[" + strcharinfo(0) + "]";
+ mes "There was something";
+ mes "here, but I can't tell";
+ mes "for sure what it was...";
+ close;
+ }
+}
+
+mjo_dun03,308,256,0 script Trace#egg2 844,{
+ if (easter2008 == 7) {
+ mes "[" + strcharinfo(0) + "]";
+ mes "Well...";
+ mes "This is the place";
+ mes "the Corps Member";
+ mes "wanted me to find...";
+ mes "Time to use all of";
+ mes "these Holy Eggs.";
+ next;
+ if (countitem(12019) > 32) {
+ mes "[" + strcharinfo(0) + "]";
+ mes "Here we go...";
+ mes "Will this really bring";
+ mes "this ancient hero";
+ mes "back to life? I'm...";
+ mes "I'm kind of scared!";
+ next;
+ mes "[" + strcharinfo(0) + "]";
+ mes "...............................";
+ mes "...............................";
+ mes "...............................";
+ mes "...............................";
+ mes "...............................";
+ next;
+ mes "[" + strcharinfo(0) + "]";
+ mes "^333333*Whew!*^000000 Nothing happened!";
+ mes "I guess I better go back to";
+ mes "that Corps Member and let";
+ mes "him know that it didn't work.";
+ close2;
+ delitem 12019,33; //Holy_Egg
+ set easter2008,9;
+ end;
+ }
+ else {
+ mes "[" + strcharinfo(0) + "]";
+ mes "Huh? Where did I put";
+ mes "those 33 Holy Eggs";
+ mes "that I needed for this?";
+ close;
+ }
+ }
+ else {
+ mes "[" + strcharinfo(0) + "]";
+ mes "There was something";
+ mes "here, but I can't tell";
+ mes "for sure what it was...";
+ close;
+ }
+}
+
+gl_prison,157,176,0 script Trace#egg3 844,{
+ if (easter2008 == 8) {
+ mes "[" + strcharinfo(0) + "]";
+ mes "Well...";
+ mes "This is the place";
+ mes "the Corps Member";
+ mes "wanted me to find...";
+ mes "Time to use all of";
+ mes "these Holy Eggs.";
+ next;
+ if (countitem(12019) > 32) {
+ mes "[" + strcharinfo(0) + "]";
+ mes "Here we go...";
+ mes "Will this really bring";
+ mes "this ancient hero";
+ mes "back to life? I'm...";
+ mes "I'm kind of scared!";
+ next;
+ mes "[" + strcharinfo(0) + "]";
+ mes "...............................";
+ mes "...............................";
+ mes "...............................";
+ mes "...............................";
+ mes "...............................";
+ next;
+ mes "[" + strcharinfo(0) + "]";
+ mes "^333333*Whew!*^000000 Nothing happened!";
+ mes "I guess I better go back to";
+ mes "that Corps Member and let";
+ mes "him know that it didn't work.";
+ close2;
+ delitem 12019,33; //Holy_Egg
+ set easter2008,9;
+ end;
+ }
+ else {
+ mes "[" + strcharinfo(0) + "]";
+ mes "Huh? Where did I put";
+ mes "those 33 Holy Eggs";
+ mes "that I needed for this?";
+ close;
+ }
+ }
+ else {
+ mes "[" + strcharinfo(0) + "]";
+ mes "There was something";
+ mes "here, but I can't tell";
+ mes "for sure what it was...";
+ close;
+ }
+}
diff --git a/npc/re/events/event_skill_reset.txt b/npc/re/events/event_skill_reset.txt
new file mode 100644
index 000000000..d5f7fbfe4
--- /dev/null
+++ b/npc/re/events/event_skill_reset.txt
@@ -0,0 +1,109 @@
+//===== rAthena Script =======================================
+//= Official Skill Resetter Event in Yuno (kRO & idRO)
+//===== By: ==================================================
+//= $ephiroth
+//===== Current Version: =====================================
+//= 1.02
+//===== Compatible With: =====================================
+//= rAthena 1.0
+//===== Description: =========================================
+//= 2006 - Edition Skill Reset NPC
+//= 2006/11/16: 1.0 Release and fully working. [$ephiroth]
+//= 1.01 Checked, fixed typos, now uses MISC_QUEST var [Lupus]
+//= 1.02 Added missing message,comment,etc. [$ephiroth]
+//===== Additional Comments: =================================
+//= Skill Reset with payment, minimum BaseLv.60 to reset skill.
+//= Each 1 BaseLv need 20.000 Zeny, so be careful to use skill.
+//============================================================
+yuno,138,187,4 script Hypnotist Teacher 124,{
+ set @npcname$,"[^D5A500Hypnotist^000000]";
+ mes @npcname$;
+
+ if(MISC_QUEST & 1024){
+ mes "I already told you that you may only complete this event once.";
+ close;
+ }
+ if(BaseLevel < 60) {
+ mes "Please return when you reach BaseLv 60 or higher.";
+ close;
+ }
+ if(SkillPoint != 0) {
+ mes "You will need to use up all of your skill points if you want me to continue.";
+ mes "Please come again soon!";
+ close;
+ }
+ if(Weight || checkfalcon() || checkcart() || checkriding()) {
+ mes "Would you like to reset skills?";
+ mes "I'm sorry, but...";
+ next;
+ mes @npcname$;
+ if(Weight) {
+ mes "You cannot reset skills";
+ mes "when you keep";
+ mes "any items.";
+ } else if(checkcart())
+ mes "Please, drop your cart and we'll continue.";
+ else if(checkfalcon())
+ mes "Please, free your Falcon and we'll continue.";
+ else if(checkriding())
+ mes "Please, free your PecoPeco and we'll continue.";
+ next;
+ mes @npcname$;
+ mes "Come back soon!";
+ close;
+ }
+ mes "Hello, I am the Skill Resetter.";
+ mes "Your name is ^0080FF"+strcharinfo(0)+"^000000.";
+ mes "How can I help you?";
+ next;
+ menu "^009500Information about Reset skills.^000000",L_Info,"^00B6FFReset skills.^000000",L_Reset,"^000088Nevermind^000000",-;
+
+ mes @npcname$;
+ mes "You know where to find me,";
+ mes "if you ever want a reset!!";
+ close;
+
+L_Info:
+ mes @npcname$;
+ mes "This skill reset is not FREE OF CHARGE!!";
+ mes "Expense for the reset of skill is ^D5A50020000 Zeny x BaseLv^000000.";
+ mes "Yeah ...each One BaseLv costs 20000 Zeny to reset skill.";
+ next;
+ mes @npcname$;
+ mes "Oh yeah, one more thing!";
+ mes "Any carts, falcons or pecos you have equiped";
+ mes "will be removed if you reset your skills.";
+ next;
+ mes @npcname$;
+ mes "Just one time does again to shake the skill point";
+ mes "Careful with your skills from here on.";
+ close;
+
+L_Reset:
+ mes @npcname$;
+ mes "Before skill reset in starting.";
+ mes "You shall have to first tell me your Base Level.";
+ next;
+ mes "^D5A500[" + strcharinfo(0) + "]^000000";
+ mes "My Base level is ^AA00AALevel " + BaseLevel + "BaseLv.^000000";
+ next;
+ set @zeny,BaseLevel*20000;
+ mes @npcname$;
+ mes "Total zeny to the reset of skill amount ^529DFF" + @zeny + "Zeny^000000 for the skill reset service.";
+ next;
+ if(Zeny < @zeny) {
+ mes @npcname$;
+ mes "It seems that you don't have enough money.";
+ mes "In addition we wait for the opportunity.";
+ emotion e_hmm;
+ close;
+ }
+ set Zeny, Zeny-@zeny;
+ set MISC_QUEST,MISC_QUEST | 1024;
+ resetskill;
+ mes @npcname$;
+ mes "Thank you.";
+ emotion e_thx;
+ logmes "SKILL RESET EVENT";
+ close;
+}
diff --git a/npc/re/events/gdevent_aru.txt b/npc/re/events/gdevent_aru.txt
new file mode 100644
index 000000000..8fd4c4a1d
--- /dev/null
+++ b/npc/re/events/gdevent_aru.txt
@@ -0,0 +1,1542 @@
+//===== rAthena Script =======================================
+//= Guild dungeon event, Arunafeltz.
+//===== By: ==================================================
+//= L0ne_W0lf
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//= Guild dungeon event, Arunafeltz. Retrieve Morestone's
+//= pickaxe from Kublin.
+//===== Additional Comments: =================================
+//= 1.0 First version
+//= 1.1 Changed spawn timer to 1 hour. [L0ne_w0lf]
+//============================================================
+
+arug_dun01,1,1,1 script Monster Controler#aru_gd 81,{
+OnInit:
+ donpcevent "Monster Controler1#aru::OnKill";
+ initnpctimer;
+ end;
+
+OnTimer3600000:
+ donpcevent "Monster Controler1#aru::OnEnable";
+ mapannounce "arug_dun01", "Kublin: Aargh!",bc_map,"0x99CC00";
+ mapannounce "arug_dun01", "Morestone: Stop righ there! You thief!",bc_map,"0x99CC00";
+ stopnpctimer;
+ end;
+}
+
+arug_dun01,1,2,1 script Monster Controler1#aru 81,{
+OnEnable:
+ set .@callwhere,rand(1,4);
+ if (.@callwhere == 1) {
+ monster "arug_dun01",150,340,"Kublin",1980,1,"Monster Controler1#aru::OnMyMobDead";
+ }
+ else if (.@callwhere == 2) {
+ monster "arug_dun01",232,293,"Kublin",1980,1,"Monster Controler1#aru::OnMyMobDead";
+ }
+ else if (.@callwhere == 3) {
+ monster "arug_dun01",156,167,"Kublin",1980,1,"Monster Controler1#aru::OnMyMobDead";
+ }
+ else {
+ monster "arug_dun01",243,56,"Kublin",1980,1,"Monster Controler1#aru::OnMyMobDead";
+ }
+ end;
+
+Onkill:
+ killmonster "arug_dun01","Monster Controler1#aru::OnMyMObDead";
+ end;
+
+OnMyMobDead:
+ if (mobcount("arug_dun01","Monster Controler1#aru::OnMyMObDead") == 0) {
+ mapannounce "arug_dun01", "Kublin: Aargh!",bc_map,"0x99CC00";
+ mapannounce "arug_dun01", "Morestone: I thought I heard Kublin screaming!! Who is there? What happened to Kublin? Hey you!",bc_map,"0x99CC00";
+ donpcevent "Dwarf#aru_gd::OnEnable";
+ }
+ end;
+}
+
+arug_dun01,199,195,5 script Dwarf#aru_gd 826,{
+ if (getcharid(2) == 0) {
+ mes "[Dwarf]";
+ mes "Hey did you see an ugly Goblin come by? He stole something from me!";
+ close;
+ }
+ set .@chk_urquest,checkquest(2143,PLAYTIME);
+ set .@chk_yourgdname$,getguildname(getcharid(2));
+ if ($@gdeventv_a1 == 0) {
+ if ($@gdevents_a$ == "") {
+ set $@gdeventv_a1,1;
+ set $@gdevents_a$,.@chk_yourgdname$;
+ mes "[Dwarf]";
+ mes "Help me!";
+ mes "Please, help me!";
+ next;
+ switch(select("What happened?:Nevermind.")) {
+ case 1:
+ mes "[Dwarf]";
+ mes "I am Morestone and I collect rare gems.";
+ next;
+ mes "[Morestone]";
+ mes "In my travels, I was told that there were alot of gems in Valfreyja and Nidhoggur, so I came down here.";
+ mes "But here, the soil is very hard to dig into. Fortunately, my ^3131FFPickaxe^000000 never lets me down!";
+ next;
+ select("Pickaxe!");
+ mes "[Morestone]";
+ mes "Yes, my beloved pickaxe!";
+ mes "I always carry it with me, you know?";
+ next;
+ mes "[Morestone]";
+ mes "We started working here together.";
+ mes "After a few days, we finally found something!";
+ next;
+ select("Something strange??");
+ mes "[Morestone]";
+ mes "No, but it was worth quite alot.";
+ mes "But we did not have much time to celebrate. Suddenly, a monster appeared that stole my pickaxe.";
+ mes "His name was^3131FFKublin^000000!";
+ next;
+ mes "[Morestone]";
+ mes "He stole my Pickaxe!";
+ mes "I can't live without it...";
+ next;
+ if (countitem(6010) > 0) {
+ mes "[" + strcharinfo(0) + "]";
+ mes "Is this the pickaxe that you've been looking for?";
+ next;
+ mes "[Morestone]";
+ mes "You found my Pickaxe?";
+ mes "Show me, please!";
+ next;
+ mes "[Morestone]";
+ mes "Oh, my! You've returned it to me!";
+ mes "My precious pickaxe, I thought I lost you forever.";
+ next;
+ mes "[Morestone]";
+ mes "You are great! What guild are you from?";
+ mes "Could it be Gravity or Mercury?";
+ next;
+ mes "[" + strcharinfo(0) + "]";
+ mes "I am a member of the ^3131FF"+.@chk_yourgdname$+"^.";
+ next;
+ mes "[Morestone]";
+ mes "Oh... That guild will receive my greatest respect.";
+ next;
+ mes "[Morestone]";
+ mes "Oh! My friend, I am very grateful for your help.";
+ mes "As a reward, I will tell you about a mysterious area I have discovered recently.";
+ next;
+ select("A mysterious area?");
+ mes "[Morestone]";
+ mes "That's right. I found it when I was digging around here.";
+ mes "It looks like it was made for some special purpose, but since there are no gems around there, I have no interest in it.";
+ next;
+ mes "[Morestone]";
+ mes "Instead of going there alone, I think it would be more fun to go with your friends...";
+ next;
+ mes "[Morestone]";
+ mes "If you want, I can take ^3131FFyou and your guild members^000000 to explore that area.";
+ mes "Do you want to go there now?";
+ next;
+ switch(select("Wait! I'm not ready yet.:Let's go!")) {
+ case 1:
+ set $@gdeventv_a1,0;
+ set $@gdevents_a$,"";
+ mes "[Morestone]";
+ mes "Take your time, and find a place to gather your friends.";
+ close;
+ case 2:
+ mes "[Morestone]";
+ mes "Alright! Let's go.";
+ mes "If your friends visit me again later, I will guide them to that area again.";
+ mes "Don't forget, dwarves are grateful beings! Hahaha!";
+ delitem 6010,1; //Pickaxe
+ set $@gdeventv_a1,1;
+ set $@gdevents_a$,.@chk_yourgdname$;
+ close2;
+ setquest 2144;
+ warp "arug_que01",103,133;
+ end;
+ }
+ }
+ else {
+ set $@gdeventv_a1,0;
+ set $@gdevents_a$,"";
+ mes "[Morestone]";
+ mes "I will tell you how to find him.";
+ mes "Kublin wears a ridiculous golden hat, It should be easy to recognise him by that.";
+ close;
+ }
+ case 2:
+ set $@gdeventv_a1,0;
+ set $@gdevents_a$,"";
+ emotion e_sob;
+ mes "[Dwarf]";
+ mes "Ahhh...";
+ close;
+ }
+ }
+ else if ($@gdevents_a$ == .@chk_yourgdname$) {
+ set .@chk_urquest1,checkquest(2144);
+ if ((.@chk_urquest1 == 0) || (.@chk_urquest1 == 1)) {
+ mes "[Morestone]";
+ mes "I, Morestone, have made an alliance with the "+$@gdevents_a$+" guild.";
+ mes "Oh, you are a member.";
+ mes "Would you like to go to the mysterious area?";
+ next;
+ switch(select("Let's go.:No, thanks.")) {
+ case 1:
+ mes "[Morestone]";
+ mes "I hope you enjoy yourself, my friend.";
+ close2;
+ warp "arug_que01",103,133;
+ end;
+ case 2:
+ mes "[Morestone]";
+ mes "If you need my assistance, just ask.";
+ mes "Ah! Dont forget, I hate monsters! So I don't want to see them. It will be better if you ask for another favour.";
+ close;
+ }
+ }
+ else {
+ set $@gdeventv_a1,1;
+ set $@gdevents_a$,.@chk_yourgdname$;
+ mes "[Dwarf]";
+ mes "Help me!";
+ mes "Please, help me!";
+ next;
+ switch(select("What happened?:Nevermind.")) {
+ case 1:
+ mes "[Dwarf]";
+ mes "I am Morestone and I collect rare gems.";
+ next;
+ mes "[Morestone]";
+ mes "In my travels, I was told that there were alot of gems in Valfreyja and Nidhoggur, so I came down here.";
+ mes "But here, the soil is very hard to dig into. Fortunately, my ^3131FFPickaxe^000000 never lets me down!";
+ next;
+ select("Pickaxe!");
+ mes "[Morestone]";
+ mes "Yes, my beloved pickaxe!";
+ mes "I always carry it with me, you know?";
+ next;
+ mes "[Morestone]";
+ mes "We started working here together.";
+ mes "After a few days, we finally found something!";
+ next;
+ select("Something strange??");
+ mes "[Morestone]";
+ mes "No, but it was worth quite alot.";
+ mes "But we did not have much time to celebrate. Suddenly, a monster appeared that stole my pickaxe.";
+ mes "His name was^3131FFKublin^000000!";
+ next;
+ mes "[Morestone]";
+ mes "He stole my Pickaxe!";
+ mes "I can't live without it...";
+ next;
+ if (countitem(6010) > 0) {
+ mes "[" + strcharinfo(0) + "]";
+ mes "Is this the pickaxe that you've been looking for?";
+ next;
+ mes "[Morestone]";
+ mes "You found my Pickaxe?";
+ mes "Show me, please!";
+ next;
+ mes "[Morestone]";
+ mes "Oh, my! You've returned it to me!";
+ mes "My precious pickaxe, I thought I lost you forever.";
+ next;
+ mes "[Morestone]";
+ mes "You are great! What guild are you from?";
+ mes "Could it be Gravity or Mercury?";
+ next;
+ mes "[" + strcharinfo(0) + "]";
+ mes "I am a member of the ^3131FF"+.@chk_yourgdname$+"^.";
+ next;
+ mes "[Morestone]";
+ mes "Oh... That guild will receive my greatest respect.";
+ next;
+ mes "[Morestone]";
+ mes "Oh! My friend, I am very grateful for your help.";
+ mes "As a reward, I will tell you about a mysterious area I have discovered recently.";
+ next;
+ select("A mysterious area?");
+ mes "[Morestone]";
+ mes "That's right. I found it when I was digging around here.";
+ mes "It looks like it was made for some special purpose, but since there are no gems around there, I have no interest in it.";
+ next;
+ mes "[Morestone]";
+ mes "Instead of going there alone, I think it would be more fun to go with your friends...";
+ next;
+ mes "[Morestone]";
+ mes "If you want, I can take ^3131FFyou and your guild members^000000 to explore that area.";
+ mes "Do you want to go there now?";
+ next;
+ switch(select("Wait! I'm not ready yet.:Let's go!")) {
+ case 1:
+ set $@gdeventv_a1,0;
+ set $@gdevents_a$,"";
+ mes "[Morestone]";
+ mes "Take your time, and find a place to gather your friends.";
+ close;
+ case 2:
+ mes "[Morestone]";
+ mes "Alright! Let's go.";
+ mes "If your friends visit me again later, I will guide them to that area again.";
+ mes "Don't forget, dwarves are grateful beings! Hahaha!";
+ delitem 6010,1; //Pickaxe
+ set $@gdeventv_a1,1;
+ set $@gdevents_a$,.@chk_yourgdname$;
+ close2;
+ setquest 2144;
+ warp "arug_que01",103,133;
+ end;
+ }
+ }
+ else {
+ set $@gdeventv_a1,0;
+ set $@gdevents_a$,"";
+ mes "[Morestone]";
+ mes "I will tell you how to find him.";
+ mes "Kublin wears a ridiculous golden hat, It should be easy to recognise him by that.";
+ close;
+ }
+ case 2:
+ set $@gdeventv_a1,0;
+ set $@gdevents_a$,"";
+ emotion e_sob;
+ mes "[Dwarf]";
+ mes "Ah....";
+ close;
+ }
+ }
+ }
+ else {
+ mes "[Morestone]";
+ mes "I, Morestone, have made an alliance with the "+$@gdevents_a$+" guild.";
+ mes "Hm, you're not a member.";
+ mes "Could you please give them my greetings?";
+ close;
+ }
+ }
+ else {
+ if ($@gdevents_a$ == .@chk_yourgdname$) {
+ set .@chk_urquest1,checkquest(2144);
+ if ((.@chk_urquest1 == 0) || (.@chk_urquest1 == 1)) {
+ mes "[Morestone]";
+ mes "[Morestone]";
+ mes "I, Morestone, have made an alliance with the "+$@gdevents_a$+" guild.";
+ mes "Oh, you are a member.";
+ mes "Would you like to go to the mysterious area?";
+ next;
+ switch(select("Let's go.:No, thanks.")) {
+ case 1:
+ mes "[Morestone]";
+ mes "I hope you enjoy yourself, my friend.";
+ close2;
+ warp "arug_que01",103,133;
+ end;
+ case 2:
+ mes "[Morestone]";
+ mes "If you need my assistance, just ask.";
+ mes "Ah! Dont forget, I hate monsters! So I don't want to see them. It will be better if you ask for another favour.";
+ close;
+ }
+ }
+ else {
+ set $@gdeventv_a1,1;
+ set $@gdevents_a$,.@chk_yourgdname$;
+ mes "[Dwarf]";
+ mes "Help me!";
+ mes "Please, help me!";
+ next;
+ switch(select("What happened?:Nevermind.")) {
+ case 1:
+ mes "[Dwarf]";
+ mes "I am Morestone and I collect rare gems.";
+ next;
+ mes "[Morestone]";
+ mes "In my travels, I was told that there were alot of gems in Valfreyja and Nidhoggur, so I came down here.";
+ mes "But here, the soil is very hard to dig into. Fortunately, my ^3131FFPickaxe^000000 never lets me down!";
+ next;
+ select("Pickaxe!");
+ mes "[Morestone]";
+ mes "Yes, my beloved pickaxe!";
+ mes "I always carry it with me, you know?";
+ next;
+ mes "[Morestone]";
+ mes "We started working here together.";
+ mes "After a few days, we finally found something!";
+ next;
+ select("Something strange??");
+ mes "[Morestone]";
+ mes "No, but it was worth quite alot.";
+ mes "But we did not have much time to celebrate. Suddenly, a monster appeared that stole my pickaxe.";
+ mes "His name was^3131FFKublin^000000!";
+ next;
+ mes "[Morestone]";
+ mes "He stole my Pickaxe!";
+ mes "I can't live without it...";
+ next;
+ if (countitem(6010) > 0) {
+ mes "[" + strcharinfo(0) + "]";
+ mes "Is this the pickaxe that you've been looking for?";
+ next;
+ mes "[Morestone]";
+ mes "You found my Pickaxe?";
+ mes "Show me, please!";
+ next;
+ mes "[Morestone]";
+ mes "Oh, my! You've returned it to me!";
+ mes "My precious pickaxe, I thought I lost you forever.";
+ next;
+ mes "[Morestone]";
+ mes "You are great! What guild are you from?";
+ mes "Could it be Gravity or Mercury?";
+ next;
+ mes "[" + strcharinfo(0) + "]";
+ mes "I am a member of the ^3131FF"+.@chk_yourgdname$+"^.";
+ next;
+ mes "[Morestone]";
+ mes "Oh... That guild will receive my greatest respect.";
+ next;
+ mes "[Morestone]";
+ mes "Oh! My friend, I am very grateful for your help.";
+ mes "As a reward, I will tell you about a mysterious area I have discovered recently.";
+ next;
+ select("A mysterious area?");
+ mes "[Morestone]";
+ mes "That's right. I found it when I was digging around here.";
+ mes "It looks like it was made for some special purpose, but since there are no gems around there, I have no interest in it.";
+ next;
+ mes "[Morestone]";
+ mes "Instead of going there alone, I think it would be more fun to go with your friends...";
+ next;
+ mes "[Morestone]";
+ mes "If you want, I can take ^3131FFyou and your guild members^000000 to explore that area.";
+ mes "Do you want to go there now?";
+ next;
+ switch(select("Wait! I'm not ready yet.:Let's go!")) {
+ case 1:
+ set $@gdeventv_a1,0;
+ set $@gdevents_a$,"";
+ mes "[Morestone]";
+ mes "Take your time, and find a place to gather you friends.";
+ close;
+ case 2:
+ mes "[Morestone]";
+ mes "Alright! Let's go.";
+ mes "If your friends visit me again later, I will guide them to that area again.";
+ mes "Don't forget, dwarves are grateful beings! Hahaha!";
+ delitem 6010,1; //Pickaxe
+ set $@gdeventv_a1,1;
+ set $@gdevents_a$,.@chk_yourgdname$;
+ close2;
+ setquest 2144;
+ warp "arug_que01",103,133;
+ end;
+ }
+ }
+ else {
+ set $@gdeventv_a1,0;
+ set $@gdevents_a$,"";
+ mes "[Morestone]";
+ mes "I will tell you how to find him.";
+ mes "Kublin wears a ridiculous golden hat, It should be easy to recognise him by that.";
+ close;
+ }
+ case 2:
+ set $@gdeventv_a1,0;
+ set $@gdevents_a$,"";
+ emotion e_sob;
+ mes "[Dwarf]";
+ mes "Ah....";
+ close;
+ }
+ }
+ }
+ else {
+ mes "[Morestone]";
+ mes "I, Morestone, have made an alliance with the "+$@gdevents_a$+" guild.";
+ mes "Hm, you're not a member.";
+ mes "Could you please give them my greetings?";
+ close;
+ }
+ }
+ end;
+
+OnInit:
+ disablenpc "Dwarf#aru_gd";
+ set $@gdeventv_a1,0;
+ set $@gdevents_a$,"";
+ end;
+
+OnEnable:
+ enablenpc "Dwarf#aru_gd";
+ end;
+}
+
+arug_que01,100,81,3 script Pierrot Pier#aru_gd 715,{
+ specialeffect EF_POISONHIT;
+ set .@sprchg_gd,rand(1,5);
+ if (.@sprchg_gd == 1) {
+ setnpcdisplay "Pierrot Pier#aru_gd",950;
+ }
+ else if (.@sprchg_gd == 2) {
+ setnpcdisplay "Pierrot Pier#aru_gd",715;
+ }
+ else if (.@sprchg_gd == 3) {
+ setnpcdisplay "Pierrot Pier#aru_gd",714;
+ }
+ else if (.@sprchg_gd == 4) {
+ setnpcdisplay "Pierrot Pier#aru_gd",785;
+ }
+ else {
+ setnpcdisplay "Pierrot Pier#aru_gd",876;
+ }
+ if (checkweight(1201,1) == 0) {
+ mes "- Wait!! -";
+ mes "- You're carrying too many items, -";
+ mes "- you can't receive the materials. -";
+ mes "- Please use the Kafra Services, -";
+ mes "- and come back later. -";
+ close;
+ }
+ if (strcharinfo(0) == getguildmaster(getcharid(2))) {
+ if ($@gdeventv_a2 == 0) {
+ set .@que_2143,checkquest(2143,PLAYTIME);
+ if (.@que_2143 == -1) {
+ setnpcdisplay "Pierrot Pier#aru_gd",715;
+ mes "A lonely clown is juggling.";
+ next;
+ mes "When looked at closely, the clown is just a puppet that looks like a human.";
+ next;
+ mes "The clown stops, then starts moving in accordance to your movements, noises start to emit from it's mouth.";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Beep beep beep.";
+ mes "Hello, my friends!";
+ mapannounce "arug_que01", "Pierrot Pier: Beep beep beep! Hello, my friends!",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "I am the loyal servant of Gergath, and I have finally received my orders.";
+ mes "I am happy to hear all the laughter, but without my master's permission, I can't do anything.";
+ mapannounce "arug_que01", "Pierrot Pier: I am happy to hear all the laughter, but without my master's permission, I can't do anything.",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Did you get permission from Gergath?";
+ mapannounce "arug_que01", "Pierrot Pier: Did you get permission from Gergath?",bc_map,"0x99CC00";
+ next;
+ switch(select("I need to check that.:No.")) {
+ case 1:
+ mes "[Pierrot Pier]";
+ mes "Please give me the palm of your hand.";
+ mapannounce "arug_que01", "Pierrot Pier: Please give me the palm of your hand.",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Let me see...";
+ mapannounce "arug_que01", "Pierrot Pier: Let me see...",bc_map,"0x99CC00";
+ next;
+ emotion e_dots;
+ mes "[Pierrot Pier]";
+ mes "Hm...";
+ mapannounce "arug_que01", "Pierrot Pier: Hm...",bc_map,"0x99CC00";
+ next;
+ emotion e_dots;
+ mes "[Pierrot Pier]";
+ mes "Okay, I see...";
+ mapannounce "arug_que01", "Pierrot Pier: Okay, I see...",bc_map,"0x99CC00";
+ next;
+ emotion e_dots;
+ mes "[Pierrot Pier]";
+ mes "Indeed...";
+ mapannounce "arug_que01", "Pierrot Pier: Indeed...",bc_map,"0x99CC00";
+ next;
+ emotion e_bzz;
+ mes "[Pierrot Pier]";
+ mes "Verification completed!";
+ mapannounce "arug_que01", "Pierrot Pier: Verification completed!",bc_map,"0x99CC00";
+ next;
+ break;
+ case 2:
+ mes "[Pierrot Pier]";
+ mes "Hm? that's right.";
+ mes "When is that person coming? I am very bored~!";
+ close;
+ }
+ mes "[Pierrot Pier]";
+ mes "^3131FF<You're someone who can only think about nonsense everyday, you have no focus at all.>^000000";
+ mapannounce "arug_que01", "Pierrot Pier: <You're someone who can only think about nonsense everyday, you have no focus at all.>",bc_map,"0x99CC00";
+ next;
+ emotion e_ho;
+ mes "[Pierrot Pier]";
+ mes "Hm? You don't think so?";
+ mapannounce "arug_que01", "Pierrot Pier: Hm? You don't think so?",bc_map,"0x99CC00";
+ next;
+ emotion e_heh;
+ mes "[Pierrot Pier]";
+ mes "Haha, I'm just kidding. Beep beep.";
+ mes "Ah, you are the one my master speaks of.";
+ mapannounce "arug_que01", "Pierrot Pier: Haha, I'm just kidding. Beep beep. You are the one my master speaks of.",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Come, the Gergath has left a message for you.";
+ mes "It's a bit old, but it should still be legible.";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Alright, let's begin!";
+ setquest 2143;
+ donpcevent "Gergath#aru_gd::OnEnable";
+ close;
+ }
+ else if ((.@que_2143 == 0) || (.@que_2143 == 1)) {
+ mes "[Pierrot Pier]";
+ mes "Let's talk after I finished reading my master's message. Beep beep.";
+ close;
+ }
+ else {
+ mes "[Pierrot Pier]";
+ mes "My master Gergath sincerely wishes you joy for you and your family everyday.";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Alright, would you like to play the game Gergath has prepared for you?";
+ next;
+ switch(select("Game instructions.:Skip instructions.:Refuse game.")) {
+ case 1:
+ mes "[Pierrot Pier]";
+ mes "The game prepared by my master is very unique, yet simple and fun!";
+ mapannounce "arug_que01", "Pierrot Pier: The game prepared by my lord is very unique, yet simple and fun!",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "It's called \"Find the Treasure Map\"!!";
+ mapannounce "arug_que01", "Pierrot Pier: It's called \"Find the Treasure Map\"!!",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Do you see this large and green field? Beep, beep?";
+ mes "I will show you the most incredible magic here.";
+ mes "I will turn this place very white. Veeery white!";
+ mapannounce "arug_que01", "Pierrot Pier: I will turn this place very white. Veeery white!",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "The game instruction is just to find the treasure map within the time limit.";
+ mes "Sounds easy, right?";
+ mapannounce "arug_que01", "Pierrot Pier: The game instruction is just to find the treasure map within the time limit. ounds easy, right?",bc_map,"0x99CC00";
+ next;
+ break;
+ case 2:
+ break;
+ case 3:
+ emotion e_sob;
+ mes "[Pierrot Pier]";
+ mes "Oh, you don't want to play?";
+ close;
+ }
+ mes "[Pierrot Pier]";
+ mes "Okay, I'm ready to begin.";
+ mes "Shall we start? Beep, beep?";
+ next;
+ switch(select("No.:Start.")) {
+ case 1:
+ mes "[Pierrot Pier]";
+ mes "Let me know when you are ready.";
+ close;
+ case 2:
+ mes "[Pierrot Pier]";
+ mes "Alright! Let us begin!";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Ladies, and gentlemen.";
+ mapannounce "arug_que01", "Pierrot Pier: Ladies, and gentlemen.",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Who will find the treasure map in this white world?";
+ mapannounce "arug_que01", "Pierrot Pier: Who will find the treasure map in this white world?",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Amongst all of you, who shall be the lucky one?";
+ mapannounce "arug_que01", "Pierrot Pier: Amongst all of you, who shall be the lucky one?",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Let the game.. Begin!";
+ mapannounce "arug_que01", "Pierrot Pier: Let the game.. Begin!",bc_map,"0x99CC00";
+ set $@gdeventv_a2,1;
+ donpcevent "Controller#gdevent_a::Ongame_start";
+ erasequest 2143;
+ close;
+ }
+ }
+ }
+ else if ($@gdeventv_a2 == 1) {
+ mes "[Pierrot Pier]";
+ mes "Did you find the treasure map?";
+ mes "Show me what you have in your hands! Beep, beep!";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Let me see...";
+ next;
+ if (countitem(6031) > 0) {
+ donpcevent "Controller#gdevent_a::Onstop";
+ set $@gdeventv_a2,3;
+ donpcevent "eff_mvp#aru_gd::Onmvp";
+ mes "[Pierrot Pier]";
+ mes "Wow~~!!";
+ mes "Success~!!";
+ mes "What a success~!!";
+ mapannounce "arug_que01", "Pierrot Pier: Wow~~!! Success~!! What a success~!!",bc_map,"0x99CC00";
+ delitem 6031,1; //Glitering_PaperB
+ close;
+ }
+ else {
+ if (countitem(6030) > 0) {
+ mes "[Pierrot Pier]";
+ mes "Ahh, what a shame, it seems like you haven't found the treasure map yet.";
+ mes "Quickly! Your time is running out! Hurry up!";
+ close;
+ }
+ else {
+ mes "[Pierrot Pier]";
+ mes "I don't see anything. Have you even started yet? Beep?";
+ mes "Hehe, while you're talking to me, the time is slowly ticking away~";
+ close;
+ }
+ }
+ }
+ else if ($@gdeventv_a2 == 2) {
+ mes "[Pierrot Pier]";
+ mes "Wah, why is it like this~!!";
+ mes "Not enough? But this makes the game fun, no? Hahaha!";
+ next;
+ mes "[Pierrot Pier]";
+ mes "What did you think?";
+ next;
+ switch(select("It was pretty hard.:I should've been successful...")) {
+ case 1:
+ mes "[Pierrot Pier]";
+ mes "It's like trying to find a needle in a haystack!";
+ mes "It's hard, but if you find it, it's worth ten times the effort. Beep, beep.";
+ next;
+ break;
+ case 2:
+ mes "[Pierrot Pier]";
+ mes "Aaah~! Time is gold.";
+ mes "Precious time goes by so fast.";
+ next;
+ break;
+ }
+ mes "[Pierrot Pier]";
+ mes "I, Pierrot Piere, am not a heartless clown! Beep beep.";
+ mapannounce "arug_que01", "Pierrot Pier: I, Pierrot Piere, am not a heartless clown! Beep beep.",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Your success is my happiness!";
+ mes "I'll give you one more chance. How's that? Beep?";
+ mapannounce "arug_que01", "Pierrot Pier: I'll give you one more chance. How's that? Beep?",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Okay, I'm ready to begin.";
+ mes "Shall we start? Beep, beep?";
+ mapannounce "arug_que01", "Pierrot Pier: Okay, I'm ready to begin. Shall we start? Beep, beep?",bc_map,"0x99CC00";
+ next;
+ switch(select("No.:Start.")) {
+ case 1:
+ mes "[Pierrot Pier]";
+ mes "Let me know when you are ready.";
+ close;
+ case 2:
+ mes "[Pierrot Pier]";
+ mes "Alright! Let us begin!";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Ladies, and gentlemen.";
+ mapannounce "arug_que01", "Pierrot Pier: Ladies, and gentlemen.",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Who will find the treasure map in this white world?";
+ mapannounce "arug_que01", "Pierrot Pier: Who will find the treasure map in this white world?",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Amongst all of you, who shall be the lucky one?";
+ mapannounce "arug_que01", "Pierrot Pier: Amongst all of you, who shall be the lucky one?",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Let the game.. Begin!";
+ mapannounce "arug_que01", "Pierrot Pier: Let the game.. Begin!",bc_map,"0x99CC00";
+ set $@gdeventv_a2,10;
+ donpcevent "Controller#gdevent_a::Ongame_start";
+ close;
+ }
+ }
+ else if ($@gdeventv_a2 == 3) {
+ set .@que_2143,checkquest(2143);
+ if (.@que_2143 == 3) {
+ erasequest 2143;
+ }
+ mes "[Pierrot Pier]";
+ mes "How did you do it?";
+ mapannounce "arug_que01", "Pierrot Pier: How did you do it?",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "You managed to find a needle in a haystack!";
+ mes "Amazing!";
+ mapannounce "arug_que01", "Pierrot Pier: You managed to find a needle in a haystack! Amazing!!",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "You've completeled an unbelievable task, I will give you the wonderful gift master has prepared!! Ha!";
+ mapannounce "arug_que01", "Pierrot Pier: You've completeled an unbelievable task, I will give you the wonderful gift my master has prepared!! Ha!",bc_map,"0x99CC00";
+ mapannounce "arug_que01", "Pierrot Pier: Here, take Pierre's Treasure Boxes.",bc_map,"0x99CC00";
+ donpcevent "eff_mvp#aru_gd::Onmvp";
+ set $@gdeventv_a2,5;
+ getitem 14596,10; //Pierre_Treasurebox
+ close;
+ }
+ else if ($@gdeventv_a2 == 4) {
+ mes "[Pierrot Pier]";
+ mes "Incredible! Unbelievable! Beep beep!";
+ close;
+ }
+ else if ($@gdeventv_a2 == 5) {
+ mapannounce "arug_que01", "Pierrot Pier: Seeing your smiles, makes Pierrot feel very happy~ See you next time!",bc_map,"0x99CC00";
+ mes "[Pierrot Pier]";
+ mes "Did you have fun?";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Seeing your smiles, makes Pierrot feel very happy~";
+ next;
+ mes "[Pierrot Pier]";
+ mes "I hope to see you again very soon, I must go back to being a doll now.";
+ mes "See you next time!";
+ erasequest 2144;
+ close;
+ }
+ else {
+ mes "[Pierrot Pier]";
+ mes "Did you find the treasure map?";
+ mes "Show me what you have in your hands! Beep, beep!";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Let me see.";
+ next;
+ if (countitem(6031) > 0) {
+ donpcevent "Controller#gdevent_a::Onstop";
+ set $@gdeventv_a2,3;
+ donpcevent "eff_mvp#aru_gd::Onmvp";
+ mes "[Pierrot Pier]";
+ mes "Wow~~!!";
+ mes "Success~!!";
+ mes "What a success~!!";
+ delitem 6031,1; //Glitering_PaperB
+ close;
+ }
+ else {
+ if (countitem(6030) > 0) {
+ mes "[Pierrot Pier]";
+ mes "Ahh, what a shame, it seems like you haven't found the treasure map yet.";
+ mes "Quickly! Your time is running out! Hurry up!";
+ close;
+ }
+ else {
+ mes "[Pierrot Pier]";
+ mes "I don't see anything. Have you even started yet? Beep?";
+ mes "Hehe, while you're talking to me, the time is slowly ticking away~";
+ close;
+ }
+ }
+ }
+ }
+ else {
+ if ($@gdeventv_a2 == 0) {
+ setnpcdisplay "Pierrot Pier#aru_gd",715;
+ mes "A lonely clown is juggling.";
+ next;
+ mes "When looked at closely, the clown is just a puppet that looks like a human.";
+ next;
+ mes "The clown stops, then starts moving in accordance to your movements, noises start to emit from it's mouth.";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Beep beep beep.";
+ mes "Hello, my friends!";
+ mapannounce "arug_que01", "Pierrot Pier: Beep beep beep! Hello, my friends!",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "I am the loyal servant of Gergath, and I have finally received my orders.";
+ mes "I am happy to hear all the laughter, but without my master's permission, I can't do anything.";
+ mapannounce "arug_que01", "Pierrot Pier: I am happy to hear all the laughter, but without my master's permission, I can't do anything.",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Did you get permission from the Gergath?";
+ mapannounce "arug_que01", "Pierrot Pier: Did you get permission from Gergath?",bc_map,"0x99CC00";
+ next;
+ switch(select("I need to check that.:No.")) {
+ case 1:
+ mes "[Pierrot Pier]";
+ mes "Please give me the palm of your hand.";
+ mapannounce "arug_que01", "Pierrot Pier: Please give me the palm of your hand.",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Let me see...";
+ mapannounce "arug_que01", "Pierrot Pier: Let me see...",bc_map,"0x99CC00";
+ next;
+ emotion e_dots;
+ mes "[Pierrot Pier]";
+ mes "Hm...";
+ mapannounce "arug_que01", "Pierrot Pier: Hm...",bc_map,"0x99CC00";
+ next;
+ emotion e_dots;
+ mes "[Pierrot Pier]";
+ mes "Okay, I see...";
+ mapannounce "arug_que01", "Pierrot Pier: Okay, I see...",bc_map,"0x99CC00";
+ next;
+ emotion e_dots;
+ mes "[Pierrot Pier]";
+ mes "Indeed...";
+ mapannounce "arug_que01", "Pierrot Pier: Indeed...",bc_map,"0x99CC00";
+ next;
+ emotion e_bzz;
+ mes "[Pierrot Pier]";
+ mes "Verification completed!";
+ mapannounce "arug_que01", "Pierrot Pier: Verification completed!",bc_map,"0x99CC00";
+ next;
+ break;
+ case 2:
+ mes "[Pierrot Pier]";
+ mes "Hm? that's right.";
+ mes "When is that person coming? I am very bored~!";
+ close;
+ }
+ emotion 18;
+ mes "[Pierrot Pier]";
+ mes "^3131FF<Although you're a weirdo, you seem to be very dedicated>^000000. Beep beep.";
+ next;
+ emotion e_swt2;
+ mes "[Pierrot Pier]";
+ mes "Hm? You don't think so?";
+ next;
+ mes "[Pierrot Pier]";
+ mes "The one my lord appointed is ^3131FF< someone who leads many people >^000000. Beep.";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Pierrot wants to be someone like that, too. Beep.";
+ close;
+ }
+ else if ($@gdeventv_a2 == 1) {
+ mes "[Pierrot Pier]";
+ mes "Did you find the treasure map?";
+ mes "Show me what you have in your hands! Beep, beep!";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Let me see...";
+ next;
+ if (countitem(6031) > 0) {
+ donpcevent "Controller#gdevent_a::Onstop";
+ set $@gdeventv_a2,3;
+ donpcevent "eff_mvp#aru_gd::Onmvp";
+ mes "[Pierrot Pier]";
+ mes "Wow~~!!";
+ mes "Success~!!";
+ mes "What a success~!!";
+ mapannounce "arug_que01", "Pierrot Pier: Wow~~!! Success~!! What a success~!!",bc_map,"0x99CC00";
+ delitem 6031,1; //Glitering_PaperB
+ close;
+ }
+ else {
+ if (countitem(6030) > 0) {
+ mes "[Pierrot Pier]";
+ mes "Ahh, what a shame, it seems like you haven't found the treasure map yet.";
+ mes "Quickly! Your time is running out! Hurry up!";
+ close;
+ }
+ else {
+ mes "[Pierrot Pier]";
+ mes "I don't see anything. Have you even started yet? Beep?";
+ mes "Hehe, while you're talking to me, the time is slowly ticking away~";
+ close;
+ }
+ }
+ }
+ else if ($@gdeventv_a2 == 2) {
+ mes "[Pierrot Pier]";
+ mes "Wah, why is it like this~!!";
+ mes "Not enough? But this makes the game fun, no? Hahaha!";
+ close;
+ }
+ else if ($@gdeventv_a2 == 3) {
+ mes "[Pierrot Pier]";
+ mes "Congratulations, you have succeeded!";
+ mes "I will talk to your leader about other details.";
+ close;
+ }
+ else if ($@gdeventv_a2 == 4) {
+ mes "[Pierrot Pier]";
+ mes "Incredible! Unbelievable! Beep beep!";
+ close;
+ }
+ else if ($@gdeventv_a2 == 5) {
+ mes "[Pierrot Pier]";
+ mes "Did you have fun?";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Seeing your smiles, makes Pierrot feel very happy~";
+ next;
+ mes "[Pierrot Pier]";
+ mes "I hope to see you again very soon, I must go back to being a doll now.";
+ mes "See you next time!";
+ close;
+ }
+ else {
+ mes "[Pierrot Pier]";
+ mes "Voc� encontrou o tesouro?";
+ mes "Mostre-me o que voc� tem nas m�os agora.";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Deixe-me ver...";
+ next;
+ if (countitem(6031) > 0) {
+ donpcevent "Controller#gdevent_a::Onstop";
+ set $@gdeventv_a2,3;
+ donpcevent "eff_mvp#aru_gd::Onmvp";
+ mes "[Pierrot Pier]";
+ mes "Wow~~!!";
+ mes "Success~!!";
+ mes "What a success~!!";
+ delitem 6031,1; //Glitering_PaperB
+ close;
+ }
+ else {
+ if (countitem(6030) > 0) {
+ mes "[Pierrot Pier]";
+ mes "Ahh, what a shame, it seems like you haven't found the treasure map yet.";
+ mes "Quickly! Your time is running out! Hurry up!";
+ close;
+ }
+ else {
+ mes "[Pierrot Pier]";
+ mes "I don't see anything. Have you even started yet? Beep?";
+ mes "Hehe, while you're talking to me, the time is slowly ticking away~";
+ close;
+ }
+ }
+ }
+ }
+}
+
+arug_que01,10,10,3 script Controller#gdevent_a 81,{
+OnInit:
+ set $@gdeventv_a2,0;
+ end;
+
+Onwin:
+ donpcevent "treg#aru_gd::OnEnable";
+ end;
+
+Ongame_start:
+ initnpctimer;
+ donpcevent "paper_sp_1_a::OnEnable";
+ donpcevent "paper_sp_2_a::OnEnable";
+ donpcevent "paper_sp_3_a::OnEnable";
+ donpcevent "paper_sp_4_a::OnEnable";
+ donpcevent "paper_sp_5_a::OnEnable";
+ donpcevent "paper_sp_6_a::OnEnable";
+ donpcevent "paper_sp_7_a::OnEnable";
+ donpcevent "paper_sp_8_a::OnEnable";
+ donpcevent "paper_sp_9_a::OnEnable";
+ set .@roulette_where,rand(1,9);
+ if (.@roulette_where == 1) {
+ donpcevent "paper_sp_1_a::Onbingo";
+ }
+ else if (.@roulette_where == 2) {
+ donpcevent "paper_sp_2_a::Onbingo";
+ }
+ else if (.@roulette_where == 3) {
+ donpcevent "paper_sp_3_a::Onbingo";
+ }
+ else if (.@roulette_where == 4) {
+ donpcevent "paper_sp_4_a::Onbingo";
+ }
+ else if (.@roulette_where == 5) {
+ donpcevent "paper_sp_5_a::Onbingo";
+ }
+ else if (.@roulette_where == 6) {
+ donpcevent "paper_sp_6_a::Onbingo";
+ }
+ else if (.@roulette_where == 7) {
+ donpcevent "paper_sp_7_a::Onbingo";
+ }
+ else if (.@roulette_where == 8) {
+ donpcevent "paper_sp_8_a::Onbingo";
+ }
+ else {
+ donpcevent "paper_sp_9_a::Onbingo";
+ }
+ end;
+
+Onstop:
+ stopnpctimer;
+ end;
+
+OnTimer40000:
+ mapannounce "arug_que01", "Pierrot Pier: Time is running out, hurry up!",bc_map,"0x99CC00";
+ end;
+
+OnTimer60000:
+ mapannounce "arug_que01", "Pierrot Pier: Time is up!",bc_map,"0x99CC00";
+ mapwarp "arug_que01","arug_que01",100,79;
+ enablenpc "removepp_aru_gd";
+ set $@gdeventv_a2,2;
+ end;
+
+OnTimer63000:
+ stopnpctimer;
+ end;
+}
+
+arug_que01,87,93,0 script paper_sp_1_a 139,{
+ end;
+
+OnEnable:
+ set .@paper_while1,0;
+ while(1) {
+ if (.@paper_while1 == 100) {
+ break;
+ }
+ else {
+ set .@paper_while1,.@paper_while1+1;
+ set .@paper_x1,rand(81,95);
+ set .@paper_y1,rand(87,100);
+ makeitem 6030,1,"arug_que01",.@paper_x1,.@paper_y1; //Glitering_PaperA
+ }
+ }
+ end;
+
+Onbingo:
+ set .@paper_x1,rand(81,95);
+ set .@paper_y1,rand(87,100);
+ makeitem 6031,1,"arug_que01",.@paper_x1,.@paper_y1; //Glitering_PaperB
+ end;
+}
+
+arug_que01,102,93,0 script paper_sp_2_a 139,{
+ end;
+
+OnEnable:
+ set .@paper_while2,0;
+ while(1) {
+ if (.@paper_while2 == 100) {
+ break;
+ }
+ else {
+ set .@paper_while2,.@paper_while2+1;
+ set .@paper_x2,rand(96,110);
+ set .@paper_y2,rand(87,100);
+ makeitem 6030,1,"arug_que01",.@paper_x2,.@paper_y2; //Glitering_PaperA
+ }
+ }
+ end;
+
+Onbingo:
+ set .@paper_x2,rand(96,110);
+ set .@paper_y2,rand(87,100);
+ makeitem 6031,1,"arug_que01",.@paper_x2,.@paper_y2; //Glitering_PaperB
+ end;
+}
+
+arug_que01,117,93,0 script paper_sp_3_a 139,{
+ end;
+
+OnEnable:
+ set .@paper_while3,0;
+ while(1) {
+ if (.@paper_while3 == 100) {
+ break;
+ }
+ else {
+ set .@paper_while3,.@paper_while3+1;
+ set .@paper_x3,rand(111,124);
+ set .@paper_y3,rand(87,100);
+ makeitem 6030,1,"arug_que01",.@paper_x3,.@paper_y3; //Glitering_PaperA
+ }
+ }
+ end;
+
+Onbingo:
+ set .@paper_x3,rand(111,124);
+ set .@paper_y3,rand(87,100);
+ makeitem 6031,1,"arug_que01",.@paper_x3,.@paper_y3; //Glitering_PaperB
+ end;
+}
+
+arug_que01,87,80,0 script paper_sp_4_a 139,{
+ end;
+
+OnEnable:
+ set .@paper_while4,0;
+ while(1) {
+ if (.@paper_while4 == 100) {
+ break;
+ }
+ else {
+ set .@paper_while4,.@paper_while4+1;
+ set .@paper_x4,rand(81,95);
+ set .@paper_y4,rand(73,86);
+ makeitem 6030,1,"arug_que01",.@paper_x4,.@paper_y4; //Glitering_PaperA
+ }
+ }
+ end;
+
+Onbingo:
+ set .@paper_x4,rand(81,95);
+ set .@paper_y4,rand(73,86);
+ makeitem 6031,1,"arug_que01",.@paper_x4,.@paper_y4; //Glitering_PaperB
+ end;
+}
+
+arug_que01,102,80,0 script paper_sp_5_a 139,{
+ end;
+
+OnEnable:
+ set .@paper_while5,0;
+ while(1) {
+ if (.@paper_while5 == 100) {
+ break;
+ }
+ else {
+ set .@paper_while5,.@paper_while5+1;
+ set .@paper_x5,rand(96,110);
+ set .@paper_y5,rand(73,86);
+ makeitem 6030,1,"arug_que01",.@paper_x5,.@paper_y5; //Glitering_PaperA
+ }
+ }
+ end;
+
+Onbingo:
+ set .@paper_x5,rand(96,110);
+ set .@paper_y5,rand(73,86);
+ makeitem 6031,1,"arug_que01",.@paper_x5,.@paper_y5; //Glitering_PaperB
+ end;
+}
+
+arug_que01,117,80,0 script paper_sp_6_a 139,{
+ end;
+
+OnEnable:
+ set .@paper_while6,0;
+ while(1) {
+ if (.@paper_while6 == 100) {
+ break;
+ }
+ else {
+ set .@paper_while6,.@paper_while6+1;
+ set .@paper_x6,rand(111,124);
+ set .@paper_y6,rand(73,86);
+ makeitem 6030,1,"arug_que01",.@paper_x6,.@paper_y6; //Glitering_PaperA
+ }
+ }
+ end;
+
+Onbingo:
+ set .@paper_x6,rand(111,124);
+ set .@paper_y6,rand(73,86);
+ makeitem 6031,1,"arug_que01",.@paper_x6,.@paper_y6; //Glitering_PaperB
+ end;
+}
+
+arug_que01,87,65,0 script paper_sp_7_a 139,{
+ end;
+
+OnEnable:
+ set .@paper_while7,0;
+ while(1) {
+ if (.@paper_while7 == 100) {
+ break;
+ }
+ else {
+ set .@paper_while7,.@paper_while7+1;
+ set .@paper_x7,rand(81,95);
+ set .@paper_y7,rand(59,72);
+ makeitem 6030,1,"arug_que01",.@paper_x7,.@paper_y7; //Glitering_PaperA
+ }
+ }
+ end;
+
+Onbingo:
+ set .@paper_x7,rand(81,95);
+ set .@paper_y7,rand(59,72);
+ makeitem 6031,1,"arug_que01",.@paper_x7,.@paper_y7; //Glitering_PaperB
+ end;
+}
+
+arug_que01,102,65,0 script paper_sp_8_a 139,{
+ end;
+
+OnEnable:
+ set .@paper_while8,0;
+ while(1) {
+ if (.@paper_while8 == 100) {
+ break;
+ }
+ else {
+ set .@paper_while8,.@paper_while8+1;
+ set .@paper_x8,rand(96,110);
+ set .@paper_y8,rand(59,72);
+ makeitem 6030,1,"arug_que01",.@paper_x8,.@paper_y8; //Glitering_PaperA
+ }
+ }
+ end;
+
+Onbingo:
+ set .@paper_x8,rand(96,110);
+ set .@paper_y8,rand(59,72);
+ makeitem 6031,1,"arug_que01",.@paper_x8,.@paper_y8; //Glitering_PaperB
+ end;
+}
+
+arug_que01,117,65,0 script paper_sp_9_a 139,{
+ end;
+
+OnEnable:
+ set .@paper_while9,0;
+ while(1) {
+ if (.@paper_while9 == 100) {
+ break;
+ }
+ else {
+ set .@paper_while9,.@paper_while9+1;
+ set .@paper_x9,rand(111,124);
+ set .@paper_y9,rand(59,72);
+ makeitem 6030,1,"arug_que01",.@paper_x9,.@paper_y9; //Glitering_PaperA
+ }
+ }
+ end;
+
+Onbingo:
+ set .@paper_x9,rand(111,124);
+ set .@paper_y9,rand(59,72);
+ makeitem 6031,1,"arug_que01",.@paper_x9,.@paper_y9; //Glitering_PaperB
+ end;
+}
+
+arug_que01,100,80,0 script removepp_aru_gd -1,5,5,{
+ end;
+
+OnInit:
+ disablenpc "removepp_aru_gd";
+ end;
+
+OnTouch2:
+ set .@paper_aru_gd,countitem(6030);
+ set .@spaper_aru_gd,countitem(6031);
+ if ((.@paper_aru_gd > 0) || (.@spaper_aru_gd > 0)) {
+ delitem 6030,.@paper_aru_gd; //Glitering_PaperA
+ delitem 6031,.@spaper_aru_gd; //Glitering_PaperB
+ }
+ end;
+}
+
+arug_que01,6,6,1 script eff_mvp#aru_gd 844,{
+ end;
+
+Onmvp:
+ initnpctimer;
+ end;
+
+OnTimer1000:
+ specialeffect EF_MVP,AREA,"paper_sp_1_a";
+ specialeffect EF_MVP,AREA,"paper_sp_3_a";
+ specialeffect EF_MVP,AREA,"paper_sp_5_a";
+ specialeffect EF_MVP,AREA,"paper_sp_7_a";
+ specialeffect EF_MVP,AREA,"paper_sp_9_a";
+ end;
+
+OnTimer2000:
+ specialeffect EF_MVP,AREA,"paper_sp_2_a";
+ specialeffect EF_MVP,AREA,"paper_sp_4_a";
+ specialeffect EF_MVP,AREA,"paper_sp_6_a";
+ specialeffect EF_MVP,AREA,"paper_sp_8_a";
+ end;
+
+OnTimer3000:
+ specialeffect EF_MVP,AREA,"paper_sp_1_a";
+ specialeffect EF_MVP,AREA,"paper_sp_3_a";
+ specialeffect EF_MVP,AREA,"paper_sp_5_a";
+ specialeffect EF_MVP,AREA,"paper_sp_7_a";
+ specialeffect EF_MVP,AREA,"paper_sp_9_a";
+ end;
+
+OnTimer4000:
+ specialeffect EF_MVP,AREA,"paper_sp_2_a";
+ specialeffect EF_MVP,AREA,"paper_sp_4_a";
+ specialeffect EF_MVP,AREA,"paper_sp_6_a";
+ specialeffect EF_MVP,AREA,"paper_sp_8_a";
+ stopnpctimer;
+ end;
+}
+
+arug_que01,100,75,5 script Gergath#aru_gd 412,{
+ end;
+
+OnInit:
+ disablenpc "Gergath#aru_gd";
+ end;
+
+OnEnable:
+ enablenpc "Gergath#aru_gd";
+ specialeffect EF_FORESTLIGHT;
+ initnpctimer;
+ end;
+
+OnTimer5000:
+ mapannounce "arug_que01", "Gergath : My dear friend, how have you been? This is something I prepared for you.",bc_map,"0xFFFF00";
+ end;
+
+OnTimer10000:
+ mapannounce "arug_que01", "Gergath : Do you still remember when we were young? We fought everyday like we were sworn enemies.",bc_map,"0xFFFF00";
+ end;
+
+OnTimer15000:
+ mapannounce "arug_que01", "Gergath : No matter how hard the adults tried, we had no intentions to change. Haha.",bc_map,"0xFFFF00";
+ end;
+
+OnTimer20000:
+ mapannounce "arug_que01", "Gergath : But I believe that deep inside, we valued our friendship with each other.",bc_map,"0xFFFF00";
+ end;
+
+OnTimer25000:
+ mapannounce "arug_que01", "Gergath : After I lost my mother's remnants in Mt. Mjolnir, you came to find me.",bc_map,"0xFFFF00";
+ end;
+
+OnTimer30000:
+ mapannounce "arug_que01", "Gergath : When you, handed me my mother's remnants, I couldn't even say thank you.",bc_map,"0xFFFF00";
+ end;
+
+OnTimer35000:
+ mapannounce "arug_que01", "Gergath : I couldn't say it even as I became an old man.",bc_map,"0xFFFF00";
+ end;
+
+OnTimer40000:
+ mapannounce "arug_que01", "Gergath : I found out about your whereabouts not long ago. I heard you were taking care of orphaned children?",bc_map,"0xFFFF00";
+ end;
+
+OnTimer45000:
+ mapannounce "arug_que01", "Gergath : Please accept this as a gift from a useless friend to you and your beloved children. I hope you will like it, haha.",bc_map,"0xFFFF00";
+ end;
+
+OnTimer50000:
+ mapannounce "arug_que01", "Gergath : Pierrot Pier will help you. I hope you can use this chance to return to the past and enjoy yourself with your children.",bc_map,"0xFFFF00";
+ disablenpc "Gergath#aru_gd";
+ stopnpctimer;
+ end;
+}
+
+arug_que01,104,140,0 warp back#aru_gd 1,1,arug_dun01,199,192
+
+/*
+arug_que01,104,140,1 script treg#aru_gd 844,{
+ end;
+
+OnEnable:
+ monster "arug_que01",87,93,"Poporing",1031,1,"treg#aru_gd::OnMyMobDead";
+ monster "arug_que01",102,93,"Poporing",1031,1,"treg#aru_gd::OnMyMobDead";
+ monster "arug_que01",117,93,"Poporing",1031,1,"treg#aru_gd::OnMyMobDead";
+ monster "arug_que01",87,80,"Poporing",1031,1,"treg#aru_gd::OnMyMobDead";
+ monster "arug_que01",102,80,"Poporing",1031,1,"treg#aru_gd::OnMyMobDead";
+ monster "arug_que01",117,80,"Poporing",1031,1,"treg#aru_gd::OnMyMobDead";
+ monster "arug_que01",87,65,"Poporing",1031,1,"treg#aru_gd::OnMyMobDead";
+ monster "arug_que01",102,65,"Poporing",1031,1,"treg#aru_gd::OnMyMobDead";
+ monster "arug_que01",117,65,"Poporing",1031,1,"treg#aru_gd::OnMyMobDead";
+ end;
+
+OnMyMobDead:
+ if (mobcount("arug_que01","treg#aru_gd::OnMyMobDead") == 0) {
+ mapannounce "arug_que01", "Pierrot Pier: Beep! Oh, you already opened the gift? You sure are fast now, beep!",bc_map,"0x99CC00";
+ set $@gdeventv_a2,5;
+ }
+ end;
+}
+*/
+
+arug_que01,98,105,3 script #aru_flower_01::GD_Ev_Flower 978,{
+ end;
+}
+
+arug_que01,94,105,3 duplicate(GD_Ev_Flower) #aru_flower_02 977
+arug_que01,90,105,3 duplicate(GD_Ev_Flower) #aru_flower_03 978
+arug_que01,86,105,3 duplicate(GD_Ev_Flower) #aru_flower_04 977
+arug_que01,82,105,3 duplicate(GD_Ev_Flower) #aru_flower_05 978
+arug_que01,79,103,3 duplicate(GD_Ev_Flower) #aru_flower_06 977
+arug_que01,79,100,3 duplicate(GD_Ev_Flower) #aru_flower_07 978
+arug_que01,79,97,3 duplicate(GD_Ev_Flower) #aru_flower_08 977
+arug_que01,79,97,3 duplicate(GD_Ev_Flower) #aru_flower_09 978
+arug_que01,79,94,3 duplicate(GD_Ev_Flower) #aru_flower_10 977
+arug_que01,79,91,3 duplicate(GD_Ev_Flower) #aru_flower_11 978
+arug_que01,79,88,3 duplicate(GD_Ev_Flower) #aru_flower_12 977
+arug_que01,79,85,3 duplicate(GD_Ev_Flower) #aru_flower_13 978
+arug_que01,79,82,3 duplicate(GD_Ev_Flower) #aru_flower_14 977
+arug_que01,79,79,3 duplicate(GD_Ev_Flower) #aru_flower_15 978
+arug_que01,79,76,3 duplicate(GD_Ev_Flower) #aru_flower_16 977
+arug_que01,79,73,3 duplicate(GD_Ev_Flower) #aru_flower_17 978
+arug_que01,79,70,3 duplicate(GD_Ev_Flower) #aru_flower_18 977
+arug_que01,79,67,3 duplicate(GD_Ev_Flower) #aru_flower_19 978
+arug_que01,79,64,3 duplicate(GD_Ev_Flower) #aru_flower_20 977
+arug_que01,79,61,3 duplicate(GD_Ev_Flower) #aru_flower_21 978
+arug_que01,79,58,3 duplicate(GD_Ev_Flower) #aru_flower_22 977
+arug_que01,84,58,3 duplicate(GD_Ev_Flower) #aru_flower_23 978
+arug_que01,89,58,3 duplicate(GD_Ev_Flower) #aru_flower_24 977
+arug_que01,94,58,3 duplicate(GD_Ev_Flower) #aru_flower_25 978
+arug_que01,99,58,3 duplicate(GD_Ev_Flower) #aru_flower_26 977
+arug_que01,104,58,3 duplicate(GD_Ev_Flower) #aru_flower_27 978
+arug_que01,109,58,3 duplicate(GD_Ev_Flower) #aru_flower_28 977
+arug_que01,114,58,3 duplicate(GD_Ev_Flower) #aru_flower_29 978
+arug_que01,119,58,3 duplicate(GD_Ev_Flower) #aru_flower_30 977
+arug_que01,124,58,3 duplicate(GD_Ev_Flower) #aru_flower_31 978
+arug_que01,129,58,3 duplicate(GD_Ev_Flower) #aru_flower_32 977
+arug_que01,129,105,3 duplicate(GD_Ev_Flower) #aru_flower_33 978
+arug_que01,129,103,3 duplicate(GD_Ev_Flower) #aru_flower_34 977
+arug_que01,129,100,3 duplicate(GD_Ev_Flower) #aru_flower_35 978
+arug_que01,129,97,3 duplicate(GD_Ev_Flower) #aru_flower_36 977
+arug_que01,129,97,3 duplicate(GD_Ev_Flower) #aru_flower_37 978
+arug_que01,129,94,3 duplicate(GD_Ev_Flower) #aru_flower_38 977
+arug_que01,129,91,3 duplicate(GD_Ev_Flower) #aru_flower_39 978
+arug_que01,129,88,3 duplicate(GD_Ev_Flower) #aru_flower_40 977
+arug_que01,129,85,3 duplicate(GD_Ev_Flower) #aru_flower_41 978
+arug_que01,129,82,3 duplicate(GD_Ev_Flower) #aru_flower_42 977
+arug_que01,129,79,3 duplicate(GD_Ev_Flower) #aru_flower_43 978
+arug_que01,129,76,3 duplicate(GD_Ev_Flower) #aru_flower_44 977
+arug_que01,129,73,3 duplicate(GD_Ev_Flower) #aru_flower_45 978
+arug_que01,129,70,3 duplicate(GD_Ev_Flower) #aru_flower_46 977
+arug_que01,129,67,3 duplicate(GD_Ev_Flower) #aru_flower_47 978
+arug_que01,129,64,3 duplicate(GD_Ev_Flower) #aru_flower_48 977
+arug_que01,129,61,3 duplicate(GD_Ev_Flower) #aru_flower_49 978
+arug_que01,129,58,3 duplicate(GD_Ev_Flower) #aru_flower_50 977
+arug_que01,124,105,3 duplicate(GD_Ev_Flower) #aru_flower_51 978
+arug_que01,119,105,3 duplicate(GD_Ev_Flower) #aru_flower_52 977
+arug_que01,114,105,3 duplicate(GD_Ev_Flower) #aru_flower_53 978
+arug_que01,109,105,3 duplicate(GD_Ev_Flower) #aru_flower_54 977
+arug_que01,104,105,3 duplicate(GD_Ev_Flower) #aru_flower_55 976
+
+/*
+arug_dun01,5,5,1 script Event controller#aru_gd 81,{
+ input .@input; //,0,9999;
+ if (input == 1854) {
+ mes "How can I help you?";
+ next;
+ switch(select("Reset.:No, thanks.")) {
+ case 1:
+ mes "Completed.";
+ donpcevent "Monster Controler1#aru::OnControler1#aru_gd";
+ donpcevent "Monster Controler1#aru::OnControler1#aru_gd";
+ disablenpc "Dwarf#aru_gd";
+ set $@gdeventv_a1,0;
+ set $@gdeventv_a2,0;
+ set $@gdevents_a$,"";
+ close;
+ case 2:
+ mes "Good bye~";
+ close;
+ }
+ }
+ else {
+ mes "Incorrect password.";
+ close;
+ }
+}
+*/
diff --git a/npc/re/events/gdevent_sch.txt b/npc/re/events/gdevent_sch.txt
new file mode 100644
index 000000000..6bf391b28
--- /dev/null
+++ b/npc/re/events/gdevent_sch.txt
@@ -0,0 +1,1541 @@
+//===== rAthena Script =======================================
+//= Guild dungeon event, Schwaltzvalt.
+//===== By: ==================================================
+//= L0ne_W0lf
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//= Guild dungeon event, Schwaltzvalt. Retrieve Morestone's
+//= pickaxe from Kublin.
+//===== Additional Comments: =================================
+//= 1.0 First version
+//= 1.1 Changed spawn timer to 1 hour. [L0ne_w0lf]
+//============================================================
+
+schg_dun01,1,1,1 script Monster Controler#sch_gd 81,{
+OnInit:
+ donpcevent "Monster Controler1#sch::OnKill";
+ initnpctimer;
+ end;
+
+OnTimer3600000:
+ donpcevent "Monster Controler1#sch::OnEnable";
+ mapannounce "schg_dun01", "Kublin: Aargh!",bc_map,"0x99CC00";
+ mapannounce "schg_dun01", "Morestone: Stop righ there! You thief!",bc_map,"0x99CC00";
+ stopnpctimer;
+ end;
+}
+
+schg_dun01,1,2,1 script Monster Controler1#sch 81,{
+OnEnable:
+ set .@callwhere,rand(1,4);
+ if (.@callwhere == 1) {
+ monster "schg_dun01",164,236,"Kublin",1980,1,"Monster Controler1#sch::OnMyMobDead";
+ }
+ else if (.@callwhere == 2) {
+ monster "schg_dun01",172,122,"Kublin",1980,1,"Monster Controler1#sch::OnMyMobDead";
+ }
+ else if (.@callwhere == 3) {
+ monster "schg_dun01",247,159,"Kublin",1980,1,"Monster Controler1#sch::OnMyMobDead";
+ }
+ else {
+ monster "schg_dun01",250,224,"Kublin",1980,1,"Monster Controler1#sch::OnMyMobDead";
+ }
+ end;
+
+Onkill:
+ killmonster "schg_dun01","Monster Controler1#sch::OnMyMObDead";
+ end;
+
+OnMyMobDead:
+ if (mobcount("schg_dun01","Monster Controler1#sch::OnMyMObDead") == 0) {
+ mapannounce "schg_dun01", "Kublin: Aargh!",bc_map,"0x99CC00";
+ mapannounce "schg_dun01", "Morestone: I thought I heard Kublin screaming!! Who is there? What happened to Kublin? Hey you!",bc_map,"0x99CC00";
+ donpcevent "Dwarf#sch_gd::OnEnable";
+ }
+ end;
+}
+
+schg_dun01,194,148,5 script Dwarf#sch_gd 826,{
+ if (getcharid(2) == 0) {
+ mes "[Dwarf]";
+ mes "Hey did you see an ugly Goblin come by? He stole something from me!";
+ close;
+ }
+ set .@chk_urquest,checkquest(2143,PLAYTIME);
+ set .@chk_yourgdname$,getguildname(getcharid(2));
+ if ($@gdeventv_s1 == 0) {
+ if ($@gdevents_s$ == "") {
+ set $@gdeventv_s1,1;
+ set $@gdevents_s$,.@chk_yourgdname$;
+ mes "[Dwarf]";
+ mes "Help me!";
+ mes "Please, help me!";
+ next;
+ switch(select("What happened?:Nevermind.")) {
+ case 1:
+ mes "[Dwarf]";
+ mes "I am Morestone and I collect rare gems.";
+ next;
+ mes "[Morestone]";
+ mes "In my travels, I was told that there were alot of gems in Valfreyja and Nidhoggur, so I came down here.";
+ mes "But here, the soil is very hard to dig into. Fortunately, my ^3131FFPickaxe^000000 never lets me down!";
+ next;
+ select("Pickaxe!");
+ mes "[Morestone]";
+ mes "Yes, my beloved pickaxe!";
+ mes "I always carry it with me, you know?";
+ next;
+ mes "[Morestone]";
+ mes "We started working here together.";
+ mes "After a few days, we finally found something!";
+ next;
+ select("Something strange??");
+ mes "[Morestone]";
+ mes "No, but it was worth quite alot.";
+ mes "But we did not have much time to celebrate. Suddenly, a monster appeared that stole my pickaxe.";
+ mes "His name was^3131FFKublin^000000!";
+ next;
+ mes "[Morestone]";
+ mes "He stole my Pickaxe!";
+ mes "I can't live without it...";
+ next;
+ if (countitem(6010) > 0) {
+ mes "[" + strcharinfo(0) + "]";
+ mes "Is this the pickaxe that you've been looking for?";
+ next;
+ mes "[Morestone]";
+ mes "You found my Pickaxe?";
+ mes "Show me, please!";
+ next;
+ mes "[Morestone]";
+ mes "Oh, my! You've returned it to me!";
+ mes "My precious pickaxe, I thought I lost you forever.";
+ next;
+ mes "[Morestone]";
+ mes "You are great! What guild are you from?";
+ mes "Could it be Gravity or Mercury?";
+ next;
+ mes "[" + strcharinfo(0) + "]";
+ mes "I am a member of the ^3131FF"+.@chk_yourgdname$+"^.";
+ next;
+ mes "[Morestone]";
+ mes "Oh... That guild will receive my greatest respect.";
+ next;
+ mes "[Morestone]";
+ mes "Oh! My friend, I am very grateful for your help.";
+ mes "As a reward, I will tell you about a mysterious area I have discovered recently.";
+ next;
+ select("A mysterious area?");
+ mes "[Morestone]";
+ mes "That's right. I found it when I was digging around here.";
+ mes "It looks like it was made for some special purpose, but since there are no gems around there, I have no interest in it.";
+ next;
+ mes "[Morestone]";
+ mes "Instead of going there alone, I think it would be more fun to go with your friends...";
+ next;
+ mes "[Morestone]";
+ mes "If you want, I can take ^3131FFyou and your guild members^000000 to explore that area.";
+ mes "Do you want to go there now?";
+ next;
+ switch(select("Wait! I'm not ready yet.:Let's go!")) {
+ case 1:
+ set $@gdeventv_s1,0;
+ set $@gdevents_s$,"";
+ mes "[Morestone]";
+ mes "Take your time, and find a place to gather your friends.";
+ close;
+ case 2:
+ mes "[Morestone]";
+ mes "Alright! Let's go.";
+ mes "If your friends visit me again later, I will guide them to that area again.";
+ mes "Don't forget, dwarves are grateful beings! Hahaha!";
+ delitem 6010,1; //Pickaxe
+ set $@gdeventv_s1,1;
+ set $@gdevents_s$,.@chk_yourgdname$;
+ close2;
+ setquest 2144;
+ warp "schg_que01",103,133;
+ end;
+ }
+ }
+ else {
+ set $@gdeventv_s1,0;
+ set $@gdevents_s$,"";
+ mes "[Morestone]";
+ mes "I will tell you how to find him.";
+ mes "Kublin wears a ridiculous golden hat, It should be easy to recognise him by that.";
+ close;
+ }
+ case 2:
+ set $@gdeventv_s1,0;
+ set $@gdevents_s$,"";
+ emotion e_sob;
+ mes "[Dwarf]";
+ mes "Ahhh...";
+ close;
+ }
+ }
+ else if ($@gdevents_s$ == .@chk_yourgdname$) {
+ set .@chk_urquest1,checkquest(2144);
+ if ((.@chk_urquest1 == 0) || (.@chk_urquest1 == 1)) {
+ mes "[Morestone]";
+ mes "I, Morestone, have made an alliance with the "+$@gdevents_s$+" guild.";
+ mes "Oh, you are a member.";
+ mes "Would you like to go to the mysterious area?";
+ next;
+ switch(select("Let's go.:No, thanks.")) {
+ case 1:
+ mes "[Morestone]";
+ mes "I hope you enjoy yourself, my friend.";
+ close2;
+ warp "schg_que01",103,133;
+ end;
+ case 2:
+ mes "[Morestone]";
+ mes "If you need my assistance, just ask.";
+ mes "Ah! Dont forget, I hate monsters! So I don't want to see them. It will be better if you ask for another favour.";
+ close;
+ }
+ }
+ else {
+ set $@gdeventv_s1,1;
+ set $@gdevents_s$,.@chk_yourgdname$;
+ mes "[Dwarf]";
+ mes "Help me!";
+ mes "Please, help me!";
+ next;
+ switch(select("What happened?:Nevermind.")) {
+ case 1:
+ mes "[Dwarf]";
+ mes "I am Morestone and I collect rare gems.";
+ next;
+ mes "[Morestone]";
+ mes "In my travels, I was told that there were alot of gems in Valfreyja and Nidhoggur, so I came down here.";
+ mes "But here, the soil is very hard to dig into. Fortunately, my ^3131FFPickaxe^000000 never lets me down!";
+ next;
+ select("Pickaxe!");
+ mes "[Morestone]";
+ mes "Yes, my beloved pickaxe!";
+ mes "I always carry it with me, you know?";
+ next;
+ mes "[Morestone]";
+ mes "We started working here together.";
+ mes "After a few days, we finally found something!";
+ next;
+ select("Something strange??");
+ mes "[Morestone]";
+ mes "No, but it was worth quite alot.";
+ mes "But we did not have much time to celebrate. Suddenly, a monster appeared that stole my pickaxe.";
+ mes "His name was^3131FFKublin^000000!";
+ next;
+ mes "[Morestone]";
+ mes "He stole my Pickaxe!";
+ mes "I can't live without it...";
+ next;
+ if (countitem(6010) > 0) {
+ mes "[" + strcharinfo(0) + "]";
+ mes "Is this the pickaxe that you've been looking for?";
+ next;
+ mes "[Morestone]";
+ mes "You found my Pickaxe?";
+ mes "Show me, please!";
+ next;
+ mes "[Morestone]";
+ mes "Oh, my! You've returned it to me!";
+ mes "My precious pickaxe, I thought I lost you forever.";
+ next;
+ mes "[Morestone]";
+ mes "You are great! What guild are you from?";
+ mes "Could it be Gravity or Mercury?";
+ next;
+ mes "[" + strcharinfo(0) + "]";
+ mes "I am a member of the ^3131FF"+.@chk_yourgdname$+"^.";
+ next;
+ mes "[Morestone]";
+ mes "Oh... That guild will receive my greatest respect.";
+ next;
+ mes "[Morestone]";
+ mes "Oh! My friend, I am very grateful for your help.";
+ mes "As a reward, I will tell you about a mysterious area I have discovered recently.";
+ next;
+ select("A mysterious area?");
+ mes "[Morestone]";
+ mes "That's right. I found it when I was digging around here.";
+ mes "It looks like it was made for some special purpose, but since there are no gems around there, I have no interest in it.";
+ next;
+ mes "[Morestone]";
+ mes "Instead of going there alone, I think it would be more fun to go with your friends...";
+ next;
+ mes "[Morestone]";
+ mes "If you want, I can take ^3131FFyou and your guild members^000000 to explore that area.";
+ mes "Do you want to go there now?";
+ next;
+ switch(select("Wait! I'm not ready yet.:Let's go!")) {
+ case 1:
+ set $@gdeventv_s1,0;
+ set $@gdevents_s$,"";
+ mes "[Morestone]";
+ mes "Take your time, and find a place to gather your friends.";
+ close;
+ case 2:
+ mes "[Morestone]";
+ mes "Alright! Let's go.";
+ mes "If your friends visit me again later, I will guide them to that area again.";
+ mes "Don't forget, dwarves are grateful beings! Hahaha!";
+ delitem 6010,1; //Pickaxe
+ set $@gdeventv_s1,1;
+ set $@gdevents_s$,.@chk_yourgdname$;
+ close2;
+ setquest 2144;
+ warp "schg_que01",103,133;
+ end;
+ }
+ }
+ else {
+ set $@gdeventv_s1,0;
+ set $@gdevents_s$,"";
+ mes "[Morestone]";
+ mes "I will tell you how to find him.";
+ mes "Kublin wears a ridiculous golden hat, It should be easy to recognise him by that.";
+ close;
+ }
+ case 2:
+ set $@gdeventv_s1,0;
+ set $@gdevents_s$,"";
+ emotion e_sob;
+ mes "[Dwarf]";
+ mes "Ah....";
+ close;
+ }
+ }
+ }
+ else {
+ mes "[Morestone]";
+ mes "I, Morestone, have made an alliance with the "+$@gdevents_s$+" guild.";
+ mes "Hm, you're not a member.";
+ mes "Could you please give them my greetings?";
+ close;
+ }
+ }
+ else {
+ if ($@gdevents_s$ == .@chk_yourgdname$) {
+ set .@chk_urquest1,checkquest(2144);
+ if ((.@chk_urquest1 == 0) || (.@chk_urquest1 == 1)) {
+ mes "[Morestone]";
+ mes "I, Morestone, have made an alliance with the "+$@gdevents_s$+" guild.";
+ mes "Oh, you are a member.";
+ mes "Would you like to go to the mysterious area?";
+ next;
+ switch(select("Let's go.:No, thanks.")) {
+ case 1:
+ mes "[Morestone]";
+ mes "I hope you enjoy yourself, my friend.";
+ close2;
+ warp "schg_que01",103,133;
+ end;
+ case 2:
+ mes "[Morestone]";
+ mes "If you need my assistance, just ask.";
+ mes "Ah! Dont forget, I hate monsters! So I don't want to see them. It will be better if you ask for another favour.";
+ close;
+ }
+ }
+ else {
+ set $@gdeventv_s1,1;
+ set $@gdevents_s$,.@chk_yourgdname$;
+ mes "[Dwarf]";
+ mes "Help me!";
+ mes "Please, help me!";
+ next;
+ switch(select("What happened?:Nevermind.")) {
+ case 1:
+ mes "[Dwarf]";
+ mes "I am Morestone and I collect rare gems.";
+ next;
+ mes "[Morestone]";
+ mes "In my travels, I was told that there were alot of gems in Valfreyja and Nidhoggur, so I came down here.";
+ mes "But here, the soil is very hard to dig into. Fortunately, my ^3131FFPickaxe^000000 never lets me down!";
+ next;
+ select("Pickaxe!");
+ mes "[Morestone]";
+ mes "Yes, my beloved pickaxe!";
+ mes "I always carry it with me, you know?";
+ next;
+ mes "[Morestone]";
+ mes "We started working here together.";
+ mes "After a few days, we finally found something!";
+ next;
+ select("Something strange??");
+ mes "[Morestone]";
+ mes "No, but it was worth quite alot.";
+ mes "But we did not have much time to celebrate. Suddenly, a monster appeared that stole my pickaxe.";
+ mes "His name was^3131FFKublin^000000!";
+ next;
+ mes "[Morestone]";
+ mes "He stole my Pickaxe!";
+ mes "I can't live without it...";
+ next;
+ if (countitem(6010) > 0) {
+ mes "[" + strcharinfo(0) + "]";
+ mes "Is this the pickaxe that you've been looking for?";
+ next;
+ mes "[Morestone]";
+ mes "You found my Pickaxe?";
+ mes "Show me, please!";
+ next;
+ mes "[Morestone]";
+ mes "Oh, my! You've returned it to me!";
+ mes "My precious pickaxe, I thought I lost you forever.";
+ next;
+ mes "[Morestone]";
+ mes "You are great! What guild are you from?";
+ mes "Could it be Gravity or Mercury?";
+ next;
+ mes "[" + strcharinfo(0) + "]";
+ mes "I am a member of the ^3131FF"+.@chk_yourgdname$+"^.";
+ next;
+ mes "[Morestone]";
+ mes "Oh... That guild will receive my greatest respect.";
+ next;
+ mes "[Morestone]";
+ mes "Oh! My friend, I am very grateful for your help.";
+ mes "As a reward, I will tell you about a mysterious area I have discovered recently.";
+ next;
+ select("A mysterious area?");
+ mes "[Morestone]";
+ mes "That's right. I found it when I was digging around here.";
+ mes "It looks like it was made for some special purpose, but since there are no gems around there, I have no interest in it.";
+ next;
+ mes "[Morestone]";
+ mes "Instead of going there alone, I think it would be more fun to go with your friends...";
+ next;
+ mes "[Morestone]";
+ mes "If you want, I can take ^3131FFyou and your guild members^000000 to explore that area.";
+ mes "Do you want to go there now?";
+ next;
+ switch(select("Wait! I'm not ready yet.:Let's go!")) {
+ case 1:
+ set $@gdeventv_s1,0;
+ set $@gdevents_s$,"";
+ mes "[Morestone]";
+ mes "Take your time, and find a place to gather you friends.";
+ close;
+ case 2:
+ mes "[Morestone]";
+ mes "Alright! Let's go.";
+ mes "If your friends visit me again later, I will guide them to that area again.";
+ mes "Don't forget, dwarves are grateful beings! Hahaha!";
+ delitem 6010,1; //Pickaxe
+ set $@gdeventv_s1,1;
+ set $@gdevents_s$,.@chk_yourgdname$;
+ close2;
+ setquest 2144;
+ warp "schg_que01",103,133;
+ end;
+ }
+ }
+ else {
+ set $@gdeventv_s1,0;
+ set $@gdevents_s$,"";
+ mes "[Morestone]";
+ mes "I will tell you how to find him.";
+ mes "Kublin wears a ridiculous golden hat, It should be easy to recognise him by that.";
+ close;
+ }
+ case 2:
+ set $@gdeventv_s1,0;
+ set $@gdevents_s$,"";
+ emotion e_sob;
+ mes "[Dwarf]";
+ mes "Ah....";
+ close;
+ }
+ }
+ }
+ else {
+ mes "[Morestone]";
+ mes "I, Morestone, have made an alliance with the "+$@gdevents_s$+" guild.";
+ mes "Hm, you're not a member.";
+ mes "Could you please give them my greetings?";
+ close;
+ }
+ }
+ end;
+
+OnInit:
+ disablenpc "Dwarf#sch_gd";
+ set $@gdeventv_s1,0;
+ set $@gdevents_s$,"";
+ end;
+
+OnEnable:
+ enablenpc "Dwarf#sch_gd";
+ end;
+}
+
+schg_que01,100,81,3 script Pierrot Pier#sch_gd 715,{
+ specialeffect EF_POISONHIT;
+ set .@sprchg_gd,rand(1,5);
+ if (.@sprchg_gd == 1) {
+ setnpcdisplay "Pierrot Pier#sch_gd",950;
+ }
+ else if (.@sprchg_gd == 2) {
+ setnpcdisplay "Pierrot Pier#sch_gd",715;
+ }
+ else if (.@sprchg_gd == 3) {
+ setnpcdisplay "Pierrot Pier#sch_gd",714;
+ }
+ else if (.@sprchg_gd == 4) {
+ setnpcdisplay "Pierrot Pier#sch_gd",785;
+ }
+ else {
+ setnpcdisplay "Pierrot Pier#sch_gd",876;
+ }
+ if (checkweight(1201,1) == 0) {
+ mes "- Wait!! -";
+ mes "- You're carrying too many items, -";
+ mes "- you can't receive the materials. -";
+ mes "- Please use the Kafra Services, -";
+ mes "- and come back later. -";
+ close;
+ }
+ if (strcharinfo(0) == getguildmaster(getcharid(2))) {
+ if ($@gdeventv_s2 == 0) {
+ set .@que_2143,checkquest(2143,PLAYTIME);
+ if (.@que_2143 == -1) {
+ setnpcdisplay "Pierrot Pier#sch_gd",715;
+ mes "A lonely clown is juggling.";
+ next;
+ mes "When looked at closely, the clown is just a puppet that looks like a human.";
+ next;
+ mes "The clown stops, then starts moving in accordance to your movements, noises start to emit from it's mouth.";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Beep beep beep.";
+ mes "Hello, my friends!";
+ mapannounce "schg_que01", "Pierrot Pier: Beep beep beep! Hello, my friends!",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "I am the loyal servant of Gergath, and I have finally received my orders.";
+ mes "I am happy to hear all the laughter, but without my master's permission, I can't do anything.";
+ mapannounce "schg_que01", "Pierrot Pier: I am happy to hear all the laughter, but without my master's permission, I can't do anything.",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Did you get permission from Gergath?";
+ mapannounce "schg_que01", "Pierrot Pier: Did you get permission from Gergath?",bc_map,"0x99CC00";
+ next;
+ switch(select("I need to check that.:No.")) {
+ case 1:
+ mes "[Pierrot Pier]";
+ mes "Please give me the palm of your hand.";
+ mapannounce "schg_que01", "Pierrot Pier: Please give me the palm of your hand.",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Let me see...";
+ mapannounce "schg_que01", "Pierrot Pier: Let me see...",bc_map,"0x99CC00";
+ next;
+ emotion e_dots;
+ mes "[Pierrot Pier]";
+ mes "Hm...";
+ mapannounce "schg_que01", "Pierrot Pier: Hm...",bc_map,"0x99CC00";
+ next;
+ emotion e_dots;
+ mes "[Pierrot Pier]";
+ mes "Okay, I see...";
+ mapannounce "schg_que01", "Pierrot Pier: Okay, I see...",bc_map,"0x99CC00";
+ next;
+ emotion e_dots;
+ mes "[Pierrot Pier]";
+ mes "Indeed...";
+ mapannounce "schg_que01", "Pierrot Pier: Indeed...",bc_map,"0x99CC00";
+ next;
+ emotion e_bzz;
+ mes "[Pierrot Pier]";
+ mes "Verification completed!";
+ mapannounce "schg_que01", "Pierrot Pier: Verification completed!",bc_map,"0x99CC00";
+ next;
+ break;
+ case 2:
+ mes "[Pierrot Pier]";
+ mes "Hm? that's right.";
+ mes "When is that person coming? I am very bored~!";
+ close;
+ }
+ mes "[Pierrot Pier]";
+ mes "^3131FF<You're someone who can only think about nonsense everyday, you have no focus at all.>^000000";
+ mapannounce "schg_que01", "Pierrot Pier: <You're someone who can only think about nonsense everyday, you have no focus at all.>",bc_map,"0x99CC00";
+ next;
+ emotion e_ho;
+ mes "[Pierrot Pier]";
+ mes "Hm? You don't think so?";
+ mapannounce "schg_que01", "Pierrot Pier: Hm? You don't think so?",bc_map,"0x99CC00";
+ next;
+ emotion e_heh;
+ mes "[Pierrot Pier]";
+ mes "Haha, I'm just kidding. Beep beep.";
+ mes "Ah, you are the one my master speaks of.";
+ mapannounce "schg_que01", "Pierrot Pier: Haha, I'm just kidding. Beep beep. You are the one my master speaks of.",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Come, the Gergath has left a message for you.";
+ mes "It's a bit old, but it should still be legible.";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Alright, let's begin!";
+ setquest 2143;
+ donpcevent "Gergath#sch_gd::OnEnable";
+ close;
+ }
+ else if ((.@que_2143 == 0) || (.@que_2143 == 1)) {
+ mes "[Pierrot Pier]";
+ mes "Let's talk after I finished reading my master's message. Beep beep.";
+ close;
+ }
+ else {
+ mes "[Pierrot Pier]";
+ mes "My master Gergath sincerely wishes you joy for you and your family everyday.";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Alright, would you like to play the game Gergath has prepared for you?";
+ next;
+ switch(select("Game instructions.:Skip instructions.:Refuse game.")) {
+ case 1:
+ mes "[Pierrot Pier]";
+ mes "The game prepared by my master is very unique, yet simple and fun!";
+ mapannounce "schg_que01", "Pierrot Pier: The game prepared by my lord is very unique, yet simple and fun!",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "It's called \"Find the Treasure Map\"!!";
+ mapannounce "schg_que01", "Pierrot Pier: It's called \"Find the Treasure Map\"!!",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Do you see this large and green field? Beep, beep?";
+ mes "I will show you the most incredible magic here.";
+ mes "I will turn this place very white. Veeery white!";
+ mapannounce "schg_que01", "Pierrot Pier: I will turn this place very white. Veeery white!",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "The game instruction is just to find the treasure map within the time limit.";
+ mes "Sounds easy, right?";
+ mapannounce "schg_que01", "Pierrot Pier: The game instruction is just to find the treasure map within the time limit. ounds easy, right?",bc_map,"0x99CC00";
+ next;
+ break;
+ case 2:
+ break;
+ case 3:
+ emotion e_sob;
+ mes "[Pierrot Pier]";
+ mes "Oh, you don't want to play?";
+ close;
+ }
+ mes "[Pierrot Pier]";
+ mes "Okay, I'm ready to begin.";
+ mes "Shall we start? Beep, beep?";
+ next;
+ switch(select("No.:Start.")) {
+ case 1:
+ mes "[Pierrot Pier]";
+ mes "Let me know when you are ready.";
+ close;
+ case 2:
+ mes "[Pierrot Pier]";
+ mes "Alright! Let us begin!";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Ladies, and gentlemen.";
+ mapannounce "schg_que01", "Pierrot Pier: Ladies, and gentlemen.",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Who will find the treasure map in this white world?";
+ mapannounce "schg_que01", "Pierrot Pier: Who will find the treasure map in this white world?",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Amongst all of you, who shall be the lucky one?";
+ mapannounce "schg_que01", "Pierrot Pier: Amongst all of you, who shall be the lucky one?",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Let the game.. Begin!";
+ mapannounce "schg_que01", "Pierrot Pier: Let the game.. Begin!",bc_map,"0x99CC00";
+ set $@gdeventv_s2,1;
+ donpcevent "Controller#gdevent_s::Ongame_start";
+ erasequest 2143;
+ close;
+ }
+ }
+ }
+ else if ($@gdeventv_s2 == 1) {
+ mes "[Pierrot Pier]";
+ mes "Did you find the treasure map?";
+ mes "Show me what you have in your hands! Beep, beep!";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Let me see...";
+ next;
+ if (countitem(6031) > 0) {
+ donpcevent "Controller#gdevent_s::Onstop";
+ set $@gdeventv_s2,3;
+ donpcevent "eff_mvp#sch_gd::Onmvp";
+ mes "[Pierrot Pier]";
+ mes "Wow~~!!";
+ mes "Success~!!";
+ mes "What a success~!!";
+ mapannounce "schg_que01", "Pierrot Pier: Wow~~!! Success~!! What a success~!!",bc_map,"0x99CC00";
+ delitem 6031,1; //Glitering_PaperB
+ close;
+ }
+ else {
+ if (countitem(6030) > 0) {
+ mes "[Pierrot Pier]";
+ mes "Ahh, what a shame, it seems like you haven't found the treasure map yet.";
+ mes "Quickly! Your time is running out! Hurry up!";
+ close;
+ }
+ else {
+ mes "[Pierrot Pier]";
+ mes "I don't see anything. Have you even started yet? Beep?";
+ mes "Hehe, while you're talking to me, the time is slowly ticking away~";
+ close;
+ }
+ }
+ }
+ else if ($@gdeventv_s2 == 2) {
+ mes "[Pierrot Pier]";
+ mes "Wah, why is it like this~!!";
+ mes "Not enough? But this makes the game fun, no? Hahaha!";
+ next;
+ mes "[Pierrot Pier]";
+ mes "What did you think?";
+ next;
+ switch(select("It was pretty hard.:I should've been successful...")) {
+ case 1:
+ mes "[Pierrot Pier]";
+ mes "It's like trying to find a needle in a haystack!";
+ mes "It's hard, but if you find it, it's worth ten times the effort. Beep, beep.";
+ next;
+ break;
+ case 2:
+ mes "[Pierrot Pier]";
+ mes "Aaah~! Time is gold.";
+ mes "Precious time goes by so fast.";
+ next;
+ break;
+ }
+ mes "[Pierrot Pier]";
+ mes "I, Pierrot Piere, am not a heartless clown! Beep beep.";
+ mapannounce "schg_que01", "Pierrot Pier: I, Pierrot Piere, am not a heartless clown! Beep beep.",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Your success is my happiness!";
+ mes "I'll give you one more chance. How's that? Beep?";
+ mapannounce "schg_que01", "Pierrot Pier: I'll give you one more chance. How's that? Beep?",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Okay, I'm ready to begin.";
+ mes "Shall we start? Beep, beep?";
+ mapannounce "schg_que01", "Pierrot Pier: Okay, I'm ready to begin. Shall we start? Beep, beep?",bc_map,"0x99CC00";
+ next;
+ switch(select("No.:Start.")) {
+ case 1:
+ mes "[Pierrot Pier]";
+ mes "Let me know when you are ready.";
+ close;
+ case 2:
+ mes "[Pierrot Pier]";
+ mes "Alright! Let us begin!";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Ladies, and gentlemen.";
+ mapannounce "schg_que01", "Pierrot Pier: Ladies, and gentlemen.",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Who will find the treasure map in this white world?";
+ mapannounce "schg_que01", "Pierrot Pier: Who will find the treasure map in this white world?",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Amongst all of you, who shall be the lucky one?";
+ mapannounce "schg_que01", "Pierrot Pier: Amongst all of you, who shall be the lucky one?",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Let the game.. Begin!";
+ mapannounce "schg_que01", "Pierrot Pier: Let the game.. Begin!",bc_map,"0x99CC00";
+ set $@gdeventv_s2,10;
+ donpcevent "Controller#gdevent_s::Ongame_start";
+ close;
+ }
+ }
+ else if ($@gdeventv_s2 == 3) {
+ set .@que_2143,checkquest(2143);
+ if (.@que_2143 == 3) {
+ erasequest 2143;
+ }
+ mes "[Pierrot Pier]";
+ mes "How did you do it?";
+ mapannounce "schg_que01", "Pierrot Pier: How did you do it?",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "You managed to find a needle in a haystack!";
+ mes "Amazing!";
+ mapannounce "schg_que01", "Pierrot Pier: You managed to find a needle in a haystack! Amazing!!",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "You've completeled an unbelievable task, I will give you the wonderful gift master has prepared!! Ha!";
+ mapannounce "schg_que01", "Pierrot Pier: You've completeled an unbelievable task, I will give you the wonderful gift my master has prepared!! Ha!",bc_map,"0x99CC00";
+ mapannounce "schg_que01", "Pierrot Pier: Here, take Pierre's Treasure Boxes.",bc_map,"0x99CC00";
+ donpcevent "eff_mvp#sch_gd::Onmvp";
+ set $@gdeventv_s2,5;
+ getitem 14596,10; //Pierre_Treasurebox
+ close;
+ }
+ else if ($@gdeventv_s2 == 4) {
+ mes "[Pierrot Pier]";
+ mes "Incredible! Unbelievable! Beep beep!";
+ close;
+ }
+ else if ($@gdeventv_s2 == 5) {
+ mapannounce "schg_que01", "Pierrot Pier: Seeing your smiles, makes Pierrot feel very happy~ See you next time!",bc_map,"0x99CC00";
+ mes "[Pierrot Pier]";
+ mes "Did you have fun?";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Seeing your smiles, makes Pierrot feel very happy~";
+ next;
+ mes "[Pierrot Pier]";
+ mes "I hope to see you again very soon, I must go back to being a doll now.";
+ mes "See you next time!";
+ erasequest 2144;
+ close;
+ }
+ else {
+ mes "[Pierrot Pier]";
+ mes "Did you find the treasure map?";
+ mes "Show me what you have in your hands! Beep, beep!";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Let me see.";
+ next;
+ if (countitem(6031) > 0) {
+ donpcevent "Controller#gdevent_s::Onstop";
+ set $@gdeventv_s2,3;
+ donpcevent "eff_mvp#sch_gd::Onmvp";
+ mes "[Pierrot Pier]";
+ mes "Wow~~!!";
+ mes "Success~!!";
+ mes "What a success~!!";
+ delitem 6031,1; //Glitering_PaperB
+ close;
+ }
+ else {
+ if (countitem(6030) > 0) {
+ mes "[Pierrot Pier]";
+ mes "Ahh, what a shame, it seems like you haven't found the treasure map yet.";
+ mes "Quickly! Your time is running out! Hurry up!";
+ close;
+ }
+ else {
+ mes "[Pierrot Pier]";
+ mes "I don't see anything. Have you even started yet? Beep?";
+ mes "Hehe, while you're talking to me, the time is slowly ticking away~";
+ close;
+ }
+ }
+ }
+ }
+ else {
+ if ($@gdeventv_s2 == 0) {
+ setnpcdisplay "Pierrot Pier#sch_gd",715;
+ mes "A lonely clown is juggling.";
+ next;
+ mes "When looked at closely, the clown is just a puppet that looks like a human.";
+ next;
+ mes "The clown stops, then starts moving in accordance to your movements, noises start to emit from it's mouth.";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Beep beep beep.";
+ mes "Hello, my friends!";
+ mapannounce "schg_que01", "Pierrot Pier: Beep beep beep! Hello, my friends!",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "I am the loyal servant of Gergath, and I have finally received my orders.";
+ mes "I am happy to hear all the laughter, but without my master's permission, I can't do anything.";
+ mapannounce "schg_que01", "Pierrot Pier: I am happy to hear all the laughter, but without my master's permission, I can't do anything.",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Did you get permission from the Gergath?";
+ mapannounce "schg_que01", "Pierrot Pier: Did you get permission from Gergath?",bc_map,"0x99CC00";
+ next;
+ switch(select("I need to check that.:No.")) {
+ case 1:
+ mes "[Pierrot Pier]";
+ mes "Please give me the palm of your hand.";
+ mapannounce "schg_que01", "Pierrot Pier: Please give me the palm of your hand.",bc_map,"0x99CC00";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Let me see...";
+ mapannounce "schg_que01", "Pierrot Pier: Let me see...",bc_map,"0x99CC00";
+ next;
+ emotion e_dots;
+ mes "[Pierrot Pier]";
+ mes "Hm...";
+ mapannounce "schg_que01", "Pierrot Pier: Hm...",bc_map,"0x99CC00";
+ next;
+ emotion e_dots;
+ mes "[Pierrot Pier]";
+ mes "Okay, I see...";
+ mapannounce "schg_que01", "Pierrot Pier: Okay, I see...",bc_map,"0x99CC00";
+ next;
+ emotion e_dots;
+ mes "[Pierrot Pier]";
+ mes "Indeed...";
+ mapannounce "schg_que01", "Pierrot Pier: Indeed...",bc_map,"0x99CC00";
+ next;
+ emotion e_bzz;
+ mes "[Pierrot Pier]";
+ mes "Verification completed!";
+ mapannounce "schg_que01", "Pierrot Pier: Verification completed!",bc_map,"0x99CC00";
+ next;
+ break;
+ case 2:
+ mes "[Pierrot Pier]";
+ mes "Hm? that's right.";
+ mes "When is that person coming? I am very bored~!";
+ close;
+ }
+ emotion 18;
+ mes "[Pierrot Pier]";
+ mes "^3131FF<Although you're a weirdo, you seem to be very dedicated>^000000. Beep beep.";
+ next;
+ emotion e_swt2;
+ mes "[Pierrot Pier]";
+ mes "Hm? You don't think so?";
+ next;
+ mes "[Pierrot Pier]";
+ mes "The one my lord appointed is ^3131FF< someone who leads many people >^000000. Beep.";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Pierrot wants to be someone like that, too. Beep.";
+ close;
+ }
+ else if ($@gdeventv_s2 == 1) {
+ mes "[Pierrot Pier]";
+ mes "Did you find the treasure map?";
+ mes "Show me what you have in your hands! Beep, beep!";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Let me see...";
+ next;
+ if (countitem(6031) > 0) {
+ donpcevent "Controller#gdevent_s::Onstop";
+ set $@gdeventv_s2,3;
+ donpcevent "eff_mvp#sch_gd::Onmvp";
+ mes "[Pierrot Pier]";
+ mes "Wow~~!!";
+ mes "Success~!!";
+ mes "What a success~!!";
+ mapannounce "schg_que01", "Pierrot Pier: Wow~~!! Success~!! What a success~!!",bc_map,"0x99CC00";
+ delitem 6031,1; //Glitering_PaperB
+ close;
+ }
+ else {
+ if (countitem(6030) > 0) {
+ mes "[Pierrot Pier]";
+ mes "Ahh, what a shame, it seems like you haven't found the treasure map yet.";
+ mes "Quickly! Your time is running out! Hurry up!";
+ close;
+ }
+ else {
+ mes "[Pierrot Pier]";
+ mes "I don't see anything. Have you even started yet? Beep?";
+ mes "Hehe, while you're talking to me, the time is slowly ticking away~";
+ close;
+ }
+ }
+ }
+ else if ($@gdeventv_s2 == 2) {
+ mes "[Pierrot Pier]";
+ mes "Wah, why is it like this~!!";
+ mes "Not enough? But this makes the game fun, no? Hahaha!";
+ close;
+ }
+ else if ($@gdeventv_s2 == 3) {
+ mes "[Pierrot Pier]";
+ mes "Congratulations, you have succeeded!";
+ mes "I will talk to your leader about other details.";
+ close;
+ }
+ else if ($@gdeventv_s2 == 4) {
+ mes "[Pierrot Pier]";
+ mes "Incredible! Unbelievable! Beep beep!";
+ close;
+ }
+ else if ($@gdeventv_s2 == 5) {
+ mes "[Pierrot Pier]";
+ mes "Did you have fun?";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Seeing your smiles, makes Pierrot feel very happy~";
+ next;
+ mes "[Pierrot Pier]";
+ mes "I hope to see you again very soon, I must go back to being a doll now.";
+ mes "See you next time!";
+ close;
+ }
+ else {
+ mes "[Pierrot Pier]";
+ mes "Voc� encontrou o tesouro?";
+ mes "Mostre-me o que voc� tem nas m�os agora.";
+ next;
+ mes "[Pierrot Pier]";
+ mes "Deixe-me ver...";
+ next;
+ if (countitem(6031) > 0) {
+ donpcevent "Controller#gdevent_s::Onstop";
+ set $@gdeventv_s2,3;
+ donpcevent "eff_mvp#sch_gd::Onmvp";
+ mes "[Pierrot Pier]";
+ mes "Wow~~!!";
+ mes "Success~!!";
+ mes "What a success~!!";
+ delitem 6031,1; //Glitering_PaperB
+ close;
+ }
+ else {
+ if (countitem(6030) > 0) {
+ mes "[Pierrot Pier]";
+ mes "Ahh, what a shame, it seems like you haven't found the treasure map yet.";
+ mes "Quickly! Your time is running out! Hurry up!";
+ close;
+ }
+ else {
+ mes "[Pierrot Pier]";
+ mes "I don't see anything. Have you even started yet? Beep?";
+ mes "Hehe, while you're talking to me, the time is slowly ticking away~";
+ close;
+ }
+ }
+ }
+ }
+}
+
+schg_que01,10,10,3 script Controller#gdevent_s 81,{
+OnInit:
+ set $@gdeventv_s2,0;
+ end;
+
+Onwin:
+ donpcevent "treg#sch_gd::OnEnable";
+ end;
+
+Ongame_start:
+ initnpctimer;
+ donpcevent "paper_sp_1_s::OnEnable";
+ donpcevent "paper_sp_2_s::OnEnable";
+ donpcevent "paper_sp_3_s::OnEnable";
+ donpcevent "paper_sp_4_s::OnEnable";
+ donpcevent "paper_sp_5_s::OnEnable";
+ donpcevent "paper_sp_6_s::OnEnable";
+ donpcevent "paper_sp_7_s::OnEnable";
+ donpcevent "paper_sp_8_s::OnEnable";
+ donpcevent "paper_sp_9_s::OnEnable";
+ set .@roulette_where,rand(1,9);
+ if (.@roulette_where == 1) {
+ donpcevent "paper_sp_1_s::Onbingo";
+ }
+ else if (.@roulette_where == 2) {
+ donpcevent "paper_sp_2_s::Onbingo";
+ }
+ else if (.@roulette_where == 3) {
+ donpcevent "paper_sp_3_s::Onbingo";
+ }
+ else if (.@roulette_where == 4) {
+ donpcevent "paper_sp_4_s::Onbingo";
+ }
+ else if (.@roulette_where == 5) {
+ donpcevent "paper_sp_5_s::Onbingo";
+ }
+ else if (.@roulette_where == 6) {
+ donpcevent "paper_sp_6_s::Onbingo";
+ }
+ else if (.@roulette_where == 7) {
+ donpcevent "paper_sp_7_s::Onbingo";
+ }
+ else if (.@roulette_where == 8) {
+ donpcevent "paper_sp_8_s::Onbingo";
+ }
+ else {
+ donpcevent "paper_sp_9_s::Onbingo";
+ }
+ end;
+
+Onstop:
+ stopnpctimer;
+ end;
+
+OnTimer40000:
+ mapannounce "schg_que01", "Pierrot Pier: Time is running out, hurry up!",bc_map,"0x99CC00";
+ end;
+
+OnTimer60000:
+ mapannounce "schg_que01", "Pierrot Pier: Time is up!",bc_map,"0x99CC00";
+ mapwarp "schg_que01","schg_que01",100,79;
+ enablenpc "removepp_sch_gd";
+ set $@gdeventv_s2,2;
+ end;
+
+OnTimer63000:
+ stopnpctimer;
+ end;
+}
+
+schg_que01,87,93,0 script paper_sp_1_s 139,{
+ end;
+
+OnEnable:
+ set .@paper_while1,0;
+ while(1) {
+ if (.@paper_while1 == 100) {
+ break;
+ }
+ else {
+ set .@paper_while1,.@paper_while1+1;
+ set .@paper_x1,rand(81,95);
+ set .@paper_y1,rand(87,100);
+ makeitem 6030,1,"schg_que01",.@paper_x1,.@paper_y1; //Glitering_PaperA
+ }
+ }
+ end;
+
+Onbingo:
+ set .@paper_x1,rand(81,95);
+ set .@paper_y1,rand(87,100);
+ makeitem 6031,1,"schg_que01",.@paper_x1,.@paper_y1; //Glitering_PaperB
+ end;
+}
+
+schg_que01,102,93,0 script paper_sp_2_s 139,{
+ end;
+
+OnEnable:
+ set .@paper_while2,0;
+ while(1) {
+ if (.@paper_while2 == 100) {
+ break;
+ }
+ else {
+ set .@paper_while2,.@paper_while2+1;
+ set .@paper_x2,rand(96,110);
+ set .@paper_y2,rand(87,100);
+ makeitem 6030,1,"schg_que01",.@paper_x2,.@paper_y2; //Glitering_PaperA
+ }
+ }
+ end;
+
+Onbingo:
+ set .@paper_x2,rand(96,110);
+ set .@paper_y2,rand(87,100);
+ makeitem 6031,1,"schg_que01",.@paper_x2,.@paper_y2; //Glitering_PaperB
+ end;
+}
+
+schg_que01,117,93,0 script paper_sp_3_s 139,{
+ end;
+
+OnEnable:
+ set .@paper_while3,0;
+ while(1) {
+ if (.@paper_while3 == 100) {
+ break;
+ }
+ else {
+ set .@paper_while3,.@paper_while3+1;
+ set .@paper_x3,rand(111,124);
+ set .@paper_y3,rand(87,100);
+ makeitem 6030,1,"schg_que01",.@paper_x3,.@paper_y3; //Glitering_PaperA
+ }
+ }
+ end;
+
+Onbingo:
+ set .@paper_x3,rand(111,124);
+ set .@paper_y3,rand(87,100);
+ makeitem 6031,1,"schg_que01",.@paper_x3,.@paper_y3; //Glitering_PaperB
+ end;
+}
+
+schg_que01,87,80,0 script paper_sp_4_s 139,{
+ end;
+
+OnEnable:
+ set .@paper_while4,0;
+ while(1) {
+ if (.@paper_while4 == 100) {
+ break;
+ }
+ else {
+ set .@paper_while4,.@paper_while4+1;
+ set .@paper_x4,rand(81,95);
+ set .@paper_y4,rand(73,86);
+ makeitem 6030,1,"schg_que01",.@paper_x4,.@paper_y4; //Glitering_PaperA
+ }
+ }
+ end;
+
+Onbingo:
+ set .@paper_x4,rand(81,95);
+ set .@paper_y4,rand(73,86);
+ makeitem 6031,1,"schg_que01",.@paper_x4,.@paper_y4; //Glitering_PaperB
+ end;
+}
+
+schg_que01,102,80,0 script paper_sp_5_s 139,{
+ end;
+
+OnEnable:
+ set .@paper_while5,0;
+ while(1) {
+ if (.@paper_while5 == 100) {
+ break;
+ }
+ else {
+ set .@paper_while5,.@paper_while5+1;
+ set .@paper_x5,rand(96,110);
+ set .@paper_y5,rand(73,86);
+ makeitem 6030,1,"schg_que01",.@paper_x5,.@paper_y5; //Glitering_PaperA
+ }
+ }
+ end;
+
+Onbingo:
+ set .@paper_x5,rand(96,110);
+ set .@paper_y5,rand(73,86);
+ makeitem 6031,1,"schg_que01",.@paper_x5,.@paper_y5; //Glitering_PaperB
+ end;
+}
+
+schg_que01,117,80,0 script paper_sp_6_s 139,{
+ end;
+
+OnEnable:
+ set .@paper_while6,0;
+ while(1) {
+ if (.@paper_while6 == 100) {
+ break;
+ }
+ else {
+ set .@paper_while6,.@paper_while6+1;
+ set .@paper_x6,rand(111,124);
+ set .@paper_y6,rand(73,86);
+ makeitem 6030,1,"schg_que01",.@paper_x6,.@paper_y6; //Glitering_PaperA
+ }
+ }
+ end;
+
+Onbingo:
+ set .@paper_x6,rand(111,124);
+ set .@paper_y6,rand(73,86);
+ makeitem 6031,1,"schg_que01",.@paper_x6,.@paper_y6; //Glitering_PaperB
+ end;
+}
+
+schg_que01,87,65,0 script paper_sp_7_s 139,{
+ end;
+
+OnEnable:
+ set .@paper_while7,0;
+ while(1) {
+ if (.@paper_while7 == 100) {
+ break;
+ }
+ else {
+ set .@paper_while7,.@paper_while7+1;
+ set .@paper_x7,rand(81,95);
+ set .@paper_y7,rand(59,72);
+ makeitem 6030,1,"schg_que01",.@paper_x7,.@paper_y7; //Glitering_PaperA
+ }
+ }
+ end;
+
+Onbingo:
+ set .@paper_x7,rand(81,95);
+ set .@paper_y7,rand(59,72);
+ makeitem 6031,1,"schg_que01",.@paper_x7,.@paper_y7; //Glitering_PaperB
+ end;
+}
+
+schg_que01,102,65,0 script paper_sp_8_s 139,{
+ end;
+
+OnEnable:
+ set .@paper_while8,0;
+ while(1) {
+ if (.@paper_while8 == 100) {
+ break;
+ }
+ else {
+ set .@paper_while8,.@paper_while8+1;
+ set .@paper_x8,rand(96,110);
+ set .@paper_y8,rand(59,72);
+ makeitem 6030,1,"schg_que01",.@paper_x8,.@paper_y8; //Glitering_PaperA
+ }
+ }
+ end;
+
+Onbingo:
+ set .@paper_x8,rand(96,110);
+ set .@paper_y8,rand(59,72);
+ makeitem 6031,1,"schg_que01",.@paper_x8,.@paper_y8; //Glitering_PaperB
+ end;
+}
+
+schg_que01,117,65,0 script paper_sp_9_s 139,{
+ end;
+
+OnEnable:
+ set .@paper_while9,0;
+ while(1) {
+ if (.@paper_while9 == 100) {
+ break;
+ }
+ else {
+ set .@paper_while9,.@paper_while9+1;
+ set .@paper_x9,rand(111,124);
+ set .@paper_y9,rand(59,72);
+ makeitem 6030,1,"schg_que01",.@paper_x9,.@paper_y9; //Glitering_PaperA
+ }
+ }
+ end;
+
+Onbingo:
+ set .@paper_x9,rand(111,124);
+ set .@paper_y9,rand(59,72);
+ makeitem 6031,1,"schg_que01",.@paper_x9,.@paper_y9; //Glitering_PaperB
+ end;
+}
+
+schg_que01,100,80,0 script removepp_sch_gd -1,5,5,{
+ end;
+
+OnInit:
+ disablenpc "removepp_sch_gd";
+ end;
+
+OnTouch2:
+ set .@paper_sch_gd,countitem(6030);
+ set .@spaper_sch_gd,countitem(6031);
+ if ((.@paper_sch_gd > 0) || (.@spaper_sch_gd > 0)) {
+ delitem 6030,.@paper_sch_gd; //Glitering_PaperA
+ delitem 6031,.@spaper_sch_gd; //Glitering_PaperB
+ }
+ end;
+}
+
+schg_que01,6,6,1 script eff_mvp#sch_gd 844,{
+ end;
+
+Onmvp:
+ initnpctimer;
+ end;
+
+OnTimer1000:
+ specialeffect EF_MVP,AREA,"paper_sp_1_s";
+ specialeffect EF_MVP,AREA,"paper_sp_3_s";
+ specialeffect EF_MVP,AREA,"paper_sp_5_s";
+ specialeffect EF_MVP,AREA,"paper_sp_7_s";
+ specialeffect EF_MVP,AREA,"paper_sp_9_s";
+ end;
+
+OnTimer2000:
+ specialeffect EF_MVP,AREA,"paper_sp_2_s";
+ specialeffect EF_MVP,AREA,"paper_sp_4_s";
+ specialeffect EF_MVP,AREA,"paper_sp_6_s";
+ specialeffect EF_MVP,AREA,"paper_sp_8_s";
+ end;
+
+OnTimer3000:
+ specialeffect EF_MVP,AREA,"paper_sp_1_s";
+ specialeffect EF_MVP,AREA,"paper_sp_3_s";
+ specialeffect EF_MVP,AREA,"paper_sp_5_s";
+ specialeffect EF_MVP,AREA,"paper_sp_7_s";
+ specialeffect EF_MVP,AREA,"paper_sp_9_s";
+ end;
+
+OnTimer4000:
+ specialeffect EF_MVP,AREA,"paper_sp_2_s";
+ specialeffect EF_MVP,AREA,"paper_sp_4_s";
+ specialeffect EF_MVP,AREA,"paper_sp_6_s";
+ specialeffect EF_MVP,AREA,"paper_sp_8_s";
+ stopnpctimer;
+ end;
+}
+
+schg_que01,100,75,5 script Gergath#sch_gd 412,{
+ end;
+
+OnInit:
+ disablenpc "Gergath#sch_gd";
+ end;
+
+OnEnable:
+ enablenpc "Gergath#sch_gd";
+ specialeffect EF_FORESTLIGHT;
+ initnpctimer;
+ end;
+
+OnTimer5000:
+ mapannounce "schg_que01", "Gergath : My dear friend, how have you been? This is something I prepared for you.",bc_map,"0xFFFF00";
+ end;
+
+OnTimer10000:
+ mapannounce "schg_que01", "Gergath : Do you still remember when we were young? We fought everyday like we were sworn enemies.",bc_map,"0xFFFF00";
+ end;
+
+OnTimer15000:
+ mapannounce "schg_que01", "Gergath : No matter how hard the adults tried, we had no intentions to change. Haha.",bc_map,"0xFFFF00";
+ end;
+
+OnTimer20000:
+ mapannounce "schg_que01", "Gergath : But I believe that deep inside, we valued our friendship with each other.",bc_map,"0xFFFF00";
+ end;
+
+OnTimer25000:
+ mapannounce "schg_que01", "Gergath : After I lost my mother's remnants in Mt. Mjolnir, you came to find me.",bc_map,"0xFFFF00";
+ end;
+
+OnTimer30000:
+ mapannounce "schg_que01", "Gergath : When you, handed me my mother's remnants, I couldn't even say thank you.",bc_map,"0xFFFF00";
+ end;
+
+OnTimer35000:
+ mapannounce "schg_que01", "Gergath : I couldn't say it even as I became an old man.",bc_map,"0xFFFF00";
+ end;
+
+OnTimer40000:
+ mapannounce "schg_que01", "Gergath : I found out about your whereabouts not long ago. I heard you were taking care of orphaned children?",bc_map,"0xFFFF00";
+ end;
+
+OnTimer45000:
+ mapannounce "schg_que01", "Gergath : Please accept this as a gift from a useless friend to you and your beloved children. I hope you will like it, haha.",bc_map,"0xFFFF00";
+ end;
+
+OnTimer50000:
+ mapannounce "schg_que01", "Gergath : Pierrot Pier will help you. I hope you can use this chance to return to the past and enjoy yourself with your children.",bc_map,"0xFFFF00";
+ disablenpc "Gergath#sch_gd";
+ stopnpctimer;
+ end;
+}
+
+schg_que01,104,140,0 warp back#sch_gd 1,1,schg_dun01,199,192
+
+/*
+schg_que01,104,140,1 script treg#sch_gd 844,{
+ end;
+
+OnEnable:
+ monster "schg_que01",87,93,"Poporing",1031,1,"treg#sch_gd::OnMyMobDead";
+ monster "schg_que01",102,93,"Poporing",1031,1,"treg#sch_gd::OnMyMobDead";
+ monster "schg_que01",117,93,"Poporing",1031,1,"treg#sch_gd::OnMyMobDead";
+ monster "schg_que01",87,80,"Poporing",1031,1,"treg#sch_gd::OnMyMobDead";
+ monster "schg_que01",102,80,"Poporing",1031,1,"treg#sch_gd::OnMyMobDead";
+ monster "schg_que01",117,80,"Poporing",1031,1,"treg#sch_gd::OnMyMobDead";
+ monster "schg_que01",87,65,"Poporing",1031,1,"treg#sch_gd::OnMyMobDead";
+ monster "schg_que01",102,65,"Poporing",1031,1,"treg#sch_gd::OnMyMobDead";
+ monster "schg_que01",117,65,"Poporing",1031,1,"treg#sch_gd::OnMyMobDead";
+ end;
+
+OnMyMobDead:
+ if (mobcount("schg_que01","treg#sch_gd::OnMyMobDead") == 0) {
+ mapannounce "schg_que01", "Pierrot Pier: Beep! Oh, you already opened the gift? You sure are fast now, beep!",bc_map,"0x99CC00";
+ set $@gdeventv_s2,5;
+ }
+ end;
+}
+*/
+
+schg_que01,98,105,3 script #sch_flower_01::GD_Ev_Flower2 978,{
+ end;
+}
+
+schg_que01,94,105,3 duplicate(GD_Ev_Flower2) #sch_flower_02 977
+schg_que01,90,105,3 duplicate(GD_Ev_Flower2) #sch_flower_03 978
+schg_que01,86,105,3 duplicate(GD_Ev_Flower2) #sch_flower_04 977
+schg_que01,82,105,3 duplicate(GD_Ev_Flower2) #sch_flower_05 978
+schg_que01,79,103,3 duplicate(GD_Ev_Flower2) #sch_flower_06 977
+schg_que01,79,100,3 duplicate(GD_Ev_Flower2) #sch_flower_07 978
+schg_que01,79,97,3 duplicate(GD_Ev_Flower2) #sch_flower_08 977
+schg_que01,79,97,3 duplicate(GD_Ev_Flower2) #sch_flower_09 978
+schg_que01,79,94,3 duplicate(GD_Ev_Flower2) #sch_flower_10 977
+schg_que01,79,91,3 duplicate(GD_Ev_Flower2) #sch_flower_11 978
+schg_que01,79,88,3 duplicate(GD_Ev_Flower2) #sch_flower_12 977
+schg_que01,79,85,3 duplicate(GD_Ev_Flower2) #sch_flower_13 978
+schg_que01,79,82,3 duplicate(GD_Ev_Flower2) #sch_flower_14 977
+schg_que01,79,79,3 duplicate(GD_Ev_Flower2) #sch_flower_15 978
+schg_que01,79,76,3 duplicate(GD_Ev_Flower2) #sch_flower_16 977
+schg_que01,79,73,3 duplicate(GD_Ev_Flower2) #sch_flower_17 978
+schg_que01,79,70,3 duplicate(GD_Ev_Flower2) #sch_flower_18 977
+schg_que01,79,67,3 duplicate(GD_Ev_Flower2) #sch_flower_19 978
+schg_que01,79,64,3 duplicate(GD_Ev_Flower2) #sch_flower_20 977
+schg_que01,79,61,3 duplicate(GD_Ev_Flower2) #sch_flower_21 978
+schg_que01,79,58,3 duplicate(GD_Ev_Flower2) #sch_flower_22 977
+schg_que01,84,58,3 duplicate(GD_Ev_Flower2) #sch_flower_23 978
+schg_que01,89,58,3 duplicate(GD_Ev_Flower2) #sch_flower_24 977
+schg_que01,94,58,3 duplicate(GD_Ev_Flower2) #sch_flower_25 978
+schg_que01,99,58,3 duplicate(GD_Ev_Flower2) #sch_flower_26 977
+schg_que01,104,58,3 duplicate(GD_Ev_Flower2) #sch_flower_27 978
+schg_que01,109,58,3 duplicate(GD_Ev_Flower2) #sch_flower_28 977
+schg_que01,114,58,3 duplicate(GD_Ev_Flower2) #sch_flower_29 978
+schg_que01,119,58,3 duplicate(GD_Ev_Flower2) #sch_flower_30 977
+schg_que01,124,58,3 duplicate(GD_Ev_Flower2) #sch_flower_31 978
+schg_que01,129,58,3 duplicate(GD_Ev_Flower2) #sch_flower_32 977
+schg_que01,129,105,3 duplicate(GD_Ev_Flower2) #sch_flower_33 978
+schg_que01,129,103,3 duplicate(GD_Ev_Flower2) #sch_flower_34 977
+schg_que01,129,100,3 duplicate(GD_Ev_Flower2) #sch_flower_35 978
+schg_que01,129,97,3 duplicate(GD_Ev_Flower2) #sch_flower_36 977
+schg_que01,129,97,3 duplicate(GD_Ev_Flower2) #sch_flower_37 978
+schg_que01,129,94,3 duplicate(GD_Ev_Flower2) #sch_flower_38 977
+schg_que01,129,91,3 duplicate(GD_Ev_Flower2) #sch_flower_39 978
+schg_que01,129,88,3 duplicate(GD_Ev_Flower2) #sch_flower_40 977
+schg_que01,129,85,3 duplicate(GD_Ev_Flower2) #sch_flower_41 978
+schg_que01,129,82,3 duplicate(GD_Ev_Flower2) #sch_flower_42 977
+schg_que01,129,79,3 duplicate(GD_Ev_Flower2) #sch_flower_43 978
+schg_que01,129,76,3 duplicate(GD_Ev_Flower2) #sch_flower_44 977
+schg_que01,129,73,3 duplicate(GD_Ev_Flower2) #sch_flower_45 978
+schg_que01,129,70,3 duplicate(GD_Ev_Flower2) #sch_flower_46 977
+schg_que01,129,67,3 duplicate(GD_Ev_Flower2) #sch_flower_47 978
+schg_que01,129,64,3 duplicate(GD_Ev_Flower2) #sch_flower_48 977
+schg_que01,129,61,3 duplicate(GD_Ev_Flower2) #sch_flower_49 978
+schg_que01,129,58,3 duplicate(GD_Ev_Flower2) #sch_flower_50 977
+schg_que01,124,105,3 duplicate(GD_Ev_Flower2) #sch_flower_51 978
+schg_que01,119,105,3 duplicate(GD_Ev_Flower2) #sch_flower_52 977
+schg_que01,114,105,3 duplicate(GD_Ev_Flower2) #sch_flower_53 978
+schg_que01,109,105,3 duplicate(GD_Ev_Flower2) #sch_flower_54 977
+schg_que01,104,105,3 duplicate(GD_Ev_Flower2) #sch_flower_55 976
+
+/*
+schg_dun01,5,5,1 script Event controller#sch_gd 81,{
+ input .@input; //,0,9999;
+ if (input == 1854) {
+ mes "How can I help you?";
+ next;
+ switch(select("Reset.:No, thanks.")) {
+ case 1:
+ mes "Completed.";
+ donpcevent "Monster Controler1#sch::OnControler1#sch_gd";
+ donpcevent "Monster Controler1#sch::OnControler1#sch_gd";
+ disablenpc "Dwarf#sch_gd";
+ set $@gdeventv_s1,0;
+ set $@gdeventv_s2,0;
+ set $@gdevents_s$,"";
+ close;
+ case 2:
+ mes "Good bye~";
+ close;
+ }
+ }
+ else {
+ mes "Incorrect password.";
+ close;
+ }
+}
+*/
diff --git a/npc/re/events/god_se_festival.txt b/npc/re/events/god_se_festival.txt
new file mode 100644
index 000000000..c9f84d6e0
--- /dev/null
+++ b/npc/re/events/god_se_festival.txt
@@ -0,0 +1,781 @@
+//===== rAthena Script =======================================
+//= Valkyrie's Gift NPCs
+//===== By: ==================================================
+//= L0ne_W0lf
+//===== Current Version: =====================================
+//= 1.0
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//= [Aegis Conversion]
+//= Post-God Item SE Creation Summoning Event
+//= Second Sister is a cusotm translation.
+//===== Additional Comments: =================================
+//= 1.0 First version. [L0ne_W0lf]
+//============================================================
+
+/*
+yuno,1,1,0 script Festival Manager#gq_fes00 891,{
+ mes "[Festival Manager]";
+ mes "I am the festival NPC manager for the God SE quest.";
+ mes "Please enter your password.";
+ next;
+ input .@input$;
+ if (.@input$ != "07godsefes") {
+ mes "[Festival Manager]";
+ mes "Password is incorrect.";
+ close;
+ }
+ mes "[Festival Manager]";
+ mes "What would you like to do?";
+ next;
+ switch(select("Disable festival NPCs:Enable festival NPCs")) {
+ case 1:
+ mes "[Festival Manager]";
+ mes "Ending festivals and disabling NPCs.";
+ donpcevent "Rmimi Ravies#gq_fes01::Onover";
+ donpcevent "Rmimi Ravies#gq_fes01::Onover";
+ close;
+ case 2:
+ mes "[Festival Manager]";
+ mes "Resetting festivals and enabling NPCs.";
+ donpcevent "Rmimi Ravies#gq_fes01::Onover";
+ donpcevent "Rmimi Ravies#gq_fes01::OnEnable";
+ close;
+ }
+}
+*/
+
+yuno,118,192,5 script Rmimi Ravies#gq_fes01 891,{
+ set .@GID, getcharid(2);
+ if (countitem(7840) > 0) {
+ mes "[Rmimi Ravies]";
+ mes "This is the flower.";
+ mes "This is just a formality, but let me check your qualifications.";
+ next;
+ if (strcharinfo(0) == getguildmaster(.@GID)) {
+ mes "[Rmimi Ravies]";
+ mes "Your qualification is verified as a Guild master.";
+ next;
+ mes "[Rmimi Ravies]";
+ mes "I wonder if you know what this flower's use is... Let me explain it to you.";
+ next;
+ mes "[Rmimi Ravies]";
+ mes "This is the holy flower given by the Wish Maiden in Valkyrie, it can summon certain monsters by certain summoners.";
+ next;
+ mes "[Rmimi Ravies]";
+ mes "There are only two summoners in this world...";
+ mes "Me and my sister Rhehe...";
+ next;
+ mes "[Rmimi Ravies]";
+ mes "We are totllly different, but we can...";
+ next;
+ mes "[Rmimi Ravies]";
+ mes "...................................";
+ next;
+ mes "[Rmimi Ravies]";
+ mes "Anyway,";
+ mes "Do you want to summon monsters?";
+ next;
+ switch(select("Do not summon:Summon, please")) {
+ case 1:
+ mes "[Rmimi Ravies]";
+ mes "I don't like to be interrupted by others..";
+ next;
+ mes "[Rmimi Ravies]";
+ mes "But it's just business.";
+ close;
+ case 2:
+ break;
+ }
+ mes "[Rmimi Ravies]";
+ mes "I will explain to you how to summon monsters.";
+ mes "This flower can summon the monsters 'Valkyrie's Blessing' and 'Valkyrie's Present' for one hour here in Juno.";
+ next;
+ mes "[Rmimi Ravies]";
+ mes "An announcement will be made stating which monster is summoned.";
+ mes "This festival is given by the Wish maiden for all adventurers to enjoy all over the world.";
+ next;
+ mes "[Rmimi Ravies]";
+ mes "Now, are you ready to summon monsters?";
+ next;
+ switch(select("No, I'm not ready now.:Yes! I'm ready for that.")) {
+ case 1:
+ mes "[Rmimi Ravies]";
+ mes "If you are not ready, why did you come to me?";
+ next;
+ mes "[Rmimi Ravies]";
+ mes "I'll be waiting until you are ready.";
+ mes "It is just business afterall.";
+ close;
+ case 2:
+ break;
+ }
+ mes "[Rmimi Ravies]";
+ mes "Now we are ready.";
+ next;
+ if ($@gqse_festival == 0) {
+ mes "[Rmimi Ravies]";
+ mes "Ok, we would ge started to summon monsters.";
+ delitem 7840,1; //Valkyrie's_Gift
+ next;
+ mes "[Rmimi Ravies]";
+ mes "Have a good time.";
+ donpcevent "Rmimi Ravies#gq_fes01::Onstart";
+
+ announce "["+ strcharinfo(0) +"] member of ["+ GetGuildName(.@GID) +"] is summoning a 'Valkyrie's Present' in 'Juno'.",bc_all,"0x70dbdb";
+ close;
+ }
+ else {
+ mes "[Rmimi Ravies]";
+ mes "It seems that a Valkyrie's Blessing summoning ritual is already in progress elsewhere.";
+ next;
+ mes "[Rmimi Ravies]";
+ mes "Please try again later.";
+ close;
+ }
+ }
+ else {
+ mes "[Rmimi Ravies]";
+ mes "It seems you are not worthy.";
+ next;
+ mes "[Rmimi Ravies]";
+ mes "I don't know how you obtained that flower, but if you're not capable of leading others.. then you cannot continue.";
+ next;
+ mes "[Rmimi Ravies]";
+ mes "Too tough?";
+ mes "Well, what can you do, that's part of the job.";
+ close;
+ }
+ }
+ else {
+ mes "[Rmimi Ravies]";
+ mes "Don't you have any voucher?";
+ close;
+ }
+
+OnInit:
+ enablenpc "Rmimi Ravies#gq_fes01";
+ end;
+
+OnEnable:
+ enablenpc "Rmimi Ravies#gq_fes01";
+ end;
+
+OnDisable:
+ disablenpc "Rmimi Ravies#gq_fes01";
+ end;
+
+Onstart:
+ initnpctimer;
+ set $@gqse_festival,1;
+ end;
+
+Oncall:
+ if (mobcount("yuno","Rmimi Ravies#gq_fes01::OnMyMobDead") < 31) {
+ monster "yuno",0,0,"Valkyrie's Blessing",1083,100,"Rmimi Ravies#gq_fes01::OnMyMobDead";
+ monster "yuno",0,0,"Valkyrie's Gift",1951,25,"Rmimi Ravies#gq_fes01::OnMyMobDead";
+ monster "yuno",0,0,"Valkyrie's Gift",1952,25,"Rmimi Ravies#gq_fes01::OnMyMobDead";
+ monster "yuno",0,0,"Valkyrie's Gift",1953,25,"Rmimi Ravies#gq_fes01::OnMyMobDead";
+ monster "yuno",0,0,"Valkyrie's Gift",1954,25,"Rmimi Ravies#gq_fes01::OnMyMobDead";
+ monster "yuno",0,0,"Valkyrie's Prank",1002,10,"Rmimi Ravies#gq_fes01::OnMyMobDead";
+ }
+ else if (mobcount("yuno","Rmimi Ravies#gq_fes01::OnMyMobDead") > 149) {
+ monster "yuno",0,0,"Valkyrie's Blessing",1083,1,"Rmimi Ravies#gq_fes01::OnMyMobDead";
+ monster "yuno",0,0,"Valkyrie's Gift",1951,1,"Rmimi Ravies#gq_fes01::OnMyMobDead";
+ monster "yuno",0,0,"Valkyrie's Gift",1952,1,"Rmimi Ravies#gq_fes01::OnMyMobDead";
+ monster "yuno",0,0,"Valkyrie's Gift",1953,1,"Rmimi Ravies#gq_fes01::OnMyMobDead";
+ monster "yuno",0,0,"Valkyrie's Gift",1954,1,"Rmimi Ravies#gq_fes01::OnMyMobDead";
+ }
+ else {
+ monster "yuno",0,0,"Valkyrie's Blessing",1083,50,"Rmimi Ravies#gq_fes01::OnMyMobDead";
+ monster "yuno",0,0,"Valkyrie's Gift",1951,10,"Rmimi Ravies#gq_fes01::OnMyMobDead";
+ monster "yuno",0,0,"Valkyrie's Gift",1952,10,"Rmimi Ravies#gq_fes01::OnMyMobDead";
+ monster "yuno",0,0,"Valkyrie's Gift",1953,10,"Rmimi Ravies#gq_fes01::OnMyMobDead";
+ monster "yuno",0,0,"Valkyrie's Gift",1954,10,"Rmimi Ravies#gq_fes01::OnMyMobDead";
+ monster "yuno",0,0,"Valkyrie's Prank",1002,5,"Rmimi Ravies#gq_fes01::OnMyMobDead";
+ }
+ end;
+
+Onover:
+ killmonster "yuno","Rmimi Ravies#gq_fes01::OnMyMobDead";
+ set $@gqse_festival,0;
+ stopnpctimer;
+ end;
+
+OnMyMobDead:
+ end;
+
+OnTimer10000:
+ announce "The summoning ceremony will start in 5 min in Juno.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer13000:
+ announce "Please come to Juno to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer120000:
+ announce "The summoning ceremony will start in 3 min in Juno.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer123000:
+ announce "Please come to Juno to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer240000:
+ announce "The summoning ceremony will start in 1 min in Juno.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer243000:
+ announce "Please come to Juno to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer300000:
+ announce "The first 'Valkyrie's Present' has been summoned here in Juno by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rmimi Ravies#gq_fes01::Oncall";
+ end;
+
+OnTimer303000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer308000:
+ announce "Please come to Juno to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer600000:
+ announce "The second 'Valkyrie's Present' has been summoned here in Juno by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rmimi Ravies#gq_fes01::oncall";
+ end;
+
+OnTimer603000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer608000:
+ announce "Please come to Juno to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer900000:
+ announce "The third 'Valkyrie's Present' has been summoned here in Juno by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rmimi Ravies#gq_fes01::Oncall";
+ end;
+
+OnTimer903000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer908000:
+ announce "Please come to Juno to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer1200000:
+ announce "The fourth 'Valkyrie's Present' has been summoned here in Juno by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rmimi Ravies#gq_fes01::Oncall";
+ end;
+
+OnTimer1203000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer1208000:
+ announce "Please come to Juno to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer1500000:
+ announce "The fifth 'Valkyrie's Present' has been summoned here in Juno by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rmimi Ravies#gq_fes01::Oncall";
+ end;
+
+OnTimer1503000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer1508000:
+ announce "Please come to Juno to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer1800000:
+ announce "The sixth 'Valkyrie's Present' has been summoned here in Juno by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rmimi Ravies#gq_fes01::Oncall";
+ end;
+
+OnTimer1803000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer1808000:
+ announce "Please come to Juno to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer2100000:
+ announce "The seventh 'Valkyrie's Present' has been summoned here in Juno by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rmimi Ravies#gq_fes01::Oncall";
+ end;
+
+OnTimer2103000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer2108000:
+ announce "Please come to Juno to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer2400000:
+ announce "The eighth 'Valkyrie's Present' has been summoned here in Juno by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rmimi Ravies#gq_fes01::Oncall";
+ end;
+
+OnTimer2403000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer2408000:
+ announce "Please come to Juno to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer2700000:
+ announce "The ninth 'Valkyrie's Present' has been summoned here in Juno by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rmimi Ravies#gq_fes01::Oncall";
+ end;
+
+OnTimer2703000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer2708000:
+ announce "Please come to Juno to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer3000000:
+ announce "The first0 'Valkyrie's Present' has been summoned here in Juno by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rmimi Ravies#gq_fes01::Oncall";
+ end;
+
+OnTimer3003000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer3008000:
+ announce "Please come to Juno to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer3300000:
+ announce "The eleventh 'Valkyrie's Present' has been summoned here in Juno by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rmimi Ravies#gq_fes01::Oncall";
+ end;
+
+OnTimer3303000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer3308000:
+ announce "Please come to Juno to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer3600000:
+ announce "The twelfth 'Valkyrie's Present' has been summoned here in Juno by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rmimi Ravies#gq_fes01::Oncall";
+ end;
+
+OnTimer3603000:
+ announce "The final ceremony will be performed for 5 minutes.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer3608000:
+ announce "Please come to Juno to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer3900000:
+ announce "The entire ceremony is over now, I am sure all of you had fun.",bc_all,"0x70dbdb";
+ donpcevent "Rmimi Ravies#gq_fes01::Onover";
+ end;
+}
+
+//===============================================================================================
+// Rachel
+//===============================================================================================
+
+//-------------------------------------Rachel Festival Manager-----------------------------------
+/*
+rachel,1,1,0 script Festival Manager#god_se_fes02 891,{
+ mes "[Festival Manager]";
+ mes "I am the festival NPC manager for the God SE quest.";
+ mes "Please enter your password.";
+ next;
+ input .@input$;
+ if (.@input$ != "07godsefes") {
+ mes "[Festival Manager]";
+ mes "Password is incorrect.";
+ close;
+ }
+ mes "[Festival Manager]";
+ mes "What would you like to do?";
+ next;
+ switch(select("Disable festival NPCs:Enable festival NPCs")) {
+ case 1:
+ mes "[Festival Manager]";
+ mes "Ending festivals and disabling NPCs.";
+ donpcevent "Rhehe Ravies#gq_fes03::Onover";
+ donpcevent "Rhehe Ravies#gq_fes03::Ondisable";
+ close;
+ case 2:
+ mes "[Festival Manager]";
+ mes "Resetting festivals and enabling NPCs.";
+ donpcevent "Rhehe Ravies#gq_fes03::Onover";
+ donpcevent "Rhehe Ravies#gq_fes03::OnEnable";
+ close;
+ }
+}
+*/
+//----------------------------------------Rhehe Ravies----------------------------------------
+
+rachel,132,117,3 script Rhehe Ravies#gq_fes03 891,{
+ set .@GID, getcharid(2);
+ if (countitem(7840) > 0) {
+ mes "[Rhehe Ravies]";
+ mes "A flower!!";
+ mes "Shall we proceed?";
+ next;
+ if (strcharinfo(0) == getguildmaster(.@GID)) {
+ mes "[Rhehe Ravies]";
+ mes "Eeeeh, so young and yet you're a guild master? Your guildsmen must be jealous.";
+ next;
+ mes "[Reumimi Ravies]";
+ mes "I'm not sure if you understand the uses for that flower, so I'll briefly explain.";
+ next;
+ mes "[Reumimi Ravies]";
+ mes "That flower has been passed down as a gift from the Valkyrie Wish Maiden herself.";
+ mes "It may be used to summon special monsters through summoners in special areas.";
+ next;
+ mes "[Rhehe Ravies]";
+ mes "There are only two summoners in existence who are capable of using that flower.";
+ mes "One is me, and the other is my twin sister Reumimi.";
+ next;
+ mes "[Rhehe Ravies]";
+ mes "Twin sisters, but we do not have much alike, little fingers in front of you ...";
+ next;
+ mes "[Rhehe Ravies]";
+ mes "..................................";
+ mes ".....Oops! I wasn't supposed to tell anyone...";
+ next;
+ mes "[Rhehe Ravies]";
+ mes "... Hehehe, anyways let's move on.";
+ mes "So do you wish to summon or not!?";
+ next;
+ switch(select("Do not summon:Summon")) {
+ case 1:
+ mes "[Rhehe Ravies]";
+ mes "...*Cries*.";
+ next;
+ mes "[Rhehe Ravies]";
+ mes "If you've got no business with me, please don't start a conversation.";
+ mes "If it were my sister, she would've humiliated you for it.";
+ close;
+ case 2:
+ break;
+ }
+ mes "[Rhehe Ravies]";
+ mes "Okay then, I'll explain a little about the summoning ritual.";
+ mes "Here in Yuno, the summoning ritual through the use of that flower will summon Valkyrie's Blessing and Valkyrie's Gift.";
+ mes "The effects of the summoning ritual will last approximately one hour.";
+ next;
+ mes "[Rhehe Ravies]";
+ mes "During the summoning ritual, continuous broadcasts will be made.";
+ mes "It is a courtesy of the Valkyrie Wish Maiden, in order to unite adventurers from all over to participate in the festival.";
+ next;
+ mes "[Rhehe Ravies]";
+ mes "Are you ready to begin the summoning ritual~?";
+ next;
+ switch(select("No, not yet.:Yes! I'm ready!")) {
+ case 1:
+ mes "[Rhehe Ravies]";
+ mes "You're not even ready, why bother talking to me?";
+ next;
+ mes "[Rhehe Ravies]";
+ mes "Oh well, if you've got other things to do then I'll wait.";
+ mes "After all, that's also part of my job.";
+ close;
+ case 2:
+ break;
+ }
+ mes "[Rhehe Ravies]";
+ mes "Very well, then I will check for a reasonable time to begin the summoning ritual.";
+ next;
+ if ($@gqse_festival == 0) {
+ mes "[Rhehe Ravies]";
+ mes "Good! Now seems like a good time, so let's begin!";
+ delitem 7840,1; //Valkyrie_Gift
+ next;
+ mes "[Rhehe Ravies]";
+ mes "I hope you enjoy yourself!";
+ donpcevent "Rhehe Ravies#gq_fes03::Onstart";
+ announce "["+ strcharinfo(0) +"] member of ["+ GetGuildName(.@GID) +"] is summoning a 'Valkyrie's Present' in 'Rachel'.",bc_all,"0x70dbdb";
+ close;
+ }
+ else {
+ mes "[Rhehe Ravies]";
+ mes "*Cries*";
+ mes "It doesn't seem like now is a good time.";
+ next;
+ mes "[Rhehe Ravies]";
+ mes "Please try again later.";
+ close;
+ }
+ }
+ else {
+ mes "[Rhehe Ravies]";
+ mes "...Seems like you're not in a worthy position for me to talk to?";
+ next;
+ mes "[Rhehe Ravies]";
+ mes "I don't know how you obtained that flower, but if you're not capable of leading others.. then you cannot continue.";
+ next;
+ mes "[Rhehe Ravies]";
+ mes "Too tough?";
+ mes "Well, what can you do, that's part of the job.";
+ close;
+ }
+ }
+ else {
+ mes "[Rhehe Ravies]";
+ mes "Don't you have anything to give me to prove yourself?";
+ close;
+ }
+
+OnInit:
+ enablenpc "Rhehe Ravies#gq_fes03";
+ end;
+
+OnEnable:
+ enablenpc "Rhehe Ravies#gq_fes03";
+ end;
+
+OnDisable:
+ disablenpc "Rhehe Ravies#gq_fes03";
+ end;
+
+Onstart:
+ initnpctimer;
+ set $@gqse_festival,1;
+ end;
+
+Oncall:
+ if (mobcount("rachel","Rhehe Ravies#gq_fes03::OnMyMobDead") < 31) {
+ monster "rachel",0,0,"Valkyrie's Blessing",1083,100,"Rhehe Ravies#gq_fes03::OnMyMobDead";
+ monster "rachel",0,0,"Valkyrie's Gift",1951,25,"Rhehe Ravies#gq_fes03::OnMyMobDead";
+ monster "rachel",0,0,"Valkyrie's Gift",1952,25,"Rhehe Ravies#gq_fes03::OnMyMobDead";
+ monster "rachel",0,0,"Valkyrie's Gift",1953,25,"Rhehe Ravies#gq_fes03::OnMyMobDead";
+ monster "rachel",0,0,"Valkyrie's Gift",1954,25,"Rhehe Ravies#gq_fes03::OnMyMobDead";
+ monster "rachel",0,0,"Valkyrie's Prank",1002,10,"Rhehe Ravies#gq_fes03::OnMyMobDead";
+ }
+ else if (mobcount("rachel","Rhehe Ravies#gq_fes03::OnMyMobDead") > 149) {
+ monster "rachel",0,0,"Valkyrie's Blessing",1083,1,"Rhehe Ravies#gq_fes03::OnMyMobDead";
+ monster "rachel",0,0,"Valkyrie's Gift",1951,1,"Rhehe Ravies#gq_fes03::OnMyMobDead";
+ monster "rachel",0,0,"Valkyrie's Gift",1952,1,"Rhehe Ravies#gq_fes03::OnMyMobDead";
+ monster "rachel",0,0,"Valkyrie's Gift",1953,1,"Rhehe Ravies#gq_fes03::OnMyMobDead";
+ monster "rachel",0,0,"Valkyrie's Gift",1954,1,"Rhehe Ravies#gq_fes03::OnMyMobDead";
+ }
+ else {
+ monster "rachel",0,0,"Valkyrie's Blessing",1083,50,"Rhehe Ravies#gq_fes03::OnMyMobDead";
+ monster "rachel",0,0,"Valkyrie's Gift",1951,10,"Rhehe Ravies#gq_fes03::OnMyMobDead";
+ monster "rachel",0,0,"Valkyrie's Gift",1952,10,"Rhehe Ravies#gq_fes03::OnMyMobDead";
+ monster "rachel",0,0,"Valkyrie's Gift",1953,10,"Rhehe Ravies#gq_fes03::OnMyMobDead";
+ monster "rachel",0,0,"Valkyrie's Gift",1954,10,"Rhehe Ravies#gq_fes03::OnMyMobDead";
+ monster "rachel",0,0,"Valkyrie's Prank",1002,5,"Rhehe Ravies#gq_fes03::OnMyMobDead";
+ }
+ end;
+
+Onover:
+ killmonster "rachel","Rhehe Ravies#gq_fes03::OnMyMobDead";
+ set $@gqse_festival,0;
+ stopnpctimer;
+ end;
+
+OnMyMobDead:
+ end;
+
+OnTimer10000:
+ announce "The summoning ceremony will start in 5 min in Rachel.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer13000:
+ announce "Please come to Rachel to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer120000:
+ announce "The summoning of Valkyrie's Gift will begin in approximately 3 min in Rachel.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer123000:
+ announce "Please come to Rachel to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer240000:
+ announce "The summoning ceremony will start in 1 min in Rachel.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer243000:
+ announce "Please come to Rachel to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer300000:
+ announce "The first 'Valkyrie's Present' has been summoned here in Rachel by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rhehe Ravies#gq_fes03::Oncall";
+ end;
+
+OnTimer303000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer308000:
+ announce "Please come to Rachel to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer600000:
+ announce "The second 'Valkyrie's Present' has been summoned here in Rachel by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rhehe Ravies#gq_fes03::Oncall";
+ end;
+
+OnTimer603000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer608000:
+ announce "Please come to Rachel to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer900000:
+ announce "The third 'Valkyrie's Present' has been summoned here in Rachel by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rhehe Ravies#gq_fes03::Oncall";
+ end;
+
+OnTimer903000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer908000:
+ announce "Please come to Rachel to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer1200000:
+ announce "The fourth 'Valkyrie's Present' has been summoned here in Rachel by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rhehe Ravies#gq_fes03::Oncall";
+ end;
+
+OnTimer1203000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer1208000:
+ announce "Please come to Rachel to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer1500000:
+ announce "The fifth 'Valkyrie's Present' has been summoned here in Rachel by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rhehe Ravies#gq_fes03::Oncall";
+ end;
+
+OnTimer1503000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer1508000:
+ announce "Please come to Rachel to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer1800000:
+ announce "The sixth 'Valkyrie's Present' has been summoned here in Rachel by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rhehe Ravies#gq_fes03::Oncall";
+ end;
+
+OnTimer1803000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer1808000:
+ announce "Please come to Rachel to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer2100000:
+ announce "The seventh 'Valkyrie's Present' has been summoned here in Rachel by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rhehe Ravies#gq_fes03::Oncall";
+ end;
+
+OnTimer2103000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer2108000:
+ announce "Please come to Rachel to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer2400000:
+ announce "The eighth 'Valkyrie's Present' has been summoned here in Rachel by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rhehe Ravies#gq_fes03::Oncall";
+ end;
+
+OnTimer2403000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer2408000:
+ announce "Please come to Rachel to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer2700000:
+ announce "The ninth 'Valkyrie's Present' has been summoned here in Rachel by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rhehe Ravies#gq_fes03::Oncall";
+ end;
+
+OnTimer2703000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer2708000:
+ announce "Please come to Rachel to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer3000000:
+ announce "The tenth 'Valkyrie's Present' has been summoned here in Rachel by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rhehe Ravies#gq_fes03::Oncall";
+ end;
+
+OnTimer3003000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer3008000:
+ announce "Please come to Rachel to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer3300000:
+ announce "The eleventh 'Valkyrie's Present' has been summoned here in Rachel by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rhehe Ravies#gq_fes03::Oncall";
+ end;
+
+OnTimer3303000:
+ announce "The summoning ceremony will be performed 12 times at five-minute intervals for about one hour.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer3308000:
+ announce "Please come to Rachel to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer3600000:
+ announce "The twelfth 'Valkyrie's Present' has been summoned here in Rachel by the Wish maiden.",bc_all,"0x70dbdb";
+ donpcevent "Rhehe Ravies#gq_fes03::Oncall";
+ end;
+
+OnTimer3603000:
+ announce "The final ceremony will be performed for 5 minutes.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer3608000:
+ announce "Please come to Rachel to encounter the summoning ceremony.",bc_all,"0x70dbdb";
+ end;
+
+OnTimer3900000:
+ announce "The entire ceremony is over now, I am sure all of you had fun.",bc_all,"0x70dbdb";
+ donpcevent "Rhehe Ravies#gq_fes03::Onover";
+ end;
+}
diff --git a/npc/re/events/halloween_2006.txt b/npc/re/events/halloween_2006.txt
new file mode 100644
index 000000000..8fd077af8
--- /dev/null
+++ b/npc/re/events/halloween_2006.txt
@@ -0,0 +1,1407 @@
+//===== rAthena Script =======================================
+//= 2006 Halloween Event
+//===== By: ==================================================
+//= Brainstorm
+//===== Current Version: =====================================
+//= 1.4
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//= [Aegis Conversion]
+//= Event 1: Redeem "Pumpkin Mojo" for pumpkin headgear.
+//= Event 2: Create "Pumpkin Pie" item.
+//===== Additional Comments: =================================
+//= 1.0 First semi-working conversion. [Brainstorm]
+//= 1.1 Refined Brainstorm's conversion. [L0ne_W0lf]
+//= 1.1a Minor fixes. (Screwed up weight checks somehow) [L0ne_W0lf]
+//= 1.2 Added missing checkweights. [L0ne_W0lf]
+//= 1.3 Replaced effect numerics with constants. [L0ne_W0lf]
+//= 1.3a Replaced effect numerics with constants (1 was missed). [Samuray22]
+//= 1.4 Effects are now played by proper NPC. [L0ne_W0lf]
+//============================================================
+
+// Pumpkin Mojo quest (Event 1)
+prontera,162,69,5 script Gloomy Jack#06_hw 1130,2,2,{
+ end;
+
+OnTouch:
+ mes "[Cool Devi]";
+ mes "If you have something to say to him,";
+ mes "just talk to me.";
+ mes "You won't even understand what stupid pumkin headed Jack is saying.";
+ close;
+
+OnEffect:
+ specialeffect EF_LEVEL99;
+ end;
+
+OnEffect2:
+ specialeffect EF_HIT2;
+ end;
+}
+
+prontera,164,69,3 script Cool Devi#06_hw 738,{
+ set .@now_weight,MaxWeight-Weight;
+ if (.@now_weight < 2000 || checkweight(1201,1) == 0) {
+ mes "^3355FFWait a second!";
+ mes "Right now, you're carrying";
+ mes "too many things with you.";
+ mes "Please come back after";
+ mes "using the Kafra Service";
+ mes "to store some of your items.^000000";
+ close;
+ }
+ if (countitem(7609) > 0) {
+ mes "[Gloomy Jack]";
+ mes "Oh wait, is that a Pumpkin Mojo you are carrying?";
+ mes " ";
+ mes "[Cool Devi]";
+ mes "Says he.";
+ next;
+ mes "[Gloomy Jack]";
+ mes "Give it to me. I'll pay you back.";
+ mes " ";
+ mes "[Cool Devi]";
+ mes "Says he...";
+ mes "I just can guess what he will say next. So what do you say?";
+ next;
+ if (select("What will he say?:I also know about it.") == 1) {
+ mes "[" + strcharinfo(0) + "]";
+ mes "What will he say?";
+ next;
+ mes "[Cool Devi]";
+ mes "Jack is not like others. He is halloween Jack.";
+ mes "but one day, he lost his Pumpkin Mojo and turned into depressed Jack..";
+ mes "Pumpkin Mojo was his all.";
+ next;
+ mes "[Cool Devi]";
+ mes "Well, actually that's the main reason Jack came to town.";
+ mes "To find his Pumpkin Mojo. Most suspicious suspect is ^4d4dffDelightful Lude^000000, the one known as Halloween monster";
+ next;
+ mes "[Cool Devi]";
+ mes "Why don't you give him back the 'Pumpkin Mojo'.";
+ mes "Don't worry he will compensate you.";
+ next;
+ mes "[" + strcharinfo(0) + "]";
+ mes "Compensate?With what?";
+ next;
+ mes "[Cool Devi]";
+ mes "If you bring ^4d4dff 1 Pumpkin Mojo^000000 and a pumpkin head that we gave out to you last year,";
+ mes "he will make it to ^00ff00the most fantastic pumpkin hat^000000.";
+ mes "Or if you don't have pumpkin head, you can just bring a ^3d3dff Pumpkin Mojo, a pumpkin, and a cap ^000000.";
+ next;
+ mes "[Cool Devi]";
+ mes "Well, that Pumpkin Mojo is useless if you just carry it. ";
+ mes "Give it to Jack. Don't you feel pity for him?.";
+ close;
+ }
+ mes "[Cool Devi]";
+ mes "Oh~Great.";
+ mes "Then, let me see what you got.";
+ next;
+ if ((countitem(7609) > 0) && (countitem(5134) > 0)) {
+ mes "[Gloomy Jack]";
+ mes "Oh, you brought the pumpkin head!";
+ mes "I'll make you to nicer one.";
+ mes " ";
+ mes "[Cool Devi]";
+ mes "says he.";
+ next;
+ if (select( "No, I'll come back later.:Oh, good. Make it now!") == 1) {
+ mes "[Gloomy Jack]";
+ mes "Huh?";
+ mes " ";
+ mes "[Cool Devi]";
+ mes "What? Look at Jack. He has got so dissapointed.";
+ mes "Promise me to give the Pumpkin Mojo back to Jack later someday, will you?";
+ close;
+ }
+ mes "[Gloomy Jack]";
+ mes "Thanks for giving my thing back, I'll make your hat prettier.";
+ mes " ";
+ mes "[Cool Devi]";
+ mes "says he.";
+ next;
+ donpcevent "Gloomy Jack#06_hw::OnEffect";
+ mes "[Excited Jack]";
+ mes "Lalala~ lalala~";
+ mes " ";
+ mes "(He starts singing. On a sudden, Jack's aura appeared.)";
+ delitem 7609,1; //Pumpkin_Mojo
+ delitem 5134,1; //Pumpkin_Hat
+ getitem 5202,1; //Pumpkin_Hat_
+ next;
+ donpcevent "Gloomy Jack#06_hw::OnEffect2";
+ mes "[Gloomy Jack]";
+ mes "My aura is not like it used to be. Maybe I need more Pumpkin Mojo.";
+ mes " ";
+ mes "[Cool Devi]";
+ mes "says he...";
+ next;
+ mes "[Cool Devi]";
+ mes "Oh~poor Jack.";
+ mes "Well, someday he'll get back all his Pumpkin Mojo back.";
+ close;
+ }
+ else if ((countitem(7609) > 0) && (countitem(535) > 0) && (countitem(2226) > 0)) {
+ mes "[Gloomy Jack]";
+ mes "Wow!";
+ mes "I'll turn your hat to very cool one.";
+ mes " ";
+ mes "[Cool Devi]";
+ mes "says he...";
+ next;
+ if (select( "No, I'll come back later.:Oh,good. Make it now!") == 1) {
+ mes "[Gloomy Jack]";
+ mes "Huh?";
+ mes " ";
+ mes "[Cool Devi]";
+ mes "What? Look at Jack. He has got so dissapointed.";
+ mes "Promise me to give the Pumpkin Mojo back to Jack later someday,will you?";
+ close;
+ }
+ mes "[Gloomy Jack]";
+ mes "Thanks for giving my thing back, I'll make your hat prettier.";
+ mes " ";
+ mes "[Cool Devi]";
+ mes "says he.";
+ next;
+ donpcevent "Gloomy Jack#06_hw::OnEffect";
+ mes "[Excited Jack]";
+ mes "Lalala~ lalala~";
+ mes " ";
+ mes "(He starts singing. On a sudden, Jack's aura appeared.)";
+ delitem 7609, 1;//Pumpkin_Mojo
+ delitem 535, 1;//Pumpkin
+ delitem 2226, 1;//Cap
+ getitem 5202, 1;//Pumpkin_Hat_
+ next;
+ donpcevent "Gloomy Jack#06_hw::OnEffect2";
+ mes "[Gloomy Jack]";
+ mes "My aura is not like it used to be. Maybe I need more Pumpkin Mojo.";
+ mes " ";
+ mes "[Cool Devi]";
+ mes "says he...";
+ next;
+ mes "[Cool Devi]";
+ mes "Oh~poor Jack.";
+ mes "Well, someday he'll get back all his Pumpkin Mojo back.";
+ close;
+ }
+ else {
+ mes "[Cool Devi]";
+ mes "Hey,there. You don't seem to have all materials for the fantastic hat. ";
+ close;
+ }
+ }
+ else {
+ mes "[Gloomy Jack]";
+ mes "Hey,there. Why don't you come here and listen to my story.";
+ mes " ";
+ mes "[Cool Devi]";
+ mes "Says he.";
+ next;
+ mes "[Gloomy Jack]";
+ mes "I used to be very famous. But now.....";
+ mes " ";
+ mes "[Cool Devi]";
+ mes "Says he...";
+ mes "Well, I'll just tell you without translating.";
+ next;
+ mes "[Cool Devi]";
+ mes "Jack is not like others. He is halloween Jack.";
+ mes "but one day, he lost his Pumpkin Mojo and turned into depressed Jack..";
+ mes "Pumpkin Mojo was his all.";
+ next;
+ mes "[Cool Devi]";
+ mes "Well, actually that's the main reason Jack came to town.";
+ mes "To find his Pumpkin Mojo. Most suspicious suspect is ^4d4dffDelightful Lude^000000, the one known as Halloween monster.";
+ next;
+ mes "[Cool Devi]";
+ mes "Why don't you give him back the 'Pumpkin Mojo'.";
+ mes "Don't worry he will compensate you.";
+ next;
+ mes "[" + strcharinfo(0) + "]";
+ mes "Compensate? With what?";
+ next;
+ mes "[Cool Devi]";
+ mes "If you bring ^4d4dff 1 Pumpkin Mojo^000000 and a pumpkin head that we gave out to you last year,";
+ mes "he will make it to ^00ff00the most fantastic pumpkin hat^000000.";
+ mes "Or if you don't have pumpkin head, you can just bring a ^3d3dff Pumpkin Mojo, a pumpkin, and a cap ^000000.";
+ next;
+ mes "[Cool Devi]";
+ mes "Well, that Pumpkin Mojo is useless if you just carry it. ";
+ mes "Give it to Jack. Don't you feel pity for him?.";
+ close;
+ }
+}
+
+
+geffen,145,132,3 script Hoirin#06_hw 729,{
+ set .@now_weight,MaxWeight-Weight;
+ if (.@now_weight < 2000 || checkweight(1201,1) == 0) {
+ mes "^3355FFWait a second!";
+ mes "Right now, you're carrying";
+ mes "too many things with you.";
+ mes "Please come back after";
+ mes "using the Kafra Service";
+ mes "to store some of your items.^000000";
+ close;
+ }
+ if (halloween < 100) {
+ mes "[Hoirin]";
+ mes "Pumpkin is the gift that God had sent us.";
+ mes "It provides good nutrition and helps you to stay healthy!";
+ mes "Bravo~bravo~!";
+ next;
+ mes "[Hoirin]";
+ mes "I, Hoirin have always thought about a ";
+ mes "way to eat pumpkin more deliciously.";
+ mes "But all of a sudden, I realized.";
+ next;
+ mes "[Hoirin]";
+ mes "If I have that! I can make best the Pumpkin pie!!!!!";
+ next;
+ if (select( "What's that?:Ignore.") == 1) {
+ mes "[Hoirin]";
+ mes "What's the first image you see when you think of pumpkin?";
+ mes "I see Jack! I think Jack is the most evolved form of pumpkin!";
+ mes "I wonder what does Jack have something special? Can you imagine?";
+ next;
+ mes "[Hoirin]";
+ mes "I always prefer unique pumpkin dish! Recently, I found out that there are many kinds of Jack in the world ";
+ mes "and the extreme class Jack has blue aura around his body!";
+ next;
+ mes "[Hoirin]";
+ mes "Guess what?! it was Halloween Jack!";
+ mes "Halloween Jack has somthing that is concentrated with pumpkin.";
+ mes "It is called ^4d4dffPumpkin Mojo^000000. Only if i have it, i can finish making my special pie.";
+ next;
+ mes "[Hoirin]";
+ mes "Bring me the ingredients!";
+ mes "I'll make you a very special pie right away!";
+ mes "You'll get addicted to it.";
+ mes "Don't be surprised after trying it.";
+ next;
+ mes "[" + strcharinfo(0) + "]";
+ mes "......................";
+ mes "You seem to be such a passionate person.";
+ mes "So, what's the ingredient anyway.?";
+ next;
+ mes "[Hoirin]";
+ mes "Good question!";
+ mes "To make my special Pumpkin pie, I need";
+ mes "^4d4dff 1 Pumpkin Mojo";
+ mes "2 Pumpkin";
+ mes "2 Egg^000000";
+ mes "";
+ next;
+ mes "[Hoirin]";
+ mes "Just Bring Pumpkin Mojo, Pumpkin, and a Egg.";
+ mes "Leave the rest for me..You'll get to try the best pumkin pie!";
+ set halloween, 100;
+ close;
+ }
+ mes "[Hoirin]";
+ mes "Hm..You'll regret it!";
+ mes "Hoirin's pumpkin pie is just so delicious.";
+ close;
+ }
+ else {
+ mes "[Hoirin]";
+ mes "So, did you bring all materials?";
+ mes "Were there anything hard to find?";
+ next;
+ switch(select( "I brought all ingredients.:How can I get eggs?:No,I'm just passing by.")) {
+ case 1:
+ if ((countitem(7609) > 0) && (countitem(535) > 1) && (countitem(574) > 1)) {
+ mes "[Hoirin]";
+ mes "You are right!";
+ mes "You brought all things right. Give it to me!!";
+ specialeffect2 EF_HIT1;
+ next;
+ specialeffect EF_PIERCESELF;
+ mes "[Hoirin]";
+ mes "Abracadabra~~";
+ mes "Abracadabra~~!";
+ next;
+ mes "[Hoirin]";
+ mes "Ta-da(h)!";
+ mes "Here it is~ help yourself.";
+ mes "It'll be good for your health. I added extra nutrient in it.";
+ delitem 7609,1; //Pumpkin_Mojo
+ delitem 535,2; //Pumpkin
+ delitem 574,2; //Egg
+ getitem 12192,1; //Pumpkin_Pie
+ close;
+ }
+ else {
+ mes "[Hoirin]";
+ mes "No!! This is not enough. I need";
+ mes "^4d4dff 1 Pumpkin Mojo";
+ mes "2 Pumpkin";
+ mes "2 Egg^000000";
+ mes " at least.";
+ close;
+ }
+ case 2:
+ if (halloween == 100) {
+ mes "[Hoirin]";
+ mes "Egg?";
+ mes "Well, actually I know someone who can help you.";
+ mes "There's a man who raise many chickens.";
+ next;
+ mes "[Hoirin]";
+ mes "I can send you to where he is if you want.";
+ mes "^4d4dffBut only for once^000000.";
+ next;
+ if (select("Send me.:It's ok.") == 1) {
+ mes "[Hoirin]";
+ mes "Ok, go get the eggs.";
+ set halloween, 101;
+ close2;
+ warp "nif_fild01", 162, 113;
+ end;
+ }
+ mes "[Hoirin]";
+ mes "Do you think you can go without my help?!";
+ mes "Ok! go ahead.";
+ mes "Do you know where it is?";
+ close;
+ }
+ else {
+ mes "[Hoirin]";
+ mes "if you go to ^4d4dfffarm of Skelington Town at Neiflheim^000000, you'll meet Chicken Masta. He raises chickens.";
+ close;
+ }
+ case 3:
+ mes "[Hoirin]";
+ mes "Next time, don't forget to bring ";
+ mes "all the ingredients for pumpkin pie!";
+ close;
+ }
+ }
+}
+
+nif_in,18,34,5 script Loli Ruri#06_hw 1505,2,2,{
+ end;
+
+OnTouch:
+ mes "[Deviruchi]";
+ mes "Hey there, if you have something to say to Loli Ruri, talk to me.";
+ mes "She's not used to human language.";
+ close;
+}
+
+nif_in,19,32,3 script Deviruchi#06_hw 738,{
+ set .@now_weight,MaxWeight-Weight;
+ if (.@now_weight < 2000 || checkweight(1201,1) == 0) {
+ mes "^3355FFWait a second!";
+ mes "Right now, you're carrying";
+ mes "too many things with you.";
+ mes "Please come back after";
+ mes "using the Kafra Service";
+ mes "to store some of your items.^000000";
+ close;
+ }
+ mes "[Loli Ruri]";
+ mes "Devi~Where's the pumpkin pie?";
+ mes "Humans make them, don't they?";
+ mes "Do you have it then?";
+ mes " ";
+ mes "[Deviruchi]";
+ mes "Says she.";
+ next;
+ mes "[Deviruchi]";
+ mes "If you have a pumpinkin pie, can I have one?";
+ mes "Cause we are the victim if Loli Ruri gets mad.";
+ next;
+ mes "[Deviruchi]";
+ mes "Well I'm not saying that I want it for free.";
+ mes "Don't worry, I won't let you down.";
+ next;
+ switch(select( "Give him the pumpkin pie.:Do not give him the pumpkin pie.:Huh? What pumkin pie?")) {
+ case 1:
+ if (countitem(12192) > 0) {
+ mes "[Loli Ruri]";
+ mes "Thanks for the pumkin pie!";
+ mes "Here, take this.";
+ mes " ";
+ mes "[Deviruchi]";
+ mes "Says she.";
+ next;
+ mes "[Deviruchi]";
+ mes "As I promised, I'll give you something worth the pie.";
+ mes "Hang on....";
+ next;
+ mes "[Deviruchi]";
+ mes "Hmm...This would be good.";
+ mes "Here take this, and thanks again~";
+ delitem 12192, 1;//Pumpkin_Pie
+ set @hw_temp,rand(1,3);
+ if (@hw_temp == 2) getitem 12130,1; //Cookie_Bag
+ else getitem 7460,3; //Nifl_Express_Ticket
+ close;
+ }
+ else {
+ mes "[Loli Ruri]";
+ mes "Are you kidding me?";
+ mes "Where's the pumpkin pie! Don't try to lie to me!";
+ mes " ";
+ mes "[Deviruchi]";
+ mes "Say she..Seems like she's very angry...You are in trouble.";
+ next;
+ mes "[Loli Ruri]";
+ mes "Devi!!!!!You are the one who told me that I can get the pumpkin pie if I stand here and wait.";
+ mes "Watch your back!";
+ mes " ";
+ mes "[Deviruchi]";
+ mes "Says she..Huh?!!Me?!!";
+ next;
+ mes "[" + strcharinfo(0) + "]";
+ mes "Poor Devi~";
+ mes "You shouldn't have lied~";
+ mes "Wish you a luck.";
+ close;
+ }
+ case 2:
+ mes "[Loli Ruri]";
+ mes "I want to eat pumpkin pie. Can I have one?Please~~~~";
+ mes " ";
+ mes "[Deviruchi]";
+ mes "Says he.....Give me if you have one.";
+ close;
+ case 3:
+ mes "[Deviruchi]";
+ mes "There's a man who makes a very special pumpkin pie.";
+ mes "No one can forget what it taste like.";
+ next;
+ mes "[Deviruchi]";
+ mes "Lori Ruri is waiting here for someone who will get the pie for him.";
+ mes "Can you get her one?";
+ mes "I'll treat you back.";
+ close;
+ }
+}
+
+// Creation of Pumpkin Pie (Event 2)
+nif_fild01,165,115,3 script Chicken Masta#06_hw 794,{
+ set .@now_weight,MaxWeight-Weight;
+ if (.@now_weight < 2000 || checkweight(1201,1) == 0) {
+ mes "^3355FFWait a second!";
+ mes "Right now, you're carrying";
+ mes "too many things with you.";
+ mes "Please come back after";
+ mes "using the Kafra Service";
+ mes "to store some of your items.^000000";
+ close;
+ }
+ if (halloween == 101) {
+ mes "[Chicken Masta]";
+ mes "Where did the chicken have gone?!";
+ mes "Oh, hey stranger. How can I help you?";
+ next;
+ mes "[Chicken Masta]";
+ mes "This town is too dangerous for you to hang around.";
+ mes "You'd better go back to where you came from....";
+ next;
+ mes "[Chicken Masta]";
+ mes "...Are you looking for eggs?";
+ mes "Recently, people are asking me for eggs to make some kind of pie....are you one of them?";
+ next;
+ if (select( "Actually, yes. I came here to get some eggs.:Nope.") == 1) {
+ mes "[Chicken Masta]";
+ mes "Ok. But some of my chickens ran away,";
+ mes "so I have no eggs much left.";
+ mes "1000 zeny for 2 eggs! how's that?";
+ next;
+ switch(select( "Ok,I'll take it.:I'll just buy one.:Whew~it's too expensive.")) {
+ case 1:
+ if (Zeny > 1999) {
+ mes "[Chicken Masta]";
+ mes "Thanks.";
+ mes "Here are the eggs.";
+ set Zeny,Zeny-2000;
+ set halloween, 102;
+ getitem 574,2; //Egg
+ close;
+ }
+ else {
+ mes "[Chicken Masta]";
+ mes "Hey this is not enough~";
+ mes "1000zeny per each, so if you buy two,that means 2000zeny.";
+ close;
+ }
+ case 2:
+ if (Zeny > 999) {
+ mes "[Chicken Masta]";
+ mes "Thanks.";
+ mes "Here are the eggs.";
+ set Zeny,Zeny-1000;
+ set halloween, 102;
+ getitem 574,1; //Egg
+ close;
+ }
+ else {
+ mes "[Chicken Masta]";
+ mes "You don't seem to have enough money...";
+ mes "It's 1000 zeny per each.";
+ close;
+ }
+ case 3:
+ mes "[Chicken Masta]";
+ mes "Well...I know it's liitle bit expensive but as I told you, my chickens ran away.";
+ mes "You have to understand.";
+ close;
+ }
+ }
+ mes "[Chicken Masta]";
+ mes "Let me tell you just one thing!";
+ mes "If you don't want to die,";
+ mes "you'd better run away. It's too dangerous in here.";
+ close;
+ }
+ else if (halloween == 102) {
+ mes "[Chicken Masta]";
+ mes "Do you need eggs?...";
+ mes "Then, help me first.";
+ mes "8 of my chickens ran away.";
+ mes "I just don't know where they are.";
+ next;
+ mes "[Chicken Masta]";
+ mes "I don't expect all chickens to come back home.";
+ mes "Only if you find me one of them, I'll sell three eggs for you.";
+ next;
+ mes "[Chicken Masta]";
+ mes "Isn't it a great deal?";
+ mes "Chickens must be around here somewhere.";
+ next;
+ mes "[Chicken Masta]";
+ mes "You don't have to bring back chickens to me if you find one,";
+ mes "Just insert the word ^4d4dff'Return'^000000.";
+ mes ".........";
+ next;
+ mes "[Chicken Masta]";
+ mes "It's a spell to make chickens to go back home.";
+ mes ".........";
+ mes "Don't forget the word 'Return'!";
+ next;
+ mes "[Chicken Masta]";
+ mes "I hope you can find my chickens.";
+ close;
+ }
+ else if (halloween == 103) {
+ mes "[Chicken Masta]";
+ mes "Oh, you came back. I've been waiting for you.";
+ mes "And thanks for the chickens you sent me.";
+ mes "They are saftly kept in the henhouse, in case of running away again.";
+ next;
+ mes "[Chicken Masta]";
+ mes "I didn't forget what we have promised.";
+ mes "Tell me how many eggs you want.";
+ mes "It's 1000zeny per each.";
+ mes "And maximum 3 is all you can get.";
+ next;
+ while(1) {
+ input .@input;
+ if (.@input == 0) {
+ mes "[Chicken Masta]";
+ mes "You don't have to buy it, if you don't need it.";
+ close;
+ }
+ else if (@input > 3) {
+ mes "[Chicken Masta]";
+ mes "What did I tell you.";
+ mes "I'm going to sell only three eggs.";
+ next;
+ }
+ else
+ break;
+ }
+ set .@hw_egg, .@input * 1000;
+ if (Zeny < @hw_egg) {
+ mes "[Chicken Masta]";
+ mes "You don't seem to have enough zeny.";
+ close;
+ }
+ mes "[Chicken Masta]";
+ mes "Here you are.";
+ mes "But no more.";
+ mes "If you want more eggs, find me more chickens.";
+ set Zeny,Zeny-@hw_egg;
+ getitem 574, @input;//Egg
+ set halloween, 102;
+ close;
+ }
+ else {
+ mes "[Chicken Masta]";
+ mes "Where did the chicken have gone?!";
+ mes "Oh, hey stranger. How can I help you?";
+ next;
+ mes "[Chicken Masta]";
+ mes "This town is too dangerous for you to hang around.";
+ mes "You'd better go back to where you came from....";
+ close;
+ }
+}
+
+nif_fild01,167,113,3 script Masta's chicken#06_hw01 800,{
+ mes "Drowsing chicken.";
+ close;
+}
+
+- script HwChicken::HwChicken -1,{
+ if ((halloween == 102) || (halloween == 103)) {
+ mes "Oh, this must be Chicken Masta's chicken.";
+ mes "I should insert the magic word.";
+ next;
+ input .@inputstr$;
+ if( .@inputstr$ == "Return" ) {
+ emotion e_omg;
+ specialeffect EF_TELEPORTATION;
+ mes "The magic spell has been casted.";
+ set halloween, 103;
+ disablenpc "Masta's chicken#"+strnpcinfo(1);
+ close2;
+ sleep 180000;
+ enablenpc "Masta's chicken#"+strnpcinfo(1);
+ end;
+ }
+ else {
+ mes "[" + strcharinfo(0) + "]";
+ mes "Hm...I must have misspelled.";
+ close;
+ }
+ }
+ else {
+ mes "Drowsing chicken.";
+ close;
+ }
+}
+
+- script HwChicken2::HwChicken2 -1,{
+ set @egg_temp,rand(1,4);
+ if( @egg_temp == 3) {
+ mes "As soon as you got close to the chicken and touched it, it disappeared completely.";
+ mes "You got an 'egg' in the place where the chicken disappeared.";
+ disablenpc "Chicken#"+strnpcinfo(1);
+ getitem 574,1; //Egg
+ close;
+ }
+ else {
+ mes "As soon as you got close to the chicken and touched it, it disappeared completely.";
+ disablenpc "Chicken#"+strnpcinfo(1);
+ close;
+ }
+}
+
+- script HwChicken3::HwChicken3 -1,{
+ set @egg_temp,rand(1,4);
+ if( @egg_temp == 3) {
+ mes "As soon as you got close to the chicken and touched it, it disappeared completely.";
+ mes "You got an 'egg' in the place where the chicken disappeared.";
+ disablenpc "Chicken#"+strnpcinfo(1);
+ getitem 574,1; //Egg
+ close;
+ }
+ else {
+ mes "As soon as you got close to the chicken and touched it, it disappeared completely.";
+ disablenpc "Chicken#"+strnpcinfo(1);
+ close;
+ }
+
+OnInit:
+ while(1) {
+ sleep 180000;
+ specialeffect EF_BAT2;
+ end;
+ }
+}
+
+
+nif_fild01,270,145,3 duplicate(HwChicken) Masta's chicken#06_hw02 800
+nif_fild01,219,267,4 duplicate(HwChicken) Masta's chicken#06_hw03 800
+nif_fild01,199,240,5 duplicate(HwChicken) Masta's chicken#06_hw04 800
+nif_fild01,316,97,6 duplicate(HwChicken) Masta's chicken#06_hw05 800
+nif_fild01,147,343,7 duplicate(HwChicken) Masta's chicken#06_hw06 800
+nif_fild01,185,325,8 duplicate(HwChicken) Masta's chicken#06_hw07 800
+nif_fild01,133,105,1 duplicate(HwChicken) Masta's chicken#06_hw08 800
+nif_fild01,331,329,2 duplicate(HwChicken) Masta's chicken#06_hw09 800
+
+pay_dun03,1,1,0 script #06_hw_timer01 -1,{
+OnInit:
+ disablenpc "Chicken#06_hw_p01";
+ disablenpc "Chicken#06_hw_p02";
+ disablenpc "Chicken#06_hw_p03";
+ disablenpc "Chicken#06_hw_p04";
+ disablenpc "Chicken#06_hw_p05";
+ disablenpc "Chicken#06_hw_p06";
+ disablenpc "Chicken#06_hw_p07";
+ disablenpc "Chicken#06_hw_p08";
+ disablenpc "Chicken#06_hw_p09";
+ disablenpc "Chicken#06_hw_p10";
+ disablenpc "Chicken#06_hw_p11";
+ disablenpc "Chicken#06_hw_p12";
+ disablenpc "Chicken#06_hw_p13";
+ disablenpc "Chicken#06_hw_p14";
+ disablenpc "Chicken#06_hw_p15";
+ disablenpc "Chicken#06_hw_p16";
+ disablenpc "Chicken#06_hw_p17";
+ disablenpc "Chicken#06_hw_p18";
+ disablenpc "Chicken#06_hw_p19";
+ disablenpc "Chicken#06_hw_p20";
+ disablenpc "Chicken#06_hw_p21";
+ disablenpc "Chicken#06_hw_p22";
+ disablenpc "Chicken#06_hw_p23";
+ disablenpc "Chicken#06_hw_p24";
+ disablenpc "Chicken#06_hw_p25";
+ disablenpc "Chicken#06_hw_p26";
+ disablenpc "Chicken#06_hw_p27";
+ disablenpc "Chicken#06_hw_p28";
+ disablenpc "Chicken#06_hw_p29";
+ disablenpc "Chicken#06_hw_p30";
+ disablenpc "Chicken#06_hw_p31";
+ disablenpc "Chicken#06_hw_p32";
+ disablenpc "Chicken#06_hw_p33";
+ disablenpc "Chicken#06_hw_p34";
+ disablenpc "Chicken#06_hw_p35";
+ disablenpc "Chicken#06_hw_p36";
+ disablenpc "Chicken#06_hw_p37";
+ disablenpc "Chicken#06_hw_p38";
+ disablenpc "Chicken#06_hw_p39";
+ disablenpc "Chicken#06_hw_p40";
+ disablenpc "Chicken#06_hw_p41";
+ initnpctimer;
+ end;
+
+OnTimer3600000:
+ enablenpc "Chicken#06_hw_p01";
+ enablenpc "Chicken#06_hw_p02";
+ enablenpc "Chicken#06_hw_p03";
+ enablenpc "Chicken#06_hw_p04";
+ enablenpc "Chicken#06_hw_p05";
+ enablenpc "Chicken#06_hw_p06";
+ enablenpc "Chicken#06_hw_p07";
+ enablenpc "Chicken#06_hw_p08";
+ enablenpc "Chicken#06_hw_p09";
+ enablenpc "Chicken#06_hw_p10";
+ enablenpc "Chicken#06_hw_p11";
+ enablenpc "Chicken#06_hw_p12";
+ enablenpc "Chicken#06_hw_p13";
+ enablenpc "Chicken#06_hw_p14";
+ enablenpc "Chicken#06_hw_p15";
+ enablenpc "Chicken#06_hw_p16";
+ enablenpc "Chicken#06_hw_p17";
+ enablenpc "Chicken#06_hw_p18";
+ enablenpc "Chicken#06_hw_p19";
+ enablenpc "Chicken#06_hw_p20";
+ enablenpc "Chicken#06_hw_p21";
+ enablenpc "Chicken#06_hw_p22";
+ enablenpc "Chicken#06_hw_p23";
+ enablenpc "Chicken#06_hw_p24";
+ enablenpc "Chicken#06_hw_p25";
+ enablenpc "Chicken#06_hw_p26";
+ enablenpc "Chicken#06_hw_p27";
+ enablenpc "Chicken#06_hw_p28";
+ enablenpc "Chicken#06_hw_p29";
+ enablenpc "Chicken#06_hw_p30";
+ enablenpc "Chicken#06_hw_p31";
+ enablenpc "Chicken#06_hw_p32";
+ enablenpc "Chicken#06_hw_p33";
+ enablenpc "Chicken#06_hw_p34";
+ enablenpc "Chicken#06_hw_p35";
+ enablenpc "Chicken#06_hw_p36";
+ enablenpc "Chicken#06_hw_p37";
+ enablenpc "Chicken#06_hw_p38";
+ enablenpc "Chicken#06_hw_p39";
+ enablenpc "Chicken#06_hw_p40";
+ enablenpc "Chicken#06_hw_p41";
+ end;
+
+OnTimer4200000:
+ disablenpc "Chicken#06_hw_p01";
+ disablenpc "Chicken#06_hw_p02";
+ disablenpc "Chicken#06_hw_p03";
+ disablenpc "Chicken#06_hw_p04";
+ disablenpc "Chicken#06_hw_p05";
+ disablenpc "Chicken#06_hw_p06";
+ disablenpc "Chicken#06_hw_p07";
+ disablenpc "Chicken#06_hw_p08";
+ disablenpc "Chicken#06_hw_p09";
+ disablenpc "Chicken#06_hw_p10";
+ disablenpc "Chicken#06_hw_p11";
+ disablenpc "Chicken#06_hw_p12";
+ disablenpc "Chicken#06_hw_p13";
+ disablenpc "Chicken#06_hw_p14";
+ disablenpc "Chicken#06_hw_p15";
+ disablenpc "Chicken#06_hw_p16";
+ disablenpc "Chicken#06_hw_p17";
+ disablenpc "Chicken#06_hw_p18";
+ disablenpc "Chicken#06_hw_p19";
+ disablenpc "Chicken#06_hw_p20";
+ disablenpc "Chicken#06_hw_p21";
+ disablenpc "Chicken#06_hw_p22";
+ disablenpc "Chicken#06_hw_p23";
+ disablenpc "Chicken#06_hw_p24";
+ disablenpc "Chicken#06_hw_p25";
+ disablenpc "Chicken#06_hw_p26";
+ disablenpc "Chicken#06_hw_p27";
+ disablenpc "Chicken#06_hw_p28";
+ disablenpc "Chicken#06_hw_p29";
+ disablenpc "Chicken#06_hw_p30";
+ disablenpc "Chicken#06_hw_p31";
+ disablenpc "Chicken#06_hw_p32";
+ disablenpc "Chicken#06_hw_p33";
+ disablenpc "Chicken#06_hw_p34";
+ disablenpc "Chicken#06_hw_p35";
+ disablenpc "Chicken#06_hw_p36";
+ disablenpc "Chicken#06_hw_p37";
+ disablenpc "Chicken#06_hw_p38";
+ disablenpc "Chicken#06_hw_p39";
+ disablenpc "Chicken#06_hw_p40";
+ disablenpc "Chicken#06_hw_p41";
+ stopnpctimer;
+ initnpctimer;
+ end;
+}
+
+
+pay_dun03,151,138,3 duplicate(HwChicken3) Chicken#06_hw_p01 800
+pay_dun03,151,138,3 duplicate(HwChicken2) Chicken#06_hw_p02 800
+pay_dun03,152,138,3 duplicate(HwChicken2) Chicken#06_hw_p03 800
+pay_dun03,154,138,3 duplicate(HwChicken2) Chicken#06_hw_p04 800
+pay_dun03,155,138,3 duplicate(HwChicken2) Chicken#06_hw_p05 800
+pay_dun03,157,138,3 duplicate(HwChicken2) Chicken#06_hw_p06 800
+pay_dun03,158,138,3 duplicate(HwChicken3) Chicken#06_hw_p07 800
+pay_dun03,150,137,3 duplicate(HwChicken2) Chicken#06_hw_p08 800
+pay_dun03,153,137,3 duplicate(HwChicken2) Chicken#06_hw_p09 800
+pay_dun03,156,137,3 duplicate(HwChicken3) Chicken#06_hw_p10 800
+pay_dun03,159,137,3 duplicate(HwChicken2) Chicken#06_hw_p11 800
+pay_dun03,149,136,3 duplicate(HwChicken2) Chicken#06_hw_p12 800
+pay_dun03,152,136,3 duplicate(HwChicken3) Chicken#06_hw_p13 800
+pay_dun03,157,136,3 duplicate(HwChicken2) Chicken#06_hw_p14 800
+pay_dun03,160,136,3 duplicate(HwChicken2) Chicken#06_hw_p15 800
+pay_dun03,149,135,3 duplicate(HwChicken3) Chicken#06_hw_p16 800
+pay_dun03,151,135,3 duplicate(HwChicken2) Chicken#06_hw_p17 800
+pay_dun03,152,135,3 duplicate(HwChicken2) Chicken#06_hw_p18 800
+pay_dun03,153,135,3 duplicate(HwChicken3) Chicken#06_hw_p19 800
+pay_dun03,156,135,3 duplicate(HwChicken2) Chicken#06_hw_p20 800
+pay_dun03,157,135,3 duplicate(HwChicken2) Chicken#06_hw_p21 800
+pay_dun03,158,135,3 duplicate(HwChicken3) Chicken#06_hw_p22 800
+pay_dun03,160,135,3 duplicate(HwChicken2) Chicken#06_hw_p23 800
+pay_dun03,149,134,3 duplicate(HwChicken2) Chicken#06_hw_p24 800
+pay_dun03,152,134,3 duplicate(HwChicken3) Chicken#06_hw_p25 800
+pay_dun03,157,134,3 duplicate(HwChicken2) Chicken#06_hw_p26 800
+pay_dun03,160,134,3 duplicate(HwChicken2) Chicken#06_hw_p27 800
+pay_dun03,149,133,3 duplicate(HwChicken3) Chicken#06_hw_p28 800
+pay_dun03,160,133,3 duplicate(HwChicken2) Chicken#06_hw_p29 800
+pay_dun03,150,132,3 duplicate(HwChicken2) Chicken#06_hw_p30 800
+pay_dun03,153,132,3 duplicate(HwChicken3) Chicken#06_hw_p31 800
+pay_dun03,156,132,3 duplicate(HwChicken2) Chicken#06_hw_p32 800
+pay_dun03,159,132,3 duplicate(HwChicken2) Chicken#06_hw_p33 800
+pay_dun03,151,131,3 duplicate(HwChicken2) Chicken#06_hw_p34 800
+pay_dun03,152,131,3 duplicate(HwChicken2) Chicken#06_hw_p35 800
+pay_dun03,153,131,3 duplicate(HwChicken3) Chicken#06_hw_p36 800
+pay_dun03,154,131,3 duplicate(HwChicken2) Chicken#06_hw_p37 800
+pay_dun03,155,131,3 duplicate(HwChicken2) Chicken#06_hw_p38 800
+pay_dun03,156,131,3 duplicate(HwChicken3) Chicken#06_hw_p39 800
+pay_dun03,157,131,3 duplicate(HwChicken2) Chicken#06_hw_p40 800
+pay_dun03,158,131,3 duplicate(HwChicken3) Chicken#06_hw_p41 800
+
+// Payon Field chickens
+pay_fild08,1,1,0 script #06_hw_timer02 -1,{
+OnInit:
+ disablenpc "Chicken#06_hw_pf01";
+ disablenpc "Chicken#06_hw_pf02";
+ disablenpc "Chicken#06_hw_pf03";
+ disablenpc "Chicken#06_hw_pf04";
+ disablenpc "Chicken#06_hw_pf05";
+ disablenpc "Chicken#06_hw_pf06";
+ disablenpc "Chicken#06_hw_pf07";
+ disablenpc "Chicken#06_hw_pf08";
+ disablenpc "Chicken#06_hw_pf09";
+ disablenpc "Chicken#06_hw_pf10";
+ disablenpc "Chicken#06_hw_pf11";
+ disablenpc "Chicken#06_hw_pf12";
+ disablenpc "Chicken#06_hw_pf13";
+ disablenpc "Chicken#06_hw_pf14";
+ disablenpc "Chicken#06_hw_pf15";
+ disablenpc "Chicken#06_hw_pf16";
+ disablenpc "Chicken#06_hw_pf17";
+ disablenpc "Chicken#06_hw_pf18";
+ disablenpc "Chicken#06_hw_pf19";
+ disablenpc "Chicken#06_hw_pf20";
+ disablenpc "Chicken#06_hw_pf21";
+ disablenpc "Chicken#06_hw_pf22";
+ disablenpc "Chicken#06_hw_pf23";
+ disablenpc "Chicken#06_hw_pf24";
+ disablenpc "Chicken#06_hw_pf25";
+ disablenpc "Chicken#06_hw_pf26";
+ disablenpc "Chicken#06_hw_pf27";
+ initnpctimer;
+ end;
+
+OnTimer5400000:
+ enablenpc "Chicken#06_hw_pf01";
+ enablenpc "Chicken#06_hw_pf02";
+ enablenpc "Chicken#06_hw_pf03";
+ enablenpc "Chicken#06_hw_pf04";
+ enablenpc "Chicken#06_hw_pf05";
+ enablenpc "Chicken#06_hw_pf06";
+ enablenpc "Chicken#06_hw_pf07";
+ enablenpc "Chicken#06_hw_pf08";
+ enablenpc "Chicken#06_hw_pf09";
+ enablenpc "Chicken#06_hw_pf10";
+ enablenpc "Chicken#06_hw_pf11";
+ enablenpc "Chicken#06_hw_pf12";
+ enablenpc "Chicken#06_hw_pf13";
+ enablenpc "Chicken#06_hw_pf14";
+ enablenpc "Chicken#06_hw_pf15";
+ enablenpc "Chicken#06_hw_pf16";
+ enablenpc "Chicken#06_hw_pf17";
+ enablenpc "Chicken#06_hw_pf18";
+ enablenpc "Chicken#06_hw_pf19";
+ enablenpc "Chicken#06_hw_pf20";
+ enablenpc "Chicken#06_hw_pf21";
+ enablenpc "Chicken#06_hw_pf22";
+ enablenpc "Chicken#06_hw_pf23";
+ enablenpc "Chicken#06_hw_pf24";
+ enablenpc "Chicken#06_hw_pf25";
+ enablenpc "Chicken#06_hw_pf26";
+ enablenpc "Chicken#06_hw_pf27";
+ end;
+
+OnTimer6000000:
+ disablenpc "Chicken#06_hw_pf01";
+ disablenpc "Chicken#06_hw_pf02";
+ disablenpc "Chicken#06_hw_pf03";
+ disablenpc "Chicken#06_hw_pf04";
+ disablenpc "Chicken#06_hw_pf05";
+ disablenpc "Chicken#06_hw_pf06";
+ disablenpc "Chicken#06_hw_pf07";
+ disablenpc "Chicken#06_hw_pf08";
+ disablenpc "Chicken#06_hw_pf09";
+ disablenpc "Chicken#06_hw_pf10";
+ disablenpc "Chicken#06_hw_pf11";
+ disablenpc "Chicken#06_hw_pf12";
+ disablenpc "Chicken#06_hw_pf13";
+ disablenpc "Chicken#06_hw_pf14";
+ disablenpc "Chicken#06_hw_pf15";
+ disablenpc "Chicken#06_hw_pf16";
+ disablenpc "Chicken#06_hw_pf17";
+ disablenpc "Chicken#06_hw_pf18";
+ disablenpc "Chicken#06_hw_pf19";
+ disablenpc "Chicken#06_hw_pf20";
+ disablenpc "Chicken#06_hw_pf21";
+ disablenpc "Chicken#06_hw_pf22";
+ disablenpc "Chicken#06_hw_pf23";
+ disablenpc "Chicken#06_hw_pf24";
+ disablenpc "Chicken#06_hw_pf25";
+ disablenpc "Chicken#06_hw_pf26";
+ disablenpc "Chicken#06_hw_pf27";
+ stopnpctimer;
+ initnpctimer;
+ end;
+}
+
+pay_fild08,147,353,3 duplicate(HwChicken3) Chicken#06_hw_pf01 800
+pay_fild08,147,354,3 duplicate(HwChicken2) Chicken#06_hw_pf02 800
+pay_fild08,147,355,3 duplicate(HwChicken2) Chicken#06_hw_pf03 800
+pay_fild08,148,352,3 duplicate(HwChicken3) Chicken#06_hw_pf04 800
+pay_fild08,148,356,3 duplicate(HwChicken2) Chicken#06_hw_pf05 800
+pay_fild08,149,351,3 duplicate(HwChicken2) Chicken#06_hw_pf06 800
+pay_fild08,149,354,3 duplicate(HwChicken3) Chicken#06_hw_pf07 800
+pay_fild08,149,357,3 duplicate(HwChicken2) Chicken#06_hw_pf08 800
+pay_fild08,150,351,3 duplicate(HwChicken2) Chicken#06_hw_pf09 800
+pay_fild08,150,357,3 duplicate(HwChicken3) Chicken#06_hw_pf10 800
+pay_fild08,151,351,3 duplicate(HwChicken2) Chicken#06_hw_pf11 800
+pay_fild08,151,353,3 duplicate(HwChicken2) Chicken#06_hw_pf12 800
+pay_fild08,151,355,3 duplicate(HwChicken3) Chicken#06_hw_pf13 800
+pay_fild08,151,357,3 duplicate(HwChicken2) Chicken#06_hw_pf14 800
+pay_fild08,152,351,3 duplicate(HwChicken2) Chicken#06_hw_pf15 800
+pay_fild08,152,357,3 duplicate(HwChicken3) Chicken#06_hw_pf16 800
+pay_fild08,153,351,3 duplicate(HwChicken2) Chicken#06_hw_pf17 800
+pay_fild08,153,357,3 duplicate(HwChicken2) Chicken#06_hw_pf18 800
+pay_fild08,154,351,3 duplicate(HwChicken3) Chicken#06_hw_pf19 800
+pay_fild08,154,353,3 duplicate(HwChicken2) Chicken#06_hw_pf20 800
+pay_fild08,154,355,3 duplicate(HwChicken2) Chicken#06_hw_pf21 800
+pay_fild08,154,357,3 duplicate(HwChicken3) Chicken#06_hw_pf22 800
+pay_fild08,155,350,3 duplicate(HwChicken2) Chicken#06_hw_pf23 800
+pay_fild08,155,352,3 duplicate(HwChicken2) Chicken#06_hw_pf24 800
+pay_fild08,155,354,3 duplicate(HwChicken3) Chicken#06_hw_pf25 800
+pay_fild08,155,356,3 duplicate(HwChicken2) Chicken#06_hw_pf26 800
+pay_fild08,155,358,3 duplicate(HwChicken3) Chicken#06_hw_pf27 800
+
+prontera,155,285,3 script Familiar#06_hw01::HWFamiDup 799,{
+ mes "[Familiar]";
+ mes "Hello.";
+ mes "I'm Loli Ruri's faithful and cute Familiar.";
+ mes "Do you have an invitation from Loli Ruri?";
+ mes "That's a kind of^4d4dffa special ticket to Nifflheim^000000..";
+ next;
+ if (select( "Yes, I do.:No, I don't.") == 1) {
+ mes "[Familiar]";
+ mes "Do you want to go to Nifflheim?";
+ mes "It's available during Halloween.";
+ next;
+ if (select( "Yes, I do:No, I don't.") == 1) {
+ if (countitem(7460) > 0) {
+ mes "[Familiar]";
+ mes "I checked your ticket.";
+ mes "You can go there now";
+ delitem 7460,1; //Nifl_Express_Ticket
+ close2;
+ warp "nif_in", 18, 20;
+ end;
+ }
+ else {
+ mes "[Familiar]";
+ mes "You're a liar.";
+ mes "You don't have the ticket!";
+ mes "I'll suck up all your blood, you liar!";
+ percentheal -20,0;
+ emotion e_omg,1;
+ close;
+ }
+ }
+ mes "[Familiar]";
+ mes "Ok.";
+ mes "Actually, it's useless to have a special ticket to Nifflheim.";
+ close;
+ }
+ mes "[Familiar]";
+ mes "Ok.";
+ mes "If you want to ask something, give a piece of pumpkin pie to Loli Ruri.";
+ mes "He likes it.";
+ close;
+}
+payon,156,231,3 duplicate(HWFamiDup) Familiar#06_hw02 799
+morocc,159,143,3 duplicate(HWFamiDup) Familiar#06_hw03 799
+geffen,120,188,3 duplicate(HWFamiDup) Familiar#06_hw04 799
+alberta,80,171,3 duplicate(HWFamiDup) Familiar#06_hw05 799
+
+//Event Lude Monster Spawns
+ra_fild01,0,0,0,0 monster Lude 1812,3,0,0,0
+ra_fild02,0,0,0,0 monster Lude 1812,3,0,0,0
+ra_fild03,0,0,0,0 monster Lude 1812,3,0,0,0
+ra_fild04,0,0,0,0 monster Lude 1812,3,0,0,0
+ra_fild05,0,0,0,0 monster Lude 1812,3,0,0,0
+ra_fild06,0,0,0,0 monster Lude 1812,3,0,0,0
+ra_fild07,0,0,0,0 monster Lude 1812,3,0,0,0
+ra_fild08,0,0,0,0 monster Lude 1812,3,0,0,0
+ra_fild09,0,0,0,0 monster Lude 1812,3,0,0,0
+ra_fild10,0,0,0,0 monster Lude 1812,3,0,0,0
+ra_fild11,0,0,0,0 monster Lude 1812,3,0,0,0
+ra_fild12,0,0,0,0 monster Lude 1812,3,0,0,0
+ra_fild13,0,0,0,0 monster Lude 1812,3,0,0,0
+
+ra_san01,0,0,0,0 monster Lude 1812,3,0,0,0
+ra_san02,0,0,0,0 monster Lude 1812,3,0,0,0
+ra_san03,0,0,0,0 monster Lude 1812,3,0,0,0
+ra_san04,0,0,0,0 monster Lude 1812,3,0,0,0
+ra_san05,0,0,0,0 monster Lude 1812,3,0,0,0
+
+ice_dun01,0,0,0,0 monster Lude 1812,3,0,0,0
+ice_dun02,0,0,0,0 monster Lude 1812,3,0,0,0
+ice_dun03,0,0,0,0 monster Lude 1812,3,0,0,0
+
+odin_tem01,0,0,0,0 monster Lude 1812,3,0,0,0
+odin_tem02,0,0,0,0 monster Lude 1812,3,0,0,0
+odin_tem03,0,0,0,0 monster Lude 1812,3,0,0,0
+
+kh_kiehl01,0,0,0,0 monster Lude 1812,3,0,0,0
+
+kh_dun01,0,0,0,0 monster Lude 1812,3,0,0,0
+kh_dun02,0,0,0,0 monster Lude 1812,3,0,0,0
+
+yuno_fild06,0,0,0,0 monster Lude 1812,3,0,0,0
+yuno_fild10,0,0,0,0 monster Lude 1812,3,0,0,0
+
+ein_fild01,0,0,0,0 monster Lude 1812,3,0,0,0
+ein_fild02,0,0,0,0 monster Lude 1812,3,0,0,0
+ein_fild05,0,0,0,0 monster Lude 1812,3,0,0,0
+
+hu_fild01,0,0,0,0 monster Lude 1812,3,0,0,0
+hu_fild02,0,0,0,0 monster Lude 1812,3,0,0,0
+hu_fild03,0,0,0,0 monster Lude 1812,3,0,0,0
+hu_fild04,0,0,0,0 monster Lude 1812,3,0,0,0
+hu_fild05,0,0,0,0 monster Lude 1812,3,0,0,0
+hu_fild06,0,0,0,0 monster Lude 1812,3,0,0,0
+hu_fild07,0,0,0,0 monster Lude 1812,3,0,0,0
+
+tha_t01,0,0,0,0 monster Lude 1812,3,0,0,0
+tha_t02,0,0,0,0 monster Lude 1812,3,0,0,0
+tha_t03,0,0,0,0 monster Lude 1812,3,0,0,0
+tha_t04,0,0,0,0 monster Lude 1812,3,0,0,0
+tha_t05,0,0,0,0 monster Lude 1812,3,0,0,0
+tha_t06,0,0,0,0 monster Lude 1812,3,0,0,0
+tha_t07,0,0,0,0 monster Lude 1812,3,0,0,0
+tha_t08,0,0,0,0 monster Lude 1812,3,0,0,0
+tha_t09,0,0,0,0 monster Lude 1812,3,0,0,0
+tha_t10,0,0,0,0 monster Lude 1812,3,0,0,0
+tha_t11,0,0,0,0 monster Lude 1812,3,0,0,0
+tha_t12,0,0,0,0 monster Lude 1812,3,0,0,0
+
+abyss_01,0,0,0,0 monster Lude 1812,3,0,0,0
+abyss_02,0,0,0,0 monster Lude 1812,3,0,0,0
+abyss_03,0,0,0,0 monster Lude 1812,3,0,0,0
+
+juperos_01,0,0,0,0 monster Lude 1812,3,0,0,0
+juperos_02,0,0,0,0 monster Lude 1812,3,0,0,0
+jupe_core,0,0,0,0 monster Lude 1812,3,0,0,0
+
+lhz_dun01,0,0,0,0 monster Lude 1812,3,0,0,0
+lhz_dun02,0,0,0,0 monster Lude 1812,3,0,0,0
+lhz_dun03,0,0,0,0 monster Lude 1812,3,0,0,0
+lhz_fild01,0,0,0,0 monster Lude 1812,3,0,0,0
+
+lhz_fild02,0,0,0,0 monster Lude 1812,3,0,0,0
+lhz_fild03,0,0,0,0 monster Lude 1812,3,0,0,0
+ein_fild03,0,0,0,0 monster Lude 1812,3,0,0,0
+ein_fild04,0,0,0,0 monster Lude 1812,3,0,0,0
+
+ein_fild06,0,0,0,0 monster Lude 1812,3,0,0,0
+ein_fild07,0,0,0,0 monster Lude 1812,3,0,0,0
+ein_fild08,0,0,0,0 monster Lude 1812,3,0,0,0
+ein_fild09,0,0,0,0 monster Lude 1812,3,0,0,0
+ein_fild10,0,0,0,0 monster Lude 1812,3,0,0,0
+ein_dun01,0,0,0,0 monster Lude 1812,3,0,0,0
+ein_dun02,0,0,0,0 monster Lude 1812,3,0,0,0
+
+gefenia01,0,0,0,0 monster Lude 1812,3,0,0,0
+gefenia02,0,0,0,0 monster Lude 1812,3,0,0,0
+gefenia03,0,0,0,0 monster Lude 1812,3,0,0,0
+gefenia04,0,0,0,0 monster Lude 1812,3,0,0,0
+
+yuno_fild05,0,0,0,0 monster Lude 1812,3,0,0,0
+yuno_fild07,0,0,0,0 monster Lude 1812,3,0,0,0
+yuno_fild08,0,0,0,0 monster Lude 1812,3,0,0,0
+yuno_fild09,0,0,0,0 monster Lude 1812,3,0,0,0
+yuno_fild11,0,0,0,0 monster Lude 1812,3,0,0,0
+yuno_fild12,0,0,0,0 monster Lude 1812,3,0,0,0
+
+ayo_fild01,0,0,0,0 monster Lude 1812,3,0,0,0
+ayo_fild02,0,0,0,0 monster Lude 1812,3,0,0,0
+ayo_dun01,0,0,0,0 monster Lude 1812,3,0,0,0
+ayo_dun02,0,0,0,0 monster Lude 1812,3,0,0,0
+
+gon_dun01,0,0,0,0 monster Lude 1812,3,0,0,0
+gon_dun02,0,0,0,0 monster Lude 1812,3,0,0,0
+gon_dun03,0,0,0,0 monster Lude 1812,3,0,0,0
+
+ama_dun01,0,0,0,0 monster Lude 1812,3,0,0,0
+ama_dun02,0,0,0,0 monster Lude 1812,3,0,0,0
+ama_dun03,0,0,0,0 monster Lude 1812,3,0,0,0
+
+lou_fild01,0,0,0,0 monster Lude 1812,3,0,0,0
+lou_dun01,0,0,0,0 monster Lude 1812,3,0,0,0
+lou_dun02,0,0,0,0 monster Lude 1812,3,0,0,0
+lou_dun03,0,0,0,0 monster Lude 1812,3,0,0,0
+
+um_fild01,0,0,0,0 monster Lude 1812,3,0,0,0
+um_fild02,0,0,0,0 monster Lude 1812,3,0,0,0
+um_fild03,0,0,0,0 monster Lude 1812,3,0,0,0
+um_fild04,0,0,0,0 monster Lude 1812,3,0,0,0
+um_dun01,0,0,0,0 monster Lude 1812,3,0,0,0
+um_dun02,0,0,0,0 monster Lude 1812,3,0,0,0
+yggdrasil01,0,0,0,0 monster Lude 1812,3,0,0,0
+
+mag_dun01,0,0,0,0 monster Lude 1812,3,0,0,0
+mag_dun02,0,0,0,0 monster Lude 1812,3,0,0,0
+
+beach_dun,0,0,0,0 monster Lude 1812,3,0,0,0
+beach_dun2,0,0,0,0 monster Lude 1812,3,0,0,0
+beach_dun3,0,0,0,0 monster Lude 1812,3,0,0,0
+
+gon_fild01,0,0,0,0 monster Lude 1812,3,0,0,0
+ama_fild01,0,0,0,0 monster Lude 1812,3,0,0,0
+yuno_fild01,0,0,0,0 monster Lude 1812,3,0,0,0
+yuno_fild02,0,0,0,0 monster Lude 1812,3,0,0,0
+yuno_fild03,0,0,0,0 monster Lude 1812,3,0,0,0
+yuno_fild04,0,0,0,0 monster Lude 1812,3,0,0,0
+
+prt_fild00,0,0,0,0 monster Lude 1812,3,0,0,0
+prt_fild01,0,0,0,0 monster Lude 1812,3,0,0,0
+prt_fild02,0,0,0,0 monster Lude 1812,3,0,0,0
+prt_fild03,0,0,0,0 monster Lude 1812,3,0,0,0
+prt_fild04,0,0,0,0 monster Lude 1812,3,0,0,0
+prt_fild05,0,0,0,0 monster Lude 1812,3,0,0,0
+prt_fild06,0,0,0,0 monster Lude 1812,3,0,0,0
+prt_fild07,0,0,0,0 monster Lude 1812,3,0,0,0
+prt_fild08,0,0,0,0 monster Lude 1812,3,0,0,0
+prt_fild09,0,0,0,0 monster Lude 1812,3,0,0,0
+prt_fild10,0,0,0,0 monster Lude 1812,3,0,0,0
+prt_fild11,0,0,0,0 monster Lude 1812,3,0,0,0
+
+moc_fild01,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_fild02,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_fild03,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_fild04,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_fild05,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_fild06,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_fild07,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_fild08,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_fild09,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_fild10,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_fild11,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_fild12,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_fild13,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_fild14,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_fild15,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_fild16,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_fild17,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_fild18,0,0,0,0 monster Lude 1812,3,0,0,0
+
+pay_fild01,0,0,0,0 monster Lude 1812,3,0,0,0
+pay_fild02,0,0,0,0 monster Lude 1812,3,0,0,0
+pay_fild03,0,0,0,0 monster Lude 1812,3,0,0,0
+pay_fild04,0,0,0,0 monster Lude 1812,3,0,0,0
+pay_fild05,0,0,0,0 monster Lude 1812,3,0,0,0
+pay_fild06,0,0,0,0 monster Lude 1812,3,0,0,0
+pay_fild07,0,0,0,0 monster Lude 1812,3,0,0,0
+pay_fild08,0,0,0,0 monster Lude 1812,3,0,0,0
+pay_fild09,0,0,0,0 monster Lude 1812,3,0,0,0
+pay_fild10,0,0,0,0 monster Lude 1812,3,0,0,0
+pay_fild11,0,0,0,0 monster Lude 1812,3,0,0,0
+
+gef_fild00,0,0,0,0 monster Lude 1812,3,0,0,0
+gef_fild01,0,0,0,0 monster Lude 1812,3,0,0,0
+gef_fild02,0,0,0,0 monster Lude 1812,3,0,0,0
+gef_fild03,0,0,0,0 monster Lude 1812,3,0,0,0
+gef_fild04,0,0,0,0 monster Lude 1812,3,0,0,0
+gef_fild05,0,0,0,0 monster Lude 1812,3,0,0,0
+gef_fild06,0,0,0,0 monster Lude 1812,3,0,0,0
+gef_fild07,0,0,0,0 monster Lude 1812,3,0,0,0
+gef_fild08,0,0,0,0 monster Lude 1812,3,0,0,0
+gef_fild09,0,0,0,0 monster Lude 1812,3,0,0,0
+gef_fild10,0,0,0,0 monster Lude 1812,3,0,0,0
+gef_fild11,0,0,0,0 monster Lude 1812,3,0,0,0
+gef_fild12,0,0,0,0 monster Lude 1812,3,0,0,0
+gef_fild13,0,0,0,0 monster Lude 1812,3,0,0,0
+gef_fild14,0,0,0,0 monster Lude 1812,3,0,0,0
+
+cmd_fild01,0,0,0,0 monster Lude 1812,3,0,0,0
+cmd_fild02,0,0,0,0 monster Lude 1812,3,0,0,0
+cmd_fild03,0,0,0,0 monster Lude 1812,3,0,0,0
+cmd_fild04,0,0,0,0 monster Lude 1812,3,0,0,0
+cmd_fild05,0,0,0,0 monster Lude 1812,3,0,0,0
+cmd_fild06,0,0,0,0 monster Lude 1812,3,0,0,0
+cmd_fild07,0,0,0,0 monster Lude 1812,3,0,0,0
+cmd_fild08,0,0,0,0 monster Lude 1812,3,0,0,0
+cmd_fild09,0,0,0,0 monster Lude 1812,3,0,0,0
+
+mjolnir_01,0,0,0,0 monster Lude 1812,3,0,0,0
+mjolnir_02,0,0,0,0 monster Lude 1812,3,0,0,0
+mjolnir_03,0,0,0,0 monster Lude 1812,3,0,0,0
+mjolnir_04,0,0,0,0 monster Lude 1812,3,0,0,0
+mjolnir_05,0,0,0,0 monster Lude 1812,3,0,0,0
+mjolnir_06,0,0,0,0 monster Lude 1812,3,0,0,0
+mjolnir_07,0,0,0,0 monster Lude 1812,3,0,0,0
+mjolnir_08,0,0,0,0 monster Lude 1812,3,0,0,0
+mjolnir_09,0,0,0,0 monster Lude 1812,3,0,0,0
+mjolnir_10,0,0,0,0 monster Lude 1812,3,0,0,0
+mjolnir_11,0,0,0,0 monster Lude 1812,3,0,0,0
+mjolnir_12,0,0,0,0 monster Lude 1812,3,0,0,0
+
+xmas_fild01,0,0,0,0 monster Lude 1812,3,0,0,0
+
+sec_in02,0,0,0,0 monster Lude 1812,3,0,0,0
+
+gl_dun02,0,0,0,0 monster Lude 1812,3,0,0,0
+gl_dun01,0,0,0,0 monster Lude 1812,3,0,0,0
+
+gl_knt02,0,0,0,0 monster Lude 1812,3,0,0,0
+gl_knt01,0,0,0,0 monster Lude 1812,3,0,0,0
+
+gl_step,0,0,0,0 monster Lude 1812,3,0,0,0
+
+gl_sew04,0,0,0,0 monster Lude 1812,3,0,0,0
+gl_sew03,0,0,0,0 monster Lude 1812,3,0,0,0
+gl_sew02,0,0,0,0 monster Lude 1812,3,0,0,0
+gl_sew01,0,0,0,0 monster Lude 1812,3,0,0,0
+
+gl_chyard,0,0,0,0 monster Lude 1812,3,0,0,0
+gl_church,0,0,0,0 monster Lude 1812,3,0,0,0
+
+glast_01,0,0,0,0 monster Lude 1812,3,0,0,0
+
+gl_prison1,0,0,0,0 monster Lude 1812,3,0,0,0
+gl_prison,0,0,0,0 monster Lude 1812,3,0,0,0
+
+gl_in01,0,0,0,0 monster Lude 1812,3,0,0,0
+
+gl_cas02,0,0,0,0 monster Lude 1812,3,0,0,0
+gl_cas01,0,0,0,0 monster Lude 1812,3,0,0,0
+
+tur_dun04,0,0,0,0 monster Lude 1812,3,0,0,0
+tur_dun03,0,0,0,0 monster Lude 1812,3,0,0,0
+tur_dun02,0,0,0,0 monster Lude 1812,3,0,0,0
+tur_dun01,0,0,0,0 monster Lude 1812,3,0,0,0
+
+alde_dun04,0,0,0,0 monster Lude 1812,3,0,0,0
+alde_dun03,0,0,0,0 monster Lude 1812,3,0,0,0
+alde_dun02,0,0,0,0 monster Lude 1812,3,0,0,0
+alde_dun01,0,0,0,0 monster Lude 1812,3,0,0,0
+
+c_tower1,0,0,0,0 monster Lude 1812,3,0,0,0
+c_tower2,0,0,0,0 monster Lude 1812,3,0,0,0
+c_tower3,0,0,0,0 monster Lude 1812,3,0,0,0
+c_tower4,0,0,0,0 monster Lude 1812,3,0,0,0
+
+in_sphinx5,0,0,0,0 monster Lude 1812,3,0,0,0
+in_sphinx4,0,0,0,0 monster Lude 1812,3,0,0,0
+in_sphinx3,0,0,0,0 monster Lude 1812,3,0,0,0
+in_sphinx2,0,0,0,0 monster Lude 1812,3,0,0,0
+in_sphinx1,0,0,0,0 monster Lude 1812,3,0,0,0
+
+prt_maze03,0,0,0,0 monster Lude 1812,3,0,0,0
+prt_maze02,0,0,0,0 monster Lude 1812,3,0,0,0
+prt_maze01,0,0,0,0 monster Lude 1812,3,0,0,0
+
+treasure02,0,0,0,0 monster Lude 1812,3,0,0,0
+treasure01,0,0,0,0 monster Lude 1812,3,0,0,0
+
+moc_pryd06,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_pryd05,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_pryd04,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_pryd03,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_pryd02,0,0,0,0 monster Lude 1812,3,0,0,0
+moc_pryd01,0,0,0,0 monster Lude 1812,3,0,0,0
+
+gef_dun02,0,0,0,0 monster Lude 1812,3,0,0,0
+gef_dun01,0,0,0,0 monster Lude 1812,3,0,0,0
+gef_dun00,0,0,0,0 monster Lude 1812,3,0,0,0
+
+iz_dun00,0,0,0,0 monster Lude 1812,3,0,0,0
+iz_dun01,0,0,0,0 monster Lude 1812,3,0,0,0
+iz_dun02,0,0,0,0 monster Lude 1812,3,0,0,0
+iz_dun03,0,0,0,0 monster Lude 1812,3,0,0,0
+iz_dun04,0,0,0,0 monster Lude 1812,3,0,0,0
+
+pay_dun00,0,0,0,0 monster Lude 1812,3,0,0,0
+pay_dun01,0,0,0,0 monster Lude 1812,3,0,0,0
+pay_dun02,0,0,0,0 monster Lude 1812,3,0,0,0
+pay_dun03,0,0,0,0 monster Lude 1812,3,0,0,0
+pay_dun04,0,0,0,0 monster Lude 1812,3,0,0,0
+
+xmas_dun02,0,0,0,0 monster Lude 1812,3,0,0,0
+xmas_dun01,0,0,0,0 monster Lude 1812,3,0,0,0
+
+anthell02,0,0,0,0 monster Lude 1812,3,0,0,0
+anthell01,0,0,0,0 monster Lude 1812,3,0,0,0
+
+orcsdun02,0,0,0,0 monster Lude 1812,3,0,0,0
+orcsdun01,0,0,0,0 monster Lude 1812,3,0,0,0
+
+mjo_dun03,0,0,0,0 monster Lude 1812,3,0,0,0
+mjo_dun02,0,0,0,0 monster Lude 1812,3,0,0,0
+mjo_dun01,0,0,0,0 monster Lude 1812,3,0,0,0
+
+prt_sewb4,0,0,0,0 monster Lude 1812,3,0,0,0
+prt_sewb3,0,0,0,0 monster Lude 1812,3,0,0,0
+prt_sewb2,0,0,0,0 monster Lude 1812,3,0,0,0
+prt_sewb1,0,0,0,0 monster Lude 1812,3,0,0,0
+
+nif_fild01,0,0,0,0 monster Lude 1812,3,0,0,0
+
+nif_fild02,0,0,0,0 monster Lude 1812,3,0,0,0
diff --git a/npc/re/events/halloween_2008.txt b/npc/re/events/halloween_2008.txt
new file mode 100644
index 000000000..a4844da1b
--- /dev/null
+++ b/npc/re/events/halloween_2008.txt
@@ -0,0 +1,276 @@
+//===== rAthena Script =======================================
+//= iRO Halloween (2008)
+//===== By: ==================================================
+//= Kisuka
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//= iRO Halloween (2008)
+//= Run away from the zombies for tickets.
+//= Redeem tickets for prizes.
+//===== Notes: ===============================================
+//= You must enable the event monsters in mob_db2.
+//===== Additional Comments: =================================
+//= 1.0 First version. [Kisuka]
+//= 1.1 Some small changes. [Kisuka]
+//============================================================
+
+payon,162,176,4 script Halloween Magician#iRO08 704,{
+
+ if(Hallow08 < 1) {
+ mes "[Halloween Magician]";
+ mes "Kkkkkkkkk!";
+ mes "I have a special event this Halloween that tests your luck and agility.";
+ mes "Are you interested?";
+ next;
+ mes "[Halloween Magician]";
+ mes "Come on! Don't be a wuss!";
+ mes "If you collect enough tickets you can get good prizes!";
+ mes "So what do you say?";
+ next;
+ goto MainMenu;
+ }
+
+ if (Hallow08Kill == 1) {
+ mes "[Halloween Magician]";
+ mes "You a 'fraidy cat or something?!";
+ mes "You know you want to try again...";
+ mes "Do you know the rules?";
+ next;
+ set Hallow08Kill,0;
+ if(select("Yes, I know.:No, I don't know.") == 2) {
+ goto Rules;
+ }
+ goto Participate;
+ }
+
+ if (Hallow08Kill == 2) {
+ mes "[Halloween Magician]";
+ mes "Oh, well done! You are alright!";
+ mes "Isn't it fun with zombies??";
+ mes "You know, zombies were people too!";
+ mes "Ha!";
+ mes "Kkkkkkk.";
+ next;
+ getitem 7941,1;
+ set Hallow08Kill,0;
+ mes "[Halloween Magician]";
+ mes "As I promised";
+ mes "You can get Halloween tickets for cool items.";
+ close;
+ }
+
+ if(Hallow08 > 0) {
+ mes "[Halloween Magician]";
+ mes "Well, do you want to hear the rules again or, just get back to it...";
+ next;
+ goto MainMenu2;
+ }
+
+ Rules:
+ mes "[Halloween Magician]";
+ mes "This village is like a virtual Payon.";
+ mes "There are zombies and ghouls roaming around and three southern exits, but only one works.";
+ mes "That's up to you to find out.";
+ next;
+ mes "[Halloween Magician]";
+ mes "You can't use any skills to kill the ghouls or zombies.";
+ mes "And one more thing...";
+ mes "you shouldn't forget...";
+ next;
+ mes "[Halloween Magician]";
+ mes "All participants should be wearing nothing.";
+ mes "Put all belongings in your storage and come back here when your weight is '0'.";
+ next;
+ mes "[Halloween Magician]";
+ mes "Oh and one more thing!";
+ mes "You can't be riding a PecoPeco or have a Cart.";
+ mes "If you are, then I will remove them before you enter.";
+ mes "Got it?";
+ next;
+ mes "[Halloween Magician]";
+ mes "Remember, there are three exits but only one works randomly, the zombies and ghouls roaming around there can't be killed and you can't be wearing anything.";
+ next;
+ if (Hallow08 > 0) {
+ mes "[Halloween Magician]";
+ mes "Hey...";
+ mes "Come back once you're ready.";
+ close;
+ }else{
+ goto MainMenu;
+ }
+
+ Participate:
+ mes "[Halloween Magician]";
+ mes "Ok, you are ready.";
+ mes "Let me check your weight.";
+ next;
+ if (Weight > 0) {
+ mes "[Halloween Magician]";
+ mes "Gosh!";
+ mes "There's always a black sheep anywhere.";
+ next;
+ mes "[Halloween Magician]";
+ mes "You think I wouldn't notice that your weight is above '0'?";
+ mes "You're overweight...";
+ close;
+ }else{
+ mes "[Halloween Magician]";
+ mes "You seem good to go, and your weight is just right.";
+ next;
+ mes "[Halloween Magician]";
+ mes "I was quite swamped with my work, so I'm exhausted.";
+ next;
+ mes "[Halloween Magician]";
+ mes "I sometimes forget to send you there...";
+ next;
+ mes "[Halloween Magician]";
+ mes "I hope you come back well.";
+ close2;
+ if (Hallow08 < 1) {
+ set Hallow08,1;
+ }
+ set Hallow08Kill,1;
+ set @Hallow08Warp, rand(1,3);
+ percentheal -98,0;
+ setriding 0;
+ setcart 0;
+ warp "evt_zombie",155,246;
+ end;
+ }
+
+ TicketExchange:
+ mes "[Halloween Magician]";
+ mes "You want to exchange tickets for prizes?";
+ mes "Good job! Kkkkkk!";
+ next;
+ mes "[Halloween Magician]";
+ mes "Lemme tell you what items you can exchange for.";
+ next;
+ mes "[Halloween Magician]";
+ mes "5 tickets for Pumpkin Pie.";
+ mes "20 tickets for Pumpkin-Head.";
+ mes "50 tickets for Old Blue Box.";
+ mes "70 tickets for Old Purple Box.";
+ mes "200 tickets for Old Card Album.";
+ next;
+ mes "[Halloween Magician]";
+ mes "What would you like to exchange for?";
+ next;
+ switch(select("Pumpkin Pie:Pumpkin-Head:Old Blue Box:Old Purple Box:Old Card Album")) {
+ case 1:
+ if(countitem(7941) < 5) {
+ goto NotEnough;
+ }else{
+ delitem 7941,5;
+ getitem 12192,1;
+ goto Enough;
+ }
+ break;
+ case 2:
+ if(countitem(7941) < 20) {
+ goto NotEnough;
+ }else{
+ delitem 7941,20;
+ getitem 5134,1;
+ goto Enough;
+ }
+ break;
+ case 3:
+ if(countitem(7941) < 50) {
+ goto NotEnough;
+ }else{
+ delitem 7941,50;
+ getitem 603,1;
+ goto Enough;
+ }
+ break;
+ case 4:
+ if(countitem(7941) < 70) {
+ goto NotEnough;
+ }else{
+ delitem 7941,70;
+ getitem 617,1;
+ goto Enough;
+ }
+ break;
+ case 5:
+ if(countitem(7941) < 200) {
+ goto NotEnough;
+ }else{
+ delitem 7941,200;
+ getitem 616,1;
+ goto Enough;
+ }
+ }
+
+ NextTime:
+ mes "[Halloween Magician]";
+ mes "Ok, see you then.";
+ mes "Kkkkkkkk.";
+ close;
+
+ MainMenu:
+ menu "Explain it to me.",Rules,"I want to participate.",Participate,"I want to exchange tickets for prizes.",TicketExchange,"I'll come back next time.",NextTime;
+
+ MainMenu2:
+ menu "Get me back there now!",Participate,"Please, tell me the rules",Rules,"I want to exchange tickets for prizes.",TicketExchange,"I'll come back next time.",NextTime;
+
+ NotEnough:
+ mes "[Halloween Magician]";
+ mes "You don't have enough tickets!";
+ mes "Can't you even count?";
+ mes "Please come here with the right number of tickets.";
+ close;
+
+ Enough:
+ mes "[Halloween Magician]";
+ mes "Here it is.";
+ mes "Do you need...";
+ mes "anything else?";
+ next;
+ if (Hallow08 == 1) {
+ goto MainMenu2;
+ }else{
+ goto MainMenu;
+ }
+}
+
+// --------------- MapFlags ---------------
+
+
+evt_zombie,16,142,1 script zombiewarp001 45,2,2,{
+ OnTouch:
+ if (@Hallow08Warp == 1) {
+ set Hallow08Kill,2;
+ specialeffect 16;
+ warp "payon",28,142;
+ }
+ end;
+}
+
+evt_zombie,122,27,1 script zombiewarp002 45,2,2,{
+ OnTouch:
+ if (@Hallow08Warp == 2) {
+ set Hallow08Kill,2;
+ specialeffect 16;
+ warp "payon",121,40;
+ }
+ end;
+}
+
+evt_zombie,267,89,1 script zombiewarp003 45,2,2,{
+ OnTouch:
+ if (@Hallow08Warp == 3) {
+ set Hallow08Kill,2;
+ specialeffect 16;
+ warp "payon",253,95;
+ }
+ end;
+}
+
+evt_zombie,0,0,0,0 monster Zombie 3000,150,0,0,0
+evt_zombie,0,0,0,0 monster Ghoul 3001,80,0,0,0
+evt_zombie,0,0,0,0 monster Zombie Master 3002,20,0,0,0
diff --git a/npc/re/events/halloween_2009.txt b/npc/re/events/halloween_2009.txt
new file mode 100644
index 000000000..c3d314d7a
--- /dev/null
+++ b/npc/re/events/halloween_2009.txt
@@ -0,0 +1,442 @@
+//===== rAthena Script =======================================
+//= iRO Halloween (2009)
+//===== By: ==================================================
+//= Kisuka
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//= iRO Halloween (2009)
+//= Quest for Weird Pumpkin Hat.
+//= Exchange treats for buffs.
+//= Summon event monsters in towns.
+//===== Notes: ===============================================
+//= You must enable the event items in item_db2.
+//= You must enable the event mobs in mob_db2, mob_avail, and
+//= their skills in mob_skill_db2.
+//===== Additional Comments: =================================
+//= 1.0 First version. [Kisuka]
+//= 1.1 Fixed even exploit, fixed mobs overlap. [Lupus]
+//============================================================
+
+// Headgear Quest - Pumpkin Hat
+// ============================
+prontera,152,192,5 script Pumpkin Hat Researcher 712,{
+ if(BaseLevel < 45) {
+ mes "[Pumpkin Hat Researcher]";
+ mes "Shoo, I don't need a child. Shoo! I don't talk to novices.";
+ next;
+ mes "[Pumpkin Hat Researcher]";
+ mes "Go reach a level that can fight with stronger monsters and come back.";
+ close;
+ }
+ mes "[Pumpkin Hat Researcher]";
+ mes "Say do you like Pumpkin Pies?";
+ next;
+ mes "[Pumpkin Hat Researcher]";
+ mes "I'm a Pumpkin Hat researcher, Why don't you listen to my story?";
+ next;
+ while(1) {
+ switch(select("Listen to the story.:Ask about Pumpkin Hat.:Get a Pumpkin Hat.:Stop the conversation.")) {
+ case 1:
+ mes "[Pumpkin Hat Researcher]";
+ mes "I've been studying about an upgraded Pumpkin Hat.";
+ mes "I have discovered that it is a very simple process.";
+ next;
+ mes "[Pumpkin Hat Researcher]";
+ mes "The process is quite simple.";
+ mes "If you bring me ^4a4aff20 Jack o' Pumpkin^000000 I can show you.";
+ mes "Isn't that a tempting proposal?";
+ next;
+ break;
+ case 2:
+ mes "[Pumpkin Hat Researcher]";
+ mes "This upgraded pumpkin hat is powerful stuff!";
+ next;
+ mes "[Pumpkin Hat Researcher]";
+ mes "It can make a Pumpkin Pie that restores a large percentage of HP & SP using condensed energy to the person who wears it.";
+ next;
+ mes "[Pumpkin Hat Researcher]";
+ mes "All you need is ^4a4aff20 Jack o' Pumpkin^000000s.";
+ next;
+ break;
+ case 3:
+ mes "[Pumpkin Hat Researcher]";
+ mes "Do you want to get Pumpkin Pies? Okay, let me count the Jack o' Pumpkins you've brought.";
+ next;
+ if(countitem(1062) < 20) {
+ mes "[Pumpkin Hat Researcher]";
+ mes "I need ^4a4aff20 Jack o' Pumpkin^000000.";
+ mes "I'm not an alchemist or a wizard to create something from nothing.";
+ next;
+ mes "[Pumpkin Hat Researcher]";
+ mes "Okay, go hunting monsters and come back.";
+ mes "I'm going to stay here for a while so take your time.";
+ next;
+ break;
+ }else{
+ mes "[Pumpkin Hat Researcher]";
+ mes "I hope this will be useful to you. Don't forget to wear it while fighting to get your Pumpkin Pies.";
+ delitem 1062,20; // Jack o' Pumpkin
+ getitem 5668,1; // Weird Pumpkin Hat
+ next;
+ mes "[Pumpkin Hat Researcher]";
+ mes "I guess that I should get back to my research.";
+ close;
+ }
+ case 4:
+ mes "[Pumpkin Hat Researcher]";
+ mes "Bye, until we'll see each other again.";
+ mes "I wish you well...";
+ close;
+ }
+ }
+}
+
+// Buffs - Trick or Treaters
+// =========================
+- script Trick or Treater::09Treats 706,2,2,{
+OnTouch:
+ hideoffnpc strnpcinfo(3);
+ initnpctimer;
+ mes "[Trick or Treater]";
+ mes "Hooray! hooray! Hooray!";
+ mes "Trick or Treat?";
+ next;
+ if(select("Trick.:Treat.") == 1) {
+ mes "[Trick or Treater]";
+ mes "!!!!";
+ mes "Fine. I have no choice but to trick you back!";
+ sc_start SC_Stun,5000,0;
+ close;
+ }
+ mes "[Trick or Treater]";
+ mes "Oh yay! What kind of treat do you have?";
+ next;
+ switch(select("Candy:Candy Cane:Well-baked Cookie:Nothing")) {
+ case 1:
+ if(countitem(529) > 0) {
+ mes "[Trick or Treater]";
+ mes "Yay thank you!";
+ mes "Here, take this for being so nice!";
+ sc_start SC_STRFood, 1800000, 5;
+ sc_start SC_INTFood, 1800000, 5;
+ sc_start SC_VITFood, 1800000, 5;
+ sc_start SC_AGIFood, 1800000, 5;
+ sc_start SC_DEXFood, 1800000, 5;
+ sc_start SC_LUKFood, 1800000, 5;
+ sc_start SC_FLEEFOOD, 1800000, 15;
+ delitem 529,1; // Candy
+ close;
+ }else{
+ mes "[Trick or Treater]";
+ mes "At least a Candy, a Candy Cane or a Well-baked Cookie is all I ask for a treat.";
+ mes "Fine. I have no choice but to trick you!";
+ sc_start SC_Stun,5000,0;
+ close;
+ }
+ case 2:
+ if(countitem(530) > 0) {
+ mes "[Trick or Treater]";
+ mes "Yay thank you!";
+ mes "Here, take this for being so nice!";
+ sc_start SC_STRFood, 1800000, 5;
+ sc_start SC_INTFood, 1800000, 5;
+ sc_start SC_VITFood, 1800000, 5;
+ sc_start SC_AGIFood, 1800000, 5;
+ sc_start SC_DEXFood, 1800000, 5;
+ sc_start SC_LUKFood, 1800000, 5;
+ sc_start SC_FLEEFOOD, 1800000, 15;
+ delitem 530,1; // Candy Cane
+ close;
+ }else{
+ mes "[Trick or Treater]";
+ mes "At least a Candy, a Candy Cane or a Well-baked Cookie is all I ask for a treat.";
+ mes "Fine. I have no choice but to trick you!";
+ sc_start SC_Stun,5000,0;
+ close;
+ }
+ case 3:
+ if(countitem(538) > 0) {
+ mes "[Trick or Treater]";
+ mes "Yay thank you!";
+ mes "Here, take this for being so nice!";
+ sc_start SC_STRFood, 1800000, 5;
+ sc_start SC_INTFood, 1800000, 5;
+ sc_start SC_VITFood, 1800000, 5;
+ sc_start SC_AGIFood, 1800000, 5;
+ sc_start SC_DEXFood, 1800000, 5;
+ sc_start SC_LUKFood, 1800000, 5;
+ sc_start SC_FLEEFOOD, 1800000, 15;
+ delitem 538,1; // Well-baked Cookie
+ close;
+ }else{
+ mes "[Trick or Treater]";
+ mes "At least a Candy, a Candy Cane or a Well-baked Cookie is all I ask for a treat.";
+ mes "Fine. I have no choice but to trick you!";
+ sc_start SC_Stun,5000,0;
+ close;
+ }
+ case 4:
+ mes "[Trick or Treater]";
+ mes "At least a Candy, a Candy Cane or a Well-baked Cookie is all I ask for a treat.";
+ mes "Fine. I have no choice but to trick you!";
+ sc_start SC_Stun,5000,0;
+ close;
+ }
+OnInit:
+ hideonnpc "Trick or Treater#iRO1";
+ hideonnpc "Trick or Treater#iRO2";
+ hideonnpc "Trick or Treater#iRO3";
+ hideonnpc "Trick or Treater#iRO4";
+ hideonnpc "Trick or Treater#iRO5";
+ hideonnpc "Trick or Treater#iRO6";
+ hideonnpc "Trick or Treater#iRO7";
+ hideonnpc "Trick or Treater#iRO8";
+ end;
+
+OnEnableTreat:
+ enablenpc strnpcinfo(3);
+ hideonnpc strnpcinfo(3);
+ end;
+
+OnTimer15000:
+ hideonnpc strnpcinfo(3);
+ disablenpc strnpcinfo(3);
+ end;
+
+OnTimer300000:
+ donpcevent strnpcinfo(3)+"::OnEnableTreat";
+ stopnpctimer;
+ end;
+}
+prontera,151,173,5 duplicate(09Treats) Trick or Treater#iRO1 706,2,2
+prontera,270,350,5 duplicate(09Treats) Trick or Treater#iRO2 706,2,2
+prontera,234,310,5 duplicate(09Treats) Trick or Treater#iRO3 706,2,2
+prontera,156,321,5 duplicate(09Treats) Trick or Treater#iRO4 706,2,2
+prontera,156,283,5 duplicate(09Treats) Trick or Treater#iRO5 706,2,2
+prontera,142,214,5 duplicate(09Treats) Trick or Treater#iRO6 706,2,2
+prontera,134,125,5 duplicate(09Treats) Trick or Treater#iRO7 706,2,2
+prontera,220,72,5 duplicate(09Treats) Trick or Treater#iRO8 706,2,2
+
+// Monster Summoning - Halloween Wizard
+// ====================================
+- script Halloween Wizard#iRO09::09HallowWiz 737,{
+ mes "[Halloween Wizard]";
+ mes "...";
+ mes "Do you want to play a trick on someone?";
+ next;
+ while(1) {
+ switch(select("What trick?:Sure:No.")) {
+ case 1:
+ mes "[Halloween Wizard]";
+ mes "I can summon monsters in other parts of the world with just a few materials.";
+ next;
+ mes "[Halloween Wizard]";
+ mes "Sounds interesting huh?";
+ next;
+ mes "[Halloween Wizard]";
+ mes "If you bring me Fabric, Jack o' Pumpkins, Worn Fabric, or Crushed Pumpkins I can summon the monsters.";
+ next;
+ break;
+ case 2:
+ mes "[Halloween Wizard]";
+ mes "Which town do you want to play a trick on?";
+ next;
+ getmapxy(.@mapname$,.@mapx,.@mapy,0,""+strcharinfo(0)+"");
+ if (.@mapname$ == "prontera") {
+ switch(select("Geffen:Payon:Alberta:Aldebaran")) {
+ case 1:
+ set .@HallowTown,3;
+ break;
+ case 2:
+ set .@HallowTown,2;
+ break;
+ case 3:
+ set .@HallowTown,4;
+ break;
+ case 4:
+ set .@HallowTown,5;
+ break;
+ }
+ }
+ else if (.@mapname$ == "payon") {
+ switch(select("Prontera:Geffen:Alberta:Aldebaran")) {
+ case 1:
+ set .@HallowTown,1;
+ break;
+ case 2:
+ set .@HallowTown,3;
+ break;
+ case 3:
+ set .@HallowTown,4;
+ break;
+ case 4:
+ set .@HallowTown,5;
+ break;
+ }
+ }
+ else if (.@mapname$ == "geffen") {
+ switch(select("Prontera:Payon:Alberta:Aldebaran")) {
+ case 1:
+ set .@HallowTown,1;
+ break;
+ case 2:
+ set .@HallowTown,2;
+ break;
+ case 3:
+ set .@HallowTown,4;
+ break;
+ case 4:
+ set .@HallowTown,5;
+ break;
+ }
+ }
+ else if (.@mapname$ == "alberta") {
+ switch(select("Prontera:Geffen:Payon:Aldebaran")) {
+ case 1:
+ set .@HallowTown,1;
+ break;
+ case 2:
+ set .@HallowTown,3;
+ break;
+ case 3:
+ set .@HallowTown,2;
+ break;
+ case 4:
+ set .@HallowTown,5;
+ break;
+ }
+ }
+ else if (.@mapname$ == "aldebaran") {
+ switch(select("Prontera:Geffen:Payon:Alberta")) {
+ case 1:
+ set .@HallowTown,1;
+ break;
+ case 2:
+ set .@HallowTown,3;
+ break;
+ case 3:
+ set .@HallowTown,2;
+ break;
+ case 4:
+ set .@HallowTown,4;
+ break;
+ }
+ }
+ setarray .@HallowTowns$[1],"prontera","payon","geffen","alberta","aldebaran";
+ mes "[Halloween Wizard]";
+ mes "Ok then let's go to the next step.";
+ next;
+ mes "[Halloween Wizard]";
+ mes "How many Fabrics or Jack o' Pumpkins do you want to use? Don't go over 100 because that is the max amount that I can use.";
+ next;
+ input .@input;
+ if (.@input == 0) {
+ mes "[Halloween Wizard]";
+ mes "You have no definite idea.";
+ mes "It's not a big deal.";
+ mes "Let me know.";
+ next;
+ break;
+ }
+ else if (.@input > 100) {
+ mes "[Halloween Wizard]";
+ mes "I told you that it must be between 1 to 100!";
+ mes "You didn't pay attention!";
+ next;
+ break;
+ }
+ else {
+ set .@fabric,countitem(1059);
+ set .@jack,countitem(1062);
+ set .@worn,countitem(6299);
+ set .@crushed,countitem(6298);
+ set .@whispers,0;
+ set .@darklords,0;
+
+ set .@total,.@fabric + .@jack + .@worn + .@crushed;
+
+ if(.@total < .@input) {
+ mes "[Halloween Wizard]";
+ mes "Recount the number of items you have and tell me the total.";
+ mes "Huhuhuhuhuhu...";
+ next;
+ break;
+ }
+
+ if(.@fabric > 0) {
+ if(.@fabric >= .@input) {
+ delitem 1059,.@input;
+ set .@whispers,.@whispers+.@input;
+ set .@input,0;
+ }
+ else{
+ delitem 1059,.@fabric;
+ set .@input,.@input - .@fabric;
+ set .@whispers,.@whispers+.@fabric;
+ }
+ }
+ if(.@worn > 0 && .@input != 0) {
+ if(.@worn >= .@input) {
+ delitem 6299,.@input;
+ set .@whispers,.@whispers+.@input;
+ set .@input,0;
+ }
+ else{
+ delitem 6299,.@worn;
+ set .@input,.@input - .@worn;
+ set .@whispers,.@whispers+.@worn;
+ }
+ }
+ if(.@jack > 0 && .@input != 0) {
+ if(.@jack >= .@input) {
+ delitem 1062,.@input;
+ set .@darklords,.@darklords+.@input;
+ set .@input,0;
+ }
+ else{
+ delitem 1062,.@jack;
+ set .@input,.@input - .@jack;
+ set .@darklords,.@darklords+.@jack;
+ }
+ }
+ if(.@crushed > 0 && .@input != 0) {
+ if(.@crushed >= .@input) {
+ delitem 6298,.@input;
+ set .@darklords,.@darklords+.@input;
+ set .@input,0;
+ }
+ else{
+ delitem 6298,.@crushed;
+ set .@input,.@input - .@crushed;
+ set .@darklords,.@darklords+.@crushed;
+ }
+ }
+ if (.@input > 0) {
+ mes "Theres a problem.";
+ close;
+ }
+ monster ""+.@HallowTowns$[.@HallowTown]+"",0,0,"Halloween Whisper",3014,.@whispers;
+ monster ""+.@HallowTowns$[.@HallowTown]+"",0,0,"Halloween Dark Lord",3015,.@darklords;
+ mes "[Halloween Wizard]";
+ mes "Here's what you wanted.";
+ mes "Imagine what the people must be thinking in the other villages?";
+ mes "Muahahaha";
+ close;
+ }
+ case 3:
+ mes "[Halloween Wizard]";
+ mes "If you change your mind, come back here...";
+ mes "I'll stay here for a while...";
+ mes "Kkkk...";
+ close;
+ }
+ }
+}
+prontera,156,195,5 duplicate(09HallowWiz) Halloween Wizard#1 737
+geffen,133,122,5 duplicate(09HallowWiz) Halloween Wizard#2 737
+payon,156,196,5 duplicate(09HallowWiz) Halloween Wizard#3 737
+alberta,96,57,5 duplicate(09HallowWiz) Halloween Wizard#4 737
+aldebaran,146,122,5 duplicate(09HallowWiz) Halloween Wizard#5 737
diff --git a/npc/re/events/idul_fitri.txt b/npc/re/events/idul_fitri.txt
new file mode 100644
index 000000000..0c11775ca
--- /dev/null
+++ b/npc/re/events/idul_fitri.txt
@@ -0,0 +1,75 @@
+//===== rAthena Script =======================================
+//= Feast Day Of Ramadan Idul Fitri Event
+//===== By: ==================================================
+//= $ephiroth
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= rAthena Version
+//===== Description: =========================================
+//= Info : Official idRO
+//= 2006/10/16: 1.0 Release and fully working. [$ephiroth]
+//= 1.1 Replaced effect numerics with constants. [Samuray22]
+//============================================================
+
+prontera,146,92,3 script Cellerb 58,{
+ set @npcname$,"[Staff Idul Fitri]";
+ mes @npcname$;
+ if((gettime(6)==10 && (gettime(5)==24 || gettime(5)==25))==0) {
+ mes "Congratulation! Celebrate Feast Day Of Ramadan Idul Fitri 1427 H.";
+ specialeffect EF_SANDMAN;
+ close;
+ }
+ mes "Haii......^FF8800"+strcharinfo(0)+"^000000!!";
+ mes "First day of Idulfitri has arrived.";
+ mes "Congratulation celebrate him.";
+ mes "There is event special today.";
+ next;
+ mes @npcname$;
+ mes "Event today .....^009500Idul Fitri Quest!^000000";
+ next;
+ mes @npcname$;
+ mes "If you interest to follow this event, I will cook it to you.";
+ next;
+
+ switch(select("Allright. I like that!!","Next time.... Thanks.")){
+ case 1:
+ mes @npcname$;
+ mes "I have something that might interest you.";
+ mes "I need all of the following items:";
+ mes "^D5A500Ketupat Sayur Ingredient :^000000";
+ mes "^00B6FF~5 Ketupat, 5 Carrot~,^000000";
+ mes "^CC6633~5 Sweet Potato, 10 Meat~,^000000";
+ mes "^000088~2 Green Herb, 5 Stem~.^000000";
+ next;
+ mes @npcname$;
+ if ( (countitem(552)<5 || countitem(515)<5 ||countitem(516)<5 || countitem(517)<10 || countitem(511)<2 || countitem(905)<5) ) {
+ mes "You don't have enough items.";
+ mes "Come back when you have them all.";
+ close;
+ }
+ delitem 552,5;
+ delitem 515,5;
+ delitem 516,2;
+ delitem 517,10;
+ delitem 511,2;
+ delitem 905,5;
+ mes "I see you already have all the items you need.";
+ mes "Just a moment, please!!";
+ next;
+ mes "^009500-Plupping snapping bubbling~^000000";
+ mes "^009500-Clinking clingking~^000000";
+ mes "^009500-Clang clang~^000000";
+ getitem 583,1;
+ next;
+ mes @npcname$;
+ mes "We appreciate your participation in this special event.";
+ emotion e_thx;
+ close;
+ case 2:
+ mes @npcname$;
+ mes "Oh well, maybe you will participate in tommorow's quest.";
+ emotion e_hmm;
+ close;
+ }
+} \ No newline at end of file
diff --git a/npc/re/events/lunar_2008.txt b/npc/re/events/lunar_2008.txt
new file mode 100644
index 000000000..7e5530981
--- /dev/null
+++ b/npc/re/events/lunar_2008.txt
@@ -0,0 +1,283 @@
+//===== rAthena Script =======================================
+//= Lunar New Year Event (2008)
+//===== By: ==================================================
+//= L0ne_W0lf
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//= iRO Lunar New Year event; Year of the Rat. (2008)
+//= Kill Cramps, Taruus, and Matrins to retrieve "Rice Pouches"
+//= in return for various rice-themed foods, envelopes, and
+//= a "New year Doll" egg. Rates are guessed.
+//=
+//= Cramp, Tarou, and Matrin drops altered, Uncomment in
+//= mob_db2 to enable. [required]
+//=
+//= Miss Lunar NPC uses the sprite 4_f_nacoruri, which isn't
+//= standard in kRO's data files. If you're having problems
+//= or are unsure if your client supports that sprite, an
+//= alternate NPC header has been included.
+//===== Additional Comments: =================================
+//= 1.0 First version. [L0ne_W0lf]
+//= 1.1 Added missing checkweights. [L0ne_W0lf]
+//============================================================
+
+payon_in01,193,30,4 script Rice Mill Grandma#rat 78,{
+ mes "[Rice Mill Grandma]";
+ if (!lunar_rat) {
+ mes "Those filthy little";
+ mes "creatures! Scurrying";
+ mes "around, snatching things";
+ mes "from me! If only they";
+ mes "weren't so blamed quick...";
+ next;
+ select("What's wrong?");
+ mes "[Rice Mill Grandma]";
+ mes "Oh, I was just making";
+ mes "some rice cakes and";
+ mes "pastries to celebrate";
+ mes "the new year, but these";
+ mes "animals have been stealing";
+ mes "the Rice Pouches I've prepared.";
+ next;
+ select("Rice Pouches?");
+ mes "[Rice Mill Grandma]";
+ mes "Yes, my son needs those";
+ mes "Rice Pouches to pound the";
+ mes "rice in a mortar, but I can't";
+ mes "make any pastries if I don't";
+ mes "even have the rice. Do you";
+ mes "think you can help me?";
+ next;
+ if (select("Of course.:I don't even know you.") == 1) {
+ set lunar_rat,1;
+ mes "[" + strcharinfo(0)+"]";
+ mes "Of course.";
+ mes "What can I do?";
+ next;
+ mes "[Rice Mill Grandma]";
+ mes "Well, do you think you";
+ mes "can catch the animals that";
+ mes "stole my Rice Pouches?";
+ mes "They're these blue and";
+ mes "white rats and these";
+ mes "nasty little moles.";
+ next;
+ select("Not a problem.");
+ mes "[" + strcharinfo(0)+"]";
+ mes "Not a problem.";
+ mes "I'll catch those animals,";
+ mes "and bring back any Rice";
+ mes "Pouches that I can find.";
+ next;
+ mes "[Rice Mill Grandma]";
+ mes "Oh, thank you!";
+ mes "Good luck catching";
+ mes "those pests for me~";
+ close;
+ }
+ mes "[Rice Mill Grandma]";
+ mes "I... Well...";
+ mes "That's true, but I was";
+ mes "planning on giving you";
+ mes "something nice in return";
+ mes "for your help. I know you're";
+ mes "not a bad person, so...";
+ close;
+ }
+ else if ((lunar_rat >= 1 && lunar_rat <= 2) || lunar_rat == 4) {
+ if (countitem(7770) >= 1 && lunar_rat == 2) {
+ mes "Oh, is that the";
+ mes "Sweet Rice my son made?";
+ mes "Would you let me have it?";
+ mes "Please wait here a moment,";
+ mes "and I'll make you some pastry~";
+ delitem 7770,1; //Sweet_rice
+ set lunar_rat,3;
+ close;
+ }
+ else if (lunar_rat == 4) {
+ if (countitem(7770) >= 1) {
+ mes "Oh, is that the";
+ mes "Sweet Rice my son made?";
+ mes "Would you let me have it?";
+ mes "Please wait here a moment,";
+ mes "and I'll make you some pastry~";
+ delitem 7770,1; //Sweet_rice
+ set lunar_rat,5;
+ close;
+ }
+ mes "Oh, where are all the";
+ mes "Rice Pouches? We need";
+ mes "them to make more rice cakes...";
+ close;
+ }
+ else if (countitem(7869) < 1 && lunar_rat <= 2) {
+ mes "Ooh, those white and";
+ mes "blue mouses might have";
+ mes "snatched my Rice Pouches";
+ mes "Those moles probably took";
+ mes "them too. Such nasty little";
+ mes "creatures, aren't they?";
+ close;
+ }
+ mes "Oh, is that one of my";
+ mes "Rice Pouches? I'm sorry,";
+ mes "but the pain my hips..";
+ mes "Would you mind being";
+ mes "a dear, and delivering";
+ mes "that to my son for me?";
+ set lunar_rat,2;
+ close;
+ }
+ else if (lunar_rat == 3 || lunar_rat == 5) {
+ set .@reward,rand(1,100);
+ if (.@reward <= 5) {
+ if (lunar_rat == 3) {
+ getitem 9038,1; // New_Year_Doll_Egg
+ set lunar_rat,4;
+ }
+ else if (lunar_rat == 5) {
+ getitem 668,1; // Red_Envelope
+ }
+ }
+ else if (.@reward >= 6 && .@reward <= 10) getitem 12198,2; // Lucky_Rice_Cake
+ else if (.@reward >= 11 && .@reward <= 30) getitem 12195,3; // Plain_Rice_Cake
+ else if (.@reward >= 31 && .@reward <= 40) getitem 12196,2; // Hearty_Rice_Cake
+ else if (.@reward >= 41 && .@reward <= 55) getitem 12123,2; // Honey_Pastry
+ else if (.@reward >= 56 && .@reward <= 70) getitem 12122,2; // Sesame_Pastry
+ else if (.@reward >= 71 && .@reward <= 80) getitem 12124,2; // Rainbow_Cake
+ else if (.@reward >= 81 && .@reward <= 90) getitem 12198,2; // Korean_Rice_Cake
+ else if (.@reward >= 91 && .@reward <= 100) getitem 12197,3; // Salty_Rice_Cake
+ // After getting the egg there is a chance to get an envelope with each turn in
+ if (rand(1,20) <= 5 && lunar_rat == 4) getitem 668,1; // Red_Envelope
+ // Set the quest accordingly for repeat turn-ins.
+ if (lunar_rat == 3) set lunar_rat,2;
+ else if (lunar_rat == 5) set lunar_rat,4;
+ mes "It's not nearly enough";
+ mes "to repay you for what you've";
+ mes "done for me, but I'd like";
+ mes "you to have this pastry that";
+ mes "I just made. Please enjoy it~";
+ next;
+ mes "[Rice Mill Grandma]";
+ mes "Thank you for the";
+ mes "Sweet Rice! I'll be";
+ mes "sure to make something";
+ mes "delicious for you if you";
+ mes "bring me more, okay?";
+ close;
+ }
+}
+
+payon,215,127,4 script Rice Mill Man#rat 54,{
+ mes "[Rice Mill Man]";
+ if (!lunar_rat) {
+ mes "Breaks my heart...";
+ mes "My mom spends all this";
+ mes "time preparing rice for";
+ mes "the new year, and it's all";
+ mes "stolen by rats and vermin!";
+ close;
+ }
+ else if (lunar_rat == 1) {
+ mes "I hear from my mother";
+ mes "that you're helping her out.";
+ mes "She's a sweet old lady, huh?";
+ mes "If you find ang Rice Pouches,";
+ mes "you might want to have her";
+ mes "inspect them first.";
+ close;
+ }
+ else if (lunar_rat >= 2) {
+ if (countitem(7869) < 1) {
+ mes "If you bring me some";
+ mes "Rice Pouches, then I can";
+ mes "pound into into Sweet Rice.";
+ mes "You're here to help out my";
+ mes "mother, right? Thanks,";
+ mes "I really appreciate that.";
+ close;
+ }
+ mes "Oh, you brought me some";
+ mes "Rice Pouches from my mother?";
+ mes "Give me a second, and I'll";
+ mes "get this rice pounded into";
+ mes "paste, lickety split.";
+ next;
+ mes "[Rice Mill Man]";
+ mes "Hoo! Haa! Hi-yah!";
+ mes "Woosha! Whoosha!";
+ mes "Ka-taaaaaaaaaa!";
+ mes "WOOOSHA!";
+ next;
+ mes "[Rice Mill Man]";
+ mes "All done. Here, this";
+ mes "Sweet Rice is ready to";
+ mes "be made into pastries";
+ mes "Would you please bring";
+ mes "this to my mother?";
+ delitem 7869,1; //Rice_Pouch
+ getitem 7770,1; //Sweet_Rice
+ close;
+ }
+}
+
+//payon,126,113,4 script Miss Lunar#rat 862,{
+payon,126,113,4 script Miss Lunar#rat 719,{
+ mes "[Lunar]";
+ if ((MaxWeight-Weight) < 3000 || checkweight(1201,1) == 0) {
+ mes "Oh, I'm sorry, but we";
+ mes "can't do any business if";
+ mes "you're carry so much stuff.";
+ mes "Would you mind storing some of";
+ mes "your things with the Kafra Service?";
+ close;
+ }
+ if (lunar_rat < 4) {
+ mes "I want to earn enough";
+ mes "money to buy that big";
+ mes "crescent silver pin.";
+ mes "I have to sell as much";
+ mes "of this Mojji as I can!";
+ close;
+ }
+ else if (lunar_rat >= 4) {
+ mes "Oh, hello! I'm selling";
+ mes "special rice cakes made";
+ mes "from sweet rice. You can";
+ mes "eat it yourself, or feed it";
+ mes "to your New Year Doll if";
+ mes "you have one as a pet.";
+ next;
+ mes "[Lunar]";
+ mes "Anyway, I'm selling";
+ mes "10 Mojji for 3,000 zeny";
+ mes "Would you like to try some?";
+ next;
+ if (select("Yes:No") == 1) {
+ if (Zeny >= 3000) {
+ set Zeny,Zeny-3000;
+ getitem 554,10; // Mojji
+ mes "[Lunar]";
+ mes "Thank you, and I hope you";
+ mes "have a happy new year!";
+ mes "Please come again~";
+ close;
+ }
+ mes "[Lunar]";
+ mes "Oh, I'm sorry, but you";
+ mes "don't have enough";
+ mes "zeny right now....";
+ close;
+ }
+ mes "[Lunar]";
+ mes "Oh, alright. Well, I'll";
+ mes "be here if you or your";
+ mes "friends want some Mojji";
+ mes "later, alight? Goodbye~";
+ close;
+ }
+}
diff --git a/npc/re/events/nguild/nguild_dunsw.txt b/npc/re/events/nguild/nguild_dunsw.txt
new file mode 100644
index 000000000..8a34362f3
--- /dev/null
+++ b/npc/re/events/nguild/nguild_dunsw.txt
@@ -0,0 +1,67 @@
+//===== rAthena Script =======================================
+//= War of Emperium Dungeon Switch for NGuild Castles
+//===== By: ==================================================
+//= kobra_k88
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= rAthena 0.1+; RO Episode 4+
+//===== Description: =========================================
+//= Switch that warps guild members to the guild dungeon
+//===== Additional Comments: =================================
+//= Based off existing guild scripts. Do not know if it is accurate.[kobra_k88]
+//= 1.1 Guild Dungeon Switch Fucntion added. [L0ne_W0lf]
+//============================================================
+
+
+//==================================================
+function script F_GldDunSw {
+ set .@GID, GetCastleData(getarg(0),1);
+ if (.@GID == 0) {
+ mes "[ Echoing Voice ]";
+ mes " ' The one who can overcome an ordeal and show true bravery... will find the way... ' ";
+ close;
+ }
+ else {
+ mes "[ Echoing Voice ]";
+ mes " ' Only the one who can show true bravery can take this test. '";
+ next;
+ mes " ";
+ mes "There's a small lever. Will you pull it?";
+ next;
+
+ if (select("Pull.:Do not.") == 1) {
+ if (getcharid(2) == .@GID) {
+ warp "gld_dun"+getarg(1),getarg(2),getarg(3);
+ end;
+ }
+ mes " ";
+ mes " Nothing happened.";
+ }
+ return;
+ }
+}
+
+// Castle 1 ===============================================
+nguild_alde,212,181,0 script Switch#DunN01 111,{
+ callfunc "F_GldDunSw","nguild_alde","02",32,122;
+ close;
+}
+
+// Castle 2 ===============================================
+nguild_gef,78,84,0 script Switch#DunN02 111,{
+ callfunc "F_GldDunSw","nguild_gef","04",39,258;
+ close;
+}
+
+// Castle 3 ===============================================
+nguild_pay,101,25,0 script Switch#DunN03 111,{
+ callfunc "F_GldDunSw","nguild_pay","01",186,165;
+ close;
+}
+
+// Castle 4 ===============================================
+nguild_prt,94,200,0 script Switch#DunN04 111,{
+ callfunc "F_GldDunSw","nguild_prt","03",28,251;
+ close;
+}
diff --git a/npc/re/events/nguild/nguild_ev_agit.txt b/npc/re/events/nguild/nguild_ev_agit.txt
new file mode 100644
index 000000000..1dad83b83
--- /dev/null
+++ b/npc/re/events/nguild/nguild_ev_agit.txt
@@ -0,0 +1,216 @@
+//===== rAthena Script =======================================
+//= War of Emperium - NGuild Wars Events
+//===== By: ==================================================
+//= kobra_k88
+//===== Current Version: =====================================
+//= 1.5
+//===== Compatible With: =====================================
+//= rAthena 0.1+; RO Episode 4+
+//===== Description: =========================================
+//= Event Triggers for NGuild Wars
+//===== Additional Comments: =================================
+// Based off existing guild scripts. Do not know if it is accurate.[kobra_k88]
+//= 1.3 Added code for abandoning captured castles on /breakguild [Lupus]
+//= 1.4 AGIT Functions added, treasure spawning added. [L0ne_W0lf]
+//= 1.5 Emperium should now properly respawn. [L0ne_W0lf]
+//============================================================
+
+
+// Function for OnAgitStart =========================================
+function script F_AgitStart {
+ set .@map$, getarg(0);
+ set .@castle$, getarg(1);
+ set .@empx, getarg(2);
+ set .@empy, getarg(3);
+
+ MapRespawnGuildID .@map$,GetCastleData(.@map$,1),2;
+ monster .@map$,.@empx,.@empy,"Emperium",1288,1,"Agit_"+.@castle$+"::OnAgitBreak";
+ GvgOn .@map$;
+ if (GetCastleData(.@map$,1) != 0) return;
+ end;
+}
+
+// Function for OnGuildBreak ======================================
+function script F_GuildBreak {
+ set .@map$, getarg(0);
+ set .@castle$, getarg(1);
+
+ killmonsterall .@map$;
+
+ Announce "Guild Base [" + GetCastleName(.@map$) + "] has been abandoned.",0;
+ disablenpc "Kafra Staff#"+.@castle$;
+
+ SetCastleData .@map$,0,0;
+ return;
+}
+
+// Function for OnAgitBreak ======================================
+function script F_AgitBreak {
+ set .@map$, getarg(0);
+ set .@castle$, getarg(1);
+
+ set .@GID,getcharid(2);
+ if (.@GID <= 0) return;
+
+ set .@Economy,GetCastleData(.@map$,2) - 5;
+ if (.@Economy < 0) set .@Economy, 0;
+ SetCastleData .@map$, 2, .@Economy;
+
+ set .@Defence,GetCastleData(.@map$,3) - 5;
+ if (.@Defence < 0) set .@Defence, 0;
+ SetCastleData .@map$, 3, .@Defence;
+
+ SetCastleData .@map$,1, .@GID;
+ MapAnnounce .@map$,"The emperium has been destroyed.",bc_map,0x00CCFF;
+ Announce "The [" + GetCastleName(.@map$) + "] castle has been conquered by the [" + GetGuildName(.@GID) + "] guild.",bc_all;
+ donpcevent "::OnRecvCastle"+.@castle$;
+
+ disablenpc "Kafra Staff#"+.@castle$;
+
+ // remove investment data and kafra
+ for( set .@i, 4; .@i <= 9; set .@i, .@i+1 )
+ SetCastleData .@map$, .@i, 0;
+
+ // if the new guild doesn't have Guardian Research, erase guardians
+ if( getgdskilllv(.@GID,10002) == 0 )
+ for( set .@i, 10; .@i <= 17; set .@i, .@i+1 )
+ SetCastleData .@map$, .@i, 0;
+
+ return;
+}
+
+
+// Function for OnAgitEnd ======================================
+function script F_AgitEnd {
+ set .@map$, getarg(0);
+ set .@castle$, getarg(1);
+
+ GvgOff .@map$;
+ // Disable the following if statment to keep empty
+ // castles from being aquired after after WoE ends.
+ if (GetCastleData(.@map$,1) == 0) return;
+ MapRespawnGuildID .@map$,GetCastleData(.@map$,1),4;
+ KillMonster .@map$,"Agit_"+.@castle$+"::OnAgitBreak";
+ end;
+}
+
+// Castle 1 ================================================================
+nguild_alde,0,0,0 script Agit_N01 -1,{
+OnInterIfInitOnce:
+ donpcevent "::OnRecvCastleN01";
+ end;
+OnRecvCastleN01:
+ RequestGuildInfo GetCastleData("nguild_alde",1);
+ end;
+OnAgitStart:
+ callfunc "F_AgitStart","nguild_alde","N01",216,24;
+ end;
+OnAgitBreak:
+ callfunc "F_AgitBreak","nguild_alde","N01";
+ goto OnAgitEliminate;
+ end;
+OnGuildBreak:
+ callfunc "F_GuildBreak","nguild_alde","N01";
+ end;
+OnAgitEliminate:
+ MapRespawnGuildID "nguild_alde",GetCastleData("nguild_alde",1),6;
+ Monster "nguild_alde",216,24,"EMPERIUM",1288,1,"Agit_N01::OnAgitBreak";
+ end;
+OnAgitEnd:
+ callfunc "F_AgitEnd","nguild_alde","N01";
+ end;
+}
+
+// Castle 2 ================================================================
+nguild_gef,0,0,0 script Agit_N02 -1,{
+OnInterIfInitOnce:
+ donpcevent "::OnRecvCastleN02";
+ end;
+OnRecvCastleN02:
+ RequestGuildInfo GetCastleData("nguild_gef",1);
+ end;
+OnAgitStart:
+ callfunc "F_AgitStart","nguild_gef","N02",198,182;
+ end;
+OnAgitBreak:
+ callfunc "F_AgitBreak","nguild_gef","N02";
+ goto OnAgitEliminate;
+ end;
+OnGuildBreak:
+ callfunc "F_GuildBreak","nguild_gef","N02";
+ end;
+OnAgitEliminate:
+ MapRespawnGuildID "nguild_gef",GetCastleData("nguild_gef",1),6;
+ Monster "nguild_gef",198,182,"EMPERIUM",1288,1,"Agit_N02::OnAgitBreak";
+ end;
+OnAgitEnd:
+ callfunc "F_AgitEnd","nguild_gef","N02";
+ end;
+}
+
+// Castle 3 ================================================================
+nguild_pay,0,0,0 script Agit_N03 -1,{
+OnInterIfInitOnce:
+ donpcevent "::OnRecvCastleN03";
+ end;
+OnRecvCastleN03:
+ RequestGuildInfo GetCastleData("nguild_pay",1);
+ end;
+OnAgitStart:
+ callfunc "F_AgitStart","nguild_pay","N03",139,139;
+ end;
+OnAgitBreak:
+ callfunc "F_AgitBreak","nguild_pay","N03";
+ goto OnAgitEliminate;
+ end;
+OnGuildBreak:
+ callfunc "F_GuildBreak","nguild_pay","N03";
+ end;
+OnAgitEliminate:
+ MapRespawnGuildID "nguild_pay",GetCastleData("nguild_pay",1),6;
+ Monster "nguild_pay",139,139,"EMPERIUM",1288,1,"Agit_N03::OnAgitBreak";
+ end;
+OnAgitEnd:
+ callfunc "F_AgitEnd","nguild_pay","N03";
+ end;
+}
+
+// Castle 4 ================================================================
+nguild_prt,0,0,0 script Agit_N04 -1,{
+OnInterIfInitOnce:
+ donpcevent "::OnRecvCastleN04";
+ end;
+OnRecvCastleN04:
+ RequestGuildInfo GetCastleData("nguild_prt",1);
+ end;
+OnAgitStart:
+ callfunc "F_AgitStart","nguild_prt","N04",197,197;
+ end;
+OnAgitBreak:
+ callfunc "F_AgitBreak","nguild_prt","N04";
+ goto OnAgitEliminate;
+ end;
+OnGuildBreak:
+ callfunc "F_GuildBreak","nguild_prt","N04";
+ end;
+OnAgitEliminate:
+ MapRespawnGuildID "nguild_prt",GetCastleData("nguild_prt",1),6;
+ Monster "nguild_prt",197,197,"EMPERIUM",1288,1,"Agit_N04::OnAgitBreak";
+ end;
+OnAgitEnd:
+ callfunc "F_AgitEnd","nguild_prt","N04";
+ end;
+}
+
+// Treasure Spawn Time
+//========================================
+- script TreasSpawn -1,{
+ end;
+
+OnClock0005:
+ callfunc "F_GldTreas","nguild_alde","N01",$boxNumN01,$@bxN01,$@boxIdN01,1324,114,218,123,227,0;
+ callfunc "F_GldTreas","nguild_gef","N02",$boxNumN02,$@bxN02,$@boxIdN02,1334,150,108,158,114,0;
+ callfunc "F_GldTreas","nguild_pay","N03",$boxNumN03,$@bxN03,$@boxIdN03,1344,286,4,295,13,0;
+ callfunc "F_GldTreas","nguild_prt","N04",$boxNumN04,$@bxN04,$@boxIdN04,1354,6,204,15,213,0;
+ end;
+}
diff --git a/npc/re/events/nguild/nguild_flags.txt b/npc/re/events/nguild/nguild_flags.txt
new file mode 100644
index 000000000..1642c4419
--- /dev/null
+++ b/npc/re/events/nguild/nguild_flags.txt
@@ -0,0 +1,192 @@
+//===== rAthena Script =======================================
+//= War of Emperium N Guild Flags
+//===== By: ==================================================
+//= kobra_k88
+//===== Current Version: =====================================
+//= 1.3
+//===== Compatible With: =====================================
+//= rAthena 0.1+; RO Episode 4+
+//===== Description: =========================================
+//= WoE flag scripts. Display guild emblems on flags.
+//===== Additional Comments: =================================
+// Based off existing guild scripts. Do not know if it is accurate.[kobra_k88]
+// 1.1 Inner Flags don't teleport you to your HQ anymore [Lupus]
+// 1.2 updated flags to use the new arguments. [L0ne__W0lf]
+// 1.3 Guild flag function added. [L0ne_W0lf]
+//============================================================
+
+/// Flag Function
+//============================================================
+function script F_Flags {
+ set .@GID, GetCastleData(getarg(1),1);
+ if (getarg(5) == 0) return;
+ if (.@GID == 0) {
+ mes " [ Edict of the Divine Rune Midgard Kingdom ]";
+ mes " ";
+ mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
+ mes "We declare that";
+ mes "there is no formal master of this castle.";
+ mes " ";
+ mes "2. To the one who can ";
+ mes "overcome all trials";
+ mes "and destroy the Emperium,";
+ mes "the king will endow the one with";
+ mes "ownership of this castle.";
+ return;
+ }
+ else {
+ if (getcharid(2) == .@GID && getarg(4) == 1) {
+ mes "Brave ones...";
+ mes "Do you wish to return to your honorable place?";
+ next;
+ if (select("Return to the guild castle.:Quit.") == 1) {
+ if (getcharid(2) == GetCastleData(getarg(1),1))
+ warp getarg(1),getarg(2),getarg(3);
+ }
+ return;
+ }
+ mes "[ Edict of the Divine Rune Midgard Kingdom ]";
+ mes " ";
+ mes "1. Following the ordinance of the";
+ mes "Divine Rune Midgard Kingdom,";
+ mes "we approve that this place is in";
+ mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
+ mes " ";
+ mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
+ mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
+ mes "If there is anyone who objects to this,";
+ mes " prove your strength and honor with a steel blade in your hand.";
+ return;
+ }
+}
+
+//============================================================================//
+// Castle 1
+//============================================================================//
+n_castle,110,96,1 script NGuild Aldebaran#a1-1 722,{
+ callfunc "F_Flags","Al De Baran","nguild_alde",218,170,1,1;
+ close;
+
+OnRecvCastleN01:
+ FlagEmblem GetCastleData("nguild_alde",1);
+ end;
+}
+
+nguild_alde,30,248,4 script NGuild Aldebaran#a1-6::NGuildAlde 722,{
+ callfunc "F_Flags","Al De Baran","nguild_alde",218,170,0,1;
+ close;
+
+OnRecvCastleN01:
+ FlagEmblem GetCastleData("nguild_alde",1);
+ end;
+}
+// In Castle ============================================
+nguild_alde,30,246,4 duplicate(NGuildAlde) NGuild Aldebaran#a1-7 722
+nguild_alde,37,248,4 duplicate(NGuildAlde) NGuild Aldebaran#a1-8 722
+nguild_alde,37,246,4 duplicate(NGuildAlde) NGuild Aldebaran#a1-9 722
+nguild_alde,95,80,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-10 722
+nguild_alde,95,59,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-11 722
+nguild_alde,62,75,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-12 722
+nguild_alde,70,75,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-13 722
+nguild_alde,74,75,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-14 722
+nguild_alde,62,64,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-15 722
+nguild_alde,66,64,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-16 722
+nguild_alde,70,64,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-17 722
+nguild_alde,74,64,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-18 722
+nguild_alde,203,150,4 duplicate(NGuildAlde) NGuild Aldebaran#a1-19 722
+nguild_alde,210,150,4 duplicate(NGuildAlde) NGuild Aldebaran#a1-20 722
+
+
+
+
+//============================================================================//
+// Castle 2
+//============================================================================//
+n_castle,110,109,3 script NGuild Geffen#g1-1 722,{
+ callfunc "F_Flags","Geffen","nguild_gef",83,47,1,1;
+ close;
+
+OnRecvCastleN02:
+ FlagEmblem GetCastleData("nguild_gef",1);
+ end;
+}
+
+nguild_gef,28,157,4 script NGuild Geffen#g1-6::NGuildGef 722,{
+ callfunc "F_Flags","Geffen","nguild_gef",83,47,0,1;
+ close;
+
+OnRecvCastleN02:
+ FlagEmblem GetCastleData("nguild_gef",1);
+ end;
+}
+// In Castle =============================================
+nguild_gef,32,157,4 duplicate(NGuildGef) NGuild Geffen#g1-7 722
+nguild_gef,22,156,5 duplicate(NGuildGef) NGuild Geffen#g1-8 722
+nguild_gef,68,185,3 duplicate(NGuildGef) NGuild Geffen#g1-9 722
+nguild_gef,17,171,5 duplicate(NGuildGef) NGuild Geffen#g1-10 722
+nguild_gef,59,16,4 duplicate(NGuildGef) NGuild Geffen#g1-11 722
+nguild_gef,64,16,4 duplicate(NGuildGef) NGuild Geffen#g1-12 722
+
+
+
+//============================================================================//
+// Castle 3
+//============================================================================//
+n_castle,94,109,5 script NGuild Payon#f1-1 722,{
+ callfunc "F_Flags","Payon","nguild_pay",87,29,1,1;
+ close;
+
+OnRecvCastleN03:
+ FlagEmblem GetCastleData("nguild_pay",1);
+ end;
+}
+
+nguild_pay,238,67,4 script NGuild Payon#f1-6::NGuildPay 722,{
+ callfunc "F_Flags","Payon","nguild_pay",87,29,0,1;
+ close;
+
+OnRecvCastleN03:
+ FlagEmblem GetCastleData("nguild_pay",1);
+ end;
+}
+// In Castle ===============================================
+nguild_pay,238,67,4 duplicate(NGuildPay) NGuild Payon#f1-6 722
+nguild_pay,233,67,4 duplicate(NGuildPay) NGuild Payon#f1-7 722
+nguild_pay,221,123,4 duplicate(NGuildPay) NGuild Payon#f1-8 722
+nguild_pay,221,116,4 duplicate(NGuildPay) NGuild Payon#f1-9 722
+nguild_pay,206,108,4 duplicate(NGuildPay) NGuild Payon#f1-10 722
+nguild_pay,212,108,4 duplicate(NGuildPay) NGuild Payon#f1-11 722
+
+
+
+
+//=============================================================================//
+// Castle 4
+//=============================================================================//
+n_castle,94,96,7 script NGuild Prontera#p1-1 722,{
+ callfunc "F_Flags","Prontera","nguild_prt",97,174,1,1;
+ close;
+
+OnRecvCastleN04:
+ FlagEmblem GetCastleData("nguild_prt",1);
+ end;
+}
+
+nguild_prt,58,56,4 script NGuild Prontera#p1-7::NGuildPrt 722,{
+ callfunc "F_Flags","Prontera","nguild_prt",97,174,0,1;
+ close;
+
+OnRecvCastleN04:
+ FlagEmblem GetCastleData("nguild_prt",1);
+ end;
+}
+// In Castle =============================================
+nguild_prt,64,56,4 duplicate(NGuildPrt) NGuild Prontera#p1-8 722
+nguild_prt,76,32,4 duplicate(NGuildPrt) NGuild Prontera#p1-9 722
+nguild_prt,84,32,4 duplicate(NGuildPrt) NGuild Prontera#p1-10 722
+nguild_prt,94,39,4 duplicate(NGuildPrt) NGuild Prontera#p1-11 722
+nguild_prt,94,24,4 duplicate(NGuildPrt) NGuild Prontera#p1-12 722
+nguild_prt,73,14,4 duplicate(NGuildPrt) NGuild Prontera#p1-13 722
+nguild_prt,73,6,4 duplicate(NGuildPrt) NGuild Prontera#p1-14 722
+nguild_prt,55,46,4 duplicate(NGuildPrt) NGuild Prontera#p1-15 722
+nguild_prt,45,46,4 duplicate(NGuildPrt) NGuild Prontera#p1-16 722
diff --git a/npc/re/events/nguild/nguild_guardians.txt b/npc/re/events/nguild/nguild_guardians.txt
new file mode 100644
index 000000000..299c3a380
--- /dev/null
+++ b/npc/re/events/nguild/nguild_guardians.txt
@@ -0,0 +1,89 @@
+//===== rAthena Script =======================================
+//= War of Emperium - nguild guardians script
+//===== By: ==================================================
+//= kobra_k88
+//===== Current Version: =====================================
+//= 1.0
+//===== Compatible With: =====================================
+//= rAthena 0.1+; RO Episode 4+
+//===== Description: =========================================
+//= Re-spawns guardians on server start if they have been
+//= purchased. Also announces when a guardian dies.
+//===== Additional Comments: =================================
+//= Based off existing guild scripts. Do not know if it is accurate.[kobra_k88]
+//============================================================
+
+
+//------------------------------------------------------------------------------
+nguild_alde,216,24,0 script Guardian_N01 -1,{
+OnAgitInit:
+ if (GetCastleData("nguild_alde",10) == 1) guardian "nguild_alde",18,219,"Soldier Guardian",1287,"Guardian_N01::OnGuardianDied",0;
+ if (GetCastleData("nguild_alde",11) == 1) guardian "nguild_alde",117,42,"Soldier Guardian",1287,"Guardian_N01::OnGuardianDied",1;
+ if (GetCastleData("nguild_alde",12) == 1) guardian "nguild_alde",207,153,"Soldier Guardian",1287,"Guardian_N01::OnGuardianDied",2;
+ if (GetCastleData("nguild_alde",13) == 1) guardian "nguild_alde",68,70,"Archer Guardian",1285,"Guardian_N01::OnGuardianDied",3;
+ if (GetCastleData("nguild_alde",14) == 1) guardian "nguild_alde",187,140,"Archer Guardian",1285,"Guardian_N01::OnGuardianDied",4;
+ if (GetCastleData("nguild_alde",15) == 1) guardian "nguild_alde",62,204,"Knight Guardian",1286,"Guardian_N01::OnGuardianDied",5;
+ if (GetCastleData("nguild_alde",16) == 1) guardian "nguild_alde",113,100,"Knight Guardian",1286,"Guardian_N01::OnGuardianDied",6;
+ if (GetCastleData("nguild_alde",17) == 1) guardian "nguild_alde",211,174,"Knight Guardian",1286,"Guardian_N01::OnGuardianDied",7;
+ end;
+
+OnGuardianDied:
+ // Event when Guardian dies
+ MapAnnounce "nguild_alde","A Guardian Has Fallen",17;
+ end;
+}
+
+//------------------------------------------------------------------------------
+nguild_gef,198,182,0 script Guardian_N02 -1,{
+OnAgitInit:
+ if (GetCastleData("nguild_gef",10) == 1) guardian "nguild_gef",30,178,"Soldier Guardian",1287,"Guardian_N02::OnGuardianDied",0;
+ if (GetCastleData("nguild_gef",11) == 1) guardian "nguild_gef",64,180,"Soldier Guardian",1287,"Guardian_N02::OnGuardianDied",1;
+ if (GetCastleData("nguild_gef",12) == 1) guardian "nguild_gef",61,25,"Soldier Guardian",1287,"Guardian_N02::OnGuardianDied",2;
+ if (GetCastleData("nguild_gef",13) == 1) guardian "nguild_gef",61,44,"Archer Guardian",1285,"Guardian_N02::OnGuardianDied",3;
+ if (GetCastleData("nguild_gef",14) == 1) guardian "nguild_gef",189,43,"Archer Guardian",1285,"Guardian_N02::OnGuardianDied",4;
+ if (GetCastleData("nguild_gef",15) == 1) guardian "nguild_gef",51,192,"Knight Guardian",1286,"Guardian_N02::OnGuardianDied",5;
+ if (GetCastleData("nguild_gef",16) == 1) guardian "nguild_gef",49,67,"Knight Guardian",1286,"Guardian_N02::OnGuardianDied",6;
+ if (GetCastleData("nguild_gef",17) == 1) guardian "nguild_gef",181,14,"Knight Guardian",1286,"Guardian_N02::OnGuardianDied",7;
+ end;
+
+OnGuardianDied:
+ // Event when Guardian dies
+ MapAnnounce "nguild_gef","A Guardian Has Fallen",17;
+ end;
+}
+//------------------------------------------------------------------------------
+nguild_pay,139,139,0 script Guardian_N03 -1,{
+OnAgitInit:
+ if (GetCastleData("nguild_pay",10) == 1) guardian "nguild_pay",210,120,"Soldier Guardian",1287,"Guardian_N03::OnGuardianDied",0;
+ if (GetCastleData("nguild_pay",11) == 1) guardian "nguild_pay",69,26,"Soldier Guardian",1287,"Guardian_N03::OnGuardianDied",1;
+ if (GetCastleData("nguild_pay",12) == 1) guardian "nguild_pay",23,141,"Soldier Guardian",1287,"Guardian_N03::OnGuardianDied",2;
+ if (GetCastleData("nguild_pay",13) == 1) guardian "nguild_pay",224,87,"Archer Guardian",1285,"Guardian_N03::OnGuardianDied",3;
+ if (GetCastleData("nguild_pay",14) == 1) guardian "nguild_pay",81,45,"Archer Guardian",1285,"Guardian_N03::OnGuardianDied",4;
+ if (GetCastleData("nguild_pay",15) == 1) guardian "nguild_pay",214,53,"Knight Guardian",1286,"Guardian_N03::OnGuardianDied",5;
+ if (GetCastleData("nguild_pay",16) == 1) guardian "nguild_pay",69,26,"Knight Guardian",1286,"Guardian_N03::OnGuardianDied",6;
+ if (GetCastleData("nguild_pay",17) == 1) guardian "nguild_pay",23,141,"Knight Guardian",1286,"Guardian_N03::OnGuardianDied",7;
+ end;
+
+OnGuardianDied:
+ // Event when Guardian dies
+ MapAnnounce "nguild_pay","A Guardian Has Fallen",17;
+ end;
+}
+//------------------------------------------------------------------------------
+nguild_prt,197,197,0 script Guardian_N04 -1,{
+OnAgitInit:
+ if (GetCastleData("nguild_prt",10) == 1) guardian "nguild_prt",196,92,"Soldier Guardian",1287,"Guardian_N04::OnGuardianDied",0;
+ if (GetCastleData("nguild_prt",11) == 1) guardian "nguild_prt",113,200,"Soldier Guardian",1287,"Guardian_N04::OnGuardianDied",1;
+ if (GetCastleData("nguild_prt",12) == 1) guardian "nguild_prt",111,186,"Soldier Guardian",1287,"Guardian_N04::OnGuardianDied",2;
+ if (GetCastleData("nguild_prt",13) == 1) guardian "nguild_prt",76,202,"Archer Guardian",1285,"Guardian_N04::OnGuardianDied",3;
+ if (GetCastleData("nguild_prt",14) == 1) guardian "nguild_prt",90,26,"Archer Guardian",1285,"Guardian_N04::OnGuardianDied",4;
+ if (GetCastleData("nguild_prt",15) == 1) guardian "nguild_prt",58,59,"Knight Guardian",1286,"Guardian_N04::OnGuardianDied",5;
+ if (GetCastleData("nguild_prt",16) == 1) guardian "nguild_prt",112,200,"Knight Guardian",1286,"Guardian_N04::OnGuardianDied",6;
+ if (GetCastleData("nguild_prt",17) == 1) guardian "nguild_prt",101,194,"Knight Guardian",1286,"Guardian_N04::OnGuardianDied",7;
+ end;
+
+OnGuardianDied:
+ // Event when Guardian dies
+ MapAnnounce "nguild_prt","A Guardian Has Fallen",17;
+ end;
+}
diff --git a/npc/re/events/nguild/nguild_kafras.txt b/npc/re/events/nguild/nguild_kafras.txt
new file mode 100644
index 000000000..a4bd7ff01
--- /dev/null
+++ b/npc/re/events/nguild/nguild_kafras.txt
@@ -0,0 +1,71 @@
+//===== rAthena Script =======================================
+//= War of Emperium Kafras for N Guild Castles
+//===== By: ==================================================
+//= kobra_k88
+//===== Current Version: =====================================
+//= 1.2
+//===== Compatible With: =====================================
+//= rAthena 0.1+; RO Episode 5+
+//===== Description: =========================================
+//= Provides Kafra services for guild members of NGuild Castles.
+//= Used in conjuction with function F_Kafra.
+//===== Additional Comments: =================================
+//= Based off existing guild scripts. Do not know if it is accurate.[kobra_k88]
+//= 1.1 All N Guild Kafras teleport to Prontera only! [Lupus]
+//= 1.2 Added Kafra function. [L0ne_W0lf]
+//============================================================
+
+
+function script F_GKafra {
+ cutin "kafra_01",2;
+ set @GID, GetCastleData(getarg(0),1);
+ if (getcharid(2) == @GID && getgdskilllv(@GID,10001)) goto L_StartG;
+
+ mes "[Kafra Service]";
+ mes "I am contracted to provide service only for the ^ff0000" + GetGuildName(@GID) + "^000000 Guild. Please use another Kafra Corporation staff member around here. I am Sorry for your inconvenience.";
+ cutin "",255;
+ close;
+L_StartG:
+ set @wrpP[0], 200;
+ set @wrpD$[0], getarg(1);
+ setarray @wrpC$[0], @wrpD$[0]+" ^880000"+@wrpP[0]+"^000000 z", "Cancel", "", "", "","";
+ callfunc "F_Kafra",2,0,0,0,800;
+ end;
+}
+
+// Castle 1 ===============================================
+nguild_alde,218,170,0 script Kafra Service#N01 117,{
+ callfunc "F_GKafra", "nguild_alde", "Prontera";
+ end;
+OnRecvCastleN01:
+ if (GetCastleData("nguild_alde",9) < 1) disablenpc "Kafra Service#N01";
+ end;
+}
+
+// Castle 2 ===============================================
+//nguild_gef,96,173,0 script Kafra Service#N02 117,{
+nguild_gef,35,37,0 script Kafra Service#N02 117,{
+ callfunc "F_GKafra", "nguild_gef", "Prontera";
+ end;
+OnRecvCastleN02:
+ if (GetCastleData("nguild_gef",9) < 1) disablenpc "Kafra Service#N02";
+ end;
+}
+
+// Castle 3 ===============================================
+nguild_pay,128,58,3 script Kafra Service#N03 117,{
+ callfunc "F_GKafra", "nguild_pay", "Prontera";
+ end;
+OnRecvCastleN03:
+ if (GetCastleData("nguild_pay",9) < 1) disablenpc "Kafra Service#N03";
+ end;
+}
+
+// Castle 4 ===============================================
+nguild_prt,96,173,0 script Kafra Service#N04 117,{
+ callfunc "F_GKafra", "nguild_prt", "Prontera";
+ end;
+OnRecvCastleN04:
+ if (GetCastleData("nguild_prt",9) < 1) disablenpc "Kafra Service#N04";
+ end;
+}
diff --git a/npc/re/events/nguild/nguild_managers.txt b/npc/re/events/nguild/nguild_managers.txt
new file mode 100644
index 000000000..7d5bf52ff
--- /dev/null
+++ b/npc/re/events/nguild/nguild_managers.txt
@@ -0,0 +1,174 @@
+//===== rAthena Script =======================================
+//= War of Emperium Managers for N Guild Castles
+//===== By: ==================================================
+//= kobra_k88
+//===== Current Version: =====================================
+//= 1.2
+//===== Compatible With: =====================================
+//= rAthena 0.1+; RO Episode 4+
+//===== Description: =========================================
+//=
+//==============================================
+//= Break down of arguments used in the function:
+//= arg(0): name of Castle Manager
+//= arg(1): name of guild castle.
+//= arg(2): x1 coordinate for warp to treasure room
+//= arg(3): y1 coordinate for warp to treasure room
+//= arg(4): guild script suffix for kafra, etc.
+//===== Additional Comments: =================================
+//= 1.0 Based off existing guild scripts. Do not know if it is accurate.[kobra_k88]
+//= 1.1 Added modified guild manager function. [L0ne_W0lf]
+//= Removed guardian summoning.
+//= 1.2 Corrected function name. (bugreport:1728) [L0ne_W0lf]
+//============================================================
+
+//==============================================
+function script F_GldManager {
+
+ set @GID, GetCastleData(getarg(1),1);
+ mes "[ "+getarg(0)+" ]";
+ if (@GID == 0){
+ mes "I am waiting for my master. Brave adventurer, follow your destiny!";
+ return;
+ }
+ if (getcharid(2) != @GID){
+ mes "I am here to follow ^5533FF" + getguildmaster(@GID) + "^000000's command! Hey! Your not even a part of the guild!!";
+ mes "Where are the guardians? Destroy these intruders!";
+ return;
+ }
+ if (strcharinfo(0) != getguildmaster(@GID)){
+ mes "You're not ^5533FF" + getguildmaster(@GID) + "^000000! I am here to follow ^5533FF" + getguildmaster(@GID) + "^000000's command only";
+ return 0;
+ }
+
+ mes "Welcome Master ^5533FF" + getguildmaster(@GID) + "^000000 ! I will assist you in any way I can!";
+ next;
+
+ menu "Kafra Staff Employment / Dismissal",M_Kaf, "Enter Treasure Room",M_Treas, "Cancel",M_End;
+
+ //===========================
+ M_Kaf:
+ //======
+ mes "[ "+getarg(0)+" ]";
+ if (GetCastleData(getarg(1),9) == 1) goto L_Dismiss;
+ if (getgdskilllv(@GID,10001) == 0){
+ mes "Master, you don't have a contract with the Kafra Staff Company.";
+ mes "In order to hire a Kafra, you must first learn the Guild skill ^5533FFContract With Kafra^000000.";
+ return;
+ }
+
+ L_Hire:
+ mes "Would you like to employ the services of a Kafra? You will need ^5533FF10,000 Zeny^000000 to do so... ";
+ next;
+ menu "Employ Kafra.",-,"Cancel",sM_KafEnd;
+
+ mes "[ "+getarg(0)+" ]";
+ if (Zeny < 10000){
+ mes "Master, you do not have enough money to employ a Kafra. Employment has been cancelled.";
+ return;
+ }
+ set Zeny,Zeny-10000;
+ enablenpc "Kafra Staff#"+getarg(4);
+ SetCastleData getarg(1),9,1;
+ mes "You have created a contract with the Kafra Staff Company.";
+ next;
+ cutin "kafra_01",2;
+ mes "[ Kafra Staff ]";
+ mes "How do you do? I'm here to provide you with helpful service! I'll do the best I can to serve you.";
+ next;
+ cutin "kafra_01",255;
+ mes "[ "+getarg(0)+" ]";
+ //mes "Your employment contract lasts ^5533FF1 month^000000. After this term is over you will have to create a new contract.";
+ mes "I think the Kafra Staff will benefit our guild members.";
+ return;
+
+ sM_KafEnd:
+ mes "[ "+getarg(0)+" ]";
+ mes "As you wish Master. But I suggest we get a Kafra as soon as possible!";
+ return;
+
+ L_Dismiss:
+ mes "Would you like to dismiss the current Kafra?";
+ next;
+ menu "Dismissal",-,"Cancel",sM_KafEnd2;
+
+ cutin "kafra_01",2;
+ mes "[ Kafra Staff ]";
+ mes "Have I done anything wrong? If I did, will you please forgive me?";
+ next;
+ menu "Dismiss",-,"Cancel",ssM_KafEnd2;
+
+ mes "[ Kafra Staff ]";
+ mes "It's unfortunate that I won't be able to serve your guild anymore....";
+ next;
+ disablenpc "Kafra Staff#"+getarg(4);
+ SetCastleData getarg(1),9,0;
+ cutin "kafra_01",255;
+ mes "[ "+getarg(0)+" ]";
+ mes "The Kafra has been dismissed. But... we should really get a Kafra as soon as possible!";
+ return;
+ ssM_KafEnd2:
+ mes "[ Kafra Staff ]";
+ mes "Thank you master, I'll do my best! ^^.";
+ cutin "kafra_01",255;
+ return;
+ sM_KafEnd2:
+ mes "[ "+getarg(0)+" ]";
+ mes "Master, I think you should keep the current Kafra Staff because she is already trying her best to serve us";
+ return;
+
+ //=========================
+ M_Treas:
+ //========
+ mes "[ "+getarg(0)+" ]";
+ mes "Would you to go to our Treasure Room? Only you, the Guild Master, are allowed to enter this room.";
+ next;
+ menu "Enter Treasure room.",-,"Cancel",sM_TresEnd;
+
+ mes "[ "+getarg(0)+" ]";
+ mes "Please follow me through the secret passage way.";
+ mes "You must pull down on the secret switch in order to get out.";
+ next;
+ warp getarg(1),getarg(2),getarg(3);
+ return;
+ sM_TresEnd:
+ mes "[ "+getarg(0)+" ]";
+ mes "The goods are produced everyday.";
+ mes "You should get them whenever you can because they might dissapear if you take them at the wrong time.";
+ return;
+
+
+ //==========================
+ M_End:
+ //=======
+ mes "[ "+getarg(0)+" ]";
+ mes "As you wish, master.";
+ return;
+}
+
+// Castle 1 ==================================================================================
+nguild_alde,218,175,0 script Frolo 55,{
+ callfunc "F_GldManager","Frolo","nguild_alde",119,223,"N01";
+ close;
+}
+
+
+// Castle 2 ==================================================================================
+nguild_gef,40,48,5 script Leiber 55,{
+ callfunc "F_GldManager","Leiber","nguild_gef",155,112,"N02";
+ close;
+}
+
+
+// Castle 3 ==================================================================================
+nguild_pay,120,58,4 script Dundar 55,{
+ callfunc "F_GldManager","Dundar","nguild_pay",290,7,"N03";
+ close;
+}
+
+
+// Castle 4 ==================================================================================
+nguild_prt,112,181,0 script Thefton 55,{
+ callfunc "F_GldManager","Thefton","nguild_prt",15,209,"N04";
+ close;
+}
diff --git a/npc/re/events/nguild/nguild_treas.txt b/npc/re/events/nguild/nguild_treas.txt
new file mode 100644
index 000000000..1fc8cbaf9
--- /dev/null
+++ b/npc/re/events/nguild/nguild_treas.txt
@@ -0,0 +1,167 @@
+//===== rAthena Script =======================================
+//= War of Emperium Treasure Rooms for NGuild Guild Castles
+//===== By: ==================================================
+//= kobra_k88
+//===== Current Version: =====================================
+//= 1.3b
+//===== Compatible With: =====================================
+//= rAthena 0.1+; RO Episode 4+
+//===== Description: =========================================
+//=
+//===== Additional Comments: =================================
+//= Based off existing guild scripts. Do not know if it is accurate.[kobra_k88]
+//= 1.2 Official treasure spawn [Lupus]
+//= 1.3 Added F_GldTreas function. (bugreport:1788) [L0ne_W0lf]
+//= 1.3b Added F_GldTreasSw function. (bugreport:3292) [brianluau]
+//============================================================
+
+
+//================================================
+// Treasure Spawning Function
+//================================================
+function script F_GldTreas {
+ if(getarg(10) != 1) {
+ setcastledata getarg(0),4,0;
+ setcastledata getarg(0),5,0;
+
+ // Why on earth are we killing old treasure chest spawns?
+ //killmonster getarg(0),"Treasure_"+getarg(1)+"::OnDied";
+
+ // Don't spawn treasures if Castle is empty, or Eco is greater than 100
+ if(GetCastleData(getarg(0),2) > 100 || GetCastleData(getarg(0),1) == 0) return;
+
+ // Only spawn one treasure chest for novice castles.
+ if (compare(getarg(0),"nguild"))
+ set getarg(2),1;
+ else
+ set getarg(2),GetCastleData(getarg(0),2)/5+4;
+
+ if (getarg(2) <= 0) return;
+
+ //sets the counter variable = to the box number amount
+ set getarg(3), getarg(2);
+ }
+ for (set .@i,1; .@i <= getarg(3) ; set .@i,.@i+1) {
+ // set treasure box ID
+ set getarg(4), getarg(5) + (.@i+1) % 2;
+ areamonster getarg(0),getarg(6),getarg(7),getarg(8),getarg(9),"Treasure Chest",getarg(4),1,"Treasure_"+getarg(1)+"::OnDied";
+ }
+ return;
+}
+
+//==============================================================
+// Treasure Room Switch
+//===============================================================
+function script F_GldTreasSw {
+ mes " ";
+ mes "There's a small lever. Will you pull it?";
+ next;
+
+ if (select("Pull.:Do not.") == 1) {
+ warp getarg(0),getarg(1),getarg(2);
+ return;
+ }
+ close;
+}
+
+//<=============================== Castle 1 =================================>\\
+
+// Treasure Spawn -----------------------
+nguild_alde,1,1,1 script Treasure_N01 -1,{
+
+OnRecvCastleN01:
+ end;
+OnInit:
+ if($boxNumN01 == 0) end;
+ set $@bxN01, $boxNumN01;
+ callfunc "F_GldTreas","nguild_alde","N01",$boxNumN01,$@bxN01,$@boxIdN01,1324+rand(10),114,218,123,227,1;
+ end;
+
+OnDied:
+ mapannounce "nguild_alde","Treasure Chest Broken Open",17;
+ set $boxNumN01, $boxNumN01 -1;
+ if($boxNumN01 == 0) mapannounce "nguild_alde", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
+ end;
+}
+
+// Treasure Room Switch --------------------
+nguild_alde,123,223,0 script Switch#TresN01 111,{
+ callfunc "F_GldTreasSw", "nguild_alde",218,176;
+ end;
+}
+
+//<================================ Castle 2 ================================>\\
+
+// Treasure Spawn ----------------------------
+nguild_gef,1,1,1 script Treasure_N02 -1,{
+
+OnRecvCastleN02:
+ end;
+OnInit:
+ if($boxNumN02 == 0) end;
+ set $@bxN02, $boxNumN02;
+ callfunc "F_GldTreas","nguild_gef","N02",$boxNumN02,$@bxN02,$@boxIdN02,1334+rand(10),150,108,158,114,1;
+ end;
+
+OnDied:
+ mapannounce "nguild_gef","Treasure Chest Broken Open",17;
+ set $boxNumN02, $boxNumN02 -1;
+ if($boxNumN02 == 0) mapannounce "nguild_gef", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
+ end;
+}
+
+// Room Switch ---------------------------------------------------------
+nguild_gef,152,117,0 script Switch#TresN02 111,{
+ callfunc "F_GldTreasSw","nguild_gef",40,49;
+ end;
+}
+
+//<================================ Castle 3 ================================>\\
+
+// Treasure Spawn ---------------------------
+nguild_pay,1,1,0 script Treasure_N03 -1,{
+OnRecvCastleN03:
+ end;
+OnInit:
+ if($boxNumN03 == 0) end;
+ set $@bxN03, $boxNumN03;
+ callfunc "F_GldTreas","nguild_pay","N03",$boxNumN03,$@bxN03,$@boxIdN03,1344+rand(10),286,4,295,13,1;
+ end;
+
+OnDied:
+ mapannounce "nguild_pay","Treasure Chest Broken Open",17;
+ set $boxNumN03, $boxNumN03 -1;
+ if($boxNumN03 == 0) mapannounce "nguild_pay", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
+ end;
+}
+
+// Treasure Room Switch ---------------------------------------------------
+nguild_pay,295,8,0 script Switch#TresN03 111,{
+ callfunc "F_GldTreasSw", "nguild_pay",120,59;
+ end;
+}
+
+//<================================ Castle 4 ================================>\\
+
+// Treasure Spawn -------------------------------
+nguild_prt,1,1,0 script Treasure_N04 -1,{
+OnRecvCastleN04:
+ end;
+OnInit:
+ if($boxNumN04 == 0) end;
+ set $@bxN04, $boxNumN04;
+ callfunc "F_GldTreas","nguild_prt","N04",$boxNumN04,$@bxN04,$@boxIdN04,1354+rand(10),6,204,15,213,1;
+ end;
+
+OnDied:
+ mapannounce "nguild_prt","Treasure Chest Broken Open",17;
+ set $boxNumN04, $boxNumN04 -1;
+ if($boxNumN04 == 0) mapannounce "nguild_prt", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0;
+ end;
+}
+
+// Treasure Room Switch ----------------------------------------------------
+nguild_prt,15,209,0 script Switch#TresN04 111,{
+ callfunc "F_GldTreasSw", "nguild_prt",109,179;
+ end;
+}
diff --git a/npc/re/events/nguild/nguild_warper.txt b/npc/re/events/nguild/nguild_warper.txt
new file mode 100644
index 000000000..41d51ca59
--- /dev/null
+++ b/npc/re/events/nguild/nguild_warper.txt
@@ -0,0 +1,111 @@
+//===== rAthena Script =======================================
+//= Novice's Guild Castles War of Emperium Usher NPC
+//===== By: ==================================================
+//= Lupus
+//===== Current Version: =====================================
+//= 1.7
+//===== Compatible With: =====================================
+//= rAthena 1+ with eaclass(); RO Episode 4+
+//===== Description: =========================================
+//=
+//===== Additional Comments: =================================
+//= Now you have access to 4 N Guild castles. They don't have
+//= dungeons. And 2nd Classes can't seize these Castles.
+//= These new castles need a new strategy. It would bring some
+//= fun and live to your game.
+//= NOTE: If your Guild Master is 2nd class, then he could
+//= rule the Castles and gather Treasure Boxes after WoE
+//= 1.1 Now 2nd classes can't enter NC place at all
+//= 1.2 Restricted access of SG/SL. On warp clear some
+//= unallowed buffs [Lupus]
+//= 1.3 Restricted TK,High classes >=90 BaseLevel,
+//= updated list of unallowed buffs [Lupus]
+//= 1.4 Restricted it to 80 Base Level [Lupus]
+//= 1.5 According to official info: 1 Treasure Chest per Castle
+//= 1.6 Only 1st Class < 60 BaseLevel Players can participate
+//= 1.7 Guilds with Emergency Call or with 9+ skill points
+//= can't take part in NWoE. [Lupus]
+//= TODO: The official entrance is in Izlude.
+//============================================================
+
+
+prontera,146,163,6 script Novice Castles 729,{
+ mes "[Cita]";
+ if(getcharid(2)!=0){
+ if(getgdskilllv(getcharid(2),10013)){
+ mes "I see... your guild has Emergency Call mastered.";
+ mes "You cannot enter the Novice Castle area.";
+ emotion e_hmm;
+ emotion e_wah,1;
+ close;
+ }
+ if(
+ getgdskilllv(getcharid(2),10000) +
+ getgdskilllv(getcharid(2),10001) +
+ getgdskilllv(getcharid(2),10002) +
+ getgdskilllv(getcharid(2),10003) +
+ getgdskilllv(getcharid(2),10004) +
+ getgdskilllv(getcharid(2),10005) +
+ getgdskilllv(getcharid(2),10006) +
+ getgdskilllv(getcharid(2),10007) +
+ getgdskilllv(getcharid(2),10008) +
+ getgdskilllv(getcharid(2),10009) +
+ getgdskilllv(getcharid(2),10010) +
+ getgdskilllv(getcharid(2),10011) +
+ getgdskilllv(getcharid(2),10012) +
+ getgdskilllv(getcharid(2),10013) +
+ getgdskilllv(getcharid(2),10014) > 9
+ ){
+ mes "I see... your guild has Emergency Call mastered.";
+ mes "You cannot enter the Novice Castle area.";
+ emotion e_hmm;
+ emotion e_wah,1;
+ close;
+ }
+ } else {
+ mes "^FF0000You have to enter a guild to be able to hit Emperium!^000000";
+ }
+ mes "I'm a new usher of Novice Castles.";
+ next;
+ if( !(eaclass()&(EAJL_2|EAJL_UPPER)) && BaseLevel<60 )
+ menu "Warp me to Novice Castles",M_WARP,"Cancel",-;
+
+ mes "[Cita]";
+ mes "I'm sorry, you can't enter the sacred Novice Castles place.";
+ emotion e_sry;
+ close;
+
+M_WARP:
+ //remove several unallowed buffs
+ sc_end SC_ASSUMPTIO;
+ sc_end SC_IMPOSITIO;
+ sc_end SC_SUFFRAGIUM;
+ sc_end SC_MAGNIFICAT;
+ sc_end SC_WEAPONPERFECTION;
+ sc_end SC_GOSPEL;
+ sc_end SC_BASILICA;
+ sc_end SC_MAGICPOWER;
+ sc_end SC_MARIONETTE;
+ sc_end SC_MARIONETTE2;
+ sc_end SC_DEVOTION;
+ sc_end SC_SACRIFICE;
+ sc_end SC_MAXOVERTHRUST;
+ sc_end SC_SPIRIT;
+ warp "n_castle",102,93+rand(14);
+ close;
+}
+
+
+n_castle,102,107,5 script Cita 729,{
+ mes "[Cita]";
+ mes "Hello, "+ strcharinfo(0) +". Can I help you?";
+ next;
+ menu "Warp me to Prontera!",-,"Cancel",LEnd;
+
+ warp "prontera",155,177+rand(5);
+ close;
+ LEnd:
+ mes "[Cita]";
+ mes "Ok.";
+ close;
+}
diff --git a/npc/re/events/twintowers.txt b/npc/re/events/twintowers.txt
new file mode 100644
index 000000000..942807222
--- /dev/null
+++ b/npc/re/events/twintowers.txt
@@ -0,0 +1,95 @@
+//===== rAthena Script =======================================
+//= Twin Towers NPCs
+//===== By: ==================================================
+//= sEiKaN (1.0)
+//===== Current Version: =====================================
+//= 1.6
+//===== Compatible With: =====================================
+//= Any Athena Version; 0315+
+//===== Description: =========================================
+//= mRO Event: Twin Towers NPCs
+//===== Additional Comments: =================================
+//= 1.2 by Akaru 1.3 by massdriller(Fixed typos)
+//= 1.4 fixed coords, according to off. src [Lupus]
+//= 1.5 Removed Duplicates [Silent]
+//= 1.6 Fixed wrong sprite id on main npc [ultramage]
+//============================================================
+
+prontera,146,92,4 script Twin Towers#tt1::Twin-Towers 812,{
+ mes "[Twin Towers]";
+ mes "How are you? We are the Twin Towers.";
+ mes "It is such a pleasure to be able to meet you here.";
+ mes "I suppose you know that this is Ragnarok Online, a land of dreams and fantasies.";
+ mes "Are you having a joyous adventure and exciting experience?";
+ next;
+ mes "[Twin Towers]";
+ mes "Although we can't move around and can't live the way you do,";
+ mes "we love the world as much as you do!";
+ next;
+ mes "[Twin Towers]";
+ mes "May you experience the sensation of this lovely world!";
+ mes "For this reason, we are here at your service with our special magic.";
+ mes "Kindly let us know.";
+ next;
+ menu "I shall accept your offer.",YES,"I'll ask for your service next time.",NO;
+
+ NO:
+ mes "[Twin Towers]";
+ mes "Er, what a pity. Traveling by yourself is still the best evidence of adventure.";
+ mes "Isn't this proving that you are still young?";
+ mes "We respect brave hearts like this";
+ next;
+ mes "[Twin Towers]";
+ mes "There are good and bad times in life, moreover, adventure isn't an easy task in the first place.";
+ mes "Isn't this true?";
+ mes "Feel free to come to us when you have time, we will always be there to serve you.";
+ next;
+ mes "[Twin Towers]";
+ mes "Forget all your troubles, and create a splendid legend in this wonderful world.";
+ mes "This is such a wonderful world, and you'll always be a great adventurer!";
+ close;
+ YES:
+ mes "[Twin Towers]";
+ mes "The flaming passion of an adventurer,";
+ mes "The desire to explore the unknown realms,";
+ mes "The dedication and commitment to achieve the aspiration...";
+ mes "You are simply a true adventurer with what compassion.";
+ next;
+ mes "[Twin Towers]";
+ mes "We wish to help passionate adventurers.";
+ mes "Although we are not able to move, luckily we have the special ability that can warp you to places of danger and excitement.";
+ next;
+ mes "[Twin Towers]";
+ mes "Come on! Where do you wish to go?";
+ mes "Just let us know you desired destination and we will send your there!";
+ menu "Hidden Temple", HiddenTemple,"Orc Dungeon",OrcDungeon,"Ant Hell",AntHell,"Mjolnir Waste Pit",MjolnirWastePit,"Sphinx",Sphinx,"Glast Heim",GlastHeim,"Comodo",Comodo;
+ HiddenTemple:
+ warp "prt_fild01",136,368;
+ close;
+ OrcDungeon:
+ warp "gef_fild10",67,334;
+ close;
+ AntHell:
+ warp "moc_fild04",210,329;
+ close;
+ MjolnirWastePit:
+ warp "mjolnir_02",79,361;
+ close;
+ Sphinx:
+ warp "moc_fild19",105,99;
+ close;
+ GlastHeim:
+ warp "gef_fild06",45,304;
+ close;
+ Comodo:
+ warp "cmd_fild01",30,317;
+ close;
+}
+
+morocc,160,97,4 duplicate(Twin-Towers) Twin Towers#tt2 812
+payon,176,226,4 duplicate(Twin-Towers) Twin Towers#tt3 812
+izlude,134,92,4 duplicate(Twin-Towers) Twin Towers#tt4 812
+alberta,25,238,4 duplicate(Twin-Towers) Twin Towers#tt5 812
+geffen,120,60,4 duplicate(Twin-Towers) Twin Towers#tt6 812
+aldebaran,143,116,4 duplicate(Twin-Towers) Twin Towers#tt7 812
+comodo,194,158,4 duplicate(Twin-Towers) Twin Towers#tt8 812
diff --git a/npc/re/events/valentinesday.txt b/npc/re/events/valentinesday.txt
new file mode 100644
index 000000000..519ccb350
--- /dev/null
+++ b/npc/re/events/valentinesday.txt
@@ -0,0 +1,128 @@
+//===== rAthena Script =======================================
+//= Valentine Event Script
+//===== By: ==================================================
+//= Muad_Dib (Prometheus Project)
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//
+//===== Additional Comments: =================================
+//= 07/06/05 : Added 1st Version. [Muad_Dib]
+//= 08/28/05 : Ver. 1.01 Added a missing close; [Muad_Dib]
+//= Converted to rAthena format by Dr.Evil
+//= 1.1 Cleaning. [Euphy]
+//============================================================
+
+// Stephen - Valentine Event Chocolate seller ------------------
+alberta,26,243,4 script Stephen 58,{
+ mes "[Stephen]";
+ mes "Guess what I've got?";
+ mes "A tasty treat not easily found in Rune-Midgard....";
+ next;
+ mes "[Stephen]";
+ mes "Chocolate!";
+ mes "That's right, don't you love chocolate.... I do.";
+ mes "And you are in luck, because I'm selling them for only 5,000 zeny a piece!";
+ next;
+ if(select("I want some chocolate!:No thanks.")==2) {
+ mes "[Stephen]";
+ mes "You don't want any chocolate?";
+ mes "I'm telling you! You'll regret it!";
+ mes "You better get some now... you won't come across Chocolate like this ever again!";
+ mes "Think it over and visit me again sometime.";
+ close; }
+ mes "[Stephen]";
+ mes "Hah!";
+ mes "I knew it!";
+ mes "But I can't sell you more then 5 at once... but, if you really need more....";
+ mes "you can come back again.";
+ mes "So how many do you want?";
+ next;
+ input .@i;
+ if (.@i <= 0) close;
+ mes "[Stephen]";
+ if (.@i > 5) {
+ mes "I'm sorry, but I can't give you that many.";
+ close; }
+ if (Zeny < .@i*5000) {
+ mes "I'm sorry, but it seems you can't afford to buy these off me.";
+ close; }
+ set Zeny, Zeny - .@i*5000;
+ getitem 558,.@i;
+ mes "There you go!";
+ mes "You can give that to someone as a gift, or enjoy it yourself!";
+ mes "Mmm... sweet chocolate...";
+ mes "Visit me anytime...!";
+ close;
+}
+
+// Jainie -- Gives information about Valentine Event ------------------------
+alberta,29,243,4 script Jainie 53,{
+ mes "[Jainie]";
+ mes "You know what? The chocolate that my boyfriend sells are from me!";
+ mes "I made them by myself.";
+ next;
+ mes "[Jainie]";
+ mes "You know ... In cetain countries, there's a tradition of presenting chocolates to a person that you love...";
+ mes "They call it, ^3355FFValentine's Day^000000.";
+ next;
+ mes "[Jainie]";
+ mes "So I gave him my delicious chocolate...";
+ mes "And then he made me cook a lot more...";
+ mes "And now he is selling them to everyone.";
+ mes "I guess he really enjoyed it.";
+ mes "But, I do feel good when people buy something I have made.";
+ next;
+ mes "[Jainie]";
+ mes "It would be great if you bought some too...";
+ mes "I will be making chocolates for a while so...";
+ close;
+}
+
+// Carl Orleans -- Valentine Event Chocolate maker ------------------
+prt_castle,54,34,4 script Carl Orleans 47,{
+ mes "[Carl Orleans]";
+ mes "Yes?";
+ next;
+ if(select("I want some hand made chocolate...:I'm lost, sorry to bother you.")==2) {
+ mes "[Carl Orleans]";
+ mes "Oh... well, if you want me to make some of my special Hand Made Chocolate....";
+ mes "You will need to give me at least ^0000FF 3 Chocolates^000000.";
+ next;
+ mes "[Carl Orleans]";
+ mes "That's right, only ^0000FF 3 Chocolates^000000";
+ mes "Bring them to me and you'll get what you came for.";
+ next;
+ mes "[Carl Orleans]";
+ mes "See You.";
+ close; }
+ mes "[Carl Orleans]";
+ mes "Well, I just might be able to fulfill your needs...";
+ next;
+ mes "[Carl Orleans]";
+ if (countitem(558) < 3) {
+ mes "I'm sorry, you don't have enough Chocolate Bars to do this.";
+ close; }
+ delitem 558,3;
+ mes "You got 3 pieces of pure chocolate, I see.";
+ mes "Give them to me...";
+ next;
+ mes "[Carl Orleans]";
+ mes "Ok, now I will only create my special hand made chocolates if you promise to use it wisely.";
+ next;
+ mes "[Carl Orleans]";
+ mes "....Hmmmmmm.....";
+ mes "Well...";
+ next;
+ mes "[Carl Orleans]";
+ getitem 559,1;
+ mes "Here.";
+ mes "I hope you give it to someone special, because its a special chocolate.";
+ mes "As you know... only I can create this.";
+ next;
+ mes "[Carl Orleans]";
+ mes "Enjoy.";
+ close;
+} \ No newline at end of file
diff --git a/npc/re/events/valentinesday_2009.txt b/npc/re/events/valentinesday_2009.txt
new file mode 100644
index 000000000..db072b401
--- /dev/null
+++ b/npc/re/events/valentinesday_2009.txt
@@ -0,0 +1,630 @@
+//===== rAthena Script =======================================
+//= iRO Valentine's Day Event (2009)
+//===== By: ==================================================
+//= Kisuka
+//===== Current Version: =====================================
+//= 1.3
+//===== Compatible With: =====================================
+//= rAthena 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]
+//= 1.3 Some Changes. [Kisuka]
+//============================================================
+
+// 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 nothing like others.";
+ mes "Every piece bears the devotion of the person who made it!";
+ next;
+ mes "[Marco Bassinio]";
+ mes "So, that's why I can't sell more than 5 of them at a time.";
+ mes "If you really really want more, 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 this opportunity and regret you didn't buy it.";
+ next;
+ mes "[Marco Bassinio]";
+ mes "Remember, you can never find this anywhere else!";
+ mes "Come back anytime, when you change your mind.";
+ close;
+ }
+ if (.@input > 5) {
+ mes "[Marco Bassinio]";
+ mes "Ugh.. Didn't I tell you?";
+ mes "5 is the maximum!";
+ mes "I can't sell more than that to the same person.";
+ next;
+ mes "[Marco Bassinio]";
+ mes "And you know it's not like an everyday meal.";
+ mes "Eating too much is not 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 enough zeny with ya.";
+ mes "Maybe you should borrow some zeny from a friend.";
+ mes "Cuz, I'm not gonna 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 kind of chocolate normally.";
+ next;
+ mes "[Marco Bassinio]";
+ mes "If you want more, you should come back.";
+ mes "Might be a good idea to buy some more while you have a chance...!";
+ set Zeny,Zeny - .@price;
+ getitem 558,.@input;
+ close;
+ }
+ case 2:
+ mes "[Marco Bassinio]";
+ mes "If you want to gift-wrap the chocolate, of course, you need chocolate, plus, wrapping paper, wrapping strap and a box.";
+ next;
+ mes "[Marco Bassinio]";
+ mes "You also need to pay 500 zeny to carve your 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 have enough materials to decorate the gift box..";
+ mes "You can't just put your gift into some plain looking box..";
+ mes "Don't you think?";
+ next;
+ mes "[Marco Bassinio]";
+ mes "You need to bring some wrapping paper, wrapping strap, and a box.";
+ mes "Oh, also bring 500 zeny, and don't forget to bring your 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 want an empty chocolate box without any chocolate in it, 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 with your name on it.";
+ mes "Isn't it fabulous?";
+ mes "See, your name looks 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 this opportunity and regret you didn't buy it.";
+ next;
+ mes "[Marco Bassinio]";
+ mes "Remember, you can never find this anywhere else!";
+ mes "Come back anytime, 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, I sell paper boxes and 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 1 Packing Paper.";
+ mes "How many do you want?";
+ mes "You can't buy more than 10 items at once.";
+ next;
+ input .@input;
+ if (.@input <= 0) {
+ mes "[Packs Trader]";
+ mes "Nothing to buy.";
+ mes "Come back when 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 Valentine's Day more pleasing!";
+ set Zeny,Zeny-.@price;
+ getitem 7175,.@input;
+ next;
+ break;
+ }
+ case 2:
+ mes "[Packs Trader]";
+ mes "It's 200 zeny for 1 Packing Ribbon.";
+ mes "How many do you want?";
+ mes "You can't buy more than 10 items at once.";
+ next;
+ input .@input;
+ if (.@input <= 0) {
+ mes "[Packs Trader]";
+ mes "Nothing to buy.";
+ mes "Come back when 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 Valentine's Day more pleasing!";
+ set Zeny,Zeny-.@price;
+ getitem 7174,.@input;
+ next;
+ break;
+ }
+ case 3:
+ mes "[Packs Trader]";
+ mes "It's 600 zeny for 1 Box.";
+ mes "How many do you want?";
+ mes "You can't buy more than 10 items at once.";
+ next;
+ input .@input;
+ if (.@input <= 0) {
+ mes "[Packs Trader]";
+ mes "Nothing to buy.";
+ mes "Come back when 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 Valentine's Day more pleasing!";
+ set Zeny,Zeny-.@price;
+ getitem 7948,.@input;
+ next;
+ break;
+ }
+ case 4:
+ mes "[Packs Trader]";
+ mes "Goodbye!";
+ mes "And enjoy your 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 Valentine rings to those experienced adventurer Level 75 or above.";
+ next;
+ mes "[Event Ring Maker]";
+ mes "You're not fully experienced yet.";
+ mes "Come back when you're experienced enough to handle the quests.";
+ close;
+ }
+
+ if (iROval09ring >= 1) {
+ mes "[Event Ring Maker]";
+ mes "The box with the ring, carved with your name, is for the one you love.";
+ next;
+ mes "[Event Ring Maker]";
+ mes "As for the rings that you receive from others, they should all be registered with the Vote Manager.";
+ mes "She is standing near the Prontera Fountain.";
+ next;
+ mes "[Event Ring Maker]";
+ mes "Only the most popular male and female are subjected to getting rewards.";
+ mes "Be aware, and always try to stay popular!";
+ close;
+ }
+
+ mes "[Event Ring Maker]";
+ mes "Hi, there, how are ya?";
+ mes "Come to me if you're interested in the event, 'Who's Valentine's Hottest?'";
+ next;
+ mes "[Event Ring Maker]";
+ mes "I make the most precious rings that you can give to your sweethearts.";
+ mes "Those rings are very special because I carve 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 to your sweethearts!";
+ next;
+ mes "[Event Ring Maker]";
+ mes "You should hurry 'cuz this event will only last for two weeks.";
+ mes "Give that special someone a gift of a Valentine's ring.";
+ next;
+ mes "[Event Ring Maker]";
+ mes "Remember, you can only generate the ring once.";
+ mes "You also need Wrapping Paper, Wrapping Strap and a Box to make the ring.";
+ next;
+ mes "[Event Ring Maker]";
+ mes "So you better be sure of who you give this to.";
+ mes "By the way, 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 on such a thing like this.";
+ mes "Think about what 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 enough materials to make a gift box.";
+ mes "Check what you have, and come back later 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 ring in the world!";
+ mes "Don't forget, you can never make this ring again.";
+ next;
+ mes "[Event Ring Maker]";
+ mes "You must pick out the one that you really really love, and give this ring to that person.";
+ next;
+ mes "[Event Ring Maker]";
+ mes "Of course, you've got to get rings from others, that's the way you can participate in the voting, right?";
+ mes "Challenge yourself to become 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 Vote Manager.";
+ mes "I'm in charge of collecting rings for this event!";
+ next;
+ mes "[Valentine Vote Manager]";
+ mes "I register the rings you get from others and I calculate the total number of rings.";
+ next;
+ mes "[Valentine Vote Manager]";
+ mes "You know what I do besides just counting those rings?";
+ mes "I can tell you the adventurer's name who's got the most number of votes.";
+ next;
+ mes "[Valentine Vote Manager]";
+ mes "Plus, you can also find out how 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 rings you want to register.";
+ next;
+ mes "[Valentine Vote Manager]";
+ mes "When you write the number of the rings, the number shouldn't be larger than the number of 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, 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, 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...."+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 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 you to my beautiful atelier?";
+ mes "What is it that you want?";
+ mes "Well, my sparkling eyes get dried and lose their shine if not for the pretty little lady.";
+ next;
+ mes "[Charles Orleans]";
+ mes "Please leave me alone unless 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 felt like heaven the minute you walked in!";
+ mes "Can I help you with 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, or a magician.";
+ mes "I don't just make chocolate out of anything.";
+ next;
+ mes "[Charles Orleans]";
+ mes "I always think of making 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 the looks and the taste.";
+ mes "Yes, it's nothing like ordinary chocolate!";
+ next;
+ mes "[Charles Orleans]";
+ mes "I'm afraid I can't make it and prove it to you now.";
+ mes "This is really a shame!";
+ next;
+ mes "[Charles Orleans]";
+ mes "I really want to thank you for visiting me and if you only bring ^3152ff3 Chocolates^000000, I'll make you chocolate like you've never seen...";
+ next;
+ mes "[Charles Orleans]";
+ mes "never tasted before...";
+ mes "Mademoiselle, with your spirit, I'm sure you can bring 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, but I'm tied up with so much 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 with the pieces you've brought.";
+ mes "I'm going to put the light of your eyes into this chocolate that no one can resist.";
+ next;
+ mes "[Charles Orleans]";
+ mes "It'll be stronger than a sweet sweet love potion.....";
+ next;
+ mes "[Charles Orleans]";
+ mes "Un, Deux, Trois, Quatre.....";
+ mes "Just like the ugly duckling that turned to a beautiful swan-";
+ mes "Ordinary chocolate pieces are becoming a piece of art!";
+ next;
+ mes "[Charles Orleans]";
+ mes "They're changing!";
+ mes "They're getting warm, softly changing the shape, 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 what you wanted, for it bears your beautiful heart inside.";
+ close;
+ }
+
+}
diff --git a/npc/re/events/valentinesday_2012.txt b/npc/re/events/valentinesday_2012.txt
new file mode 100644
index 000000000..a92b24338
--- /dev/null
+++ b/npc/re/events/valentinesday_2012.txt
@@ -0,0 +1,158 @@
+//===== rAthena Script =======================================
+//= Valentine's Day Event (2012)
+//===== By: ==================================================
+//= Rikimaru
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//= The full Valentine's Day NPCs of the Valentine's Day
+//= Event 2012 (account-based).
+//===== Additional Comments: =================================
+//= 1.0 First version. [Rikimaru]
+//= 1.1 Standardized and fixed. [Euphy]
+//============================================================
+
+mosk_in,21,246,5 script Pinkamenia 71,{
+ set .@n$,"^0000FF[Pinkamenia]^000000";
+ if (#V_QUE12==3) {
+ set .@LFlowerID,7864;
+ setarray .@SweetsID[0],538,558,539,573,559,560,12062,596,597,12414,12319;
+ setarray .@SweetsCost[0],1,2,5,10,10,10,15,15,15,20,20;
+ mes .@n$;
+ mes "Hello "+strcharinfo(0)+", do";
+ mes "you want to buy some items?";
+ mes "You'll have to give me Love";
+ mes "Flowers for them, of course!";
+ next;
+ if(select("Yes, sure!","No, never mind.") == 2) close;
+ next;
+ mes .@n$;
+ mes "Select an item.";
+ mes "The amount of Love Flowers you'll need is in brackets.";
+ for(set .@i,0; .@i < getarraysize(.@SweetsID); set .@i,.@i+1)
+ set .@menu$, .@menu$+"^00AA00["+.@SweetsCost[.@i]+"]^000000 "+getitemname(.@SweetsID[.@i])+":";
+ next;
+ set .@choice, select(.@menu$)-1;
+ mes .@n$;
+ if (countitem(.@LFlowerID) < .@SweetsCost[.@choice]) {
+ mes "You'll need more Love Flowers if you want that!";
+ close;
+ }
+ mes "Are you sure you want to trade ^00aa00"+.@SweetsCost[.@choice]+"x Love Flower ^000000 for ^0055FF"+getitemname(.@SweetsID[.@choice])+"^000000?";
+ if(select("No, I've changed my mind.:Yes, trade!") == 1) close;
+ set .@new, .@LFlowerID - .@SweetsCost[.@choice];
+ if (.@new < 0) set .@new, 0;
+ delitem .@LFlowerID, .@SweetsCost[.@choice];
+ getitem .@SweetsID[.@choice],1;
+ mes "Have fun with your item!";
+ close;
+ } else if (#V_QUE12==2) {
+ mes .@n$;
+ if (countitem(7864) < 15) {
+ mes "You have to bring me 15 Love Flowers!";
+ close;
+ }
+ mes "Thank you so much for";
+ mes "getting our Flowers back!";
+ delitem 7864,15;
+ next;
+ mes .@n$;
+ mes "Take this as a little";
+ mes "'thank you'.";
+ getexp 500000,400000;
+ getitem 617,1;
+ getitem 12319,2;
+ next;
+ mes .@n$;
+ mes "If you get more Love";
+ mes "Flowers, you can exchange";
+ mes "them for some sweets here.";
+ mes "See you soon!";
+ set #V_QUE12,3;
+ close;
+ } else if (#V_QUE12==1) {
+ mes .@n$;
+ mes "Please bring a +8 Cake Hat";
+ mes "to the Baker Extraordinaire";
+ mes "standing next to me!";
+ close;
+ } else if (BaseLevel >= 45) {
+ mes .@n$;
+ mes "Hello "+strcharinfo(0)+", it's";
+ mes "Valentine's Day and we";
+ mes "love to deliver sweet";
+ mes "chocolates.";
+ next;
+ mes .@n$;
+ mes "Our problem is that we";
+ mes "need a strong person";
+ mes "like you who could help";
+ mes "us, but first you'll have";
+ mes "to bring a +8 Cake Hat";
+ mes "to the Baker Extraordinaire, who";
+ mes "is standing right next to me!";
+ set #V_QUE12,1;
+ close;
+ }
+ mes .@n$;
+ mes "Hello "+strcharinfo(0)+"!";
+ close;
+
+OnInit:
+ // Unknown item drop rate (currently set at 5%)
+ setitemscript 5105,"{ bonus bDex,1; bonus bMaxSP,80; bonus3 bAddMonsterDropItem,7864,RC_DemiHuman,500; }",0;
+ end;
+}
+
+mosk_in,21,244,3 script Baker Extraordinaire 410,{
+ set .@n$,"^0000FF[Baker Extraordinaire]^000000";
+ if(#V_QUE12==3) {
+ mes .@n$;
+ mes "Exchange your Love Flowers with Pinkamenia!";
+ close;
+ } else if(#V_QUE12==2) {
+ mes .@n$;
+ mes "Bring 15 Love Flowers to Pinkamenia!";
+ close;
+ } else if(#V_QUE12==1) {
+ mes .@n$;
+ if (getequipid(1) == 5024 && getequiprefinerycnt(1) >= 8) {
+ mes "Ah, so Pinkamenia told you";
+ mes "to bring me the +8 Cake";
+ mes "Hat. Now I'm going";
+ mes "to exchange your +8 Cake";
+ mes "Hat for another Cake Hat.";
+ next;
+ mes .@n$;
+ delitem 5024,1;
+ getitem 5105,1;
+ equip 5105;
+ mes "Now, if you wear the";
+ mes "new Cake Hat, there";
+ mes "is a chance that";
+ mes "Demi-Human Monsters will";
+ mes "drop a Love Flower!";
+ next;
+ mes .@n$;
+ mes "The mobs stole our Flowers,";
+ mes "which we need to create ";
+ mes "our chocolates. Now get";
+ mes "15 Love Flowers and bring";
+ mes "them to Pinkamenia!";
+ set #V_QUE12,2;
+ close;
+ } else {
+ mes "Sorry, but where is your";
+ mes "+8 Cake Hat? Bring";
+ mes "it to me, and remember";
+ mes "to have it equipped!";
+ close;
+ }
+ } else {
+ mes .@n$;
+ mes "Hello, "+strcharinfo(0)+"!";
+ close;
+ }
+} \ No newline at end of file
diff --git a/npc/re/events/whiteday.txt b/npc/re/events/whiteday.txt
new file mode 100644
index 000000000..8046bd4c1
--- /dev/null
+++ b/npc/re/events/whiteday.txt
@@ -0,0 +1,128 @@
+//===== rAthena Script =======================================
+//= White Day Event Script
+//===== By: ==================================================
+//= 1.0a Muad_Dib (Prometheus Project)
+//===== Current Version: =====================================
+//= 1.0a
+//===== Compatible With: =====================================
+//= Any Athena Version; RO Episode 6+
+//===== Description: =========================================
+//= Sells candy, candy cane and well baked cookie.
+//===== Additional Comments: =================================
+//= 07/06/05 : Added 1st Version. [Muad_Dib]
+//= Converted to rAthena format by Dr.Evil
+//============================================================
+
+
+alberta,188,64,4 script Sugar 91,{
+ set @maplenum,0;
+ set @mapleItemID,0;
+ set @maplePrice,0;
+ set @maplePriceT,0;
+ mes "[Sugar]";
+ mes "Welcome!";
+ mes "How delicious are sweets?";
+ mes "My teacher.........";
+ mes "The sweets craftsman of ARUBERUTA";
+ mes "There are sweets that is built hard.";
+ next;
+ mes "[Sugar]";
+ mes "It was given by the darling person.";
+ mes "In return of the present ....";
+ mes "heartfelt like";
+ mes "the sweetness of the present some how.";
+ next;
+ menu "Please give me!",-,"I don't need it.",M_END,"The teacher.",M_L1;
+
+ mes "[Sugar]";
+ mes "Yes!";
+ mes "Select from menu here.";
+ mes "Since there is a limitation in numbers";
+ mes "Not more than ^ff0000 5 pieces^000000.";
+ mes "are allowed to carry out?";
+ next;
+ menu "Candy",-,"Candy Cane",L0_2,"Well baked cookie",L0_3;
+
+ set @maplePrice,3000;
+ set @mapleItemID,529;
+ mes "[Sugar]";
+ mes "It is a candy, and the price is";
+ mes "3000 Zeny each.";
+ mes "How many do you like to purchase?";
+ next;
+ goto L_INPUT;
+L0_2:
+ set @maplePrice,4000;
+ set @mapleItemID,530;
+ mes "[Sugar]";
+ mes "It is a candy cane, and the price is";
+ mes "4000 Zeny each.";
+ mes "How many do you like to purchase?";
+ next;
+ goto L_INPUT;
+L0_3:
+ set @maplePrice,2000;
+ set @mapleItemID,538;
+ mes "[Sugar]";
+ mes "It is a well baked cookie, and the price is";
+ mes "2000 Zeny each.";
+ mes "How many do you like to purchase?";
+ next;
+
+L_INPUT:
+ input @maplenum;
+ if (@maplenum > 5) goto L_ERROR;
+ if (@maplenum == 0) goto M_END;
+ set @maplePriceT,@maplePrice*@maplenum;
+ if (Zeny < @maplePriceT) goto L_ERROR2;
+ set Zeny,Zeny- @maplePriceT;
+ getitem @mapleItemID,@maplenum;
+ mes "[Sugar]";
+ mes "Thank you!!!";
+ mes "These sweets are really delicious.";
+ mes "Since my teacher of sweet is the No.1 teacher's in world!";
+ mes "Although you may eat by yourself";
+ mes "don't eat so much or you'll grow fat.";
+ mes "Please take care!!!";
+ close;
+
+M_L1:
+ mes "[Sugar]";
+ mes "Yes";
+ mes "The teacher of mine";
+ mes "is Mr. Kuberu, a sweets craftsman.";
+ mes "Making sweets under two persons.";
+ mes "which is allowed to self-train.";
+ next;
+ mes "[Sugar]";
+ mes "Although selling is seemingly to carried out ....";
+ mes "Where he is now?";
+ mes "Which I don't know.";
+ close;
+
+L_ERROR:
+ mes "[Sugar]";
+ mes "???";
+ mes "You seem to have a failure on hearing.";
+ mes "I will tell you once again?";
+ mes "You can only purchase";
+ mes "^ff0000 5 pieces^000000 at once.";
+ next;
+ goto L_INPUT;
+
+L_ERROR2:
+ mes "[Sugar]";
+ mes "???";
+ mes "Hmmm it seems you don't have enough money";
+ mes "to make that purchase.";
+ mes "I will ask you to check your money first.";
+ close;
+
+M_END:
+ mes "[Sugar]";
+ mes "Really .... You might regret it..";
+ mes "If you change your mind.";
+ mes "I am just here ok.";
+ mes "Have a nice day!";
+ close;
+}
diff --git a/npc/re/events/xmas.txt b/npc/re/events/xmas.txt
new file mode 100644
index 000000000..5a211c18d
--- /dev/null
+++ b/npc/re/events/xmas.txt
@@ -0,0 +1,374 @@
+//===== rAthena Script =======================================
+//= X-mas Event
+//===== By: ==================================================
+//= rAthena Dev Team
+//===== Current Version: =====================================
+//= 1.4
+//===== Compatible With: =====================================
+//= Any version of rAthena
+//===== Description: =========================================
+//= Beat up Antonios and grab his socks. Get at least 3 and
+//= give them to Santa Claus Claus in exchange for a present.
+//= Includes X-mas mobs.
+//= This npc will disable, the current Santa Claus npc.
+//===== Additional Comments: =================================
+//= Fixed the spawns [shadowlady]
+//= 1.1 Added Xmas Jakk, fixed 2 exploits, fixed reward Box ID [Lupus]
+//= 1.2 Added monsters to the newer fields, thanks to Muad_Dib [MasterOfMuppets]
+//= 1.2a Fixed a major problem with the monster spawns, thanks to Playtester [MasterOfMuppets]
+//= 1.2b Fixed a minor problem with the mosnter spawns, thanks to Playtester [Kayla]
+//= 1.3 Added Christmas Orc to the places where other orcs spawn [MasterOfMuppets]
+//= Added Christmas goblins to yuno_fild09, thanks to Playtester for pointing it out
+//= 1.4 Added a fix to make Lutie & Bard quests passable during this event [Lupus]
+//============================================================
+
+
+xmas_in,100,96,4 script Father Christmas::Santa2 718,{
+ mes "[Santa Claus]";
+//For Lutie & Bard quest
+ if(xmas_npc==0) set xmas_npc, 1;
+//
+ if(#event_xmas > 0 && #event_xmas < 30 ) goto L_Start;
+ mes "Merry Christmas!";
+ if(Class==0 || #event_xmas>=30 ) close; //anti exploit protection
+ mes "I have a gift for you! Ho Ho Ho!";
+ getitem rand(664,667),1; //gives one of 4 gift boxes
+ set #event_xmas,#event_xmas+1;
+ close;
+
+L_Start:
+ mes "I'm having a bit of a problem...";
+ mes "Do you care to listen?";
+ next;
+ menu "Listen to Santa Claus.",M_0, "Give Santa Claus proof.",M_1, "Cancel.",M_End;
+
+ M_0:
+ mes "[Santa Claus]";
+ mes "My problem is this.";
+ mes "There seems to be a man out there";
+ mes "that is impersonating me and spreading";
+ mes "terror throughout the land.";
+ next;
+ mes "[Santa Claus]";
+ mes "Like the Grinch of legend, he's taking";
+ mes "all the childrens' toys and keeping them";
+ mes "for himself.";
+ next;
+ mes "[Santa Claus]";
+ mes "I'm too busy here creating my batch of ";
+ mes "toys for next year, so I can't go";
+ mes "out and find him myself.";
+ mes "So I would like you to go out and";
+ mes "Destroy this man for me.";
+ next;
+ mes "[Santa Claus]";
+ mes "He has in his posession one of my";
+ mes "magic sacks, however, so he will";
+ mes "escape into it to another place each";
+ mes "time you attack him.";
+ next;
+ mes "[Santa Claus]";
+ mes "However,";
+ mes "In his haste, he tends to drop things.";
+ mes "If by chance he drops one of his Stockings";
+ mes "With Holes that he uses to steal the";
+ mes "poor childrens' toys, pick it up.";
+ next;
+ mes "[Santa Claus]";
+ mes "If you collect 3 of these, I will give";
+ mes "you a prototype mystery box that";
+ mes "I've been keeping around the";
+ mes "lab. It spits out random presents";
+ mes "and saves me a ton of work.";
+ close;
+ M_1:
+ mes "[Santa Claus]";
+ if(countitem(7034) < 3) goto L_NotEnuf;
+ delitem 7034,3;
+ mes "Seems you've been doing a";
+ mes "good job of taking down those";
+ mes "fake Santas. Keep it up!";
+ next;
+ getitem 644,1; //Gift Box Prototype
+ set #event_xmas,#event_xmas+1;
+ mes "[Santa Claus]";
+ mes "There's your reward.";
+ mes "If you get 3 more, I'll give you another.";
+ mes "Hope you get a good item.";
+ close;
+
+ L_NotEnuf:
+ mes "You don't have enough socks as proof.";
+ mes "Go take down those evil Santas";
+ mes "and get more for me and I'll reward you.";
+ close;
+ M_End:
+ mes "[Santa Claus]";
+ mes "I see. Well, at the very least";
+ mes "we shall meet again on Christmas morning.";
+ close;
+
+OnInit:
+ disablenpc "Santa1";
+ end;
+}
+
+
+//========================================================================================
+// - Xmas Goblin Spawns
+//========================================================================================
+
+prt_fild11,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+gef_fild11,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+yuno_fild09,0,0,0,0 monster Christmas Goblin 1245,5,0,0,0
+
+//========================================================================================
+// - Santa Poring Spawns
+//========================================================================================
+
+ein_fild03,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+ein_fild04,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+ein_fild06,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+ein_fild07,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+ein_fild08,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+ein_fild09,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+ein_fild10,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+gef_fild00,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+gef_fild01,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+gef_fild02,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+gef_fild03,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+gef_fild04,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+gef_fild05,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+gef_fild07,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+gef_fild08,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+gef_fild09,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+gef_fild10,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+gef_fild11,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+gef_fild12,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+gef_fild13,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+gef_fild14,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+glast_01,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+lhz_fild01,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+lhz_fild02,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+lhz_fild03,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+mjolnir_01,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+mjolnir_02,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+mjolnir_03,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+mjolnir_04,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+mjolnir_05,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+mjolnir_06,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+mjolnir_07,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+mjolnir_08,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+mjolnir_09,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+mjolnir_10,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+mjolnir_11,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+mjolnir_12,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+moc_fild01,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+moc_fild02,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+moc_fild03,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+moc_fild04,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+moc_fild05,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+moc_fild06,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+moc_fild07,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+moc_fild08,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+moc_fild09,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+moc_fild10,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+moc_fild11,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+moc_fild12,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+moc_fild13,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+moc_fild14,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+moc_fild15,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+moc_fild16,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+moc_fild17,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+moc_fild18,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+pay_fild01,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+pay_fild02,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+pay_fild03,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+pay_fild04,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+pay_fild05,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+pay_fild06,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+pay_fild07,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+pay_fild08,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+pay_fild09,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+pay_fild10,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+pay_fild11,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+prt_fild00,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+prt_fild01,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+prt_fild02,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+prt_fild03,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+prt_fild04,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+prt_fild05,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+prt_fild06,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+prt_fild07,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+prt_fild08,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+prt_fild09,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+prt_fild10,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+prt_fild11,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+xmas_fild01,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+cmd_fild01,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+cmd_fild02,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+cmd_fild03,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+cmd_fild04,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+cmd_fild05,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+cmd_fild06,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+cmd_fild07,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+cmd_fild08,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+cmd_fild09,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+yuno_fild01,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+yuno_fild02,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+yuno_fild03,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+yuno_fild04,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+yuno_fild05,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+yuno_fild06,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+yuno_fild07,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+yuno_fild08,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+yuno_fild09,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+yuno_fild11,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+yuno_fild12,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+ama_fild01,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+gon_fild01,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+um_fild01,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+um_fild02,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+um_fild03,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+um_fild04,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+nif_fild01,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+nif_fild02,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+lou_fild01,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+hu_fild01,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+hu_fild04,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+hu_fild05,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+hu_fild07,0,0,0,0 monster Santa Poring 1062,15,0,0,0
+
+//========================================================================================
+// - Antonio Spawns
+//========================================================================================
+
+ein_fild03,0,0,0,0 monster Antonio 1247,1,0,0,0
+ein_fild04,0,0,0,0 monster Antonio 1247,1,0,0,0
+ein_fild06,0,0,0,0 monster Antonio 1247,1,0,0,0
+ein_fild07,0,0,0,0 monster Antonio 1247,1,0,0,0
+ein_fild08,0,0,0,0 monster Antonio 1247,1,0,0,0
+ein_fild09,0,0,0,0 monster Antonio 1247,1,0,0,0
+ein_fild10,0,0,0,0 monster Antonio 1247,1,0,0,0
+gef_fild00,0,0,0,0 monster Antonio 1247,1,0,0,0
+gef_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
+gef_fild02,0,0,0,0 monster Antonio 1247,1,0,0,0
+gef_fild03,0,0,0,0 monster Antonio 1247,1,0,0,0
+gef_fild04,0,0,0,0 monster Antonio 1247,1,0,0,0
+gef_fild05,0,0,0,0 monster Antonio 1247,1,0,0,0
+gef_fild07,0,0,0,0 monster Antonio 1247,1,0,0,0
+gef_fild08,0,0,0,0 monster Antonio 1247,1,0,0,0
+gef_fild09,0,0,0,0 monster Antonio 1247,1,0,0,0
+gef_fild10,0,0,0,0 monster Antonio 1247,1,0,0,0
+gef_fild11,0,0,0,0 monster Antonio 1247,1,0,0,0
+gef_fild12,0,0,0,0 monster Antonio 1247,1,0,0,0
+gef_fild13,0,0,0,0 monster Antonio 1247,1,0,0,0
+gef_fild14,0,0,0,0 monster Antonio 1247,1,0,0,0
+glast_01,0,0,0,0 monster Antonio 1247,1,0,0,0
+lhz_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
+lhz_fild02,0,0,0,0 monster Antonio 1247,1,0,0,0
+lhz_fild03,0,0,0,0 monster Antonio 1247,1,0,0,0
+mjolnir_01,0,0,0,0 monster Antonio 1247,1,0,0,0
+mjolnir_02,0,0,0,0 monster Antonio 1247,1,0,0,0
+mjolnir_03,0,0,0,0 monster Antonio 1247,1,0,0,0
+mjolnir_04,0,0,0,0 monster Antonio 1247,1,0,0,0
+mjolnir_05,0,0,0,0 monster Antonio 1247,1,0,0,0
+mjolnir_06,0,0,0,0 monster Antonio 1247,1,0,0,0
+mjolnir_07,0,0,0,0 monster Antonio 1247,1,0,0,0
+mjolnir_08,0,0,0,0 monster Antonio 1247,1,0,0,0
+mjolnir_09,0,0,0,0 monster Antonio 1247,1,0,0,0
+mjolnir_10,0,0,0,0 monster Antonio 1247,1,0,0,0
+mjolnir_11,0,0,0,0 monster Antonio 1247,1,0,0,0
+mjolnir_12,0,0,0,0 monster Antonio 1247,1,0,0,0
+moc_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
+moc_fild02,0,0,0,0 monster Antonio 1247,1,0,0,0
+moc_fild03,0,0,0,0 monster Antonio 1247,1,0,0,0
+moc_fild04,0,0,0,0 monster Antonio 1247,1,0,0,0
+moc_fild05,0,0,0,0 monster Antonio 1247,1,0,0,0
+moc_fild06,0,0,0,0 monster Antonio 1247,1,0,0,0
+moc_fild07,0,0,0,0 monster Antonio 1247,1,0,0,0
+moc_fild08,0,0,0,0 monster Antonio 1247,1,0,0,0
+moc_fild09,0,0,0,0 monster Antonio 1247,1,0,0,0
+moc_fild10,0,0,0,0 monster Antonio 1247,1,0,0,0
+moc_fild11,0,0,0,0 monster Antonio 1247,1,0,0,0
+moc_fild12,0,0,0,0 monster Antonio 1247,1,0,0,0
+moc_fild13,0,0,0,0 monster Antonio 1247,1,0,0,0
+moc_fild14,0,0,0,0 monster Antonio 1247,1,0,0,0
+moc_fild15,0,0,0,0 monster Antonio 1247,1,0,0,0
+moc_fild16,0,0,0,0 monster Antonio 1247,1,0,0,0
+moc_fild17,0,0,0,0 monster Antonio 1247,1,0,0,0
+moc_fild18,0,0,0,0 monster Antonio 1247,1,0,0,0
+pay_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
+pay_fild02,0,0,0,0 monster Antonio 1247,1,0,0,0
+pay_fild03,0,0,0,0 monster Antonio 1247,1,0,0,0
+pay_fild04,0,0,0,0 monster Antonio 1247,1,0,0,0
+pay_fild05,0,0,0,0 monster Antonio 1247,1,0,0,0
+pay_fild06,0,0,0,0 monster Antonio 1247,1,0,0,0
+pay_fild07,0,0,0,0 monster Antonio 1247,1,0,0,0
+pay_fild08,0,0,0,0 monster Antonio 1247,1,0,0,0
+pay_fild09,0,0,0,0 monster Antonio 1247,1,0,0,0
+pay_fild10,0,0,0,0 monster Antonio 1247,1,0,0,0
+pay_fild11,0,0,0,0 monster Antonio 1247,1,0,0,0
+prt_fild00,0,0,0,0 monster Antonio 1247,1,0,0,0
+prt_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
+prt_fild02,0,0,0,0 monster Antonio 1247,1,0,0,0
+prt_fild03,0,0,0,0 monster Antonio 1247,1,0,0,0
+prt_fild04,0,0,0,0 monster Antonio 1247,1,0,0,0
+prt_fild05,0,0,0,0 monster Antonio 1247,1,0,0,0
+prt_fild06,0,0,0,0 monster Antonio 1247,1,0,0,0
+prt_fild07,0,0,0,0 monster Antonio 1247,1,0,0,0
+prt_fild08,0,0,0,0 monster Antonio 1247,1,0,0,0
+prt_fild09,0,0,0,0 monster Antonio 1247,1,0,0,0
+prt_fild10,0,0,0,0 monster Antonio 1247,1,0,0,0
+prt_fild11,0,0,0,0 monster Antonio 1247,1,0,0,0
+xmas_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
+cmd_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
+cmd_fild02,0,0,0,0 monster Antonio 1247,1,0,0,0
+cmd_fild03,0,0,0,0 monster Antonio 1247,1,0,0,0
+cmd_fild04,0,0,0,0 monster Antonio 1247,1,0,0,0
+cmd_fild05,0,0,0,0 monster Antonio 1247,1,0,0,0
+cmd_fild06,0,0,0,0 monster Antonio 1247,1,0,0,0
+cmd_fild07,0,0,0,0 monster Antonio 1247,1,0,0,0
+cmd_fild08,0,0,0,0 monster Antonio 1247,1,0,0,0
+cmd_fild09,0,0,0,0 monster Antonio 1247,1,0,0,0
+yuno_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
+yuno_fild02,0,0,0,0 monster Antonio 1247,1,0,0,0
+yuno_fild03,0,0,0,0 monster Antonio 1247,1,0,0,0
+yuno_fild04,0,0,0,0 monster Antonio 1247,1,0,0,0
+yuno_fild05,0,0,0,0 monster Antonio 1247,1,0,0,0
+yuno_fild06,0,0,0,0 monster Antonio 1247,1,0,0,0
+yuno_fild07,0,0,0,0 monster Antonio 1247,1,0,0,0
+yuno_fild08,0,0,0,0 monster Antonio 1247,1,0,0,0
+yuno_fild09,0,0,0,0 monster Antonio 1247,1,0,0,0
+yuno_fild11,0,0,0,0 monster Antonio 1247,1,0,0,0
+yuno_fild12,0,0,0,0 monster Antonio 1247,1,0,0,0
+ama_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
+gon_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
+um_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
+um_fild02,0,0,0,0 monster Antonio 1247,1,0,0,0
+um_fild03,0,0,0,0 monster Antonio 1247,1,0,0,0
+um_fild04,0,0,0,0 monster Antonio 1247,1,0,0,0
+nif_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
+nif_fild02,0,0,0,0 monster Antonio 1247,1,0,0,0
+lou_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
+hu_fild01,0,0,0,0 monster Antonio 1247,1,0,0,0
+hu_fild04,0,0,0,0 monster Antonio 1247,1,0,0,0
+hu_fild05,0,0,0,0 monster Antonio 1247,1,0,0,0
+hu_fild07,0,0,0,0 monster Antonio 1247,1,0,0,0
+
+//========================================================================================
+// - Xmas Jakk
+//========================================================================================
+
+gef_dun01,0,0,0,0 monster Xmas Jakk 1244,5,0,0,0
+//gefenia02,0,0,0,0 monster Xmas Jakk 1244,5,0,0,0
+
+//========================================================================================
+// - Xmas Orc
+//========================================================================================
+
+gef_fild02,0,0,0,0 monster Christmas Orc 1588,5,0,0,0
+gef_fild03,0,0,0,0 monster Christmas Orc 1588,5,0,0,0
+gef_fild10,0,0,0,0 monster Christmas Orc 1588,5,0,0,0
+gef_fild14,0,0,0,0 monster Christmas Orc 1588,5,0,0,0
+alde_dun02,0,0,0,0 monster Christmas Orc 1588,5,0,0,0