//===== eAthena Script =======================================
//= Christmas Server Event 2012
//===== By: ==================================================
//= Inochi
//===== Current Version: =====================================
//= 1.0
//===== Compatible With: =====================================
//= eAthena
//===== Description: =========================================
//= All monsters have 5% chance of dropping Lucky Candy Cane
//= All monsters have a 2.5% chance of dropping a gift box
//= All monsters have a 1.5% chance of dropping a santa hat
//= All monsters have a 0.5% chance of dropping a santa bag
//= Xmas Custom Quest on Destroying Evil Antonio
//= Custom Xmas Dungeon to hold Antonio & Added mobs to dun
//= Xmas monsters in Xmas Gaia
//===== Additional Comments: =================================
//= N/A
//============================================================
- script QuestOptions#xmas11 -1,{
end;
OnInit:
set $xmas_2011_key,19033; //Place ID for Magic Key Item
set $xmas_2011_gkey,19034; //Place ID for Snowman's Signature Item
set $xmas_2011_hat,19035; //Place ID for LuminaRO X-Mas 2011 Hat
} //End Script
//============================================================
//X-Mas Monster Spawns in Gaia
//============================================================
gaia,0,0,0,0 monster Merry Christmas! 1265,10,0,0,0 //Cookie
gaia,0,0,0,0 monster Merry Christmas! 1246,10,0,0,0 //Cookie Type 2
gaia,0,0,0,0 monster Merry Christmas! 1062,10,0,0,0 //Santa Poring
gaia,0,0,0,0 monster Merry Christmas! 1242,10,0,0,0 //Marin
//============================================================
//Monster Chance of getting lucky candy cane
//============================================================
- script xmas_candy#xmas11 -1,{
OnNPCKillEvent:
if(rand(1000)>50) end;
dispbottom "Have a Merry Christmas at LuminaRO!";
getitem 571,1; //Lucky Candy Cane
close;
}
- script xmas_gbox#xmas11 -1,{
OnNPCKillEvent:
if(rand(1000)>20) end;
dispbottom "Have a Merry Christmas at LuminaRO!";
getitem 644,1; //Gift Box
close;
}
- script xmas_santah#xmas11 -1,{
OnNPCKillEvent:
if(rand(1000)>15) end;
dispbottom "Have a Merry Christmas at LuminaRO!";
getitem 2236,1; //Santa Hat
close;
}
- script xmas_santas#xmas11 -1,{
OnNPCKillEvent:
if(rand(1000)>5) end;
dispbottom "Have a Merry Christmas at LuminaRO!";
getitem 12132,1; //Santa's Bag
close;
}
//============================================================
// Custom Antonio X-Mas Quest
//============================================================
gaia,143,97,3 script Snowman#xmas11 710,{
set .@name$, "[^FF0000Snowman^000000]";
if (#xmas_11 == 1) goto xmas_p1;
if (#xmas_11 >=2 && #xmas_11 <9) goto xmas_msg1;
if (#xmas_11 == 9) goto xmas_msg2;
emotion 28;
mes .@name$;
mes "*Sniff* *Sniff*";
set #xmas_11, 1;
close;
xmas_p1:
mes .@name$;
emotion 28;
mes "*Sniff* *Sniff* Hmm?";
next;
if(select("What's wrong pal?", "A crying snowman lol") == 2 )
{
mes .@name$;
mes "You have no idea what's going on! Go away!";
close;
}
mes .@name$;
mes "There are some horrible rumors about Antonio, Santa's evil brother, and his plans to steal Christmas!";
next;
if(select("That's horrible news!", "Christmas? Who cares...") == 2 )
{
mes .@name$;
mes "How can you not like Christmas?! Fine be like that and leave me in my misery.";
close;
}
mes .@name$;
mes "Antonio has always been jealous of Santa being so popular. That's why I am afraid he's plotting something agains Xmas! Please help me! Xmas town won't be the same without its most important festivities";
next;
if(select("Ill save Christmas!", "Not worth my time") == 2 )
{
mes .@name$;
mes "Well I hope you know that this will effect you too. Bye!";
close;
}
mes .@name$;
mes "Great! than you so much! Please find Santa and tell him you talked to me and you agreed to help Xmas! I told Santa to hide in a safe place. He's hiding in his cottage ^0000FFsouth of Lutie^000000. Take this item with you, santa will recognize it and trust you";
close2;
getitem $xmas_2011_gkey, 1; //Golden Key for Santa to recognize you as a helper
set #xmas_11, 2;
end;
xmas_msg1:
mes .@name$;
mes "Quickly go to Santa and present the item I gave you so that he knows it's me and will gain your trust.";
close;
xmas_msg2:
mes .@name$;
mes "I'm so happy Christmas has been saved, all thanks to you! I'll always remember you.";
close;
} //End of Script
xmas_que,27,102,5 script Santa#xmas11 718,{
set .@name$, "[^FF0000Santa^000000]";
if (#xmas_11 == 2) goto xmas_p1;
if (#xmas_11 >=3 && #xmas_11 <8) goto xmas_msg1;
if (#xmas_11 == 8) goto xmas_com;
if (#xmas_11 == 9) goto xmas_msg2;
mes .@name$;
mes "Ho ho ho! You shouldn't be here. This is not a place for you!";
close;
xmas_p1:
mes .@name$;
mes "Ho ho ho! You shouldn't be here. This is not a place for you!";
next;
if(select("I'm here to save Christmas!", "Close") == 2 )
{
close;
}
mes .@name$;
mes "Are you now? Or are you on my evil brother's side to destroy Christmas?";
next;
if(select("Show item", "Close") == 2 )
{
close;
}
mes .@name$;
mes "Oh my ho ho. You spoke to my good man the Snowman in Gaia. Alright then. You have gained my trust and we can work together to save Christmas!";
next;
if(select("Awesome!", "Close") == 2 )
{
close;
}
mes .@name$;
mes "If you want to help me you first need to prove you are a brave and loyal person! I'll need you to find my little helpers. They will tell you how to access ^0000FFAntonio's Hideout^000000. The first elf is hiding in a small rustic town located on an island off the Rune-Midgarts coast filled with unassuming people who greet you warmly. My elf will tell you where the next one is.";
set #xmas_11, 3;
close;
xmas_msg1:
mes .@name$;
mes "Go and find my elf helpers to prove yourself to me that you are loyal and brave! Don't forget that the first elf is hiding in a small rustic town located on an island off the Rune-Midgarts coast filled with unassuming people who greet you warmly.";
close;
xmas_com:
mes .@name$;
mes "Hoho! You again? Did you find my elves?";
next;
if(select("I sure did!", "Close") == 2 )
{
close;
}
mes .@name$;
mes "Oh I'm so pleased! And what of my brother Antonio?";
next;
if(select("He's gone for good", "Close") == 2 )
{
close;
}
mes .@name$;
mes "Then that means you saved Christmas! Thank you ho ho so much! I don't know how I could ever repay you for the courage & bravery you have shown in stopping my brother & saving Christmas.";
next;
mes .@name$;
mes "I do however have something for you that I've been meaning to give to someone that is everything like yourself. I hope this will do as a little thank you for what you've done.";
next;
mes "*Santa gives places something in your hat*";
set #xmas_11, 9;
getitem $xmas_2011_hat,1;
delitem $xmas_2011_key,1;
delitem $xmas_2011_gkey,1;
next;
mes .@name$;
mes "Have a Merry Christmas! Don't forget to check the Christmas tree in Gaia for your present this year! Ho ho ho!";
close;
xmas_msg2:
mes .@name$;
mes "Merry Christmas! Ho ho ho!";
close;
} //End Script
moscovia,131,240,5 script Holly#xmas11 716,{
set .@name$, "[^FF0000Holly^000000]";
if (#xmas_11 == 3) goto xmas_p1;
if (#xmas_11 == 4 && #xmas_11 <9) goto xmas_msg1;
if (#xmas_11 == 9) goto xmas_msg2;
mes "*Runs Away*";
close;
xmas_p1:
mes .@name$;
mes "Ah you! I heard from Father Santa's Christmas whisper that you wanted to help save Christmas.";
next;
if(select("Yep thats me!", "Maybe another time") == 2 )
{
mes .@name$;
mes "Huh? Well we don't have all day now. Come back to me when you're ready!";
close;
}
mes .@name$;
mes "Ok listen! Some of my friend Santa Porings were scouting the area inside Lutie Town and they caught Antonio entering a cave! I am suspicious that the cave leads to a secret place where Antonio and his army are plotting their evil plans! We tried to open the cave's gate with no success. That's why you need to find my colleague helper, ^0000FFDolly^000000. She has the ability to forge a special ^0000FFmagic key^000000. The key will allow you to easily enter ^0000FFAntonio's Secret Cave^000000, you just need to find her and get that key!";
next;
if(select("Ok, where is she?", "Maybe another time") == 2 )
{
mes .@name$;
mes "Huh? Well we don't have all day now. Come back to me when you're ready!";
close;
}
mes .@name$;
mes "Last time I checked she was in a cold icy town that started with an ^0000FFM^000000 but I can't remember the full name. Darn, I wish I knew the name but hopefully that will be enough for you to find out.";
set #xmas_11, 4;
close;
xmas_msg1:
mes .@name$;
mes "Go find ^0000FFDolly^000000. She will make the ^0000FFmagic key^000000 for you to enter ^0000FFAntonio's Secret Cave^000000. She should be in a cold icy town but I forgot the name of it. I just know it starts with an ^0000FFM^000000.";
close;
xmas_msg2:
mes .@name$;
mes "Thanks so much for your help. Christmas will be perfect again this year!";
close;
} //End Script
manuk,93,212,5 script Dolly#xmas11 717,{
set .@name$, "[^FF0000Dolly^000000]";
if (#xmas_11 == 4) goto xmas_p1;
if (#xmas_11 == 5) goto xmas_p2;
if (#xmas_11 == 6 && #xmas_11 <9) goto xmas_msg1;
if (#xmas_11 == 9) goto xmas_msg2;
mes "*Runs Away*";
close;
xmas_p1:
mes .@name$;
mes "Hmm, you have the smell of an elf on you? Who are you?";
next;
if(select("Explain Situation", "How about no?") == 2 )
{
mes .@name$;
mes "Who do you think you are human? You may smell like an elf but I'll find out soon enough.";
close;
}
mes .@name$;
mes "I see, so you're here to save Christmas by having me make a ^0000FFmagic key^000000 for you so you can enter ^0000FFAntonio's Secret Cave^000000. Well first of all it's not going to be that easy.";
next;
if(select("I'm up for the challenge", "Give me some time") == 2 )
{
mes .@name$;
mes "Alright then, come back when you're ready.";
close;
}
mes .@name$;
mes "Alright then, keep in mind that the ^0000FFmagic key^000000 can open any door and you must be responsible when using it. In order for me to make it I'll need you to get me the following items:";
next;
mes .@name$;
mes "^0000FF1x Gold^000000, ^0000FF1x Emperium Anvil^000000, ^0000FF1x Santa's Hat^000000, ^0000FF1x Hammer of Blacksmith^000000, & ^0000FF3x Seed of Yggdrasil^000000. Ok? When you have them all come back to me and we can get started on forging your key so you can get into Antonio's Cave.";
set #xmas_11, 5;
close;
xmas_p2:
mes .@name$;
mes "Well hello again. Did you get everything?";
switch(select("Got them all!:What did you need again?")){
case 1:
next;
callsub q_check;
close;
break;
case 2:
next;
mes .@name$;
mes "Eh.. typical humans and their memory~.";
next;
mes .@name$;
mes "To make the ^0000FFmagic key^000000 I'll need ^0000FF1x Gold^000000, ^0000FF1x Emperium Anvil^000000, ^0000FF1x Santa's Hat^000000, ^0000FF1x Hammer of Blacksmith^000000, & ^0000FF3x Seed of Yggdrasil^000000. Alright? Don't forget this time!";
close;
break;
}
//Check If Player Has Required Items
q_check:
mes "[^FF0000Dolly^000000]";
if (countitem(969) <1 || countitem(989) <1 || countitem(2236) <1 || countitem(1005) <1 || countitem(608) <3){
mes "Are you kidding me? You don't have everything. If we are to save Christmas than please check you have everything first before coming to me.";
emotion 23; //Omg
close;
}else{
goto section_b;
}
section_b:
mes "Wow, I'm impressed you found everything. Alright then give me a second to make everything.";
next;
mes "*Hits something with a hammer*";
misceffect EF_HIT2;
misceffect EF_TEIHIT3;
next;
mes "*Applies a magic spell*";
misceffect EF_FROSTWEAPON;
next;
mes "*Casts final material binding spell*";
misceffect EF_BEGINSPELL4;
misceffect EF_ICECRASH;
next;
mes "[^FF0000Dolly^000000]";
mes "All done! Here is your ^0000FFmagic key^000000.";
set #xmas_11, 6;
delitem 969, 1;
delitem 989, 1;
delitem 2236, 1;
delitem 1005, 1;
delitem 608, 3;
getitem $xmas_2011_key,1; //Magic Key to Enter Antonio's Cave
close;
xmas_msg1:
mes .@name$;
mes "Now that you have the magic key, go and find my colleague ^0000FFMurphy^000000. He will cast a protective magic spell on you to help you fight against the monsters that are in the cave. He should be located somewhere in ^0000FFLutie^000000.";
close;
xmas_msg2:
mes .@name$;
mes "Thank you for what you've done for us on saving Christmas. I'll see you around.";
close;
} //End Script
xmas,200,285,5 script Murphy#xmas11 713,{
set .@name$, "[^FF0000Murphy^000000]";
if (#xmas_11 == 6 && #xmas_11 <7) goto xmas_p1;
if (#xmas_11 == 7 && #xmas_11 <9) goto xmas_msg1;
if (#xmas_11 == 9) goto xmas_msg2;
mes .@name$;
mes "Make sure you bundle up! It gets pretty cold around here.";
close;
xmas_p1:
mes .@name$;
mes "Well hello there? What are you doing with that ring on your finger? I know for a fact a normal human like you shouldn't be walking around with something like that.";
next;
if(select("I'm saving Christmas", "Ignore") == 2 )
{
mes .@name$;
mes "Alright fine, ignore me..";
close;
}
mes .@name$;
mes "Saving Christmas? I presume you got that ring from ^0000FFDolly^000000 as she is one of few elves who has the power to craft such a thing. I guess you're going to try and stop ^0000FFAntonio^000000. I can help you by showing you where his ^0000FFSecret Cave^000000 is. Go on the hilltop above the train and there should be a keyhole on the ground. Use your magic key to gain entrance to his cave. Before you go let me give you a little something to protect you from the monsters in there.";
next;
mes "*You feel a power surge around you*";
specialeffect2 EF_BLESSING;
sc_start SC_INCREASEAGI,240000,10; //Increase Agi Level 10
sc_start SC_BLESSING,240000,10; //Blessing Level 10
next;
mes .@name$;
mes "Good luck to you and I really hope you save Christmas!";
set #xmas_11, 7;
close;
xmas_msg1:
mes .@name$;
mes "Good luck to you in destroying Antonio. Don't forget that his hideout cave entrance is right above the train on the mountain!";
close;
xmas_msg2:
mes .@name$;
mes "Hey! Thank you for saving Christmas! I hope Santa gave you something wonderful as a token of his appreciation.";
close;
} //End Script
xmas,144,325,5 script Hole#xmas11 111,{
if ((#xmas_11 == 7) && (countitem($xmas_2011_key)==1)) goto xmas_p1;
close;
xmas_p1:
mes "You see a hole in the ground? A key needs to be placed into this hole to open the doorway. Use the ^0000FFMagic Key^000000 to open the door?";
next;
if(select("Use ^0000FFMagic Key^000000", "Exit") == 2 )
{
close;
}
warp "xmas_ant",153,147; close;
} //End Script
//============================================================
//Warp Portal from Antonio Cave back to Lutie
//============================================================
xmas_ant,152,153,0 warp xmas_11_1-1 1,1,xmas,144,322
//============================================================
//Warp Portal from Xmas Field to Santa Safe House
//============================================================
xmas_fild01,160,125,0 warp xmas_2011_2-1 1,1,xmas_que,36,90
xmas_que,36,87,0 warp xmas_2011_2-2 1,1,xmas_fild01,157,125
//============================================================
//Antonio Monster Spawn & Mobs in Antonio's Cave
//============================================================
xmas_ant,0,0,0,0 monster Antonio 2125,3,0,0,"Antonio#xmas11::OnKillEvent"
xmas_ant,0,0,0,0 monster Snowier 1775,5,0,0,0
xmas_ant,0,0,0,0 monster Siroma 1776,5,0,0,0
xmas_ant,0,0,0,0 monster Gazeti 1778,3,240000,0,0
xmas_ant,0,0,0,0 monster Ice Titan 1777,3,0,0,0
xmas_ant,33,271,4,4 monster Iceicle 1789,1,1320000,300000,0
xmas_ant,110,242,5,5 monster Iceicle 1789,2,1020000,300000,0
xmas_ant,150,280,4,4 monster Iceicle 1789,1,900000,300000,0
xmas_ant,270,268,4,4 monster Iceicle 1789,1,1020000,300000,0
xmas_ant,46,207,3,3 monster Iceicle 1789,1,1080000,300000,0
xmas_ant,134,214,4,4 monster Iceicle 1789,1,840000,300000,0
xmas_ant,102,178,4,4 monster Iceicle 1789,1,1020000,300000,0
xmas_ant,207,165,5,5 monster Iceicle 1789,2,1080000,300000,0
xmas_ant,206,222,4,4 monster Iceicle 1789,1,1020000,300000,0
xmas_ant,270,136,3,3 monster Iceicle 1789,1,960000,300000,0
xmas_ant,20,150,4,4 monster Iceicle 1789,1,960000,300000,0
xmas_ant,46,103,5,5 monster Iceicle 1789,2,1320000,300000,0
xmas_ant,172,90,3,3 monster Iceicle 1789,1,840000,300000,0
xmas_ant,20,20,5,5 monster Iceicle 1789,1,960000,300000,0
xmas_ant,143,28,3,3 monster Iceicle 1789,1,1020000,300000,0
xmas_ant,280,20,5,5 monster Iceicle 1789,1,960000,300000,0
//===============================================================
//On Antonio Kill Event - Gain Antonio Hat & Return it to Santa!
//===============================================================
- script Antonio#xmas11 -1,{
OnKillEvent:
if(#xmas_11 == 7)goto ant_com;
end;
ant_com:
dispbottom "You have killed Antonio and got his Hat! Return to Santa & inform him that you stopped Antonio!";
getitem 5136,1; //Antonio Hat
set #xmas_11, 8;
} //End Script