diff options
| author | daegaladh <daegaladh@54d463be-8e91-2dee-dedb-b68131a5f0ec> | 2012-08-01 04:29:56 +0000 |
|---|---|---|
| committer | daegaladh <daegaladh@54d463be-8e91-2dee-dedb-b68131a5f0ec> | 2012-08-01 04:29:56 +0000 |
| commit | 8832adba3ec9df0f7f890154f69f0993b8d1d8e5 (patch) | |
| tree | 0e73afe6a780abf29fe035301f1354f24762da7a /npc/events | |
| parent | fa533907d49c7e288be33efb55fcb094f8e48591 (diff) | |
| download | hercules-8832adba3ec9df0f7f890154f69f0993b8d1d8e5.tar.gz hercules-8832adba3ec9df0f7f890154f69f0993b8d1d8e5.tar.bz2 hercules-8832adba3ec9df0f7f890154f69f0993b8d1d8e5.tar.xz hercules-8832adba3ec9df0f7f890154f69f0993b8d1d8e5.zip | |
Full npc folder reorganization. (I hope I didn't break anything D:)
-Now common scripts goes to the main npc folder, and pre-re-only/re-only ones goes to their respective folders.
-NPCs with practically the same script but little differences have been left in the main folder and uses the command checkre() for the differences.
-For those NPCs with different coordinates but same script, the script has been left in the main folder but the NPCs splitted as duplicates.
-All pre-renewal files has been reverted back to their pre-renewal behavior.
TODO:
-Correct pre-re quest rewards.
-Check for pre-re/re differences in mapflags.
git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@16545 54d463be-8e91-2dee-dedb-b68131a5f0ec
Diffstat (limited to 'npc/events')
32 files changed, 16204 insertions, 0 deletions
diff --git a/npc/events/MemorialDay_2008.txt b/npc/events/MemorialDay_2008.txt new file mode 100644 index 000000000..d6dae7d78 --- /dev/null +++ b/npc/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/events/StPatrick_2008.txt b/npc/events/StPatrick_2008.txt new file mode 100644 index 000000000..3e85c8a04 --- /dev/null +++ b/npc/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/events/bossnia.txt b/npc/events/bossnia.txt new file mode 100644 index 000000000..514193cbd --- /dev/null +++ b/npc/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/events/children_week.txt b/npc/events/children_week.txt new file mode 100644 index 000000000..e0d3fec88 --- /dev/null +++ b/npc/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/events/christmas_2005.txt b/npc/events/christmas_2005.txt new file mode 100644 index 000000000..fd82b553f --- /dev/null +++ b/npc/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/events/christmas_2008.txt b/npc/events/christmas_2008.txt new file mode 100644 index 000000000..48c25732f --- /dev/null +++ b/npc/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/events/dumplingfestival.txt b/npc/events/dumplingfestival.txt new file mode 100644 index 000000000..78d7e9e56 --- /dev/null +++ b/npc/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/events/easter_2008.txt b/npc/events/easter_2008.txt new file mode 100644 index 000000000..026d2a3d2 --- /dev/null +++ b/npc/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/events/event_skill_reset.txt b/npc/events/event_skill_reset.txt new file mode 100644 index 000000000..d5f7fbfe4 --- /dev/null +++ b/npc/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/events/gdevent_aru.txt b/npc/events/gdevent_aru.txt new file mode 100644 index 000000000..8fd4c4a1d --- /dev/null +++ b/npc/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/events/gdevent_sch.txt b/npc/events/gdevent_sch.txt new file mode 100644 index 000000000..6bf391b28 --- /dev/null +++ b/npc/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/events/god_se_festival.txt b/npc/events/god_se_festival.txt new file mode 100644 index 000000000..c9f84d6e0 --- /dev/null +++ b/npc/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/events/halloween_2006.txt b/npc/events/halloween_2006.txt new file mode 100644 index 000000000..8fd077af8 --- /dev/null +++ b/npc/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/events/halloween_2008.txt b/npc/events/halloween_2008.txt new file mode 100644 index 000000000..a4844da1b --- /dev/null +++ b/npc/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/events/halloween_2009.txt b/npc/events/halloween_2009.txt new file mode 100644 index 000000000..c3d314d7a --- /dev/null +++ b/npc/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/events/idul_fitri.txt b/npc/events/idul_fitri.txt new file mode 100644 index 000000000..0c11775ca --- /dev/null +++ b/npc/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/events/lunar_2008.txt b/npc/events/lunar_2008.txt new file mode 100644 index 000000000..7e5530981 --- /dev/null +++ b/npc/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/events/nguild/nguild_dunsw.txt b/npc/events/nguild/nguild_dunsw.txt new file mode 100644 index 000000000..8a34362f3 --- /dev/null +++ b/npc/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/events/nguild/nguild_ev_agit.txt b/npc/events/nguild/nguild_ev_agit.txt new file mode 100644 index 000000000..1dad83b83 --- /dev/null +++ b/npc/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/events/nguild/nguild_flags.txt b/npc/events/nguild/nguild_flags.txt new file mode 100644 index 000000000..1642c4419 --- /dev/null +++ b/npc/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/events/nguild/nguild_guardians.txt b/npc/events/nguild/nguild_guardians.txt new file mode 100644 index 000000000..299c3a380 --- /dev/null +++ b/npc/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/events/nguild/nguild_kafras.txt b/npc/events/nguild/nguild_kafras.txt new file mode 100644 index 000000000..a4bd7ff01 --- /dev/null +++ b/npc/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/events/nguild/nguild_managers.txt b/npc/events/nguild/nguild_managers.txt new file mode 100644 index 000000000..7d5bf52ff --- /dev/null +++ b/npc/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/events/nguild/nguild_treas.txt b/npc/events/nguild/nguild_treas.txt new file mode 100644 index 000000000..1fc8cbaf9 --- /dev/null +++ b/npc/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/events/nguild/nguild_warper.txt b/npc/events/nguild/nguild_warper.txt new file mode 100644 index 000000000..41d51ca59 --- /dev/null +++ b/npc/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/events/quiz_qt.txt b/npc/events/quiz_qt.txt new file mode 100644 index 000000000..262905f40 --- /dev/null +++ b/npc/events/quiz_qt.txt @@ -0,0 +1,2139 @@ +//===== rAthena Script ======================================= +//= Quiz (Revolution) Part 1 +//===== By: ================================================== +//= CAHTXHuK +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= rAthena 1.0 +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= +//============================================================ + +//========================================================================================================================================= +prontera,152,286,4 script Receptionist::RecepQuiz 755,{ + +if (countitem(1201) > 3) goto M_MaxItem; +if (checkweight(1201,3) == 0 ) goto L_OverWeight; + + +if(BaseLevel < 20){ + mes "^2f4f4f[Tsuji]^000000"; + mes "Hello"; + mes "This is Tsuji who is in charge of"; + mes "receiving application forms for"; + mes "Quiz Revolution event."; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "Zonda corporation has prepared"; + mes "^0000ffQuiz Revolution^000000 event to"; + mes "provide fun and excitement"; + mes "to all of you."; + mes "Please read the following explanation and"; + mes "participate in this event."; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "This Quiz Revolution event is.."; + mes "operated in a different way compared to the previous one."; + mes "The event will only be open for those who wish to participate in the game."; + mes "Also, the ^006400Quiz Tickets^000000 will be given to those who"; + mes "pass simple tests to check if the player is worthy of"; + mes "playing the game."; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "The assessment will be made through"; + mes "^006400four simple tests^000000"; + mes "For the ones who pass all four tests"; + mes "will receive the quiz ticket of the"; + mes "Quiz Revolution event."; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "Hmm?! Wait a sec."; + mes "If you wish to join Quiz Revolution event"; + mes "you should have base level"; + mes "20 or above."; + mes "Please go and return after raising the"; + mes "level to the expected point."; + close; + +} else if (quiz_rvl > 2) { + + mes "^2f4f4f[Tsuji]^000000"; + mes "The event for all of you!"; + mes "Quiz Revolution is about to start."; + mes "Please show us a lot of"; + mes "participation."; + mes "And don't forget to bring the admission ticket~~"; + close; + +} else if (quiz_rvl == 2) { + + mes "^2f4f4f[Tsuji]^000000"; + mes "You have already passed the first test."; + mes "Please visit 'Payon' and find"; + mes "'Seeil'."; + mes "Seeil will give the second test."; + close; + +} else if (quiz_rvl == 1) { + + mes "^2f4f4f[Tsuji]^000000"; + mes "^0000ff" +strcharinfo(0)+ "^000000."; + mes "You have to take the retest"; + mes "to pass the test."; + mes "Will you accept it?"; + next; + menu "Yes",-,"No",sM1_No; + + + mes "^2f4f4f[Tsuji]^000000"; + mes "Very well."; + mes "I hope you pass the test this time.."; + mes "Here are the questions."; + set @test_soonsu, rand(2); + set @score_test, 0; + next; + + if (@test_soonsu == 0){ + mes "^2f4f4f[Tsuji]^000000"; + mes "1st question."; + mes "Ragnarok is a MMORPG game."; + mes "Please choose O and X."; + + next; + menu "O",-,"X",X1; + + set @score_test, @score_test + 10; + + X1: + mes "^2f4f4f[Tsuji]^000000"; + mes "2nd question."; + mes "Ragnarok's monetary unit is 'Zeny'."; + next; + menu "O",-,"X",X2; + + set @score_test, @score_test + 10; + + X2: + mes "^2f4f4f[Tsuji]^000000"; + mes "3rd question."; + mes "If an unknown person is attacking a monster"; + mes "you have to attack the same monster together."; + next; + menu "O",X3,"X",-; + + set @score_test, @score_test + 10; + X3: + mes "^2f4f4f[Tsuji]^000000"; + mes "4th question."; + mes "'Payon' is the capital of 'Rune Midgarts'."; + next; + menu "O",X4,"X",-; + + set @score_test, @score_test + 10; + + X4: + mes "^2f4f4f[Tsuji]^000000"; + mes "5th question."; + mes "There are ships in 'Alberta'."; + next; + menu "O",-,"X",X5; + + set @score_test, @score_test + 10; + + X5: + mes "^2f4f4f[Tsuji]^000000"; + mes "6th question."; + mes "A job class that can use"; + mes "'Grand Cross' is"; + mes "'Lord Knight'."; + next; + menu "O",X6,"X",-; + + set @score_test, @score_test + 10; + + X6: + mes "^2f4f4f[Tsuji]^000000"; + mes "7th question."; + mes "When 'Bard' screams, the oppenet can be 'sturn status'"; + mes "in regular probability."; + next; + menu "O",X7,"X",-; + + set @score_test, @score_test + 10; + + X7: + mes "^2f4f4f[Tsuji]^000000"; + mes "8th question."; + mes "'Baphomet'is a tool"; + mes "for killing mosquitos."; + next; + menu "O",X8,"X",-; + + set @score_test, @score_test + 10; + + X8: + mes "^2f4f4f[Tsuji]^000000"; + mes "9th question."; + mes "'Swordman' can class change to"; + mes "'Ambernite'."; + next; + menu "O",X9,"X",-; + + set @score_test, @score_test + 10; + + X9: + mes "^2f4f4f[Tsuji]^000000"; + mes "The last question."; + mes "A fine horse, which appears in North european Myth"; + mes "'Sleipnir' has five legs."; + next; + menu "O",X0,"X",-; + + set @score_test, @score_test + 10; + + goto X0; + + + } else if (@test_soonsu == 1){ + + mes "^2f4f4f[Tsuji]^000000"; + mes "1st question."; + mes "Ragnarok is a MMORPG game."; + mes "Please choose O and X."; + next; + menu "O",-, "X",X1_1; + + set @score_test, @score_test + 10; + + X1_1: + mes "^2f4f4f[Tsuji]^000000"; + mes "2nd question."; + mes "'Valkyrie' who appears in North european Myth"; + mes "is the godess of Love."; + next; + menu "O",X1_2,"X",-; + set @score_test, @score_test + 10; + + X1_2: + mes "^2f4f4f[Tsuji]^000000"; + mes "3rd question."; + mes "'Bethoven' composed the classic"; + mes "'Moon Light sonata'."; + next; + menu "O",-, "X",X1_3; + + set @score_test, @score_test + 10; + + X1_3: + mes "^2f4f4f[Tsuji]^000000"; + mes "4th question."; + mes "Orcs that exsits in the world of Ragnarok"; + mes "are divided into 7 types."; + next; + menu "O",X1_4,"X",-; + set @score_test, @score_test + 10; + + X1_4: + mes "^2f4f4f[Tsuji]^000000"; + mes "5th question."; + mes "'Cobolt Card' can be installed"; + mes "into"; + mes "shield items."; + next; + menu "O",X1_5,"X",-; + set @score_test, @score_test + 10; + + X1_5: + mes "^2f4f4f[Tsuji]^000000"; + mes "6th question."; + mes "'Katar'is exclusive use of Assassins."; + next; + menu "O",-, "X",X1_6; + + set @score_test, @score_test + 10; + + X1_6: + mes "^2f4f4f[Tsuji]^000000"; + mes "7th questino."; + mes "'Emperium' is a material for"; + mes "refining."; + next; + menu "O",X1_7,"X",-; + set @score_test, @score_test + 10; + + X1_7: + mes "^2f4f4f[Tsuji]^000000"; + mes "8th question."; + mes "'Payon' is a village of bandits."; + next; + menu "O",X1_8,"X",-; + set @score_test, @score_test + 10; + + X1_8: + mes "^2f4f4f[Tsuji]^000000"; + mes "9th question."; + mes "'Prontera' is the only place where"; + mes "to class change into 'Swordman'."; + next; + menu "O",X1_9,"X",-; + set @score_test, @score_test + 10; + + X1_9: + mes "^2f4f4f[Tsuji]^000000"; + mes "The last question."; + mes "A monster 'Merman' is a human type."; + next; + menu "O",-, "X",X0; + + set @score_test, @score_test + 10; + + goto X0; + + } else if (@test_soonsu == 2){ + + mes "1st question."; + mes "Ragnarok is a MMORPG game."; + mes "Please choose O and X."; + next; + menu "O",-, "X",X2_1; + + set @score_test, @score_test + 10; + + X2_1: + mes "^2f4f4f[Tsuji]^000000"; + mes "2nd question."; + mes "The cloesest village from Pyramid Dugeon is 'Morroc'."; + next; + menu "O",-, "X",X2_2; + + set @score_test, @score_test + 10; + + X2_2: + mes "^2f4f4f[Tsuji]^000000"; + mes "3rd question."; + mes "A merchant association is located in 'Al De Baran'."; + next; + menu "O",X2_3,"X",-; + set @score_test, @score_test + 10; + + X2_3: + mes "^2f4f4f[Tsuji]^000000"; + mes "4th question."; + mes "Acolyte can"; + mes "class change to"; + mes "'Sage' and 'Priest'."; + next; + menu "O",X2_4,"X",-; + set @score_test, @score_test + 10; + + X2_4: + mes "^2f4f4f[Tsuji]^000000"; + mes "5th question."; + mes "When reached base level 10"; + mes "can be class changed to 1st job10."; + next; + menu "O",X2_5,"X",-; + set @score_test, @score_test + 10; + + X2_5: + mes "^2f4f4f[Tsuji]^000000"; + mes "6th question."; + mes "'Bowling Bash' can not be activated"; + mes "without equip"; + mes "'Two handed sword'."; + next; + menu "O",X2_6,"X",-; + set @score_test, @score_test + 10; + + X2_6: + mes "^2f4f4f[Tsuji]^000000"; + mes "7th question."; + mes "When Priest uses 'Signum Crusis'"; + mes "all monsters' defense will decrease"; + mes "in regular probability."; + next; + menu "O",X2_7,"X",-; + set @score_test, @score_test + 10; + + X2_7: + mes "^2f4f4f[Tsuji]^000000"; + mes "8th question."; + mes "'Wizard' will use a Blue gemstone"; + mes "when casts 'Fire Pillar'."; + next; + menu "O",-, "X",X2_8; + + set @score_test, @score_test + 10; + + X2_8: + mes "^2f4f4f[Tsuji]^000000"; + mes "9th question."; + mes "A name of Assassin's exclusive weapon'"; + mes "'Katar' that gives"; + mes "additional 50% damage to human type"; + mes "is 'Infiltrator'."; + next; + menu "O",X2_9,"X",-; + set @score_test, @score_test + 10; + + X2_9: + mes "^2f4f4f[Tsuji]^000000"; + mes "10th question."; + mes "'Fire' is the most effective"; + mes "property against to 'water'."; + next; + menu "O",X0,"X",-; + set @score_test, @score_test + 10; + + + X0: + mes "^2f4f4f[Tsuji]^000000"; + mes "Well done~"; + mes "You have solved all the 10 questions."; + mes "Let me check"; + mes "how many you got?"; + mes "^ff0000If you don't get a perfect score, you have to re-test~^000000"; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "Wait a moment please."; + mes "Grading."; + mes ". . . . . . . . . . . . . . ."; + mes ". . . . . . . . . . . . . . ."; + mes ". . . . . . . . . . . . . . ."; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "Hum . . . . . . . . . . . . ."; + mes ". . . . . . . . . . . . . . ."; + mes ". . . . . . . . . . . . . . ."; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "OK, finished grading."; + mes "I will tell your score."; + next; + if (@score_test > 99) { + mes "^2f4f4f[Tsuji]^000000"; + mes "Your score is ^2f4f4f" + @score_test + "^000000!"; + mes "You have"; + mes "qualified to participate in"; + mes "Quiz Revolution."; + mes "You have cleared the 1st test!"; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "This is a reward"; + mes "from us."; + mes "Please accept it."; + set quiz_rvl,2; + getitem 501,10; //Red_Potion + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "Now, the 2nd test is"; + mes "ready."; + mes "Go to 'Payon' and meet"; + mes "'Seeil'."; + mes "You can get the 2nd test"; + mes "from him."; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "You have no business with me"; + mes "Have a good day."; + close; + } + } else { + set quiz_rvl,1; + mes "^2f4f4f[Tsuji]^000000"; + mes "You score is ^2f4f4f" + @score_test + "^000000."; + mes "You did not get a perfect score."; + mes "I do not tell you"; + mes "where you got wrong."; + mes "You have to take the test again."; + close; + } + + sM1_No: + mes "^2f4f4f[Tsuji]^000000"; + mes "Oh, really?"; + mes "Well, it's up to you."; + mes "Too bad."; + mes "If you change your mind,"; + mes "let me know."; + close; + + +} else if (quiz_rvl == 0) && (BaseLevel > 19) { + + + mes "^2f4f4f[Tsuji]^000000"; + mes "Hello"; + mes "This is Tsuji who is in charge of"; + mes "receiving application forms for"; + mes "Quiz Revolution event."; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "Zonda corporation has prepared"; + mes "^0000ffQuiz Revolution^000000 event to"; + mes "provide fun and excitement"; + mes "to all of you."; + mes "Please read the following explanation and"; + mes "participate in this event."; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "This Quiz Revolution event is.."; + mes "operated in a different way compared to the previous one."; + mes "The event will only be open for those who wish to participate in the game."; + mes "Also, the ^006400Quiz Tickets^000000 will be given to those who"; + mes "pass simple tests to check if the player is worthy of"; + mes "playing the game."; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "The assessment will be made through"; + mes "^006400four simple tests^000000"; + mes "For the ones who pass all four tests"; + mes "will receive the quiz ticket of the"; + mes "Quiz Revolution event."; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "There is a saying,"; + mes "^dc143c'No pain no gain!'^000000"; + mes "Hmm.. I don't think I know exactly what it means."; + mes "Anyway, I hope you pass all the tests"; + mes "and receive the quiz ticket"; + mes "required for the Quiz Revolution event."; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "So~ Will you now take the"; + mes "four test to attain the quiz ticket for"; + mes "the Quiz Revolution event?"; + next; + menu "Yes",-,"No",sM2_No; + + + mes "^2f4f4f[Tsuji]^000000"; + mes "Good."; + mes "The first one is the ^191970'knowledge test'^000000."; + mes "I give out the questions and the player has to choose"; + mes "an answer using O and X."; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "For your information, the player must get ^dc143ceverything right^000000, "; + mes "to become eligible for the quiz event"; + mes "so please take your time solving questions."; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "I wish many players participate"; + mes "Quiz Revolution event."; + mes "I will try to give out easy"; + mes "questions. Muhaha!"; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "Then let us start."; + mes "Read the question carefully and choose"; + mes "the right answer."; + set @test_soonsu, rand(2); + set @score_test, 0; + next; + + + if (@test_soonsu == 0) { + mes "^2f4f4f[Tsuji]^000000"; + mes "1st question."; + mes "Ragnarok is a MMORPG game."; + mes "Please choose O and X."; + next; + menu "O",-, "X",X3_1; + + set @score_test, @score_test + 10; + + X3_1: + mes "^2f4f4f[Tsuji]^000000"; + mes "2nd question."; + mes "Ragnarok's monetary unit is 'Zeny'."; + next; + menu "O",-, "X",X3_2; + + set @score_test, @score_test + 10; + + X3_2: + mes "^2f4f4f[Tsuji]^000000"; + mes "3rd question."; + mes "If an unknown person is attacking a monster"; + mes "you have to attack the same monster together."; + next; + menu "O",X3_3, "X",-; + + set @score_test, @score_test + 10; + + X3_3: + mes "^2f4f4f[Tsuji]^000000"; + mes "4th question."; + mes "'Payon' is the capital of 'Rune Midgarts'."; + next; + menu "O",-, "X",X3_4; + + set @score_test, @score_test + 10; + + X3_4: + mes "^2f4f4f[Tsuji]^000000"; + mes "5th question."; + mes "There are ships in 'Alberta'."; + next; + menu "O",-, "X",X3_5; + + set @score_test, @score_test + 10; + + X3_5: + mes "^2f4f4f[Tsuji]^000000"; + mes "6th question."; + mes "A job class that can use"; + mes "'Grand Cross' is"; + mes "'Lord Knight'."; + next; + menu "O",X3_6, "X",-; + + set @score_test, @score_test + 10; + + X3_6: + mes "^2f4f4f[Tsuji]^000000"; + mes "7th question."; + mes "When 'Bard' screams, the oppenet can be 'sturn status'"; + mes "in regular probability."; + next; + menu "O",X3_7, "X",-; + + set @score_test, @score_test + 10; + + X3_7: + mes "^2f4f4f[Tsuji]^000000"; + mes "8th question."; + mes "'Baphomet'is a tool"; + mes "for killing mosquitos."; + next; + menu "O",X3_8, "X",-; + + set @score_test, @score_test + 10; + + X3_8: + mes "^2f4f4f[Tsuji]^000000"; + mes "9th question."; + mes "'Swordman' can class change to"; + mes "'Ambernite'."; + next; + menu "O",X3_9, "X",-; + + set @score_test, @score_test + 10; + + X3_9: + mes "^2f4f4f[Tsuji]^000000"; + mes "The last question."; + mes "A fine horse, which appears in North european Myth"; + mes "'Sleipnir' has five legs."; + next; + menu "O",Y0, "X",-; + + set @score_test, @score_test + 10; + + goto Y0; + + + } else if (@test_soonsu == 1) { + + mes "^2f4f4f[Tsuji]^000000"; + mes "1st question."; + mes "Ragnarok is a MMORPG game."; + mes "Please choose O and X."; + next; + menu "O",-, "X",X4_1; + + set @score_test, @score_test + 10; + + X4_1: + mes "^2f4f4f[Tsuji]^000000"; + mes "2nd question."; + mes "'Valkyrie' who appears in North european Myth"; + mes "is the godess of Love."; + next; + menu "O",X4_2, "X",-; + + set @score_test, @score_test + 10; + + X4_2: + mes "^2f4f4f[Tsuji]^000000"; + mes "3rd question."; + mes "'Bethoven' composed the classic"; + mes "'Moon Light sonata'."; + next; + menu "O",-, "X",X4_3; + + set @score_test, @score_test + 10; + + X4_3: + mes "^2f4f4f[Tsuji]^000000"; + mes "4th question."; + mes "Orcs that exsits in the world of Ragnarok"; + mes "are divided into 7 types."; + next; + menu "O",X4_4, "X",-; + + set @score_test, @score_test + 10; + + X4_4: + mes "^2f4f4f[Tsuji]^000000"; + mes "5th question."; + mes "'Cobolt Card' can be installed"; + mes "into"; + mes "shield items."; + next; + menu "O",X4_5, "X",-; + + set @score_test, @score_test + 10; + + X4_5: + mes "^2f4f4f[Tsuji]^000000"; + mes "6th question."; + mes "'Katar'is exclusive use of Assassins."; + next; + menu "O",-, "X",X4_6; + + set @score_test, @score_test + 10; + + X4_6: + mes "^2f4f4f[Tsuji]^000000"; + mes "7th questino."; + mes "'Emperium' is a material for"; + mes "refining."; + next; + menu "O",X4_7, "X",-; + + set @score_test, @score_test + 10; + + X4_7: + mes "^2f4f4f[Tsuji]^000000"; + mes "8th question."; + mes "'Payon' is a village of bandits."; + next; + menu "O",X4_8, "X",-; + + set @score_test, @score_test + 10; + + X4_8: + mes "^2f4f4f[Tsuji]^000000"; + mes "9th question."; + mes "'Prontera' is the only place where"; + mes "to class change into 'Swordman'."; + next; + menu "O",X4_9, "X",-; + + set @score_test, @score_test + 10; + + X4_9: + mes "^2f4f4f[Tsuji]^000000"; + mes "The last question."; + mes "A monster 'Merman' is a human type."; + next; + menu "O",-, "X",Y0; + + set @score_test, @score_test + 10; + + goto Y0; + + } else if (@test_soonsu == 2) { + + + mes "1st question."; + mes "Ragnarok is a MMORPG game."; + mes "Please choose O and X."; + next; + menu "O",-, "X",X5_1; + + set @score_test, @score_test + 10; + + X5_1: + mes "^2f4f4f[Tsuji]^000000"; + mes "2nd question."; + mes "The cloesest village from Pyramid Dugeon is 'Morroc'."; + next; + menu "O",-, "X",X5_2; + + set @score_test, @score_test + 10; + + X5_2: + mes "^2f4f4f[Tsuji]^000000"; + mes "3rd question."; + mes "A merchant association is located in 'Al De Baran'."; + next; + menu "O",X5_3, "X",-; + + set @score_test, @score_test + 10; + + X5_3: + mes "^2f4f4f[Tsuji]^000000"; + mes "4th question."; + mes "Acolyte can"; + mes "class change to"; + mes "'Sage' and 'Priest'."; + next; + menu "O",X5_4, "X",-; + + set @score_test, @score_test + 10; + + X5_4: + mes "^2f4f4f[Tsuji]^000000"; + mes "5th question."; + mes "When reached base level 10"; + mes "can be class changed to 1st job10."; + next; + menu "O",X5_5, "X",-; + + set @score_test, @score_test + 10; + + X5_5: + mes "^2f4f4f[Tsuji]^000000"; + mes "6th question."; + mes "'Bowling Bash' can not be activated"; + mes "without equip"; + mes "'Two handed sword'."; + next; + menu "O",X5_6, "X",-; + + set @score_test, @score_test + 10; + + X5_6: + mes "^2f4f4f[Tsuji]^000000"; + mes "7th question."; + mes "When Priest uses 'Signum Crusis'"; + mes "all monsters' defense will decrease"; + mes "in regular probability."; + next; + menu "O",X5_7, "X",-; + + set @score_test, @score_test + 10; + + X5_7: + mes "^2f4f4f[Tsuji]^000000"; + mes "8th question."; + mes "'Wizard' will use a Blue gemstone"; + mes "when casts 'Fire Pillar'."; + next; + menu "O",-, "X",X5_8; + + set @score_test, @score_test + 10; + + X5_8: + mes "^2f4f4f[Tsuji]^000000"; + mes "9th question."; + mes "A name of Assassin's exclusive weapon'"; + mes "'Katar' that gives"; + mes "additional 50% damage to human type"; + mes "is 'Infiltrator'."; + next; + menu "O",X5_9, "X",-; + + set @score_test, @score_test + 10; + + X5_9: + mes "^2f4f4f[Tsuji]^000000"; + mes "10th question."; + mes "'Fire' is the most effective"; + mes "property against to 'water'."; + next; + menu "O",Y0, "X",-; + + set @score_test, @score_test + 10; + + + + Y0: + mes "^2f4f4f[Tsuji]^000000"; + mes "Well done~"; + mes "You have solved all the 10 questions."; + mes "Let me check"; + mes "how many you got?"; + mes "^ff0000If you don't get a perfect score, you have to re-test~^000000"; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "Wait a moment please."; + mes "Grading."; + mes ". . . . . . . . . . . . . . ."; + mes ". . . . . . . . . . . . . . ."; + mes ". . . . . . . . . . . . . . ."; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "Hum . . . . . . . . . . . . ."; + mes ". . . . . . . . . . . . . . ."; + mes ". . . . . . . . . . . . . . ."; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "OK, finished grading."; + mes "I will tell your score."; + next; + if (@score_test > 99) { + mes "^2f4f4f[Tsuji]^000000"; + mes "Your score is ^2f4f4f" + @score_test + "^000000!"; + mes "You have"; + mes "qualified to participate in"; + mes "Quiz Revolution."; + mes "You have cleared the 1st test!"; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "This is a reward"; + mes "from us."; + mes "Please accept it."; + set quiz_rvl,2; + getitem 501,10; //Red_Potion + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "Now, the 2nd test is"; + mes "ready."; + mes "Go to 'Payon' and meet"; + mes "'Seeil'."; + mes "You can get the 2nd test"; + mes "from him."; + next; + mes "^2f4f4f[Tsuji]^000000"; + mes "You have no business with me"; + mes "Have a good day."; + close; + } else { + set quiz_rvl,1; + mes "^2f4f4f[Tsuji]^000000"; + mes "You score is ^2f4f4f" + @score_test + "^000000."; + mes "You did not get a perfect score."; + mes "I do not tell you"; + mes "where you got wrong."; + mes "You have to take the test again."; + close; + } + + + sM2_No: + mes "^2f4f4f[Tsuji]^000000"; + mes "Oh, really?"; + mes "Well, it's up to you."; + mes "Too bad."; + mes "If you change your mind,"; + mes "let me know."; + close; + } +} +M_MaxItem: + mes "^2f4f4f[Tsuji]^000000"; + mes "- Wait a minute !! -"; + mes "- You currently have too many items that -"; + mes "- you can't receive an item. -"; + mes "- Please loose some weight -"; + mes "- and try again. -"; + close; + +L_OverWeight: + mes "^2f4f4f[Tsuji]^000000"; + mes "- Wait a minute !! -"; + mes "- You currently have too many items that -"; + mes "- you can't receive an item. -"; + mes "- Please loose some weight -"; + mes "- and try again. -"; + close; +} + +//======================================payon================================= +payon,85,133,4 duplicate(RecepQuiz) Receptionist#2 755 +//======================================geffen================================ +geffen,111,104,4 duplicate(RecepQuiz) Receptionist#3 755 +//====================================morocc================================== +morocc,148,272,5 duplicate(RecepQuiz) Receptionist#4 755 +//=============================Alberta======================================== +alberta,29,241,4 duplicate(RecepQuiz) Receptionist#5 755 +//============================================================================ + +//===================Quiz Revolution 2nd quest collecting job items================== +payon,111,117,3 script Seeil 89,{ +if (countitem(1201) > 3) goto M_MaxItem; +if (checkweight(1201,3) == 0 ) goto L_OverWeight; + + if (quiz_rvl > 13) { + mes "[Seeil]"; + mes "How was the last test? I hope you do this"; + mes "one well."; + close; + } else if (quiz_rvl == 13) { + mes "[Seeil]"; + mes "Since you have cleared the conditions to receive the"; + mes "last test, please go and visit Radeng in Prontera."; + mes "During that time, I will transfer"; + mes "will transfer all"; + mes "your data."; + next; + mes "[Seeil]"; + mes "So this is the last one. Show me some spirit!"; + mes "This is a present to encourage you! Take it!"; + set quiz_rvl,14; + getitem 503,10; //Yellow_Potion + close; + + } else if (quiz_rvl > 6) && (quiz_rvl < 13) { + mes "[Seeil]"; + mes "Eh? You didn't finish the marathon test and"; + mes "came out in the middle of the test."; + mes "Oh my.. I don't know how you came out, but"; + mes "this can't be like this. I will send you"; + mes "once again!"; + close2; + set quiz_rvl,6; + warp "quiz_test",385,388; + end; + + } else if (quiz_rvl == 6) { + mes "[Seeil]"; + mes "Ho.. You are fast. Well..."; + mes "All the preparations have been made so I can send"; + mes "you to the next stage. This will test your patience"; + mes "and endurance. It will not be require to use your brain"; + mes "this time. All you have to do is.. just run."; + next; + mes "[Seeil]"; + mes "You can't come back from there until"; + mes "you finish. Are you ready?"; + mes "Will you take the third test"; + mes "now?"; + next; + menu "Take the test",-,"Refuse to take the test",M2_S; + + mes "[Seeil]"; + mes "Okay! I hope you do well and"; + mes "pass the test."; + mes "Go for it!"; + close2; + warp "quiz_test",385,388; + end; + + M2_S: + mes "[Seeil]"; + mes "Oh my gosh, you are not ready"; + mes "yet. I don't have any intention to"; + mes "force you so whenever you are ready"; + mes "please come back to me. Ha ha ha."; + close; + + + } else if (quiz_rvl == 3) { + if (countitem(902) > 39) && (countitem(908) > 39) && (countitem(909) > 39) { + mes "[Seeil]"; + mes "Wow. You have collected the requested items."; + mes "So I will keep my promise. Before that"; + mes "this is a present for you.. Please"; + mes "take it."; + delitem 902,40; + delitem 908,40; + delitem 909,40; + set quiz_rvl,6; + getitem 502,10; //Orange_Potion + next; + mes "[Seeil]"; + mes "Then come back after a while and talk to me."; + mes "I need to prepare somethings for the third test"; + mes "so... please go and do something"; + mes "to kill some time."; + close; + } + + mes "[Seeil]"; + mes "You are under a test which you are required to bring"; + mes "^FF0000Tree Root^000000, ^FF0000Spawn^000000,"; + mes "^FF0000Jellopy^000000, 40ea each."; + mes "Go for it!"; + close; + + } else if (quiz_rvl == 4) { + if (countitem(905) > 39) && (countitem(920) > 39) && (countitem(909) > 39) { + mes "[Seeil]"; + mes "Ho. You have collected the required items."; + mes "I will keep my promise too. Before that"; + mes "this is a present for you. Please"; + mes "take it."; + delitem 905,40; + delitem 920,40; + delitem 909,40; + set quiz_rvl,6; + getitem 502,10; //Orange_Potion + next; + mes "[Seeil]"; + mes "Then come back to me after a while."; + mes "I have somethings to prepare so"; + mes "please go and do somethings to kill"; + mes "time."; + close; + } + + mes "[Seeil]"; + mes "You are under a test which you are required to bring"; + mes "^FF0000Stem^000000, ^FF0000Claw of Wolves^000000, ^FF0000Jellopy^000000"; + mes "40 ea each."; + mes "Go for it."; + close; + + } else if (quiz_rvl == 5) { + if (countitem(940) > 39) && (countitem(916) > 39) && (countitem(909) > 39) { + + mes "[Seeil]"; + mes "Ho. You have collected the required items."; + mes "I will keep my promise too. Before that"; + mes "this is a present for you. Please"; + mes "take it."; + delitem 940,40; + delitem 916,40; + delitem 909,40; + set quiz_rvl,6; + getitem 502,10; //Orange_Potion + next; + mes "[Seeil]"; + mes "Then come back to me after a while."; + mes "I have somethings to prepare so"; + mes "please go and do somethings to kill"; + mes "time."; + close; + } + + mes "[Seeil]"; + mes "You are under a test which you are required to bring"; + mes "^FF0000Grasshopper's Leg^000000, FF0000Feather of Birds^000000, ^FF0000Jellopy^000000"; + mes "40ea each."; + mes "Go for it!"; + close; + + + } else if (quiz_rvl == 2) { + + mes "[Seeil]"; + mes "Hmm? You are the one Tsuji sent?"; + mes "Your name is... " +strcharinfo(0)+ " Right? Okay..."; + mes "Confirmed. You look about the same as Tsuji"; + mes "described to me. Well, shall we start the"; + mes "test?"; + next; + mes "[Seeil]"; + mes "It isn't that tough. All you have"; + mes "to do is bring specified items"; + mes "Life isn't that hard~"; + set @japtem,rand(2); + next; + + if (@japtem == 0) { + set quiz_rvl,3; + mes "[Seeil]"; + mes "Bring ^FF0000Tree Root ^000000 40ea, ^FF0000Spawn"; + mes "^000000 40ea, and ^FF0000Jellopy^000000 40ea"; + mes "I told ya. It's is not so hard, is it?"; + mes "I would like to specify some items hard to find"; + mes "but seniors told me not "; + mes "to do so~ Hehe."; + next; + mes "[Seeil]"; + mes "Well, bring it as soon as you can. This is"; + mes "an easy test, but there is a time limit."; + mes "Sooner the better, that is what"; + mes "I mean~"; + close; + } + + else if (@japtem == 1) { + set quiz_rvl,4; + mes "[Seeil]"; + mes "Bring ^FF0000Stem^000000 40ea, ^FF0000Wolf Claw^000000 40ea,"; + mes "and ^FF0000Jellopy^000000 40ea."; + mes "I told ya. It's is not so hard, is it?"; + mes "I would like to specify some items hard to find"; + mes "but seniors told me not "; + mes "to do so~ Hehe."; + next; + mes "[Seeil]"; + mes "Well, bring it as soon as you can. This is"; + mes "an easy test, but there is a time limit."; + mes "Sooner the better, that is what"; + mes "I mean~"; + close; + } + + else if (@japtem == 2) { + set quiz_rvl,5; + mes "[Seeil]"; + mes "^FF0000Grasshopper's Leg^000000 40ea, ^FF0000Feather of Birds^000000 40ea,"; + mes "and ^FF0000Jellopy^000000 40ea."; + mes "I told ya. It's is not so hard, is it?"; + mes "I would like to specify some items hard to find"; + mes "but seniors told me not "; + mes "to do so~ Hehe."; + next; + mes "[Seeil]"; + mes "Well, bring it as soon as you can. This is"; + mes "an easy test, but there is a time limit."; + mes "Sooner the better, that is what"; + mes "I mean~"; + close; + } + } else { + + mes "[Seeil]"; + mes "Call me Seeil=Lanchest"; + mes "I am here to test the ones who"; + mes "wishes to join in the quiz event."; + next; + mes "[Seeil]"; + mes "I am in charge of second and third test"; + mes "so in order to get a test from me, you have to"; + mes "pass the first test which is given"; + mes "by Tsuji."; + close; +} +M_MaxItem: + mes "^800000[Seeil]^000000"; + mes "- Wait a minute !! -"; + mes "- You currently have too many items that -"; + mes "- you can't receive an item. -"; + mes "- Please loose some weight -"; + mes "- and try again. -"; + close; + +L_OverWeight: + mes "^800000[Seeil]^000000"; + mes "- Wait a minute !! -"; + mes "- You currently have too many items that -"; + mes "- you can't receive an item. -"; + mes "- Please loose some weight -"; + mes "- and try again. -"; + close; +} + +//========================================================================================================================================================= +prontera,116,266,5 script Receptionist 109,{ + +if (countitem(1201) > 3) goto M_MaxItem; +if (checkweight(1201,3) == 0 ) goto L_OverWeight; + + +if(quiz_rvl == 18) { + + mes "^800000[Radeng]^000000"; + mes "^6b8e23" + strcharinfo(0)+ "^000000?"; + mes "'Go look for ^b8860b'Kantryl'^000000 "; + mes "at Izlude."; + close; + + + +} else if(quiz_rvl == 17) { + + if (countitem(955) > 19) && (countitem(913) > 19) && (countitem(729) > 0) { + + mes "^800000[Radeng]^000000"; + mes "Oh~"; + mes "You are here!"; + mes "Let me check whether"; + mes "you brought the right thing."; + next; + mes "^800000[Radeng]^000000"; + mes "Yes,that's right."; + mes "You brought the right thing."; + mes "Please, wait a second and.."; + mes "I have to"; + mes "put you on the list."; + next; + mes "^800000[Radeng]^000000"; + mes "You are..^6b8e23" + strcharinfo(0)+ "^000000 ..right?"; + mes "Hm..."; + mes "Well done."; + mes "And this is compensation for the"; + mes "ones who have passed the test."; + next; + mes "^800000[Radeng]^000000"; + mes "All you have to do is"; + mes "meeting ^b8860b'Kantryl'^000000"; + mes "at Izlude."; + delitem 955,20; + delitem 913,20; + delitem 729,1; + set quiz_rvl,18; + getitem 504,10; //White_Potion + next; + mes "^800000[Radeng]^000000"; + mes "Goodbye~~."; + close; + } + mes "^800000[Radeng]^000000"; + mes "Oh~~"; + mes "You are here!"; + mes "Let me check whether"; + mes "You brought the right thing."; + next; + mes "^800000[Radeng]^000000"; + mes "oh my...."; + next; + mes "^800000[Radeng]^000000"; + mes "Seems like you didn't prepare"; + mes "what I asked you for."; + mes "I'll tell you what items you have to bring."; + mes "I'm not going to tell you again."; + mes "So please remember."; + next; + mes "^800000[Radeng]^000000"; + mes "The items are"; + mes "^19197020 Warm peeling^000000"; + mes "^19197020Tooth of Bat^000000"; + mes "^1919701 Zircon^000000"; + close; + + + + + + +} if(quiz_rvl == 16) { + if (countitem(1055) > 29) && (countitem(940) > 29) && (countitem(948) > 29) && (countitem(730) > 0) { + mes "^800000[Radeng]^000000"; + mes "Oh~~~"; + mes "You are here!"; + mes "Let me check whether "; + mes "you brought the right thing."; + next; + mes "^800000[Radeng]^000000"; + mes "Yes,that's right."; + mes "You brought the right thing."; + mes "Please, wait a second and.."; + mes "I have to"; + mes "put you on the list."; + next; + set quiz_rvl,18; + getitem 504,10; //White_Potion + delitem 1055,30; + delitem 940,30; + delitem 948,30; + delitem 730,1; + mes "^800000[Radeng]^000000"; + mes "You are..^6b8e23" + strcharinfo(0)+ "^000000..right?"; + mes "Hm..."; + mes "Well done."; + mes "And this is compensation for the"; + mes "ones who have passed the test."; + next; + mes "^800000[Radeng]^000000"; + mes "All you have to do is"; + mes "meeting ^b8860b'Kantryl'^000000"; + mes "at Izlude."; + next; + mes "^800000[Radeng]^000000"; + mes "Goodbye"; + close; + } + mes "^800000[Radeng]^000000"; + mes "Oh~~~"; + mes "You are here!"; + mes "Let me check whether"; + mes "you brought the right thing."; + next; + mes "^800000[Radeng]^000000"; + mes "Oh my...."; + next; + mes "^800000[Radeng]^000000"; + mes "Seems like you didn't prepare"; + mes "what I asked you for.."; + mes "I'll tell you what items you have to bring.."; + mes "I'm not going to tell you again."; + mes "So please remember.."; + next; + mes "^800000[Radeng]^000000"; + mes "^191970Earthwarm Peeling^000000 30"; + mes "^191970Grasshopper's Leg^000000 30"; + mes "^191970Bear's Footskin^000000 30"; + mes "^1919701carat Diamond^000000 1."; + mes "Try hard."; + close; + + + + + +} else if(quiz_rvl == 15) { + mes "^800000[Radeng]^000000"; + mes "You are...."; + mes "the one who left before I tell you the score"; + mes "Aren't you?"; + mes "Can't tell you failed. So..."; + next; + mes "If ^800000[Radeng]^000000"; + mes "^191970Earthwarm Peeling^000000 30"; + mes "^191970Grasshopper's Leg^000000 30"; + mes "^191970Bear's Footskin^000000 30"; + mes "^1919701carat Diamond^000000 1"; + mes "is prepared,"; + mes "You are pass."; + set quiz_rvl,16; + close; + +} else if(quiz_rvl == 14) { + mes "^800000[Radeng]^000000"; + mes "Hello"; + mes "I'm 'Radeng'."; + mes "I'm in charge of 4th test."; + mes "You seem to have finished"; + mes "3rd test!"; + next; + mes "^800000[Radeng]^000000"; + mes "Then,let's start 4th test."; + mes "the last barrier of quiz revolution."; + mes "First of all,"; + mes "I will briefly go over about the test."; + next; + mes "^800000[Radeng]^000000"; + mes "you have to do quiz and collect items"; + mes " "; + mes "You have to answer 10 mulptiple choice questions"; + mes "and the amount of required items changes "; + mes "depending on score you acheive."; + mes " "; + next; + mes "^800000[Radeng]^000000"; + mes "First,"; + mes "If you clear all 10 questions"; + mes "you are pass with"; + mes "pretest of collecting items."; + next; + mes "^800000[Radeng]^000000"; + mes "Second,"; + mes "If you score between 50~90"; + mes "required items are"; + mes "not so much."; + next; + mes "^800000[Radeng]^000000"; + mes "Third,"; + mes "If you score between 0~40"; + mes "required items will be"; + mes "vast."; + next; + mes "^800000[Radeng]^000000"; + mes "Well, this is all about"; + mes "4th test."; + mes "Then, let's start!"; + next; + menu "Yes",-,"No",M_No; + + mes "^800000[Radeng]^000000"; + mes "Well,now"; + mes "10 questions will be presented."; + mes "Look carefully through "; + mes "questions and"; + mes "choose the right answer."; + next; + mes "^800000[Radeng]^000000"; + mes "1st question."; + mes "How many jobs"; + mes "are in the game?"; + set @score_test2, 0; + next; + menu "22",sM1_1,"28",sM1_1,"32",sM1_1,"34",-; + + set @score_test2, @score_test2 + 10; + + sM1_1: + + mes "^800000[Radeng]^000000"; + mes "2nd question."; + mes "The name of santa NPC"; + mes "which links christmas town"; + mes "'Lutie' and 'Aldebaran'?"; + next; + menu "Warp Santa",sM1_2, "Link Santa",-, "Lutie Santa",sM1_2, "Hulk Santa",sM1_2; + + set @score_test2, @score_test2 + 10; + + sM1_2: + mes "^800000[Radeng]^000000"; + mes "3rd question."; + mes "What job level at least you have to be"; + mes "to learn novice skill"; + mes "'Pretend dead'?"; + next; + menu "Job level4",sM1_3,"Job level5",sM1_3,"Job level6",sM1_3,"Job level7",-; + + set @score_test2, @score_test2 + 10; + + sM1_3: + mes "^800000[Radeng]^000000"; + mes "4th question."; + mes "Require items"; + mes "to raise Poring?"; + next; + menu "Unripe Apple",-,"Rippen Apple",sM1_4, "Delicious looking Apple",sM1_4, "Apple",sM1_4; + + set @score_test2, @score_test2 + 10; + + sM1_4: + mes "^800000[Radeng]^000000"; + mes "5th question"; + mes "What doll can you buy"; + mes "from NPC?"; + next; + menu "Doll",-,"Baphomet Doll",sM1_5,"Yoyo Doll",sM1_5,"Rocker Doll",sM1_5; + + set @score_test2, @score_test2 + 10; + + sM1_5: + mes "^800000[Radeng]^000000"; + mes "6th question."; + mes "Name of monster which drop"; + mes "'Big Ribbon'?"; + next; + menu "Eclipse",sM1_6,"Dragon Fly",sM1_6,"Vocal",sM1_6,"Toad",-; + + set @score_test2, @score_test2 + 10; + + sM1_6: + mes "^800000[Radeng]^000000"; + mes "Choose the monster that has smiliar size and form of"; + mes "Pring."; + next; + menu "Pupa",sM1_7,"Fabre",sM1_7,"Wander Man",-,"Golem",sM1_7; + + set @score_test2, @score_test2 + 10; + + sM1_7: + mes "^800000[Radeng]^000000"; + mes "8th question."; + mes "When can Green Herb work"; + mes "it's efficacy?"; + next; + menu "Silence",sM1_8,"Sleep",sM1_8,"Poison",-,"Chaos",sM1_8; + + set @score_test2, @score_test2 + 10; + + sM1_8: + mes "^800000[Radeng]^000000"; + mes "9th question."; + mes "Which weapon gives biggest damages"; + mes "to small sized monsters?"; + next; + menu "Dagger",-,"Two hand Sword",sM1_9,"Katar",sM1_9,"One hand Sword",sM1_9; + + set @score_test2, @score_test2 + 10; + + sM1_9: + mes "^800000[Radeng]^000000"; + mes "Last question!!"; + mes "What is not neccesary when learnig"; + mes "First-aid treatment?"; + next; + menu "Clover",sM1_0,"Red Herb",sM1_0,"Novice Nametag",-,"Sterilized Bandages",sM1_0; + + set @score_test2, @score_test2 + 10; + + sM1_0: + mes "^800000[Radeng]^000000"; + mes "You finished answering all questions."; + mes "Wonder what your score is."; + mes "10points for 1 question."; + mes "Please wait a second."; + next; + mes "^800000[Radeng]^000000"; + mes "Please, wait a second and.."; + mes "Grading."; + mes ". . . . . . . . . . . . . . ."; + mes ". . . . . . . . . . . . . . ."; + next; + mes "^800000[Radeng]^000000"; + mes "OK."; + mes "Your score is" + strcharinfo(0)+ ""; + mes "" + @score_test2 + "!" ; + set quiz_rvl,15; + next; + if (@score_test2 > 40) && (@score_test2 < 90)goto L_Passed; + if (@score_test2 >= 90)goto L_Perfect; + mes "^800000[Radeng]^000000"; + mes "Your score is too low."; + mes "Like as I told you before,"; + mes "you have to bring a lot of"; + mes "items to pass the test."; + mes " "; + next; + mes "^800000[Radeng]^000000"; + mes "Required items are"; + mes "^191970Earthworm Peeling^000000 30"; + mes "^191970Grasshopper's Leg^000000 30"; + mes "^191970Bear's Footskin^000000 30"; + mes "^1919701Carat Diamond^000000 1"; + mes ""; + next; + mes "^800000[Radeng]^000000"; + mes "I'm sorry."; + mes "If you have scored just a little bit higher.."; + mes "........."; + mes "Then,go look for items.."; + set quiz_rvl,16; + close; + + L_Passed: + + mes "^800000[Radeng]^000000"; + mes "You did fine. "; + mes "But as I told you before"; + mes "you need to bring"; + mes "some more items."; + mes " "; + next; + mes "^800000[Radeng]^000000"; + mes "Required items are"; + mes "^191970Worm Peeling^000000 20"; + mes "^191970Tooth of Bat^000000 20"; + mes "^191970Zircon^000000 1."; + next; + mes "^800000[Radeng]^000000"; + mes "I'm sorry~"; + mes "If you have scored just a little bit higher.."; + mes "you could have passed."; + mes "(KeKeke)"; + mes "Then,go look for items.."; + set quiz_rvl,17; + close; + + L_Perfect: + mes "^800000[Radeng]^000000"; + mes "Wow!You got it all right!."; + mes "Fantastic!!!!"; + mes "For those of who "; + mes "got all right need no assignment"; + mes " "; + next; + mes "^800000[Radeng]^000000"; + mes "" + strcharinfo(0)+ ""; + mes "Have passed all tests."; + mes "Congratulations"; + mes "And this is your compensation "; + mes ""; + set quiz_rvl,18; + getitem 504,10; //White_Potion + next; + mes "^800000[Radeng]^000000"; + mes "Now, go look for"; + mes "^b8860b'Kantryl'^000000."; + mes "at Izlude."; + close; + + + M_No: + mes "^800000[Radeng]^000000"; + mes "Come back if you change your mind."; + close; +} else { + mes "^800000[Radeng]^000000"; + mes "Hello~~~"; + mes "Please join at comming"; + mes "Quiz Revolution~"; + mes "Register will be made"; + mes "by receptionist in every town."; + close; +} +M_MaxItem: + mes "^800000[Radeng]^000000"; + mes "- Wait a minute !! -"; + mes "- You currently have too many items that -"; + mes "- you can't receive an item. -"; + mes "- Please loose some weight -"; + mes "- and try again. -"; + close; + +L_OverWeight: + mes "^800000[Radeng]^000000"; + mes "- Wait a minute !! -"; + mes "- You currently have too many items that -"; + mes "- you can't receive an item. -"; + mes "- Please loose some weight -"; + mes "- and try again. -"; + close; +} + +//======================================================================================================================================================= +izlude,106,220,5 script Kantryl 98,{ + +if (countitem(1201) > 3) goto M_MaxItem; +if (checkweight(1201,3) == 0 ) goto L_OverWeight; + + +if(quiz_rvl == 20) { + mes "[Kantryl]"; + mes "I see that you have already givin me a"; + mes "notice of absence..."; + mes "Well, but I can't give you entry ticket."; + mes "who Knows~~"; + mes "Wait untill quiz starts"; + mes "You may catch a fortune."; + close; + +}else if(quiz_rvl == 19) { + mes "[Kantryl]"; + mes "You have already received an entry ticket."; + mes "It's impossible getting"; + mes "another one."; + next; + mes "[Kantryl]"; + mes "For reference, number of particapants are"; + next; + mes "[Kantryl]"; + mes "1st Quiz Revolution - " + $quiz1 + "/200"; + mes "2nd Quiz Revolution - " + $quiz2 + "/200"; + mes "3rd Quiz Revolution - " + $quiz3 + "/200"; + mes "4th Quiz Revolution - " + $quiz4 + "/200"; + mes "5th Quiz Revolution - " + $quiz5 + "/200"; + mes "keep it in your mind."; + close; + + +} else if(quiz_rvl == 18) { + + mes "[Kantryl]"; + mes "You are " + strcharinfo(0)+ "."; + mes "Who finished the test.right?"; + mes "Would you please make a decision "; + mes "whether you will join or not join the"; + mes "Quiz Revolution."; + next; + mes "[Kantryl]"; + mes "Would you like to join?"; + mes "If you say yes, you can register at"; + mes "Quiz Revolution"; + mes "If you choose ^FF0000'NO,I won't join'^000000"; + mes " then ^FF0000'You can't join'^000000"; + mes "Please make a right decision."; + next; + mes "[Kantryl]"; + mes "If you haven't made up your mind,"; + mes "say yes for now"; + mes "and can change later on."; + mes "Take it easy."; + next; + menu "Join", -, "Not join.",NJ; + + + mes "[Kantryl]"; + mes "Itis to 1~5 round"; + mes "first 200 have chance."; + mes ""+ strcharinfo(0)+ ",when do you want to join?"; + mes "It is ^FF0000Impossible to cancel^000000"; + mes "So please make right decision."; + next; + mes "[Kantryl]"; + mes "1st Quiz Revolution - " + $quiz1 + "/200"; + mes "2nd Quiz Revolution - " + $quiz2 + "/200"; + mes "3rd Quiz Revolution - " + $quiz3 + "/200"; + mes "4th Quiz Revolution - " + $quiz4 + "/200"; + mes "5th Quiz Revolution - " + $quiz5 + "/200"; + next; + menu "Join 1st round",-,"Join 2nd round",s2nd,"Join 3rd round",s3nd,"Join 4th round",s4nd,"Join 5th round",s5nd; + + if($quiz1 > 199){ + mes "[Kantryl]"; + mes "I'm sorry. We are all full at"; + mes "1st round of quiz revolution"; + mes "No more applicants for 1st round."; + close; + + } + mes "[Kantryl]"; + mes "Hm..."+ strcharinfo(0)+" "; + mes "I have received your application"; + mes "Try hard and study hard."; + set quiz_rvl,19; + set $quiz1,$quiz1 + 1; + getitem 7280,1; //Quiz_Ticket01 + close; + + + + + s2nd: + if($quiz2 > 199){ + mes "[Kantryl]"; + mes "I'm sorry. We are all full at"; + mes "2nd round of quiz revolution"; + mes "No more applicants for 2nd round."; + close; + } + + mes "[Kantryl]"; + mes "Hm..."+ strcharinfo(0)+""; + mes "I have received your application"; + mes "Try hard and study hard."; + set quiz_rvl,19; + set $quiz2,$quiz2 + 1; + getitem 7281,1; //Quiz_Ticket02 + close; + + + + s3nd: + if($quiz3 > 199){ + mes "[Kantryl]"; + mes "I'm sorry. We are all full at"; + mes "3rd round of quiz revolution."; + mes "No more applicants for 3rd round."; + close; + } + + + mes "[Kantryl]"; + mes "Hm..." + strcharinfo(0)+ ""; + mes "I have received your application."; + mes "Try hard and study hard."; + set quiz_rvl,19; + set $quiz3,$quiz3 + 1; + getitem 7282,1; //Quiz_Ticket03 + close; + + + + + s4nd: + if($quiz4 > 199){ + mes "[Kantryl]"; + mes "I'm sorry. We are all full at"; + mes "4th round of quiz revolution."; + mes "No more applicants for 4th round.."; + close; + } + + mes "[Kantryl]"; + mes "Hm..." + strcharinfo(0)+ ""; + mes "I have received your application."; + mes "Try hard and study hard."; + set quiz_rvl,19; + set $quiz4,$quiz4 + 1; + getitem 7283,1; //Quiz_Ticket04 + close; + + + + + s5nd: + if($quiz5 > 199){ + mes "[Kantryl]"; + mes "I'm sorry. We are all full at"; + mes "5th round of quiz revolution."; + mes "No more applicants for 5th round.."; + close; + } + + mes "[Kantryl]"; + mes "Hm..." + strcharinfo(0)+ ""; + mes "I have received your application."; + mes "Try hard and study hard."; + set quiz_rvl,19; + set $quiz5,$quiz5 + 1; + getitem 7284,1; //Quiz_Ticket05 + close; + + + + + NJ: + mes "[Kantryl]"; + mes "Ok,if that's how you think."; + mes "Choice is on you"; + mes "Good job any way."; + set quiz_rvl,20; + next; + mes "[Kantryl]"; + mes "Actually,we have plan to"; + mes "allowed for those of who didn't "; + mes "apply previously unless they have an entry ticket."; + mes "If you have any chance to get an entry ticket,"; + mes "you are always welcome."; + next; + mes "[Kantryl]"; + mes "Go ask for the ones"; + mes "who changed their mind."; + mes "If you are lucky,"; + mes "you'll get the chance."; + close; +} else { + mes "[Kantryl]"; + mes "Hello~"; + mes "I'm Kantryl=Ranegalf."; + mes "I help the ones who have passsed the test"; + mes "to take a formal step."; + next; + mes "[Kantryl]"; + mes "It is impossible to accept"; + mes "applications from those of who didn't"; + mes "finish the test."; + mes "Go look for our staff in every"; + mes "Midgarts"; + mes "and take a test."; + next; + mes "[Kantryl]"; + mes "At that time, I'll gladly"; + mes "welcome you and accept the application."; + close; +} +M_MaxItem: + mes "[Kantryl]"; + mes "- Wait a minute !! -"; + mes "- You currently have too many items that -"; + mes "- you can't receive an item. -"; + mes "- Please loose some weight -"; + mes "- and try again. -"; + close; + +L_OverWeight: + mes "[Kantryl]"; + mes "- Wait a minute !! -"; + mes "- You currently have too many items that -"; + mes "- you can't receive an item. -"; + mes "- Please loose some weight -"; + mes "- and try again. -"; + close; +} + +//============================================================================================================================ +quiz_test,387,350,4 script "From somewhere::race_monk 45,2,2,{ +OnTouch: + + if (quiz_rvl == 6) { + set quiz_rvl,7; + warp "quiz_test",385,388; + end; + }else if (quiz_rvl == 7) { + set quiz_rvl,8; + warp "quiz_test",385,388; + end; + }else if (quiz_rvl == 8) { + set quiz_rvl,9; + warp "quiz_test",385,388; + end; + }else if (quiz_rvl == 9) { + set quiz_rvl,10; + warp "quiz_test",385,388; + end; + }else if (quiz_rvl == 10) { + announce "You are almost there. Show me your spirit.",bc_blue|bc_map; + set quiz_rvl,11; + warp "quiz_test",385,388; + end; + }else if (quiz_rvl == 11) { + set quiz_rvl,12; + warp "quiz_test",385,388; + end; + }else if (quiz_rvl == 12) { + mes "[Seeil]"; + mes "You have worked hard and finished."; + mes "It wasn't that hard as you thought, huh?"; + mes "All you have to do is run in circle... Well,"; + mes "come in front of me."; + announce "Congratulations! " +strcharinfo(0)+ ", you have passed the test!",bc_blue|bc_map; + close2; + set quiz_rvl,13; + warp "payon",109,115; + end; + } + +} +//=============================hiddenwarp================================================================= + +//-----------------------------1111----------------------------------------------------------------------- +quiz_test,82,384,4 script Pit::ham_quiz#1-1 -1,0,0,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} + +quiz_test,83,384,4 script Pit::ham_quiz#1-2 -1,0,0,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} + +quiz_test,82,385,4 script Pit::ham_quiz#1-3 -1,0,0,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} + +quiz_test,83,385,4 script Pit::ham_quiz#1-4 -1,0,0,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} +//-----------------------------2222----------------------------------------------------------------------- +quiz_test,38,388,4 script Pit::ham_quiz#2-1 -1,0,1,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} + +quiz_test,39,388,4 script Pit::ham_quiz#2-2 -1,0,1,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} + +quiz_test,38,386,4 script Pit::ham_quiz#2-3 -1,0,0,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} + +quiz_test,39,386,4 script Pit::ham_quiz#2-4 -1,0,0,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} +//-----------------------------3333----------------------------------------------------------------------- +quiz_test,11,158,4 script Pit::ham_quiz#3-1 -1,1,0,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} + +quiz_test,11,159,4 script Pit::ham_quiz#3-2 -1,1,0,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} + +quiz_test,13,159,4 script Pit::ham_quiz#3-3 -1,0,0,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} + +quiz_test,13,158,4 script Pit::ham_quiz#3-4 -1,0,0,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} +//-----------------------------4444----------------------------------------------------------------------- +quiz_test,11,30,4 script Pit::ham_quiz#4-1 -1,3,0,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} + +quiz_test,11,31,4 script Pit::ham_quiz#4-2 -1,3,0,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} + +quiz_test,15,30,4 script Pit::ham_quiz#4-3 -1,0,0,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} + +quiz_test,15,30,4 script Pit::ham_quiz#4-4 -1,0,0,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} +//-----------------------------5555----------------------------------------------------------------------- +quiz_test,70,12,4 script Pit::ham_quiz#5-1 -1,0,1,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} + +quiz_test,71,12,4 script Pit::ham_quiz#5-2 -1,0,1,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} + +quiz_test,70,10,4 script Pit::ham_quiz#5-3 -1,0,0,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} + +quiz_test,71,10,4 script Pit::ham_quiz#5-4 -1,0,0,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} +//---------------------------6666------------------------------------------------------------------------- +quiz_test,186,11,4 script Pit::ham_quiz#6-1 -1,2,3,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} + +quiz_test,189,11,4 script Pit::ham_quiz#6-2 -1,0,3,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} +//---------------------------7777------------------------------------------------------------------------- +quiz_test,387,43,4 script Pit::ham_quiz#7-1 -1,1,0,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} + +quiz_test,387,42,4 script Pit::ham_quiz#7-2 -1,1,0,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} + +quiz_test,389,43,4 script Pit::ham_quiz#7-3 -1,0,0,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} + +quiz_test,389,42,4 script Pit::ham_quiz#7-4 -1,0,0,{ +OnTouch: + announce ""+strcharinfo(0)+" Start running from the beginning. You fell in a pit.",bc_blue|bc_map; + warp "quiz_test",387,387; + end; +} + +//------------------------------------------------------------------------------------------------------------- +// Comments +// 0 = Didn't receive a quest from Tsuji +// 1 = Failed Tsuji's quest +// 2 = Pass Tsuji's quest and to 2nd round +// 3 = Seeil's randomly collecting job item quest 1 +// 4 = Seeil's randomly collecting job item quest +// 5 = Seeil's randomly collecting job item quest +// 6 = Clear with collecting job item. start Marathon test +// 7~12 =Checking Marathon quest occasionally. +// 13 = Use after clearing Marathon quest +// 14 = Clear 3rd quest, start Radeng(4th) quest +// 15 = check after reporting errors of Radeng +// 16 = randomly collecting job items at Radeng quest 1 +// 17 = randomly collecting job items at Radeng quest 2 +// 18 = Radeng quest clear. Possible time to apply. Begin Kantryl apply. +// 19 = checked if you show intention to join +// 20 = checked If you don't show intention to join +// 21 = 3 items for the one who gets compansation diff --git a/npc/events/twintowers.txt b/npc/events/twintowers.txt new file mode 100644 index 000000000..942807222 --- /dev/null +++ b/npc/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/events/valentinesday.txt b/npc/events/valentinesday.txt new file mode 100644 index 000000000..519ccb350 --- /dev/null +++ b/npc/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/events/valentinesday_2009.txt b/npc/events/valentinesday_2009.txt new file mode 100644 index 000000000..db072b401 --- /dev/null +++ b/npc/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/events/valentinesday_2012.txt b/npc/events/valentinesday_2012.txt new file mode 100644 index 000000000..a92b24338 --- /dev/null +++ b/npc/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/events/whiteday.txt b/npc/events/whiteday.txt new file mode 100644 index 000000000..8046bd4c1 --- /dev/null +++ b/npc/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/events/xmas.txt b/npc/events/xmas.txt new file mode 100644 index 000000000..5a211c18d --- /dev/null +++ b/npc/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 |