summaryrefslogtreecommitdiff
path: root/npc/pre-re/events/halloween_2008.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/pre-re/events/halloween_2008.txt')
-rw-r--r--npc/pre-re/events/halloween_2008.txt276
1 files changed, 276 insertions, 0 deletions
diff --git a/npc/pre-re/events/halloween_2008.txt b/npc/pre-re/events/halloween_2008.txt
new file mode 100644
index 000000000..a4844da1b
--- /dev/null
+++ b/npc/pre-re/events/halloween_2008.txt
@@ -0,0 +1,276 @@
+//===== rAthena Script =======================================
+//= iRO Halloween (2008)
+//===== By: ==================================================
+//= Kisuka
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//= iRO Halloween (2008)
+//= Run away from the zombies for tickets.
+//= Redeem tickets for prizes.
+//===== Notes: ===============================================
+//= You must enable the event monsters in mob_db2.
+//===== Additional Comments: =================================
+//= 1.0 First version. [Kisuka]
+//= 1.1 Some small changes. [Kisuka]
+//============================================================
+
+payon,162,176,4 script Halloween Magician#iRO08 704,{
+
+ if(Hallow08 < 1) {
+ mes "[Halloween Magician]";
+ mes "Kkkkkkkkk!";
+ mes "I have a special event this Halloween that tests your luck and agility.";
+ mes "Are you interested?";
+ next;
+ mes "[Halloween Magician]";
+ mes "Come on! Don't be a wuss!";
+ mes "If you collect enough tickets you can get good prizes!";
+ mes "So what do you say?";
+ next;
+ goto MainMenu;
+ }
+
+ if (Hallow08Kill == 1) {
+ mes "[Halloween Magician]";
+ mes "You a 'fraidy cat or something?!";
+ mes "You know you want to try again...";
+ mes "Do you know the rules?";
+ next;
+ set Hallow08Kill,0;
+ if(select("Yes, I know.:No, I don't know.") == 2) {
+ goto Rules;
+ }
+ goto Participate;
+ }
+
+ if (Hallow08Kill == 2) {
+ mes "[Halloween Magician]";
+ mes "Oh, well done! You are alright!";
+ mes "Isn't it fun with zombies??";
+ mes "You know, zombies were people too!";
+ mes "Ha!";
+ mes "Kkkkkkk.";
+ next;
+ getitem 7941,1;
+ set Hallow08Kill,0;
+ mes "[Halloween Magician]";
+ mes "As I promised";
+ mes "You can get Halloween tickets for cool items.";
+ close;
+ }
+
+ if(Hallow08 > 0) {
+ mes "[Halloween Magician]";
+ mes "Well, do you want to hear the rules again or, just get back to it...";
+ next;
+ goto MainMenu2;
+ }
+
+ Rules:
+ mes "[Halloween Magician]";
+ mes "This village is like a virtual Payon.";
+ mes "There are zombies and ghouls roaming around and three southern exits, but only one works.";
+ mes "That's up to you to find out.";
+ next;
+ mes "[Halloween Magician]";
+ mes "You can't use any skills to kill the ghouls or zombies.";
+ mes "And one more thing...";
+ mes "you shouldn't forget...";
+ next;
+ mes "[Halloween Magician]";
+ mes "All participants should be wearing nothing.";
+ mes "Put all belongings in your storage and come back here when your weight is '0'.";
+ next;
+ mes "[Halloween Magician]";
+ mes "Oh and one more thing!";
+ mes "You can't be riding a PecoPeco or have a Cart.";
+ mes "If you are, then I will remove them before you enter.";
+ mes "Got it?";
+ next;
+ mes "[Halloween Magician]";
+ mes "Remember, there are three exits but only one works randomly, the zombies and ghouls roaming around there can't be killed and you can't be wearing anything.";
+ next;
+ if (Hallow08 > 0) {
+ mes "[Halloween Magician]";
+ mes "Hey...";
+ mes "Come back once you're ready.";
+ close;
+ }else{
+ goto MainMenu;
+ }
+
+ Participate:
+ mes "[Halloween Magician]";
+ mes "Ok, you are ready.";
+ mes "Let me check your weight.";
+ next;
+ if (Weight > 0) {
+ mes "[Halloween Magician]";
+ mes "Gosh!";
+ mes "There's always a black sheep anywhere.";
+ next;
+ mes "[Halloween Magician]";
+ mes "You think I wouldn't notice that your weight is above '0'?";
+ mes "You're overweight...";
+ close;
+ }else{
+ mes "[Halloween Magician]";
+ mes "You seem good to go, and your weight is just right.";
+ next;
+ mes "[Halloween Magician]";
+ mes "I was quite swamped with my work, so I'm exhausted.";
+ next;
+ mes "[Halloween Magician]";
+ mes "I sometimes forget to send you there...";
+ next;
+ mes "[Halloween Magician]";
+ mes "I hope you come back well.";
+ close2;
+ if (Hallow08 < 1) {
+ set Hallow08,1;
+ }
+ set Hallow08Kill,1;
+ set @Hallow08Warp, rand(1,3);
+ percentheal -98,0;
+ setriding 0;
+ setcart 0;
+ warp "evt_zombie",155,246;
+ end;
+ }
+
+ TicketExchange:
+ mes "[Halloween Magician]";
+ mes "You want to exchange tickets for prizes?";
+ mes "Good job! Kkkkkk!";
+ next;
+ mes "[Halloween Magician]";
+ mes "Lemme tell you what items you can exchange for.";
+ next;
+ mes "[Halloween Magician]";
+ mes "5 tickets for Pumpkin Pie.";
+ mes "20 tickets for Pumpkin-Head.";
+ mes "50 tickets for Old Blue Box.";
+ mes "70 tickets for Old Purple Box.";
+ mes "200 tickets for Old Card Album.";
+ next;
+ mes "[Halloween Magician]";
+ mes "What would you like to exchange for?";
+ next;
+ switch(select("Pumpkin Pie:Pumpkin-Head:Old Blue Box:Old Purple Box:Old Card Album")) {
+ case 1:
+ if(countitem(7941) < 5) {
+ goto NotEnough;
+ }else{
+ delitem 7941,5;
+ getitem 12192,1;
+ goto Enough;
+ }
+ break;
+ case 2:
+ if(countitem(7941) < 20) {
+ goto NotEnough;
+ }else{
+ delitem 7941,20;
+ getitem 5134,1;
+ goto Enough;
+ }
+ break;
+ case 3:
+ if(countitem(7941) < 50) {
+ goto NotEnough;
+ }else{
+ delitem 7941,50;
+ getitem 603,1;
+ goto Enough;
+ }
+ break;
+ case 4:
+ if(countitem(7941) < 70) {
+ goto NotEnough;
+ }else{
+ delitem 7941,70;
+ getitem 617,1;
+ goto Enough;
+ }
+ break;
+ case 5:
+ if(countitem(7941) < 200) {
+ goto NotEnough;
+ }else{
+ delitem 7941,200;
+ getitem 616,1;
+ goto Enough;
+ }
+ }
+
+ NextTime:
+ mes "[Halloween Magician]";
+ mes "Ok, see you then.";
+ mes "Kkkkkkkk.";
+ close;
+
+ MainMenu:
+ menu "Explain it to me.",Rules,"I want to participate.",Participate,"I want to exchange tickets for prizes.",TicketExchange,"I'll come back next time.",NextTime;
+
+ MainMenu2:
+ menu "Get me back there now!",Participate,"Please, tell me the rules",Rules,"I want to exchange tickets for prizes.",TicketExchange,"I'll come back next time.",NextTime;
+
+ NotEnough:
+ mes "[Halloween Magician]";
+ mes "You don't have enough tickets!";
+ mes "Can't you even count?";
+ mes "Please come here with the right number of tickets.";
+ close;
+
+ Enough:
+ mes "[Halloween Magician]";
+ mes "Here it is.";
+ mes "Do you need...";
+ mes "anything else?";
+ next;
+ if (Hallow08 == 1) {
+ goto MainMenu2;
+ }else{
+ goto MainMenu;
+ }
+}
+
+// --------------- MapFlags ---------------
+
+
+evt_zombie,16,142,1 script zombiewarp001 45,2,2,{
+ OnTouch:
+ if (@Hallow08Warp == 1) {
+ set Hallow08Kill,2;
+ specialeffect 16;
+ warp "payon",28,142;
+ }
+ end;
+}
+
+evt_zombie,122,27,1 script zombiewarp002 45,2,2,{
+ OnTouch:
+ if (@Hallow08Warp == 2) {
+ set Hallow08Kill,2;
+ specialeffect 16;
+ warp "payon",121,40;
+ }
+ end;
+}
+
+evt_zombie,267,89,1 script zombiewarp003 45,2,2,{
+ OnTouch:
+ if (@Hallow08Warp == 3) {
+ set Hallow08Kill,2;
+ specialeffect 16;
+ warp "payon",253,95;
+ }
+ end;
+}
+
+evt_zombie,0,0,0,0 monster Zombie 3000,150,0,0,0
+evt_zombie,0,0,0,0 monster Ghoul 3001,80,0,0,0
+evt_zombie,0,0,0,0 monster Zombie Master 3002,20,0,0,0