diff options
27 files changed, 1053 insertions, 133 deletions
diff --git a/world/map/db/generic_item_db.txt b/world/map/db/generic_item_db.txt index 5b17fa3e..0b3732dc 100644 --- a/world/map/db/generic_item_db.txt +++ b/world/map/db/generic_item_db.txt @@ -190,10 +190,6 @@ 3002, RealisticBrain, Realistic Brain, 3, 200, 100, 50, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, {}, {} 3003, JarofBlood, Jar of Blood, 3, 200, 100, 375, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, {}, {} 3004, Tongue, Tongue, 3, 5, 1, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, {}, {} -3006, TonoriDelight, Tonori Delight, 3, 5, 1, 2, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, {}, {} -3007, Marshmallow, Marshmallow, 3, 5, 1, 2, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, {}, {} -3009, JellySkull, Jelly Skull, 3, 5, 1, 2, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, {}, {} -3010, CandyPumpkin, Candy Pumpkin, 3, 5, 1, 2, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, {}, {} 3011, PumpkinSeeds, Pumpkin Seeds, 3, 5, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, {}, {} 4000, AngryScorpionStinger, Angry Scorpion Stinger, 3, 50, 25, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, {}, {} 4001, Coal, Coal, 3, 250, 100, 20, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, {}, {} diff --git a/world/map/db/use_item_db.txt b/world/map/db/use_item_db.txt index fa8283d9..7f7ad2c6 100644 --- a/world/map/db/use_item_db.txt +++ b/world/map/db/use_item_db.txt @@ -85,6 +85,10 @@ 1258, Honey, Honey, 0, 100, 80, 20, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, {itemheal 45, 0;}, {} 1280, Scissors, Scissors, 0, 1000, 500, 120, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, {callfunc "useScissors";}, {} 1281, ShockSweet, Shock Sweet, 0, 1000, 500, 5, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, {callfunc "useShockSweet";}, {} +3006, TonoriDelight, Tonori Delight, 0, 5, 1, 2, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, {itemheal 10, 0;}, {} +3007, Marshmallow, Marshmallow, 0, 5, 1, 2, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, {itemheal 10, 0;}, {} +3009, JellySkull, Jelly Skull, 0, 5, 1, 2, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, {itemheal 10, 0;}, {} +3010, CandyPumpkin, Candy Pumpkin, 0, 5, 1, 2, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, {itemheal 10, 0;}, {} 4035, PickledBeets, Pickled Beets, 0, 100, 50, 150, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, {itemheal 50, 0; setlook LOOK_HAIR_COLOR, HC_PURPLE;}, {} 4036, RoastedAcorn, Roasted Acorn, 0, 100, 50, 1, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, {itemheal 15, 0;}, {} 5126, MTJarofOwnBlood, MTJar of Own Blood, 0, 200, 100, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, {itemheal -250, 0;getitem 5127, 1;}, {} diff --git a/world/map/npc/001-1/vincent.txt b/world/map/npc/001-1/vincent.txt index 46d67e48..7f46ac44 100644 --- a/world/map/npc/001-1/vincent.txt +++ b/world/map/npc/001-1/vincent.txt @@ -4,6 +4,8 @@ { // This NPC previously used the variable TMW_Quest callfunc "ClearVarTMW_Quest"; + set @halloween_npc_id, $@halloween_npc_vincent; + callfunc "TrickOrTreat"; set @state, ((QUEST_SouthTulimshar & NIBBLE_2_MASK) >> NIBBLE_2_SHIFT); diff --git a/world/map/npc/006-1/pachua.txt b/world/map/npc/006-1/pachua.txt index d2f193dd..b97b0c96 100644 --- a/world/map/npc/006-1/pachua.txt +++ b/world/map/npc/006-1/pachua.txt @@ -5,6 +5,9 @@ if (@npc_check) goto L_Close; + set @halloween_npc_id, $@halloween_npc_pachua; + callfunc "TrickOrTreat"; + set @LEATHER_PATCH_PRICE, 300; set @wants_leather_patch, QUEST_Forestbow_state & NIBBLE_4_MASK; diff --git a/world/map/npc/008-1/george.txt b/world/map/npc/008-1/george.txt index 92215420..df89f52c 100644 --- a/world/map/npc/008-1/george.txt +++ b/world/map/npc/008-1/george.txt @@ -2,6 +2,9 @@ 008-1.gat,136,36,0|script|George#pirate|138, { + set @halloween_npc_id, $@halloween_npc_george; + callfunc "TrickOrTreat"; + if (getequipid(equip_head) == 617) goto L_Pirate; if (getequipid(equip_head) == 622) goto L_Bandana; if (getequipid(equip_head) == 621) goto L_EyePatch; diff --git a/world/map/npc/009-2/kfahr.txt b/world/map/npc/009-2/kfahr.txt index 400e1cb3..9c772452 100644 --- a/world/map/npc/009-2/kfahr.txt +++ b/world/map/npc/009-2/kfahr.txt @@ -15,6 +15,9 @@ 009-2.gat,67,57,0|script|Kfahr|125, { + set @halloween_npc_id, $@halloween_npc_kfahr; + callfunc "TrickOrTreat"; + set @QS_NEWBIE, 0; set @QS_MET_KFAHR, 1; set @QS_KNOWS_KFAHR, 2; diff --git a/world/map/npc/009-2/nurse.txt b/world/map/npc/009-2/nurse.txt index 63ae6a67..44605134 100644 --- a/world/map/npc/009-2/nurse.txt +++ b/world/map/npc/009-2/nurse.txt @@ -25,6 +25,8 @@ 009-2.gat,147,65,0|script|Nurse|119, { callfunc "ClearVariables"; + set @halloween_npc_id, $@halloween_npc_nurse; + callfunc "TrickOrTreat"; set @SNAKET_AMOUNT, 5; set @BSCORPIONST_AMOUNT, 10; diff --git a/world/map/npc/010-2/workers.txt b/world/map/npc/010-2/workers.txt index 2f7da8aa..17109491 100644 --- a/world/map/npc/010-2/workers.txt +++ b/world/map/npc/010-2/workers.txt @@ -9,6 +9,9 @@ 010-2.gat,39,75,0|script|Zack|155, { + set @halloween_npc_id, $@halloween_npc_zack; + callfunc "TrickOrTreat"; + mes "[Zack]"; mes "\"My brother and I are fixing the cellar pass.\""; close; diff --git a/world/map/npc/021-1/eurni.txt b/world/map/npc/021-1/eurni.txt index 8f9e1b5d..ca514740 100644 --- a/world/map/npc/021-1/eurni.txt +++ b/world/map/npc/021-1/eurni.txt @@ -2,6 +2,9 @@ 021-1.gat,141,113,0|script|Eurni|136, { + set @halloween_npc_id, $@halloween_npc_eurni; + callfunc "TrickOrTreat"; + if (BaseLevel < 10) goto L_TooYoung; if (Zeny < 10000) goto L_NoMoney; diff --git a/world/map/npc/021-1/inac.txt b/world/map/npc/021-1/inac.txt index 75cd0451..5903e34b 100644 --- a/world/map/npc/021-1/inac.txt +++ b/world/map/npc/021-1/inac.txt @@ -2,6 +2,9 @@ 021-1.gat,53,103,0|script|Inac|156, { + set @halloween_npc_id, $@halloween_npc_inac; + callfunc "TrickOrTreat"; + mes "[Inac]"; mes "\"This cities water system is amazing. It was built centuries ago after the cataclysm that turned Tonori into this desert.\""; next; diff --git a/world/map/npc/021-1/weellos.txt b/world/map/npc/021-1/weellos.txt index 3e6236ea..60fba330 100644 --- a/world/map/npc/021-1/weellos.txt +++ b/world/map/npc/021-1/weellos.txt @@ -3,6 +3,9 @@ 021-1.gat,130,125,0|script|Weellos|103, { + set @halloween_npc_id, $@halloween_npc_weelos; + callfunc "TrickOrTreat"; + set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@knowWeellosNT; set @kylian, ((QUEST_NorthTulimshar & NIBBLE_5_MASK) >> NIBBLE_5_SHIFT); diff --git a/world/map/npc/021-2/government_building.txt b/world/map/npc/021-2/government_building.txt index abf01ccb..89abee80 100644 --- a/world/map/npc/021-2/government_building.txt +++ b/world/map/npc/021-2/government_building.txt @@ -141,6 +141,9 @@ S_give_rings: mes "\"Hello what Can I do for you?\""; next; + set @halloween_npc_id, $@halloween_npc_tathin; + callfunc "TrickOrTreat"; + if (getskilllv(SKILL_PARTY) == 2 ) goto L_Base_Menu; if (BaseLevel >= 15 diff --git a/world/map/npc/026-1/_import.txt b/world/map/npc/026-1/_import.txt index f618ee0a..7f84af41 100644 --- a/world/map/npc/026-1/_import.txt +++ b/world/map/npc/026-1/_import.txt @@ -4,5 +4,4 @@ map: 026-1.gat npc: npc/026-1/_mobs.txt npc: npc/026-1/_warps.txt npc: npc/026-1/mapflags.txt -npc: npc/026-1/munro.txt npc: npc/026-1/sign.txt diff --git a/world/map/npc/026-1/munro.txt b/world/map/npc/026-1/munro.txt deleted file mode 100644 index 02fdccb6..00000000 --- a/world/map/npc/026-1/munro.txt +++ /dev/null @@ -1,93 +0,0 @@ -026-1.gat,24,37,0|script|Munro|183, -{ - mes "[Munro]"; - mes "\"Whoh dude...\""; - next; - mes "[Munro]"; - mes "\"Man.. I don't know how I got here.. freaky..\""; - next; - mes "[Munro]"; - mes "\"Hey dude, what's that on your face? It's creeping me out!\""; - menu - "There is nothing on my face..", L_Nothing, - "What, This skin?",L_ThisSkin; - -L_ThisSkin: - mes "[Munro]"; - mes "\"Skin? Whoh far-out man.. This must be that weirdo place my brother Parua told me about..\""; - next; - mes "Munro stares at you vacantly for a moment"; - next; - mes "Munro's eye-holes suddenly seem more aware"; - next; - mes "[Munro]"; - mes "\"WHOH! SKIN? d.....dude! How can you stand having that stuff all over you? That's gotta suck!\""; - next; - mes "[Munro]"; - mes "\"Here dude.. Take this. It won't get rid of that groady skin but it'll at least make you LOOK normal..\""; - getitem "SkeletonCharm",1; - next; - mes "[Munro]"; - mes "\"I have a lot of these man.. a LOT. Take all you want man.. Just remember they only work when I'm around to power them. Freaky-deaky skull power you know?\""; - goto L_Exit; - -L_Nothing: - mes "[Munro]"; - mes "\"Oh.. ok dude! Whatever you say!\""; - goto L_Exit; - -L_Exit: - close; -} - -026-1.gat,25,37,0|script|#AnnualHalloween|-1, -{ - end; - -OnInit: - if (debug >= 2) end; - initnpctimer; - end; - -OnTimer1000: - set $@isHalloween, 0; - if ((gettime(6) == 10 && gettime(5) >= 27) || (gettime(6) == 11 && gettime(5) <= 5)) - set $@isHalloween, 1; - - if (gettime(6) == 12 && gettime(5) >= 23 && gettime(5) <= 26) - set $@isHalloween, 1; - - if ($@isHalloween) - goto L_enablemunro; - - goto L_disablemunro; - - -L_enablemunro: - enablenpc "Munro"; - goto L_End; - -L_disablemunro: - disablenpc "Munro"; - goto L_End; - -L_End: - setnpctimer 0; - end; -} - - -function|script|CheckMunro|, -{ - if ((gettime(6) == 10 && gettime(5) >= 27) || (gettime(6) == 11 && gettime(5) <= 5)) - goto L_Return; - - if (gettime(6) == 12 && gettime(5) >= 23 && gettime(5) <= 26) - goto L_Return; - - callfunc "UnequipLater"; - goto L_Return; - -L_Return: - return; -} diff --git a/world/map/npc/027-2/caretaker.txt b/world/map/npc/027-2/caretaker.txt index 593a91a8..c10db6fe 100644 --- a/world/map/npc/027-2/caretaker.txt +++ b/world/map/npc/027-2/caretaker.txt @@ -4,6 +4,9 @@ 027-2.gat,24,25,0|script|Caretaker|159, { + set @halloween_npc_id, $@halloween_npc_caretaker; + callfunc "TrickOrTreat"; + if (QUEST_Graveyard_Caretaker == 1) goto L_Return_Dialog; if (QUEST_Graveyard_Caretaker == 2) goto L_Has_Letter; if (QUEST_Graveyard_Caretaker == 3) goto L_Delivered_Letter; diff --git a/world/map/npc/030-2/storage_helper.txt b/world/map/npc/030-2/storage_helper.txt index ff6fa242..092d9a7d 100644 --- a/world/map/npc/030-2/storage_helper.txt +++ b/world/map/npc/030-2/storage_helper.txt @@ -3,6 +3,8 @@ 030-2.gat,25,35,0|script|Vellamo|328, { + set @halloween_npc_id, $@halloween_npc_vellamo; + callfunc "TrickOrTreat"; callfunc "XmasStates"; if($@xmas_time) diff --git a/world/map/npc/033-1/kimarr.txt b/world/map/npc/033-1/kimarr.txt index 26993614..a5a066bd 100644 --- a/world/map/npc/033-1/kimarr.txt +++ b/world/map/npc/033-1/kimarr.txt @@ -34,6 +34,9 @@ 033-1.gat,74,32,0|script|Kimarr|218, { + set @halloween_npc_id, $@halloween_npc_kimarr; + callfunc "TrickOrTreat"; + if ($@Fluffy_FighterID == getcharid(3)) goto L_Attention; diff --git a/world/map/npc/048-2/sageNikolai.txt b/world/map/npc/048-2/sageNikolai.txt index 9ce3e719..5aa1b659 100644 --- a/world/map/npc/048-2/sageNikolai.txt +++ b/world/map/npc/048-2/sageNikolai.txt @@ -5,6 +5,9 @@ 048-2.gat,98,106,0|script|Nikolai|362, { + set @halloween_npc_id, $@halloween_npc_nikolai; + callfunc "TrickOrTreat"; + set @investigate, ((QUEST_BlueSage & $@Q_BlueSageInvestigate_MASK) >> $@Q_BlueSageInvestigate_SHIFT); set @bookpages, ((QUEST_BlueSage & $@Q_BlueSageBookPages_MASK) >> $@Q_BlueSageBookPages_SHIFT); set @slimes, ((QUEST_BlueSage & $@Q_BlueSageSlimes_MASK) >> $@Q_BlueSageSlimes_SHIFT); diff --git a/world/map/npc/annuals/fathertime.txt b/world/map/npc/annuals/fathertime.txt index 40af55ff..4d3cdf68 100644 --- a/world/map/npc/annuals/fathertime.txt +++ b/world/map/npc/annuals/fathertime.txt @@ -1,6 +1,5 @@ // Annual Timer // One timer to check to enable all holiday events - 017-9.gat,26,28,0|script|#HolidayConfig|-1, { end; @@ -16,6 +15,27 @@ L_StartTimer: OnTimer20000: setnpctimer 0; cmdothernpc "#XmasConfig", "RestartQuest"; + cmdothernpc "#HalloweenConfig", "RestartQuest"; initnpctimer; end; } +017-9.gat,31,24,0|script|HolidayDebug#1|105, +{ + if(getgmlevel() < 40) + goto L_End; + + menu + "Xmas.", L_XmasDebug, + "Halloween.", L_HalloweenDebug; + +L_XmasDebug: + callfunc "XmasDebug"; + goto L_End; + +L_HalloweenDebug: + callfunc "HalloweenDebug"; + goto L_End; + +L_End: + end; +} diff --git a/world/map/npc/annuals/halloween/config.txt b/world/map/npc/annuals/halloween/config.txt new file mode 100644 index 00000000..d3d0f616 --- /dev/null +++ b/world/map/npc/annuals/halloween/config.txt @@ -0,0 +1,372 @@ +// Halloween Annual +// Authors: alastrim, enchilado, o11c, wushin +// This file initializes global constants, which includes dialog. + +// Event Configuration: +// Generic stuff +// $@halloween_start_day = the first day in October the quest can be done +// $@halloween_year = the year this quest is activated, for event necromancers +// $@halloween_memory_count = Number of masks each NPC remembers +// $@halloween_min_level = Minimum level to go trick-or-treating + +// Global stuff +// $@halloween_big_reward = The main reward randomly given, usually after the counter has reached 7-10 +// $@halloween_sweets = Array with all the sweets to be given as treats +// $@halloween_sweets_num = Size of that array +// $@halloween_mask_IDs = Array with the IDs of all the masks that cover your face + The Scary Axehat +// $@halloween_scare_factors = Array with the basic scare factor of each mask +// 678 Noh Mask 2 +// 679 Demon Mask 4 +// 1221 Skull Mask 4 +// 634 Face Mask 4 +// 615 Pumpkin Helmet 2 +// 639 Crusade Helmet 3 +// 769 Guy Fawkes Mask 2 +// 801 Pinkie Helmet 2 +// 1218 Paper Bag 1 +// 1276 Opera Mask 3 +// 1277 Jester Mask 2 +// 1279 Goblin Mask 4 +// 4027 Yeti Mask 4 +// 616 Axe Hat 4 + +// Per-NPC stuff +// $@halloween_npc_<name> = constants for @halloween_npc_id, the index into the array +// $@halloween_npc_names$ = Array with all NPC names inside brackets, to be used in the function +// $@halloween_greetings$ = Array with all the NPC initial greetings when you "trick or treat" them +// $@halloween_trick_notscary$ = Array with the less scary menu options +// $@halloween_react_notscary$ = Array with all the reactions to the less scary menu options +// $@halloween_trick_scary$ = Array with scary menu options +// $@halloween_react_scary$ = Array with all the reactions to the scary menu options +// $@halloween_trick_veryscary$ = Array with the most scary menu options +// $@halloween_react_veryscary$ = Array with all the reactions to the very scary menu options + +// In the appropriate NPCs, do something like: +//+ if ($@halloween_time) +//+ goto L_Halloween; +//+ goto L_Main; +//+ +//+L_Halloween: +//+ set @halloween_npc_id, $@halloween_npc_eurni; +//+ callfunc "TrickOrTreat"; +//+ goto L_Main; +//+ +//+L_Main: + +// Variables: +// $@halloween_maskmemory = Sliced Array containing the record of the last masks used to trick or treat each NPC. +// @halloween_npc_id = NPC id, this variable is set when calling this function by an NPC +// HALLOWEENTIME = Permanent variable used to control your progress in the quest. +// The high bits are used to keep track of the NPCs you already tricked while showing your face. +// The low bits are used to keep track of how many times you've gotten treats. +// Currently, the vague plan is 16 for each, but we may need to use this variable for the second part of the quest. +// HALLOWEENYEAR = Keys the player to the year so the annual can be redone. + +// !!! IMPORTANT NOTE: a maximum of 14 NPCs can be used for this quest !!! +// HALLOWEENTIME +// Byte 0 + 1: Karma (65535) +// BIT 16: Big Reward +// BIT 17: Charm Reward +// BIT 18: NPC #13 +// BIT 19: NPC #12 +// BIT 20: NPC #11 +// BIT 21: NPC #10 +// BIT 22: NPC #9 +// BIT 23: NPC #8 +// BIT 24: NPC #7 +// BIT 25: NPC #6 +// BIT 26: NPC #5 +// BIT 27: NPC #4 +// BIT 28: NPC #3 +// BIT 29: NPC #2 +// BIT 30: NPC #1 +// BIT 31: NPC #0 + +-|script|#HalloweenConfig|-1, +{ + end; + +OnCommandRestartQuest: + goto L_Main; + +OnInit: + goto L_Main; + +L_Main: + // Halloween Key Identifier Set through Botcheck Debug + if(!($HALLOWEEN_TIME_KEY) || (getarraysize($HALLOWEEN_TIME_KEY) != 6)) + setarray $HALLOWEEN_TIME_KEY, 10,10,11,24,2,gettime(7); + if(($HALLOWEEN_TIME_KEY[0] == 0) || ($HALLOWEEN_TIME_KEY[0] > 12)) + goto L_HalloweenError; + if(($HALLOWEEN_TIME_KEY[1] == 0) || ($HALLOWEEN_TIME_KEY[1] > 12)) + goto L_HalloweenError; + if(($HALLOWEEN_TIME_KEY[2] == 0) || ($HALLOWEEN_TIME_KEY[2] > 12)) + goto L_HalloweenError; + if(($HALLOWEEN_TIME_KEY[3] == 0) || ($HALLOWEEN_TIME_KEY[3] > 31)) + goto L_HalloweenError; + if(($HALLOWEEN_TIME_KEY[4] == 0) || ($HALLOWEEN_TIME_KEY[4] > 31)) + goto L_HalloweenError; + if($HALLOWEEN_TIME_KEY[5] == 0) + goto L_HalloweenError; + + // Event Runs until Reward Period. + // Month Start/End + set $@halloween_start_month, $HALLOWEEN_TIME_KEY[0]; + set $@halloween_reward_start_month, $HALLOWEEN_TIME_KEY[1]; + set $@halloween_end_month, $HALLOWEEN_TIME_KEY[2]; + + // Reward Day Start/End + set $@halloween_reward_start_day, $HALLOWEEN_TIME_KEY[3]; + set $@halloween_reward_end_day, $HALLOWEEN_TIME_KEY[4]; + + // Time Settings + set $@halloween_no_event_time, 0; + set $@halloween_event_time, 1; + set $@halloween_reward_time, 2; + + // How many, maximum is 8 + set $@halloween_memory_count, 5; + // Level to go trick-or-treating + set $@halloween_min_level, 10; + // Age to go trick-or-treating + set $@halloween_min_age, (7*86400); + + // Number of trick and treats completed to get charm. + set $@halloween_charm_count, 10; + set $@halloween_got_charm_reward, (1 << 17); + setarray $@halloween_big_reward, 905, 1175; + set $@halloween_got_big_reward, (1 << 16); + setarray $@halloween_sweets, + 534, // OrangeCupcake + 737, // ChocolateCake + 510, // Candy + 513, // Cake + 509, // ChocolateBar + 519, // CherryCake + 736, // WhiteCake + 738, // OrangeCake + 739, // AppleCake + 3006, // TonoriDelight + 3007, // Marshmallow + 3009, // JellySkull + 3010, // CandyPumpkin + 838, // CranberryLollipop + 839, // GrapeLollipop + 840; // OrangeLollipop + set $@halloween_sweets_num, getarraysize($@halloween_sweets); + + setarray $@halloween_mask_IDs, 678, 679, 1221, 634, 615, 639, 769, 801, 1218, 1276, 1277, 1279, 4027, 616; + setarray $@halloween_scare_factors, 2, 4, 4, 4, 2, 3, 2, 2, 1, 3, 2, 4, 4, 4; + + if (getarraysize($@halloween_mask_IDs) != getarraysize($@halloween_scare_factors)) + goto L_HalloweenError; + // temporary counter + set $@n, 0; + + set $@halloween_npc_caretaker, $@n; + set $@halloween_npc_names$[$@n], "[Caretaker]"; + set $@halloween_greetings$[$@n], "\"Alright, come on then. Show me your trick.\""; + set $@halloween_trick_notscary$[$@n], "Trick? You must have misheard me. I've come because the Government needs to build a road through your house."; + set $@halloween_react_notscary$[$@n], "\"And?\""; + set $@halloween_trick_scary$[$@n], "You look pretty deceased to me, old man. Undead must die! Yaah!"; + set $@halloween_react_scary$[$@n], "\"Now listen here, I'm as alive as you - oh. Say, that was a good trick!\""; + set $@halloween_trick_veryscary$[$@n], "Your wife... she's - she's - she's DEAD!"; + set $@halloween_react_veryscary$[$@n], "\"But... I live here! My wife l... is dead here. You can't - oh. I DIDN'T mishear you. You really had me fooled!\""; + + set $@n, $@n + 1; + + set $@halloween_npc_eurni, $@n; + set $@halloween_npc_names$[$@n], "[Eurni the Surgeon]"; + set $@halloween_greetings$[$@n], "\"Oh, right.\""; + set $@halloween_trick_notscary$[$@n], "I paid good money for your services, and when I get home I find that now I'm not a man OR a woman..."; + set $@halloween_react_notscary$[$@n], "\"Heheh, sucks, buddy. But there's always a risk.\""; + set $@halloween_trick_scary$[$@n], "Look out! A scorpion!"; + set $@halloween_react_scary$[$@n], "\"Where? Darn things, I think they're what keep scaring away my customers.\""; + set $@halloween_trick_veryscary$[$@n], "I know about your hobby of performing numerous sex changes on yourself."; + set $@halloween_react_veryscary$[$@n], "\"Shut up! Look, will you hold your tongue if I give you more treats...?\""; + + set $@n, $@n + 1; + + set $@halloween_npc_george, $@n; + set $@halloween_npc_names$[$@n], "[George the Pirate]"; + set $@halloween_greetings$[$@n], "\"Shiver me timbers! What do ye mean?\""; + set $@halloween_trick_notscary$[$@n], "Well... I do a trick, and then... you give me a treat..."; + set $@halloween_react_notscary$[$@n], "\"Arrrrh, I knew what ye meant, to be sure! I were just kidding with ye, pretending to be a crazy old pirate! Arrrrh!\""; + set $@halloween_trick_scary$[$@n], "Your eyepatch is on the wrong eye!"; + set $@halloween_react_scary$[$@n], "\"Arrrrh, so it is! Ta for pointing it out, mate - wait, no it isn't! Harhar, what a good trick!\""; + set $@halloween_trick_veryscary$[$@n], "By the powers, ye're a daft landlubber to be sure, ye barnacle-ridden swab!"; + set $@halloween_react_veryscary$[$@n], "\"Arrrrh, ye scurvy dog! I'm sure my first mate will return with the ship eventually.\""; + + set $@n, $@n + 1; + + set $@halloween_npc_inac, $@n; + set $@halloween_npc_names$[$@n], "[Inac]"; + set $@halloween_greetings$[$@n], "\"Oh, yes?\""; + set $@halloween_trick_notscary$[$@n], "Yes, we monsters moved into the tunnels... and now we're coming out... for revenge!"; + set $@halloween_react_notscary$[$@n], "\"Haha! That's the worse trick I've seen today.\""; + set $@halloween_trick_scary$[$@n], "One of those monsters you mentioned is crawling out of the well!"; + set $@halloween_react_scary$[$@n], "\"He IS? Where!? Aah! Oh. You were just tricking, right? Hahaha, that was good, I really believed you.\""; + set $@halloween_trick_veryscary$[$@n], "Yeah, but it's all fossil water. One day it's gonna dry up!"; + set $@halloween_react_veryscary$[$@n], "\"Fossil water? You mean it's turned to STONE? But you can't drink - oh... you were just tricking, right? You WEREN'T? Aaaah!\""; + + set $@n, $@n + 1; + + set $@halloween_npc_kfahr, $@n; + set $@halloween_npc_names$[$@n], "[Kfahr the Warrior]"; + set $@halloween_greetings$[$@n], "\"Ah, yes!\" He rubs his hands. \"Trick away, then!\""; + set $@halloween_trick_notscary$[$@n], "Meh... I'm only trick-or-treating you to avoid listening to your BORING stories."; + set $@halloween_react_notscary$[$@n], "\"Boring?\" He grins. \"You must be mistaking me for someone else.\""; + set $@halloween_trick_scary$[$@n], "Did you hear the bad news already? They made up a law prohibiting to serve alcoholic drinks! That means no more beer!"; + set $@halloween_react_scary$[$@n], "\"What? But- but- why do they- oh, you tricked me. I was about to really get worried for a moment.\""; + set $@halloween_trick_veryscary$[$@n], "Have you heard? Tulimshar was destroyed by a giant Desert Worm!"; + set $@halloween_react_veryscary$[$@n], "\"What!?\" Kfahr stares. \"And no one called for me? This is appalling! But - what? That was your trick? Hm, nice one. You almost had me fooled!\""; + + set $@n, $@n + 1; + + set $@halloween_npc_nurse, $@n; + set $@halloween_npc_names$[$@n], "[Nurse]"; + set $@halloween_greetings$[$@n], "\"I don't know why I let the Mayor trick me into this... well, go on then.\""; + set $@halloween_trick_notscary$[$@n], "I ate too much Hallowe'en candy, now I'm sick!"; + set $@halloween_react_notscary$[$@n], "\"Well, no one's to blame but yourself, you know. Just make sure you don't eat any more.\""; + set $@halloween_trick_scary$[$@n], "Hurnscald has been struck by plague! You must come and tend to the dying!"; + set $@halloween_react_scary$[$@n], "\"But I don't know how to deal with plague! Oh no! You must get the Doctor! Unless... you were just tricking me! Whew, that's a relief!\""; + set $@halloween_trick_veryscary$[$@n], "The Doctor asked me to tell you that he doesn't want to see you any more."; + set $@halloween_react_veryscary$[$@n], "\"What? But we were getting it on so well. I mean, getting on so well! Oh... that was your trick! Dear me, I believed you!\""; + + set $@n, $@n + 1; + + set $@halloween_npc_pachua, $@n; + set $@halloween_npc_names$[$@n], "[Chief Pachua]"; + set $@halloween_greetings$[$@n], "\"Ah, the strange custom the Government man told me about.\""; + set $@halloween_trick_notscary$[$@n], "Look out! A scorpion!"; + set $@halloween_react_notscary$[$@n], "\"Don't mind him, he won't hurt you. Er... so I give you sweets now, or what?\""; + set $@halloween_trick_scary$[$@n], "Yes, the ritual giving of treats... LOTS of treats... or else!"; + set $@halloween_react_scary$[$@n], "\"Alright, here you go.\""; + set $@halloween_trick_veryscary$[$@n], "Yes, the ritual giving of treats followed by the sacrifice of the treat-giver..."; + set $@halloween_react_veryscary$[$@n], "\"I do like a good sacrifice, but less so if it's me! I'll give you extra sweets if you forget the sacrifice.\""; + + set $@n, $@n + 1; + + set $@halloween_npc_tathin, $@n; + set $@halloween_npc_names$[$@n], "[Tathin]"; + set $@halloween_greetings$[$@n], "\"I am employed by the Tonori Government, make sure you abide the regulations we wrote down for Trick-or-Treaters this year...\""; + set $@halloween_trick_notscary$[$@n], "Of course I will... not!"; + set $@halloween_react_notscary$[$@n], "\"Hm!\""; + set $@halloween_trick_scary$[$@n], "Regulations, smegulations. The Tonori Government can go suck a lollipop for all I care!"; + set $@halloween_react_scary$[$@n], "\"!? How dare you - oh, that was your trick! You did have me worried for a moment...\""; + set $@halloween_trick_veryscary$[$@n], "What regulations?"; + set $@halloween_react_veryscary$[$@n], "\"You mean you haven't even READ - I don't believe - this is ghastly - I - oh... that was your trick... gosh, I believed you for a minute! I thought you really hadn't read them!\""; + + set $@n, $@n + 1; + + set $@halloween_npc_vincent, $@n; + set $@halloween_npc_names$[$@n], "[Vincent]"; + set $@halloween_greetings$[$@n], "\"Ooh, okay! Trick away!\""; + set $@halloween_trick_notscary$[$@n], "Look out! A scorpion!"; + set $@halloween_react_notscary$[$@n], "\"They're everywhere in this desert! Don't worry about them.\""; + set $@halloween_trick_scary$[$@n], "Hey, that action figure you're building just CAME TO LIFE!"; + set $@halloween_react_scary$[$@n], "\"Really? Cool! Where? What? You were tricking me? WAAAH!\""; + set $@halloween_trick_veryscary$[$@n], "Wow, this is a neat action figure! Haha, check out its moves! Oops! Never mind, I'm sure it'll glue back on."; + set $@halloween_react_veryscary$[$@n], "\"My Bug Leg action figure! You broke it!\""; + + set $@n, $@n + 1; + + set $@halloween_npc_weellos, $@n; + set $@halloween_npc_names$[$@n], "[Weellos]"; + set $@halloween_greetings$[$@n], "\"Trick me, then!\""; + set $@halloween_trick_notscary$[$@n], "Look out! A scorpion!"; + set $@halloween_react_notscary$[$@n], "\"Pesky things, I know, but they're everywhere around here...\""; + set $@halloween_trick_scary$[$@n], "Actually, it's a fake. It was built just ten years ago."; + set $@halloween_react_scary$[$@n], "\"No! But I've read all the accounts... oh, haha! Very funny!\""; + set $@halloween_trick_veryscary$[$@n], "They say the earthquake ruined the foundations of this building, and that it's going to fall down."; + set $@halloween_react_veryscary$[$@n], "\"B-but it's one of the oldest buildings around! And... wait, I just remembered that it was designed to be earthquake-proof. You were tricking me!\""; + + set $@n, $@n + 1; + + set $@halloween_npc_zack, $@n; + set $@halloween_npc_names$[$@n], "[Zack]"; + set $@halloween_greetings$[$@n], "\"I thought no one would find me down here, but I'm glad I was wrong! Let's see your trick, then.\""; + set $@halloween_trick_notscary$[$@n], "You think this is something to do with Hallowe'en? Hands up!"; + set $@halloween_react_notscary$[$@n], "\"Heh... That was ok.\""; + set $@halloween_trick_scary$[$@n], "And now that I've found you, you die!"; + set $@halloween_react_scary$[$@n], "\"Aah! What did I do? Oh - wait - I see! That was a good one!\""; + set $@halloween_trick_veryscary$[$@n], "Yes, I have found you. After all these years."; + set $@halloween_react_veryscary$[$@n], "\"Uncle Henry? But how, I covered my tracks so well! I never told anyone that - wait... that was your trick! You had me worried for a minute!\""; + + set $@n, $@n + 1; + + set $@halloween_npc_kimarr, $@n; + set $@halloween_npc_names$[$@n], "[Kimarr]"; + set $@halloween_greetings$[$@n], "\"Many have tried to scare me, all have failed. Try your best, but the frozen wastes contain all manner of horrors.\""; + set $@halloween_trick_notscary$[$@n], "Look out Yetis!"; + set $@halloween_react_notscary$[$@n], "\"You will have to do better then that.\""; + set $@halloween_trick_scary$[$@n], "Hrmm Is that your wife calling you?"; + set $@halloween_react_scary$[$@n], "\"What? You haven't se... wait a second. Ok that was good.\""; + set $@halloween_trick_veryscary$[$@n], "The Kaizeian government declared fluffies an endangered species."; + set $@halloween_react_veryscary$[$@n], "\"NOooOOOooo!!! The Hunt!!! ... wait a second, you city folk are slick.\""; + + set $@n, $@n + 1; + + set $@halloween_npc_nikolai, $@n; + set $@halloween_npc_names$[$@n], "[Nikolai]"; + set $@halloween_greetings$[$@n], "\"Let us see if you are scarier then Kfahr's Fairy Tales.\""; + set $@halloween_trick_notscary$[$@n], "Your going over their to the store."; + set $@halloween_react_notscary$[$@n], "\"*You're* *there* Ugh, thats more annoying then scary.\""; + set $@halloween_trick_scary$[$@n], "Whats White, Blue and slimey? I don't know either but it's right behind you."; + set $@halloween_react_scary$[$@n], "\"More Slimes, Oh no the books again. O you tricked me, good one.\""; + set $@halloween_trick_veryscary$[$@n], "I hope you don't mind I used some of this kindling you have on the shelves to start a fire."; + set $@halloween_react_veryscary$[$@n], "\"AHHHHH!!!! You burned our books!!! *GAH* ... *Eye Twitch*\""; + + set $@n, $@n + 1; + + set $@halloween_npc_vellamo, $@n; + set $@halloween_npc_names$[$@n], "[Vellamo]"; + set $@halloween_greetings$[$@n], "\"Ahh yes, more candy related ritual.\""; + set $@halloween_trick_notscary$[$@n], "Candy? No, I want Parsley."; + set $@halloween_react_notscary$[$@n], "\"Parsley? is this some kind of monster? I'm not getting this scare at all\""; + set $@halloween_trick_scary$[$@n], "Chief Warrick says he needs the candy inventory by end of day."; + set $@halloween_react_scary$[$@n], "\"Ahh, no! I forgot to put a cover sheet on my Candy Production and Storage report.\""; + set $@halloween_trick_veryscary$[$@n], "I'm sorry, but your doctor says your diabetic."; + set $@halloween_react_veryscary$[$@n], "\"Darkest day of my life, blacker then the darkest chocolate.\""; + + set $@halloween_num_npcs, $@n + 1; + set $@halloween_all_npc_bits, -1 << (32 - $@halloween_num_npcs); + + set $@n, 0; + + if((gettime(6) == $@halloween_reward_start_month && gettime(5) >= $@halloween_reward_start_day + && (gettime(5) <= $@halloween_reward_end_day && $@halloween_reward_start_month == $@halloween_end_month + || !($@halloween_reward_start_month == $@halloween_end_month))) + || (gettime(6) == $@halloween_end_month && gettime(5) <= $@halloween_reward_end_day + && (gettime(5) >= $@halloween_reward_start_day && $@halloween_reward_start_month == $@halloween_end_month + || !($@halloween_reward_start_month == $@halloween_end_month))) + || (gettime(6) < $@halloween_end_month && gettime(6) > $@halloween_reward_start_month)) + goto L_RewardTime; + if((gettime(6) >= $@halloween_start_month) || (gettime(6) <= $@halloween_end_month && gettime(5) <= $@halloween_reward_start_day)) + goto L_EventTime; + goto L_NoEventTime; + +L_NoEventTime: + if($HALLOWEEN_TIME_KEY[5] < gettime(7)) + setarray $HALLOWEEN_TIME_KEY, $HALLOWEEN_TIME_KEY[0],$HALLOWEEN_TIME_KEY[1],$HALLOWEEN_TIME_KEY[2],$HALLOWEEN_TIME_KEY[3],$HALLOWEEN_TIME_KEY[4],gettime(7); + set $@halloween_time, $@halloween_no_event_time; + goto L_Return; + +L_EventTime: + set $@halloween_time, $@halloween_event_time; + goto L_Return; + +L_RewardTime: + set $@halloween_time, $@halloween_reward_time; + goto L_Return; + +L_Return: + callfunc "SpawnMunro"; + callfunc "ReplaceTrees"; + end; + +L_HalloweenError: + debugmes "Halloween is Dead Jim."; + gmcommand "@mapexit"; + end; +} diff --git a/world/map/npc/annuals/halloween/debug.txt b/world/map/npc/annuals/halloween/debug.txt new file mode 100644 index 00000000..0da5e361 --- /dev/null +++ b/world/map/npc/annuals/halloween/debug.txt @@ -0,0 +1,180 @@ +// Halloween Debug +// Author: Wushin + +function|script|HalloweenDebug|, +{ + if(debug) + goto L_Debug; + goto L_Live; + +L_Live: + menu + "Debug Time", L_DebugTime, + "Set Old Event Flag.", L_LastReset, + "Halloween Time Key Change.", L_HalloweenTimeKey, + "Reset NPC's mask memory", L_ResetMask, + "Nothing.", L_Close; + +L_Debug: + menu + "Debug Time", L_DebugTime, + "Set Old Event Flag.", L_LastReset, + "Halloween Time Key Change.", L_HalloweenTimeKey, + "Quest State", L_QuestState, + "Set NPC trick or treat flag", L_SetTrickOrTreats, + "Reset my quest state", L_ResetMe, + "Reset NPC's mask memory", L_ResetMask, + "Nothing.", L_Close; + +L_DebugTime: + mes "--Sever--"; + mes "Event State: " + $@halloween_time; + mes "Event Start" + $HALLOWEEN_TIME_KEY[0] + "/1"; + mes "Reward Start: " + $HALLOWEEN_TIME_KEY[1] + "/" + $HALLOWEEN_TIME_KEY[3]; + mes "Event End: " + $HALLOWEEN_TIME_KEY[2] + "/" + $HALLOWEEN_TIME_KEY[4]; + mes "Event Time Key (year (CCYY)): " + $HALLOWEEN_TIME_KEY[5]; + next; + goto L_Debug; + +L_LastReset: + set HALLOWEENTIME, 255; + set HALLOWEENYEAR, 2012; + goto L_Debug; + +L_HalloweenTimeKey: + if (getgmlevel() < 20) goto L_Close; + mes "Halloween Time Key Change."; + mes "Start Month?"; + input @halloween_time_key_smonth; + if((@halloween_time_key_smonth == 0) || (@halloween_time_key_smonth > 12)) + goto L_HalloweenError; + mes "Reward Start Month?"; + input @halloween_time_key_srmonth; + if((@halloween_time_key_srmonth == 0) || (@halloween_time_key_srmonth > 12)) + goto L_HalloweenError; + mes "End Month?"; + input @halloween_time_key_emonth; + if((@halloween_time_key_emonth == 0) || (@halloween_time_key_emonth > 12)) + goto L_HalloweenError; + mes "Reward Start Day?"; + input @halloween_time_key_rsday; + if((@halloween_time_key_rsday == 0) || (@halloween_time_key_rsday > 31)) + goto L_HalloweenError; + mes "Reward End Day?"; + input @halloween_time_key_reday; + if((@halloween_time_key_reday == 0) || (@halloween_time_key_reday > 31)) + goto L_HalloweenError; + mes "Time Key (CCYY) "; + input @halloween_time_key_year; + goto L_SetNewKey; + +L_HalloweenError: + mes "Incorrect Entry. Try again."; + next; + goto L_Debug; + +L_SetNewKey: + setarray $HALLOWEEN_TIME_KEY, @halloween_time_key_smonth, @halloween_time_key_srmonth, @halloween_time_key_emonth, @halloween_time_key_rsday, @halloween_time_key_reday, @halloween_time_key_year; + cmdothernpc "#HalloweenConfig", "RestartQuest"; + goto L_Debug; + +L_QuestState: + mes "Karma: " + (HALLOWEENTIME & 65535); + set @big_reward_status$, " No."; + if (HALLOWEENTIME & $@halloween_got_big_reward) + set @big_reward_status$, " Yes."; + mes "Big Reward: " + @big_reward_status$; + set @charm_reward_status$, " No."; + if (HALLOWEENTIME & $@halloween_got_charm_reward) + set @charm_reward_status$, " Yes."; + mes "Charm Reward:" + @charm_reward_status$; + set @npc_check_loop, 0; + goto L_NpcCheckLoop; + +L_NpcCheckLoop: + set @display_mes$, "NPC ID " + @npc_check_loop + ":" + $@halloween_npc_names$[@npc_check_loop]; + set @npc_status$, " Needed"; + if (HALLOWEENTIME & (1 << (31 - @npc_check_loop))) + set @npc_status$, " Complete"; + set @display_mes$, @display_mes$ + @npc_status$; + mes @display_mes$; + set @display_mes$, ""; + goto L_NpcCheckInc; + +L_NpcCheckInc: + set @npc_check_loop, (@npc_check_loop + 1); + if (@npc_check_loop >= getarraysize($@halloween_npc_names$)) + goto L_TrickOrTreatCount; + goto L_NpcCheckLoop; + +L_TrickOrTreatCount: + callfunc "TrickOrTreatTally"; + mes @npc_tally + " out of 14"; + next; + goto L_Debug; + +L_SetTrickOrTreats: + mes "Enter NPC to set"; + input @halloween_npc_id; + set HALLOWEENTIME, HALLOWEENTIME | (1 << (31 - @halloween_npc_id)); + goto L_Debug; + +L_ResetMe: + set HALLOWEENTIME, 0; + set HALLOWEENYEAR, $HALLOWEEN_TIME_KEY[5]; + goto L_Debug; + +L_ResetMask: + mes "Enter NPC to reset:"; + input @halloween_npc_id; + set $@halloween_maskmemory[8 * @halloween_npc_id], 0; + goto L_Debug; + +L_Close: + set @tmp, 0; + set @mask, 0; + set @karma, 0; + set @loop, 0; + set @menu, 0; + set @halloween_npc_id, 0; + close; +} +009-1.gat,51,38,0|script|HalloweenDebug#1|409, +{ + callfunc "HalloweenDebug"; + goto L_End; + +OnInit: + if(!debug) + disablenpc "HalloweenDebug#1"; + goto L_End; + +L_End: + end; +} +001-1.gat,38,26,0|script|HalloweenDebug#2|409, +{ + callfunc "HalloweenDebug"; + goto L_End; + +OnInit: + if(!debug) + disablenpc "HalloweenDebug#2"; + goto L_End; + +L_End: + end; +} +026-1.gat,23,37,0|script|HalloweenDebug#3|409, +{ + callfunc "HalloweenDebug"; + goto L_End; + +OnInit: + if(!debug) + disablenpc "HalloweenDebug#3"; + goto L_End; + +L_End: + end; +} diff --git a/world/map/npc/annuals/halloween/munro.txt b/world/map/npc/annuals/halloween/munro.txt new file mode 100644 index 00000000..c3ff6367 --- /dev/null +++ b/world/map/npc/annuals/halloween/munro.txt @@ -0,0 +1,60 @@ +// Part of Annual halloween +026-1.gat,24,37,0|script|Munro|183, +{ + callfunc "HalloweenCheckOld"; + callfunc "TrickOrTreatTally"; + if (($@halloween_time == $@halloween_reward_time) && (@npc_tally >= $@halloween_charm_count) && !(HALLOWEENTIME & $@halloween_got_charm_reward)) + goto L_Halloween; + goto L_NoReward; + +L_NoReward: + mes "[Munro]"; + mes "\"Greetings mortal.\""; + next; + mes "\"Once again we come to that time of year when the veil is thin\""; + next; + mes "\"All those who have passed on can part the veil to return.\""; + next; + mes "\"A time to celebrate our ancestors and chase evil away.\""; + next; + mes "\"Celebrate the holiday with me and I will reward you later.\""; + goto L_Exit; + +L_Halloween: + mes "[Munro]"; + mes "\"You have shown to have the Halloween spirit. Take this charm.\""; + set HALLOWEENTIME, HALLOWEENTIME | $@halloween_got_charm_reward; + getitem "SkeletonCharm",1; + goto L_Exit; + +L_Exit: + close; +} +function|script|SpawnMunro|, +{ + if ($@halloween_time) + goto L_EnableMunro; + goto L_DisableMunro; + +L_EnableMunro: + enablenpc "Munro"; + goto L_Return; + +L_DisableMunro: + disablenpc "Munro"; + goto L_Return; + +L_Return: + return; +} +function|script|CheckMunro|, +{ + if (($@halloween_time) || ($@xmas_time)) + goto L_Return; + + callfunc "UnequipLater"; + goto L_Return; + +L_Return: + return; +} diff --git a/world/map/npc/annuals/halloween/trick_or_treat.txt b/world/map/npc/annuals/halloween/trick_or_treat.txt new file mode 100644 index 00000000..c94977ab --- /dev/null +++ b/world/map/npc/annuals/halloween/trick_or_treat.txt @@ -0,0 +1,329 @@ +// Halloween Annual +// Authors: alastrim, enchilado, o11c, wushin +// See config +function|script|TrickOrTreat|, +{ + callfunc "HalloweenCheckOld"; + if ($@halloween_time) + goto L_Halloween; + goto L_QuickReturn; + +L_Halloween: + if ((gettimetick(2)-TUT_var < $@halloween_min_age) || (BaseLevel < $@halloween_min_level)) //player must be created at least 1 weeks ago + goto L_QuickReturn; + menu + "Trick or Treat", L_HWQuest, + "[Go to normal NPC dialog]", L_QuickReturn; + +L_HWQuest: + set @mask, getequipid(equip_head); + goto L_Begin; + +L_Begin: + set @karma, (HALLOWEENTIME & 65535); + if (@mask > 0) + goto L_WearingMask; + goto L_NoMask; + +L_WearingMask: + // set the scare factor of the equipped mask + set @mask_index, 0; + set @scare_factor, 1; + goto L_MaskLoop; + +L_MaskLoop: + if ($@halloween_mask_IDs[@mask_index] == @mask) + goto L_FoundMask; + set @mask_index, @mask_index + 1; + if ($@halloween_mask_IDs[@mask_index]) + goto L_MaskLoop; + // not a mask in the list + set @mask, 0; + goto L_MaskDone; + +L_FoundMask: + set @scare_factor, $@halloween_scare_factors[@mask_index]; + if (@mask != 616) + goto L_MaskDone; + mes "\"Aaargh... Gross! This is sick! I can't even look at your face...\""; + goto L_MaskDone; + +L_MaskDone: + set @mask_index, 0; + // check if the mask is in the memory + set @loop, 0; + // Note: we don't handle remembered faces until they get their candy + if (!@mask) + goto L_MaskMemoryNo; + // check if the mask is remembered + goto L_MaskMemoryCheck; + +L_MaskMemoryCheck: + set @tmp, $@halloween_maskmemory[8 * @halloween_npc_id + @loop]; + if (!@tmp) + goto L_MaskMemoryNo; + if (@tmp == @mask) + goto L_MaskMemoryYes; + set @loop, @loop + 1; + if (@loop != $@halloween_memory_count) + goto L_MaskMemoryCheck; + goto L_MaskMemoryNo; + +L_MaskMemoryYes: + // not necessarily true + mes "\"I remember you, " + getequipname(equip_head) + " person. No more treats for you!\""; + goto L_Close; + +L_MaskMemoryNo: + // player will probably get treats + set @loop, 0; + set @sweets_types, 0; + goto L_Count_Sweets; + +L_Count_Sweets: + if ($@halloween_sweets[@loop] == 0) + goto L_Check_Inventory; + if (countitem($@halloween_sweets[@loop])) + set @sweets_types, @sweets_types + 1; + set @loop, @loop + 1; + goto L_Count_Sweets; + +L_Check_Inventory: + getinventorylist; + if (@inventorylist_count + (@loop - @halloween_invy) > 100) + goto L_Full_Inventory; + if (@mask) + goto L_Check_Karma; + // check if the player's face is remembered + if (HALLOWEENTIME & (1 << (31 - @halloween_npc_id))) + goto L_Remember_Face; + goto L_Tricking_Trick_or_Treat; + +L_Check_Karma: + // Please don't change this, you'll break stuff. + if (rand($@halloween_num_npcs, 65535) <= @karma) + goto L_Cheater; + // this is a cheap, limited form of ilog2 + if ((@karma >= 16) && !(rand( 4 - (@karma >= 64) + (@karma >= 256) + (@karma >= 1024) ))) + goto L_Cheater; + if (HALLOWEENTIME & $@halloween_got_big_reward) + goto L_Tricking_Trick_or_Treat; + // assert: @karma < $@halloween_num_npcs + if (rand($@halloween_num_npcs - @karma)) + goto L_Tricking_Trick_or_Treat; + mes "\"All this candy isn't healthy, here take this to have a break from it.\""; + getitem $@halloween_big_reward[rand(getarraysize($@halloween_big_reward))], 1; + set HALLOWEENTIME, HALLOWEENTIME | $@halloween_got_big_reward; + // you get the big reward first, then the main treats + // otherwise it would be too complicated, and/or possibly unfair + goto L_Tricking_Trick_or_Treat; + +L_Cheater: + mes "\"I recognize you despite your mask, you have been taking sweets you do not deserve.\""; + if (@karma != 65535) + set HALLOWEENTIME, HALLOWEENTIME + 1; + goto L_Close; + +L_Remember_Face: + // mes "You've been here before; I remember your face"; + mes "\"I remember your face, " + strcharinfo(0) + ". No more treats for you!\""; + goto L_Close; + +L_Tricking_Trick_or_Treat: + // moved above + mes $@halloween_npc_names$[@halloween_npc_id]; + mes $@halloween_greetings$[@halloween_npc_id]; + next; + // TODO: should we randomize these? (in a subsequent commit) + menu + $@halloween_trick_notscary$[@halloween_npc_id], L_Tricking_Notscary, + $@halloween_trick_scary$[@halloween_npc_id], L_Tricking_Scary, + $@halloween_trick_veryscary$[@halloween_npc_id], L_Tricking_Veryscary; + +L_Tricking_Notscary: + mes $@halloween_npc_names$[@halloween_npc_id]; + mes $@halloween_react_notscary$[@halloween_npc_id]; + goto L_Tricking_Reward; + +L_Tricking_Scary: + mes $@halloween_npc_names$[@halloween_npc_id]; + mes $@halloween_react_scary$[@halloween_npc_id]; + set @scare_factor, @scare_factor * 2; + goto L_Tricking_Reward; + +L_Tricking_Veryscary: + mes $@halloween_npc_names$[@halloween_npc_id]; + mes $@halloween_react_veryscary$[@halloween_npc_id]; + set @scare_factor, @scare_factor * 3; + goto L_Tricking_Reward; + +L_Tricking_Reward: + next; + if (@karma >= 16) + set @scare_factor, rand(@scare_factor / 2, @scare_factor); + if (@karma >= 256) + set @scare_factor, rand(@scare_factor / 2, @scare_factor); + if (@karma >= 4096) + set @scare_factor, rand(@scare_factor / 2, @scare_factor); + if (@scare_factor < 1) + set @scare_factor, 1; + goto L_Tricking_Reward_Loop; + +L_Tricking_Reward_Loop: + set @random, rand($@halloween_sweets_num); + setarray @getitem_ids, $@halloween_sweets[@random]; + setarray @getitem_counts, 1; + callfunc "CheckInventory"; + if (@check_fail) + set @scare_factor, 0; + if (!@scare_factor) + goto L_Tricking_End; + // NOTE: it gives out one piece at a time, but can loop several times + getitem $@halloween_sweets[@random], 1; + set @scare_factor, @scare_factor - 1; + goto L_Tricking_Reward_Loop; + +L_SetRememberFace: + set HALLOWEENTIME, HALLOWEENTIME | (1 << (31 - @halloween_npc_id)); + goto L_Close; + +L_Tricking_End: + mes $@halloween_npc_names$[@halloween_npc_id]; + mes "\"That should be enough sweets for you. Thanks for participating!\""; + if (!@mask) + goto L_SetRememberFace; + // add the player's mask to the list + set @loop, 7; + goto L_SetRememberMask; + +L_SetRememberMask: + set $@halloween_maskmemory[8 * @halloween_npc_id + @loop], $@halloween_maskmemory[8 * @halloween_npc_id + @loop - 1]; + set @loop, @loop - 1; + if (@loop) + goto L_SetRememberMask; + set $@halloween_maskmemory[8 * @halloween_npc_id], @mask; + set HALLOWEENTIME, HALLOWEENTIME + 1; + goto L_Close; + +L_Full_Inventory: + mes $@halloween_npc_names$[@halloween_npc_id]; + mes "\"You are trying to collect candy but you have no space to carry all the kinds of stuff that I have to offer! Please, save room for more stuff and come back.\""; + goto L_Close; + +L_NoMask: + mes $@halloween_npc_names$[@halloween_npc_id]; + mes "\"Hey " + strcharinfo(0) + ", are you trying to scare me with your face? Interesting! hahaha...\""; + goto L_Close; + +L_Close: + set @tmp, 0; + set @mask, 0; + set @karma, 0; + set @loop, 0; + set @menu, 0; + set @halloween_npc_id, 0; + return; + +L_QuickReturn: + set @halloween_npc_id, 0; + return; +} +function|script|TrickOrTreatTally|, +{ + set @npc_loop, 0; + set @npc_tally, 0; + goto L_LoopCheck; + +L_LoopCheck: + if (HALLOWEENTIME & (1 << (31 - @npc_loop))) + set @npc_tally, (@npc_tally + 1); + goto L_IncLoop; + +L_IncLoop: + set @npc_loop, (@npc_loop + 1); + if (@npc_loop >= 15) + goto L_Return; + goto L_LoopCheck; + +L_Return: + return; +} +// Checks for an expired event key +// Each new annual event needs a new key +// or it will allow completion from last year +function|script|HalloweenCheckOld|, +{ + if(HALLOWEENYEAR == $HALLOWEEN_TIME_KEY[5]) + goto L_Return; + goto L_OldMatch; + +L_OldMatch: + set HALLOWEENTIME, 0; + set HALLOWEENYEAR, $HALLOWEEN_TIME_KEY[5]; + goto L_Return; + +L_Return: + return; +} +function|script|HalloweenTree|, +{ + mes "[Confused Tree]"; + mes "\"I love halloween, wearing masks and going trick or treating is so much fun.\""; + goto L_StartMenu; + +L_StartMenu: + menu + "Whats Halloween?", L_Explain, + "Me too!", L_CheckDressed, + "Meh, I like Christmas Better.", L_XmasBetter; + +L_Explain: + mes "\"I've convinced some people throughout the world to help with trick or treating.\""; + next; + set @npc_check_loop, 0; + goto L_NpcCheckLoop; + +L_NpcCheckLoop: + mes $@halloween_npc_names$[@npc_check_loop]; + next; + goto L_NpcCheckInc; + +L_NpcCheckInc: + set @npc_check_loop, (@npc_check_loop + 1); + if (@npc_check_loop >= getarraysize($@halloween_npc_names$)) + goto L_ContinueExplain; + goto L_NpcCheckLoop; + +L_ContinueExplain: + mes "\"Find each person and put on a mask then try to scare them.\""; + next; + mes "\"The scarier you are, the more treats you will be awarded.\""; + next; + mes "\"If you are really scary you could get a rare reward.\""; + next; + goto L_StartMenu; + +L_CheckDressed: + set @head, getequipid(equip_head); + set @chest, getequipid(equip_torso); + set @leg, getequipid(equip_legs); + set @random_mes$, "\" I like your costume.\""; + if ((@head <= 0) && (@chest <= 0) && (@leg <= 0)) + set @random_mes$, "\"Birthday Suit, always a classic.\""; + if ((@head == 615) && (@chest == 870)) + set @random_mes$, "\"How embrassing... we are wearing the same costume.\""; + if ((@head == 617) || (@head == 622) || (@head == 621)) + set @random_mes$, "\"Yar, matey I see that.\""; + if ((@head == 633) || (@head == 1205) || (@chest == 1183) || (@chest == 1184) || (@chest == 1185) || (@chest == 1186) || (@chest == 1187)) + set @random_mes$, "\"Your sense of humor offends me, it's way to early for that.\""; + mes @random_mes$; + goto L_Return; + +L_XmasBetter: + mes "\"Bah, Humbug, Show your Halloween spirit! OOooooOooo\""; + misceffect 302, strcharinfo(0); + goto L_Return; + +L_Return: + return; +} diff --git a/world/map/npc/annuals/xmas/tree_beard.txt b/world/map/npc/annuals/tree_beard.txt index d7e8b183..5923637f 100644 --- a/world/map/npc/annuals/xmas/tree_beard.txt +++ b/world/map/npc/annuals/tree_beard.txt @@ -1,4 +1,10 @@ -// Annual Xmas Environment changes +// Annual Environment changes +020-1.gat,90,78,0|script|#GhostTreeOne|133, +{ + callfunc "HalloweenTree"; + close; +} + 020-1.gat,90,78,0|script|#Tree|380, { end; @@ -16,6 +22,12 @@ close; } +009-1.gat,54,38,0|script|#GhostTreeTwo|133, +{ + callfunc "HalloweenTree"; + close; +} + 009-1.gat,54,38,0|script|#TreeNoSnow|394, { end; @@ -33,6 +45,12 @@ close; } +001-1.gat,41,45,0|script|#GhostTreeThree|133, +{ + callfunc "HalloweenTree"; + close; +} + 001-1.gat,41,45,0|script|#PalmTree|384, { end; @@ -80,25 +98,37 @@ L_Return: function|script|ReplaceTrees|, { - if($@xmas_time) + disablenpc "#Tree"; + disablenpc "#TreeNoSnow"; + disablenpc "#PalmTree"; + disablenpc "#GhostTreeOne"; + disablenpc "#GhostTreeTwo"; + disablenpc "#GhostTreeThree"; + disablenpc "#XmasTree"; + disablenpc "#XmasTreeNoSnow"; + disablenpc "#XmasPalmTree"; + + if ($@xmas_time) goto L_XmasTree; + if ($@halloween_time) + goto L_HalloweenLive; goto L_Tree; L_XmasTree: - disablenpc "#Tree"; enablenpc "#XmasTree"; - disablenpc "#TreeNoSnow"; enablenpc "#XmasTreeNoSnow"; - disablenpc "#PalmTree"; enablenpc "#XmasPalmTree"; goto L_Return; +L_HalloweenLive: + enablenpc "#GhostTreeOne"; + enablenpc "#GhostTreeTwo"; + enablenpc "#GhostTreeThree"; + goto L_Return; + L_Tree: - disablenpc "#XmasTree"; enablenpc "#Tree"; - disablenpc "#XmasTreeNoSnow"; enablenpc "#TreeNoSnow"; - disablenpc "#XmasPalmTree"; enablenpc "#PalmTree"; goto L_Return; diff --git a/world/map/npc/annuals/xmas/config.txt b/world/map/npc/annuals/xmas/config.txt index e63c07e2..e8ac5cc2 100644 --- a/world/map/npc/annuals/xmas/config.txt +++ b/world/map/npc/annuals/xmas/config.txt @@ -80,9 +80,6 @@ L_Main: set $@xmas_event_time, 1; set $@xmas_reward_time, 2; - // Xmas debug (sets time) - set $@xmas_debug, 0; - // Main Quest Settings // Bit used to Set Which one of the 2 quests you are on set $@xmas_side_bit, (1 << 31); @@ -265,11 +262,6 @@ L_Main: set $@xmas_spawn_y2, 89; set $@xmas_respawn_count, 9; - if($@xmas_debug == $@xmas_event_time) - goto L_EventTime; - if($@xmas_debug == $@xmas_reward_time) - goto L_RewardTime; - if((gettime(6) == $@xmas_reward_start_month && gettime(5) >= $@xmas_reward_start_day && (gettime(5) <= $@xmas_reward_end_day && $@xmas_reward_start_month == $@xmas_end_month || !($@xmas_reward_start_month == $@xmas_end_month))) @@ -297,9 +289,9 @@ L_RewardTime: goto L_Return; L_Return: - callfunc "ReplaceTrees"; callfunc "SpawnMobs"; callfunc "PresentHandler"; + callfunc "ReplaceTrees"; end; L_XmasError: diff --git a/world/map/npc/annuals/xmas/debug.txt b/world/map/npc/annuals/xmas/debug.txt index 38bbdf15..a26565b6 100644 --- a/world/map/npc/annuals/xmas/debug.txt +++ b/world/map/npc/annuals/xmas/debug.txt @@ -227,27 +227,14 @@ L_End: end; } - -017-9.gat,31,24,0|script|XmasDebug#5|105, -{ - if(getgmlevel() < 40) - goto L_End; - - callfunc "XmasDebug"; - goto L_End; - -L_End: - end; -} - -020-1.gat,86,76,0|script|XmasDebug#6|105, +020-1.gat,86,76,0|script|XmasDebug#5|105, { callfunc "XmasDebug"; goto L_End; OnInit: if(!(debug)) - disablenpc "XmasDebug#6"; + disablenpc "XmasDebug#5"; goto L_End; L_End: diff --git a/world/map/npc/scripts.conf b/world/map/npc/scripts.conf index 8aa774e0..90c11883 100644 --- a/world/map/npc/scripts.conf +++ b/world/map/npc/scripts.conf @@ -39,8 +39,9 @@ import: npc/_import.txt // GM Events npc: npc/functions/gm_island.txt - +// Annuals Framework npc: npc/annuals/fathertime.txt +npc: npc/annuals/tree_beard.txt // Annual Christmas npc: npc/annuals/xmas/config.txt npc: npc/annuals/xmas/states.txt @@ -51,4 +52,8 @@ npc: npc/annuals/xmas/helpers.txt npc: npc/annuals/xmas/list.txt npc: npc/annuals/xmas/reagents.txt npc: npc/annuals/xmas/mobmanager.txt -npc: npc/annuals/xmas/tree_beard.txt +// Annual halloween +npc: npc/annuals/halloween/config.txt +npc: npc/annuals/halloween/debug.txt +npc: npc/annuals/halloween/munro.txt +npc: npc/annuals/halloween/trick_or_treat.txt |