diff options
| -rw-r--r-- | world/map/npc/020-1/KrickKrackKrock.txt | 243 | ||||
| -rw-r--r-- | world/map/npc/020-1/rockscissor.txt | 170 | ||||
| -rw-r--r-- | world/map/npc/025-1/reset.txt | 98 | ||||
| -rw-r--r-- | world/map/npc/027-2/alacrius.txt | 70 | ||||
| -rw-r--r-- | world/map/npc/027-2/alacrius2.txt | 171 | ||||
| -rw-r--r-- | world/map/npc/027-2/testnpcs.txt | 259 | ||||
| -rw-r--r-- | world/map/npc/042-1/malik.txt | 40 | ||||
| -rw-r--r-- | world/map/npc/easter/2011/bunny.txt | 419 |
8 files changed, 743 insertions, 727 deletions
diff --git a/world/map/npc/020-1/KrickKrackKrock.txt b/world/map/npc/020-1/KrickKrackKrock.txt index b37dd0e1..20b2d6c6 100644 --- a/world/map/npc/020-1/KrickKrackKrock.txt +++ b/world/map/npc/020-1/KrickKrackKrock.txt @@ -1,121 +1,124 @@ -// author: Lien -// reviewed by Pjotr Orial and Jenalya -//020-1.gat,82,82,0 script Criker 192, { - -L_Main: -//Var - - set @NPC_NAME$, "[Criker]"; - set @BET, 50; -//lots of array ;( - setarray @KRICK$, "Krick", "Krack", "Krock"; - setarray @ITEM_RAND, 613, 537, 631, 775, 703, 640, 641, 4006, 700; - setarray @ITEM_HEALTH, 684, 685, 686, 687; - -//ends of var - - mes @NPC_NAME$; - mes "\"Hello " + strcharinfo(0) + ", do you want to play Krick-Krack-Krock?\""; -L_Menu: - menu - "Let's start!", L_Start, - "What's this?", L_info, - "Well, not for the moment.", -; - close; -L_Start: - mes @NPC_NAME$; - mes "\"Well, how many do you want to bet?\""; - input @BET; - if(@BET < 50 ) goto L_poor; - if(@BET > 2000) goto L_Too_rich; - if(zeny < @BET) goto L_No_Money; - set zeny, zeny - @BET; - - - - set @NPC_KRICK, rand(2); - mes "\"Choose Krick, Krack or Krock.\""; - menu - @KRICK$[0], -, - @KRICK$[1], -, - @KRICK$[2], -; - - //menu = min 1 & not 0 so I change it - set @menu, @menu - 1; - - mes @NPC_NAME$; - mes "\" "+ @KRICK$[@NPC_KRICK] +"!\""; - if( @menu == @NPC_KRICK ) goto L_Work; - mes @NPC_NAME$; - mes "\"Too bad! You were not lucky!\""; - close; -L_Work: - mes @NPC_NAME$; - mes "\"Wow amazing... What kind of present do you want?\""; - menu - "Money!", L_Money, - "An item!", L_Item, - "Some healing potions would be cool!", L_Health_item; - close; - -L_Money: - mes @NPC_NAME$; - mes "\"Here is your money.\""; - set zeny, zeny + (@BET*2); - close; -L_Item: -//item -getinventorylist; - if (@inventorylist_count == 100) goto L_Full_Inv; - - if( @BET > 50) getitem @ITEM_RAND[rand(1)], 1; - if( @BET > 200) getitem @ITEM_RAND[1 + rand(1)], 1; - if( @BET > 500) getitem @ITEM_RAND[2 + rand(1)], 1; - if( @BET > 1000) getitem @ITEM_RAND[3 + rand(1)], 1; - if( @BET > 1200) getitem @ITEM_RAND[4 + rand(1)], 1; - if( @BET > 1500) getitem @ITEM_RAND[5 + rand(1)], 1; - if( @BET == 2000) getitem @ITEM_RAND[6 + rand(1)], 1; - mes @NPC_NAME$; - mes "\"Here it is !\""; - close; - -L_Health_item: -// health item -getinventorylist; - if (@inventorylist_count == 100) goto L_Full_Inv; - -if( @BET > 50) getitem @ITEM_HEALTH[rand(1)], 1; -if( @BET > 200) getitem @ITEM_HEALTH[ 1 +rand(1)], 1 + rand(1); -if( @BET > 500) getitem @ITEM_HEALTH[2 + rand(1)], 1 + rand(3); -if( @BET > 1000) getitem @ITEM_HEALTH[3], 2 + rand(1); -if( @BET > 1500) getitem @ITEM_HEALTH[3], 3 + rand(2); -if( @BET == 2000) getitem @ITEM_HEALTH[3], 5 + rand(10); - mes @NPC_NAME$; - mes "\"Here it is !\""; - close; - -L_Full_Inv: - mes @NPC_NAME$; - mes "\"What are you doing? You have so much stuff with you, you can't carry what you won. Ha, well, then I will keep it!\""; - close; - -L_poor: - mes @NPC_NAME$; - mes "\"Erm... if you want to play you HAVE to bet, and you can't bet "+ @BET +" gold pieces. You need at least 50gp.\""; - close; -L_Too_rich: - mes @NPC_NAME$; - mes "\"Mh... I have to bet too. How will I get a present which is "+ @BET +"? No, that's too much.\""; - close; -L_No_Money: - mes @NPC_NAME$; - mes "\"Oh? You don't have "+ @BET +" gold pieces.\""; - close; -L_info: - mes @NPC_NAME$; - mes "\"Well, if you want to play Krick Krack Krock with me, you need to bet some money. We will both say a word (Krack, Krick or Krock). If we say the same, you can win double your money or an item worth what you bet. \""; - next; - mes "\"So, do you want to play? \""; - goto L_Menu; -} +//author: Lien +//reviewed by Pjotr Orial and Jenalya + +//To enable: sed 's_^// __' -i npc/020-1/KrickKrackKrock.txt + +// 020-1.gat,82,82,0 script Criker 192, { + +// L_Main: +// //Var + +// set @NPC_NAME$, "[Criker]"; +// set @BET, 50; +// //lots of array ;( +// setarray @KRICK$, "Krick", "Krack", "Krock"; +// setarray @ITEM_RAND, 613, 537, 631, 775, 703, 640, 641, 4006, 700; +// setarray @ITEM_HEALTH, 684, 685, 686, 687; + +// //ends of var + +// mes @NPC_NAME$; +// mes "\"Hello " + strcharinfo(0) + ", do you want to play Krick-Krack-Krock?\""; +// L_Menu: +// menu +// "Let's start!", L_Start, +// "What's this?", L_info, +// "Well, not for the moment.", -; +// close; +// L_Start: +// mes @NPC_NAME$; +// mes "\"Well, how many do you want to bet?\""; +// input @BET; +// if(@BET < 50 ) goto L_poor; +// if(@BET > 2000) goto L_Too_rich; +// if(zeny < @BET) goto L_No_Money; +// set zeny, zeny - @BET; + + + +// set @NPC_KRICK, rand(2); +// mes "\"Choose Krick, Krack or Krock.\""; +// menu +// @KRICK$[0], -, +// @KRICK$[1], -, +// @KRICK$[2], -; + +// //menu = min 1 & not 0 so I change it +// set @menu, @menu - 1; + +// mes @NPC_NAME$; +// mes "\" "+ @KRICK$[@NPC_KRICK] +"!\""; +// if( @menu == @NPC_KRICK ) goto L_Work; +// mes @NPC_NAME$; +// mes "\"Too bad! You were not lucky!\""; +// close; +// L_Work: +// mes @NPC_NAME$; +// mes "\"Wow amazing... What kind of present do you want?\""; +// menu +// "Money!", L_Money, +// "An item!", L_Item, +// "Some healing potions would be cool!", L_Health_item; +// close; + +// L_Money: +// mes @NPC_NAME$; +// mes "\"Here is your money.\""; +// set zeny, zeny + (@BET*2); +// close; +// L_Item: +// //item +// getinventorylist; +// if (@inventorylist_count == 100) goto L_Full_Inv; + +// if( @BET > 50) getitem @ITEM_RAND[rand(1)], 1; +// if( @BET > 200) getitem @ITEM_RAND[1 + rand(1)], 1; +// if( @BET > 500) getitem @ITEM_RAND[2 + rand(1)], 1; +// if( @BET > 1000) getitem @ITEM_RAND[3 + rand(1)], 1; +// if( @BET > 1200) getitem @ITEM_RAND[4 + rand(1)], 1; +// if( @BET > 1500) getitem @ITEM_RAND[5 + rand(1)], 1; +// if( @BET == 2000) getitem @ITEM_RAND[6 + rand(1)], 1; +// mes @NPC_NAME$; +// mes "\"Here it is !\""; +// close; + +// L_Health_item: +// // health item +// getinventorylist; +// if (@inventorylist_count == 100) goto L_Full_Inv; + +// if( @BET > 50) getitem @ITEM_HEALTH[rand(1)], 1; +// if( @BET > 200) getitem @ITEM_HEALTH[ 1 +rand(1)], 1 + rand(1); +// if( @BET > 500) getitem @ITEM_HEALTH[2 + rand(1)], 1 + rand(3); +// if( @BET > 1000) getitem @ITEM_HEALTH[3], 2 + rand(1); +// if( @BET > 1500) getitem @ITEM_HEALTH[3], 3 + rand(2); +// if( @BET == 2000) getitem @ITEM_HEALTH[3], 5 + rand(10); +// mes @NPC_NAME$; +// mes "\"Here it is !\""; +// close; + +// L_Full_Inv: +// mes @NPC_NAME$; +// mes "\"What are you doing? You have so much stuff with you, you can't carry what you won. Ha, well, then I will keep it!\""; +// close; + +// L_poor: +// mes @NPC_NAME$; +// mes "\"Erm... if you want to play you HAVE to bet, and you can't bet "+ @BET +" gold pieces. You need at least 50gp.\""; +// close; +// L_Too_rich: +// mes @NPC_NAME$; +// mes "\"Mh... I have to bet too. How will I get a present which is "+ @BET +"? No, that's too much.\""; +// close; +// L_No_Money: +// mes @NPC_NAME$; +// mes "\"Oh? You don't have "+ @BET +" gold pieces.\""; +// close; +// L_info: +// mes @NPC_NAME$; +// mes "\"Well, if you want to play Krick Krack Krock with me, you need to bet some money. We will both say a word (Krack, Krick or Krock). If we say the same, you can win double your money or an item worth what you bet. \""; +// next; +// mes "\"So, do you want to play? \""; +// goto L_Menu; +// } diff --git a/world/map/npc/020-1/rockscissor.txt b/world/map/npc/020-1/rockscissor.txt index d4a9d6f6..7ab9b42f 100644 --- a/world/map/npc/020-1/rockscissor.txt +++ b/world/map/npc/020-1/rockscissor.txt @@ -1,96 +1,98 @@ -// author: Lien -// reviewed by Pjotr Orial and Jenalya -//##################################### -//== NPC [Player] # -// anyone want to do a funny bet # -// ------------------------ # -// Rock-Paper-Scissors can be playing # -// I hope that'll make fun # -// ------------------------ # -//##################################### +//author: Lien +//reviewed by Pjotr Orial and Jenalya +//###################################### +//#== NPC [Player] # +//# anyone want to do a funny bet # +//# ------------------------ # +//# Rock-Paper-Scissors can be playing # +//# I hope that'll make fun # +//# ------------------------ # +//###################################### -//020-1.gat,74,78,0 script Gobmel 189, { - //var - set @NPC_name$, "[Gobmel]"; - set @NPC_point, 0; - set @PC_point, 0; - set @gamblerun, 0; - setarray @CHOOSE_PC$, "Scissors", "Paper", "Rock"; - setarray @CHOSE_ID, 0, 1, 2; - //0 : scissors; 1: Paper; 2: Rock; - // 0 cut 1 and 1 cover 3 and break 0 ... - //var ends +//To enable: sed 's_^// __' -i npc/020-1/rockscissor.txt - mes @NPC_name$; - mes "\"Hello " + strcharinfo(0) + "! Do you want to do a little party of Rock-Paper-Scissors and bet some gold?\""; - menu - "Yes, I want.", L_RPS, - "Well, maybe later.", -; - close; +// 020-1.gat,74,78,0 script Gobmel 189, { +// //var +// set @NPC_name$, "[Gobmel]"; +// set @NPC_point, 0; +// set @PC_point, 0; +// set @gamblerun, 0; +// setarray @CHOOSE_PC$, "Scissors", "Paper", "Rock"; +// setarray @CHOSE_ID, 0, 1, 2; +// //0 : scissors; 1: Paper; 2: Rock; +// // 0 cut 1 and 1 cover 3 and break 0 ... +// //var ends -L_RPS: +// mes @NPC_name$; +// mes "\"Hello " + strcharinfo(0) + "! Do you want to do a little party of Rock-Paper-Scissors and bet some gold?\""; +// menu +// "Yes, I want.", L_RPS, +// "Well, maybe later.", -; +// close; - mes @NPC_name$; - mes "\"How much money do you want to bet?\""; - input @MONEY_BET; - if(zeny < @MONEY_BET) goto L_poor; - set zeny, zeny - @MONEY_BET; +// L_RPS: -L_Start: - if(@gamblerun == 3) goto L_finish; - //what chose the NPC ? +// mes @NPC_name$; +// mes "\"How much money do you want to bet?\""; +// input @MONEY_BET; +// if(zeny < @MONEY_BET) goto L_poor; +// set zeny, zeny - @MONEY_BET; - set @CHOOSE_NPCID, rand(2); +// L_Start: +// if(@gamblerun == 3) goto L_finish; +// //what chose the NPC ? - mes @NPC_name$; - mes "[ " + @gamblerun + "/3 ]"; - mes "\"1... 2... 3...\""; - mes ""; - mes"[chose what sign you do]"; - mes ""; - menu - @CHOOSE_PC$[0], -, - @CHOOSE_PC$[1], -, - @CHOOSE_PC$[2], -; +// set @CHOOSE_NPCID, rand(2); - set @CHOSEN, @menu -1; - mes "Gobmal: " + @CHOOSE_PC$[@CHOOSE_NPCID]; - mes strcharinfo(0)+" " + strcharinfo(0)+ ": " +@CHOOSE_PC$[@CHOSEN]; - mes ""; - if(@CHOSEN == @CHOOSE_NPCID) goto L_Start; - if(@CHOSEN == 0 && @CHOOSE_NPCID == 2) goto L_Lost; - if(@CHOSEN == 1 && @CHOOSE_NPCID == 0) goto L_Lost; - if(@CHOSEN == 2 && @CHOOSE_NPCID == 1) goto L_Lost; -L_Win: - set @PC_point, @PC_point + 1; - set @gamblerun, @gamblerun + 1; - mes "Oh no! I have lost."; - mes ""; - next; - goto L_Start; +// mes @NPC_name$; +// mes "[ " + @gamblerun + "/3 ]"; +// mes "\"1... 2... 3...\""; +// mes ""; +// mes"[chose what sign you do]"; +// mes ""; +// menu +// @CHOOSE_PC$[0], -, +// @CHOOSE_PC$[1], -, +// @CHOOSE_PC$[2], -; -L_poor: - mes @NPC_name$; - mes "\"Go away from me...\""; - close; +// set @CHOSEN, @menu -1; +// mes "Gobmal: " + @CHOOSE_PC$[@CHOOSE_NPCID]; +// mes strcharinfo(0)+" " + strcharinfo(0)+ ": " +@CHOOSE_PC$[@CHOSEN]; +// mes ""; +// if(@CHOSEN == @CHOOSE_NPCID) goto L_Start; +// if(@CHOSEN == 0 && @CHOOSE_NPCID == 2) goto L_Lost; +// if(@CHOSEN == 1 && @CHOOSE_NPCID == 0) goto L_Lost; +// if(@CHOSEN == 2 && @CHOOSE_NPCID == 1) goto L_Lost; +// L_Win: +// set @PC_point, @PC_point + 1; +// set @gamblerun, @gamblerun + 1; +// mes "Oh no! I have lost."; +// mes ""; +// next; +// goto L_Start; -L_Lost: - set @NPC_point, @NPC_point + 1; - set @gamblerun, @gamblerun + 1; - mes "I have won!"; - mes ""; - next; - goto L_Start; +// L_poor: +// mes @NPC_name$; +// mes "\"Go away from me...\""; +// close; -L_finish: - if(@PC_point > @NPC_point ) goto L_Won; - mes @NPC_name$; - mes "\"Nice! I have won, give me your gp!\""; - close; -L_Won: - mes @NPC_name$; - mes "\"Here is my money.\""; - set zeny, zeny + @MONEY_BET*2; - close; -} +// L_Lost: +// set @NPC_point, @NPC_point + 1; +// set @gamblerun, @gamblerun + 1; +// mes "I have won!"; +// mes ""; +// next; +// goto L_Start; + +// L_finish: +// if(@PC_point > @NPC_point ) goto L_Won; +// mes @NPC_name$; +// mes "\"Nice! I have won, give me your gp!\""; +// close; +// L_Won: +// mes @NPC_name$; +// mes "\"Here is my money.\""; +// set zeny, zeny + @MONEY_BET*2; +// close; +// } diff --git a/world/map/npc/025-1/reset.txt b/world/map/npc/025-1/reset.txt index 627724db..86cb97a7 100644 --- a/world/map/npc/025-1/reset.txt +++ b/world/map/npc/025-1/reset.txt @@ -1,49 +1,53 @@ -// Uncomment this line if you want to test the script in your local server -//025-1.gat,47,84,0 script reset 145,{ +//To enable: sed 's_^// __' -i npc/025-1/reset.txt - mes "Do you want to reset Rossy Quest?"; - menu - "Reset every variable of the quest.", -, - "Set Rossy_Quest.", L_Set, - "Pass cave quest.", L_Pass2, - "Pass all caves except boss cave.", L_Pass, - "Do not reset.", L_No; - set Rossy_Quest, 0; - set cavefights, 0; - set FLAGS, FLAGS & ~FLAG_ROSSI_COMPLETED; +//note by o11c: I think the logic is wrong +//it should be: cavefights | BATTLE_CAVE1, etc. -L_No: - close; - -L_Set: - mes "value"; - input @name$; - set Rossy_Quest, @name$; - close; - -L_Pass: - set Rossy_Quest, 15; - set cavefights, (cavefights ^ BATTLE_CAVE1); - set cavefights, (cavefights ^ BATTLE_CAVE2); - set cavefights, (cavefights ^ BATTLE_CAVE3); - set cavefights, (cavefights ^ BATTLE_CAVE4); - set cavefights, (cavefights ^ BATTLE_CAVE5); - set cavefights, (cavefights ^ BATTLE_CAVE6); - set cavefights, (cavefights ^ BATTLE_CAVE7); - set cavefights, (cavefights ^ BATTLE_CAVE8); - set cavefights, (cavefights ^ BATTLE_CAVE9); - close; - -L_Pass2: - set Rossy_Quest, 16; - set cavefights, (cavefights ^ BATTLE_CAVE1); - set cavefights, (cavefights ^ BATTLE_CAVE2); - set cavefights, (cavefights ^ BATTLE_CAVE3); - set cavefights, (cavefights ^ BATTLE_CAVE4); - set cavefights, (cavefights ^ BATTLE_CAVE5); - set cavefights, (cavefights ^ BATTLE_CAVE6); - set cavefights, (cavefights ^ BATTLE_CAVE7); - set cavefights, (cavefights ^ BATTLE_CAVE8); - set cavefights, (cavefights ^ BATTLE_CAVE9); - close; -} +// 025-1.gat,47,84,0 script reset 145,{ + +// mes "Do you want to reset Rossy Quest?"; +// menu +// "Reset every variable of the quest.", -, +// "Set Rossy_Quest.", L_Set, +// "Pass cave quest.", L_Pass2, +// "Pass all caves except boss cave.", L_Pass, +// "Do not reset.", L_No; +// set Rossy_Quest, 0; +// set cavefights, 0; +// set FLAGS, FLAGS & ~FLAG_ROSSI_COMPLETED; + +// L_No: +// close; + +// L_Set: +// mes "value"; +// input @name$; +// set Rossy_Quest, @name$; +// close; + +// L_Pass: +// set Rossy_Quest, 15; +// set cavefights, (cavefights ^ BATTLE_CAVE1); +// set cavefights, (cavefights ^ BATTLE_CAVE2); +// set cavefights, (cavefights ^ BATTLE_CAVE3); +// set cavefights, (cavefights ^ BATTLE_CAVE4); +// set cavefights, (cavefights ^ BATTLE_CAVE5); +// set cavefights, (cavefights ^ BATTLE_CAVE6); +// set cavefights, (cavefights ^ BATTLE_CAVE7); +// set cavefights, (cavefights ^ BATTLE_CAVE8); +// set cavefights, (cavefights ^ BATTLE_CAVE9); +// close; + +// L_Pass2: +// set Rossy_Quest, 16; +// set cavefights, (cavefights ^ BATTLE_CAVE1); +// set cavefights, (cavefights ^ BATTLE_CAVE2); +// set cavefights, (cavefights ^ BATTLE_CAVE3); +// set cavefights, (cavefights ^ BATTLE_CAVE4); +// set cavefights, (cavefights ^ BATTLE_CAVE5); +// set cavefights, (cavefights ^ BATTLE_CAVE6); +// set cavefights, (cavefights ^ BATTLE_CAVE7); +// set cavefights, (cavefights ^ BATTLE_CAVE8); +// set cavefights, (cavefights ^ BATTLE_CAVE9); +// close; +// } diff --git a/world/map/npc/027-2/alacrius.txt b/world/map/npc/027-2/alacrius.txt index 99714ebc..1e15769c 100644 --- a/world/map/npc/027-2/alacrius.txt +++ b/world/map/npc/027-2/alacrius.txt @@ -1,40 +1,42 @@ -// Starts the reaper quest +//Starts the reaper quest +//(incomplete, use alacrius2.txt instead) +//To enable: sed 's_^// __' -i npc/027-2/alacrius.txt //027-2.gat,107,29,0 script Alacrius 313,{ - // if started, go to started - // if fail go to failed - // if complete go to complete - // if cooldown go to cooldown +// // if started, go to started +// // if fail go to failed +// // if complete go to complete +// // if cooldown go to cooldown -// start quest section - mes "Hi, want to fight the reaper?"; - menu - "Let's go!",L_START, - "No, thank you.",-; - close; +// // start quest section +// mes "Hi, want to fight the reaper?"; +// menu +// "Let's go!",L_START, +// "No, thank you.",-; +// close; -L_START: - monster "027-4.gat",40,55,"Reaper Quest",1067,1,"Reaper::OnDead"; - enablenpc "#gatecontrol"; - enablenpc "#closedgate"; - disablenpc "#opengate"; -// Open doors to reaper level - warp "027-3.gat",41,70; - initnpctimer; - close; +// L_START: +// monster "027-4.gat",40,55,"Reaper Quest",1067,1,"Reaper::OnDead"; +// enablenpc "#gatecontrol"; +// enablenpc "#closedgate"; +// disablenpc "#opengate"; +// // Open doors to reaper level +// warp "027-3.gat",41,70; +// initnpctimer; +// close; -// 5 min mark for testing purposes, up it when finished. -OnTimer300000: - mapwarp "027-3.gat", "027-2.gat",104,41; - mapwarp "027-4.gat", "027-2.gat",104,41; - killmonsterall "027-4.gat"; - end; -OnTimer301000: - npctalk "You have failed the mission."; - end; +// // 5 min mark for testing purposes, up it when finished. +// OnTimer300000: +// mapwarp "027-3.gat", "027-2.gat",104,41; +// mapwarp "027-4.gat", "027-2.gat",104,41; +// killmonsterall "027-4.gat"; +// end; +// OnTimer301000: +// npctalk "You have failed the mission."; +// end; -// cooldown before the quest can be restarted -OnTimer360000: - // set quest var - end; -} +// // cooldown before the quest can be restarted +// OnTimer360000: +// // set quest var +// end; +// } diff --git a/world/map/npc/027-2/alacrius2.txt b/world/map/npc/027-2/alacrius2.txt index df1587ec..4e2be3fd 100644 --- a/world/map/npc/027-2/alacrius2.txt +++ b/world/map/npc/027-2/alacrius2.txt @@ -1,113 +1,114 @@ -// Starts the reaper quest +//Starts the reaper quest +//To enable: sed 's_^// __' -i npc/027-2/alacrius2.txt -//027-2.gat,107,29,0 script Alacrius 313,{ - if ($@FIGHT_ALACRIUS_STATUS != 0) goto L_Enjoy; +// 027-2.gat,107,29,0 script Alacrius 313,{ +// if ($@FIGHT_ALACRIUS_STATUS != 0) goto L_Enjoy; - mes "[Alacrius]"; - mes "\"Hello, I'm Alacrius. \""; - next; - mes "[Alacrius]"; - mes "\"A very long time ago, I figured a way to cheat death and the limits of time and space. You may think it is evil, but I did it because of true love... \""; - next; - mes "[Alacrius]"; - mes "\"The reaper kidnapped my beloved wife, and took her to the underworld. I had to find a way to stop him, and as time went by, I became what you can see now... But if you dare to cheat death, time and space you'll have to pay a high price... \""; - next; +// mes "[Alacrius]"; +// mes "\"Hello, I'm Alacrius. \""; +// next; +// mes "[Alacrius]"; +// mes "\"A very long time ago, I figured a way to cheat death and the limits of time and space. You may think it is evil, but I did it because of true love... \""; +// next; +// mes "[Alacrius]"; +// mes "\"The reaper kidnapped my beloved wife, and took her to the underworld. I had to find a way to stop him, and as time went by, I became what you can see now... But if you dare to cheat death, time and space you'll have to pay a high price... \""; +// next; - mes "[Alacrius]"; - mes "\"Being away from time and space doesn't allow me to try to save my beloved wife... I need your help. Do you think you have what it takes to handle the most powerful monsters over the world of Mana? \""; - next; +// mes "[Alacrius]"; +// mes "\"Being away from time and space doesn't allow me to try to save my beloved wife... I need your help. Do you think you have what it takes to handle the most powerful monsters over the world of Mana? \""; +// next; - menu - "Let's go!",L_PLAY_OK, - "No, thank you.",-; - close; +// menu +// "Let's go!",L_PLAY_OK, +// "No, thank you.",-; +// close; -L_PLAY_OK: +// L_PLAY_OK: - if ($@FIGHT_ALACRIUS_STATUS != 0) goto L_AlreadyStarted; - set $@FIGHT_ALACRIUS_STATUS, 1; - set $@MO_REAPER, 0; - startnpctimer; - set @PRIZE, 1; +// if ($@FIGHT_ALACRIUS_STATUS != 0) goto L_AlreadyStarted; +// set $@FIGHT_ALACRIUS_STATUS, 1; +// set $@MO_REAPER, 0; +// startnpctimer; +// set @PRIZE, 1; - goto L_Exit; +// goto L_Exit; -L_Enjoy: - if ($@MO_REAPER == 1) goto L_AllDead; - mes "[Alacrius]"; - mes "\"...Please hurry up, the time is running...\""; - goto L_Exit; +// L_Enjoy: +// if ($@MO_REAPER == 1) goto L_AllDead; +// mes "[Alacrius]"; +// mes "\"...Please hurry up, the time is running...\""; +// goto L_Exit; -L_AlreadyStarted: - mes "[Alacrius]"; - mes "\"The Reaper is alive.\""; - goto L_Exit; +// L_AlreadyStarted: +// mes "[Alacrius]"; +// mes "\"The Reaper is alive.\""; +// goto L_Exit; -L_Exit: - close; - end; +// L_Exit: +// close; +// end; -// Time to fight -OnTimer10000: +// // Time to fight +// OnTimer10000: - monster "027-2.gat",0,0,"Reaper Quest",1111,1,"Alacrius::OnDeadReaper"; - end; +// monster "027-2.gat",0,0,"Reaper Quest",1111,1,"Alacrius::OnDeadReaper"; +// end; -OnDeadReaper: - set $@MO_REAPER, $@MO_REAPER + 1; - killmonster "027-2.gat","All"; - end; +// OnDeadReaper: +// set $@MO_REAPER, $@MO_REAPER + 1; +// killmonster "027-2.gat","All"; +// end; -OnDeadLost: - set $@MO_LOST, $@MO_LOST + 1; - end; +// OnDeadLost: +// set $@MO_LOST, $@MO_LOST + 1; +// end; -OnTimer120000: +// OnTimer120000: - set $@MO_REAPER,0; - set $@FIGHT_ALACRIUS_STATUS, 0; - killmonster "027-2.gat","All"; - stopnpctimer; - setnpctimer 0; - set @PRIZE, 0; - npctalk "Oh my beloved wife, you could not be rescued! I will have to purge my mistakes again..."; - npctalk "Please, help my beloved wife!!"; +// set $@MO_REAPER,0; +// set $@FIGHT_ALACRIUS_STATUS, 0; +// killmonster "027-2.gat","All"; +// stopnpctimer; +// setnpctimer 0; +// set @PRIZE, 0; +// npctalk "Oh my beloved wife, you could not be rescued! I will have to purge my mistakes again..."; +// npctalk "Please, help my beloved wife!!"; - end; +// end; -OnDead: - end; +// OnDead: +// end; -L_AllDead: - if(@PRIZE == 0) goto L_NOHERO; +// L_AllDead: +// if(@PRIZE == 0) goto L_NOHERO; - getinventorylist; - if (@inventorylist_count == 100) goto L_TooMany; - getitem "CasinoCoins", 1; +// getinventorylist; +// if (@inventorylist_count == 100) goto L_TooMany; +// getitem "CasinoCoins", 1; - mes "[Alacrius]"; - mes "Thank you very much, you saved my love!! Here you are, a prize according to the dangers you've been exposed to."; - set @PRIZE , 0; - set $@MO_REAPER,0; - close; - end; +// mes "[Alacrius]"; +// mes "Thank you very much, you saved my love!! Here you are, a prize according to the dangers you've been exposed to."; +// set @PRIZE , 0; +// set $@MO_REAPER,0; +// close; +// end; -L_TooMany: - mes "[Alacrius]"; - mes "You have no room for the reward."; - close; +// L_TooMany: +// mes "[Alacrius]"; +// mes "You have no room for the reward."; +// close; -L_NOHERO: - mes "[Alacrius]"; - mes "Sorry, but you didn't save my love... Try it again when you're ready..."; - close; - end; -OnInit: - initnpctimer; - stopnpctimer; -} +// L_NOHERO: +// mes "[Alacrius]"; +// mes "Sorry, but you didn't save my love... Try it again when you're ready..."; +// close; +// end; +// OnInit: +// initnpctimer; +// stopnpctimer; +// } diff --git a/world/map/npc/027-2/testnpcs.txt b/world/map/npc/027-2/testnpcs.txt index 57dc1f7b..69878744 100644 --- a/world/map/npc/027-2/testnpcs.txt +++ b/world/map/npc/027-2/testnpcs.txt @@ -1,145 +1,148 @@ +//contains debug scripts +//To enable: sed 's_^// __' -i npc/027-2/alacrius.txt + 027-2.gat,80,34,0 script Lovers 303,{ - mes "You see a man and a woman holding each other very tight."; - next; - mes "They are kissing and whispering things to each other you can't hear."; - next; - mes "Now the woman giggles. They don't notice you."; - next; - mes "Maybe it's better not to bother them."; - close; + mes "You see a man and a woman holding each other very tight."; + next; + mes "They are kissing and whispering things to each other you can't hear."; + next; + mes "Now the woman giggles. They don't notice you."; + next; + mes "Maybe it's better not to bother them."; + close; } -//027-2.gat,110,30,0 script Debug 305,{ - set @Graveyard_Inn_Woman_MASK, NIBBLE_0_MASK; - set @Graveyard_Inn_Woman_SHIFT, NIBBLE_0_SHIFT; - - set @woman, ((QUEST_Graveyard_Inn & @Graveyard_Inn_Woman_MASK) >> @Graveyard_Inn_Woman_SHIFT); - - set @Graveyard_Inn_Lover_MASK, NIBBLE_1_MASK; - set @Graveyard_Inn_Lover_SHIFT, NIBBLE_1_SHIFT; - - set @Lover, ((QUEST_Graveyard_Inn & @Graveyard_Inn_Lover_MASK) >> @Graveyard_Inn_Lover_SHIFT); - - set @Graveyard_Inn_Child_MASK, NIBBLE_2_MASK; - set @Graveyard_Inn_Child_SHIFT, NIBBLE_2_SHIFT; - - set @Child, ((QUEST_Graveyard_Inn & @Graveyard_Inn_Child_MASK) >> @Graveyard_Inn_Child_SHIFT); - - set @Graveyard_Inn_Husband_MASK, NIBBLE_3_MASK; - set @Graveyard_Inn_Husband_SHIFT, NIBBLE_3_SHIFT; - - set @Husband, ((QUEST_Graveyard_Inn & @Graveyard_Inn_Husband_MASK) >> @Graveyard_Inn_Husband_SHIFT); - - set @Graveyard_Inn_Golb_MASK, NIBBLE_4_MASK; - set @Graveyard_Inn_Golb_SHIFT, NIBBLE_4_SHIFT; - - set @Golb, ((QUEST_Graveyard_Inn & @Graveyard_Inn_Golb_MASK) >> @Graveyard_Inn_Golb_SHIFT); - - mes "debug for the lovetriangle quest"; - menu - "reset all",-, - "reset reid " + @woman,L_Reid, - "reset lover " + @Lover,L_Lover, - "reset child " + @Child,L_Child, - "reset husband " + @Husband,L_Husband, - "reset golbanez " + @Golb,L_Golb, - "leave", L_Close; - -set QUEST_Graveyard_Inn, 0; -close; -L_Reid: - set @woman, 0; - callsub S_Update_Mask_Woman; - close; -L_Lover: - set @Lover, 0; - callsub S_Update_Mask_Lover; - close; -L_Child: - set @Child, 0; - callsub S_Update_Mask_Child; - close; -L_Husband: - set @Husband, 0; - callsub S_Update_Mask_Husband; - close; -L_Golb: - set @Golb, 0; - callsub S_Update_Mask_Golb; - close; -L_Close: - close; - -S_Update_Mask_Golb: - set QUEST_Graveyard_Inn, - (QUEST_Graveyard_Inn & ~(@Graveyard_Inn_Golb_MASK)) - | (@Golb << @Graveyard_Inn_Golb_SHIFT); - return; - -S_Update_Mask_Husband: - set QUEST_Graveyard_Inn, - (QUEST_Graveyard_Inn & ~(@Graveyard_Inn_Husband_MASK)) - | (@Husband << @Graveyard_Inn_Husband_SHIFT); - return; - -S_Update_Mask_Child: - set QUEST_Graveyard_Inn, - (QUEST_Graveyard_Inn & ~(@Graveyard_Inn_Child_MASK)) - | (@Child << @Graveyard_Inn_Child_SHIFT); - return; - -S_Update_Mask_Lover: - set QUEST_Graveyard_Inn, - (QUEST_Graveyard_Inn & ~(@Graveyard_Inn_Lover_MASK)) - | (@Lover << @Graveyard_Inn_Lover_SHIFT); - return; - -S_Update_Mask_Woman: - set QUEST_Graveyard_Inn, - (QUEST_Graveyard_Inn & ~(@Graveyard_Inn_Woman_MASK)) - | (@woman << @Graveyard_Inn_Woman_SHIFT); - return; -} +// 027-2.gat,110,30,0 script Debug 305,{ +// set @Graveyard_Inn_Woman_MASK, NIBBLE_0_MASK; +// set @Graveyard_Inn_Woman_SHIFT, NIBBLE_0_SHIFT; + +// set @woman, ((QUEST_Graveyard_Inn & @Graveyard_Inn_Woman_MASK) >> @Graveyard_Inn_Woman_SHIFT); + +// set @Graveyard_Inn_Lover_MASK, NIBBLE_1_MASK; +// set @Graveyard_Inn_Lover_SHIFT, NIBBLE_1_SHIFT; + +// set @Lover, ((QUEST_Graveyard_Inn & @Graveyard_Inn_Lover_MASK) >> @Graveyard_Inn_Lover_SHIFT); + +// set @Graveyard_Inn_Child_MASK, NIBBLE_2_MASK; +// set @Graveyard_Inn_Child_SHIFT, NIBBLE_2_SHIFT; + +// set @Child, ((QUEST_Graveyard_Inn & @Graveyard_Inn_Child_MASK) >> @Graveyard_Inn_Child_SHIFT); + +// set @Graveyard_Inn_Husband_MASK, NIBBLE_3_MASK; +// set @Graveyard_Inn_Husband_SHIFT, NIBBLE_3_SHIFT; + +// set @Husband, ((QUEST_Graveyard_Inn & @Graveyard_Inn_Husband_MASK) >> @Graveyard_Inn_Husband_SHIFT); + +// set @Graveyard_Inn_Golb_MASK, NIBBLE_4_MASK; +// set @Graveyard_Inn_Golb_SHIFT, NIBBLE_4_SHIFT; + +// set @Golb, ((QUEST_Graveyard_Inn & @Graveyard_Inn_Golb_MASK) >> @Graveyard_Inn_Golb_SHIFT); + +// mes "debug for the lovetriangle quest"; +// menu +// "reset all",-, +// "reset reid " + @woman,L_Reid, +// "reset lover " + @Lover,L_Lover, +// "reset child " + @Child,L_Child, +// "reset husband " + @Husband,L_Husband, +// "reset golbanez " + @Golb,L_Golb, +// "leave", L_Close; + +// set QUEST_Graveyard_Inn, 0; +// close; +// L_Reid: +// set @woman, 0; +// callsub S_Update_Mask_Woman; +// close; +// L_Lover: +// set @Lover, 0; +// callsub S_Update_Mask_Lover; +// close; +// L_Child: +// set @Child, 0; +// callsub S_Update_Mask_Child; +// close; +// L_Husband: +// set @Husband, 0; +// callsub S_Update_Mask_Husband; +// close; +// L_Golb: +// set @Golb, 0; +// callsub S_Update_Mask_Golb; +// close; +// L_Close: +// close; + +// S_Update_Mask_Golb: +// set QUEST_Graveyard_Inn, +// (QUEST_Graveyard_Inn & ~(@Graveyard_Inn_Golb_MASK)) +// | (@Golb << @Graveyard_Inn_Golb_SHIFT); +// return; + +// S_Update_Mask_Husband: +// set QUEST_Graveyard_Inn, +// (QUEST_Graveyard_Inn & ~(@Graveyard_Inn_Husband_MASK)) +// | (@Husband << @Graveyard_Inn_Husband_SHIFT); +// return; + +// S_Update_Mask_Child: +// set QUEST_Graveyard_Inn, +// (QUEST_Graveyard_Inn & ~(@Graveyard_Inn_Child_MASK)) +// | (@Child << @Graveyard_Inn_Child_SHIFT); +// return; + +// S_Update_Mask_Lover: +// set QUEST_Graveyard_Inn, +// (QUEST_Graveyard_Inn & ~(@Graveyard_Inn_Lover_MASK)) +// | (@Lover << @Graveyard_Inn_Lover_SHIFT); +// return; + +// S_Update_Mask_Woman: +// set QUEST_Graveyard_Inn, +// (QUEST_Graveyard_Inn & ~(@Graveyard_Inn_Woman_MASK)) +// | (@woman << @Graveyard_Inn_Woman_SHIFT); +// return; +// } 027-2.gat,75,29,0 script Archibald 306,{ -// the broken grammar is intentional - mes "[Archibald]"; - mes "\"Me need to prepare the food. Me helping the chef cook.\""; - next; - mes "\"Person doesn't disturb me when me is making the food\""; - close; +//the broken grammar is intentional + mes "[Archibald]"; + mes "\"Me need to prepare the food. Me helping the chef cook.\""; + next; + mes "\"Person doesn't disturb me when me is making the food\""; + close; } 027-2.gat,77,40,0 script Darnel 308,{ - set @drunker, rand(4); - if (@drunker == 0) goto L_0; - if (@drunker == 1) goto L_1; - if (@drunker == 2) goto L_2; - if (@drunker == 3) goto L_3; - end; + set @drunker, rand(4); + if (@drunker == 0) goto L_0; + if (@drunker == 1) goto L_1; + if (@drunker == 2) goto L_2; + if (@drunker == 3) goto L_3; + end; L_0: - mes "[Darnel]"; - mes "\"zzzZZZzzz...\""; - close; + mes "[Darnel]"; + mes "\"zzzZZZzzz...\""; + close; L_1: - mes "[Darnel]"; - mes "\"Ish that a Zzombee?...\""; - close; + mes "[Darnel]"; + mes "\"Ish that a Zzombee?...\""; + close; L_2: - mes "[Darnel]"; - mes "\"Auuu... Hiccup... Don't byte mee... \""; - close; + mes "[Darnel]"; + mes "\"Auuu... Hiccup... Don't byte mee... \""; + close; L_3: - mes "[Darnel]"; - mes "\"Moar Bearr...Pleash!\""; - close; + mes "[Darnel]"; + mes "\"Moar Bearr...Pleash!\""; + close; } 027-2.gat,110,23,0 script Nigel 312,{ - mes "[Nigel]"; - mes "\"Ohh... My head is killing me! I have to stop " - + "drinking too much or I will lose my job... But " - + "being a waiter... oh I can't resist a drink or two!\""; - close; + mes "[Nigel]"; + mes "\"Ohh... My head is killing me! I have to stop " + + "drinking too much or I will lose my job... But " + + "being a waiter... oh I can't resist a drink or two!\""; + close; } diff --git a/world/map/npc/042-1/malik.txt b/world/map/npc/042-1/malik.txt index 80fa713c..7ebfe289 100644 --- a/world/map/npc/042-1/malik.txt +++ b/world/map/npc/042-1/malik.txt @@ -1,23 +1,23 @@ -// Uncomment this line if you want to test the script in your local server +//To enable: sed 's_^// __' -i npc/042-1/malik.txt -//042-1.gat,105,60,0 script Malik 162,{ +// 042-1.gat,105,60,0 script Malik 162,{ - menu - "Reset",-, - "Test Scorpion Fight", L_Scorp, - "close",L_Close; - set hasan, 0; - set kaan, 0; - set sorfina, 0; - set tanisha, 0; - set maggot, 0; - set FLAGS, FLAGS & ~FLAG_TUTORIAL_DONE; -L_Close: - close; +// menu +// "Reset",-, +// "Test Scorpion Fight", L_Scorp, +// "close",L_Close; +// set hasan, 0; +// set kaan, 0; +// set sorfina, 0; +// set tanisha, 0; +// set maggot, 0; +// set FLAGS, FLAGS & ~FLAG_TUTORIAL_DONE; +// L_Close: +// close; -L_Scorp: - set sorfina, 4; - set kaan, 4; - set hasan, 3; - close; -} +// L_Scorp: +// set sorfina, 4; +// set kaan, 4; +// set hasan, 3; +// close; +// } diff --git a/world/map/npc/easter/2011/bunny.txt b/world/map/npc/easter/2011/bunny.txt index e9d920ac..515ca79b 100644 --- a/world/map/npc/easter/2011/bunny.txt +++ b/world/map/npc/easter/2011/bunny.txt @@ -1,214 +1,215 @@ //Easter Quest 2011 //conceived and scripted by Tiana //Reviewed by alastrim, Jenalya, Kandiman, enchilado +//To enable: sed 's_^// __' -i npc/easter/2011/easter.txt // 008-1.gat,45,23, 0 script Easter Bunny 173,{ - set @month, 4; - set @start_day, 15; - set @end_day, 30; - - if (gettime(6) != @month) goto no_event; - if (gettime(5) < @start_day) goto no_event; - if (gettime(5) > @end_day) goto no_event; - if (gettimetick(2)-TUT_var < 2*7*86400) goto L_TooSoon; - - if (QUEST_Easter11 == 1 || QUEST_Easter11 == 2) goto L_GetBasket; - if (QUEST_Easter11 == 3) goto L_BasketCheck; - if (QUEST_Easter11 == 4 || QUEST_Easter11 == 5) goto L_GetGrass; - if (QUEST_Easter11 == 6) goto L_GrassCheck; - if (QUEST_Easter11 == 7 || QUEST_Easter11 == 8) goto L_GetJelly; - if (QUEST_Easter11 == 9) goto L_JellyCheck; - if (QUEST_Easter11 == 10 || QUEST_Easter11 == 11) goto L_GetChoco; - if (QUEST_Easter11 == 12) goto L_ChocoCheck; - if (QUEST_Easter11 == 13) goto L_GetPrizes; - if (QUEST_Easter11 == 14) goto L_Done; - if (BaseLevel < 40) goto L_TooYoung; - - mes "[Easter Bunny]"; - mes ""; - mes "\"Hi there! Would you like to help me with this year's Easter Quest?\""; - next; - - menu - "What kind of help do you need?", -, - "No way, these holiday quests suck.", L_End; - - mes "[Easter Bunny]"; - mes ""; - mes "\"I need you to help me by getting an easter basket ready for me.\""; - next; - - menu - "I should be able to help with that, what do I need to do?", -, - "That doesn't sound very exciting, no thanks.", L_End; - - mes "[Easter Bunny]"; - mes ""; - mes "\"Thank you! Here is what you need to do:\""; - mes "\"I need you to get me a basket, the grass to line it, and some stuff to put in the basket. Some people should be able to help you get those items.\""; - next; - mes "\"I cannot remember who though. Maybe you should start with the Basket. You should look for someone with good handicraft abilities, someone who knows how to work with reeds... Do you have any idea who could do this? \""; - next; - - menu - "Ok, I'll ask around and see what I can find.", -, - "You can't give me more help than that? Then go do it yourself.", L_End; - - set QUEST_Easter11, 1; - close; - -L_GetBasket: - mes "[Easter Bunny]"; - mes ""; - mes "\"I see that you haven't found anyone who can make the basket yet... hmm... a reed basket... Who could make such an item?\""; - set @tip, rand(10); - if (@tip != 9) close; - next; - mes "[Easter Bunny]"; - mes ""; - mes "\"Hey... I just remembered. I heard there is an indian fellow living in the mountains who comes from a tribe that is famous for its beautiful craftwork. Maybe he can make the basket...\""; - close; - -L_BasketCheck: - if(countitem("EasterBasket") < 1) goto L_BasketNoitem; - delitem "EasterBasket", 1; - set QUEST_Easter11, 4; - mes "[Easter Bunny]"; - mes ""; - mes "\"Very good. This basket is perfect. Now I need some grass to line it. But please, do not pull it from the ground, because it makes the basket really ugly and dirty. I am sure there must be someone who can help you grow a nice, clean patch of grass.\""; - close; - -L_BasketNoitem: - mes "[Easter Bunny]"; - mes ""; - mes "\"I heard you talked to that indian in the mountains. That was very smart! But you do not have the basket... That is too bad.\""; - close; - -L_GetGrass: - mes "[Easter Bunny]"; - mes ""; - mes "\"I see you didn't find the [Grass Liner]... If only I could help you find someone who can do this...\""; - set @tip, rand(10); - if (@tip != 9) close; - next; - mes "[Easter Bunny]"; - mes ""; - mes "\"Wait... ohh... Now I remember. Last year there was a woman who helped me with a perfect and clean [Grass Liner] for my easter basket. She used to live near the magic school in Tulimshar. Maybe she is still there.\""; - close; - -L_GrassCheck: - if(countitem("GrassLiner") < 1) goto L_GrassNoitem; - delitem "GrassLiner", 1; - set QUEST_Easter11, 7; - mes "[Easter Bunny]"; - mes ""; - mes "\"Perfect. This basket is going to be beautiful. Now I need some stuff to put in the basket. I think we should start with some [Jelly Beans]. But I have no idea where you can find any. I looked in all of Hurnscald's shops and no one sells them! Maybe you will need to find someone who can cook them.\""; - close; - -L_GrassNoitem: - mes "[Easter Bunny]"; - mes ""; - mes "\"You talked to Eomie, the woman who maintains that little spot of grass in the desert. You are really smart! But what happened? I was expecting that you would come back with the [Grass Liner]...\""; - close; - -L_GetJelly: - mes "[Easter Bunny]"; - mes ""; - mes "\"Hi... Sorry to cause you so much trouble. This candy is so hard to find... One time I tried to make some myself and it was really bad... I'm sure there must be a secret ingredient I didn't know.\""; - set @tip, rand(10); - if (@tip != 9) close; - next; - mes "[Easter Bunny]"; - mes ""; - mes "\"Hey, maybe you can ask a skilled chef to make some [Jelly Beans] for you.\""; - close; - -L_JellyCheck: - if(countitem("JellyBeans") < 1) goto L_JellyNoitem; - delitem "JellyBeans", 1; - set QUEST_Easter11, 10; - mes "[Easter Bunny]"; - mes ""; - mes "\"Ohh. You got a lot of [Jelly Beans]! This is way better than I expected. Now I there is only one more thing that we need... Chocolate! But not the usual [Chocolate Bar]. I need the chocolate shaped in the form of a mouboo. Sadly, I also have no idea how to get it. I am sure that a brilliant person like you can find a way to get it... \""; - close; - -L_JellyNoitem: - mes "[Easter Bunny]"; - mes ""; - mes "\"I see you talked with the Chef at Dimond's Cove but you came back with no [Jelly Beans]... What happened?\""; - close; - -L_GetChoco: - mes "[Easter Bunny]"; - mes ""; - mes "\"Hello. I was thinking... Maybe someone could melt down some [Chocolate Bar]s and pour it into a mouboo shaped mold...\""; - set @tip, rand(10); - if (@tip != 9) close; - next; - mes "[Easter Bunny]"; - mes ""; - mes "\"Hmm... A bakery! I am sure there must be someone in a bakery that can do this.\""; - close; - -L_ChocoCheck: - if(countitem("ChocolateMouboo") < 1) goto L_ChocoNoitem; - delitem "ChocolateMouboo", 1; - set QUEST_Easter11, 13; - -L_GetPrizes: - mes "[Easter Bunny]"; - mes ""; - mes "\"Great, now the basket is perfect!\""; - mes "\"I really appreciate your help. With everyone helping I was able to have enough time to do some crafts.\""; - mes "\"Here, accept this simple gift as a thank you!\""; - getinventorylist; - if (@inventorylist_count == 100) goto L_EasterTooMany; - setarray @reward$, "BunnyEars", "TopHat", "MushHat", "ShroomHat", "FunkyHat"; - getitem @reward$[rand(getarraysize(@reward$))], 1; - set QUEST_Easter11, 14; - close; - -L_ChocoNoitem: - mes "[Easter Bunny]"; - mes ""; - mes "\"Some people told me you were in a bakery in Tulimshar... I was hoping you would come back with the [Chocolate Mouboo].\""; - close; - -L_TooYoung: - mes "[Easter Bunny]"; - mes ""; - mes "\"Hello there young one!\""; - mes "\"Gain some more strength and I have a quest for you.\""; - close; - -L_TooSoon: - mes "[Easter Bunny]"; - mes ""; - mes "\"Hello there!\""; - mes "\"I need some help with Easter this year,\""; - mes "\"however you are not experienced enough in this world to properly assist yet.\""; - mes "\"Thank you for your interest though!\""; - close; - -L_EasterTooMany: - mes "[Riskim]"; - mes ""; - mes "\"You don't have enough room for my gift. Come back later.\""; - close; - -L_Done: - mes "[Easter Bunny]"; - mes ""; - mes "\"Thank you for getting that basket together for me!\""; - close; - -no_event: - mes "[Easter Bunny]"; - mes ""; - mes "\"Easter is the greatest holiday ever!!!\""; - set QUEST_Easter11, 0; - close; - -L_End: - close; -} +// set @month, 4; +// set @start_day, 15; +// set @end_day, 30; + +// if (gettime(6) != @month) goto no_event; +// if (gettime(5) < @start_day) goto no_event; +// if (gettime(5) > @end_day) goto no_event; +// if (gettimetick(2)-TUT_var < 2*7*86400) goto L_TooSoon; + +// if (QUEST_Easter11 == 1 || QUEST_Easter11 == 2) goto L_GetBasket; +// if (QUEST_Easter11 == 3) goto L_BasketCheck; +// if (QUEST_Easter11 == 4 || QUEST_Easter11 == 5) goto L_GetGrass; +// if (QUEST_Easter11 == 6) goto L_GrassCheck; +// if (QUEST_Easter11 == 7 || QUEST_Easter11 == 8) goto L_GetJelly; +// if (QUEST_Easter11 == 9) goto L_JellyCheck; +// if (QUEST_Easter11 == 10 || QUEST_Easter11 == 11) goto L_GetChoco; +// if (QUEST_Easter11 == 12) goto L_ChocoCheck; +// if (QUEST_Easter11 == 13) goto L_GetPrizes; +// if (QUEST_Easter11 == 14) goto L_Done; +// if (BaseLevel < 40) goto L_TooYoung; + +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"Hi there! Would you like to help me with this year's Easter Quest?\""; +// next; + +// menu +// "What kind of help do you need?", -, +// "No way, these holiday quests suck.", L_End; + +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"I need you to help me by getting an easter basket ready for me.\""; +// next; + +// menu +// "I should be able to help with that, what do I need to do?", -, +// "That doesn't sound very exciting, no thanks.", L_End; + +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"Thank you! Here is what you need to do:\""; +// mes "\"I need you to get me a basket, the grass to line it, and some stuff to put in the basket. Some people should be able to help you get those items.\""; +// next; +// mes "\"I cannot remember who though. Maybe you should start with the Basket. You should look for someone with good handicraft abilities, someone who knows how to work with reeds... Do you have any idea who could do this? \""; +// next; + +// menu +// "Ok, I'll ask around and see what I can find.", -, +// "You can't give me more help than that? Then go do it yourself.", L_End; + +// set QUEST_Easter11, 1; +// close; + +// L_GetBasket: +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"I see that you haven't found anyone who can make the basket yet... hmm... a reed basket... Who could make such an item?\""; +// set @tip, rand(10); +// if (@tip != 9) close; +// next; +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"Hey... I just remembered. I heard there is an indian fellow living in the mountains who comes from a tribe that is famous for its beautiful craftwork. Maybe he can make the basket...\""; +// close; + +// L_BasketCheck: +// if(countitem("EasterBasket") < 1) goto L_BasketNoitem; +// delitem "EasterBasket", 1; +// set QUEST_Easter11, 4; +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"Very good. This basket is perfect. Now I need some grass to line it. But please, do not pull it from the ground, because it makes the basket really ugly and dirty. I am sure there must be someone who can help you grow a nice, clean patch of grass.\""; +// close; + +// L_BasketNoitem: +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"I heard you talked to that indian in the mountains. That was very smart! But you do not have the basket... That is too bad.\""; +// close; + +// L_GetGrass: +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"I see you didn't find the [Grass Liner]... If only I could help you find someone who can do this...\""; +// set @tip, rand(10); +// if (@tip != 9) close; +// next; +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"Wait... ohh... Now I remember. Last year there was a woman who helped me with a perfect and clean [Grass Liner] for my easter basket. She used to live near the magic school in Tulimshar. Maybe she is still there.\""; +// close; + +// L_GrassCheck: +// if(countitem("GrassLiner") < 1) goto L_GrassNoitem; +// delitem "GrassLiner", 1; +// set QUEST_Easter11, 7; +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"Perfect. This basket is going to be beautiful. Now I need some stuff to put in the basket. I think we should start with some [Jelly Beans]. But I have no idea where you can find any. I looked in all of Hurnscald's shops and no one sells them! Maybe you will need to find someone who can cook them.\""; +// close; + +// L_GrassNoitem: +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"You talked to Eomie, the woman who maintains that little spot of grass in the desert. You are really smart! But what happened? I was expecting that you would come back with the [Grass Liner]...\""; +// close; + +// L_GetJelly: +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"Hi... Sorry to cause you so much trouble. This candy is so hard to find... One time I tried to make some myself and it was really bad... I'm sure there must be a secret ingredient I didn't know.\""; +// set @tip, rand(10); +// if (@tip != 9) close; +// next; +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"Hey, maybe you can ask a skilled chef to make some [Jelly Beans] for you.\""; +// close; + +// L_JellyCheck: +// if(countitem("JellyBeans") < 1) goto L_JellyNoitem; +// delitem "JellyBeans", 1; +// set QUEST_Easter11, 10; +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"Ohh. You got a lot of [Jelly Beans]! This is way better than I expected. Now I there is only one more thing that we need... Chocolate! But not the usual [Chocolate Bar]. I need the chocolate shaped in the form of a mouboo. Sadly, I also have no idea how to get it. I am sure that a brilliant person like you can find a way to get it... \""; +// close; + +// L_JellyNoitem: +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"I see you talked with the Chef at Dimond's Cove but you came back with no [Jelly Beans]... What happened?\""; +// close; + +// L_GetChoco: +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"Hello. I was thinking... Maybe someone could melt down some [Chocolate Bar]s and pour it into a mouboo shaped mold...\""; +// set @tip, rand(10); +// if (@tip != 9) close; +// next; +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"Hmm... A bakery! I am sure there must be someone in a bakery that can do this.\""; +// close; + +// L_ChocoCheck: +// if(countitem("ChocolateMouboo") < 1) goto L_ChocoNoitem; +// delitem "ChocolateMouboo", 1; +// set QUEST_Easter11, 13; + +// L_GetPrizes: +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"Great, now the basket is perfect!\""; +// mes "\"I really appreciate your help. With everyone helping I was able to have enough time to do some crafts.\""; +// mes "\"Here, accept this simple gift as a thank you!\""; +// getinventorylist; +// if (@inventorylist_count == 100) goto L_EasterTooMany; +// setarray @reward$, "BunnyEars", "TopHat", "MushHat", "ShroomHat", "FunkyHat"; +// getitem @reward$[rand(getarraysize(@reward$))], 1; +// set QUEST_Easter11, 14; +// close; + +// L_ChocoNoitem: +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"Some people told me you were in a bakery in Tulimshar... I was hoping you would come back with the [Chocolate Mouboo].\""; +// close; + +// L_TooYoung: +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"Hello there young one!\""; +// mes "\"Gain some more strength and I have a quest for you.\""; +// close; + +// L_TooSoon: +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"Hello there!\""; +// mes "\"I need some help with Easter this year,\""; +// mes "\"however you are not experienced enough in this world to properly assist yet.\""; +// mes "\"Thank you for your interest though!\""; +// close; + +// L_EasterTooMany: +// mes "[Riskim]"; +// mes ""; +// mes "\"You don't have enough room for my gift. Come back later.\""; +// close; + +// L_Done: +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"Thank you for getting that basket together for me!\""; +// close; + +// no_event: +// mes "[Easter Bunny]"; +// mes ""; +// mes "\"Easter is the greatest holiday ever!!!\""; +// set QUEST_Easter11, 0; +// close; + +// L_End: +// close; +// } |