diff options
129 files changed, 0 insertions, 24295 deletions
diff --git a/world/map/conf/magic-base.conf b/world/map/conf/magic-base.conf index 87e1cac6..5faf0f89 100644 --- a/world/map/conf/magic-base.conf +++ b/world/map/conf/magic-base.conf @@ -287,15 +287,6 @@ SPELL ask-magic-exp : "#abizit" = ELSE message (caster, "You feel completely overwhelmed by your magic."); ) -# SPELL ask-life-magic-exp : "#heyogo" = -# LET level = 0 -# school = MAGIC -# IN (MANA 1, CASTTIME 1000, -# REQUIRE skill(caster, MAGIC) > level) -# => EFFECT CALL adjust_spellpower(school); -# CALL default_effect(); -# message(caster, "You have " + ((script_int(caster, "MAGIC_EXPERIENCE") >> 24) & 0xff) + " Life Magic Experience points."); - SPELL transmute-wood-to-figurine (name : STRING) : "#parum" = LET level = 0 school = TRANSMUTE @@ -714,30 +705,6 @@ SPELL magic-knuckles : "#upmarmu" = CALL install_melee_spell(10 + spellpower / 10, 1300, 34); ATTRIGGER CALL melee_damage(target, 30, 5 + (str * 2)); -#SPELL death-wave : "#nertuq" = -# LET level = 1 -# school = DARK -# IN (MANA 75, CASTTIME 10000, -# REQUIRE skill(caster, MAGIC) > level, -# REQUIRE skill(caster, school) > level, -# REQUIRE (script_int(caster, "OrumQuest") > 50), -# COMPONENTS [5 * 704]) -# => EFFECT CALL adjust_spellpower(school); -# CALL default_effect(); -# CALL gain_xp(3, 30); -# sfx(location, SFX_SUMMON_START, 0); -# WAIT 500; -# sfx(location, SFX_SUMMON_FIRE, 0); -# IF hp(caster) < 220 -# THEN itemheal(caster, -220, 0); -# h = (hp(caster) / 2) * -1; -# itemheal(caster, h, 0); -# d = level(caster); -# damage = spellpower; -# damage_bonus = sqrt(spellpower) * 2; -# FOREACH MOB target IN rbox(location(caster), d / 20) DO -# (CALL elt_damage(target, damage, damage_bonus, ELT_HOLY, ELT_SHADOW, 15 + random(5));) - LOCAL SPELL summon-snakes : "#halhiss" = LET level = 1 school = DARK @@ -751,51 +718,6 @@ LOCAL SPELL summon-snakes : "#halhiss" = CALL gain_xp(3, 31); CALL summon_dark_spell(1010, 1 + spellpower / 300, 4000 - (spellpower * 9), spellpower * 80, 2); -#LOCAL SPELL summon-black-scorpions : "#halproc" = -# LET level = 1 -# school = DARK -# IN (MANA 40, CASTTIME 15000, -# REQUIRE skill(caster, MAGIC) > level, -# REQUIRE skill(caster, school) > level, -# REQUIRE (script_int(caster, "OrumQuest") > 50), -# COMPONENTS ["Root", "BlackScorpionStinger"]) -# => EFFECT CALL adjust_spellpower(school); -# CALL default_effect(); -# CALL gain_xp(3, 32); -# CALL summon_dark_spell(1009, 1 + spellpower / 300, 4000 - (spellpower * 9), spellpower * 80, 2); - -#LOCAL SPELL summon-skeletons : "#halheth" = # only release this if content has been adjusted or mob has been replaced with a nerfed one -# LET level = 1 -# school = DARK -# IN (MANA 50, CASTTIME 17000, -# REQUIRE skill(caster, MAGIC) > level, -# REQUIRE skill(caster, school) > level, -# REQUIRE (script_int(caster, "OrumQuest") > 50), -# COMPONENTS ["Bone", "DarkCrystal"]) -# => EFFECT CALL adjust_spellpower(school); -# CALL default_effect(); -# CALL gain_xp(3, 33); -# CALL summon_dark_spell(1043, spellpower / 325, 4000 - (spellpower * 9), spellpower * 70, 2); - -#SPELL shadow-strike : "#phlos" = -# LET level = 1 -# school = DARK -# IN (MANA 20, CASTTIME 1300, -# REQUIRE skill(caster, MAGIC) > level, -# REQUIRE skill(caster, DARK) > 0, -# REQUIRE (script_int(caster, "OrumQuest") > 50), -# (REQUIRE skill(caster, school) > 2 OR COMPONENTS ["DarkCrystal"])) -# => EFFECT CALL adjust_spellpower(school); -# CALL default_effect(); -# damage = spellpower / 2; -# damage_bonus = 1 + (spellpower - 150); -# CALL install_attack_spell(1 + spellpower / 100, 2800, 8, 31); -# IF hp(caster) > 170 -# THEN itemheal(caster, -160, 0); -# CALL gain_xp(3, 34); -# ATTRIGGER CALL attack_check(target); -# CALL elt_damage (target, damage, damage_bonus, ELT_HOLY, ELT_SHADOW, 15 + random(5)); - SPELL toxic-dart : "#phlex" = LET level = 1 school = DARK @@ -1396,51 +1318,6 @@ NONMAGIC SILENT SPELL marriage (target : PC) : "marry" = IF not (is_married(caster)) THEN message(caster, name_of(target) + " turned down your marriage offer."); -# SPELL change-hair-colour (colour : STRING) : "trapa" = -# (MANA 20) => EFFECT IF colour = "nworbl" -# THEN x = 0; # light brown -# ELSE IF colour = "der" -# THEN x = 1; # red -# ELSE IF colour = "neerg" -# THEN x = 2; # green -# ELSE IF colour = "elprup" -# THEN x = 3; # purple -# ELSE IF colour = "yerg" -# THEN x = 4; # grey -# ELSE IF colour = "wolley" -# THEN x = 5; # yellow -# ELSE IF colour = "eulb" -# THEN x = 6; # blue -# ELSE IF colour = "nwrob" -# THEN x = 7; # brown -# ELSE IF colour = "elpropl" -# THEN x = 8; # light purple -# ELSE IF colour = "elpropd" -# THEN x = 9; # dark purple -# ELSE x = random(10); -# sfx(caster, 2, 0); -# set_hair_colour(caster, x); - - -# SPELL trick-or-treat : "trick-or-treat" = -# (CASTTIME 30000, MANA 20, -# COMPONENTS [ "BugLeg" ]) => EFFECT IF (random(2)) -# THEN (sfx(caster, 2, 0); -# FOR i = 0 TO random(10) DO -# drop_item_for (random_location(rbox(location(caster), 5)), -# "Candy", 1, 10000 + random(10000), caster, 3000); -# FOR i = 0 TO random(10) DO -# drop_item_for (random_location(rbox(location(caster), 5)), -# "ChocolateBar", 1, 10000 + random(10000), caster, 3000); -# ) -# ELSE (sfx(caster, 5, 0); -# message(caster, "No treat for you!"); -# spawn(rbox(location(caster), 3), caster, 1010, 0, 1 + random(3), 10000 + random(20000)); -# FOREACH MOB target IN rbox(location(caster), 5) DO -# (sfx(target, 5, 0); -# aggravate(target, 0, caster);)) - - LOCAL SPELL mouboo-groan : "#g" = (MANA 1, REQUIRE name_of(caster) = "MOUBOOTAUR") => @@ -1463,167 +1340,6 @@ LOCAL SPELL mouboo-smell : "#s" = CONST E10_FLAG_USED_FREE_WARP_SHIFT = 17 -#NONMAGIC SILENT SPELL easter (type : STRING) : "#m" = -# (REQUIRE name_of(caster) == "Freeyorp") => -# EFFECT IF (type == "EE_RF") THEN ( -# { -# doevent("Old Woman::OnReplenish"); -# } -# ) ELSE IF (type == "EE_SUS") THEN ( -# { -# doevent "Old Woman::OnManualStopTimer"; -# } -# ) ELSE IF (type == "EE_INIT") THEN ( -# { -# doevent "Old Woman::OnManualStartTimer"; -# } -# ) ELSE IF (type == "BLOCKER_DISABLE") THEN ( -# { -# set $Easter_2010_Npc_State2, ($Easter_2010_Npc_State2 & ~(E10_BARRIER_MASK << E10_BARRIER_SHIFT)) | (E10_BARRIER_OPEN << E10_BARRIER_SHIFT); -# } -# ) ELSE IF (type == "BLOCKER_ENABLE") THEN ( -# { -# set $Easter_2010_Npc_State2, ($Easter_2010_Npc_State2 & ~(E10_BARRIER_MASK << E10_BARRIER_SHIFT)) | (E10_BARRIER_ACTIVE << E10_BARRIER_SHIFT); -# } -# ) ELSE message(caster, "Unknown action '" + type + "'!"); - -# Invader spells - -#NONMAGIC SILENT SPELL easter-invader-init : "#i" = -# (REQUIRE name_of(caster) == "Xakelbael the Dark") => -# EFFECT warp(caster, @("028-1.gat", 145, 49)); -# { -# gmcommand "@blvl -255"; -# gmcommand "@blvl 199"; -# gmcommand "@setmagic all 5 Xakelbael the Dark"; -# gmcommand "@allstats"; -# savepoint "028-1.gat", 136, 49; -# } -# create_item(caster, "DarkTalisman", 1); - -#NONMAGIC SILENT SPELL easter-invader-hide : "#h" = -# (REQUIRE name_of(caster) == "Xakelbael the Dark") => -# EFFECT { if (checkoption(4096)) goto L_toggle; -# setoption(4096); -# end; -# L_toggle: -# setoption(0); -# end; }; -# warp(caster, location(caster)); - -#NONMAGIC SILENT SPELL easter-invader-warp-taunt : "#o" = -# (REQUIRE name_of(caster) == "Xakelbael the Dark") => -# EFFECT warp(caster, @("009-1.gat", 48, 35)); -# WAIT 80; -# sfx(caster, 32, 0); -# WAIT 80; -# FOREACH PC p IN rbox(location(caster), 50) -# DO IF (p <> caster) THEN ( -# message(p, "A powerful explosion " + if_then_else(distance(location(caster), location(p)) < 10, "right around you nearly deafens you!", if_then_else(distance(location(caster), location(p)) < 30, "nearby shocks you!", "in the distance erupts... you're not sure of the source, but it will be something big..."))); -# itemheal(p, -1 - random(hp(p)), 0-(random(sp(p) >> 2))); -# ) -# WAIT 1000; -# FOREACH PC p IN rbox(location(caster), 15) -# DO ( -# message(p, "As the smoke clears, you hear a distant, sickly laughing ringing in your ears..."); -# ) - -#NONMAGIC SILENT SPELL easter-invader-warp-taunt-explosion : "#q" = -# (REQUIRE name_of(caster) == "Xakelbael the Dark") => -# EFFECT sfx(caster, 32, 0); -# WAIT 100; -# sfx(caster, 31, 0); -# WAIT 30; -# sfx(caster, 30, 0); -# WAIT 30; -# sfx(caster, 30, 0); -# WAIT 20; -# sfx(caster, 30, 0); -# WAIT 10; -# sfx(caster, 30, 0); -# WAIT 10; - -#NONMAGIC SILENT SPELL easter-invader-warp-taunt-end : "#p" = -# (REQUIRE name_of(caster) == "Xakelbael the Dark") => -# EFFECT FOREACH PC p IN rbox(location(caster), 50) DO IF (p <> caster) -# THEN ( script_target = p; -# { gmcommand "@jump"; } -# message(p, "A powerful force sends you flying!"); -# ) -# warp(caster, @("028-1.gat", 136, 49)); - - -#NONMAGIC SILENT SPELL easter-invader-attack-pulse : "#a" = -# (REQUIRE name_of(caster) == "Xakelbael the Dark") => -# EFFECT IF (script_int(caster, "InvState") == 1) THEN ( set_script_variable(caster, "InvState", 0); ABORT; ); -# set_script_variable(caster, "InvState", 1); -# FOR i = 1 TO 500 -# DO ( sfx(caster, 31, 0); -# WAIT 80; -# FOREACH PC p IN rbox(location(caster), 4) -# DO IF (p <> caster) THEN ( injure(caster, p, 30 - random(random(25)) - random(5) + random(i), 0); ) -# WAIT 420; -# IF (script_int(caster, "InvState") == 0) THEN ABORT; -# ) -# set_script_variable(caster, "InvState", 0); - -#NONMAGIC SILENT SPELL easter-invader-command : "#d" = -# (REQUIRE name_of(caster) == "Xakelbael the Dark") => -# EFFECT override_attack(caster, 3, ((200 - agi(caster)) * 5000) / 200, -# 8, ATTACK_ICON_GENERIC, 31, 0); -# ATTRIGGER CALL attack_check(target); -# area = rbox(location(target), 8); -# FOREACH MOB m IN area -# DO (message(caster, "Class Id: " + mob_id(m)); -# IF (mob_id(m) = 1040 || mob_id(m) == 1042 || mob_id(m) == 1047) THEN ( -# CALL sfx_generic(m); -# aggravate(m, 0, target); -# ) -# ) - -#NONMAGIC SILENT SPELL easter-invader-spike : "#w" = -# (REQUIRE name_of(caster) == "Xakelbael the Dark") => -# EFFECT FOR i = 1 TO 40 -# DO ( point = random_location(rbox(location(caster), sqrt(i) << 1)); -# IF (random(3)) -# THEN (sfx(point, 32, 0); -# WAIT 50; -# FOREACH PC p IN rbox(point, sqrt(i) >> 1) -# DO IF (p <> caster) -# THEN (injure(caster, p, i + random(i << 1), random(random(i)));) -# ) ELSE (sfx(point, 31, 0); -# WAIT 50; -# FOREACH PC p IN rbox(point, sqrt(i)) -# DO IF (p <> caster) -# THEN (injure(caster, p, i + random(i << 2), random(random(i)));) -# ) -# WAIT 400 - (i << 3); -# ) - -#NONMAGIC SILENT SPELL easter-invader-jump (t : STRING) : "#j" = -# (REQUIRE name_of(caster) == "Xakelbael the Dark") => -# EFFECT IF not (status_option(caster, 4096)) THEN ( sfx(caster, 33, 0); -# WAIT 200; ); -# IF (t == "r") THEN ( warp(caster, @("028-1.gat", 135, 49)); ) -# ELSE IF (t == "s") THEN ( warp(caster, @("028-1.gat", 75, 99)); ) -# ELSE IF (t == "c") THEN ( warp(caster, @("028-3.gat", 50, 58)); ) -# ELSE IF (t == "t") THEN ( warp(caster, @("009-1.gat", 48, 35)); ) -# ELSE { gmcommand "@jump"; }; - -#NONMAGIC SILENT SPELL easter-invader-taunt-local (s : STRING) : "#l" = -# (REQUIRE name_of(caster) == "Xakelbael the Dark") => -# EFFECT FOREACH PC p IN rbox(location(caster), 20) DO message(p, s); - -#NONMAGIC SILENT SPELL easter-invader-taunt-global (s : STRING) : "#b" = -# (REQUIRE name_of(caster) == "Xakelbael the Dark") => -# EFFECT FOREACH PC p IN rbox(location(caster), 100) DO message(p, s); - -#NONMAGIC SILENT SPELL easter-invader-spawn : "#c" = -# (REQUIRE name_of(caster) == "Xakelbael the Dark") => -# EFFECT spawn(rbox(location(caster), 20), caster, 1040, random(random(5)), 1, 100000); -# spawn(rbox(location(caster), 20), caster, 1042, random(random(5)), 1, 100000); -# spawn(rbox(location(caster), 20), caster, 1047, random(random(5)), 1, 100000); - NONMAGIC SILENT SPELL world-shift : "#alonzialonzo" = (REQUIRE (script_int(caster, "Easter_2010_QuestState") >> 16) & 1 == 1 && (script_int(caster, "Easter_2010_QuestState") >> 7) & 3 == 2) => # Travel only works when you have both helped the doctor at least thrice and have defeated the invader - top level requirement. ( (REQUIRE (count_item(caster, "DarkPetal")) && # Allow unlimited travel with the petal @@ -1667,43 +1383,6 @@ NONMAGIC SILENT SPELL world-shift : "#alonzialonzo" = ) ) -#NONMAGIC SILENT SPELL easter-invader-killer : "#z" = -# (REQUIRE name_of(caster) == "Xakelbael the Dark") => -# EFFECT { gmcommand "@killer"; } - -#NONMAGIC SILENT SPELL easter-invader-killable : "#x" = -# (REQUIRE name_of(caster) == "Xakelbael the Dark") => -# EFFECT { gmcommand "@killable"; } - -#NONMAGIC SILENT SPELL easter-debug-reset (s : STRING) : "#r" = -# (REQUIRE name_of(caster) == "Freeyorp") => -# EFFECT set_script_variable(pc(s), "Easter_2010_QuestState", 0); - -#NONMAGIC SILENT SPELL easter-set-flag (s : PC) : "#k" = -# (REQUIRE name_of(caster) == "Freeyorp" || name_of(caster) == "Xakelbael the Dark") => -# EFFECT IF (s == caster) THEN ABORT; -# IF ((script_int(s, "Easter_2010_QuestState") >> 16) & 1) THEN ( message(caster, s + " already has the flag set!"); ABORT; ) -# script_target = s; -# { set Easter_2010_QuestState, Easter_2010_QuestState | (1 << 16); // RETURN_READY flag -# mes "As the smoke clears, you feel stronger, vivified."; -# next; -# mes "The world seems more vibrant. It looks the same as ever, but you get a sense of something more."; -# next; -# mes "You feel something familiar."; -# next; -# mes "This sensation... could it be home?"; -# next; -# mes "A single word comes to your mind - " + getspellinvocation("world-shift") + ". While it sounds magical, you know with certainty that you will not need any magical power to use it."; -# next; -# mes "Could this be the way to move to and from the worlds? Either way, the dark petal the rose vanished into seems to be the key."; -# next; -# mes "Though you might be able to succeed in one trip without it, returning home."; -# if ((Easter_2010_QuestState >> E10_STATE_ROSE_SHIFT) & E10_STATE_ROSE_MASK == E10_STATE_ROSE_ROSE_COMPLETE) close; -# next; -# mes "But the world is still not quite right. Perhaps there is someone you should help before the world releases its hold on you?"; -# close; -# } - NONMAGIC SILENT SPELL easter-get-debug (p : PC) : "#e" = (REQUIRE name_of(caster) == "Freeyorp" || name_of(caster) == "Xakelbael the Dark") => EFFECT { message strcharinfo(0), "Global state egg1: " + $Easter_2010_Egg_Loc_State1; diff --git a/world/map/npc/001-1/vincent.txt b/world/map/npc/001-1/vincent.txt index eb4c1fed..1a64b055 100644 --- a/world/map/npc/001-1/vincent.txt +++ b/world/map/npc/001-1/vincent.txt @@ -2,11 +2,6 @@ 001-1.gat,135,42,0|script|Vincent|113, { - set @hw2011_npc_id, $@hw2011_npc_vincent; - if (gettime(7) == $@hw2011_year && gettime(6) == 10 && gettime(5) >= $@hw2011_start_day) - goto L_TrickOrTreat; - -L_Begin: // This NPC previously used the variable TMW_Quest callfunc "ClearVarTMW_Quest"; @@ -127,8 +122,4 @@ L_Close: S_Update_Var: set QUEST_SouthTulimshar, (QUEST_SouthTulimshar & ~(NIBBLE_2_MASK) | (@state << NIBBLE_2_SHIFT)); return; - -L_TrickOrTreat: - callfunc "TrickOrTreat2011"; - goto L_Begin; } diff --git a/world/map/npc/006-1/pachua.txt b/world/map/npc/006-1/pachua.txt index 7fe9377f..585a17f3 100644 --- a/world/map/npc/006-1/pachua.txt +++ b/world/map/npc/006-1/pachua.txt @@ -10,23 +10,9 @@ set $@xmas2011_start_day, 10; set $@xmas2011_reward_start_day, 25; -// lines belong to easter 2011: -// set @month, 4; -// set @start_day, 15; -// set @end_day, 30; - if (QUEST_MIRIAM_cheat != 0) goto L_warp_cheat; if (QUEST_MIRIAM_start != 0) goto L_smoke; -// lines belong to easter 2011: -// if (gettime(6) == @month && gettime(5) >= @start_day && gettime(5) <= @end_day && QUEST_Easter11 == 1) goto L_Basket; -// if (gettime(6) == @month && gettime(5) >= @start_day && gettime(5) <= @end_day && QUEST_Easter11 == 2) goto L_MakeBasket; -// if (gettime(6) == @month && gettime(5) >= @start_day && gettime(5) <= @end_day && QUEST_Easter11 == 3) goto L_SeeBunny; - - set @hw2011_npc_id, $@hw2011_npc_pachua; - if (gettime(7) == $@hw2011_year && gettime(6) == 10 && gettime(5) >= $@hw2011_start_day) - goto L_TrickOrTreat; - L_Begin: mes "[Chief Pachua]"; mes ""; @@ -323,8 +309,4 @@ L_SeeBunny: mes "\"You need to return to the Easter Bunny now.\""; next; goto L_Begin; - -L_TrickOrTreat: - callfunc "TrickOrTreat2011"; - goto L_Begin; } diff --git a/world/map/npc/008-1/george.txt b/world/map/npc/008-1/george.txt index 5faf73bf..5e0344ff 100644 --- a/world/map/npc/008-1/george.txt +++ b/world/map/npc/008-1/george.txt @@ -2,15 +2,6 @@ 008-1.gat,136,36,0|script|George#pirate|138, { - set @hw2011_npc_id, $@hw2011_npc_george; - if (gettime(7) == $@hw2011_year && gettime(6) == 10 && gettime(5) >= $@hw2011_start_day) - goto L_TrickOrTreat; - -// if (QUEST_Easter12 == 3 && ((gettime(6) == 3 && gettime(5) >= $@easter2012_start_day) || (gettime(6) == 4 && gettime(5) < $@easter2012_reward_start_day))) -// menu -// "Hey George, I need to ask some questions about a crime.", L_George_Easter2012; - -L_Begin: if (getequipid(equip_head) == 617) goto L_Pirate; if (getequipid(equip_head) == 622) goto L_Bandana; if (getequipid(equip_head) == 621) goto L_EyePatch; @@ -33,10 +24,6 @@ L_EyePatch: mes "\"Arrrrh! Looks like ye lost an eye there!\""; close; -L_TrickOrTreat: - callfunc "TrickOrTreat2011"; - goto L_Begin; - L_George_Easter2012: mes "[George the Pirate]"; mes "\"Aaarrrrh mate! That scarab armlet was a present from my grandfather, I swear! That is all I have to say...\""; diff --git a/world/map/npc/009-2/kfahr.txt b/world/map/npc/009-2/kfahr.txt index 0b82d06a..6a34e959 100644 --- a/world/map/npc/009-2/kfahr.txt +++ b/world/map/npc/009-2/kfahr.txt @@ -15,11 +15,6 @@ 009-2.gat,67,57,0|script|Kfahr|125, { - set @hw2011_npc_id, $@hw2011_npc_kfahr; - if (gettime(7) == $@hw2011_year && gettime(6) == 10 && gettime(5) >= $@hw2011_start_day) - goto L_TrickOrTreat; - -L_Begin: set @QS_NEWBIE, 0; set @QS_MET_KFAHR, 1; set @QS_KNOWS_KFAHR, 2; @@ -1083,8 +1078,4 @@ L_end: L_Update_Var: set QUEST_Forestbow_state, (QUEST_Forestbow_state & ~(@Q_MASK) | (@Q_status << @Q_SHIFT)); return; - -L_TrickOrTreat: - callfunc "TrickOrTreat2011"; - goto L_Begin; } diff --git a/world/map/npc/009-2/nurse.txt b/world/map/npc/009-2/nurse.txt index 5249819d..838d0ee2 100644 --- a/world/map/npc/009-2/nurse.txt +++ b/world/map/npc/009-2/nurse.txt @@ -24,11 +24,6 @@ //###################################################################################### 009-2.gat,147,65,0|script|Nurse|119, { - set @hw2011_npc_id, $@hw2011_npc_nurse; - if (gettime(7) == $@hw2011_year && gettime(6) == 10 && gettime(5) >= $@hw2011_start_day) - goto L_TrickOrTreat; - -L_Begin: callfunc "ClearVariables"; set @SNAKET_AMOUNT, 5; @@ -549,8 +544,4 @@ L_Game_toomuch: mes "[Nurse]"; mes "\"This would be way too much for my scale. I don't want to break it.\""; goto L_choosePut; - -L_TrickOrTreat: - callfunc "TrickOrTreat2011"; - goto L_Begin; } diff --git a/world/map/npc/010-2/workers.txt b/world/map/npc/010-2/workers.txt index 3dc6e928..2f7da8aa 100644 --- a/world/map/npc/010-2/workers.txt +++ b/world/map/npc/010-2/workers.txt @@ -9,16 +9,7 @@ 010-2.gat,39,75,0|script|Zack|155, { - set @hw2011_npc_id, $@hw2011_npc_zack; - if (gettime(7) == $@hw2011_year && gettime(6) == 10 && gettime(5) >= $@hw2011_start_day) - goto L_TrickOrTreat; - -L_Begin: mes "[Zack]"; mes "\"My brother and I are fixing the cellar pass.\""; close; - -L_TrickOrTreat: - callfunc "TrickOrTreat2011"; - goto L_Begin; } diff --git a/world/map/npc/021-1/eurni.txt b/world/map/npc/021-1/eurni.txt index 0170c6b6..8659c6cd 100644 --- a/world/map/npc/021-1/eurni.txt +++ b/world/map/npc/021-1/eurni.txt @@ -2,11 +2,6 @@ 021-1.gat,141,113,0|script|Eurni|136, { - set @hw2011_npc_id, $@hw2011_npc_eurni; - if (gettime(7) == $@hw2011_year && gettime(6) == 10 && gettime(5) >= $@hw2011_start_day) - goto L_TrickOrTreat; - -L_Begin: if (BaseLevel < 10) goto L_TooYoung; if (Zeny < 10000) goto L_NoMoney; @@ -42,8 +37,4 @@ L_NoMoney: mes "[Eurni the Surgeon]"; mes "\"You don't have enough to pay for my services.\""; close; - -L_TrickOrTreat: - callfunc "TrickOrTreat2011"; - goto L_Begin; } diff --git a/world/map/npc/021-1/inac.txt b/world/map/npc/021-1/inac.txt index b5b8fa45..75cd0451 100644 --- a/world/map/npc/021-1/inac.txt +++ b/world/map/npc/021-1/inac.txt @@ -2,11 +2,6 @@ 021-1.gat,53,103,0|script|Inac|156, { - set @hw2011_npc_id, $@hw2011_npc_inac; - if (gettime(7) == $@hw2011_year && gettime(6) == 10 && gettime(5) >= $@hw2011_start_day) - goto L_TrickOrTreat; - -L_Begin: mes "[Inac]"; mes "\"This cities water system is amazing. It was built centuries ago after the cataclysm that turned Tonori into this desert.\""; next; @@ -16,8 +11,4 @@ L_Begin: mes "[Inac]"; mes "\"They also say monsters have moved into the underground tunnels that bring and distribute water.\""; close; - -L_TrickOrTreat: - callfunc "TrickOrTreat2011"; - goto L_Begin; } diff --git a/world/map/npc/021-1/weellos.txt b/world/map/npc/021-1/weellos.txt index b3321eb4..98565f9e 100644 --- a/world/map/npc/021-1/weellos.txt +++ b/world/map/npc/021-1/weellos.txt @@ -6,11 +6,6 @@ set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@knowWeellosNT; set @kylian, ((QUEST_NorthTulimshar & $@businessmanNT_MASK) >> $@businessmanNT_SHIFT); - set @hw2011_npc_id, $@hw2011_npc_weellos; - if (gettime(7) == $@hw2011_year && gettime(6) == 10 && gettime(5) >= $@hw2011_start_day) - goto L_TrickOrTreat; - -L_Begin: if isin("021-1.gat", 130, 120, 140, 125) goto L_In; mes "[Weellos]"; @@ -33,8 +28,4 @@ L_BeforeClose: L_Close: set @kylian, 0; close; - -L_TrickOrTreat: - callfunc "TrickOrTreat2011"; - goto L_Begin; } diff --git a/world/map/npc/021-2/government_building.txt b/world/map/npc/021-2/government_building.txt index 79edfe37..8dd0c240 100644 --- a/world/map/npc/021-2/government_building.txt +++ b/world/map/npc/021-2/government_building.txt @@ -141,11 +141,6 @@ S_give_rings: 021-2.gat,36,17,0|script|Tathin|107, { - set @hw2011_npc_id, $@hw2011_npc_tathin; - if (gettime(7) == $@hw2011_year && gettime(6) == 10 && gettime(5) >= $@hw2011_start_day) - goto L_TrickOrTreat; - -L_Begin: mes "[Tathin]"; mes "\"Hello what Can I do for you?\""; next; @@ -220,10 +215,6 @@ L_NotEnoughMoney: mes "[Tathin]"; mes "\"You don't have enough GP\""; close; - -L_TrickOrTreat: - callfunc "TrickOrTreat2011"; - goto L_Begin; } // Guard diff --git a/world/map/npc/027-2/caretaker.txt b/world/map/npc/027-2/caretaker.txt index cb1cdc8f..7ed0a665 100644 --- a/world/map/npc/027-2/caretaker.txt +++ b/world/map/npc/027-2/caretaker.txt @@ -4,11 +4,6 @@ 027-2.gat,24,25,0|script|Caretaker|159, { - set @hw2011_npc_id, $@hw2011_npc_caretaker; - if (gettime(7) == $@hw2011_year && gettime(6) == 10 && gettime(5) >= $@hw2011_start_day) - goto L_TrickOrTreat; - -L_Begin: 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; @@ -127,8 +122,4 @@ OnWifeDeath: gmcommand "@ban +5mn " + strcharinfo(0); initnpctimer; end; - -L_TrickOrTreat: - callfunc "TrickOrTreat2011"; - goto L_Begin; } diff --git a/world/map/npc/debugroom_Woodland_mining_camp/_import.txt b/world/map/npc/debugroom_Woodland_mining_camp/_import.txt deleted file mode 100644 index 1a0603ae..00000000 --- a/world/map/npc/debugroom_Woodland_mining_camp/_import.txt +++ /dev/null @@ -1,3 +0,0 @@ -map: debugroom.gat -npc: npc/debugroom_Woodland_mining_camp/_mobs.txt -npc: npc/debugroom_Woodland_mining_camp/_warps.txt diff --git a/world/map/npc/debugroom_Woodland_mining_camp/_mobs.txt b/world/map/npc/debugroom_Woodland_mining_camp/_mobs.txt deleted file mode 100644 index f9413155..00000000 --- a/world/map/npc/debugroom_Woodland_mining_camp/_mobs.txt +++ /dev/null @@ -1,7 +0,0 @@ -// debugroom Woodland mining camp mobs - - - -debugroom.gat,0,0,0 script Mobdebugroom -1,{ - end; -} diff --git a/world/map/npc/debugroom_Woodland_mining_camp/_warps.txt b/world/map/npc/debugroom_Woodland_mining_camp/_warps.txt deleted file mode 100644 index 6980cf8e..00000000 --- a/world/map/npc/debugroom_Woodland_mining_camp/_warps.txt +++ /dev/null @@ -1,2 +0,0 @@ -// debugroom Woodland mining camp warps - diff --git a/world/map/npc/easter/2008/monsters.txt b/world/map/npc/easter/2008/monsters.txt deleted file mode 100644 index d886f519..00000000 --- a/world/map/npc/easter/2008/monsters.txt +++ /dev/null @@ -1,15 +0,0 @@ -002-2.gat,0,0,0,0 monster EasterFluffy 1027,1,0,0,0 -002-3.gat,0,0,0,0 monster EasterFluffy 1027,1,0,0,0 -001-1.gat,0,0,0,0 monster EasterFluffy 1027,1,0,0,0 -002-4.gat,0,0,0,0 monster EasterFluffy 1027,1,0,0,0 -005-1.gat,0,0,0,0 monster EasterFluffy 1027,1,0,0,0 -011-1.gat,0,0,0,0 monster EasterFluffy 1027,1,0,0,0 -019-1.gat,0,0,0,0 monster EasterFluffy 1027,1,0,0,0 -020-3.gat,0,0,0,0 monster EasterFluffy 1027,1,0,0,0 -010-2.gat,0,0,0,0 monster EasterFluffy 1027,1,0,0,0 -003-1.gat,0,0,0,0 monster EasterFluffy 1027,1,0,0,0 -007-1.gat,0,0,0,0 monster EasterFluffy 1027,1,0,0,0 -011-4.gat,0,0,0,0 monster EasterFluffy 1027,1,0,0,0 -008-1.gat,0,0,0,0 monster EasterFluffy 1027,1,0,0,0 -010-2.gat,0,0,0,0 monster EasterFluffy 1027,1,0,0,0 -05-3.gat,0,0,0,0 monster EasterFluffy 1027,1,0,0,0
\ No newline at end of file diff --git a/world/map/npc/easter/2008/npc.txt b/world/map/npc/easter/2008/npc.txt deleted file mode 100644 index abc422d4..00000000 --- a/world/map/npc/easter/2008/npc.txt +++ /dev/null @@ -1,49 +0,0 @@ -001-1.gat,40,40,6 script EasterBunny 139,{ - if (QUEST_Easter08_state > 0) goto L_Finished; - - mes "[Easter Bunny]"; - mes "Hi handsome! Happy Easter to you."; - next; - - set @cond, 0; - if (countitem("RedEasterEgg") > 0) set @cond, @cond + 1; - if (countitem("GreenEasterEgg") > 0) set @cond, @cond + 1; - if (countitem("BlueEasterEgg") > 0) set @cond, @cond + 1; - if (countitem("YellowEasterEgg") > 0) set @cond, @cond + 1; - if (countitem("PinkEasterEgg") > 0) set @cond, @cond + 1; - if (countitem("TealEasterEgg") > 0) set @cond, @cond + 1; - - if (@cond == 6) goto L_Give; - - L_Message: - mes "[Easter Bunny]"; - mes "Do you want to take part in the big easter egg hunt?"; - mes ""; - mes "There are fluffys all around the world with their magic easter eggs."; - mes "When you catch them and collect 6 different kinds of eggs I will"; - mes "give you a special prize!"; - if (@cond > 0) mes "You already have found "+@cond+" different eggs!"; - close; - - L_Give: - delitem "RedEasterEgg", 1; - delitem "GreenEasterEgg", 1; - delitem "BlueEasterEgg", 1; - delitem "YellowEasterEgg", 1; - delitem "PinkEasterEgg", 1; - delitem "TealEasterEgg", 1; - mes "[Easter Bunny]"; - mes "Here is your prize:"; - mes "The official easter 2008 headgear!"; - mes "Have fun!"; - getitem "BunnyEars", 1; - set QUEST_Easter08_state, 1; - close; - - L_Finished: - mes "[Easter Bunny]"; - mes "You already completed the quest."; - mes "But maybe you would like to help others complete it, too?"; - close; - -} diff --git a/world/map/npc/easter/2009/bunny.txt b/world/map/npc/easter/2009/bunny.txt deleted file mode 100644 index 62644f23..00000000 --- a/world/map/npc/easter/2009/bunny.txt +++ /dev/null @@ -1,89 +0,0 @@ -// The Easter Bunny - -007-1.gat,32,30, 0 script Easter Bunny 173,{ - callfunc "ClearVariables"; - if (QUEST_Easter09 == 1) goto L_CheckEggs; - if (QUEST_Easter09 == 2) goto L_Done; - - mes "[Easter Bunny]"; - mes "Oh dear! Oh dear! I shall be too late!"; - next; - - menu - "What do you mean?", -, - "Goodbye then.", close; - - mes "[Easter Bunny]"; - mes "It's already Easter and I haven't hid a single Easter egg yet. And the worst part is, they already started searching for the eggs. What am I going to do? I seriously need a miracle. I mean, there are so many people searching and I haven't even begun yet. What am I going to do?"; - next; - - menu - "Maybe I can help.", -, - "I'll leave you to it then.", close; - - mes "[Easter Bunny]"; - mes "It's hopeless, you can't help me, it's to late!"; - next; - - menu - "I'm sure they haven't searched everywhere. What about that stone over there?", -, - "You're probably right.", close; - - mes "[Easter Bunny]"; - mes "Maybe you're right. Here, go hide these 10 Easter eggs for me."; - - getitem "EasterEgg", 10; - set QUEST_Easter09, 1; - - close; - -L_CheckEggs: - set @count, 0; - set @temp, QUEST_Easter09_slots; - set @i, 0; - -L_CheckEggs_Loop: - if (@temp & 1) set @count, @count + 1; - set @i, @i + 1; - if (@i == 31) goto L_CheckEggs_Continue; - set @temp, @temp >> 1; - goto L_CheckEggs_Loop; - -L_CheckEggs_Continue: - if (@count > 10) goto L_ManyEggs; - if (@count == 10) goto L_EnoughEggs; - mes "[Easter Bunny]"; - mes "Please place " + (10 - @count) + " more eggs!"; - - set @temp, 10 - @count - countitem("EasterEgg"); - - if (@temp > 0) goto L_GiveMoreEggs; - close; - -L_GiveMoreEggs: - mes "[Easter Bunny]"; - mes "What happened to " + @temp + " of your eggs?"; - next; - - mes "[Easter Bunny]"; - mes "Never mind that. Take these and get them placed!"; - getitem "EasterEgg", @temp; - close; - -L_ManyEggs: - mes "[Easter Bunny]"; - mes "How did you manage to place more eggs than I gave you?"; - next; - -L_EnoughEggs: - mes "[Easter Bunny]"; - mes "Thanks! I'm saved. Now I don't need to be scared anymore. And I just came with the great plan to hide myself under a paper bag. Oh well, maybe you can use it."; - getitem "PaperBagHelm", 1; - set QUEST_Easter09, 2; - close; - -L_Done: - mes "[Easter Bunny]"; - mes "Thank you for placing those eggs for me!"; - close; -} diff --git a/world/map/npc/easter/2009/object.txt b/world/map/npc/easter/2009/object.txt deleted file mode 100644 index 263321aa..00000000 --- a/world/map/npc/easter/2009/object.txt +++ /dev/null @@ -1,407 +0,0 @@ -// - -function script Easter2009Object { - if (@action == 1) goto L_TryPlace; - - set @result, $Easter2009 >> @object; - set @result, @result & 1; - - if (@result == 1) goto L_GiveEgg; - return; - -L_GiveEgg: - set $Easter2009, $Easter2009 & ~(1 << @object); - getitem "EasterEgg", 1; - return; - -L_TryPlace: - set @has, QUEST_Easter09_slots >> @object; - set @has, @has & 1; - - if (@has == 1) goto L_AlreadyPlaced; - - set @has, $Easter2009 >> @object; - set @has, @has & 1; - - if (@has == 0) goto L_DoPlace; - set @result, 0; - return; - -L_DoPlace: - if (countitem("EasterEgg") > 0) goto L_DoPlace_Finish; - - mes "You don't have any eggs to place!"; - close; - -L_DoPlace_Finish: - delitem "EasterEgg", 1; - set @has, 1 << @object; - set QUEST_Easter09_slots, QUEST_Easter09_slots | @has; - set $Easter2009, $Easter2009 | @has; - set @result, 1; - return; - -L_AlreadyPlaced: - set @result, 2; - return; -} - -function script Easter2009Rock { - if (QUEST_Easter09 == 1) goto L_PlaceEgg; - mes "Do you want to examine this rock?"; - next; - menu - "Yes", -, - "No", close; - - set @action, 0; - callfunc "Easter2009Object"; - if (@result == 1) goto L_Found; - mes "There is nothing strange about this rock."; - close; - -L_Found: - mes "You found an egg under the rock."; - close; - -L_PlaceEgg: - mes "Do you want to put an egg under this rock?"; - next; - menu - "Yes", -, - "No", close; - - set @action, 1; - callfunc "Easter2009Object"; - if (@result == 1) goto L_Placed; - if (@result == 2) goto L_AlreadyPlaced; - mes "Strange, there is already an egg under this rock."; - close; - -L_Placed: - mes "You placed an egg under the rock."; - close; - -L_AlreadyPlaced: - mes "You already placed an egg under this rock!"; - close; -} - -function script Easter2009Tree { - if (QUEST_Easter09 == 1) goto L_PlaceEgg; - mes "Do you want to examine this tree?"; - next; - menu - "Yes", -, - "No", close; - - set @action, 0; - callfunc "Easter2009Object"; - if (@result == 1) goto L_Found; - mes "There is nothing strange about this tree."; - close; - -L_Found: - mes "You found an egg in the tree."; - close; - -L_PlaceEgg: - mes "Do you want to put an egg in this tree?"; - next; - menu - "Yes", -, - "No", close; - - set @action, 1; - callfunc "Easter2009Object"; - if (@result == 1) goto L_Placed; - if (@result == 2) goto L_AlreadyPlaced; - mes "Strange, there is already an egg in this tree."; - close; - -L_Placed: - mes "You placed an egg in the tree."; - close; - -L_AlreadyPlaced: - mes "You already placed an egg in this tree!"; - close; -} - -function script Easter2009Flower { - if (QUEST_Easter09 == 1) goto L_PlaceEgg; - mes "Do you want to examine these flowers?"; - next; - menu - "Yes", -, - "No", close; - - set @action, 0; - callfunc "Easter2009Object"; - if (@result == 1) goto L_Found; - mes "There is nothing strange about these flowers."; - close; - -L_Found: - mes "You found an egg among the flowers."; - close; - -L_PlaceEgg: - mes "Do you want to hide an egg with these flowers?"; - next; - menu - "Yes", -, - "No", close; - - set @action, 1; - callfunc "Easter2009Object"; - if (@result == 1) goto L_Placed; - if (@result == 2) goto L_AlreadyPlaced; - mes "Strange, there is already an egg here."; - close; - -L_Placed: - mes "You placed an egg with the flowers."; - close; - -L_AlreadyPlaced: - mes "You already placed an egg among these flowers!"; - close; -} - -function script Easter2009Pot { - if (QUEST_Easter09 == 1) goto L_PlaceEgg; - mes "Do you want to examine this pot?"; - next; - menu - "Yes", -, - "No", close; - - set @action, 0; - callfunc "Easter2009Object"; - if (@result == 1) goto L_Found; - mes "There is nothing strange about this pot."; - close; - -L_Found: - mes "You found an egg in the pot."; - close; - -L_PlaceEgg: - mes "Do you want to put an egg in this pot?"; - next; - menu - "Yes", -, - "No", close; - - set @action, 1; - callfunc "Easter2009Object"; - if (@result == 1) goto L_Placed; - if (@result == 2) goto L_AlreadyPlaced; - mes "Strange, there is already an egg in this pot."; - close; - -L_Placed: - mes "You placed an egg in the pot."; - close; - -L_AlreadyPlaced: - mes "You already placed an egg in this pot!"; - close; -} - -function script Easter2009Sign { - if (QUEST_Easter09 == 1) goto L_PlaceEgg; - mes "Do you want to examine this sign?"; - next; - menu - "Yes", -, - "No", close; - - set @action, 0; - callfunc "Easter2009Object"; - if (@result == 1) goto L_Found; - mes "There is nothing strange about this sign."; - close; - -L_Found: - mes "You found an egg near the sign."; - close; - -L_PlaceEgg: - mes "Do you want to put an egg near this sign?"; - next; - menu - "Yes", -, - "No", close; - - set @action, 1; - callfunc "Easter2009Object"; - if (@result == 1) goto L_Placed; - if (@result == 2) goto L_AlreadyPlaced; - mes "Strange, there is already an egg near this sign."; - close; - -L_Placed: - mes "You placed an egg near the sign."; - close; - -L_AlreadyPlaced: - mes "You already placed an egg near this sign!"; - close; -} - -007-1.gat,126,63,0 script Rock 127,{ - set @object, 0; - callfunc "Easter2009Rock"; -} - -009-1.gat,66,33,0 script Pot 127,{ - set @object, 1; - callfunc "Easter2009Pot"; -} - -009-1.gat,93,52,0 script Tree 127,{ - set @object, 2; - callfunc "Easter2009Tree"; -} - -007-1.gat,37,22,0 script Flowers 127,{ - set @object, 3; - callfunc "Easter2009Flower"; -} - -008-1.gat,38,32,0 script Tree 127,{ - set @object, 4; - callfunc "Easter2009Tree"; -} - -008-1.gat,43,21,0 script Flowers 127,{ - set @object, 5; - callfunc "Easter2009Flower"; -} - -018-1.gat,121,88,0 script Tree 127,{ - set @object, 6; - callfunc "Easter2009Tree"; -} - -010-1.gat,103,73,0 script Flowers 127,{ - set @object, 7; - callfunc "Easter2009Flower"; -} - -010-1.gat,31,45,0 script Rock 127,{ - set @object, 8; - callfunc "Easter2009Rock"; -} - -011-1.gat,83,39,0 script Pot 127,{ - set @object, 9; - callfunc "Easter2009Pot"; -} - -011-1.gat,33,78,0 script Tree 127,{ - set @object, 10; - callfunc "Easter2009Tree"; -} - -018-1.gat,64,98,0 script Rock 127,{ - set @object, 11; - callfunc "Easter2009Rock"; -} - -012-1.gat,88,122,0 script Flowers 127,{ - set @object, 12; - callfunc "Easter2009Flower"; -} - -012-1.gat,97,32,0 script Rock 127,{ - set @object, 13; - callfunc "Easter2009Rock"; -} - -012-1.gat,153,101,0 script Tree 127,{ - set @object, 14; - callfunc "Easter2009Tree"; -} - -013-1.gat,118,92,0 script Rock 127,{ - set @object, 15; - callfunc "Easter2009Rock"; -} - -013-1.gat,104,36,0 script Flowers 127,{ - set @object, 16; - callfunc "Easter2009Flower"; -} - -014-1.gat,100,37,0 script Flowers 127,{ - set @object, 17; - callfunc "Easter2009Flower"; -} - -014-1.gat,38,102,0 script Tree 127,{ - set @object, 18; - callfunc "Easter2009Tree"; -} - -014-1.gat,54,50,0 script Sign 127,{ - set @object, 19; - callfunc "Easter2009Sign"; -} - -015-1.gat,59,97,0 script Rock 127,{ - set @object, 20; - callfunc "Easter2009Rock"; -} - -015-1.gat,29,25,0 script Flowers 127,{ - set @object, 21; - callfunc "Easter2009Flower"; -} - -016-1.gat,83,54,0 script Pot 127,{ - set @object, 22; - callfunc "Easter2009Pot"; -} - -016-1.gat,62,83,0 script Sign 127,{ - set @object, 23; - callfunc "Easter2009Sign"; -} - -016-1.gat,20,51,0 script Tree 127,{ - set @object, 24; - callfunc "Easter2009Tree"; -} - -017-1.gat,77,32,0 script Sign 127,{ - set @object, 25; - callfunc "Easter2009Sign"; -} - -017-1.gat,104,90,0 script Tree 127,{ - set @object, 26; - callfunc "Easter2009Tree"; -} - -017-1.gat,37,76,0 script Flowers 127,{ - set @object, 27; - callfunc "Easter2009Flower"; -} - -009-1.gat,29,48,0 script Flowers 127,{ - set @object, 28; - callfunc "Easter2009Flower"; -} - -010-1.gat,127,99,0 script Tree 127,{ - set @object, 29; - callfunc "Easter2009Tree"; -} - -011-1.gat,34,95,0 script Rock 127,{ - set @object, 30; - callfunc "Easter2009Rock"; -} diff --git a/world/map/npc/easter/2010/Blocker.txt b/world/map/npc/easter/2010/Blocker.txt deleted file mode 100644 index 491180a7..00000000 --- a/world/map/npc/easter/2010/Blocker.txt +++ /dev/null @@ -1,13 +0,0 @@ -028-1.gat,120,124,0 script #28Barrier#_M 127,1,1{ - end; -OnTouch: - if (($Easter_2010_Npc_State2 >> E10_BARRIER_SHIFT) & E10_BARRIER_MASK == E10_BARRIER_ACTIVE) goto L_block; - - warp "028-3.gat", 33, 76; - end; - -L_block: - message strcharinfo(0), "There is some strange field around this opening. You cannot see any possible way to bypass it."; - end; - -} diff --git a/world/map/npc/easter/2010/Doctor.txt b/world/map/npc/easter/2010/Doctor.txt deleted file mode 100644 index fefd9814..00000000 --- a/world/map/npc/easter/2010/Doctor.txt +++ /dev/null @@ -1,509 +0,0 @@ -// Doctor 1, at the big tree. - -028-1.gat,27,108,0 script Doctor#who1 184,{ - // States here - callsub S_Helped_Count; - if (@Easter_2010_helper >= 2 && !((Easter_2010_QuestState >> E10_FLAG_MID_REWARD_SHIFT) & E10_FLAG_MID_REWARD_MASK)) - goto L_MidReward; - if (@Easter_2010_helper == 4 && !((Easter_2010_QuestState >> E10_FLAG_RETURN_READY_SHIFT) & E10_FLAG_RETURN_READY_MASK)) - goto L_Defeat_Invader; - if ((Easter_2010_QuestState >> E10_FLAG_RETURN_READY_SHIFT) & E10_FLAG_RETURN_READY_MASK == E10_FLAG_RETURN_READY && (Easter_2010_QuestState >> E10_STATE_ROSE_SHIFT) & E10_STATE_ROSE_MASK == E10_STATE_ROSE_ROSE_COMPLETE) - goto L_Return_Ready_Optional; - -// ====================== -// === First location === -// ====================== - -L_At_Tree: - // Checks for if the player has already helped the doctor, either here or elsewhere, go here. - if ((Easter_2010_QuestState >> E10_FLAG_HELPED_DOCTOR_TREE_SHIFT) & E10_FLAG_HELPED_DOCTOR_TREE_MASK == E10_FLAG_HELPED_DOCTOR_TREE) - goto L_At_Tree_Helped; - - if ((Easter_2010_QuestState >> E10_FLAG_KNOWS_DOCTOR_SHIFT) & E10_FLAG_KNOWS_DOCTOR_MASK == E10_FLAG_KNOWS_DOCTOR) - goto L_At_Tree_Knows_Doctor; - // Fallthrough, reaction to a player that is completely new. - - setarray @responses$, "\"This tree, I'm sure it's - \"The man looks up distractedly.\" Oh, hello. Can't talk now, I'm afraid, this world needs my help...\"", "He looks up, confused. \"Withering... why is this world dying? Perhaps--er, who are you? You'll have to excuse me, I'm a little preoccupied with this tree...\"", "\"What-what? I mean, sorry, hello! Can't quite talk, a bit busy trying to save this world.\" He seems to be deep in thought, brandishing what looks to be a small tool near the tree.", "\"You there! Do you realise what's happening here? This world is dying, much like a human would, perhaps. Nevertheless...\""; // Not many responses are needed here, since init only happens one per player. - callsub S_Update_Knows; - next; - if (countitem("Lifestone") > 0) - goto L_has_lifestone; - close; - -L_At_Tree_Knows_Doctor: - // More responses than the initial here, and need to be more of a hint. - setarray @responses$, "\"I just don't know what's wrong. My analysis tells me this tree is important, but I don't seem to have the right tool...\"", "A distinct... whirring noise sounds from the device the Doctor wields. \"You see this tree? Right here, this one! There's something amiss here, perhaps beyond my expertise.\"", "\"Yes, yes, all evidence points to this tree. \"He leans in for a closer look. \"Brilliant! No! Um... that's not right.\"", "He withdraws what appear to be glasses from his pocket and puts them on, peering intently at the tree.", "\"Mm-hmm, yes! Do you see what's wrong with this tree? No?\" He sounds somewhat dejected, but still determined. \"Well, neither do I, I'm afraid.\"", "The Doctor turns with a look of panic on his face, gesturing for you to stop talking. He turns back to the tree, muttering \"some way to heal...\""; - callsub S_Dialogue_Knows; - next; - - if (countitem("Lifestone") > 0) - goto L_has_lifestone; - mes "[Doctor]"; - mes ""; - mes "\"I'm trying to understand something, but it's got me quite confused, I'm afraid. I need something to assist me... something to counter the death...\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Unfortunately, I really can't think of anything to use. Please leave me alone while I think.\""; - next; - menu "Okay...", -, - "Actually, I just want to go home. Can you help?", L_Warning; - close; - -L_has_lifestone: - mes "[Doctor]"; - mes ""; - mes "\"I'm busy right now, I'm afraid I - what's that thing you've got there?\""; - next; - goto L_spotted_lifestone; - -L_spotted_lifestone: - menu - "That? That's just a Life Stone. Basic level one magic item.", L_want_lifestone, - "Sorry, I'm not interested in talking right now.", -; - close; - -L_want_lifestone: - mes "[Doctor]"; - mes ""; - mes "\"A Life Stone? It is not of this world... and it's just what I need! Where did you get it?\""; - next; - menu - "I made it myself!", L_made_lifestone, - "Elanore the Healer made it for me.", L_elanore_lifestone, - "I bought it off someone.", L_bought_lifestone, - "What? You expect me to remember where I get every single lifestone?", L_expect_lifestone; - close; - -L_made_lifestone: - mes "[Doctor]"; - mes ""; - mes "\"You made it? But then you... you must be from elsewhere as well! How did you get here?\""; - next; - menu - "A mysterious old woman gave me a flower, and then I appeared here.", L_woman_lifestone, - "I died.", L_dead_lifestone, - "I think I've told you enough for now...", -; - close; - -L_elanore_lifestone: - mes "[Doctor]"; - mes ""; - mes "\"Elanore the Healer... I have not heard of her, but she must be a powerful being indeed. But there are more pressing matters - will you lend me this... 'Life Stone'?\""; - next; - menu - "Yeah, whatever.", L_offer_lifestone, - "I'm not giving you my stuff!", -; - close; - -L_bought_lifestone: - mes "[Doctor]"; - mes ""; - mes "\"And you could afford it? Something as powerful as this must be worth a fortune.\""; - next; - menu - "Actually, it was only 100 GP.", L_cheap_lifestone, - "Yeah, well, I got a few million in the bank.", L_rich_lifestone, - "Powerful? I thought it just did minor healing.", L_powerful_lifestone; - close; - -L_expect_lifestone: - mes "[Doctor]"; - mes ""; - mes "\"Well, I suppose so. I need something like this, however... I must be sure it has not been tainted with darkness. If you don't remember where you got it, it's no use to me.\""; - close; - -L_woman_lifestone: - mes "[Doctor]"; - mes ""; - mes "\"An old woman gave you - ? Well, never mind that. This 'Life Stone'... I think I need it. Will you lend it to me?\""; - next; - menu - "Sure.", L_offer_lifestone, - "Sorry, I need it.", -; - close; - -L_dead_lifestone: - mes "[Doctor]"; - mes ""; - mes "\"So... you're dead? Then maybe this world is some kind of... afterlife to yours?\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"But if this world is dying, how can it be an afterlife? That doesn't make sense...\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Unless you were already dead, and you've been reincarnated...\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"But surely you wouldn't be able to make a powerful thing like this... this 'Life Stone' in a world for the dead?\""; - mes "\"But since you are here, and you do have this Life Stone - can I borrow it? I think I may need it, and quite soon.\""; - next; - menu - "Yes, take it.", L_offer_lifestone, - "No, I need it.", -; - close; - -L_cheap_lifestone: - mes "[Doctor]"; - mes ""; - mes "\"Then that was a bargain, my friend. This must surely be worth thousands! And I'm afraid I'm going to have to ask you if I may borrow it.\""; - next; - menu - "Yeah, you can.", L_offer_lifestone, - "Nope, sorry.", -; - close; - -L_rich_lifestone: - mes "[Doctor]"; - mes ""; - mes "\"Ah! I'm afraid I expected you to be poor... being the warrior type, I mean. Well... I'm going to need this Life Stone. It's quite important. Might I purchase it from you?\""; - next; - menu - "Indeed. That will be 50,000 GP, please.", L_expensive_lifestone, - "Better. You can have it for free!", L_offer_lifestone, - "No. It's mine.", -; - close; - -L_powerful_lifestone: - if (getskilllv(SKILL_MAGIC)) goto L_hasmagic_lifestone; - mes "[Doctor]"; - mes ""; - mes "\"It contains a strange power which I have never detected before... and I think I can use it. Can I borrow it off you?\""; - next; - menu - "Yeah, if you want.", L_offer_lifestone, - "Er... no. My powerful rock! Ha!", -; - close; - -L_hasmagic_lifestone: - mes "[Doctor]"; - mes ""; - mes "\"It contains a strange power which I have never detected before... except... in you. You have this power in you!\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Anyway... this stone, this Life Stone, can I borrow it?\""; - next; - menu - "Sure. Here you are.", L_offer_lifestone, - "Tell me more about this power.", L_power_lifestone, - "No.", -; - close; - -L_power_lifestone: - mes "[Doctor]"; - mes ""; - mes "\"There's nothing I can really tell you. I just know it's there, I don't know what it is. Can I borrow the Stone?\""; - next; - menu - "Yeah, sure.", L_offer_lifestone, - "No.", -; - close; - -L_help_lifestone: - mes "[Doctor]"; - mes ""; - mes "\"Just the boost I needed... hm? No, that's all for now, thank you. Is there anything *you* need?\""; - next; - menu "I might have some questions later, if you'll be here...", -, - "Thank you for the offer, really, but I'm fine.", -; - mes "[Doctor]"; - mes ""; - mes "\"Well, I'll still be gathering information myself, so perhaps we'll cross paths again.\""; - close; - -L_expensive_lifestone: - mes "[Doctor]"; - mes ""; - mes "\"Oh, excuse me. I'm not sure about your currency, but I don't think I can cover that right now. Please let me know if you change your mind.\""; - close; - -L_only_lifestone: - mes "[Doctor]"; - mes ""; - mes "\"Yes... uh, well, I suppose if you wanted I could pay you for it. Let me see now...\""; - next; - mes "\"Here we are! It's all I've got on me at the moment, I'm afraid.\""; - getitem "StrangeCoin", 1; - next; - menu - "Is there anything else you need?", L_help_lifestone, - "Alright then. Bye!", -; - close; - -L_offer_lifestone: - if (countitem("Lifestone") < 1) - goto L_lost_lifestone; - - delitem "Lifestone", 1; - callsub S_Update_Helped; - - if (countitem("Lifestone") == 0) - goto L_one_lifestone; - - mes "[Doctor]"; - mes ""; - mes "\"Wonderful! What a spot of luck it was you coming here with this. You don't know how much you deserve thanks.\""; - mes "He takes your lifestone and places it into a curious device, then waves the device up and down the tree. It makes a number of beeping sounds, and the Doctor seems happy."; - next; - goto L_given_lifestone; - -L_one_lifestone: - mes "[Doctor]"; - mes ""; - mes "\"Wonderful! What a spot of luck it was you coming here with this. You don't know how much you deserve thanks.\""; - mes "He takes your lifestone and places it into a curious device, then waves the device up and down the tree. It makes a number of beeping sounds, and the Doctor seems happy."; - next; - menu - "Is there anything else you need?", L_help_lifestone, - "That was the only one I had, I'm glad it helped.", L_only_lifestone, - "Alright then. Bye!", -; - close; - -L_lost_lifestone: - mes "[Doctor]"; - mes ""; - mes "\"Brilliant! Fantastic! This will surely help... Wait, I thought you had a lifestone for me? Well, maybe you can come by again when you do.\""; - close; - -L_given_lifestone: - menu - "Is there anything else you need?", L_help_lifestone, - "Alright then. Bye!", -; - close; - -L_At_Tree_Helped: - mes "[Doctor]"; - mes ""; - mes "\"Fantastic! Your help with this tree is much appreciated. I believe we are that much closer to solving this mystery.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"I suspect there is still much to do. Please feel free to look around, there might be more information to gather elsewhere.\""; - next; - menu "Okay, I'll see you around!", -, - "Actually, I'd like to go home now. Any chance you could help?", L_Warning; - close; - -// =================================================================== -// Helper portions, duplicated in each script for want of time, sorry. -// =================================================================== - -// The player has defeated the invader and helped enough times. -L_Return_Ready_Optional: - if (!(~(Easter_2010_QuestState >> E10_HELPED_DOCTOR_SHIFT) & E10_HELPED_DOCTOR_MASK) || ((Easter_2010_QuestState >> E10_HELPED_DOCTOR_TREE_SHIFT) & E10_HELPED_DOCTOR_TREE_MASK)) - goto L_Return_Ready; - - // Player can help one more time, if so desired. - mes "[Doctor]"; - mes ""; - mes "\"Well... this has been quite an adventure, hasn't it? I'd say it's about timey--er, time for me to go, but I think I can stick around for a little while longer to tie up some loose ends for myself.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Oh, did you want to help again?\""; - next; - menu "Sure, that sounds good", L_At_Tree, - "Hm, I can't right now, but maybe later.", L_Return_Ready, - "I was looking for a way to go home.", L_Return_Capable, - "No, sorry, I don't think so.", L_Return_Ready; - close; - -// Player has done "everything" to do in this world, just talking to the Doctor. -L_Return_Ready: - set @parting$, "!"; - if (strcharinfo(0) == "Alonso" || strcharinfo(0) == "AlOnS") set @parting$, ", Alonso!"; - mes "[Doctor]"; - mes ""; - mes "\"Well, you have been absolutely brilliant! Brilliant! Very impressive.\" He smiles kindly and shakes your hand. \"It has been a pleasure. Now for the next adventure. Allons-y" + @parting$ + "\""; - close; - -L_Defeat_Invader: - mes "[Doctor]"; - mes ""; - mes "\"Ah-ha! It's nice to see you again. How goes the battle?\""; - next; - menu "I'm having a hard time, actually. I'd like to go home...", -, - "Regrouping now for the next encounter, actually.", L_Encourage; - goto L_Warning; - -L_Encourage: - mes "[Doctor]"; - mes ""; - mes "\"Oh, well, I think you'll prevail in the end! If you'll excuse me, I still have some things to see to.\""; - close; - -L_MidReward: - if (((Easter_2010_QuestState >> E10_FLAG_MID_REWARD_SHIFT) & E10_FLAG_MID_REWARD_MASK)) close; - mes "[Doctor]"; - mes ""; - mes "\"Fantastic! You have really been quite helpful.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Er, now that I think about it, perhaps I have something you'd be interested in.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"While visiting another dimension--hm, as a matter of fact, it was quite like this one. But their choices in the past seem to have differed from the ones here...\""; - next; - mes "[Doctor]"; - mes ""; - mes "The Doctor reflects on his words. \"Interesting how things turn out. Well, I now have a lot of these Valentine's Glasses, if you'd like a pair.\""; - next; - getinventorylist; - if (@inventorylist_count == 100) - goto L_MidReward_NoRoom; - mes "[Doctor]"; - mes ""; - mes "He hands you the glasses."; - mes "\"They're not too brainy, or suited for detecting background radiation, but they are charming.\""; - set Easter_2010_QuestState, Easter_2010_QuestState & ~(E10_FLAG_MID_REWARD_MASK << E10_FLAG_MID_REWARD_SHIFT) | (E10_FLAG_MID_REWARD << E10_FLAG_MID_REWARD_SHIFT); - getitem E10_MIDREWARD_ID, 1; - close; - -L_MidReward_NoRoom: - mes "[Doctor]"; - mes ""; - mes "\"Oh, I don't think you have room for these. Well, I suppose I'll hold on to them for now.\""; - close; - -// Warning about the potential perils ahead, but the player must still want to abort the quest. -L_Warning: - mes "[Doctor]"; - mes ""; - mes "\"There is no doubt in my mind that what awaits us is both powerful and dangerous, to say the least.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"If this... destruction, this disregard for life isn't an indication, what is?\""; - mes "He takes a moment, searching your face."; - next; - mes "[Doctor]"; - mes ""; - if (((Easter_2010_QuestState >> E10_HELPED_DOCTOR_SHIFT) & E10_HELPED_DOCTOR_MASK)) - mes "\"I do appreciate your help thus far, really. And I did look forward to working with you again in putting an end to this devastation.\""; - if (!((Easter_2010_QuestState >> E10_HELPED_DOCTOR_SHIFT) & E10_HELPED_DOCTOR_MASK)) - mes "\"Despite the danger, I think pressing on would certainly be a brave choice.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"But if you were to leave now, I'm afraid it would be impossible to return...\""; - mes "He pauses again. \"There is still time for you to turn back now, while it's relatively easy.\""; - next; - menu "N-no, I-I think I will continue... Yes, I'm ready!", -, - "Now that you mention it, maybe I'd better leave now while I can.", L_Turn_Back, - "Um, could I have a minute to think it over?", -; - close; - -L_Turn_Back: - mes "[Doctor]"; - mes ""; - mes "\"You really want to turn back now?\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"I don't think there's any shame in going back. Quite the contrary. You're brave for even being here.\""; - mes "He hesitates ever so slightly, choosing his words. \"I just wanted to make sure you were certain about your decision.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Once you've left, I don't see how you'll be able to return.\""; - next; - menu "On second thought, perhaps I will stick around.", -, - "No, no, I'm quite sure I want to leave.", L_Really_Return; - close; - -// The player definitely wants to go back, and there's no returning. -L_Really_Return: - if ((Easter_2010_QuestState >> E10_FLAG_RETURN_READY_SHIFT) & E10_FLAG_RETURN_READY_MASK == E10_FLAG_RETURN_READY && (Easter_2010_QuestState >> E10_STATE_ROSE_SHIFT) & E10_STATE_ROSE_MASK == E10_STATE_ROSE_ROSE_COMPLETE) - goto L_Return_Capable; - mes "[Doctor]"; - mes ""; - mes "\"If that is what you want, then consider it done. And good luck.\""; - next; - goto L_Return_Player; - -L_Return_Player: - callsub S_Helped_Count; - if (countitem("DarkPetal") == 0 && @Easter_2010_helper < 3) goto L_Difficult_Return; - set Easter_2010_QuestState, (Easter_2010_QuestState & ~(E10_STATE_ROSE_MASK << E10_STATE_ROSE_SHIFT)) | (E10_STATE_ROSE_RETURNED << E10_STATE_ROSE_SHIFT); - if (@Easter_2010_helper < 3) - delitem "DarkPetal", 1; - savepoint "009-1", 52, 40; - warp "009-1", 0, 0; - close; - -L_Difficult_Return: - mes "[Doctor]"; - mes ""; - mes "\"Hm... you don't seem to have the thing that brought you here, that petal, that I could have used to send you back... assuming you really do want to give up.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Others have been able to battle some darkness directly, which might serve as a substitute.\""; - mes "\"You could still help me here and elsewhere if you want to try to get this done once and for all, but if you want to go early you will need to fight, somehow.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Though there are others helping, too. No doubt that soon enough, you'll be able to go anyway...\""; - close; - -L_Return_Capable: - mes "[Doctor]"; - mes ""; - mes "\"Hm. Oh, it looks like you've learned how to travel between these worlds on your own. Don't you remember the way?\""; - next; - menu "Oh, you're right! It was a spell, um..." + getspellinvocation("world-shift") + " was the name!", -; - mes "[Doctor]"; - mes ""; - mes "\"Excellent! Though I suspect its effects will work best when you are closer to where you started.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"When you came to this world, where did you end up? I trust that is your origin.\""; - close; - -S_Dialogue_Knows: - mes "[Doctor]"; - mes ""; - mes "\"Oh, hello again... hm...\""; - next; - mes "[Doctor]"; - mes ""; - mes @responses$[rand(getarraysize(@responses$))]; - return; - -S_Update_Knows: - // Working "name" for when he hasn't introduced himself (can be changed). - mes "[Mysterious Man]"; - mes ""; - mes @responses$[rand(getarraysize(@responses$))]; - next; - set Easter_2010_QuestState, Easter_2010_QuestState & ~(E10_FLAG_KNOWS_DOCTOR_MASK << E10_FLAG_KNOWS_DOCTOR_SHIFT) | (E10_FLAG_KNOWS_DOCTOR << E10_FLAG_KNOWS_DOCTOR_SHIFT); - mes "[Doctor]"; - mes ""; - mes "\"Oh, excuse me,\" he gestures. \"I'm the Doctor.\""; - return; - -S_Update_Helped: - set Easter_2010_QuestState, Easter_2010_QuestState & ~(E10_FLAG_HELPED_DOCTOR_TREE_MASK << E10_FLAG_HELPED_DOCTOR_TREE_SHIFT) | (E10_FLAG_HELPED_DOCTOR_TREE << E10_FLAG_HELPED_DOCTOR_TREE_SHIFT); - callsub S_Helped_Count; - if (@Easter_2010_helper == 3) set Easter_2010_QuestState, (Easter_2010_QuestState & ~(E10_STATE_ROSE_MASK << E10_STATE_ROSE_SHIFT)) | (E10_STATE_ROSE_ROSE_COMPLETE << E10_STATE_ROSE_SHIFT); - return; - -S_Helped_Count: - set @Easter_2010_helper, 0; - if ((Easter_2010_QuestState >> E10_FLAG_HELPED_DOCTOR_TREE_SHIFT) & E10_FLAG_HELPED_DOCTOR_TREE_MASK == E10_FLAG_HELPED_DOCTOR_TREE) - set @Easter_2010_helper, @Easter_2010_helper + 1; - if ((Easter_2010_QuestState >> E10_FLAG_HELPED_DOCTOR_ISLAND_SHIFT) & E10_FLAG_HELPED_DOCTOR_ISLAND_MASK == E10_FLAG_HELPED_DOCTOR_ISLAND) - set @Easter_2010_helper, @Easter_2010_helper + 1; - if ((Easter_2010_QuestState >> E10_FLAG_HELPED_DOCTOR_STONES_SHIFT) & E10_FLAG_HELPED_DOCTOR_STONES_MASK == E10_FLAG_HELPED_DOCTOR_STONES) - set @Easter_2010_helper, @Easter_2010_helper + 1; - if ((Easter_2010_QuestState >> E10_FLAG_HELPED_DOCTOR_FRUIT_SHIFT) & E10_FLAG_HELPED_DOCTOR_FRUIT_MASK == E10_FLAG_HELPED_DOCTOR_FRUIT) - set @Easter_2010_helper, @Easter_2010_helper + 1; - return; -} diff --git a/world/map/npc/easter/2010/Doctor2.txt b/world/map/npc/easter/2010/Doctor2.txt deleted file mode 100644 index c98f71c2..00000000 --- a/world/map/npc/easter/2010/Doctor2.txt +++ /dev/null @@ -1,661 +0,0 @@ -// Doctor 2, at the island. - -028-1.gat,89,37,0 script Doctor#who2 184,{ -// States here - callsub S_Helped_Count; - if (@Easter_2010_helper >= 2 && !((Easter_2010_QuestState >> E10_FLAG_MID_REWARD_SHIFT) & E10_FLAG_MID_REWARD_MASK)) - goto L_MidReward; - if (@Easter_2010_helper == 4 && !((Easter_2010_QuestState >> E10_FLAG_RETURN_READY_SHIFT) & E10_FLAG_RETURN_READY_MASK)) - goto L_Defeat_Invader; - if ((Easter_2010_QuestState >> E10_FLAG_RETURN_READY_SHIFT) & E10_FLAG_RETURN_READY_MASK == E10_FLAG_RETURN_READY && (Easter_2010_QuestState >> E10_STATE_ROSE_SHIFT) & E10_STATE_ROSE_MASK == E10_STATE_ROSE_ROSE_COMPLETE) - goto L_Return_Ready_Optional; - -// ======================= -// === Second location === -// ======================= - -L_At_Island: - // Checks for if the player has already helped the doctor, either here or elsewhere, go here. - if ((Easter_2010_QuestState >> E10_FLAG_HELPED_DOCTOR_ISLAND_SHIFT) & E10_FLAG_HELPED_DOCTOR_ISLAND_MASK == E10_FLAG_HELPED_DOCTOR_ISLAND) - goto L_At_Island_Helped; - - if ((Easter_2010_QuestState >> E10_FLAG_KNOWS_DOCTOR_SHIFT) & E10_FLAG_KNOWS_DOCTOR_MASK == E10_FLAG_KNOWS_DOCTOR) - goto L_At_Island_Knows_Doctor; - - setarray @responses$, "\"Odd spheres of energy floating about... Interesting. The decay is very severe here...\" He looks over, as if only now noticing your presence. \"Excuse me, how do you do? Don't mean to be rude, just lost in thought...\"", "There's a man in glasses, scanning the area carefully. \"There are more trees affected than I had thought.\" He extends his hand, waving a small device around carefully.", "\"Well, so what does that mea--oh, sorry! Please don't mind me, but right now I'm trying to figure out why this world is dying.\"", "A somewhat oddly dressed man turns about. Suddenly, he speaks up, \"No, no, something's definitely wrong. Explain it? Well... it's complicated.\""; - callsub S_Update_Knows; - close; - -L_At_Island_Knows_Doctor: - setarray @responses$, "\"Oi! What killed these trees...\" He takes a moment, studying carefully. \"And this open area--there don't seem to be any creatures around. Interesting.", - "\"Hm, do you know anything about those spheres of energy?\" The device he's holding glows briefly. \"Well, that's what I thought. If you'll excuse me for a moment.\" He adjusts his glasses and continues his work.", - "\"There's the other, big tree... Then there are these trees, and... glowing orbs. Some... force is slowly destroying this world.\" The Doctor finishes his thought and continues pacing.", - "The Doctor takes out the same strange device, anticipating a question and responding. \"Oh, this, it's good for everything. Right now I'm looking for what might be controlling these blobs of light; they don't seem to be moving on their own.\"", - "\"I know there is some other agent at work here. I don't quite know what it is yet, but... Well, if you have any information that could help, please do share.\""; - - callsub S_Dialogue_Knows; - next; - -L_At_Island_Menu: - setarray @menuitems$, "", "", "", "", ""; - set @c, 0; - - set @menuitems$[@c], "What's going on here? It looks like everything is dying! The trees are dead and decaying, the grass is weak and easily crushed, and the animals are gone!"; - set @menuid[@c], E10_ISLAND_MENU_DEATH_AWE; - set @c, @c + 1; - - set @menuitems$[@c], "There's an eerie sort of silence about this place, don't you think? ... Er, what was that?! ... It doesn't seem all that safe here..."; - set @menuid[@c], E10_ISLAND_MENU_SCARED; - set @c, @c + 1; - - set @menuitems$[@c], "The orbs of light flying about? Wisps. And you know, they do seem to be behaving strangely, or as much is possible given the circumstances. You think there's a reason for that?"; - set @menuid[@c], E10_ISLAND_MENU_WISPS; - set @c, @c + 1; - - - if (!(Easter_2010_QuestState & (E10_FLAG_HELPED_DOCTOR_TREE << E10_FLAG_HELPED_DOCTOR_TREE_SHIFT))) goto L_post_tree_help; - set @menuitems$[@c], "This place looks dead... do you need any more lifestones?"; - set @menuid[@c], E10_ISLAND_MENU_OFFER_LIFESTONE; - set @c, @c + 1; - -L_post_tree_help: - menu - @menuitems$[0], -, - @menuitems$[1], -, - @menuitems$[2], -, - @menuitems$[3], -, - @menuitems$[4], -, - "I'm actually more interested in going home.", L_Warning; - - set @menu, @menu -1; - if (@menu >= @c) close; - if (@menuid[@menu] == E10_ISLAND_MENU_DEATH_AWE) goto L_At_Island_Death_Awe; - if (@menuid[@menu] == E10_ISLAND_MENU_SCARED) goto L_At_Island_Scared; - if (@menuid[@menu] == E10_ISLAND_MENU_WISPS) goto L_At_Island_Wisps; - if (@menuid[@menu] == E10_ISLAND_MENU_OFFER_LIFESTONE) goto L_At_Island_Offer_Lifestone; - close; - -L_At_Island_Death_Awe: - mes "[Doctor]"; - mes ""; - mes "\"Yes, yes. For most, death can't be avoided, but this...\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"So much death, and so quickly, even. It doesn't seem quite natural, does it?\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Take a look at this, won't you?\""; - next; - menu "I'm not sure, what am I looking for exactly?", -; - mes "[Doctor]"; - mes ""; - mes "\"Ah, you don't see it? Well, these glasses of mine--well, here, take a look\""; - next; - mes "[Doctor]"; - mes ""; - mes "The Doctor takes off his red-blue glasses and holds them up. You peer through and examine the surroundings."; - next; - menu "I... don't see anything unusual, sorry.", -, - "Oh, something about the grass?", L_At_Island_Grass, - "Er, what exactly do these glasses do?", L_At_Island_Glasses, - "Oh, so the... the um... that?", -, - "Right, of course, that is... very... interesting?", -, - "Could you hold that thought? I need to check on something else first.", -; - close; - -L_At_Island_Grass: - mes "[Doctor]"; - mes ""; - mes "The Doctor pauses, examining the ground. \"Now that you mention it...\" He holds up a blade of grass between his fingers. \"There is a sort of strange texture about it, perhaps slightly grating.\""; - next; - menu "Yes, I had noticed that, too. Do you think it's relevant?", L_At_Island_Explain, - "Hm, now that I think about it, it doesn't seem all too different from my own world's.", L_At_Island_Explain, - "Do you think it's a result of all the death here?", L_At_Island_Explain, - "Oh, excuse me for just a second.", -; - close; - -L_At_Island_Glasses: - mes "[Doctor]"; - mes ""; - mes "\"Well, I had suspected that what may have been causing damage to this world was in fact from another universe.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"So you can think of these glasses as the means to identifying when something or someone has gone through the Void.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Here, let me show you.\" The Doctor turns the glasses so you can view him and moves around."; - next; - menu "Oh, wow. There's a sort of... grainy effect about you. Like particles?", -; - mes "[Doctor]"; - mes ""; - mes "\"Yes, stuff from the Void. I saw something earlier, but nothing now. Strange.\""; - close; - -L_At_Island_Explain: - mes "[Doctor]"; - mes ""; - mes "\"Well, from the other things I've seen here, I wouldn't couldn't say so definitively, but it's possible.\""; - next; - mes "Your eyes follow the Doctor as he begins to pace. He pauses to continue his thought."; - next; - mes "[Doctor]"; - mes ""; - if ((Easter_2010_QuestState >> E10_HELPED_DOCTOR_SHIFT) & E10_HELPED_DOCTOR_MASK) - goto L_At_Island_Theory; - mes "\"Well, it's interesting. I'll have to take a closer look.\""; - close; - -L_At_Island_Theory: - mes "[Doctor]"; - mes ""; - mes "\"Based on what we had uncovered before, I think some force is exerting its will on those glowing entities.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"How it all ties together is what I'm still trying to figure out.\" He adjusts his glasses again."; - next; - menu "It is very strange, can't argue there.", -, - "I have faith in you.", -, - "What if--oh, are you thinking about something?", L_At_Island_Knows_Doctor, - "Yes, that is an interesting idea. I will think it over for a bit.", -; - close; - -L_At_Island_Scared: - mes "[Doctor]"; - mes ""; - mes "\"Ahh, feeling a bit anxious are we? I don't blame you, chap, it is a bit unnerving here.\" The Doctor continues to analyze the environment with his various instruments, apparently lost in thought."; - next; - mes "[Doctor]"; - mes ""; - mes "\"It's really quite strange... the levels of electromagnetic energy in the area seem to be spiking regularly, almost in time with the movements of these glowing blobs.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Judging from these readouts, it would seem that either some force is acting upon these orbs of light, or they are in fact creating a sporadic magnetic field.\""; - next; - menu "What? I'm just really, really scared!", L_At_Island_Terror, - "Electromagnetic what now?", L_At_Island_Magnetic, - "I've got to get out of here!", L_At_Island_Terror, - "Um, uh, I... gotta run... to some place more safe.", L_At_Island_Terror; - close; - -L_At_Island_Terror: - mes "[Doctor]"; - mes ""; - if (BaseLevel == 99) - mes "\"Really? Out of those I've detected here, I would have thought you'd be among the most skilled.\""; - if (BaseLevel >= 90 && BaseLevel <= 98) - mes "\"Er, um? I'm so sorry, I had assumed you were more than capable for this sort of thing."; - if (BaseLevel >= 70 && BaseLevel <= 89) - mes "\"Please excuse me, but I had sensed you were stronger than that.\""; - if (BaseLevel >= 50 && BaseLevel <= 69) - mes "\"Ah... well, I have seen others here, too. Perhaps you could work together?\""; - if (BaseLevel <= 49) - mes "\"Don't lose hope, you're not alone in all this. We'll get through it.\""; - next; - menu "I don't know what to say...", -, - "Yes, yes, you're absolutely right!", L_At_Island_Calm, - "I-I need a moment to think.", -; - close; - -L_At_Island_Magnetic: - mes "[Doctor]"; - mes ""; - mes "\"Well, haven't you noticed the strange behaviour of those blobs of light?\""; - next; - menu "Um, strange doesn't even begin to cover this world.", -, - "Sure, I can never find enough stuff after fighting them.", L_At_Island_Loot, - "Other than the fact that they wish to kill me?", L_At_Island_Wisps, - "Blobs? I hadn't noticed anything.",L_At_Island_Knows_Doctor; - close; - -L_At_Island_Calm: - mes "[Doctor]"; - mes ""; - mes "\"There, isn't that better?\" He smiles warmly. \"Now, I was thinking--\""; - next; - menu "Sorry to interrupt, but...", L_At_Island_Menu, - "*I* was thin--oh, thought you were pausing. Sorry, please continue.", L_At_Island_Theory, - "Sorry, I need another moment to regain my composure.", -; - close; - -L_At_Island_Loot: - mes "[Doctor]"; - mes ""; - mes "He seems confused. \"Find enough stuff? I'm not sure I could help you there, but perhaps someone else can?\""; - close; - -L_At_Island_Wisps: - mes "[Doctor]"; - mes ""; - mes "\"I'm glad you asked! You see, the behaviour of these creatures doesn't appear to be very natural at all; the elephant in the room if you will.\" The Doctor pauses temporarily to check his instruments again."; - next; - menu "Well, they are normally very peaceful; they'll only attack if you attack them.", -; - mes "[Doctor]"; - mes ""; - mes "\"Interesting! I've seen them attack with no discernable provocation. This is quite ominous. \""; - next; - mes "[Doctor]"; - mes ""; - mes "\If it didn't sound so mad, I'd postulate that something is controlling these things... some malevolent force or entity.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Oh, sorry, what do you think?\""; - next; - menu "That doesn't seem quite right, to be honest.", -, - "Now that you mention it, I had some ideas.", L_At_Island_Ideas, - "Malevolent? Where did you get that idea?", -, - "Instruments? They seem quite versatile.", L_At_Island_Devices, - "That's a lot for me to take in right now. Excuse me.", -; - close; - -L_At_Island_Ideas: - menu "Strange behaviour comes up with magic in my world, like agitating creatures to do harm.", L_At_Island_Magic, - "Maybe something or someone is summoning them?", L_At_Island_Summon, - "Could it be possible they're not from this place, either?", L_At_Island_Void, - "Maybe this sounds crazy, but... could these be the remains of all the entities that have died?", L_At_Island_Spirits, - "I don't understand time all that well, but perhaps the wisps indicate a rip... in the fabric?", L_At_Island_Time, - "Er, how embarrassing. I seem to have forgotten what I was going to say.", -; - close; - -L_At_Island_Devices: - mes "[Doctor]"; - mes ""; - mes "\"Hm? Oh, ha-ha, like this?\" The Doctor points out one of the instruments."; - next; - mes "[Doctor]"; - mes ""; - mes "\"They are very useful, yes! Fantastic, even. Proved invaluable in so many circumstances.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Yes. Well, then.\" He continues his analysis, putting something away, almost in anticipation of your next question."; - close; - -L_At_Island_Magic: - mes "[Doctor]"; - mes ""; - mes "\"Magic, you say? Yes, I have been hearing about that from others, too.\""; - mes "The Doctor looks off into the distance."; - next; - menu "Erm? Hello?", -; - mes "[Doctor]"; - mes ""; - mes "\"Still here, just wondering. So you say it's possible to aggravate creatures where you come from?\""; - next; - menu "Yes, within a certain radius of the caster, it is possible.", -; - mes "[Doctor]"; - mes ""; - mes "\"Really? Ha-ha! I knew it. Tell me more, could you? Anything particular about the practice of magic in your world?\""; - next; - menu "Well... it is possible to follow a darker path, so to speak, when it comes to practicing magic.", L_At_Island_Dark, - "Hm. Not sure if it's relevant, but I have often suspected an unknown evil in my own world.", L_At_Island_Dark, - "Even the 'good' practicioners seem to exhibit malicious behaviour at times.", L_At_Island_Evil, - "I don't know much more than that, I'm afraid.", -; - close; - -L_At_Island_Summon: - mes "[Doctor]"; - mes ""; - mes "\"Summoning them? Via some sort of magic, presumably, or do you mean by other means?\""; - next; - menu "Yes, with magic, I think. The creatures can be aggravated, even.", L_At_Island_Magic, - "Other means? I never thought of that. Could you explain?", L_At_Island_Void, - "On second thought, I've lost my train of thought.", -; - close; - -L_At_Island_Void: - mes "[Doctor]"; - mes ""; - mes "\"Sure, it is a distinct possibility.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"The Void, or otherwise this sort of, empty space between universes.\""; - mes "\"It might be easier to think about the universes as being stacked on top of one another, though can't quite say there's an up or a down about the Void.\""; - close; - -L_At_Island_Spirits: - mes "[Doctor]"; - mes ""; - mes "\"Sort of like spirits?\" Or are you suggesting that these blobs are the collective energy lost upon death?\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Um, I'm not sure what to make of that.\""; - close; - -L_At_Island_Time: - mes "[Doctor]"; - mes "\"Time, did you say?\" He takes a moment. \"Well, it's more like a big ball--it's probably not what you think. But you know? I have detected temporal abnormalities here.\""; - close; - -L_At_Island_Dark: - mes "[Doctor]"; - mes ""; - mes "\"Your home isn't all that safe? Are there regular patrols, or is there a shortage of help?\""; - next; - menu "I forgot what we were talking about. Something about the wisps?", L_At_Island_Wisps, - "Well, either way, I can't quite compare that to this... sinister atmosphere.", -, - "It--wait, a shortage? Well...", L_At_Island_Help; - mes "[Doctor]"; - mes ""; - mes "\"That feeling does pervade this world. A darkness that wishes to smother and extinguish all in its path.\""; - next; - menu "Maybe a poison was unleashed, and it's what's causing the death, and the erratic behaviour?", -, - "So, could the behaviour of these wisps be explained by magic?", -, - "Could we start over? I was trying to recall what you said--hello?", L_At_Island_Knows_Doctor, - "Well, the effects, though widespread, seem to be more severe at times.", L_At_Island_Evil; - mes "[Doctor]"; - mes ""; - mes "\"A very valid idea. Hm...\""; - close; - -L_At_Island_Evil: - mes "[Doctor]"; - mes ""; - mes "\"Yes, sadly that does seem to be the case at times. I feel we've almost solved at least this mystery. Just... definitively, what would you say is going on here?\""; - next; - setarray @menuitems$, - "I think the wisps are drawn to those that have died, like... me? And when they become aggravated they end up destroying more of the world.", - "In order to escape, the beings that have died and ended up here are forced to... fight?", - "An evil force placed a curse on all of us, dooming us to fight here, pitted against one another in pointless battle--for all eternity!", - "The trees are dead as a result of the fighting, and the wisps are angry spirits looking for revenge?", - "This world is in disarray, subject to chaos, and ultimately, utter destruction. Those, like me, have been given an opportunity, a choice--to put an end to this, to drive out the evil stench that plagues this land.", - "Unlike me, the old woman that led me here was not without hidden motives. So, she planted a way to bring me here, and in doing so, eliminated the ones that could foil her plans.", - "When I died and came here, my soul was fragmented, and part of it manifested as the tormented wisps here now?", - "You do seem rather odd, using those alien devices. I think you're to blame for what's happened here!", - "Something, or someone, perhaps, walks this world, appearing from the shadows. With it come misery and pain. But it is up to us to rid this world of its blight.", - "There is an intermittent, evil presence in this world. When it arrives it brings about more destruction, resulting in these dead trees. Then, at the whim of its madness, it uses magic to incite the wisps to attack and be unwilling accomplices."; - setarray @submenu$, "", "", "", ""; - setarray @submenuindex, 0, 0, 0, 0; - set @c, 0; - -L_island_end_menu_loop: - set @index, rand(getarraysize(@menuitems$)); - set @i, 0; - if (@c == 0) goto L_island_post_menu_loop_sub; -L_island_end_menu_loop_sub: - if (@submenu$[@i] == @menuitems$[@index]) goto L_island_end_menu_loop; - set @i, @i + 1; - if (@i < @c) goto L_island_end_menu_loop_sub; -L_island_post_menu_loop_sub: - set @submenu$[@i], @menuitems$[@index]; - set @submenuindex[@i], @index; - set @c, @c + 1; - if (@c < 4) goto L_island_end_menu_loop; - - menu @submenu$[0], -, - @submenu$[1], -, - @submenu$[2], -, - @submenu$[3], -; - set @menu, @menu - 1; - if (@menu >= 4 || @menu < 0) goto L_island_oo_range; - if (@submenuindex[@menu] == 8 || @submenuindex[@menu] == 9) - goto L_At_Island_Resolve; - -L_island_oo_range: - mes "[Doctor]"; - mes ""; - mes "\"Ah, I'm sorry, but that doesn't seem to fit with what we know. Perhaps we should give this some more thought.\""; - close; - -L_At_Island_Help: - menu "Yes, help is probably needed, but I hadn't really considered my own role...", -, - "Perhaps, but it's not really my problem.", -; - mes "[Doctor]"; - mes ""; - mes "\"Just as you are helping here, I believe that if it is what you desire, you can find a suitable way to help elsewhere, too.\""; - close; - -L_At_Island_Resolve: - callsub S_Update_Helped; - mes "[Doctor]"; - mes ""; - mes "\"Ha-ha, that's it! Brilliant!\" He shakes your hand enthusiastically. \"I knew you could do it! You don't know how much your help means!\""; - close; - -L_At_Island_Offer_Lifestone: - mes "[Doctor]"; - mes ""; - mes "\"Hm, no, while I appreciate your generosity, I don't think that will be necessary.\""; - mes "He looks off into the distance. \"Strange things...\""; - close; - -L_At_Island_Helped: - mes "[Doctor]"; - mes ""; - mes "The Doctor smiles. \"A disturbing force is devastating this world. But with your help I think we're well on our way. Indeed.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Well, I won't keep you, still rather busy. Should probably survey some other regions, too.\" The Doctor's words trail off as he returns to thought."; - next; - menu "Okay, I'll see you around!", -, - "Actually, I'd like to go home now. Any chance you could help?", L_Warning; - close; - -// =================================================================== -// Helper portions, duplicated in each script for want of time, sorry. -// =================================================================== - -// The player has defeated the invader and helped enough times. -L_Return_Ready_Optional: - if (!(~(Easter_2010_QuestState >> E10_HELPED_DOCTOR_SHIFT) & E10_HELPED_DOCTOR_MASK) || ((Easter_2010_QuestState >> E10_HELPED_DOCTOR_ISLAND_SHIFT) & E10_HELPED_DOCTOR_ISLAND_MASK)) - goto L_Return_Ready; - - // Player can help one more time, if so desired. - mes "[Doctor]"; - mes ""; - mes "\"Well... this has been quite an adventure, hasn't it? I'd say it's about timey--er, time for me to go, but I think I can stick around for a little while longer to tie up some loose ends for myself.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Oh, did you want to help again?\""; - next; - menu "Sure, that sounds good", L_At_Island, - "Hm, I can't right now, but maybe later.", L_Return_Ready, - "I was looking for a way to go home.", L_Return_Capable, - "No, sorry, I don't think so.", L_Return_Ready; - close; - -// Player has done "everything" to do in this world, just talking to the Doctor. -L_Return_Ready: - set @parting$, "!"; - if (strcharinfo(0) == "Alonso" || strcharinfo(0) == "AlOnS") set @parting$, ", Alonso!"; - mes "[Doctor]"; - mes ""; - mes "\"Well, you have been absolutely brilliant! Brilliant! Very impressive.\" He smiles kindly and shakes your hand. \"It has been a pleasure. Now for the next adventure. Allons-y" + @parting$ + "\""; - close; - -L_Defeat_Invader: - mes "[Doctor]"; - mes ""; - mes "\"Ah-ha! It's nice to see you again. How goes the battle?\""; - next; - menu "I'm having a hard time, actually. I'd like to go home...", -, - "Regrouping now for the next encounter, actually.", L_Encourage; - goto L_Warning; - -L_Encourage: - mes "[Doctor]"; - mes ""; - mes "\"Oh, well, I think you'll prevail in the end! If you'll excuse me, I still have some things to see to.\""; - close; - -L_MidReward: - if (((Easter_2010_QuestState >> E10_FLAG_MID_REWARD_SHIFT) & E10_FLAG_MID_REWARD_MASK)) close; - mes "[Doctor]"; - mes ""; - mes "\"Fantastic! You have really been quite helpful.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Er, now that I think about it, perhaps I have something you'd be interested in.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"While visiting another dimension--hm, as a matter of fact, it was quite like this one. But their choices in the past seem to have differed from the ones here...\""; - next; - mes "[Doctor]"; - mes ""; - mes "The Doctor reflects on his words. \"Interesting how things turn out. Well, I now have a lot of these Valentine's Glasses, if you'd like a pair.\""; - next; - getinventorylist; - if (@inventorylist_count == 100) - goto L_MidReward_NoRoom; - mes "[Doctor]"; - mes ""; - mes "He hands you the glasses."; - mes "\"They're not too brainy, or suited for detecting background radiation, but they are charming.\""; - set Easter_2010_QuestState, Easter_2010_QuestState & ~(E10_FLAG_MID_REWARD_MASK << E10_FLAG_MID_REWARD_SHIFT) | (E10_FLAG_MID_REWARD << E10_FLAG_MID_REWARD_SHIFT); - getitem E10_MIDREWARD_ID, 1; - close; - -L_MidReward_NoRoom: - mes "[Doctor]"; - mes ""; - mes "\"Oh, I don't think you have room for these. Well, I suppose I'll hold on to them for now.\""; - close; - -// Warning about the potential perils ahead, but the player must still want to abort the quest. -L_Warning: - mes "[Doctor]"; - mes ""; - mes "\"There is no doubt in my mind that what awaits us is both powerful and dangerous, to say the least.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"If this... destruction, this disregard for life isn't an indication, what is?\""; - mes "He takes a moment, searching your face."; - next; - mes "[Doctor]"; - mes ""; - if (((Easter_2010_QuestState >> E10_HELPED_DOCTOR_SHIFT) & E10_HELPED_DOCTOR_MASK)) - mes "\"I do appreciate your help thus far, really. And I did look forward to working with you again in putting an end to this devastation.\""; - if (!((Easter_2010_QuestState >> E10_HELPED_DOCTOR_SHIFT) & E10_HELPED_DOCTOR_MASK)) - mes "\"Despite the danger, I think pressing on would certainly be a brave choice.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"But if you were to leave now, I'm afraid it would be impossible to return...\""; - mes "He pauses again. \"There is still time for you to turn back now, while it's relatively easy.\""; - next; - menu "N-no, I-I think I will continue... Yes, I'm ready!", -, - "Now that you mention it, maybe I'd better leave now while I can.", L_Turn_Back, - "Um, could I have a minute to think it over?", -; - close; - -L_Turn_Back: - mes "[Doctor]"; - mes ""; - mes "\"You really want to turn back now?\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"I don't think there's any shame in going back. Quite the contrary. You're brave for even being here.\""; - mes "He hesitates ever so slightly, choosing his words. \"I just wanted to make sure you were certain about your decision.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Once you've left, I don't see how you'll be able to return.\""; - next; - menu "On second thought, perhaps I will stick around.", -, - "No, no, I'm quite sure I want to leave.", L_Really_Return; - close; - -// The player definitely wants to go back, and there's no returning. -L_Really_Return: - if ((Easter_2010_QuestState >> E10_FLAG_RETURN_READY_SHIFT) & E10_FLAG_RETURN_READY_MASK == E10_FLAG_RETURN_READY && (Easter_2010_QuestState >> E10_STATE_ROSE_SHIFT) & E10_STATE_ROSE_MASK == E10_STATE_ROSE_ROSE_COMPLETE) - goto L_Return_Capable; - mes "[Doctor]"; - mes ""; - mes "\"If that is what you want, then consider it done. And good luck.\""; - next; - goto L_Return_Player; - -L_Return_Player: - callsub S_Helped_Count; - if (countitem("DarkPetal") == 0 && @Easter_2010_helper < 3) goto L_Difficult_Return; - set Easter_2010_QuestState, (Easter_2010_QuestState & ~(E10_STATE_ROSE_MASK << E10_STATE_ROSE_SHIFT)) | (E10_STATE_ROSE_RETURNED << E10_STATE_ROSE_SHIFT); - if (@Easter_2010_helper < 3) - delitem "DarkPetal", 1; - savepoint "009-1", 52, 40; - warp "009-1", 0, 0; - close; - -L_Difficult_Return: - mes "[Doctor]"; - mes ""; - mes "\"Hm... you don't seem to have the thing that brought you here, that petal, that I could have used to send you back... assuming you really do want to give up.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Others have been able to battle some darkness directly, which might serve as a substitute.\""; - mes "\"You could still help me here and elsewhere if you want to try to get this done once and for all, but if you want to go early you will need to fight, somehow.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Though there are others helping, too. No doubt that soon enough, you'll be able to go anyway...\""; - close; - -L_Return_Capable: - mes "[Doctor]"; - mes ""; - mes "\"Hm. Oh, it looks like you've learned how to travel between these worlds on your own. Don't you remember the way?\""; - next; - menu "Oh, you're right! It was a spell, um..." + getspellinvocation("world-shift") + " was the name!", -; - mes "[Doctor]"; - mes ""; - mes "\"Excellent! Though I suspect its effects will work best when you are closer to where you started.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"When you came to this world, where did you end up? I trust that is your origin.\""; - close; - -S_Dialogue_Knows: - mes "[Doctor]"; - mes ""; - mes "\"Oh, hello again... hm...\""; - next; - mes "[Doctor]"; - mes ""; - mes @responses$[rand(getarraysize(@responses$))]; - return; - -S_Update_Knows: - // Working "name" for when he hasn't introduced himself (can be changed). - mes "[Mysterious Man]"; - mes ""; - mes @responses$[rand(getarraysize(@responses$))]; - next; - set Easter_2010_QuestState, Easter_2010_QuestState & ~(E10_FLAG_KNOWS_DOCTOR_MASK << E10_FLAG_KNOWS_DOCTOR_SHIFT) | (E10_FLAG_KNOWS_DOCTOR << E10_FLAG_KNOWS_DOCTOR_SHIFT); - mes "[Doctor]"; - mes ""; - mes "\"Oh, excuse me,\" he gestures. \"I'm the Doctor.\""; - return; - -S_Update_Helped: - set Easter_2010_QuestState, Easter_2010_QuestState & ~(E10_FLAG_HELPED_DOCTOR_ISLAND_MASK << E10_FLAG_HELPED_DOCTOR_ISLAND_SHIFT) | (E10_FLAG_HELPED_DOCTOR_ISLAND << E10_FLAG_HELPED_DOCTOR_ISLAND_SHIFT); - callsub S_Helped_Count; - if (@Easter_2010_helper == 3) set Easter_2010_QuestState, (Easter_2010_QuestState & ~(E10_STATE_ROSE_MASK << E10_STATE_ROSE_SHIFT)) | (E10_STATE_ROSE_ROSE_COMPLETE << E10_STATE_ROSE_SHIFT); - return; - -S_Helped_Count: - set @Easter_2010_helper, 0; - if ((Easter_2010_QuestState >> E10_FLAG_HELPED_DOCTOR_TREE_SHIFT) & E10_FLAG_HELPED_DOCTOR_TREE_MASK == E10_FLAG_HELPED_DOCTOR_TREE) - set @Easter_2010_helper, @Easter_2010_helper + 1; - if ((Easter_2010_QuestState >> E10_FLAG_HELPED_DOCTOR_ISLAND_SHIFT) & E10_FLAG_HELPED_DOCTOR_ISLAND_MASK == E10_FLAG_HELPED_DOCTOR_ISLAND) - set @Easter_2010_helper, @Easter_2010_helper + 1; - if ((Easter_2010_QuestState >> E10_FLAG_HELPED_DOCTOR_STONES_SHIFT) & E10_FLAG_HELPED_DOCTOR_STONES_MASK == E10_FLAG_HELPED_DOCTOR_STONES) - set @Easter_2010_helper, @Easter_2010_helper + 1; - if ((Easter_2010_QuestState >> E10_FLAG_HELPED_DOCTOR_FRUIT_SHIFT) & E10_FLAG_HELPED_DOCTOR_FRUIT_MASK == E10_FLAG_HELPED_DOCTOR_FRUIT) - set @Easter_2010_helper, @Easter_2010_helper + 1; - return; -} diff --git a/world/map/npc/easter/2010/Doctor3.txt b/world/map/npc/easter/2010/Doctor3.txt deleted file mode 100644 index 7d8bfa8c..00000000 --- a/world/map/npc/easter/2010/Doctor3.txt +++ /dev/null @@ -1,586 +0,0 @@ -// Doctor 3, at the stones. - -028-1.gat,71,98,0 script Doctor#who3 184,{ - // States here - callsub S_Helped_Count; - if (@Easter_2010_helper >= 2 && !((Easter_2010_QuestState >> E10_FLAG_MID_REWARD_SHIFT) & E10_FLAG_MID_REWARD_MASK)) - goto L_MidReward; - if (@Easter_2010_helper == 4 && !((Easter_2010_QuestState >> E10_FLAG_RETURN_READY_SHIFT) & E10_FLAG_RETURN_READY_MASK)) - goto L_Defeat_Invader; - if ((Easter_2010_QuestState >> E10_FLAG_RETURN_READY_SHIFT) & E10_FLAG_RETURN_READY_MASK == E10_FLAG_RETURN_READY && (Easter_2010_QuestState >> E10_STATE_ROSE_SHIFT) & E10_STATE_ROSE_MASK == E10_STATE_ROSE_ROSE_COMPLETE) - goto L_Return_Ready_Optional; - -// ======================= -// === Third location === -// ======================= - -L_At_Stones: - // Checks for if the player has already helped the doctor, either here or elsewhere, go here. - if ((Easter_2010_QuestState >> E10_FLAG_HELPED_DOCTOR_STONES_SHIFT) & E10_FLAG_HELPED_DOCTOR_STONES_MASK == E10_FLAG_HELPED_DOCTOR_STONES) - goto L_At_Stones_Helped; - - if ((Easter_2010_QuestState >> E10_FLAG_KNOWS_DOCTOR_SHIFT) & E10_FLAG_KNOWS_DOCTOR_MASK == E10_FLAG_KNOWS_DOCTOR) - goto L_At_Stones_Knows_Doctor; - - setarray @responses$, "\"There's something definitely unsettling about this region. Do you sense it, too?\" His acknowledgement comes suddenly and as a surprise. Something whirs and beeps as he continues, \"Oh, yes, this very spot.\"", "\"An abnormality! Yes, yes, here! Here! No, not quite imperceptible, but we must exercise caution, wouldn't you agree?\"", "\"The mysterious man paces from side to side, quickly taking notice. \"Um, I would be careful around here if I were you. I'm detecting something very powerful nearby.\"", "\"Er, that's interesting. Do you see this? It's remarkable, really. Terrifying all the same, but remarkable. Still not quite sure what makes *this* spot special.\""; - callsub S_Update_Knows; - close; - -L_At_Stones_Knows_Doctor: - setarray @responses$, "\"So from what I've gathered, this area here is somehow involved. See the stones? Yes, right there. The readings suggest it's something very, very strong.\"", "The Doctor takes a closer look at the stones on the ground. \"Interesting, don't you think?\" He waves the small device about as it beeps. \"Perhaps I'm missing something.\"", "\"If I had a, um... well, I don't know what it is. Yet. But what I do know is that there's a dark, disturbing presence here.\"", "\"Hm. The readings here were the highest.\" You take a second to look around as the Doctor continues. \"Ah, yes! I will likely be needing something... maybe similar in nature to this evil presence?\"", "\"Shouldn't get too close there. Ah, yes, be careful there. An evil consumes the life os this world, and my analysis led me to this area.\"", "\"Well, you don't see that every day, do you? Er, well, it's not that strange for me, I think. If I am correct, some agent is at work here, behind the scenes. For now, if you think of anything that might help, please let me know.\""; - callsub S_Dialogue_Knows; - next; - -L_At_Stones_Menu: - mes "[Doctor]"; - mes ""; - mes "\"This place... there's something, I'm not sure what. But I know there's something... something dark!\""; - next; - menu - "Wow! How can you tell?", L_stones_light, - "Do you need any more help?", L_stones_offer, - "Er, pardon me? Did you hear what I said?", L_At_Stones_Pardon, - "Actually, I was hoping you could help me leave this world.", L_Warning, - "Good luck with that.", -; - close; - -L_At_Stones_Pardon: - mes "[Doctor]"; - mes ""; - mes "\"H'm, what? Oh, hello...\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"But this...\" - the man waves a strange, beeping device in the air - \"surely that must mean... oh? You're still here?\""; - next; - menu - "What's that thing you've got there?", L_stones_device, - "Sure I am. Do you need help with anything?", L_stones_offer, - "I was just leaving.", -; - close; - -L_stones_device: - mes "[Doctor]"; - mes ""; - mes "\"This? Oh, it's just an ordinary megalectrometer. Good model, though.\""; - next; - menu - "I'm intrigued. Do you need any help?", L_stones_offer, - "Megalawhat? I knew you were a crazy!", -; - close; - -L_stones_light: - mes "[Doctor]"; - mes ""; - mes "\"Well, it's obvious.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"The red light on my megalectrometer's come on.\""; - next; - menu - "Uh, okay. So... you need any more help?", L_stones_offer, - "I've got better things to do. Bye.", -; - close; - -// Now comes the confusing part. -L_stones_offer: - setarray @menuitems$, "", "", "", "", "", "", "", "", "", "", "", "", "", ""; - set @c, 0; - - if (countitem("WispPowder") < 1) goto L_stones_wisp; - set @menuitems$[@c], "Wisp Powder?"; - set @menuid[@c], E10_STONES_WISP; - set @c, @c + 1; - -L_stones_wisp: - if (countitem("SpectrePowder") < 1) goto L_stones_spectre; - set @menuitems$[@c], "Spectre Powder?"; - set @menuid[@c], E10_STONES_SPECTRE; - set @c, @c + 1; - -L_stones_spectre: - if (countitem("PoltergeistPowder") < 1) goto L_stones_poltergeist; - set @menuitems$[@c], "Poltergeist Powder?"; - set @menuid[@c], E10_STONES_POLTERGEIST; - set @c, @c + 1; - -L_stones_poltergeist: - if (countitem("DiseasedHeart") < 1) goto L_stones_soul; - set @menuitems$[@c], "A Diseased Heart?"; - set @menuid[@c], E10_STONES_HEART; - set @c, @c + 1; - -L_stones_soul: - if (countitem("JackOSoul") < 1) goto L_stones_heart; - set @menuitems$[@c], "A Jack O Soul?"; - set @menuid[@c], E10_STONES_SOUL; - set @c, @c + 1; - -L_stones_heart: - if (countitem("UndeadEar") < 1) goto L_stones_ear; - set @menuitems$[@c], "An Undead Ear?"; - set @menuid[@c], E10_STONES_EAR; - set @c, @c + 1; - -L_stones_ear: - if (countitem("UndeadEye") < 1) goto L_stones_eye; - set @menuitems$[@c], "An Undead Eye?"; - set @menuid[@c], E10_STONES_EYE; - set @c, @c + 1; - -L_stones_eye: - if (countitem("Bone") < 1) goto L_stones_bone; - set @menuitems$[@c], "A Bone?"; - set @menuid[@c], E10_STONES_BONE; - set @c, @c + 1; - -L_stones_bone: - if (countitem("Skull") < 1) goto L_stones_skull; - set @menuitems$[@c], "A Skull?"; - set @menuid[@c], E10_STONES_SKULL; - set @c, @c + 1; - -L_stones_skull: - if (countitem("DarkCrystal") < 1) goto L_stones_crystal; - set @menuitems$[@c], "A Dark Crystal?"; - set @menuid[@c], E10_STONES_CRYSTAL; - set @c, @c + 1; - -L_stones_crystal: - if (countitem("RottenRags") < 1) goto L_stones_rags; - set @menuitems$[@c], "Rotten Rags?"; - set @menuid[@c], E10_STONES_RAGS; - set @c, @c +1; - -L_stones_rags: - if (countitem("DarkPetal") < 1) goto L_stones_petal; - set @menuitems$[@c], "A Dark Petal?"; - set @menuid[@c], E10_STONES_PETAL; - set @c, @c + 1; - -L_stones_petal: - set @menuitems$[@c], "No, I don't have anything like that."; - set @menuid[@c], E10_STONES_NEVERMIND; - set @c, @c + 1; - - mes "[Doctor]"; - mes ""; - mes "\"I doubt you could help, since you wouldn't have - actually, you might. Coming from another world and all.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"I need something dark. Something connected with death... a deathly item. Sort of thing. Do you have anything of this kind?\""; - next; - menu - @menuitems$[0], -, - @menuitems$[1], -, - @menuitems$[2], -, - @menuitems$[3], -, - @menuitems$[4], -, - @menuitems$[5], -, - @menuitems$[6], -, - @menuitems$[7], -, - @menuitems$[8], -, - @menuitems$[9], -, - @menuitems$[10], -, - @menuitems$[11], -, - @menuitems$[12], -, - @menuitems$[13], -; - - set @menu, @menu -1; - if (@menu >= @c) close; - if (@menuid[@menu] == E10_STONES_WISP) goto L_stones_offer_wisp; - if (@menuid[@menu] == E10_STONES_SPECTRE) goto L_stones_offer_spectre; - if (@menuid[@menu] == E10_STONES_POLTERGEIST) goto L_stones_offer_poltergeist; - if (@menuid[@menu] == E10_STONES_SOUL) goto L_stones_offer_soul; - if (@menuid[@menu] == E10_STONES_HEART) goto L_stones_offer_heart; - if (@menuid[@menu] == E10_STONES_EAR) goto L_stones_offer_ear; - if (@menuid[@menu] == E10_STONES_EYE) goto L_stones_offer_eye; - if (@menuid[@menu] == E10_STONES_BONE) goto L_stones_offer_bone; - if (@menuid[@menu] == E10_STONES_SKULL) goto L_stones_offer_skull; - if (@menuid[@menu] == E10_STONES_CRYSTAL) goto L_stones_offer_crystal; - if (@menuid[@menu] == E10_STONES_RAGS) goto L_stones_offer_rags; - if (@menuid[@menu] == E10_STONES_PETAL) goto L_stones_offer_petal; - if (@menuid[@menu] == E10_STONES_NEVERMIND) goto L_stones_nevermind; - close; - -L_stones_offer_wisp: - if (countitem("WispPowder") < 1) goto L_stones_noitem; - delitem "WispPowder", 1; - goto L_stones_thanks; - -L_stones_offer_spectre: - if (countitem("SpectrePowder") < 1) goto L_stones_noitem; - delitem "SpectrePowder", 1; - goto L_stones_thanks; - -L_stones_offer_poltergeist: - if (countitem("PoltergeistPowder") < 1) goto L_stones_noitem; - delitem "PoltergeistPowder", 1; - goto L_stones_thanks; - -L_stones_offer_soul: - if (countitem("JackOSoul") < 1) goto L_stones_noitem; - delitem "JackOSoul", 1; - goto L_stones_nothanks; - -L_stones_offer_heart: - if (countitem("DiseasedHeart") < 1) goto L_stones_noitem; - delitem "DiseasedHeart", 1; - goto L_stones_thanks; - -L_stones_offer_ear: - if (countitem("UndeadEar") < 1) goto L_stones_noitem; - delitem "UndeadEar", 1; - goto L_stones_thanks; - -L_stones_offer_eye: - if (countitem("UndeadEye") < 1) goto L_stones_noitem; - delitem "UndeadEye", 1; - goto L_stones_thanks; - -L_stones_offer_bone: - if (countitem("Bone") < 1) goto L_stones_noitem; - delitem "Bone", 1; - goto L_stones_thanks; - -L_stones_offer_skull: - if (countitem("Skull") < 1) goto L_stones_noitem; - delitem "Skull", 1; - goto L_stones_thanks; - -L_stones_offer_crystal: - if (countitem("DarkCrystal") < 1) goto L_stones_noitem; - delitem "DarkCrystal", 1; - goto L_stones_thanks; - -L_stones_offer_rags: - if (countitem("RottenRags") < 1) goto L_stones_noitem; - delitem "RottenRags", 1; - goto L_stones_nothanks; - -L_stones_offer_petal: - if (countitem("DarkPetal") < 1) goto L_stones_noitem; - mes "[Doctor]"; - mes ""; - mes "\"Let me examine it... h'm...\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Well now... this is quite... impressive.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"I think I've figured out how you came here...\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"This item will certainly serve my purposes. However, when it comes time for you to go home, you may find it a little more difficult.\""; - mes "\"Not impossible, but difficult.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Do you want to give it to me anyway?\""; - next; - menu - "I'm a tough guy, I'll still make it home.", L_stones_tough, - "Sorry, I'm a coward. Maybe I've got something else...", L_stones_offer; - close; - -L_stones_nevermind: - mes "[Doctor]"; - mes ""; - mes "\"H'm, well, if you come by anything please let me know!\""; - close; - -L_stones_thanks: - callsub S_Update_Helped; - mes "[Doctor]"; - mes ""; - mes "\"Let me examine it... h'm...\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Yes, that should do perfectly! Thank you very much.\""; - next; - menu - "Is there anything else you need?", L_stones_help, - "Yep, that's fine. Bye then!", -; - close; - -L_stones_nothanks: - mes "[Doctor]"; - mes ""; - mes "\"Let me examine it... h'm...\""; - mes "\"No, I'm afraid that won't work. Do you have anything else?\""; - goto L_stones_offer; - -L_stones_noitem: - mes "[Doctor]"; - mes ""; - mes "\"Let me examine it... h'm...\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Wait a minute! You don't even have one of those!\""; - next; - menu - "Well, I did, but I dropped it halfway through the dialogue.", L_stones_dropped, - "Sorry, I thought I did. Let's see what else I have...", L_stones_offer, - "Aha! Got you all excited there!", -; - close; - -L_stones_tough: - mes "[Doctor]"; - mes ""; - mes "\"Well, if you're sure...\""; - next; - menu - "I am! Just take the petal, okay?", L_give_petal, - "Er, actually, I'm not. Maybe I have something else...", L_stones_offer; - close; - -L_give_petal: - if (countitem("DarkPetal") < 1) goto L_stones_noitem; - delitem "DarkPetal", 1; - goto L_stones_thanks; - -L_stones_help: - mes "[Doctor]"; - mes ""; - mes "\"Hmm, that's all for now, thank you. I'm going to have a look around this area, though, and I might need some assistance later on.\""; - close; - -L_At_Stones_Helped: - mes "[Doctor]"; - mes ""; - mes "A smile appears on the Doctor's face. \"You really have done splendidly here.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Will have to see about taking care of these other loose ends, though. Well, I should be getting back to my observations. Please feel free to let me know if you have some new information for me.\""; - next; - menu "Okay, I'll see you around!", -, - "Actually, I'd like to go home now. Any chance you could help?", L_Warning; - close; - -// =================================================================== -// Helper portions, duplicated in each script for want of time, sorry. -// =================================================================== - -// The player has defeated the invader and helped enough times. -L_Return_Ready_Optional: - if (!(~(Easter_2010_QuestState >> E10_HELPED_DOCTOR_SHIFT) & E10_HELPED_DOCTOR_MASK) || ((Easter_2010_QuestState >> E10_HELPED_DOCTOR_STONES_SHIFT) & E10_HELPED_DOCTOR_STONES_MASK)) - goto L_Return_Ready; - - // Player can help one more time, if so desired. - mes "[Doctor]"; - mes ""; - mes "\"Well... this has been quite an adventure, hasn't it? I'd say it's about timey--er, time for me to go, but I think I can stick around for a little while longer to tie up some loose ends for myself.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Oh, did you want to help again?\""; - next; - menu "Sure, that sounds good", L_At_Stones, - "Hm, I can't right now, but maybe later.", L_Return_Ready, - "I was looking for a way to go home.", L_Return_Capable, - "No, sorry, I don't think so.", L_Return_Ready; - close; - -// Player has done "everything" to do in this world, just talking to the Doctor. -L_Return_Ready: - set @parting$, "!"; - if (strcharinfo(0) == "Alonso" || strcharinfo(0) == "AlOnS") set @parting$, ", Alonso!"; - mes "[Doctor]"; - mes ""; - mes "\"Well, you have been absolutely brilliant! Brilliant! Very impressive.\" He smiles kindly and shakes your hand. \"It has been a pleasure. Now for the next adventure. Allons-y" + @parting$ + "\""; - close; - -L_Defeat_Invader: - mes "[Doctor]"; - mes ""; - mes "\"Ah-ha! It's nice to see you again. How goes the battle?\""; - next; - menu "I'm having a hard time, actually. I'd like to go home...", -, - "Regrouping now for the next encounter, actually.", L_Encourage; - goto L_Warning; - -L_Encourage: - mes "[Doctor]"; - mes ""; - mes "\"Oh, well, I think you'll prevail in the end! If you'll excuse me, I still have some things to see to.\""; - close; - -L_MidReward: - if (((Easter_2010_QuestState >> E10_FLAG_MID_REWARD_SHIFT) & E10_FLAG_MID_REWARD_MASK)) close; - mes "[Doctor]"; - mes ""; - mes "\"Fantastic! You have really been quite helpful.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Er, now that I think about it, perhaps I have something you'd be interested in.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"While visiting another dimension--hm, as a matter of fact, it was quite like this one. But their choices in the past seem to have differed from the ones here...\""; - next; - mes "[Doctor]"; - mes ""; - mes "The Doctor reflects on his words. \"Interesting how things turn out. Well, I now have a lot of these Valentine's Glasses, if you'd like a pair.\""; - next; - getinventorylist; - if (@inventorylist_count == 100) - goto L_MidReward_NoRoom; - mes "[Doctor]"; - mes ""; - mes "He hands you the glasses."; - mes "\"They're not too brainy, or suited for detecting background radiation, but they are charming.\""; - set Easter_2010_QuestState, Easter_2010_QuestState & ~(E10_FLAG_MID_REWARD_MASK << E10_FLAG_MID_REWARD_SHIFT) | (E10_FLAG_MID_REWARD << E10_FLAG_MID_REWARD_SHIFT); - getitem E10_MIDREWARD_ID, 1; - close; - -L_MidReward_NoRoom: - mes "[Doctor]"; - mes ""; - mes "\"Oh, I don't think you have room for these. Well, I suppose I'll hold on to them for now.\""; - close; - -// Warning about the potential perils ahead, but the player must still want to abort the quest. -L_Warning: - mes "[Doctor]"; - mes ""; - mes "\"There is no doubt in my mind that what awaits us is both powerful and dangerous, to say the least.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"If this... destruction, this disregard for life isn't an indication, what is?\""; - mes "He takes a moment, searching your face."; - next; - mes "[Doctor]"; - mes ""; - if (((Easter_2010_QuestState >> E10_HELPED_DOCTOR_SHIFT) & E10_HELPED_DOCTOR_MASK)) - mes "\"I do appreciate your help thus far, really. And I did look forward to working with you again in putting an end to this devastation.\""; - if (!((Easter_2010_QuestState >> E10_HELPED_DOCTOR_SHIFT) & E10_HELPED_DOCTOR_MASK)) - mes "\"Despite the danger, I think pressing on would certainly be a brave choice.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"But if you were to leave now, I'm afraid it would be impossible to return...\""; - mes "He pauses again. \"There is still time for you to turn back now, while it's relatively easy.\""; - next; - menu "N-no, I-I think I will continue... Yes, I'm ready!", -, - "Now that you mention it, maybe I'd better leave now while I can.", L_Turn_Back, - "Um, could I have a minute to think it over?", -; - close; - -L_Turn_Back: - mes "[Doctor]"; - mes ""; - mes "\"You really want to turn back now?\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"I don't think there's any shame in going back. Quite the contrary. You're brave for even being here.\""; - mes "He hesitates ever so slightly, choosing his words. \"I just wanted to make sure you were certain about your decision.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Once you've left, I don't see how you'll be able to return.\""; - next; - menu "On second thought, perhaps I will stick around.", -, - "No, no, I'm quite sure I want to leave.", L_Really_Return; - close; - -// The player definitely wants to go back, and there's no returning. -L_Really_Return: - if ((Easter_2010_QuestState >> E10_FLAG_RETURN_READY_SHIFT) & E10_FLAG_RETURN_READY_MASK == E10_FLAG_RETURN_READY && (Easter_2010_QuestState >> E10_STATE_ROSE_SHIFT) & E10_STATE_ROSE_MASK == E10_STATE_ROSE_ROSE_COMPLETE) - goto L_Return_Capable; - mes "[Doctor]"; - mes ""; - mes "\"If that is what you want, then consider it done. And good luck.\""; - next; - goto L_Return_Player; - -L_Return_Player: - callsub S_Helped_Count; - if (countitem("DarkPetal") == 0 && @Easter_2010_helper < 3) goto L_Difficult_Return; - set Easter_2010_QuestState, (Easter_2010_QuestState & ~(E10_STATE_ROSE_MASK << E10_STATE_ROSE_SHIFT)) | (E10_STATE_ROSE_RETURNED << E10_STATE_ROSE_SHIFT); - if (@Easter_2010_helper < 3) - delitem "DarkPetal", 1; - savepoint "009-1", 52, 40; - warp "009-1", 0, 0; - close; - -L_Difficult_Return: - mes "[Doctor]"; - mes ""; - mes "\"Hm... you don't seem to have the thing that brought you here, that petal, that I could have used to send you back... assuming you really do want to give up.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Others have been able to battle some darkness directly, which might serve as a substitute.\""; - mes "\"You could still help me here and elsewhere if you want to try to get this done once and for all, but if you want to go early you will need to fight, somehow.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Though there are others helping, too. No doubt that soon enough, you'll be able to go anyway...\""; - close; - -L_Return_Capable: - mes "[Doctor]"; - mes ""; - mes "\"Hm. Oh, it looks like you've learned how to travel between these worlds on your own. Don't you remember the way?\""; - next; - menu "Oh, you're right! It was a spell, um..." + getspellinvocation("world-shift") + " was the name!", -; - mes "[Doctor]"; - mes ""; - mes "\"Excellent! Though I suspect its effects will work best when you are closer to where you started.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"When you came to this world, where did you end up? I trust that is your origin.\""; - close; - -S_Dialogue_Knows: - mes "[Doctor]"; - mes ""; - mes "\"Oh, hello again... hm...\""; - next; - mes "[Doctor]"; - mes ""; - mes @responses$[rand(getarraysize(@responses$))]; - return; - -S_Update_Knows: - // Working "name" for when he hasn't introduced himself (can be changed). - mes "[Mysterious Man]"; - mes ""; - mes @responses$[rand(getarraysize(@responses$))]; - next; - set Easter_2010_QuestState, Easter_2010_QuestState & ~(E10_FLAG_KNOWS_DOCTOR_MASK << E10_FLAG_KNOWS_DOCTOR_SHIFT) | (E10_FLAG_KNOWS_DOCTOR << E10_FLAG_KNOWS_DOCTOR_SHIFT); - mes "[Doctor]"; - mes ""; - mes "\"Oh, excuse me,\" he gestures. \"I'm the Doctor.\""; - return; - -S_Update_Helped: - set Easter_2010_QuestState, Easter_2010_QuestState & ~(E10_FLAG_HELPED_DOCTOR_STONES_MASK << E10_FLAG_HELPED_DOCTOR_STONES_SHIFT) | (E10_FLAG_HELPED_DOCTOR_STONES << E10_FLAG_HELPED_DOCTOR_STONES_SHIFT); - callsub S_Helped_Count; - if (@Easter_2010_helper == 3) set Easter_2010_QuestState, (Easter_2010_QuestState & ~(E10_STATE_ROSE_MASK << E10_STATE_ROSE_SHIFT)) | (E10_STATE_ROSE_ROSE_COMPLETE << E10_STATE_ROSE_SHIFT); - return; - -S_Helped_Count: - set @Easter_2010_helper, 0; - if ((Easter_2010_QuestState >> E10_FLAG_HELPED_DOCTOR_TREE_SHIFT) & E10_FLAG_HELPED_DOCTOR_TREE_MASK == E10_FLAG_HELPED_DOCTOR_TREE) - set @Easter_2010_helper, @Easter_2010_helper + 1; - if ((Easter_2010_QuestState >> E10_FLAG_HELPED_DOCTOR_ISLAND_SHIFT) & E10_FLAG_HELPED_DOCTOR_ISLAND_MASK == E10_FLAG_HELPED_DOCTOR_ISLAND) - set @Easter_2010_helper, @Easter_2010_helper + 1; - if ((Easter_2010_QuestState >> E10_FLAG_HELPED_DOCTOR_STONES_SHIFT) & E10_FLAG_HELPED_DOCTOR_STONES_MASK == E10_FLAG_HELPED_DOCTOR_STONES) - set @Easter_2010_helper, @Easter_2010_helper + 1; - if ((Easter_2010_QuestState >> E10_FLAG_HELPED_DOCTOR_FRUIT_SHIFT) & E10_FLAG_HELPED_DOCTOR_FRUIT_MASK == E10_FLAG_HELPED_DOCTOR_FRUIT) - set @Easter_2010_helper, @Easter_2010_helper + 1; - return; -} diff --git a/world/map/npc/easter/2010/Doctor4.txt b/world/map/npc/easter/2010/Doctor4.txt deleted file mode 100644 index 3cb761e0..00000000 --- a/world/map/npc/easter/2010/Doctor4.txt +++ /dev/null @@ -1,784 +0,0 @@ -// Doctor 4, at the fruit trees. - -028-1.gat,122,72,0 script Doctor#who4 184,{ - // States here - callsub S_Helped_Count; - if (@Easter_2010_helper >= 2 && !((Easter_2010_QuestState >> E10_FLAG_MID_REWARD_SHIFT) & E10_FLAG_MID_REWARD_MASK)) - goto L_MidReward; - if (@Easter_2010_helper == 4 && !((Easter_2010_QuestState >> E10_FLAG_RETURN_READY_SHIFT) & E10_FLAG_RETURN_READY_MASK)) - goto L_Defeat_Invader; - if ((Easter_2010_QuestState >> E10_FLAG_RETURN_READY_SHIFT) & E10_FLAG_RETURN_READY_MASK == E10_FLAG_RETURN_READY && (Easter_2010_QuestState >> E10_STATE_ROSE_SHIFT) & E10_STATE_ROSE_MASK == E10_STATE_ROSE_ROSE_COMPLETE) - goto L_Return_Ready_Optional; - -// ======================= -// === Fourth location === -// ======================= - -//From Freeyorp on IRC: -//The fourth position is the only position with any serious sign of life - there are quite a lot of living trees there, packed quite densely -//In the middle of this area, atop cliffs overlooking water, is a fruit tree - -L_At_Fruit: - if ((Easter_2010_QuestState >> E10_FLAG_HELPED_DOCTOR_FRUIT_SHIFT) & E10_FLAG_HELPED_DOCTOR_FRUIT_MASK == E10_FLAG_HELPED_DOCTOR_FRUIT) - goto L_At_Fruit_Helped; - if ((Easter_2010_QuestState >> E10_FLAG_KNOWS_DOCTOR_SHIFT) & E10_FLAG_KNOWS_DOCTOR_MASK == E10_FLAG_KNOWS_DOCTOR) - goto L_At_Fruit_Known; - - setarray @responses$, "\"This tree... it bears remarkable signs of life for such a dead world...\"", "\"But this red light here in conjunction with the blue... that means it must be...\"", "\"Oh dear! Pressed the wrong dratted button again. I wish they'd make them just a little larger...\"", "\"But why so alive? It's surprising to find something that isn't long dead...\""; - - callsub S_Update_Knows; - close; - -L_At_Fruit_Known: - setarray @responses$, "\"Hmm...\" He pauses. \"Ah, hello there. Could you help with a few things for a bit? Might be a bit dangerous, though...\"", - "\"Hello again. Mind helping out again for a bit?\"", - "He wanders around, apparently lost in thought. \"Hm. Are you able to help with something? Er, but just so that you know, it could be dangerous...\"", - "\"Ah, it's you. Thanks for your help back there, by the way. There is something else, though it might be a bit dangerous, that I need help with if you don't mind?\""; - set @i, rand(getarraysize(@responses$) >> 1) << 1; - if ((Easter_2010_QuestState >> E10_DOCTOR_HELP_STATES_SHIFT) & E10_DOCTOR_HELP_STATES_MASK) set @i, @i + 1; - mes @responses$[@i]; - next; - -L_lens_main_menu: - menu "What do I need to do?", L_lens_minigame_explain, - "Dangerous?", L_lens_minigame_dangers, - "Let's start!", L_lens_loop_init, - "I'm just looking to leave this world. Can you help?", L_Warning, - "Actually, I'd rather not...", -; - close; - -L_lens_minigame_explain: - mes "[Doctor]"; - mes ""; - mes "\"I need a special sort of lens, one that might be used to detect what's going on around here.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"To do this, I'll need a special concoction... but I'll need an extra set of hands, and some dark crystal - they seem to match the dark presence here quite nicely.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"We'll probably need other items as well, to get the concoction to the right state. Hm...\""; - next; - mes "[Doctor]"; - mes ""; - if (countitem("Pearl") < 1) mes "\"If you get some solid, shiny object that could be used in the mix, that would help. A lot.\""; - if (countitem("Pearl") > 0) mes "\"Your pearl there would be great in the mix, as such things help in removing color. Though adding too much would make the wrong kind of texture, and also make it difficult to see through...\""; - if (countitem("IronPotion") < 1) mes "\"From what I've heard about potions from your world, one of them would be excellent at removing an unwanted presence while we make this. I can't remember the name right now, but I think it was orange...\""; - if (countitem("IronPotion") > 0) mes "\"That orange potion there... an Iron Potion, isn't it? It looks like a fairly thick brew, but something that strong should be useful for getting rid of this presence if it gets too much.\""; - if (countitem("ConcentrationPotion") < 1) mes "\"If you could find some potion to refine the concoction, that should be quite useful.\""; - if (countitem("ConcentrationPotion") > 0) mes "\"That purple potion there... a Concentration Potion, you say? That's closer to the sort of texture we're looking for, but it might draw the attention of that presence...\""; - if (countitem("SlowPoisonPotion") < 1) mes "\"And any other potion you can think of, really. I just make it up as I go along, most of the time.\""; - if (countitem("SlowPoisonPotion") > 0) mes "\"Ah, a potion to slow the effects of poison? Interesting, interesting, perhaps something like that could also protect our mix from this evil influence.\""; - if (countitem("BottleOfWater") < 1) mes "\"Though you don't seem to have any water... there is water all around in this place, but whenever I try to do anything with it, things never work. I think it might be tainted here. Maybe there are other things from your world that could help?\""; - if (countitem("BottleOfWater") > 0) mes "\"Ah, water. That will be fantastic for getting rid of unwanted coloration and make the mixture clearer, but of course, too much of it and we'll lose the properties that I was looking for in the first place...\""; - next; - goto L_lens_main_menu; - -L_lens_minigame_dangers: - mes "[Doctor]"; - mes ""; - mes "\"Well. There's some sort of malign force around here, and the things I want to do will probably draw its attention.\""; - next; - goto L_lens_main_menu; - -// ##### Initialise the minigame. ##### - -L_lens_loop_init: - - // Insert sanity checks here - if (countitem("DarkCrystal") < 1) goto L_lens_no_crystal; - - set @MAX_LENS_CRYSTAL_ENERGY_INCREASE, 70; - - // Texture: - setarray @textures$, "finely powdered", "thick", "slightly thick", "slightly thin", "thin"; - set @textureID, rand(3); - - // Coloration is more interesting. 1 for red, 2 for blue, 4 for yellow. So 7 has everything, 0 is clear. - setarray @tints$, "clear", "red", "blue", "purple", "yellow", "orange", "green", "dark"; - set @tintID, rand(7); - - // Opacity, final explicitly displayed value - setarray @opacities$, "opaque", "moderately opaque", "moderately transparent", "transparent"; - set @opacityID, rand(2); - - set @crystalEnergy, rand(rand(@MAX_LENS_CRYSTAL_ENERGY_INCREASE) + 1); // Yes, things _can_ go wrong right from the start. - set @dilution, 4; - set @rounds, 0; // Things go spectacularly wrong as time goes on. - set @damage, 0; // When this hits 4, game over. - - mes "The Doctor places the dark crystal in a small metal container. Looking away, and shielding his face with one hand, he uses a small thin metallic device to emit a sharp, piecing sound, shattering the dark crystal."; - delitem "DarkCrystal", 1; - mes "There is a cloud of smoke, and purple flames leap from the container."; - next; - -// ---------------------- -// ===== Main loop. ===== -// ---------------------- - -L_lens_loop_main: - set @retloc, 0; - set @oldtextureID, @textureID; - set @oldtintID, @tintID; - set @oldopacityID, @opacityID; - - mes "[Lens concoction]"; - mes ""; - mes "The concoction is currently a " + @textures$[@textureID] + ", " + @tints$[@tintID] + " " + @opacities$[@opacityID] + " concoction."; - set @mod, 0; - if (rand(@crystalEnergy) / 3 + rand(@crystalEnergy >> 1) > 30) set @mod, 1; - if (@mod == 1) mes "The Doctor seems uneasy. \"We seem to have drawn the attention of something. Be careful...\""; - next; - -L_lens_loop_menu: - set @LENS_CHOICE_PEARL, 0; - set @LENS_CHOICE_IRON_POTION, 1; - set @LENS_CHOICE_CONC_POTION, 2; - set @LENS_CHOICE_SLOW_POISON_POTION, 3; - set @LENS_CHOICE_WATER, 4; - set @LENS_CHOICE_WAIT, 5; - set @LENS_CHOICE_DISCARD, 6; - - setarray @lensmenu$, "", "", "", "", "", "", ""; - set @lensmenuiter, 0; - - if (countitem("Pearl") < 1) goto L_lens_loop_post_pearl_choice; - - set @lensmenu$[@lensmenuiter], "Pearl"; - set @lensmenuID[@lensmenuiter], @LENS_CHOICE_PEARL; - set @lensmenuiter, @lensmenuiter + 1; - -L_lens_loop_post_pearl_choice: - if (countitem("IronPotion") < 1) goto L_lens_loop_post_iron_potion_choice; - - set @lensmenu$[@lensmenuiter], "Iron potion"; - set @lensmenuID[@lensmenuiter], @LENS_CHOICE_IRON_POTION; - set @lensmenuiter, @lensmenuiter + 1; - -L_lens_loop_post_iron_potion_choice: - if (countitem("ConcentrationPotion") < 1) goto L_lens_loop_post_conc_potion_choice; - - set @lensmenu$[@lensmenuiter], "Concentration potion"; - set @lensmenuID[@lensmenuiter], @LENS_CHOICE_CONC_POTION; - set @lensmenuiter, @lensmenuiter + 1; - -L_lens_loop_post_conc_potion_choice: - if (countitem("SlowPoisonPotion") < 1) goto L_lens_loop_post_slow_poison_potion_choice; - - set @lensmenu$[@lensmenuiter], "Slow poison potion"; - set @lensmenuID[@lensmenuiter], @LENS_CHOICE_SLOW_POISON_POTION; - set @lensmenuiter, @lensmenuiter + 1; - -L_lens_loop_post_slow_poison_potion_choice: - if (countitem("BottleOfWater") < 1) goto L_lens_loop_post_water_choice; - - set @lensmenu$[@lensmenuiter], "Bottle of Water"; - set @lensmenuID[@lensmenuiter], @LENS_CHOICE_WATER; - set @lensmenuiter, @lensmenuiter + 1; - -L_lens_loop_post_water_choice: - set @lensmenu$[@lensmenuiter], "Wait for a moment"; - set @lensmenuID[@lensmenuiter], @LENS_CHOICE_WAIT; - set @lensmenuiter, @lensmenuiter + 1; - - set @lensmenu$[@lensmenuiter], "Discard the brew"; - set @lensmenuID[@lensmenuiter], @LENS_CHOICE_DISCARD; - set @lensmenuiter, @lensmenuiter + 1; - - menu @lensmenu$[0], -, - @lensmenu$[1], -, - @lensmenu$[2], -, - @lensmenu$[3], -, - @lensmenu$[4], -, - @lensmenu$[5], -, - @lensmenu$[6], -; - - set @menu, @menu - 1; - set @pcmod, 0; - if (@menu >= @lensmenuiter) goto L_lens_loop_menu_invalid; - - if (@lensmenuID[@menu] == @LENS_CHOICE_PEARL) goto L_lens_pc_use_pearl; // set @pcmod, rand(2); - if (@lensmenuID[@menu] == @LENS_CHOICE_IRON_POTION) goto L_lens_pc_use_ironpot; - if (@lensmenuID[@menu] == @LENS_CHOICE_CONC_POTION) goto L_lens_pc_use_concpot; - if (@lensmenuID[@menu] == @LENS_CHOICE_SLOW_POISON_POTION) goto L_lens_pc_use_slowpoisonpot; - if (@lensmenuID[@menu] == @LENS_CHOICE_WATER) goto L_lens_pc_use_water; - if (@lensmenuID[@menu] == @LENS_CHOICE_WAIT) set @pcmod, 6; - if (@lensmenuID[@menu] == @LENS_CHOICE_DISCARD) goto L_lens_discard_confirm; - -L_lens_loop_automodify: - set @rounds, @rounds + 1; - if (@crystalEnergy < 0) set @crystalEnergy, 0; - set @inc, rand(rand(@MAX_LENS_CRYSTAL_ENERGY_INCREASE / (1+(@crystalEnergy >> 2))) + 1); - if (!(@pcmod & 1)) set @crystalEnergy, @crystalEnergy + @MAX_LENS_CRYSTAL_ENERGY_INCREASE * @inc / (2 + @inc); - set @crystalEnergy, @crystalEnergy - rand(rand(@MAX_LENS_CRYSTAL_ENERGY_INCREASE) + 1); - if (@crystalEnergy < 0) set @crystalEnergy, 0; - set @effects, rand(20 + rand(40 + @crystalEnergy)); - - if (!(@effects & 1)) goto L_lens_loop_automodify_post_texture; - -// --- Automatically modify the texture --- - if (@textureID == 0) set @retloc, 1; - if (@textureID == 0) goto L_lens_auto_alter_texture_dry; -L_lens_loop_automodify_ret: - set @mod, rand(3); - if (@mod == 1) goto L_lens_loop_post_automods; - set @textureID, @textureID - 1 + @mod; - goto L_lens_loop_automodify_post_texture; - -L_lens_loop_automodify_post_texture: - if (@effects & 2) goto L_lens_auto_alter_color; -L_lens_loop_auto_post_color: - if (@effects & 4) goto L_lens_auto_alter_transparency; -L_lens_loop_auto_post_transparency: - if (@effects > 50) goto L_lens_warp_pc_hair; -L_lens_loop_auto_post_warp_hair: - if (@effects > @crystalEnergy) goto L_lens_autofix_texture; -L_lens_loop_auto_post_fix_texture: - set @temp, 0; - if (!(@effects < 65 && rand(@dilution) < 2 && (@effects & 7))) set @temp, 1; - if (@temp == 1) set @retloc, 2; - if (@temp == 1) goto L_lens_drydamage; -L_lens_loop_auto_post_drydamage: - set @temp, 0; - if ((@effects + @crystalEnergy / 3 > 85 || (@textureID == 0 && rand(@effects + @crystalEnergy) > 30)) && (!(@pcmod & 1) || @pcmod & 2)) set @temp, 1; - if (@temp == 1) set @retloc, 3; - if (@temp == 1) goto L_lens_directdamage; - set @temp, 0; - -L_lens_loop_post_automods: - if (@oldtintID & (@tintID ^ @oldtintID)) mes "The mixture becomes less " + @tints$[@oldtintID & (@tintID ^ @oldtintID)] + ", changing to a " + @tints$[@oldtintID & ~(@oldtintID & (@tintID ^ @oldtintID))] + " tint."; - if (@tintID & (@tintID ^ @oldtintID)) mes "The mixture becomes more " + @tints$[@tintID & (@tintID ^ @oldtintID)] + ", changing to a " + @tints$[@tintID] + " tint."; - if (@textureID == @oldtextureID) goto L_lens_nochange_texture; - if (@textureID < 0) set @textureID, 0; - if (@textureID > 4) set @textureID, 4; - if (@oldtextureID == 0) mes "The powder becomes more fluid, changing into a " + @textures$[@textureID] + " concoction."; - if (@oldtextureID > @textureID) mes "The concoction thickens, changing into a " + @textures$[@textureID] + " concoction."; - if (@oldtextureID < @textureID && !(@oldtextureID == 0)) mes "The concoction thins, changing into a " + @textures$[@textureID] + " concoction."; - -L_lens_nochange_texture: - if (@oldopacityID > @opacityID) mes "The concoction becomes more opaque."; - if (@oldopacityID < @opacityID) mes "The concoction becomes more transparent."; - -L_lens_loop_check: - // Check to whether you finished here - if ((@textureID == 3 || @textureID == 2) && @tintID == 0 && @opacityID == 0 && @rounds < 3) goto L_lens_early; - if ((@textureID == 3 || @textureID == 2) && @tintID == 0 && @opacityID == 0) goto L_lens_complete; - if (@textureID == 0 && (@rounds + 36) / (@dilution + 5) > 4) goto L_lens_dry_destroyed; - if ((@damage > 3 && @crystalEnergy > 80) || (@damage > 2 && @crystalEnergy > 80 && @textureID == 0)) goto L_lens_violently_destroyed; - next; - goto L_lens_loop_main; - -L_lens_early: - mes "[Doctor]"; - mes ""; - mes "\"That's the sort of thing I'm aiming for - too bad that we haven't added enough for it to complete, though.\""; - next; - goto L_lens_loop_main; - -L_lens_discard_confirm: - // Make sure that the player really does want to discard the mix. - mes "[Doctor]"; - mes ""; - if (@mod == 1 && @damage < 2) mes "\"Are you sure? It didn't seem so bad before...\""; - if (@mod == 0 || @damage > 1) mes "\"If you are sure... there's a lot of dark energy around, so that might be the best option...\""; - next; - menu "Yes, get rid of it!", L_lens_really_discard, - "No, on second thoughts, better not...", -; - goto L_lens_loop_menu; - -L_lens_really_discard: - mes "The Doctor takes out a curious glass instrument, and carefully moves it over the mixture. The device takes on a sickly purple hue, and the remnants of the mixture crumbles into nothingness as the light fades into the device."; - close; - -L_lens_loop_menu_invalid: - mes "[Lens concoction]"; - mes "That doesn't seem right, somehow..."; - next; - goto L_lens_loop_menu; - -L_lens_pc_use_pearl: - if (countitem("Pearl") < 1) goto L_lens_pc_use_missing; - delitem "Pearl", 1; - mes "You pass the pearl to the Doctor, who awkwardly takes it with one hand, grinds it into powder with another device, all the while keeping the container firmly in place. After he finishes, you sprinkle the powder evenly over the concoction."; - if (@textureID > 1) set @textureID, @textureID - 1; - if (rand(3 * (@rounds + 6) / (@dilution + 2)) > 0) set @tintID, @tintID & ~1; // Remove red - if (rand(2) > 0) set @tintID, @tintID & ~2; // Remove blue - if (rand(3) > 0) set @tintID, @tintID & ~4; // Remove yellow - if (rand(@opacityID) == 0) set @opacityID, @opacityID + 1; - goto L_lens_loop_automodify; - -L_lens_pc_use_ironpot: - if (countitem("IronPotion") < 1) goto L_lens_pc_use_missing; - delitem "IronPotion", 1; - mes "You pour the iron potion into the mix."; - if (@textureID > 2) set @textureID, @textureID - 1; - if (@textureID == 1 || (@textureID == 0 && rand(2) == 0)) set @textureID, @textureID + 1; - set @tintID, @tintID | 4; - if (rand(3) > 0) set @tintID, @tintID | 1; - set @crystalEnergy, 10 * (@crystalEnergy + 5) >> 4; - goto L_lens_loop_automodify; - -L_lens_pc_use_concpot: - if (countitem("ConcentrationPotion") < 1) goto L_lens_pc_use_missing; - delitem "ConcentrationPotion", 1; - mes "You pour the concentration potion into the mix."; - if (@textureID > 1 && rand(5) <= 2) set @textureID, @textureID - 1; - if (@textureID == 0 && rand(3) > 0) set @textureID, @textureID + 1; - set @pcmod, rand(2); - goto L_lens_loop_automodify; - -L_lens_pc_use_slowpoisonpot: - if (countitem("SlowPoisonPotion") < 1) goto L_lens_pc_use_missing; - delitem "SlowPoisonPotion", 1; - mes "You pour the slow poison potion into the mix."; - if ((@textureID < 4 && @textureID > 0 && rand(5) > 2) || (@textureID == 0 && rand(5))) set @textureID, @textureID + 1; - set @crystalEnergy, @crystalEnergy - rand(rand(10 * (@crystalEnergy + 15) >> 4) + 5); - set @pcmod, 1; - goto L_lens_loop_automodify; - -L_lens_pc_use_water: - if (countitem("BottleOfWater") < 1) goto L_lens_pc_use_missing; - delitem "BottleOfWater", 1; - mes "You empty the bottle of water into the mix."; - if ((@textureID < 4 && @textureID > 0) || (@textureID == 0 && rand(5) < 2)) set @textureID, @textureID + 1; - if (rand(7) < 2) set @tintID, @tintID & ~3; - if (rand(7) < 2) set @tintID, @tintID & ~5; - if (rand(7) < 2) set @tintID, @tintID & ~6; - if (rand(@opacityID + 2) > 1) set @opacityID, @opacityID - 1; - set @pcmod, rand(3); - set @dilution, @dilution + 1; - goto L_lens_loop_automodify; - -L_lens_pc_use_missing: - mes "Odd, you seemed to have it just moments before. Somewhat confused, you go back to consider what to do next."; - next; - goto L_lens_loop_menu; - -// ----------------------------------------------------------------- -// ##### The various automatic subroutines for various effects ##### -// ----------------------------------------------------------------- - -L_lens_auto_alter_color: - set @mod, 1 << rand(3); - if (rand(@crystalEnergy) > 40) set @mod, @mod | 4; - if (@crystalEnergy - rand(@crystalEnergy) < 30) set @mod, @mod | rand(3); - set @tintID, @tintID | @mod; - goto L_lens_loop_auto_post_color; - -L_lens_auto_alter_transparency: - set @mod, rand(3); - if ((@opacityID == 0 && @mod < 1) || (@opacityID == 3 && @mod > 1)) goto L_lens_loop_auto_post_transparency; - if (@mod == 1) goto L_lens_loop_auto_post_transparency; - set @opacityID, @opacityID - 1 + @mod; - if (@mod > 1) mes "The mixture alters, and becomes easier to see through."; - if (@opacityID == 3) mes "The mixture is now completely clear."; - if (@mod < 1) mes "The mixture alters, and becomes harder to see through."; - goto L_lens_loop_auto_post_transparency; - -L_lens_warp_pc_hair: - mes "You feel something around your head change..."; - set @style,rand(6); - set @color,rand(9); - setlook 1,@style+1; - setlook 6,@color; - goto L_lens_loop_auto_post_warp_hair; - -L_lens_autofix_texture: - set @textureID, @textureID + rand(3) - 1; - if (@textureID > 3) set @textureID, @textureID -1; - if (@textureID < 3) set @textureID, @textureID +1; - goto L_lens_loop_auto_post_fix_texture; - -L_lens_directdamage: - mes "A flash of sickly yellow light blinds you, the mixture distorts for a moment, then reappears."; - set @textureID, rand(3); - set @tintID, @tintID | rand(7); - set @opacityID, 0; - - set @mod, 0; - if (rand(readparam(bAgi)) > 30) set @mod, 1; - if (@mod == 1) mes "You barely manage to dive out of the way as the yellow flash sharply hisses through a space which, until a few moments ago, you had occupied..."; - if (@mod == 0) mes "The light burns all around you, with a strong sensation as if you were crushed under a great weight..."; - if (@mod == 0) itemheal readparam(bVit) * readparam(bVit) / 12 - 820, 0; - if (Hp < 1) close; - set @mod, 1; - -L_lens_auto_alter_texture_dry: - // If the mix dries up, and too much of the mix was water, then the mixture become damaged. However, the chance that it does dry up decreases with the proportion of water used so far - if (@mod == 0 && rand(2) == 0 && @dilution > 4) set @dilution, @dilution - 1; - if (rand(3) == 0 && @dilution > 5 && rand(@dilution * @dilution) > 12 && (!@pcmod & 1)) goto L_lens_drydamage; - goto L_lens_loop_return_fix; - -L_lens_drydamage: - if (@mod == 0 && @pcmod & 1) goto L_lens_loop_return_fix; - if (@mod == 0) mes "With a flash of purple light, the mixture spontaneously becomes very dry."; - if (@mod == 0 && rand(2) == 0 && @dilution > 5) set @dilution, @dilution / 2; - if (@mod == 0) set @textureID, 0; - -L_lens_damagelens: - if (rand(@damage * @damage) >= 6) goto L_lens_loop_return_fix; - set @damage, @damage + 1; - if (@damage == 1) mes "The container starts vibrating slightly."; - if (@damage == 2) mes "The container begins to shake unsteadily."; - if (@damage == 3 && @textureID == 0) goto L_lens_violently_destroyed; - if (@damage == 3) mes "The container is now shaking violently. The concoction gives off an acrid smell, and dark purple sparks occasionally fly out of the container. He watches you uneasily."; - if (@damage == 4) goto L_lens_violently_destroyed; - goto L_lens_loop_return_fix; - -L_lens_loop_return_fix: - if (@retloc == 0) mes "FATAL ERROR: @retloc undefined in L_lens_loop_return_fix, closing script."; - if (@retloc == 0) close; - // Hacky. - set @temp, 0; - if (@retloc == 1) set @temp, 1; - if (@retloc == 2) set @temp, 2; - if (@retloc == 3) set @temp, 3; - set @retloc, 0; - if (@temp == 0) mes "FATAL ERROR: @retloc out of range in L_lens_loop_return_fix, closing script."; - if (@temp == 0) close; - if (@temp == 1) goto L_lens_loop_automodify_ret; - if (@temp == 2) goto L_lens_loop_auto_post_drydamage; - if (@temp == 3) goto L_lens_loop_post_automods; - -L_lens_no_crystal: - mes "[Doctor]"; - mes ""; - mes "\"Looks like neither of us have a dark crystal. I'll try something else, but if you want to look around for one in the meantime, we could try again later.\""; - close; - -// --------------------------------- -// ##### The possible outcomes ##### -// --------------------------------- - -L_lens_violently_destroyed: - mes "A high pitched whine echoes around you. A series of blinding flashes force you to cover your eyes as the container is sent flying into the air. The grass around where the concoction landed takes on a sickly yellow hue."; - next; - mes "[Doctor]"; - mes ""; - mes "The Doctor sighs."; - mes "\"That could have gone better...\""; - next; - mes "The Doctor takes out a curious glass device, and carefully moves it over the tainted grass. Purple and black energies are sucked into the device, and the grass gradually returns to its normal color."; - close; - -L_lens_dry_destroyed: - mes "[Doctor]"; - mes ""; - mes "The Doctor frowns."; - mes ""; - mes "\"It's has become too dry... I fear that the mix has become damaged beyond repair, at least for the purposes I had in mind..."; - mes "I'll do what I can to salvage what is there, but it would be unrealistic to be expect that the end result will be anything other than deeply flawed.\""; - -L_lens_salvage: - mes "[Doctor]"; - mes ""; - mes "The Doctor takes out a vial containing a crystal clear fluid, an oddly shaped bowl, and a curious glass device. He then tips the remnants of the concoction into the bowl, then moves the device counterclockwise around the bowl five times, while pouring the clear fluid into the bowl"; - mes "A weak yellow glow surrounds the device as it moves around the outside of the bowl, and the concoction slowly fuses together as more of the clear fluid is added to it. But the concoction is still very lumpy, and doesn't fit properly within the bowl."; - next; - mes "[Doctor]"; - mes ""; - mes "He mutters distractedly as he moves the device directly over the bowl, then around, twice clockwise then once counterclockwise. \"...all going wrong... shouldn't be yellow...\""; - next; - mes "[Doctor]"; - mes ""; - mes "He then holds the device vertically over the bowl, and takes out a vial of bright red fluid, inverts the device, and mixes the red fluid into the dark purple energy that shoots out of the device into the centre of the remnants."; - mes "The red fluid darkens the energy it comes into contact with, then spreads out over the remnants of the concoction, giving of copious amounts of smoke."; - next; - - mes "[Doctor]"; - mes ""; - mes "After a few moments, he steps back and puts away the vial and the glass device, which is now completely devoid of any color."; - mes "The smoke gradually clears, leaving a perceptively warped lump of glass in the middle."; - - mes "[Doctor]"; - mes ""; - mes "\"You might as well take this.\""; - mes ""; - mes "\"I did what I could, but the lens is still warped beyond use, for me... I'm not sure that there's much that you'll be able to do with that as it is, but perhaps you could find someone that still has a use for it somewhere, or something.\""; - getitem "FlawedLens", 1; - close; - -L_lens_complete: - mes "The Doctor grins broadly."; - next; - mes "[Doctor]"; - mes ""; - mes "\"Yes, yes. That's it, that's just what I need!\""; - next; - mes "[Doctor]"; - mes ""; - mes "The Doctor takes out an oddly shaped bowl and a curious glass device. He quickly pours the concoction in, then moves the device over the bowl. A faint blue glow surrounds the bowl as he does so."; - next; - mes "[Doctor]"; - mes ""; - mes "He then moves the device around the edges, twice clockwise then once counterclockwise."; - mes "After this, he holds the device vertically over the bowl. He takes out a vial of bright red fluid, and inverts the device, sending a stream of pure black energy directly downwards into the concoction. He moves with incredible speed as he pours the red fluid evenly over the concoction as the black energy hits the concoction, giving off a tremendous amount of steam."; - next; - mes "[Doctor]"; - mes ""; - mes "He stares at the bowl with intense concentration, then abruptly cuts off the stream of red fluid, despite no visible change in the mixture that you can see through the steam."; - next; - mes "As the steam clears, you see that the concoction has hardened into a single solid shape, smoothly curving outwards, but completely opaque."; - next; - mes "[Doctor]"; - mes ""; - mes "\"Nothing to worry about.. it might be opaque now, but give it a moment to cool down first. Ah, there, it's clearing up nicely now.\""; - mes ""; - mes "He waits a moment, as the lens becomes more and more transparent."; - next; - mes "[Doctor]"; - mes ""; - mes "The Doctor carefully picks up the lens and holds it in a small piece of fabric. He turns it over a few times, checking to make sure there aren't any imperfections."; - mes ""; - mes "\"The glass formed perfectly! The lens is done.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"This is just what I needed. You were a great help, thank you!\""; - mes ""; - mes "[You gain 150,000 experience points!]"; - getexp 150000, 0; - callsub S_Update_Helped; - close; - // Yay! - -L_At_Fruit_Helped: - mes "As you approach, you see him looking through a collection of devices."; - next; - mes "There is an odd humming sound, and a blue glow from somewhere."; - next; - mes "[Doctor]"; - mes ""; - mes "\"Oh, hello.\" You notice the sound has stopped. \"Ah, and thanks for the help back there, I should be able to get this done in no time now.\""; - mes "He wanders around, and you can see him do something complicated with yet another of his devices and the lens that you made."; - next; - mes "You can't be quite sure, but this area feels healthier already..."; - next; - mes "[Doctor]"; - mes ""; - mes "\"Brilliant! If there's anything else I will let you know, if that's all right?\""; - next; - menu "Okay, I'll see you around!", -, - "Actually, I'd like to go home now. Any chance you could help?", L_Warning; - close; - -// =================================================================== -// Helper portions, duplicated in each script for want of time, sorry. -// =================================================================== - -// The player has defeated the invader and helped enough times. -L_Return_Ready_Optional: - if (!(~(Easter_2010_QuestState >> E10_HELPED_DOCTOR_SHIFT) & E10_HELPED_DOCTOR_MASK) || ((Easter_2010_QuestState >> E10_HELPED_DOCTOR_FRUIT_SHIFT) & E10_HELPED_DOCTOR_FRUIT_MASK)) - goto L_Return_Ready; - - // Player can help one more time, if so desired. - mes "[Doctor]"; - mes ""; - mes "\"Well... this has been quite an adventure, hasn't it? I'd say it's about timey--er, time for me to go, but I think I can stick around for a little while longer to tie up some loose ends for myself.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Oh, did you want to help again?\""; - next; - menu "Sure, that sounds good", L_At_Fruit, - "Hm, I can't right now, but maybe later.", L_Return_Ready, - "I was looking for a way to go home.", L_Return_Capable, - "No, sorry, I don't think so.", L_Return_Ready; - close; - -// Player has done "everything" to do in this world, just talking to the Doctor. -L_Return_Ready: - set @parting$, "!"; - if (strcharinfo(0) == "Alonso" || strcharinfo(0) == "AlOnS") set @parting$, ", Alonso!"; - mes "[Doctor]"; - mes ""; - mes "\"Well, you have been absolutely brilliant! Brilliant! Very impressive.\" He smiles kindly and shakes your hand. \"It has been a pleasure. Now for the next adventure. Allons-y" + @parting$ + "\""; - close; - -L_Defeat_Invader: - mes "[Doctor]"; - mes ""; - mes "\"Ah-ha! It's nice to see you again. How goes the battle?\""; - next; - menu "I'm having a hard time, actually. I'd like to go home...", -, - "Regrouping now for the next encounter, actually.", L_Encourage; - goto L_Warning; - -L_Encourage: - mes "[Doctor]"; - mes ""; - mes "\"Oh, well, I think you'll prevail in the end! If you'll excuse me, I still have some things to see to.\""; - close; - -L_MidReward: - if (((Easter_2010_QuestState >> E10_FLAG_MID_REWARD_SHIFT) & E10_FLAG_MID_REWARD_MASK)) close; - mes "[Doctor]"; - mes ""; - mes "\"Fantastic! You have really been quite helpful.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Er, now that I think about it, perhaps I have something you'd be interested in.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"While visiting another dimension--hm, as a matter of fact, it was quite like this one. But their choices in the past seem to have differed from the ones here...\""; - next; - mes "[Doctor]"; - mes ""; - mes "The Doctor reflects on his words. \"Interesting how things turn out. Well, I now have a lot of these Valentine's Glasses, if you'd like a pair.\""; - next; - getinventorylist; - if (@inventorylist_count == 100) - goto L_MidReward_NoRoom; - mes "[Doctor]"; - mes ""; - mes "He hands you the glasses."; - mes "\"They're not too brainy, or suited for detecting background radiation, but they are charming.\""; - set Easter_2010_QuestState, Easter_2010_QuestState & ~(E10_FLAG_MID_REWARD_MASK << E10_FLAG_MID_REWARD_SHIFT) | (E10_FLAG_MID_REWARD << E10_FLAG_MID_REWARD_SHIFT); - getitem E10_MIDREWARD_ID, 1; - close; - -L_MidReward_NoRoom: - mes "[Doctor]"; - mes ""; - mes "\"Oh, I don't think you have room for these. Well, I suppose I'll hold on to them for now.\""; - close; - -// Warning about the potential perils ahead, but the player must still want to abort the quest. -L_Warning: - mes "[Doctor]"; - mes ""; - mes "\"There is no doubt in my mind that what awaits us is both powerful and dangerous, to say the least.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"If this... destruction, this disregard for life isn't an indication, what is?\""; - mes "He takes a moment, searching your face."; - next; - mes "[Doctor]"; - mes ""; - if (((Easter_2010_QuestState >> E10_HELPED_DOCTOR_SHIFT) & E10_HELPED_DOCTOR_MASK)) - mes "\"I do appreciate your help thus far, really. And I did look forward to working with you again in putting an end to this devastation.\""; - if (!((Easter_2010_QuestState >> E10_HELPED_DOCTOR_SHIFT) & E10_HELPED_DOCTOR_MASK)) - mes "\"Despite the danger, I think pressing on would certainly be a brave choice.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"But if you were to leave now, I'm afraid it would be impossible to return...\""; - mes "He pauses again. \"There is still time for you to turn back now, while it's relatively easy.\""; - next; - menu "N-no, I-I think I will continue... Yes, I'm ready!", -, - "Now that you mention it, maybe I'd better leave now while I can.", L_Turn_Back, - "Um, could I have a minute to think it over?", -; - close; - -L_Turn_Back: - mes "[Doctor]"; - mes ""; - mes "\"You really want to turn back now?\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"I don't think there's any shame in going back. Quite the contrary. You're brave for even being here.\""; - mes "He hesitates ever so slightly, choosing his words. \"I just wanted to make sure you were certain about your decision.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Once you've left, I don't see how you'll be able to return.\""; - next; - menu "On second thought, perhaps I will stick around.", -, - "No, no, I'm quite sure I want to leave.", L_Really_Return; - close; - -// The player definitely wants to go back, and there's no returning. -L_Really_Return: - if ((Easter_2010_QuestState >> E10_FLAG_RETURN_READY_SHIFT) & E10_FLAG_RETURN_READY_MASK == E10_FLAG_RETURN_READY && (Easter_2010_QuestState >> E10_STATE_ROSE_SHIFT) & E10_STATE_ROSE_MASK == E10_STATE_ROSE_ROSE_COMPLETE) - goto L_Return_Capable; - mes "[Doctor]"; - mes ""; - mes "\"If that is what you want, then consider it done. And good luck.\""; - next; - goto L_Return_Player; - -L_Return_Player: - callsub S_Helped_Count; - if (countitem("DarkPetal") == 0 && @Easter_2010_helper < 3) goto L_Difficult_Return; - set Easter_2010_QuestState, (Easter_2010_QuestState & ~(E10_STATE_ROSE_MASK << E10_STATE_ROSE_SHIFT)) | (E10_STATE_ROSE_RETURNED << E10_STATE_ROSE_SHIFT); - if (@Easter_2010_helper < 3) - delitem "DarkPetal", 1; - savepoint "009-1", 52, 40; - warp "009-1", 0, 0; - close; - -L_Difficult_Return: - mes "[Doctor]"; - mes ""; - mes "\"Hm... you don't seem to have the thing that brought you here, that petal, that I could have used to send you back... assuming you really do want to give up.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Others have been able to battle some darkness directly, which might serve as a substitute.\""; - mes "\"You could still help me here and elsewhere if you want to try to get this done once and for all, but if you want to go early you will need to fight, somehow.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"Though there are others helping, too. No doubt that soon enough, you'll be able to go anyway...\""; - close; - -L_Return_Capable: - mes "[Doctor]"; - mes ""; - mes "\"Hm. Oh, it looks like you've learned how to travel between these worlds on your own. Don't you remember the way?\""; - next; - menu "Oh, you're right! It was a spell, um..." + getspellinvocation("world-shift") + " was the name!", -; - mes "[Doctor]"; - mes ""; - mes "\"Excellent! Though I suspect its effects will work best when you are closer to where you started.\""; - next; - mes "[Doctor]"; - mes ""; - mes "\"When you came to this world, where did you end up? I trust that is your origin.\""; - close; - -S_Dialogue_Knows: - mes "[Doctor]"; - mes ""; - mes "\"Oh, hello again... hm...\""; - next; - mes "[Doctor]"; - mes ""; - mes @responses$[rand(getarraysize(@responses$))]; - return; - -S_Update_Knows: - // Working "name" for when he hasn't introduced himself (can be changed). - mes "[Mysterious Man]"; - mes ""; - mes @responses$[rand(getarraysize(@responses$))]; - next; - set Easter_2010_QuestState, Easter_2010_QuestState & ~(E10_FLAG_KNOWS_DOCTOR_MASK << E10_FLAG_KNOWS_DOCTOR_SHIFT) | (E10_FLAG_KNOWS_DOCTOR << E10_FLAG_KNOWS_DOCTOR_SHIFT); - mes "[Doctor]"; - mes ""; - mes "\"Oh, excuse me,\" he gestures. \"I'm the Doctor.\""; - return; - -S_Update_Helped: - set Easter_2010_QuestState, Easter_2010_QuestState & ~(E10_FLAG_HELPED_DOCTOR_FRUIT_MASK << E10_FLAG_HELPED_DOCTOR_FRUIT_SHIFT) | (E10_FLAG_HELPED_DOCTOR_FRUIT << E10_FLAG_HELPED_DOCTOR_FRUIT_SHIFT); - callsub S_Helped_Count; - if (@Easter_2010_helper == 3) set Easter_2010_QuestState, (Easter_2010_QuestState & ~(E10_STATE_ROSE_MASK << E10_STATE_ROSE_SHIFT)) | (E10_STATE_ROSE_ROSE_COMPLETE << E10_STATE_ROSE_SHIFT); - return; - -S_Helped_Count: - set @Easter_2010_helper, 0; - if ((Easter_2010_QuestState >> E10_FLAG_HELPED_DOCTOR_TREE_SHIFT) & E10_FLAG_HELPED_DOCTOR_TREE_MASK == E10_FLAG_HELPED_DOCTOR_TREE) - set @Easter_2010_helper, @Easter_2010_helper + 1; - if ((Easter_2010_QuestState >> E10_FLAG_HELPED_DOCTOR_ISLAND_SHIFT) & E10_FLAG_HELPED_DOCTOR_ISLAND_MASK == E10_FLAG_HELPED_DOCTOR_ISLAND) - set @Easter_2010_helper, @Easter_2010_helper + 1; - if ((Easter_2010_QuestState >> E10_FLAG_HELPED_DOCTOR_STONES_SHIFT) & E10_FLAG_HELPED_DOCTOR_STONES_MASK == E10_FLAG_HELPED_DOCTOR_STONES) - set @Easter_2010_helper, @Easter_2010_helper + 1; - if ((Easter_2010_QuestState >> E10_FLAG_HELPED_DOCTOR_FRUIT_SHIFT) & E10_FLAG_HELPED_DOCTOR_FRUIT_MASK == E10_FLAG_HELPED_DOCTOR_FRUIT) - set @Easter_2010_helper, @Easter_2010_helper + 1; - return; -} diff --git a/world/map/npc/easter/2010/_import.txt b/world/map/npc/easter/2010/_import.txt deleted file mode 100644 index 1f543006..00000000 --- a/world/map/npc/easter/2010/_import.txt +++ /dev/null @@ -1,3 +0,0 @@ -npc: npc/easter/2010/egg_func.txt -npc: npc/easter/2010/eggs.txt -npc: npc/easter/2010/helper.txt diff --git a/world/map/npc/easter/2010/egg_func.txt b/world/map/npc/easter/2010/egg_func.txt deleted file mode 100644 index 9dbf669e..00000000 --- a/world/map/npc/easter/2010/egg_func.txt +++ /dev/null @@ -1,114 +0,0 @@ -function script Easter2010Loc_Check1 { - set @result, ~Easter_2010_EggState1 & (1 << @obj) & $Easter_2010_Egg_Loc_State1; - if (@result == 0) goto L_NotHere; - getinventorylist; - if (@inventorylist_count == 100 && countitem(E10_COLLECT_EGGS_ID) == 0) - goto L_TooMany; - if (rand(10)) set $Easter_2010_Egg_Loc_State1, $Easter_2010_Egg_Loc_State1 & ~(1 << @obj); - set Easter_2010_EggState1, Easter_2010_EggState1 | (1 << @obj); - mes "You pick up an egg."; - getitem E10_COLLECT_EGGS_ID, 1; - return; - -L_NotHere: - mes "You can't find an egg here."; - set @result, 0; - return; - -L_TooMany: - mes "You don't have room for this egg."; - set @result, 0; - return; -} - -function script Easter2010Loc_Check2 { - set @result, ~Easter_2010_EggState2 & (1 << @obj) & $Easter_2010_Egg_Loc_State2; - if (@result == 0) goto L_NotHere; - getinventorylist; - if (@inventorylist_count == 100 && countitem(E10_COLLECT_EGGS_ID) == 0) - goto L_TooMany; - if (rand(10)) set $Easter_2010_Egg_Loc_State2, $Easter_2010_Egg_Loc_State2 & ~(1 << @obj); - set Easter_2010_EggState2, Easter_2010_EggState2 | (1 << @obj); - mes "You pick up an egg."; - getitem E10_COLLECT_EGGS_ID, 1; - return; - -L_NotHere: - mes "You can't find an egg here."; - set @result, 0; - return; - -L_TooMany: - mes "You don't have room for this egg."; - set @result, 0; - return; -} - -function script Easter2010Loc_Check3 { - set @result, ~Easter_2010_EggState3 & (1 << @obj) & $Easter_2010_Egg_Loc_State3; - if (@result == 0) goto L_NotHere; - getinventorylist; - if (@inventorylist_count == 100 && countitem(E10_COLLECT_EGGS_ID) == 0) - goto L_TooMany; - if (rand(10)) set $Easter_2010_Egg_Loc_State3, $Easter_2010_Egg_Loc_State3 & ~(1 << @obj); - set Easter_2010_EggState3, Easter_2010_EggState3 | (1 << @obj); - mes "You pick up an egg."; - getitem E10_COLLECT_EGGS_ID, 1; - return; - -L_NotHere: - mes "You can't find an egg here."; - set @result, 0; - return; - -L_TooMany: - mes "You don't have room for this egg."; - set @result, 0; - return; -} - -function script Easter2010Loc_Check4 { - set @result, ~Easter_2010_EggState4 & (1 << @obj) & $Easter_2010_Egg_Loc_State4; - if (@result == 0) goto L_NotHere; - getinventorylist; - if (@inventorylist_count == 100 && countitem(E10_COLLECT_EGGS_ID) == 0) - goto L_TooMany; - if (rand(10)) set $Easter_2010_Egg_Loc_State4, $Easter_2010_Egg_Loc_State4 & ~(1 << @obj); - set Easter_2010_EggState4, Easter_2010_EggState4 | (1 << @obj); - mes "You pick up an egg."; - getitem E10_COLLECT_EGGS_ID, 1; - return; - -L_NotHere: - mes "You can't find an egg here."; - set @result, 0; - return; - -L_TooMany: - mes "You don't have room for this egg."; - set @result, 0; - return; -} - -function script Easter2010Loc_Check5 { - set @result, ~Easter_2010_EggState5 & (1 << @obj) & $Easter_2010_Egg_Loc_State5; - if (@result == 0) goto L_NotHere; - getinventorylist; - if (@inventorylist_count == 100 && countitem(E10_COLLECT_EGGS_ID) == 0) - goto L_TooMany; - if (rand(10)) set $Easter_2010_Egg_Loc_State5, $Easter_2010_Egg_Loc_State5 & ~(1 << @obj); - set Easter_2010_EggState5, Easter_2010_EggState5 | (1 << @obj); - mes "You pick up an egg."; - getitem E10_COLLECT_EGGS_ID, 1; - return; - -L_NotHere: - mes "You can't find an egg here."; - set @result, 0; - return; - -L_TooMany: - mes "You don't have room for this egg."; - set @result, 0; - return; -} diff --git a/world/map/npc/easter/2010/eggs.txt b/world/map/npc/easter/2010/eggs.txt deleted file mode 100644 index cf4b81f4..00000000 --- a/world/map/npc/easter/2010/eggs.txt +++ /dev/null @@ -1,947 +0,0 @@ -// - -007-1.gat,38,22,0 script Flowers 127,{ - set @obj, 0; - callfunc "Easter2010Loc_Check1"; - close; -} - -007-1.gat,40,41,0 script Grass 127,{ - set @obj, 1; - callfunc "Easter2010Loc_Check1"; - close; -} - -007-1.gat,18,71,0 script Stone 127,{ - set @obj, 2; - callfunc "Easter2010Loc_Check1"; - close; -} - -007-1.gat,58,33,0 script Tree 127,{ - set @obj, 3; - callfunc "Easter2010Loc_Check1"; - close; -} - -007-1.gat,36,58,0 script Flowers 127,{ - set @obj, 4; - callfunc "Easter2010Loc_Check1"; - close; -} - -007-1.gat,91,25,0 script Plant 127,{ - set @obj, 5; - callfunc "Easter2010Loc_Check1"; - close; -} - -007-1.gat,66,52,0 script Sign 127,{ - set @obj, 6; - callfunc "Easter2010Loc_Check1"; - close; -} - -007-1.gat,104,33,0 script Tree 127,{ - set @obj, 7; - callfunc "Easter2010Loc_Check1"; - close; -} - -007-1.gat,99,39,0 script Plant 127,{ - set @obj, 8; - callfunc "Easter2010Loc_Check1"; - close; -} - -007-1.gat,125,20,0 script Rock 127,{ - set @obj, 9; - callfunc "Easter2010Loc_Check1"; - close; -} - -007-1.gat,117,33,0 script Plant 127,{ - set @obj, 10; - callfunc "Easter2010Loc_Check1"; - close; -} - -007-1.gat,114,54,0 script Tree 127,{ - set @obj, 11; - callfunc "Easter2010Loc_Check1"; - close; -} - -008-1.gat,97,28,0 script Haystack 127,{ - set @obj, 12; - callfunc "Easter2010Loc_Check1"; - if (@result != 0) close; - if ((Easter_2010_QuestState >> E10_LOC_NEEDLE_SHIFT) & E10_LOC_NEEDLE_MASK == ($Easter_2010_Npc_State2 >> E10_NEEDLE_SHIFT) & E10_NEEDLE_MASK && rand(100) == 0) goto L_Needle; - close; - -L_Needle: - getitem "BentNeedle", 1; - set Easter_2010_QuestState, Easter_2010_QuestState & ~(E10_LOC_NEEDLE_MASK << E10_LOC_NEEDLE_SHIFT) | (rand(E10_LOC_NEEDLE_MASK) << E10_LOC_NEEDLE_SHIFT); - end; - -OnInit: - if (debug >= 2) end; - initnpctimer; - -OnTimer300000: - set $Easter_2010_Npc_State2, $Easter_2010_Npc_State2 & ~(E10_NEEDLE_MASK << E10_NEEDLE_SHIFT) | (rand(E10_NEEDLE_MASK) << E10_NEEDLE_SHIFT); - setnpctimer 0; -} - -008-1.gat,88,48,0 script Target 127,{ - set @obj, 13; - callfunc "Easter2010Loc_Check1"; - close; -} - -008-1.gat,137,85,0 script Tree 127,{ - set @obj, 14; - callfunc "Easter2010Loc_Check1"; - close; -} - -008-1.gat,46,18,0 script Rocks 127,{ - set @obj, 15; - callfunc "Easter2010Loc_Check1"; - close; -} - -008-1.gat,36,28,0 script Rock 127,{ - set @obj, 16; - callfunc "Easter2010Loc_Check1"; - close; -} - -008-1.gat,44,26,0 script Flowers 127,{ - set @obj, 17; - callfunc "Easter2010Loc_Check1"; - close; -} - -008-1.gat,68,21,0 script Wheat 127,{ - set @obj, 18; - callfunc "Easter2010Loc_Check1"; - close; -} - -008-1.gat,103,27,0 script Scythe 127,{ - set @obj, 19; - callfunc "Easter2010Loc_Check1"; - close; -} - -008-1.gat,128,25,0 script Trees 127,{ - set @obj, 20; - callfunc "Easter2010Loc_Check1"; - close; -} - -008-1.gat,134,39,0 script Flowers 127,{ - set @obj, 21; - callfunc "Easter2010Loc_Check1"; - close; -} - -008-1.gat,134,61,0 script Tree 127,{ - set @obj, 22; - callfunc "Easter2010Loc_Check1"; - close; -} - -008-1.gat,129,77,0 script Flowers 127,{ - set @obj, 23; - callfunc "Easter2010Loc_Check1"; - close; -} - -008-1.gat,121,95,0 script Tree 127,{ - set @obj, 24; - callfunc "Easter2010Loc_Check1"; - close; -} - -008-1.gat,99,91,0 script Tree 127,{ - set @obj, 25; - callfunc "Easter2010Loc_Check1"; - close; -} - -008-1.gat,64,90,0 script Grass 127,{ - set @obj, 26; - callfunc "Easter2010Loc_Check1"; - close; -} - -008-1.gat,46,83,0 script Pond 127,{ - set @obj, 27; - callfunc "Easter2010Loc_Check1"; - close; -} - -008-1.gat,43,64,0 script Tree 127,{ - set @obj, 28; - callfunc "Easter2010Loc_Check1"; - close; -} - -009-1.gat,26,32,0 script Tree 127,{ - set @obj, 29; - callfunc "Easter2010Loc_Check1"; - close; -} - -009-1.gat,25,51,0 script Flowers 127,{ - set @obj, 30; - callfunc "Easter2010Loc_Check1"; - close; -} - -009-1.gat,44,46,0 script Stump 127,{ - set @obj, 31; - callfunc "Easter2010Loc_Check1"; - close; -} - -009-1.gat,36,34,0 script Sign 127,{ - set @obj, 0; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-1.gat,45,25,0 script Tree 127,{ - set @obj, 1; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-1.gat,54,31,0 script Flower pot 127,{ - set @obj, 2; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-1.gat,61,34,0 script Sign 127,{ - set @obj, 3; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-1.gat,67,33,0 script Pots 127,{ - set @obj, 4; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-1.gat,78,34,0 script Sign 127,{ - set @obj, 5; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-1.gat,85,35,0 script Flower pot 127,{ - set @obj, 6; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-1.gat,95,33,0 script Flowers 127,{ - set @obj, 7; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-1.gat,90,27,0 script Bench 127,{ - set @obj, 8; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-1.gat,94,52,0 script Tree 127,{ - set @obj, 9; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-1.gat,82,51,0 script Tree 127,{ - set @obj, 10; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-1.gat,77,45,0 script Barrel 127,{ - set @obj, 11; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-1.gat,62,46,0 script Chimney 127,{ - set @obj, 12; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-1.gat,54,38,0 script Tree 127,{ - set @obj, 13; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-2.gat,67,48,0 script Shelf 127,{ - set @obj, 14; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-2.gat,37,24,0 script Table 127,{ - set @obj, 15; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-2.gat,68,29,0 script Bed 127,{ - set @obj, 16; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-2.gat,94,25,0 script Display 127,{ - set @obj, 17; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-2.gat,123,21,0 script Shelf 127,{ - set @obj, 18; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-2.gat,151,25,0 script Candle 127,{ - set @obj, 19; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-2.gat,57,48,0 script Fireplace 127,{ - set @obj, 20; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-2.gat,62,56,0 script Table 127,{ - set @obj, 21; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-2.gat,101,44,0 script Bed 127,{ - set @obj, 22; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-2.gat,123,44,0 script Plant 127,{ - set @obj, 23; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-2.gat,112,43,0 script Window 127,{ - set @obj, 24; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-2.gat,146,42,0 script Table 127,{ - set @obj, 25; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-2.gat,153,46,0 script Railing 127,{ - set @obj, 26; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-2.gat,18,103,0 script Chair 127,{ - set @obj, 27; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-2.gat,27,97,0 script Shield 127,{ - set @obj, 28; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-2.gat,148,64,0 script Counter 127,{ - set @obj, 29; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-2.gat,177,58,0 script Display 127,{ - set @obj, 30; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-2.gat,184,63,0 script Display 127,{ - set @obj, 31; - callfunc "Easter2010Loc_Check2"; - close; -} - -009-2.gat,148,80,0 script Container 127,{ - set @obj, 0; - callfunc "Easter2010Loc_Check3"; - close; -} - -009-2.gat,143,85,0 script Shelf 127,{ - set @obj, 1; - callfunc "Easter2010Loc_Check3"; - close; -} - -009-2.gat,150,83,0 script Shelf 127,{ - set @obj, 2; - callfunc "Easter2010Loc_Check3"; - close; -} - -009-2.gat,151,88,0 script Bag 127,{ - set @obj, 3; - callfunc "Easter2010Loc_Check3"; - close; -} - -009-2.gat,126,69,0 script Cupboard 127,{ - set @obj, 4; - callfunc "Easter2010Loc_Check3"; - close; -} - -009-2.gat,118,68,0 script Fireplace 127,{ - set @obj, 5; - callfunc "Easter2010Loc_Check3"; - close; -} - -009-2.gat,111,72,0 script Shield 127,{ - set @obj, 6; - callfunc "Easter2010Loc_Check3"; - close; -} - -009-2.gat,103,74,0 script Table 127,{ - set @obj, 7; - callfunc "Easter2010Loc_Check3"; - close; -} - -010-1.gat,24,66,0 script Rock 127,{ - set @obj, 8; - callfunc "Easter2010Loc_Check3"; - close; -} - -010-1.gat,120,84,0 script Rock 127,{ - set @obj, 9; - callfunc "Easter2010Loc_Check3"; - close; -} - -010-1.gat,27,95,0 script Barrel 127,{ - set @obj, 10; - callfunc "Easter2010Loc_Check3"; - close; -} - -010-1.gat,51,34,0 script Sign 127,{ - set @obj, 11; - callfunc "Easter2010Loc_Check3"; - close; -} - -010-1.gat,71,74,0 script Dead Tree 127,{ - set @obj, 12; - callfunc "Easter2010Loc_Check3"; - close; -} - -010-1.gat,48,82,0 script Flowerpot 127,{ - set @obj, 13; - callfunc "Easter2010Loc_Check3"; - close; -} - -010-1.gat,21,97,0 script Water 127,{ - set @obj, 14; - callfunc "Easter2010Loc_Check3"; - close; -} - -010-1.gat,130,45,0 script Grass 127,{ - set @obj, 15; - callfunc "Easter2010Loc_Check3"; - close; -} - -010-1.gat,45,102,0 script Plant 127,{ - set @obj, 16; - callfunc "Easter2010Loc_Check3"; - close; -} - -011-1.gat,38,36,0 script Cave 127,{ - set @obj, 17; - callfunc "Easter2010Loc_Check3"; - close; -} - -011-1.gat,87,33,0 script Oscar's Hat 127,{ - set @obj, 18; - callfunc "Easter2010Loc_Check3"; - close; -} - -011-1.gat,91,37,0 script Lattice 127,{ - set @obj, 19; - callfunc "Easter2010Loc_Check3"; - close; -} - -011-1.gat,97,37,0 script Drain 127,{ - set @obj, 20; - callfunc "Easter2010Loc_Check3"; - close; -} - -011-1.gat,88,66,0 script Bullrushes 127,{ - set @obj, 21; - callfunc "Easter2010Loc_Check3"; - close; -} - -011-1.gat,104,69,0 script Plant 127,{ - set @obj, 22; - callfunc "Easter2010Loc_Check3"; - close; -} - -011-1.gat,112,76,0 script Crevice 127,{ - set @obj, 23; - callfunc "Easter2010Loc_Check3"; - close; -} - -011-1.gat,108,89,0 script Grass 127,{ - set @obj, 24; - callfunc "Easter2010Loc_Check3"; - close; -} - -011-1.gat,83,85,0 script Stump 127,{ - set @obj, 25; - callfunc "Easter2010Loc_Check3"; - close; -} - -011-1.gat,59,92,0 script Sign 127,{ - set @obj, 26; - callfunc "Easter2010Loc_Check3"; - close; -} - -011-1.gat,36,90,0 script Tree 127,{ - set @obj, 27; - callfunc "Easter2010Loc_Check3"; - close; -} - -011-1.gat,50,103,0 script Tree 127,{ - set @obj, 28; - callfunc "Easter2010Loc_Check3"; - close; -} - -011-1.gat,26,89,0 script Stream 127,{ - set @obj, 29; - callfunc "Easter2010Loc_Check3"; - close; -} - -011-1.gat,35,75,0 script Tree 127,{ - set @obj, 30; - callfunc "Easter2010Loc_Check3"; - close; -} - -011-1.gat,48,79,0 script Flowers 127,{ - set @obj, 31; - callfunc "Easter2010Loc_Check3"; - close; -} - -011-1.gat,70,69,0 script Tree 127,{ - set @obj, 0; - callfunc "Easter2010Loc_Check4"; - close; -} - -011-1.gat,100,41,0 script Field 127,{ - set @obj, 1; - callfunc "Easter2010Loc_Check4"; - close; -} - -011-1.gat,89,37,0 script Flower pot 127,{ - set @obj, 2; - callfunc "Easter2010Loc_Check4"; - close; -} - -011-1.gat,77,32,0 script Foundation 127,{ - set @obj, 3; - callfunc "Easter2010Loc_Check4"; - close; -} - -011-1.gat,65,39,0 script Cattails 127,{ - set @obj, 4; - callfunc "Easter2010Loc_Check4"; - close; -} - -011-1.gat,45,35,0 script Plant 127,{ - set @obj, 5; - callfunc "Easter2010Loc_Check4"; - close; -} - -011-2.gat,29,29,0 script Torch 127,{ - set @obj, 6; - callfunc "Easter2010Loc_Check4"; - close; -} - -011-2.gat,33,51,0 script Water 127,{ - set @obj, 7; - callfunc "Easter2010Loc_Check4"; - close; -} - -011-2.gat,39,48,0 script Stalagmite 127,{ - set @obj, 8; - callfunc "Easter2010Loc_Check4"; - close; -} - -012-1.gat,124,137,0 script Tree 127,{ - set @obj, 9; - callfunc "Easter2010Loc_Check4"; - close; -} - -012-1.gat,143,121,0 script Treestump 127,{ - set @obj, 10; - callfunc "Easter2010Loc_Check4"; - close; -} - -012-1.gat,136,72,0 script Treestump 127,{ - set @obj, 11; - callfunc "Easter2010Loc_Check4"; - close; -} - -012-1.gat,110,44,0 script Grass 127,{ - set @obj, 12; - callfunc "Easter2010Loc_Check4"; - close; -} - -012-1.gat,123,115,0 script Island 127,{ - set @obj, 13; - callfunc "Easter2010Loc_Check4"; - close; -} - -012-1.gat,96,129,0 script Rock 127,{ - set @obj, 14; - callfunc "Easter2010Loc_Check4"; - close; -} - -012-1.gat,109,147,0 script Treestump 127,{ - set @obj, 15; - callfunc "Easter2010Loc_Check4"; - close; -} - -012-1.gat,118,98,0 script Waterfall 127,{ - set @obj, 16; - callfunc "Easter2010Loc_Check4"; - close; -} - -012-1.gat,99,110,0 script Rock 127,{ - set @obj, 17; - callfunc "Easter2010Loc_Check4"; - close; -} - -012-3.gat,62,141,0 script Torch 127,{ - set @obj, 18; - callfunc "Easter2010Loc_Check4"; - close; -} - -013-1.gat,135,71,0 script Treestump 127,{ - set @obj, 19; - callfunc "Easter2010Loc_Check4"; - close; -} - -013-1.gat,124,23,0 script Flower 127,{ - set @obj, 20; - callfunc "Easter2010Loc_Check4"; - close; -} - -013-1.gat,128,100,0 script Plant 127,{ - set @obj, 21; - callfunc "Easter2010Loc_Check4"; - close; -} - -013-1.gat,41,88,0 script Rock 127,{ - set @obj, 22; - callfunc "Easter2010Loc_Check4"; - close; -} - -013-1.gat,89,28,0 script Rock 127,{ - set @obj, 23; - callfunc "Easter2010Loc_Check4"; - close; -} - -013-1.gat,131,21,0 script Flowers 127,{ - set @obj, 24; - callfunc "Easter2010Loc_Check4"; - close; -} - -013-1.gat,116,48,0 script Treestump 127,{ - set @obj, 25; - callfunc "Easter2010Loc_Check4"; - close; -} - -013-1.gat,62,70,0 script Tree 127,{ - set @obj, 26; - callfunc "Easter2010Loc_Check4"; - close; -} - -014-1.gat,97,92,0 script Tree 127,{ - set @obj, 27; - callfunc "Easter2010Loc_Check4"; - close; -} - -014-1.gat,102,72,0 script Rock 127,{ - set @obj, 28; - callfunc "Easter2010Loc_Check4"; - close; -} - -014-1.gat,61,85,0 script Stump 127,{ - set @obj, 29; - callfunc "Easter2010Loc_Check4"; - close; -} - -014-1.gat,49,66,0 script Stump 127,{ - set @obj, 30; - callfunc "Easter2010Loc_Check4"; - close; -} - -014-1.gat,80,91,0 script Tree 127,{ - set @obj, 31; - callfunc "Easter2010Loc_Check4"; - close; -} - -018-1.gat,71,98,0 script Tree 127,{ - set @obj, 0; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-1.gat,63,87,0 script Cattails 127,{ - set @obj, 1; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-1.gat,62,74,0 script Foundation 127,{ - set @obj, 2; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-1.gat,65,78,0 script Firepit 127,{ - set @obj, 3; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-1.gat,94,88,0 script Tree 127,{ - set @obj, 4; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-1.gat,82,67,0 script Plant 127,{ - set @obj, 5; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-1.gat,81,59,0 script Barrel 127,{ - set @obj, 6; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-1.gat,102,73,0 script Tree 127,{ - set @obj, 7; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-1.gat,135,63,0 script Tree 127,{ - set @obj, 8; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-1.gat,131,93,0 script Tree 127,{ - set @obj, 9; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-2.gat,57,26,0 script Flower pot 127,{ - set @obj, 10; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-2.gat,51,20,0 script Shield 127,{ - set @obj, 11; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-2.gat,36,21,0 script Bag 127,{ - set @obj, 12; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-2.gat,33,32,0 script Container 127,{ - set @obj, 13; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-2.gat,25,45,0 script Anvil 127,{ - set @obj, 14; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-2.gat,23,28,0 script Table 127,{ - set @obj, 15; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-2.gat,82,19,0 script Bookcase 127,{ - set @obj, 16; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-2.gat,91,31,0 script Table 127,{ - set @obj, 17; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-2.gat,79,46,0 script Bed 127,{ - set @obj, 18; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-2.gat,116,22,0 script Chair 127,{ - set @obj, 19; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-2.gat,123,19,0 script Mug 127,{ - set @obj, 20; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-2.gat,118,24,0 script Woodpile 127,{ - set @obj, 21; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-2.gat,119,40,0 script Teapot 127,{ - set @obj, 22; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-2.gat,125,49,0 script Corner 127,{ - set @obj, 23; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-3.gat,34,22,0 script Skull 127,{ - set @obj, 24; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-3.gat,24,32,0 script Stalagmite 127,{ - set @obj, 25; - callfunc "Easter2010Loc_Check5"; - close; -} - -018-3.gat,65,30,0 script Torch 127,{ - set @obj, 26; - callfunc "Easter2010Loc_Check5"; - close; -} - diff --git a/world/map/npc/easter/2010/helper.txt b/world/map/npc/easter/2010/helper.txt deleted file mode 100644 index aaa9b42e..00000000 --- a/world/map/npc/easter/2010/helper.txt +++ /dev/null @@ -1,15 +0,0 @@ -028-1.gat,136,50,0 script Control#Helper 127,{ -close; - -OnBarrierEnable: - set $Easter_2010_Npc_State2, ($Easter_2010_Npc_State2 & ~(E10_BARRIER_MASK << E10_BARRIER_SHIFT)) | (E10_BARRIER_ACTIVE << E10_BARRIER_SHIFT); - end; - -OnBarrierDisable: - set $Easter_2010_Npc_State2, ($Easter_2010_Npc_State2 & ~(E10_BARRIER_MASK << E10_BARRIER_SHIFT)) | (E10_BARRIER_OPEN << E10_BARRIER_SHIFT); - end; - -OnInit: - goto OnBarrierEnable; - -} diff --git a/world/map/npc/easter/2011/bunny.txt b/world/map/npc/easter/2011/bunny.txt deleted file mode 100644 index 515ca79b..00000000 --- a/world/map/npc/easter/2011/bunny.txt +++ /dev/null @@ -1,215 +0,0 @@ -//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; -// } diff --git a/world/map/npc/easter/2012/_import.txt b/world/map/npc/easter/2012/_import.txt deleted file mode 100644 index ce4d6ac4..00000000 --- a/world/map/npc/easter/2012/_import.txt +++ /dev/null @@ -1,4 +0,0 @@ -npc: npc/easter/2012/doors.txt -npc: npc/easter/2012/easter2012config.txt -npc: npc/easter/2012/easterbunny.txt -npc: npc/easter/2012/unclebunny.txt diff --git a/world/map/npc/easter/2012/doors.txt b/world/map/npc/easter/2012/doors.txt deleted file mode 100644 index 4fe14a33..00000000 --- a/world/map/npc/easter/2012/doors.txt +++ /dev/null @@ -1,21 +0,0 @@ -004-2.gat,62,28,0|script|#kidnapperdoor|32767,0,0{ - if (QUEST_Easter12 < 4) - goto L_Locked; - if (QUEST_Easter12 == 4) - message strcharinfo(0), "As you look at the door, you notice the lock is broken. Walking inside the room, you notice some white fur around the room. The Easter Bunny was probably here and found a way to escape. You should talk to Uncle Bunny."; - if (QUEST_Easter12 == 4) - set QUEST_Easter12, 5; - warp "004-2.gat", 21, 61; - end; - -L_Locked: - message strcharinfo(0), "The door to the basement is locked."; - end; -} - -021-2.gat,42,53,0|script|#easterbunnydoor|32767,0,0{ - if (QUEST_Easter12 < 5) - end; - warp "021-2.gat", 70, 57; - end; -} diff --git a/world/map/npc/easter/2012/easter2012config.txt b/world/map/npc/easter/2012/easter2012config.txt deleted file mode 100644 index 9d26e765..00000000 --- a/world/map/npc/easter/2012/easter2012config.txt +++ /dev/null @@ -1,28 +0,0 @@ -// Easter 2012 -// Storyline conceived by mainly by prsm with suggestions from TheKandiman -// Scripting by mostly by alastrim -// Bug fixing and testing by Jenalya - -// Variable QUEST_Easter12 values: -// 1 - Player agree to help uncle bunny (to get pearls, petals and orange cupcakes). (unclebunny.txt) -// 2 - Player gave the items to uncle bunny. Now he needs to look for Frozenbeard. (unclebunny.txt) -// 3 - Player found Frozenbeard and got information from him after giving him a black pearl. Now he needs to look for George. (frozenbeard.txt) -// 4 - Player found George and got information from him about a possible location for the Easter bunny. (george.txt) -// 5 - Player found the place where the Easter bunny was locked up. (#kidnapperdoor/doors.txt) -// 6 - Player talked to Easter bunny and received the pan hat as a reward. The bunny told the chef wants to talk to you. (easterbunny.txt) -// 7 - Player agreed to lend his pan hat to the chef. -// 8 - Player received a jar of pickled beets from the chef, but the hat is ruined. -// 9 - The chef offers the player a new hat after he tries to leave the room. (#chefproposition/doors.txt) -// 10 - Player picks one of the options offered by the chef. (keep the pickled beets or change it for a chef hat) -// 10 - OR Player got the pickled beets and the pan hat wasn't ruined during the process. - --|script|#easter2012config|-1,{ -OnInit: - set $@easter2012_start_day, 23; - set $@easter2012_reward_start_day, 8; - set $@easter2012_reward_end_day, 22; - set $@easter2012_year, 2012; - set $@easter2012_pearl_amount, 3; - set $@easter2012_orangecupcake_amount, 20; - set $@easter2012_pinkpetal_amount, 5; -} diff --git a/world/map/npc/easter/2012/easterbunny.txt b/world/map/npc/easter/2012/easterbunny.txt deleted file mode 100644 index 85767656..00000000 --- a/world/map/npc/easter/2012/easterbunny.txt +++ /dev/null @@ -1,30 +0,0 @@ -// Easter bunny - -021-2.gat,69,55,0|script|Easter Bunny|173,{ - - if (QUEST_Easter12 >= 6) goto L_Easterbunny_Thanks; - if (QUEST_Easter12 < 5) goto L_Easterbunny_Notyet; - - mes "[Easter Bunny]"; - mes "\"Hi " + strcharinfo(0) + "! I was waiting for you. My uncle told me all about the pirates and how you were working really hard to save me. So I decided to give you a gift. You know, such generous and brave actions must be rewarded somehow.\""; - next; - mes "\"Here is what I have for you. I used it to break the lock of door in that basement. It seems to be a very resistant pan, but it can also be used as a hat. Enjoy!\""; - getitem "PanHat", 1; - set QUEST_Easter12, 6; - next; - mes "\"Oh, I forgot to mention. The Chef in Dimond's cove was really interested in this pan when he saw it. I told him it was yours, so you are the one who can decide about this.\""; - next; - mes "\"If I were you I would see what he wants with this pan, maybe you can even get something good out of it.\""; - close; - -L_Easterbunny_Notyet: - mes "[Easter Bunny]"; - mes "\"Hello!\""; - close; - -L_Easterbunny_Thanks: - mes "[Easter Bunny]"; - mes "\"Hello " + strcharinfo(0) + "! Thanks again for all your help."; - mes "I don't remember... did I tell you about the Chef from Dimond's cove? He wanted to ask you something about the pan.\""; - close; -} diff --git a/world/map/npc/easter/2012/unclebunny.txt b/world/map/npc/easter/2012/unclebunny.txt deleted file mode 100644 index 0792ac2a..00000000 --- a/world/map/npc/easter/2012/unclebunny.txt +++ /dev/null @@ -1,135 +0,0 @@ -// Uncle Bunny -008-1.gat,45,23,0|script|Uncle Bunny|336,{ - - if ((BaseLevel < 30) || (gettimetick(2)-TUT_var < 3*7*86400)) // player must be created at least three weeks ago - goto L_TooYoung; - - if (!(gettime(6) == 3 && gettime(5) >= $@easter2012_start_day) && !(gettime(6) == 4 && gettime(5) < $@easter2012_reward_start_day)) - goto L_Easter2012Over; - - if (QUEST_Easter12 == 1) goto L_Return_Death_Threat; - if (QUEST_Easter12 > 1 && QUEST_Easter12 < 5) goto L_Return_Frozenbeard; - if (QUEST_Easter12 == 5) goto L_Return_Easter_Bunny; - if (QUEST_Easter12 > 5) goto L_Easter2012Over; - - mes "You see a big, funny-looking bunny wearing a bowler hat. He gazes at the horizon with a very sad face."; - menu - "Hey you, can I help you with anything?", -, - "Leave the bunny alone with his problems.", L_Close; - - mes "[Uncle Bunny]"; - mes "\"Oh, hi! Sorry, I didn't notice you were here. I am so worried about my nephew and his current situation that I can't barely keep a normal conversation.\""; - menu - "Sorry, but I don't want to be involved in your family troubles right now.", L_Close, - "Who is your nephew? What happened to him?", -; - - if (QUEST_Easter11 != 14) - goto L_Dont_Know_Easter11; - - mes "[Uncle Bunny]"; - mes "\"I believe you know him already. He is the Easter Bunny, the one you helped last year with a very nice Easter basket. But this year he can't even work on his things...\""; - goto L_Ask_For_Help; - -L_Dont_Know_Easter11: - mes "[Uncle Bunny]"; - mes "\"I don't think you know him personally, but he is very famous. He is the Easter Bunny. He is widely known for his beautiful baskets full of candies and chocolates but also about his memory problems.\""; - -L_Ask_For_Help: - next; - mes "\"The problem is that some pirates kidnapped him and now they are asking for a lot of expensive things to set him free! They just sent me a terrible message! They are asking for items just to keep him alive!\""; - next; - mes "\"These criminals are probably inspired by that evil man who kidnapped Santa a couple years ago... They must be thinking they are going to get away with the ransom, just like the other guy. But we have to do something about it! Would you help me with this problem?\""; - next; - menu - "Of course I will. What do you need me to do?", -, - "Ehh... I am really busy right now, maybe later.", L_Close; - - set QUEST_Easter12, 1; - mes "[Uncle Bunny]"; - mes "\"Great! We need to be fast. They said they need " + $@easter2012_pearl_amount + " pearls, " + $@easter2012_orangecupcake_amount + " orange cupcakes and " + $@easter2012_pinkpetal_amount + " pink petals to keep him alive. Please, bring it to me as fast as you can.\""; - goto L_Close; - -L_Return_Death_Threat: - mes "[Uncle Bunny]"; - mes "\"You are back!\""; - next; - if (countitem("Pearl") >= $@easter2012_pearl_amount && countitem("OrangeCupcake") >= $@easter2012_orangecupcake_amount && countitem("PinkPetal") >= $@easter2012_pinkpetal_amount) - goto L_Return_Death_Threat_With; - - mes "\"Oh, but you don't have the items... Remember, we need " + $@easter2012_pearl_amount + " pearls, " + $@easter2012_orangecupcake_amount + " orange cupcakes and " + $@easter2012_pinkpetal_amount + " pink petals to keep him alive."; - mes "Please hurry, the Easter Bunny's life depends on you!\""; - goto L_Close; - -L_Return_Death_Threat_With: - mes "\"And you have the items! Thank you! Now we have time to think about something.\""; - next; - mes "\"While you were collecting the items, I heard there is a pirate called Frozenbeard who is not one of the kidnappers. Maybe he knows something about them or where they are hiding my nephew.\""; - next; - if (countitem("Pearl") < $@easter2012_pearl_amount || countitem("OrangeCupcake") < $@easter2012_orangecupcake_amount || countitem("PinkPetal") < $@easter2012_pinkpetal_amount) - goto L_Noitems; - delitem "Pearl", $@easter2012_pearl_amount; - delitem "OrangeCupcake", $@easter2012_orangecupcake_amount; - delitem "PinkPetal", $@easter2012_pinkpetal_amount; - set QUEST_Easter12, 2; - getitem "BlackPearl", 1; - mes "\"Please, any information you get from him will be extremely valuable! And here, take this black pearl. I heard he is a greedy man, so you can offer this item in case he shows any sign of fear or decides to put a price to his knowledge.\""; - goto L_Close; - -L_Return_Frozenbeard: - mes "[Uncle Bunny]"; - mes "\"So, what did you find out?\""; - next; - if (QUEST_Easter12 == 2) - menu - "Nothing yet, I still need to find this man.", L_Return_Frozenbeard_Close; - - if (QUEST_Easter12 == 3) - menu - "I found Frozenbeard, but he only referred me to another person.", L_Return_Frozenbeard_George; - - if (QUEST_Easter12 == 4) - menu - "I know where he is. I am going to save him!", L_Return_Frozenbeard_Save; - -L_Return_Frozenbeard_Close: - mes "[Uncle Bunny]"; - mes "\"Please, don't waste too much time or this is going to be a tragedy!\""; - goto L_Close; - -L_Return_Frozenbeard_George: - mes "[Uncle Bunny]"; - mes "\"Then go after this person!\""; - goto L_Close; - -L_Return_Frozenbeard_Save: - mes "[Uncle Bunny]"; - mes "\"Oh, Really? Are you sure about this information? If I were younger I would go with you and take my nephew from the hands of the pirates myself, but I am old and weak... All I can do is wish you good luck!\""; - goto L_Close; - -L_Return_Easter_Bunny: - mes "[Uncle Bunny]"; - mes "\"" + strcharinfo(0) + "! You won't believe it! My nephew escaped! He just showed up as if nothing had happened... He told me he woke up in a strange house and realized he didn't know how he got there. Can you believe that?\""; - next; - mes "\"My nephew forgot he had been kidnapped! He thought it was just one of his blackouts... So, since the door was locked, he just broke the lock and escaped! I guess the pirates were not counting on such a bold move from his part, hahah!\""; - next; - mes "\"But don't worry, I told him all about the pirates and your efforts to save him! Now he wants to talk to you, he says you deserve a special gift. He went to the Tulimshar workshop where he gets some help with the Easter issues and is waiting for you there.\""; - goto L_Close; - -L_Easter2012Over: - mes "[Uncle Bunny]"; - mes "\"Ah, I am so glad my nephew was found! Now the nightmare is over! I hope his memory gets better one day.\""; - goto L_Close; - -L_Noitems: - mes "[Uncle Bunny]"; - mes "\"Wait, I could swear you had the items, but they disappeared. Please, come back with the items!\""; - goto L_Close; - -L_TooYoung: - mes "[Uncle Bunny]"; - mes "\"Hello, young one. This world is harsh, so be careful out there.\""; - goto L_Close; - -L_Close: - close; -} diff --git a/world/map/npc/halloween/2006/halloween1.txt b/world/map/npc/halloween/2006/halloween1.txt deleted file mode 100644 index e70c441d..00000000 --- a/world/map/npc/halloween/2006/halloween1.txt +++ /dev/null @@ -1,213 +0,0 @@ -011-1.gat,119,78,0 script Halloween1 103,{ - mes "[Halloweenist]"; - mes "It's Halloween."; - mes "The time for tricks and treats."; - next; - - mes "[Halloweenist]"; - mes "You get one of either from me."; - next; - - menu "Trick or treat.",L_tricktreat,"No thanks.",L_no; - -L_tricktreat: - if(HWQUEST1 == 1) goto L_only_once; - set HWQUEST1,1; - mes "[Halloweenist]"; - mes "Now you will get a..."; - next; - set @TEMP,rand(9); - if(@TEMP == 6) goto L_treat; - goto L_trick; - -L_treat: - mes "[Halloweenist]"; - mes "...Treat!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_treat_0; - if(@TEMP == 1) goto L_treat_1; - if(@TEMP == 2) goto L_treat_2; - if(@TEMP == 3) goto L_treat_3; - if(@TEMP == 4) goto L_treat_4; - if(@TEMP == 5) goto L_treat_5; - if(@TEMP == 6) goto L_treat_6; - if(@TEMP == 7) goto L_treat_7; - if(@TEMP == 8) goto L_treat_8; - if(@TEMP == 9) goto L_treat_9; - -L_trick: - mes "[Halloweenist]"; - mes "...Trick!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_trick_0; - if(@TEMP == 1) goto L_trick_1; - if(@TEMP == 2) goto L_trick_2; - if(@TEMP == 3) goto L_trick_3; - if(@TEMP == 4) goto L_trick_4; - if(@TEMP == 5) goto L_trick_5; - if(@TEMP == 6) goto L_trick_6; - if(@TEMP == 7) goto L_trick_7; - if(@TEMP == 8) goto L_trick_8; - if(@TEMP == 9) goto L_trick_9; - -L_trick_0: - mes "[Halloweenist]"; - mes "Mwahahaha!"; - mes "I stole some of your money!"; - set Zeny,Zeny-rand(500,1500); - close; - -L_trick_1: - mes "[Halloweenist]"; - mes "You will now die."; - next; - mes "[Halloweenist]"; - mes "Have a nice halloween as a corpse!"; - gmcommand "@die "; - close; - -L_trick_2: - mes "[Halloweenist]"; - mes "May all of your disgusting stats and skills be gone!"; - next; - mes "[Halloweenist]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_trick_3: - mes "[Halloweenist]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Halloweenist]"; - mes "Happy Halloween!"; - close; - -L_trick_4: - mes "[Halloweenist]"; - mes "You will now drop all of your items!"; - next; - mes "[Halloweenist]"; - mes "Better luck with my collegues..."; - gmcommand "@dropall "; - close; - -L_trick_5: - mes "[Halloweenist]"; - mes "Your sex will now change!"; - next; - mes "[Halloweenist]"; - mes "Bwahahaha!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_trick_6: - mes "[Halloweenist]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Halloweenist]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_trick_7: - mes "[Halloweenist]"; - mes "I'll summon maggots!"; - next; - mes "[Halloweenist]"; - mes "Mwahahaha!"; - gmcommand "@spawn 1002 50 "; - close; - -L_trick_8: - mes "[Halloweenist]"; - mes "I'll summon some Fire Skulls now!"; - next; - mes "[Halloweenist]"; - mes "Mwahahahaha!"; - gmcommand "@spawn 1023 5 "; - close; - -L_trick_9: - mes "[Halloweenist]"; - mes "I'll diss you around the server."; - next; - mes "[Halloweenist]"; - mes "Mwahahahah!"; - gmcommand "@kami "+strcharinfo(0)+" is getting tricked!"; - close; - -L_treat_0: - mes "[Halloweenist]"; - mes "You just won some money."; - set Zeny,Zeny+rand(500,15000); - close; - -L_treat_1: - mes "[Halloweenist]"; - mes "You just won a Pumpkin Helmet!"; - getitem "PumpkinHelmet",1; - close; - -L_treat_2: - mes "[Halloweenist]"; - mes "You just won an Axe Hat!"; - getitem "AxeHat",1; - close; - -L_treat_3: - mes "[Halloweenist]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_treat_4: - mes "[Halloweenist]"; - mes "You just won Goggles!"; - getitem "Goggles",1; - close; - -L_treat_5: - mes "[Halloweenist]"; - mes "You just won Leather Goggles!"; - getitem "LeatherGoggles",1; - close; - -L_treat_6: - mes "[Halloweenist]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_treat_7: - mes "[Halloweenist]"; - mes "You just won an Eyepatch!"; - getitem "Eyepatch",1; - close; - -L_treat_8: - mes "[Halloweenist]"; - mes "You just won a Bandana!"; - getitem "Bandana",1; - close; - -L_treat_9: - mes "[Halloweenist]"; - mes "You just won 500 exp!"; - getexp 500,0; - close; - -L_only_once: - mes "[Halloweenist]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Halloweenist]"; - mes "You a chicken or something?"; - close; -} diff --git a/world/map/npc/halloween/2006/halloween10.txt b/world/map/npc/halloween/2006/halloween10.txt deleted file mode 100644 index db9784e0..00000000 --- a/world/map/npc/halloween/2006/halloween10.txt +++ /dev/null @@ -1,213 +0,0 @@ -002-4.gat,88,99,0 script Halloween10 103,{ - mes "[Halloweenist]"; - mes "It's Halloween."; - mes "The time for tricks and treats."; - next; - - mes "[Halloweenist]"; - mes "You get one of either from me."; - next; - - menu "Trick or treat.",L_tricktreat,"No thanks.",L_no; - -L_tricktreat: - if(HWQUEST10 == 1) goto L_only_once; - set HWQUEST10,1; - mes "[Halloweenist]"; - mes "Now you will get a..."; - next; - set @TEMP,rand(9); - if(@TEMP < 7) goto L_treat; - goto L_trick; - -L_treat: - mes "[Halloweenist]"; - mes "...Treat!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_treat_0; - if(@TEMP == 1) goto L_treat_1; - if(@TEMP == 2) goto L_treat_2; - if(@TEMP == 3) goto L_treat_3; - if(@TEMP == 4) goto L_treat_4; - if(@TEMP == 5) goto L_treat_5; - if(@TEMP == 6) goto L_treat_6; - if(@TEMP == 7) goto L_treat_7; - if(@TEMP == 8) goto L_treat_8; - if(@TEMP == 9) goto L_treat_9; - -L_trick: - mes "[Halloweenist]"; - mes "...Trick!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_trick_0; - if(@TEMP == 1) goto L_trick_1; - if(@TEMP == 2) goto L_trick_2; - if(@TEMP == 3) goto L_trick_3; - if(@TEMP == 4) goto L_trick_4; - if(@TEMP == 5) goto L_trick_5; - if(@TEMP == 6) goto L_trick_6; - if(@TEMP == 7) goto L_trick_7; - if(@TEMP == 8) goto L_trick_8; - if(@TEMP == 9) goto L_trick_9; - -L_trick_0: - mes "[Halloweenist]"; - mes "Mwahahaha!"; - mes "I stole some of your money!"; - set Zeny,Zeny-rand(500,1500); - close; - -L_trick_1: - mes "[Halloweenist]"; - mes "You will now die."; - next; - mes "[Halloweenist]"; - mes "Have a nice halloween as a corpse!"; - gmcommand "@die "; - close; - -L_trick_2: - mes "[Halloweenist]"; - mes "May all of your disgusting stats and skills be gone!"; - next; - mes "[Halloweenist]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_trick_3: - mes "[Halloweenist]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Halloweenist]"; - mes "Happy Halloween!"; - close; - -L_trick_4: - mes "[Halloweenist]"; - mes "You will now drop all of your items!"; - next; - mes "[Halloweenist]"; - mes "Better luck with my collegues..."; - gmcommand "@dropall "; - close; - -L_trick_5: - mes "[Halloweenist]"; - mes "Your sex will now change!"; - next; - mes "[Halloweenist]"; - mes "Bwahahaha!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_trick_6: - mes "[Halloweenist]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Halloweenist]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_trick_7: - mes "[Halloweenist]"; - mes "I'll summon maggots!"; - next; - mes "[Halloweenist]"; - mes "Mwahahaha!"; - gmcommand "@spawn 1002 50 "; - close; - -L_trick_8: - mes "[Halloweenist]"; - mes "I'll summon some Fire Skulls now!"; - next; - mes "[Halloweenist]"; - mes "Mwahahahaha!"; - gmcommand "@spawn 1023 5 "; - close; - -L_trick_9: - mes "[Halloweenist]"; - mes "I'll diss you around the server."; - next; - mes "[Halloweenist]"; - mes "Mwahahahah!"; - gmcommand "@kami "+strcharinfo(0)+" is getting tricked!"; - close; - -L_treat_0: - mes "[Halloweenist]"; - mes "You just won some money."; - set Zeny,Zeny+rand(500,15000); - close; - -L_treat_1: - mes "[Halloweenist]"; - mes "You just won a Pumpkin Helmet!"; - getitem "PumpkinHelmet",1; - close; - -L_treat_2: - mes "[Halloweenist]"; - mes "You just won an Axe Hat!"; - getitem "AxeHat",1; - close; - -L_treat_3: - mes "[Halloweenist]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_treat_4: - mes "[Halloweenist]"; - mes "You just won Goggles!"; - getitem "Goggles",1; - close; - -L_treat_5: - mes "[Halloweenist]"; - mes "You just won Leather Goggles!"; - getitem "LeatherGoggles",1; - close; - -L_treat_6: - mes "[Halloweenist]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_treat_7: - mes "[Halloweenist]"; - mes "You just won an Eyepatch!"; - getitem "Eyepatch",1; - close; - -L_treat_8: - mes "[Halloweenist]"; - mes "You just won a Bandana!"; - getitem "Bandana",1; - close; - -L_treat_9: - mes "[Halloweenist]"; - mes "You just won 500 exp!"; - getexp 500,0; - close; - -L_only_once: - mes "[Halloweenist]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Halloweenist]"; - mes "You a chicken or something?"; - close; -} diff --git a/world/map/npc/halloween/2006/halloween11.txt b/world/map/npc/halloween/2006/halloween11.txt deleted file mode 100644 index 60a79df2..00000000 --- a/world/map/npc/halloween/2006/halloween11.txt +++ /dev/null @@ -1,213 +0,0 @@ -001-3.gat,71,70,0 script Halloween11 103,{ - mes "[Halloweenist]"; - mes "It's Halloween."; - mes "The time for tricks and treats."; - next; - - mes "[Halloweenist]"; - mes "You get one of either from me."; - next; - - menu "Trick or treat.",L_tricktreat,"No thanks.",L_no; - -L_tricktreat: - if(HWQUEST11 == 1) goto L_only_once; - set HWQUEST11,1; - mes "[Halloweenist]"; - mes "Now you will get a..."; - next; - set @TEMP,rand(9); - if(@TEMP > 3) goto L_treat; - goto L_trick; - -L_treat: - mes "[Halloweenist]"; - mes "...Treat!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_treat_0; - if(@TEMP == 1) goto L_treat_1; - if(@TEMP == 2) goto L_treat_2; - if(@TEMP == 3) goto L_treat_3; - if(@TEMP == 4) goto L_treat_4; - if(@TEMP == 5) goto L_treat_5; - if(@TEMP == 6) goto L_treat_6; - if(@TEMP == 7) goto L_treat_7; - if(@TEMP == 8) goto L_treat_8; - if(@TEMP == 9) goto L_treat_9; - -L_trick: - mes "[Halloweenist]"; - mes "...Trick!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_trick_0; - if(@TEMP == 1) goto L_trick_1; - if(@TEMP == 2) goto L_trick_2; - if(@TEMP == 3) goto L_trick_3; - if(@TEMP == 4) goto L_trick_4; - if(@TEMP == 5) goto L_trick_5; - if(@TEMP == 6) goto L_trick_6; - if(@TEMP == 7) goto L_trick_7; - if(@TEMP == 8) goto L_trick_8; - if(@TEMP == 9) goto L_trick_9; - -L_trick_0: - mes "[Halloweenist]"; - mes "Mwahahaha!"; - mes "I stole some of your money!"; - set Zeny,Zeny-rand(500,1500); - close; - -L_trick_1: - mes "[Halloweenist]"; - mes "You will now die."; - next; - mes "[Halloweenist]"; - mes "Have a nice halloween as a corpse!"; - gmcommand "@die "; - close; - -L_trick_2: - mes "[Halloweenist]"; - mes "May all of your disgusting stats and skills be gone!"; - next; - mes "[Halloweenist]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_trick_3: - mes "[Halloweenist]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Halloweenist]"; - mes "Happy Halloween!"; - close; - -L_trick_4: - mes "[Halloweenist]"; - mes "You will now drop all of your items!"; - next; - mes "[Halloweenist]"; - mes "Better luck with my collegues..."; - gmcommand "@dropall "; - close; - -L_trick_5: - mes "[Halloweenist]"; - mes "Your sex will now change!"; - next; - mes "[Halloweenist]"; - mes "Bwahahaha!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_trick_6: - mes "[Halloweenist]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Halloweenist]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_trick_7: - mes "[Halloweenist]"; - mes "I'll summon maggots!"; - next; - mes "[Halloweenist]"; - mes "Mwahahaha!"; - gmcommand "@spawn 1002 50 "; - close; - -L_trick_8: - mes "[Halloweenist]"; - mes "I'll summon some Fire Skulls now!"; - next; - mes "[Halloweenist]"; - mes "Mwahahahaha!"; - gmcommand "@spawn 1023 5 "; - close; - -L_trick_9: - mes "[Halloweenist]"; - mes "I'll diss you around the server."; - next; - mes "[Halloweenist]"; - mes "Mwahahahah!"; - gmcommand "@kami "+strcharinfo(0)+" is getting tricked!"; - close; - -L_treat_0: - mes "[Halloweenist]"; - mes "You just won some money."; - set Zeny,Zeny+rand(500,15000); - close; - -L_treat_1: - mes "[Halloweenist]"; - mes "You just won a Pumpkin Helmet!"; - getitem "PumpkinHelmet",1; - close; - -L_treat_2: - mes "[Halloweenist]"; - mes "You just won an Axe Hat!"; - getitem "AxeHat",1; - close; - -L_treat_3: - mes "[Halloweenist]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_treat_4: - mes "[Halloweenist]"; - mes "You just won Goggles!"; - getitem "Goggles",1; - close; - -L_treat_5: - mes "[Halloweenist]"; - mes "You just won Leather Goggles!"; - getitem "LeatherGoggles",1; - close; - -L_treat_6: - mes "[Halloweenist]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_treat_7: - mes "[Halloweenist]"; - mes "You just won an Eyepatch!"; - getitem "Eyepatch",1; - close; - -L_treat_8: - mes "[Halloweenist]"; - mes "You just won a Bandana!"; - getitem "Bandana",1; - close; - -L_treat_9: - mes "[Halloweenist]"; - mes "You just won 500 exp!"; - getexp 500,0; - close; - -L_only_once: - mes "[Halloweenist]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Halloweenist]"; - mes "You a chicken or something?"; - close; -} diff --git a/world/map/npc/halloween/2006/halloween12.txt b/world/map/npc/halloween/2006/halloween12.txt deleted file mode 100644 index 6f548d59..00000000 --- a/world/map/npc/halloween/2006/halloween12.txt +++ /dev/null @@ -1,213 +0,0 @@ -005-1.gat,121,69,0 script Halloween12 103,{ - mes "[Halloweenist]"; - mes "It's Halloween."; - mes "The time for tricks and treats."; - next; - - mes "[Halloweenist]"; - mes "You get one of either from me."; - next; - - menu "Trick or treat.",L_tricktreat,"No thanks.",L_no; - -L_tricktreat: - if(HWQUEST12 == 1) goto L_only_once; - set HWQUEST12,1; - mes "[Halloweenist]"; - mes "Now you will get a..."; - next; - set @TEMP,rand(9); - if(@TEMP > 8) goto L_treat; - goto L_trick; - -L_treat: - mes "[Halloweenist]"; - mes "...Treat!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_treat_0; - if(@TEMP == 1) goto L_treat_1; - if(@TEMP == 2) goto L_treat_2; - if(@TEMP == 3) goto L_treat_3; - if(@TEMP == 4) goto L_treat_4; - if(@TEMP == 5) goto L_treat_5; - if(@TEMP == 6) goto L_treat_6; - if(@TEMP == 7) goto L_treat_7; - if(@TEMP == 8) goto L_treat_8; - if(@TEMP == 9) goto L_treat_9; - -L_trick: - mes "[Halloweenist]"; - mes "...Trick!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_trick_0; - if(@TEMP == 1) goto L_trick_1; - if(@TEMP == 2) goto L_trick_2; - if(@TEMP == 3) goto L_trick_3; - if(@TEMP == 4) goto L_trick_4; - if(@TEMP == 5) goto L_trick_5; - if(@TEMP == 6) goto L_trick_6; - if(@TEMP == 7) goto L_trick_7; - if(@TEMP == 8) goto L_trick_8; - if(@TEMP == 9) goto L_trick_9; - -L_trick_0: - mes "[Halloweenist]"; - mes "Mwahahaha!"; - mes "I stole some of your money!"; - set Zeny,Zeny-rand(500,1500); - close; - -L_trick_1: - mes "[Halloweenist]"; - mes "You will now die."; - next; - mes "[Halloweenist]"; - mes "Have a nice halloween as a corpse!"; - gmcommand "@die "; - close; - -L_trick_2: - mes "[Halloweenist]"; - mes "May all of your disgusting stats and skills be gone!"; - next; - mes "[Halloweenist]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_trick_3: - mes "[Halloweenist]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Halloweenist]"; - mes "Happy Halloween!"; - close; - -L_trick_4: - mes "[Halloweenist]"; - mes "You will now drop all of your items!"; - next; - mes "[Halloweenist]"; - mes "Better luck with my collegues..."; - gmcommand "@dropall "; - close; - -L_trick_5: - mes "[Halloweenist]"; - mes "Your sex will now change!"; - next; - mes "[Halloweenist]"; - mes "Bwahahaha!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_trick_6: - mes "[Halloweenist]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Halloweenist]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_trick_7: - mes "[Halloweenist]"; - mes "I'll summon maggots!"; - next; - mes "[Halloweenist]"; - mes "Mwahahaha!"; - gmcommand "@spawn 1002 50 "; - close; - -L_trick_8: - mes "[Halloweenist]"; - mes "I'll summon some Fire Skulls now!"; - next; - mes "[Halloweenist]"; - mes "Mwahahahaha!"; - gmcommand "@spawn 1023 5 "; - close; - -L_trick_9: - mes "[Halloweenist]"; - mes "I'll diss you around the server."; - next; - mes "[Halloweenist]"; - mes "Mwahahahah!"; - gmcommand "@kami "+strcharinfo(0)+" is getting tricked!"; - close; - -L_treat_0: - mes "[Halloweenist]"; - mes "You just won some money."; - set Zeny,Zeny+rand(500,15000); - close; - -L_treat_1: - mes "[Halloweenist]"; - mes "You just won a Pumpkin Helmet!"; - getitem "PumpkinHelmet",1; - close; - -L_treat_2: - mes "[Halloweenist]"; - mes "You just won an Axe Hat!"; - getitem "AxeHat",1; - close; - -L_treat_3: - mes "[Halloweenist]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_treat_4: - mes "[Halloweenist]"; - mes "You just won Goggles!"; - getitem "Goggles",1; - close; - -L_treat_5: - mes "[Halloweenist]"; - mes "You just won Leather Goggles!"; - getitem "LeatherGoggles",1; - close; - -L_treat_6: - mes "[Halloweenist]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_treat_7: - mes "[Halloweenist]"; - mes "You just won an Eyepatch!"; - getitem "Eyepatch",1; - close; - -L_treat_8: - mes "[Halloweenist]"; - mes "You just won a Bandana!"; - getitem "Bandana",1; - close; - -L_treat_9: - mes "[Halloweenist]"; - mes "You just won 500 exp!"; - getexp 500,0; - close; - -L_only_once: - mes "[Halloweenist]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Halloweenist]"; - mes "You a chicken or something?"; - close; -} diff --git a/world/map/npc/halloween/2006/halloween13.txt b/world/map/npc/halloween/2006/halloween13.txt deleted file mode 100644 index 851ee15f..00000000 --- a/world/map/npc/halloween/2006/halloween13.txt +++ /dev/null @@ -1,213 +0,0 @@ -001-2.gat,38,65,0 script Halloween13 103,{ - mes "[Halloweenist]"; - mes "It's Halloween."; - mes "The time for tricks and treats."; - next; - - mes "[Halloweenist]"; - mes "You get one of either from me."; - next; - - menu "Trick or treat.",L_tricktreat,"No thanks.",L_no; - -L_tricktreat: - if(HWQUEST13 == 1) goto L_only_once; - set HWQUEST13,1; - mes "[Halloweenist]"; - mes "Now you will get a..."; - next; - set @TEMP,rand(9); - if(@TEMP > 5) goto L_treat; - goto L_trick; - -L_treat: - mes "[Halloweenist]"; - mes "...Treat!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_treat_0; - if(@TEMP == 1) goto L_treat_1; - if(@TEMP == 2) goto L_treat_2; - if(@TEMP == 3) goto L_treat_3; - if(@TEMP == 4) goto L_treat_4; - if(@TEMP == 5) goto L_treat_5; - if(@TEMP == 6) goto L_treat_6; - if(@TEMP == 7) goto L_treat_7; - if(@TEMP == 8) goto L_treat_8; - if(@TEMP == 9) goto L_treat_9; - -L_trick: - mes "[Halloweenist]"; - mes "...Trick!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_trick_0; - if(@TEMP == 1) goto L_trick_1; - if(@TEMP == 2) goto L_trick_2; - if(@TEMP == 3) goto L_trick_3; - if(@TEMP == 4) goto L_trick_4; - if(@TEMP == 5) goto L_trick_5; - if(@TEMP == 6) goto L_trick_6; - if(@TEMP == 7) goto L_trick_7; - if(@TEMP == 8) goto L_trick_8; - if(@TEMP == 9) goto L_trick_9; - -L_trick_0: - mes "[Halloweenist]"; - mes "Mwahahaha!"; - mes "I stole some of your money!"; - set Zeny,Zeny-rand(500,1500); - close; - -L_trick_1: - mes "[Halloweenist]"; - mes "You will now die."; - next; - mes "[Halloweenist]"; - mes "Have a nice halloween as a corpse!"; - gmcommand "@die "; - close; - -L_trick_2: - mes "[Halloweenist]"; - mes "May all of your disgusting stats and skills be gone!"; - next; - mes "[Halloweenist]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_trick_3: - mes "[Halloweenist]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Halloweenist]"; - mes "Happy Halloween!"; - close; - -L_trick_4: - mes "[Halloweenist]"; - mes "You will now drop all of your items!"; - next; - mes "[Halloweenist]"; - mes "Better luck with my collegues..."; - gmcommand "@dropall "; - close; - -L_trick_5: - mes "[Halloweenist]"; - mes "Your sex will now change!"; - next; - mes "[Halloweenist]"; - mes "Bwahahaha!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_trick_6: - mes "[Halloweenist]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Halloweenist]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_trick_7: - mes "[Halloweenist]"; - mes "I'll summon maggots!"; - next; - mes "[Halloweenist]"; - mes "Mwahahaha!"; - gmcommand "@spawn 1002 50 "; - close; - -L_trick_8: - mes "[Halloweenist]"; - mes "I'll summon some Fire Skulls now!"; - next; - mes "[Halloweenist]"; - mes "Mwahahahaha!"; - gmcommand "@spawn 1023 5 "; - close; - -L_trick_9: - mes "[Halloweenist]"; - mes "I'll diss you around the server."; - next; - mes "[Halloweenist]"; - mes "Mwahahahah!"; - gmcommand "@kami "+strcharinfo(0)+" is getting tricked!"; - close; - -L_treat_0: - mes "[Halloweenist]"; - mes "You just won some money."; - set Zeny,Zeny+rand(500,15000); - close; - -L_treat_1: - mes "[Halloweenist]"; - mes "You just won a Pumpkin Helmet!"; - getitem "PumpkinHelmet",1; - close; - -L_treat_2: - mes "[Halloweenist]"; - mes "You just won an Axe Hat!"; - getitem "AxeHat",1; - close; - -L_treat_3: - mes "[Halloweenist]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_treat_4: - mes "[Halloweenist]"; - mes "You just won Goggles!"; - getitem "Goggles",1; - close; - -L_treat_5: - mes "[Halloweenist]"; - mes "You just won Leather Goggles!"; - getitem "LeatherGoggles",1; - close; - -L_treat_6: - mes "[Halloweenist]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_treat_7: - mes "[Halloweenist]"; - mes "You just won an Eyepatch!"; - getitem "Eyepatch",1; - close; - -L_treat_8: - mes "[Halloweenist]"; - mes "You just won a Bandana!"; - getitem "Bandana",1; - close; - -L_treat_9: - mes "[Halloweenist]"; - mes "You just won 500 exp!"; - getexp 500,0; - close; - -L_only_once: - mes "[Halloweenist]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Halloweenist]"; - mes "You a chicken or something?"; - close; -} diff --git a/world/map/npc/halloween/2006/halloween14.txt b/world/map/npc/halloween/2006/halloween14.txt deleted file mode 100644 index ece2e665..00000000 --- a/world/map/npc/halloween/2006/halloween14.txt +++ /dev/null @@ -1,213 +0,0 @@ -019-1.gat,56,61,0 script Halloween14 103,{ - mes "[Halloweenist]"; - mes "It's Halloween."; - mes "The time for tricks and treats."; - next; - - mes "[Halloweenist]"; - mes "You get one of either from me."; - next; - - menu "Trick or treat.",L_tricktreat,"No thanks.",L_no; - -L_tricktreat: - if(HWQUEST14 == 1) goto L_only_once; - set HWQUEST14,1; - mes "[Halloweenist]"; - mes "Now you will get a..."; - next; - set @TEMP,rand(9); - if(@TEMP > 8) goto L_treat; - goto L_trick; - -L_treat: - mes "[Halloweenist]"; - mes "...Treat!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_treat_0; - if(@TEMP == 1) goto L_treat_1; - if(@TEMP == 2) goto L_treat_2; - if(@TEMP == 3) goto L_treat_3; - if(@TEMP == 4) goto L_treat_4; - if(@TEMP == 5) goto L_treat_5; - if(@TEMP == 6) goto L_treat_6; - if(@TEMP == 7) goto L_treat_7; - if(@TEMP == 8) goto L_treat_8; - if(@TEMP == 9) goto L_treat_9; - -L_trick: - mes "[Halloweenist]"; - mes "...Trick!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_trick_0; - if(@TEMP == 1) goto L_trick_1; - if(@TEMP == 2) goto L_trick_2; - if(@TEMP == 3) goto L_trick_3; - if(@TEMP == 4) goto L_trick_4; - if(@TEMP == 5) goto L_trick_5; - if(@TEMP == 6) goto L_trick_6; - if(@TEMP == 7) goto L_trick_7; - if(@TEMP == 8) goto L_trick_8; - if(@TEMP == 9) goto L_trick_9; - -L_trick_0: - mes "[Halloweenist]"; - mes "Mwahahaha!"; - mes "I stole some of your money!"; - set Zeny,Zeny-rand(500,1500); - close; - -L_trick_1: - mes "[Halloweenist]"; - mes "You will now die."; - next; - mes "[Halloweenist]"; - mes "Have a nice halloween as a corpse!"; - gmcommand "@die "; - close; - -L_trick_2: - mes "[Halloweenist]"; - mes "May all of your disgusting stats and skills be gone!"; - next; - mes "[Halloweenist]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_trick_3: - mes "[Halloweenist]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Halloweenist]"; - mes "Happy Halloween!"; - close; - -L_trick_4: - mes "[Halloweenist]"; - mes "You will now drop all of your items!"; - next; - mes "[Halloweenist]"; - mes "Better luck with my collegues..."; - gmcommand "@dropall "; - close; - -L_trick_5: - mes "[Halloweenist]"; - mes "Your sex will now change!"; - next; - mes "[Halloweenist]"; - mes "Bwahahaha!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_trick_6: - mes "[Halloweenist]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Halloweenist]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_trick_7: - mes "[Halloweenist]"; - mes "I'll summon maggots!"; - next; - mes "[Halloweenist]"; - mes "Mwahahaha!"; - gmcommand "@spawn 1002 50 "; - close; - -L_trick_8: - mes "[Halloweenist]"; - mes "I'll summon some Fire Skulls now!"; - next; - mes "[Halloweenist]"; - mes "Mwahahahaha!"; - gmcommand "@spawn 1023 5 "; - close; - -L_trick_9: - mes "[Halloweenist]"; - mes "I'll diss you around the server."; - next; - mes "[Halloweenist]"; - mes "Mwahahahah!"; - gmcommand "@kami "+strcharinfo(0)+" is getting tricked!"; - close; - -L_treat_0: - mes "[Halloweenist]"; - mes "You just won some money."; - set Zeny,Zeny+rand(500,15000); - close; - -L_treat_1: - mes "[Halloweenist]"; - mes "You just won a Pumpkin Helmet!"; - getitem "PumpkinHelmet",1; - close; - -L_treat_2: - mes "[Halloweenist]"; - mes "You just won an Axe Hat!"; - getitem "AxeHat",1; - close; - -L_treat_3: - mes "[Halloweenist]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_treat_4: - mes "[Halloweenist]"; - mes "You just won Goggles!"; - getitem "Goggles",1; - close; - -L_treat_5: - mes "[Halloweenist]"; - mes "You just won Leather Goggles!"; - getitem "LeatherGoggles",1; - close; - -L_treat_6: - mes "[Halloweenist]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_treat_7: - mes "[Halloweenist]"; - mes "You just won an Eyepatch!"; - getitem "Eyepatch",1; - close; - -L_treat_8: - mes "[Halloweenist]"; - mes "You just won a Bandana!"; - getitem "Bandana",1; - close; - -L_treat_9: - mes "[Halloweenist]"; - mes "You just won 500 exp!"; - getexp 500,0; - close; - -L_only_once: - mes "[Halloweenist]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Halloweenist]"; - mes "You a chicken or something?"; - close; -} diff --git a/world/map/npc/halloween/2006/halloween15.txt b/world/map/npc/halloween/2006/halloween15.txt deleted file mode 100644 index 2ab2c553..00000000 --- a/world/map/npc/halloween/2006/halloween15.txt +++ /dev/null @@ -1,213 +0,0 @@ -020-1.gat,51,49,0 script Halloween15 103,{ - mes "[Halloweenist]"; - mes "It's Halloween."; - mes "The time for tricks and treats."; - next; - - mes "[Halloweenist]"; - mes "You get one of either from me."; - next; - - menu "Trick or treat.",L_tricktreat,"No thanks.",L_no; - -L_tricktreat: - if(HWQUEST15 == 1) goto L_only_once; - set HWQUEST15,1; - mes "[Halloweenist]"; - mes "Now you will get a..."; - next; - set @TEMP,rand(9); - if(@TEMP > 3) goto L_treat; - goto L_trick; - -L_treat: - mes "[Halloweenist]"; - mes "...Treat!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_treat_0; - if(@TEMP == 1) goto L_treat_1; - if(@TEMP == 2) goto L_treat_2; - if(@TEMP == 3) goto L_treat_3; - if(@TEMP == 4) goto L_treat_4; - if(@TEMP == 5) goto L_treat_5; - if(@TEMP == 6) goto L_treat_6; - if(@TEMP == 7) goto L_treat_7; - if(@TEMP == 8) goto L_treat_8; - if(@TEMP == 9) goto L_treat_9; - -L_trick: - mes "[Halloweenist]"; - mes "...Trick!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_trick_0; - if(@TEMP == 1) goto L_trick_1; - if(@TEMP == 2) goto L_trick_2; - if(@TEMP == 3) goto L_trick_3; - if(@TEMP == 4) goto L_trick_4; - if(@TEMP == 5) goto L_trick_5; - if(@TEMP == 6) goto L_trick_6; - if(@TEMP == 7) goto L_trick_7; - if(@TEMP == 8) goto L_trick_8; - if(@TEMP == 9) goto L_trick_9; - -L_trick_0: - mes "[Halloweenist]"; - mes "Mwahahaha!"; - mes "I stole some of your money!"; - set Zeny,Zeny-rand(500,1500); - close; - -L_trick_1: - mes "[Halloweenist]"; - mes "You will now die."; - next; - mes "[Halloweenist]"; - mes "Have a nice halloween as a corpse!"; - gmcommand "@die "; - close; - -L_trick_2: - mes "[Halloweenist]"; - mes "May all of your disgusting stats and skills be gone!"; - next; - mes "[Halloweenist]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_trick_3: - mes "[Halloweenist]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Halloweenist]"; - mes "Happy Halloween!"; - close; - -L_trick_4: - mes "[Halloweenist]"; - mes "You will now drop all of your items!"; - next; - mes "[Halloweenist]"; - mes "Better luck with my collegues..."; - gmcommand "@dropall "; - close; - -L_trick_5: - mes "[Halloweenist]"; - mes "Your sex will now change!"; - next; - mes "[Halloweenist]"; - mes "Bwahahaha!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_trick_6: - mes "[Halloweenist]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Halloweenist]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_trick_7: - mes "[Halloweenist]"; - mes "I'll summon maggots!"; - next; - mes "[Halloweenist]"; - mes "Mwahahaha!"; - gmcommand "@spawn 1002 50 "; - close; - -L_trick_8: - mes "[Halloweenist]"; - mes "I'll summon some Fire Skulls now!"; - next; - mes "[Halloweenist]"; - mes "Mwahahahaha!"; - gmcommand "@spawn 1023 5 "; - close; - -L_trick_9: - mes "[Halloweenist]"; - mes "I'll diss you around the server."; - next; - mes "[Halloweenist]"; - mes "Mwahahahah!"; - gmcommand "@kami "+strcharinfo(0)+" is getting tricked!"; - close; - -L_treat_0: - mes "[Halloweenist]"; - mes "You just won some money."; - set Zeny,Zeny+rand(500,15000); - close; - -L_treat_1: - mes "[Halloweenist]"; - mes "You just won a Pumpkin Helmet!"; - getitem "PumpkinHelmet",1; - close; - -L_treat_2: - mes "[Halloweenist]"; - mes "You just won an Axe Hat!"; - getitem "AxeHat",1; - close; - -L_treat_3: - mes "[Halloweenist]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_treat_4: - mes "[Halloweenist]"; - mes "You just won Goggles!"; - getitem "Goggles",1; - close; - -L_treat_5: - mes "[Halloweenist]"; - mes "You just won Leather Goggles!"; - getitem "LeatherGoggles",1; - close; - -L_treat_6: - mes "[Halloweenist]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_treat_7: - mes "[Halloweenist]"; - mes "You just won an Eyepatch!"; - getitem "Eyepatch",1; - close; - -L_treat_8: - mes "[Halloweenist]"; - mes "You just won a Bandana!"; - getitem "Bandana",1; - close; - -L_treat_9: - mes "[Halloweenist]"; - mes "You just won 500 exp!"; - getexp 500,0; - close; - -L_only_once: - mes "[Halloweenist]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Halloweenist]"; - mes "You a chicken or something?"; - close; -} diff --git a/world/map/npc/halloween/2006/halloween16.txt b/world/map/npc/halloween/2006/halloween16.txt deleted file mode 100644 index b27af58a..00000000 --- a/world/map/npc/halloween/2006/halloween16.txt +++ /dev/null @@ -1,213 +0,0 @@ -020-3.gat,35,44,0 script Halloween16 103,{ - mes "[Halloweenist]"; - mes "It's Halloween."; - mes "The time for tricks and treats."; - next; - - mes "[Halloweenist]"; - mes "You get one of either from me."; - next; - - menu "Trick or treat.",L_tricktreat,"No thanks.",L_no; - -L_tricktreat: - if(HWQUEST16 == 1) goto L_only_once; - set HWQUEST16,1; - mes "[Halloweenist]"; - mes "Now you will get a..."; - next; - set @TEMP,rand(9); - if(@TEMP > 6) goto L_treat; - goto L_trick; - -L_treat: - mes "[Halloweenist]"; - mes "...Treat!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_treat_0; - if(@TEMP == 1) goto L_treat_1; - if(@TEMP == 2) goto L_treat_2; - if(@TEMP == 3) goto L_treat_3; - if(@TEMP == 4) goto L_treat_4; - if(@TEMP == 5) goto L_treat_5; - if(@TEMP == 6) goto L_treat_6; - if(@TEMP == 7) goto L_treat_7; - if(@TEMP == 8) goto L_treat_8; - if(@TEMP == 9) goto L_treat_9; - -L_trick: - mes "[Halloweenist]"; - mes "...Trick!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_trick_0; - if(@TEMP == 1) goto L_trick_1; - if(@TEMP == 2) goto L_trick_2; - if(@TEMP == 3) goto L_trick_3; - if(@TEMP == 4) goto L_trick_4; - if(@TEMP == 5) goto L_trick_5; - if(@TEMP == 6) goto L_trick_6; - if(@TEMP == 7) goto L_trick_7; - if(@TEMP == 8) goto L_trick_8; - if(@TEMP == 9) goto L_trick_9; - -L_trick_0: - mes "[Halloweenist]"; - mes "Mwahahaha!"; - mes "I stole some of your money!"; - set Zeny,Zeny-rand(500,1500); - close; - -L_trick_1: - mes "[Halloweenist]"; - mes "You will now die."; - next; - mes "[Halloweenist]"; - mes "Have a nice halloween as a corpse!"; - gmcommand "@die "; - close; - -L_trick_2: - mes "[Halloweenist]"; - mes "May all of your disgusting stats and skills be gone!"; - next; - mes "[Halloweenist]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_trick_3: - mes "[Halloweenist]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Halloweenist]"; - mes "Happy Halloween!"; - close; - -L_trick_4: - mes "[Halloweenist]"; - mes "You will now drop all of your items!"; - next; - mes "[Halloweenist]"; - mes "Better luck with my collegues..."; - gmcommand "@dropall "; - close; - -L_trick_5: - mes "[Halloweenist]"; - mes "Your sex will now change!"; - next; - mes "[Halloweenist]"; - mes "Bwahahaha!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_trick_6: - mes "[Halloweenist]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Halloweenist]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_trick_7: - mes "[Halloweenist]"; - mes "I'll summon maggots!"; - next; - mes "[Halloweenist]"; - mes "Mwahahaha!"; - gmcommand "@spawn 1002 50 "; - close; - -L_trick_8: - mes "[Halloweenist]"; - mes "I'll summon some Fire Skulls now!"; - next; - mes "[Halloweenist]"; - mes "Mwahahahaha!"; - gmcommand "@spawn 1023 5 "; - close; - -L_trick_9: - mes "[Halloweenist]"; - mes "I'll diss you around the server."; - next; - mes "[Halloweenist]"; - mes "Mwahahahah!"; - gmcommand "@kami "+strcharinfo(0)+" is getting tricked!"; - close; - -L_treat_0: - mes "[Halloweenist]"; - mes "You just won some money."; - set Zeny,Zeny+rand(500,15000); - close; - -L_treat_1: - mes "[Halloweenist]"; - mes "You just won a Pumpkin Helmet!"; - getitem "PumpkinHelmet",1; - close; - -L_treat_2: - mes "[Halloweenist]"; - mes "You just won an Axe Hat!"; - getitem "AxeHat",1; - close; - -L_treat_3: - mes "[Halloweenist]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_treat_4: - mes "[Halloweenist]"; - mes "You just won Goggles!"; - getitem "Goggles",1; - close; - -L_treat_5: - mes "[Halloweenist]"; - mes "You just won Leather Goggles!"; - getitem "LeatherGoggles",1; - close; - -L_treat_6: - mes "[Halloweenist]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_treat_7: - mes "[Halloweenist]"; - mes "You just won an Eyepatch!"; - getitem "Eyepatch",1; - close; - -L_treat_8: - mes "[Halloweenist]"; - mes "You just won a Bandana!"; - getitem "Bandana",1; - close; - -L_treat_9: - mes "[Halloweenist]"; - mes "You just won 500 exp!"; - getexp 500,0; - close; - -L_only_once: - mes "[Halloweenist]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Halloweenist]"; - mes "You a chicken or something?"; - close; -} diff --git a/world/map/npc/halloween/2006/halloween17.txt b/world/map/npc/halloween/2006/halloween17.txt deleted file mode 100644 index ce3e0e86..00000000 --- a/world/map/npc/halloween/2006/halloween17.txt +++ /dev/null @@ -1,213 +0,0 @@ -020-2.gat,74,27,0 script Halloween17 103,{ - mes "[Halloweenist]"; - mes "It's Halloween."; - mes "The time for tricks and treats."; - next; - - mes "[Halloweenist]"; - mes "You get one of either from me."; - next; - - menu "Trick or treat.",L_tricktreat,"No thanks.",L_no; - -L_tricktreat: - if(HWQUEST17 == 1) goto L_only_once; - set HWQUEST17,1; - mes "[Halloweenist]"; - mes "Now you will get a..."; - next; - set @TEMP,rand(9); - if(@TEMP > 2) goto L_treat; - goto L_trick; - -L_treat: - mes "[Halloweenist]"; - mes "...Treat!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_treat_0; - if(@TEMP == 1) goto L_treat_1; - if(@TEMP == 2) goto L_treat_2; - if(@TEMP == 3) goto L_treat_3; - if(@TEMP == 4) goto L_treat_4; - if(@TEMP == 5) goto L_treat_5; - if(@TEMP == 6) goto L_treat_6; - if(@TEMP == 7) goto L_treat_7; - if(@TEMP == 8) goto L_treat_8; - if(@TEMP == 9) goto L_treat_9; - -L_trick: - mes "[Halloweenist]"; - mes "...Trick!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_trick_0; - if(@TEMP == 1) goto L_trick_1; - if(@TEMP == 2) goto L_trick_2; - if(@TEMP == 3) goto L_trick_3; - if(@TEMP == 4) goto L_trick_4; - if(@TEMP == 5) goto L_trick_5; - if(@TEMP == 6) goto L_trick_6; - if(@TEMP == 7) goto L_trick_7; - if(@TEMP == 8) goto L_trick_8; - if(@TEMP == 9) goto L_trick_9; - -L_trick_0: - mes "[Halloweenist]"; - mes "Mwahahaha!"; - mes "I stole some of your money!"; - set Zeny,Zeny-rand(500,1500); - close; - -L_trick_1: - mes "[Halloweenist]"; - mes "You will now die."; - next; - mes "[Halloweenist]"; - mes "Have a nice halloween as a corpse!"; - gmcommand "@die "; - close; - -L_trick_2: - mes "[Halloweenist]"; - mes "May all of your disgusting stats and skills be gone!"; - next; - mes "[Halloweenist]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_trick_3: - mes "[Halloweenist]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Halloweenist]"; - mes "Happy Halloween!"; - close; - -L_trick_4: - mes "[Halloweenist]"; - mes "You will now drop all of your items!"; - next; - mes "[Halloweenist]"; - mes "Better luck with my collegues..."; - gmcommand "@dropall "; - close; - -L_trick_5: - mes "[Halloweenist]"; - mes "Your sex will now change!"; - next; - mes "[Halloweenist]"; - mes "Bwahahaha!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_trick_6: - mes "[Halloweenist]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Halloweenist]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_trick_7: - mes "[Halloweenist]"; - mes "I'll summon maggots!"; - next; - mes "[Halloweenist]"; - mes "Mwahahaha!"; - gmcommand "@spawn 1002 50 "; - close; - -L_trick_8: - mes "[Halloweenist]"; - mes "I'll summon some Fire Skulls now!"; - next; - mes "[Halloweenist]"; - mes "Mwahahahaha!"; - gmcommand "@spawn 1023 5 "; - close; - -L_trick_9: - mes "[Halloweenist]"; - mes "I'll diss you around the server."; - next; - mes "[Halloweenist]"; - mes "Mwahahahah!"; - gmcommand "@kami "+strcharinfo(0)+" is getting tricked!"; - close; - -L_treat_0: - mes "[Halloweenist]"; - mes "You just won some money."; - set Zeny,Zeny+rand(500,15000); - close; - -L_treat_1: - mes "[Halloweenist]"; - mes "You just won a Pumpkin Helmet!"; - getitem "PumpkinHelmet",1; - close; - -L_treat_2: - mes "[Halloweenist]"; - mes "You just won an Axe Hat!"; - getitem "AxeHat",1; - close; - -L_treat_3: - mes "[Halloweenist]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_treat_4: - mes "[Halloweenist]"; - mes "You just won Goggles!"; - getitem "Goggles",1; - close; - -L_treat_5: - mes "[Halloweenist]"; - mes "You just won Leather Goggles!"; - getitem "LeatherGoggles",1; - close; - -L_treat_6: - mes "[Halloweenist]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_treat_7: - mes "[Halloweenist]"; - mes "You just won an Eyepatch!"; - getitem "Eyepatch",1; - close; - -L_treat_8: - mes "[Halloweenist]"; - mes "You just won a Bandana!"; - getitem "Bandana",1; - close; - -L_treat_9: - mes "[Halloweenist]"; - mes "You just won 500 exp!"; - getexp 500,0; - close; - -L_only_once: - mes "[Halloweenist]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Halloweenist]"; - mes "You a chicken or something?"; - close; -} diff --git a/world/map/npc/halloween/2006/halloween18.txt b/world/map/npc/halloween/2006/halloween18.txt deleted file mode 100644 index 65781fc2..00000000 --- a/world/map/npc/halloween/2006/halloween18.txt +++ /dev/null @@ -1,213 +0,0 @@ -003-1.gat,130,9,0 script Halloween18 103,{ - mes "[Halloweenist]"; - mes "It's Halloween."; - mes "The time for tricks and treats."; - next; - - mes "[Halloweenist]"; - mes "You get one of either from me."; - next; - - menu "Trick or treat.",L_tricktreat,"No thanks.",L_no; - -L_tricktreat: - if(HWQUEST18 == 1) goto L_only_once; - set HWQUEST18,1; - mes "[Halloweenist]"; - mes "Now you will get a..."; - next; - set @TEMP,rand(9); - if(@TEMP > 4) goto L_treat; - goto L_trick; - -L_treat: - mes "[Halloweenist]"; - mes "...Treat!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_treat_0; - if(@TEMP == 1) goto L_treat_1; - if(@TEMP == 2) goto L_treat_2; - if(@TEMP == 3) goto L_treat_3; - if(@TEMP == 4) goto L_treat_4; - if(@TEMP == 5) goto L_treat_5; - if(@TEMP == 6) goto L_treat_6; - if(@TEMP == 7) goto L_treat_7; - if(@TEMP == 8) goto L_treat_8; - if(@TEMP == 9) goto L_treat_9; - -L_trick: - mes "[Halloweenist]"; - mes "...Trick!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_trick_0; - if(@TEMP == 1) goto L_trick_1; - if(@TEMP == 2) goto L_trick_2; - if(@TEMP == 3) goto L_trick_3; - if(@TEMP == 4) goto L_trick_4; - if(@TEMP == 5) goto L_trick_5; - if(@TEMP == 6) goto L_trick_6; - if(@TEMP == 7) goto L_trick_7; - if(@TEMP == 8) goto L_trick_8; - if(@TEMP == 9) goto L_trick_9; - -L_trick_0: - mes "[Halloweenist]"; - mes "Mwahahaha!"; - mes "I stole some of your money!"; - set Zeny,Zeny-rand(500,1500); - close; - -L_trick_1: - mes "[Halloweenist]"; - mes "You will now die."; - next; - mes "[Halloweenist]"; - mes "Have a nice halloween as a corpse!"; - gmcommand "@die "; - close; - -L_trick_2: - mes "[Halloweenist]"; - mes "May all of your disgusting stats and skills be gone!"; - next; - mes "[Halloweenist]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_trick_3: - mes "[Halloweenist]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Halloweenist]"; - mes "Happy Halloween!"; - close; - -L_trick_4: - mes "[Halloweenist]"; - mes "You will now drop all of your items!"; - next; - mes "[Halloweenist]"; - mes "Better luck with my collegues..."; - gmcommand "@dropall "; - close; - -L_trick_5: - mes "[Halloweenist]"; - mes "Your sex will now change!"; - next; - mes "[Halloweenist]"; - mes "Bwahahaha!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_trick_6: - mes "[Halloweenist]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Halloweenist]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_trick_7: - mes "[Halloweenist]"; - mes "I'll summon maggots!"; - next; - mes "[Halloweenist]"; - mes "Mwahahaha!"; - gmcommand "@spawn 1002 50 "; - close; - -L_trick_8: - mes "[Halloweenist]"; - mes "I'll summon some Fire Skulls now!"; - next; - mes "[Halloweenist]"; - mes "Mwahahahaha!"; - gmcommand "@spawn 1023 5 "; - close; - -L_trick_9: - mes "[Halloweenist]"; - mes "I'll diss you around the server."; - next; - mes "[Halloweenist]"; - mes "Mwahahahah!"; - gmcommand "@kami "+strcharinfo(0)+" is getting tricked!"; - close; - -L_treat_0: - mes "[Halloweenist]"; - mes "You just won some money."; - set Zeny,Zeny+rand(500,15000); - close; - -L_treat_1: - mes "[Halloweenist]"; - mes "You just won a Pumpkin Helmet!"; - getitem "PumpkinHelmet",1; - close; - -L_treat_2: - mes "[Halloweenist]"; - mes "You just won an Axe Hat!"; - getitem "AxeHat",1; - close; - -L_treat_3: - mes "[Halloweenist]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_treat_4: - mes "[Halloweenist]"; - mes "You just won Goggles!"; - getitem "Goggles",1; - close; - -L_treat_5: - mes "[Halloweenist]"; - mes "You just won Leather Goggles!"; - getitem "LeatherGoggles",1; - close; - -L_treat_6: - mes "[Halloweenist]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_treat_7: - mes "[Halloweenist]"; - mes "You just won an Eyepatch!"; - getitem "Eyepatch",1; - close; - -L_treat_8: - mes "[Halloweenist]"; - mes "You just won a Bandana!"; - getitem "Bandana",1; - close; - -L_treat_9: - mes "[Halloweenist]"; - mes "You just won 500 exp!"; - getexp 500,0; - close; - -L_only_once: - mes "[Halloweenist]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Halloweenist]"; - mes "You a chicken or something?"; - close; -} diff --git a/world/map/npc/halloween/2006/halloween19.txt b/world/map/npc/halloween/2006/halloween19.txt deleted file mode 100644 index f03435e9..00000000 --- a/world/map/npc/halloween/2006/halloween19.txt +++ /dev/null @@ -1,213 +0,0 @@ -007-1.gat,113,71,0 script Halloween19 103,{ - mes "[Halloweenist]"; - mes "It's Halloween."; - mes "The time for tricks and treats."; - next; - - mes "[Halloweenist]"; - mes "You get one of either from me."; - next; - - menu "Trick or treat.",L_tricktreat,"No thanks.",L_no; - -L_tricktreat: - if(HWQUEST19 == 1) goto L_only_once; - set HWQUEST19,1; - mes "[Halloweenist]"; - mes "Now you will get a..."; - next; - set @TEMP,rand(9); - if(@TEMP > 8) goto L_treat; - goto L_trick; - -L_treat: - mes "[Halloweenist]"; - mes "...Treat!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_treat_0; - if(@TEMP == 1) goto L_treat_1; - if(@TEMP == 2) goto L_treat_2; - if(@TEMP == 3) goto L_treat_3; - if(@TEMP == 4) goto L_treat_4; - if(@TEMP == 5) goto L_treat_5; - if(@TEMP == 6) goto L_treat_6; - if(@TEMP == 7) goto L_treat_7; - if(@TEMP == 8) goto L_treat_8; - if(@TEMP == 9) goto L_treat_9; - -L_trick: - mes "[Halloweenist]"; - mes "...Trick!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_trick_0; - if(@TEMP == 1) goto L_trick_1; - if(@TEMP == 2) goto L_trick_2; - if(@TEMP == 3) goto L_trick_3; - if(@TEMP == 4) goto L_trick_4; - if(@TEMP == 5) goto L_trick_5; - if(@TEMP == 6) goto L_trick_6; - if(@TEMP == 7) goto L_trick_7; - if(@TEMP == 8) goto L_trick_8; - if(@TEMP == 9) goto L_trick_9; - -L_trick_0: - mes "[Halloweenist]"; - mes "Mwahahaha!"; - mes "I stole some of your money!"; - set Zeny,Zeny-rand(500,1500); - close; - -L_trick_1: - mes "[Halloweenist]"; - mes "You will now die."; - next; - mes "[Halloweenist]"; - mes "Have a nice halloween as a corpse!"; - gmcommand "@die "; - close; - -L_trick_2: - mes "[Halloweenist]"; - mes "May all of your disgusting stats and skills be gone!"; - next; - mes "[Halloweenist]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_trick_3: - mes "[Halloweenist]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Halloweenist]"; - mes "Happy Halloween!"; - close; - -L_trick_4: - mes "[Halloweenist]"; - mes "You will now drop all of your items!"; - next; - mes "[Halloweenist]"; - mes "Better luck with my collegues..."; - gmcommand "@dropall "; - close; - -L_trick_5: - mes "[Halloweenist]"; - mes "Your sex will now change!"; - next; - mes "[Halloweenist]"; - mes "Bwahahaha!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_trick_6: - mes "[Halloweenist]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Halloweenist]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_trick_7: - mes "[Halloweenist]"; - mes "I'll summon maggots!"; - next; - mes "[Halloweenist]"; - mes "Mwahahaha!"; - gmcommand "@spawn 1002 50 "; - close; - -L_trick_8: - mes "[Halloweenist]"; - mes "I'll summon some Fire Skulls now!"; - next; - mes "[Halloweenist]"; - mes "Mwahahahaha!"; - gmcommand "@spawn 1023 5 "; - close; - -L_trick_9: - mes "[Halloweenist]"; - mes "I'll diss you around the server."; - next; - mes "[Halloweenist]"; - mes "Mwahahahah!"; - gmcommand "@kami "+strcharinfo(0)+" is getting tricked!"; - close; - -L_treat_0: - mes "[Halloweenist]"; - mes "You just won some money."; - set Zeny,Zeny+rand(500,15000); - close; - -L_treat_1: - mes "[Halloweenist]"; - mes "You just won a Pumpkin Helmet!"; - getitem "PumpkinHelmet",1; - close; - -L_treat_2: - mes "[Halloweenist]"; - mes "You just won an Axe Hat!"; - getitem "AxeHat",1; - close; - -L_treat_3: - mes "[Halloweenist]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_treat_4: - mes "[Halloweenist]"; - mes "You just won Goggles!"; - getitem "Goggles",1; - close; - -L_treat_5: - mes "[Halloweenist]"; - mes "You just won Leather Goggles!"; - getitem "LeatherGoggles",1; - close; - -L_treat_6: - mes "[Halloweenist]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_treat_7: - mes "[Halloweenist]"; - mes "You just won an Eyepatch!"; - getitem "Eyepatch",1; - close; - -L_treat_8: - mes "[Halloweenist]"; - mes "You just won a Bandana!"; - getitem "Bandana",1; - close; - -L_treat_9: - mes "[Halloweenist]"; - mes "You just won 500 exp!"; - getexp 500,0; - close; - -L_only_once: - mes "[Halloweenist]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Halloweenist]"; - mes "You a chicken or something?"; - close; -} diff --git a/world/map/npc/halloween/2006/halloween2.txt b/world/map/npc/halloween/2006/halloween2.txt deleted file mode 100644 index 8206abfa..00000000 --- a/world/map/npc/halloween/2006/halloween2.txt +++ /dev/null @@ -1,213 +0,0 @@ -011-1.gat,48,58,0 script Halloween2 103,{ - mes "[Halloweenist]"; - mes "It's Halloween."; - mes "The time for tricks and treats."; - next; - - mes "[Halloweenist]"; - mes "You get one of either from me."; - next; - - menu "Trick or treat.",L_tricktreat,"No thanks.",L_no; - -L_tricktreat: - if(HWQUEST2 == 1) goto L_only_once; - set HWQUEST2,1; - mes "[Halloweenist]"; - mes "Now you will get a..."; - next; - set @TEMP,rand(9); - if(@TEMP > 8) goto L_treat; - goto L_trick; - -L_treat: - mes "[Halloweenist]"; - mes "...Treat!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_treat_0; - if(@TEMP == 1) goto L_treat_1; - if(@TEMP == 2) goto L_treat_2; - if(@TEMP == 3) goto L_treat_3; - if(@TEMP == 4) goto L_treat_4; - if(@TEMP == 5) goto L_treat_5; - if(@TEMP == 6) goto L_treat_6; - if(@TEMP == 7) goto L_treat_7; - if(@TEMP == 8) goto L_treat_8; - if(@TEMP == 9) goto L_treat_9; - -L_trick: - mes "[Halloweenist]"; - mes "...Trick!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_trick_0; - if(@TEMP == 1) goto L_trick_1; - if(@TEMP == 2) goto L_trick_2; - if(@TEMP == 3) goto L_trick_3; - if(@TEMP == 4) goto L_trick_4; - if(@TEMP == 5) goto L_trick_5; - if(@TEMP == 6) goto L_trick_6; - if(@TEMP == 7) goto L_trick_7; - if(@TEMP == 8) goto L_trick_8; - if(@TEMP == 9) goto L_trick_9; - -L_trick_0: - mes "[Halloweenist]"; - mes "Mwahahaha!"; - mes "I stole some of your money!"; - set Zeny,Zeny-rand(500,1500); - close; - -L_trick_1: - mes "[Halloweenist]"; - mes "You will now die."; - next; - mes "[Halloweenist]"; - mes "Have a nice halloween as a corpse!"; - gmcommand "@die "; - close; - -L_trick_2: - mes "[Halloweenist]"; - mes "May all of your disgusting stats and skills be gone!"; - next; - mes "[Halloweenist]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_trick_3: - mes "[Halloweenist]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Halloweenist]"; - mes "Happy Halloween!"; - close; - -L_trick_4: - mes "[Halloweenist]"; - mes "You will now drop all of your items!"; - next; - mes "[Halloweenist]"; - mes "Better luck with my collegues..."; - gmcommand "@dropall "; - close; - -L_trick_5: - mes "[Halloweenist]"; - mes "Your sex will now change!"; - next; - mes "[Halloweenist]"; - mes "Bwahahaha!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_trick_6: - mes "[Halloweenist]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Halloweenist]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_trick_7: - mes "[Halloweenist]"; - mes "I'll summon maggots!"; - next; - mes "[Halloweenist]"; - mes "Mwahahaha!"; - gmcommand "@spawn 1002 50 "; - close; - -L_trick_8: - mes "[Halloweenist]"; - mes "I'll summon some Fire Skulls now!"; - next; - mes "[Halloweenist]"; - mes "Mwahahahaha!"; - gmcommand "@spawn 1023 5 "; - close; - -L_trick_9: - mes "[Halloweenist]"; - mes "I'll diss you around the server."; - next; - mes "[Halloweenist]"; - mes "Mwahahahah!"; - gmcommand "@kami "+strcharinfo(0)+" is getting tricked!"; - close; - -L_treat_0: - mes "[Halloweenist]"; - mes "You just won some money."; - set Zeny,Zeny+rand(500,15000); - close; - -L_treat_1: - mes "[Halloweenist]"; - mes "You just won a Pumpkin Helmet!"; - getitem "PumpkinHelmet",1; - close; - -L_treat_2: - mes "[Halloweenist]"; - mes "You just won an Axe Hat!"; - getitem "AxeHat",1; - close; - -L_treat_3: - mes "[Halloweenist]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_treat_4: - mes "[Halloweenist]"; - mes "You just won Goggles!"; - getitem "Goggles",1; - close; - -L_treat_5: - mes "[Halloweenist]"; - mes "You just won Leather Goggles!"; - getitem "LeatherGoggles",1; - close; - -L_treat_6: - mes "[Halloweenist]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_treat_7: - mes "[Halloweenist]"; - mes "You just won an Eyepatch!"; - getitem "Eyepatch",1; - close; - -L_treat_8: - mes "[Halloweenist]"; - mes "You just won a Bandana!"; - getitem "Bandana",1; - close; - -L_treat_9: - mes "[Halloweenist]"; - mes "You just won 500 exp!"; - getexp 500,0; - close; - -L_only_once: - mes "[Halloweenist]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Halloweenist]"; - mes "You a chicken or something?"; - close; -} diff --git a/world/map/npc/halloween/2006/halloween20.txt b/world/map/npc/halloween/2006/halloween20.txt deleted file mode 100644 index 5be6bf12..00000000 --- a/world/map/npc/halloween/2006/halloween20.txt +++ /dev/null @@ -1,213 +0,0 @@ -001-1.gat,143,20,0 script Halloween20 103,{ - mes "[Halloweenist]"; - mes "It's Halloween."; - mes "The time for tricks and treats."; - next; - - mes "[Halloweenist]"; - mes "You get one of either from me."; - next; - - menu "Trick or treat.",L_tricktreat,"No thanks.",L_no; - -L_tricktreat: - if(HWQUEST20 == 1) goto L_only_once; - set HWQUEST20,1; - mes "[Halloweenist]"; - mes "Now you will get a..."; - next; - set @TEMP,rand(9); - if(@TEMP < 2) goto L_treat; - goto L_trick; - -L_treat: - mes "[Halloweenist]"; - mes "...Treat!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_treat_0; - if(@TEMP == 1) goto L_treat_1; - if(@TEMP == 2) goto L_treat_2; - if(@TEMP == 3) goto L_treat_3; - if(@TEMP == 4) goto L_treat_4; - if(@TEMP == 5) goto L_treat_5; - if(@TEMP == 6) goto L_treat_6; - if(@TEMP == 7) goto L_treat_7; - if(@TEMP == 8) goto L_treat_8; - if(@TEMP == 9) goto L_treat_9; - -L_trick: - mes "[Halloweenist]"; - mes "...Trick!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_trick_0; - if(@TEMP == 1) goto L_trick_1; - if(@TEMP == 2) goto L_trick_2; - if(@TEMP == 3) goto L_trick_3; - if(@TEMP == 4) goto L_trick_4; - if(@TEMP == 5) goto L_trick_5; - if(@TEMP == 6) goto L_trick_6; - if(@TEMP == 7) goto L_trick_7; - if(@TEMP == 8) goto L_trick_8; - if(@TEMP == 9) goto L_trick_9; - -L_trick_0: - mes "[Halloweenist]"; - mes "Mwahahaha!"; - mes "I stole some of your money!"; - set Zeny,Zeny-rand(500,1500); - close; - -L_trick_1: - mes "[Halloweenist]"; - mes "You will now die."; - next; - mes "[Halloweenist]"; - mes "Have a nice halloween as a corpse!"; - gmcommand "@die "; - close; - -L_trick_2: - mes "[Halloweenist]"; - mes "May all of your disgusting stats and skills be gone!"; - next; - mes "[Halloweenist]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_trick_3: - mes "[Halloweenist]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Halloweenist]"; - mes "Happy Halloween!"; - close; - -L_trick_4: - mes "[Halloweenist]"; - mes "You will now drop all of your items!"; - next; - mes "[Halloweenist]"; - mes "Better luck with my collegues..."; - gmcommand "@dropall "; - close; - -L_trick_5: - mes "[Halloweenist]"; - mes "Your sex will now change!"; - next; - mes "[Halloweenist]"; - mes "Bwahahaha!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_trick_6: - mes "[Halloweenist]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Halloweenist]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_trick_7: - mes "[Halloweenist]"; - mes "I'll summon maggots!"; - next; - mes "[Halloweenist]"; - mes "Mwahahaha!"; - gmcommand "@spawn 1002 50 "; - close; - -L_trick_8: - mes "[Halloweenist]"; - mes "I'll summon some Fire Skulls now!"; - next; - mes "[Halloweenist]"; - mes "Mwahahahaha!"; - gmcommand "@spawn 1023 5 "; - close; - -L_trick_9: - mes "[Halloweenist]"; - mes "I'll diss you around the server."; - next; - mes "[Halloweenist]"; - mes "Mwahahahah!"; - gmcommand "@kami "+strcharinfo(0)+" is getting tricked!"; - close; - -L_treat_0: - mes "[Halloweenist]"; - mes "You just won some money."; - set Zeny,Zeny+rand(500,15000); - close; - -L_treat_1: - mes "[Halloweenist]"; - mes "You just won a Pumpkin Helmet!"; - getitem "PumpkinHelmet",1; - close; - -L_treat_2: - mes "[Halloweenist]"; - mes "You just won an Axe Hat!"; - getitem "AxeHat",1; - close; - -L_treat_3: - mes "[Halloweenist]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_treat_4: - mes "[Halloweenist]"; - mes "You just won Goggles!"; - getitem "Goggles",1; - close; - -L_treat_5: - mes "[Halloweenist]"; - mes "You just won Leather Goggles!"; - getitem "LeatherGoggles",1; - close; - -L_treat_6: - mes "[Halloweenist]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_treat_7: - mes "[Halloweenist]"; - mes "You just won an Eyepatch!"; - getitem "Eyepatch",1; - close; - -L_treat_8: - mes "[Halloweenist]"; - mes "You just won a Bandana!"; - getitem "Bandana",1; - close; - -L_treat_9: - mes "[Halloweenist]"; - mes "You just won 500 exp!"; - getexp 500,0; - close; - -L_only_once: - mes "[Halloweenist]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Halloweenist]"; - mes "You a chicken or something?"; - close; -} diff --git a/world/map/npc/halloween/2006/halloween3.txt b/world/map/npc/halloween/2006/halloween3.txt deleted file mode 100644 index 8a4cc809..00000000 --- a/world/map/npc/halloween/2006/halloween3.txt +++ /dev/null @@ -1,213 +0,0 @@ -011-1.gat,45,85,0 script Halloween3 103,{ - mes "[Halloweenist]"; - mes "It's Halloween."; - mes "The time for tricks and treats."; - next; - - mes "[Halloweenist]"; - mes "You get one of either from me."; - next; - - menu "Trick or treat.",L_tricktreat,"No thanks.",L_no; - -L_tricktreat: - if(HWQUEST3 == 1) goto L_only_once; - set HWQUEST3,1; - mes "[Halloweenist]"; - mes "Now you will get a..."; - next; - set @TEMP,rand(9); - if(@TEMP < 7) goto L_treat; - goto L_trick; - -L_treat: - mes "[Halloweenist]"; - mes "...Treat!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_treat_0; - if(@TEMP == 1) goto L_treat_1; - if(@TEMP == 2) goto L_treat_2; - if(@TEMP == 3) goto L_treat_3; - if(@TEMP == 4) goto L_treat_4; - if(@TEMP == 5) goto L_treat_5; - if(@TEMP == 6) goto L_treat_6; - if(@TEMP == 7) goto L_treat_7; - if(@TEMP == 8) goto L_treat_8; - if(@TEMP == 9) goto L_treat_9; - -L_trick: - mes "[Halloweenist]"; - mes "...Trick!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_trick_0; - if(@TEMP == 1) goto L_trick_1; - if(@TEMP == 2) goto L_trick_2; - if(@TEMP == 3) goto L_trick_3; - if(@TEMP == 4) goto L_trick_4; - if(@TEMP == 5) goto L_trick_5; - if(@TEMP == 6) goto L_trick_6; - if(@TEMP == 7) goto L_trick_7; - if(@TEMP == 8) goto L_trick_8; - if(@TEMP == 9) goto L_trick_9; - -L_trick_0: - mes "[Halloweenist]"; - mes "Mwahahaha!"; - mes "I stole some of your money!"; - set Zeny,Zeny-rand(500,1500); - close; - -L_trick_1: - mes "[Halloweenist]"; - mes "You will now die."; - next; - mes "[Halloweenist]"; - mes "Have a nice halloween as a corpse!"; - gmcommand "@die "; - close; - -L_trick_2: - mes "[Halloweenist]"; - mes "May all of your disgusting stats and skills be gone!"; - next; - mes "[Halloweenist]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_trick_3: - mes "[Halloweenist]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Halloweenist]"; - mes "Happy Halloween!"; - close; - -L_trick_4: - mes "[Halloweenist]"; - mes "You will now drop all of your items!"; - next; - mes "[Halloweenist]"; - mes "Better luck with my collegues..."; - gmcommand "@dropall "; - close; - -L_trick_5: - mes "[Halloweenist]"; - mes "Your sex will now change!"; - next; - mes "[Halloweenist]"; - mes "Bwahahaha!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_trick_6: - mes "[Halloweenist]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Halloweenist]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_trick_7: - mes "[Halloweenist]"; - mes "I'll summon maggots!"; - next; - mes "[Halloweenist]"; - mes "Mwahahaha!"; - gmcommand "@spawn 1002 50 "; - close; - -L_trick_8: - mes "[Halloweenist]"; - mes "I'll summon some Fire Skulls now!"; - next; - mes "[Halloweenist]"; - mes "Mwahahahaha!"; - gmcommand "@spawn 1023 5 "; - close; - -L_trick_9: - mes "[Halloweenist]"; - mes "I'll diss you around the server."; - next; - mes "[Halloweenist]"; - mes "Mwahahahah!"; - gmcommand "@kami "+strcharinfo(0)+" is getting tricked!"; - close; - -L_treat_0: - mes "[Halloweenist]"; - mes "You just won some money."; - set Zeny,Zeny+rand(500,15000); - close; - -L_treat_1: - mes "[Halloweenist]"; - mes "You just won a Pumpkin Helmet!"; - getitem "PumpkinHelmet",1; - close; - -L_treat_2: - mes "[Halloweenist]"; - mes "You just won an Axe Hat!"; - getitem "AxeHat",1; - close; - -L_treat_3: - mes "[Halloweenist]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_treat_4: - mes "[Halloweenist]"; - mes "You just won Goggles!"; - getitem "Goggles",1; - close; - -L_treat_5: - mes "[Halloweenist]"; - mes "You just won Leather Goggles!"; - getitem "LeatherGoggles",1; - close; - -L_treat_6: - mes "[Halloweenist]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_treat_7: - mes "[Halloweenist]"; - mes "You just won an Eyepatch!"; - getitem "Eyepatch",1; - close; - -L_treat_8: - mes "[Halloweenist]"; - mes "You just won a Bandana!"; - getitem "Bandana",1; - close; - -L_treat_9: - mes "[Halloweenist]"; - mes "You just won 500 exp!"; - getexp 500,0; - close; - -L_only_once: - mes "[Halloweenist]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Halloweenist]"; - mes "You a chicken or something?"; - close; -} diff --git a/world/map/npc/halloween/2006/halloween4.txt b/world/map/npc/halloween/2006/halloween4.txt deleted file mode 100644 index fd603570..00000000 --- a/world/map/npc/halloween/2006/halloween4.txt +++ /dev/null @@ -1,213 +0,0 @@ -011-4.gat,11,57,0 script Halloween4 103,{ - mes "[Halloweenist]"; - mes "It's Halloween."; - mes "The time for tricks and treats."; - next; - - mes "[Halloweenist]"; - mes "You get one of either from me."; - next; - - menu "Trick or treat.",L_tricktreat,"No thanks.",L_no; - -L_tricktreat: - if(HWQUEST4 == 1) goto L_only_once; - set HWQUEST4,1; - mes "[Halloweenist]"; - mes "Now you will get a..."; - next; - set @TEMP,rand(9); - if(@TEMP < 7) goto L_treat; - goto L_trick; - -L_treat: - mes "[Halloweenist]"; - mes "...Treat!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_treat_0; - if(@TEMP == 1) goto L_treat_1; - if(@TEMP == 2) goto L_treat_2; - if(@TEMP == 3) goto L_treat_3; - if(@TEMP == 4) goto L_treat_4; - if(@TEMP == 5) goto L_treat_5; - if(@TEMP == 6) goto L_treat_6; - if(@TEMP == 7) goto L_treat_7; - if(@TEMP == 8) goto L_treat_8; - if(@TEMP == 9) goto L_treat_9; - -L_trick: - mes "[Halloweenist]"; - mes "...Trick!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_trick_0; - if(@TEMP == 1) goto L_trick_1; - if(@TEMP == 2) goto L_trick_2; - if(@TEMP == 3) goto L_trick_3; - if(@TEMP == 4) goto L_trick_4; - if(@TEMP == 5) goto L_trick_5; - if(@TEMP == 6) goto L_trick_6; - if(@TEMP == 7) goto L_trick_7; - if(@TEMP == 8) goto L_trick_8; - if(@TEMP == 9) goto L_trick_9; - -L_trick_0: - mes "[Halloweenist]"; - mes "Mwahahaha!"; - mes "I stole some of your money!"; - set Zeny,Zeny-rand(500,1500); - close; - -L_trick_1: - mes "[Halloweenist]"; - mes "You will now die."; - next; - mes "[Halloweenist]"; - mes "Have a nice halloween as a corpse!"; - gmcommand "@die "; - close; - -L_trick_2: - mes "[Halloweenist]"; - mes "May all of your disgusting stats and skills be gone!"; - next; - mes "[Halloweenist]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_trick_3: - mes "[Halloweenist]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Halloweenist]"; - mes "Happy Halloween!"; - close; - -L_trick_4: - mes "[Halloweenist]"; - mes "You will now drop all of your items!"; - next; - mes "[Halloweenist]"; - mes "Better luck with my collegues..."; - gmcommand "@dropall "; - close; - -L_trick_5: - mes "[Halloweenist]"; - mes "Your sex will now change!"; - next; - mes "[Halloweenist]"; - mes "Bwahahaha!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_trick_6: - mes "[Halloweenist]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Halloweenist]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_trick_7: - mes "[Halloweenist]"; - mes "I'll summon maggots!"; - next; - mes "[Halloweenist]"; - mes "Mwahahaha!"; - gmcommand "@spawn 1002 50 "; - close; - -L_trick_8: - mes "[Halloweenist]"; - mes "I'll summon some Fire Skulls now!"; - next; - mes "[Halloweenist]"; - mes "Mwahahahaha!"; - gmcommand "@spawn 1023 5 "; - close; - -L_trick_9: - mes "[Halloweenist]"; - mes "I'll diss you around the server."; - next; - mes "[Halloweenist]"; - mes "Mwahahahah!"; - gmcommand "@kami "+strcharinfo(0)+" is getting tricked!"; - close; - -L_treat_0: - mes "[Halloweenist]"; - mes "You just won some money."; - set Zeny,Zeny+rand(500,15000); - close; - -L_treat_1: - mes "[Halloweenist]"; - mes "You just won a Pumpkin Helmet!"; - getitem "PumpkinHelmet",1; - close; - -L_treat_2: - mes "[Halloweenist]"; - mes "You just won an Axe Hat!"; - getitem "AxeHat",1; - close; - -L_treat_3: - mes "[Halloweenist]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_treat_4: - mes "[Halloweenist]"; - mes "You just won Goggles!"; - getitem "Goggles",1; - close; - -L_treat_5: - mes "[Halloweenist]"; - mes "You just won Leather Goggles!"; - getitem "LeatherGoggles",1; - close; - -L_treat_6: - mes "[Halloweenist]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_treat_7: - mes "[Halloweenist]"; - mes "You just won an Eyepatch!"; - getitem "Eyepatch",1; - close; - -L_treat_8: - mes "[Halloweenist]"; - mes "You just won a Bandana!"; - getitem "Bandana",1; - close; - -L_treat_9: - mes "[Halloweenist]"; - mes "You just won 500 exp!"; - getexp 500,0; - close; - -L_only_once: - mes "[Halloweenist]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Halloweenist]"; - mes "You a chicken or something?"; - close; -} diff --git a/world/map/npc/halloween/2006/halloween5.txt b/world/map/npc/halloween/2006/halloween5.txt deleted file mode 100644 index a4b4a8ae..00000000 --- a/world/map/npc/halloween/2006/halloween5.txt +++ /dev/null @@ -1,213 +0,0 @@ -011-3.gat,17,30,0 script Halloween5 103,{ - mes "[Halloweenist]"; - mes "It's Halloween."; - mes "The time for tricks and treats."; - next; - - mes "[Halloweenist]"; - mes "You get one of either from me."; - next; - - menu "Trick or treat.",L_tricktreat,"No thanks.",L_no; - -L_tricktreat: - if(HWQUEST5 == 1) goto L_only_once; - set HWQUEST5,1; - mes "[Halloweenist]"; - mes "Now you will get a..."; - next; - set @TEMP,rand(9); - if(@TEMP == 7) goto L_treat; - goto L_trick; - -L_treat: - mes "[Halloweenist]"; - mes "...Treat!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_treat_0; - if(@TEMP == 1) goto L_treat_1; - if(@TEMP == 2) goto L_treat_2; - if(@TEMP == 3) goto L_treat_3; - if(@TEMP == 4) goto L_treat_4; - if(@TEMP == 5) goto L_treat_5; - if(@TEMP == 6) goto L_treat_6; - if(@TEMP == 7) goto L_treat_7; - if(@TEMP == 8) goto L_treat_8; - if(@TEMP == 9) goto L_treat_9; - -L_trick: - mes "[Halloweenist]"; - mes "...Trick!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_trick_0; - if(@TEMP == 1) goto L_trick_1; - if(@TEMP == 2) goto L_trick_2; - if(@TEMP == 3) goto L_trick_3; - if(@TEMP == 4) goto L_trick_4; - if(@TEMP == 5) goto L_trick_5; - if(@TEMP == 6) goto L_trick_6; - if(@TEMP == 7) goto L_trick_7; - if(@TEMP == 8) goto L_trick_8; - if(@TEMP == 9) goto L_trick_9; - -L_trick_0: - mes "[Halloweenist]"; - mes "Mwahahaha!"; - mes "I stole some of your money!"; - set Zeny,Zeny-rand(500,1500); - close; - -L_trick_1: - mes "[Halloweenist]"; - mes "You will now die."; - next; - mes "[Halloweenist]"; - mes "Have a nice halloween as a corpse!"; - gmcommand "@die "; - close; - -L_trick_2: - mes "[Halloweenist]"; - mes "May all of your disgusting stats and skills be gone!"; - next; - mes "[Halloweenist]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_trick_3: - mes "[Halloweenist]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Halloweenist]"; - mes "Happy Halloween!"; - close; - -L_trick_4: - mes "[Halloweenist]"; - mes "You will now drop all of your items!"; - next; - mes "[Halloweenist]"; - mes "Better luck with my collegues..."; - gmcommand "@dropall "; - close; - -L_trick_5: - mes "[Halloweenist]"; - mes "Your sex will now change!"; - next; - mes "[Halloweenist]"; - mes "Bwahahaha!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_trick_6: - mes "[Halloweenist]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Halloweenist]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_trick_7: - mes "[Halloweenist]"; - mes "I'll summon maggots!"; - next; - mes "[Halloweenist]"; - mes "Mwahahaha!"; - gmcommand "@spawn 1002 50 "; - close; - -L_trick_8: - mes "[Halloweenist]"; - mes "I'll summon some Fire Skulls now!"; - next; - mes "[Halloweenist]"; - mes "Mwahahahaha!"; - gmcommand "@spawn 1023 5 "; - close; - -L_trick_9: - mes "[Halloweenist]"; - mes "I'll diss you around the server."; - next; - mes "[Halloweenist]"; - mes "Mwahahahah!"; - gmcommand "@kami "+strcharinfo(0)+" is getting tricked!"; - close; - -L_treat_0: - mes "[Halloweenist]"; - mes "You just won some money."; - set Zeny,Zeny+rand(500,15000); - close; - -L_treat_1: - mes "[Halloweenist]"; - mes "You just won a Pumpkin Helmet!"; - getitem "PumpkinHelmet",1; - close; - -L_treat_2: - mes "[Halloweenist]"; - mes "You just won an Axe Hat!"; - getitem "AxeHat",1; - close; - -L_treat_3: - mes "[Halloweenist]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_treat_4: - mes "[Halloweenist]"; - mes "You just won Goggles!"; - getitem "Goggles",1; - close; - -L_treat_5: - mes "[Halloweenist]"; - mes "You just won Leather Goggles!"; - getitem "LeatherGoggles",1; - close; - -L_treat_6: - mes "[Halloweenist]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_treat_7: - mes "[Halloweenist]"; - mes "You just won an Eyepatch!"; - getitem "Eyepatch",1; - close; - -L_treat_8: - mes "[Halloweenist]"; - mes "You just won a Bandana!"; - getitem "Bandana",1; - close; - -L_treat_9: - mes "[Halloweenist]"; - mes "You just won 500 exp!"; - getexp 500,0; - close; - -L_only_once: - mes "[Halloweenist]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Halloweenist]"; - mes "You a chicken or something?"; - close; -} diff --git a/world/map/npc/halloween/2006/halloween6.txt b/world/map/npc/halloween/2006/halloween6.txt deleted file mode 100644 index 2c46d55a..00000000 --- a/world/map/npc/halloween/2006/halloween6.txt +++ /dev/null @@ -1,213 +0,0 @@ -010-2.gat,28,48,0 script Halloween6 103,{ - mes "[Halloweenist]"; - mes "It's Halloween."; - mes "The time for tricks and treats."; - next; - - mes "[Halloweenist]"; - mes "You get one of either from me."; - next; - - menu "Trick or treat.",L_tricktreat,"No thanks.",L_no; - -L_tricktreat: - if(HWQUEST6 == 1) goto L_only_once; - set HWQUEST6,1; - mes "[Halloweenist]"; - mes "Now you will get a..."; - next; - set @TEMP,rand(9); - if(@TEMP == 7) goto L_treat; - goto L_trick; - -L_treat: - mes "[Halloweenist]"; - mes "...Treat!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_treat_0; - if(@TEMP == 1) goto L_treat_1; - if(@TEMP == 2) goto L_treat_2; - if(@TEMP == 3) goto L_treat_3; - if(@TEMP == 4) goto L_treat_4; - if(@TEMP == 5) goto L_treat_5; - if(@TEMP == 6) goto L_treat_6; - if(@TEMP == 7) goto L_treat_7; - if(@TEMP == 8) goto L_treat_8; - if(@TEMP == 9) goto L_treat_9; - -L_trick: - mes "[Halloweenist]"; - mes "...Trick!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_trick_0; - if(@TEMP == 1) goto L_trick_1; - if(@TEMP == 2) goto L_trick_2; - if(@TEMP == 3) goto L_trick_3; - if(@TEMP == 4) goto L_trick_4; - if(@TEMP == 5) goto L_trick_5; - if(@TEMP == 6) goto L_trick_6; - if(@TEMP == 7) goto L_trick_7; - if(@TEMP == 8) goto L_trick_8; - if(@TEMP == 9) goto L_trick_9; - -L_trick_0: - mes "[Halloweenist]"; - mes "Mwahahaha!"; - mes "I stole some of your money!"; - set Zeny,Zeny-rand(500,1500); - close; - -L_trick_1: - mes "[Halloweenist]"; - mes "You will now die."; - next; - mes "[Halloweenist]"; - mes "Have a nice halloween as a corpse!"; - gmcommand "@die "; - close; - -L_trick_2: - mes "[Halloweenist]"; - mes "May all of your disgusting stats and skills be gone!"; - next; - mes "[Halloweenist]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_trick_3: - mes "[Halloweenist]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Halloweenist]"; - mes "Happy Halloween!"; - close; - -L_trick_4: - mes "[Halloweenist]"; - mes "You will now drop all of your items!"; - next; - mes "[Halloweenist]"; - mes "Better luck with my collegues..."; - gmcommand "@dropall "; - close; - -L_trick_5: - mes "[Halloweenist]"; - mes "Your sex will now change!"; - next; - mes "[Halloweenist]"; - mes "Bwahahaha!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_trick_6: - mes "[Halloweenist]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Halloweenist]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_trick_7: - mes "[Halloweenist]"; - mes "I'll summon maggots!"; - next; - mes "[Halloweenist]"; - mes "Mwahahaha!"; - gmcommand "@spawn 1002 50 "; - close; - -L_trick_8: - mes "[Halloweenist]"; - mes "I'll summon some Fire Skulls now!"; - next; - mes "[Halloweenist]"; - mes "Mwahahahaha!"; - gmcommand "@spawn 1023 5 "; - close; - -L_trick_9: - mes "[Halloweenist]"; - mes "I'll diss you around the server."; - next; - mes "[Halloweenist]"; - mes "Mwahahahah!"; - gmcommand "@kami "+strcharinfo(0)+" is getting tricked!"; - close; - -L_treat_0: - mes "[Halloweenist]"; - mes "You just won some money."; - set Zeny,Zeny+rand(500,15000); - close; - -L_treat_1: - mes "[Halloweenist]"; - mes "You just won a Pumpkin Helmet!"; - getitem "PumpkinHelmet",1; - close; - -L_treat_2: - mes "[Halloweenist]"; - mes "You just won an Axe Hat!"; - getitem "AxeHat",1; - close; - -L_treat_3: - mes "[Halloweenist]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_treat_4: - mes "[Halloweenist]"; - mes "You just won Goggles!"; - getitem "Goggles",1; - close; - -L_treat_5: - mes "[Halloweenist]"; - mes "You just won Leather Goggles!"; - getitem "LeatherGoggles",1; - close; - -L_treat_6: - mes "[Halloweenist]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_treat_7: - mes "[Halloweenist]"; - mes "You just won an Eyepatch!"; - getitem "Eyepatch",1; - close; - -L_treat_8: - mes "[Halloweenist]"; - mes "You just won a Bandana!"; - getitem "Bandana",1; - close; - -L_treat_9: - mes "[Halloweenist]"; - mes "You just won 500 exp!"; - getexp 500,0; - close; - -L_only_once: - mes "[Halloweenist]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Halloweenist]"; - mes "You a chicken or something?"; - close; -} diff --git a/world/map/npc/halloween/2006/halloween7.txt b/world/map/npc/halloween/2006/halloween7.txt deleted file mode 100644 index 8d664cca..00000000 --- a/world/map/npc/halloween/2006/halloween7.txt +++ /dev/null @@ -1,213 +0,0 @@ -002-2.gat,103,102,0 script Halloween7 103,{ - mes "[Halloweenist]"; - mes "It's Halloween."; - mes "The time for tricks and treats."; - next; - - mes "[Halloweenist]"; - mes "You get one of either from me."; - next; - - menu "Trick or treat.",L_tricktreat,"No thanks.",L_no; - -L_tricktreat: - if(HWQUEST7 == 1) goto L_only_once; - set HWQUEST7,1; - mes "[Halloweenist]"; - mes "Now you will get a..."; - next; - set @TEMP,rand(9); - if(@TEMP == 7) goto L_treat; - goto L_trick; - -L_treat: - mes "[Halloweenist]"; - mes "...Treat!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_treat_0; - if(@TEMP == 1) goto L_treat_1; - if(@TEMP == 2) goto L_treat_2; - if(@TEMP == 3) goto L_treat_3; - if(@TEMP == 4) goto L_treat_4; - if(@TEMP == 5) goto L_treat_5; - if(@TEMP == 6) goto L_treat_6; - if(@TEMP == 7) goto L_treat_7; - if(@TEMP == 8) goto L_treat_8; - if(@TEMP == 9) goto L_treat_9; - -L_trick: - mes "[Halloweenist]"; - mes "...Trick!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_trick_0; - if(@TEMP == 1) goto L_trick_1; - if(@TEMP == 2) goto L_trick_2; - if(@TEMP == 3) goto L_trick_3; - if(@TEMP == 4) goto L_trick_4; - if(@TEMP == 5) goto L_trick_5; - if(@TEMP == 6) goto L_trick_6; - if(@TEMP == 7) goto L_trick_7; - if(@TEMP == 8) goto L_trick_8; - if(@TEMP == 9) goto L_trick_9; - -L_trick_0: - mes "[Halloweenist]"; - mes "Mwahahaha!"; - mes "I stole some of your money!"; - set Zeny,Zeny-rand(500,1500); - close; - -L_trick_1: - mes "[Halloweenist]"; - mes "You will now die."; - next; - mes "[Halloweenist]"; - mes "Have a nice halloween as a corpse!"; - gmcommand "@die "; - close; - -L_trick_2: - mes "[Halloweenist]"; - mes "May all of your disgusting stats and skills be gone!"; - next; - mes "[Halloweenist]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_trick_3: - mes "[Halloweenist]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Halloweenist]"; - mes "Happy Halloween!"; - close; - -L_trick_4: - mes "[Halloweenist]"; - mes "You will now drop all of your items!"; - next; - mes "[Halloweenist]"; - mes "Better luck with my collegues..."; - gmcommand "@dropall "; - close; - -L_trick_5: - mes "[Halloweenist]"; - mes "Your sex will now change!"; - next; - mes "[Halloweenist]"; - mes "Bwahahaha!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_trick_6: - mes "[Halloweenist]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Halloweenist]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_trick_7: - mes "[Halloweenist]"; - mes "I'll summon maggots!"; - next; - mes "[Halloweenist]"; - mes "Mwahahaha!"; - gmcommand "@spawn 1002 50 "; - close; - -L_trick_8: - mes "[Halloweenist]"; - mes "I'll summon some Fire Skulls now!"; - next; - mes "[Halloweenist]"; - mes "Mwahahahaha!"; - gmcommand "@spawn 1023 5 "; - close; - -L_trick_9: - mes "[Halloweenist]"; - mes "I'll diss you around the server."; - next; - mes "[Halloweenist]"; - mes "Mwahahahah!"; - gmcommand "@kami "+strcharinfo(0)+" is getting tricked!"; - close; - -L_treat_0: - mes "[Halloweenist]"; - mes "You just won some money."; - set Zeny,Zeny+rand(500,15000); - close; - -L_treat_1: - mes "[Halloweenist]"; - mes "You just won a Pumpkin Helmet!"; - getitem "PumpkinHelmet",1; - close; - -L_treat_2: - mes "[Halloweenist]"; - mes "You just won an Axe Hat!"; - getitem "AxeHat",1; - close; - -L_treat_3: - mes "[Halloweenist]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_treat_4: - mes "[Halloweenist]"; - mes "You just won Goggles!"; - getitem "Goggles",1; - close; - -L_treat_5: - mes "[Halloweenist]"; - mes "You just won Leather Goggles!"; - getitem "LeatherGoggles",1; - close; - -L_treat_6: - mes "[Halloweenist]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_treat_7: - mes "[Halloweenist]"; - mes "You just won an Eyepatch!"; - getitem "Eyepatch",1; - close; - -L_treat_8: - mes "[Halloweenist]"; - mes "You just won a Bandana!"; - getitem "Bandana",1; - close; - -L_treat_9: - mes "[Halloweenist]"; - mes "You just won 500 exp!"; - getexp 500,0; - close; - -L_only_once: - mes "[Halloweenist]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Halloweenist]"; - mes "You a chicken or something?"; - close; -} diff --git a/world/map/npc/halloween/2006/halloween8.txt b/world/map/npc/halloween/2006/halloween8.txt deleted file mode 100644 index bb218ca3..00000000 --- a/world/map/npc/halloween/2006/halloween8.txt +++ /dev/null @@ -1,213 +0,0 @@ -002-3.gat,43,67,0 script Halloween8 103,{ - mes "[Halloweenist]"; - mes "It's Halloween."; - mes "The time for tricks and treats."; - next; - - mes "[Halloweenist]"; - mes "You get one of either from me."; - next; - - menu "Trick or treat.",L_tricktreat,"No thanks.",L_no; - -L_tricktreat: - if(HWQUEST8 == 1) goto L_only_once; - set HWQUEST8,1; - mes "[Halloweenist]"; - mes "Now you will get a..."; - next; - set @TEMP,rand(9); - if(@TEMP == 7) goto L_treat; - goto L_trick; - -L_treat: - mes "[Halloweenist]"; - mes "...Treat!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_treat_0; - if(@TEMP == 1) goto L_treat_1; - if(@TEMP == 2) goto L_treat_2; - if(@TEMP == 3) goto L_treat_3; - if(@TEMP == 4) goto L_treat_4; - if(@TEMP == 5) goto L_treat_5; - if(@TEMP == 6) goto L_treat_6; - if(@TEMP == 7) goto L_treat_7; - if(@TEMP == 8) goto L_treat_8; - if(@TEMP == 9) goto L_treat_9; - -L_trick: - mes "[Halloweenist]"; - mes "...Trick!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_trick_0; - if(@TEMP == 1) goto L_trick_1; - if(@TEMP == 2) goto L_trick_2; - if(@TEMP == 3) goto L_trick_3; - if(@TEMP == 4) goto L_trick_4; - if(@TEMP == 5) goto L_trick_5; - if(@TEMP == 6) goto L_trick_6; - if(@TEMP == 7) goto L_trick_7; - if(@TEMP == 8) goto L_trick_8; - if(@TEMP == 9) goto L_trick_9; - -L_trick_0: - mes "[Halloweenist]"; - mes "Mwahahaha!"; - mes "I stole some of your money!"; - set Zeny,Zeny-rand(500,1500); - close; - -L_trick_1: - mes "[Halloweenist]"; - mes "You will now die."; - next; - mes "[Halloweenist]"; - mes "Have a nice halloween as a corpse!"; - gmcommand "@die "; - close; - -L_trick_2: - mes "[Halloweenist]"; - mes "May all of your disgusting stats and skills be gone!"; - next; - mes "[Halloweenist]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_trick_3: - mes "[Halloweenist]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Halloweenist]"; - mes "Happy Halloween!"; - close; - -L_trick_4: - mes "[Halloweenist]"; - mes "You will now drop all of your items!"; - next; - mes "[Halloweenist]"; - mes "Better luck with my collegues..."; - gmcommand "@dropall "; - close; - -L_trick_5: - mes "[Halloweenist]"; - mes "Your sex will now change!"; - next; - mes "[Halloweenist]"; - mes "Bwahahaha!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_trick_6: - mes "[Halloweenist]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Halloweenist]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_trick_7: - mes "[Halloweenist]"; - mes "I'll summon maggots!"; - next; - mes "[Halloweenist]"; - mes "Mwahahaha!"; - gmcommand "@spawn 1002 50 "; - close; - -L_trick_8: - mes "[Halloweenist]"; - mes "I'll summon some Fire Skulls now!"; - next; - mes "[Halloweenist]"; - mes "Mwahahahaha!"; - gmcommand "@spawn 1023 5 "; - close; - -L_trick_9: - mes "[Halloweenist]"; - mes "I'll diss you around the server."; - next; - mes "[Halloweenist]"; - mes "Mwahahahah!"; - gmcommand "@kami "+strcharinfo(0)+" is getting tricked!"; - close; - -L_treat_0: - mes "[Halloweenist]"; - mes "You just won some money."; - set Zeny,Zeny+rand(500,15000); - close; - -L_treat_1: - mes "[Halloweenist]"; - mes "You just won a Pumpkin Helmet!"; - getitem "PumpkinHelmet",1; - close; - -L_treat_2: - mes "[Halloweenist]"; - mes "You just won an Axe Hat!"; - getitem "AxeHat",1; - close; - -L_treat_3: - mes "[Halloweenist]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_treat_4: - mes "[Halloweenist]"; - mes "You just won Goggles!"; - getitem "Goggles",1; - close; - -L_treat_5: - mes "[Halloweenist]"; - mes "You just won Leather Goggles!"; - getitem "LeatherGoggles",1; - close; - -L_treat_6: - mes "[Halloweenist]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_treat_7: - mes "[Halloweenist]"; - mes "You just won an Eyepatch!"; - getitem "Eyepatch",1; - close; - -L_treat_8: - mes "[Halloweenist]"; - mes "You just won a Bandana!"; - getitem "Bandana",1; - close; - -L_treat_9: - mes "[Halloweenist]"; - mes "You just won 500 exp!"; - getexp 500,0; - close; - -L_only_once: - mes "[Halloweenist]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Halloweenist]"; - mes "You a chicken or something?"; - close; -} diff --git a/world/map/npc/halloween/2006/halloween9.txt b/world/map/npc/halloween/2006/halloween9.txt deleted file mode 100644 index b0b327cb..00000000 --- a/world/map/npc/halloween/2006/halloween9.txt +++ /dev/null @@ -1,213 +0,0 @@ -001-1.gat,121,33,0 script Halloween9 103,{ - mes "[Halloweenist]"; - mes "It's Halloween."; - mes "The time for tricks and treats."; - next; - - mes "[Halloweenist]"; - mes "You get one of either from me."; - next; - - menu "Trick or treat.",L_tricktreat,"No thanks.",L_no; - -L_tricktreat: - if(HWQUEST9 == 1) goto L_only_once; - set HWQUEST9,1; - mes "[Halloweenist]"; - mes "Now you will get a..."; - next; - set @TEMP,rand(9); - if(@TEMP > 7) goto L_treat; - goto L_trick; - -L_treat: - mes "[Halloweenist]"; - mes "...Treat!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_treat_0; - if(@TEMP == 1) goto L_treat_1; - if(@TEMP == 2) goto L_treat_2; - if(@TEMP == 3) goto L_treat_3; - if(@TEMP == 4) goto L_treat_4; - if(@TEMP == 5) goto L_treat_5; - if(@TEMP == 6) goto L_treat_6; - if(@TEMP == 7) goto L_treat_7; - if(@TEMP == 8) goto L_treat_8; - if(@TEMP == 9) goto L_treat_9; - -L_trick: - mes "[Halloweenist]"; - mes "...Trick!"; - set @TEMP,rand(9); - next; - if(@TEMP == 0) goto L_trick_0; - if(@TEMP == 1) goto L_trick_1; - if(@TEMP == 2) goto L_trick_2; - if(@TEMP == 3) goto L_trick_3; - if(@TEMP == 4) goto L_trick_4; - if(@TEMP == 5) goto L_trick_5; - if(@TEMP == 6) goto L_trick_6; - if(@TEMP == 7) goto L_trick_7; - if(@TEMP == 8) goto L_trick_8; - if(@TEMP == 9) goto L_trick_9; - -L_trick_0: - mes "[Halloweenist]"; - mes "Mwahahaha!"; - mes "I stole some of your money!"; - set Zeny,Zeny-rand(500,1500); - close; - -L_trick_1: - mes "[Halloweenist]"; - mes "You will now die."; - next; - mes "[Halloweenist]"; - mes "Have a nice halloween as a corpse!"; - gmcommand "@die "; - close; - -L_trick_2: - mes "[Halloweenist]"; - mes "May all of your disgusting stats and skills be gone!"; - next; - mes "[Halloweenist]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_trick_3: - mes "[Halloweenist]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Halloweenist]"; - mes "Happy Halloween!"; - close; - -L_trick_4: - mes "[Halloweenist]"; - mes "You will now drop all of your items!"; - next; - mes "[Halloweenist]"; - mes "Better luck with my collegues..."; - gmcommand "@dropall "; - close; - -L_trick_5: - mes "[Halloweenist]"; - mes "Your sex will now change!"; - next; - mes "[Halloweenist]"; - mes "Bwahahaha!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_trick_6: - mes "[Halloweenist]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Halloweenist]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_trick_7: - mes "[Halloweenist]"; - mes "I'll summon maggots!"; - next; - mes "[Halloweenist]"; - mes "Mwahahaha!"; - gmcommand "@spawn 1002 50 "; - close; - -L_trick_8: - mes "[Halloweenist]"; - mes "I'll summon some Fire Skulls now!"; - next; - mes "[Halloweenist]"; - mes "Mwahahahaha!"; - gmcommand "@spawn 1023 5 "; - close; - -L_trick_9: - mes "[Halloweenist]"; - mes "I'll diss you around the server."; - next; - mes "[Halloweenist]"; - mes "Mwahahahah!"; - gmcommand "@kami "+strcharinfo(0)+" is getting tricked!"; - close; - -L_treat_0: - mes "[Halloweenist]"; - mes "You just won some money."; - set Zeny,Zeny+rand(500,15000); - close; - -L_treat_1: - mes "[Halloweenist]"; - mes "You just won a Pumpkin Helmet!"; - getitem "PumpkinHelmet",1; - close; - -L_treat_2: - mes "[Halloweenist]"; - mes "You just won an Axe Hat!"; - getitem "AxeHat",1; - close; - -L_treat_3: - mes "[Halloweenist]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_treat_4: - mes "[Halloweenist]"; - mes "You just won Goggles!"; - getitem "Goggles",1; - close; - -L_treat_5: - mes "[Halloweenist]"; - mes "You just won Leather Goggles!"; - getitem "LeatherGoggles",1; - close; - -L_treat_6: - mes "[Halloweenist]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_treat_7: - mes "[Halloweenist]"; - mes "You just won an Eyepatch!"; - getitem "Eyepatch",1; - close; - -L_treat_8: - mes "[Halloweenist]"; - mes "You just won a Bandana!"; - getitem "Bandana",1; - close; - -L_treat_9: - mes "[Halloweenist]"; - mes "You just won 500 exp!"; - getexp 500,0; - close; - -L_only_once: - mes "[Halloweenist]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Halloweenist]"; - mes "You a chicken or something?"; - close; -} diff --git a/world/map/npc/halloween/2006/monsters.txt b/world/map/npc/halloween/2006/monsters.txt deleted file mode 100644 index e64799f4..00000000 --- a/world/map/npc/halloween/2006/monsters.txt +++ /dev/null @@ -1,9 +0,0 @@ -002-2.gat,0,0,0,0 monster Jack 1022,20,0,0,0 -001-1.gat,0,0,0,0 monster Fire_Skull 1023,20,0,0,0 -005-1.gat,0,0,0,0 monster Poison_Skull 1024,20,0,0,0 -011-1.gat,0,0,0,0 monster Jack 1022,20,0,0,0 -019-1.gat,0,0,0,0 monster Fire_Skull 1023,20,0,0,0 -020-1.gat,0,0,0,0 monster Poison_Skull 1024,20,0,0,0 -010-2.gat,0,0,0,0 monster Jack 1022,20,0,0,0 -003-1.gat,0,0,0,0 monster Fire_Skull 1023,20,0,0,0 -007-1.gat,0,0,0,0 monster Poison_Skull 1024,20,0,0,0 diff --git a/world/map/npc/halloween/2008/monsters.txt b/world/map/npc/halloween/2008/monsters.txt deleted file mode 100644 index d8305653..00000000 --- a/world/map/npc/halloween/2008/monsters.txt +++ /dev/null @@ -1,137 +0,0 @@ -// - -011-3.gat,0,0,0,0 monster JackO 1022,1,3600000,1800000,Mob4H - -011-3.gat,0,0,0 script Mob4H -1,{ - set @mobID, 1022; - callfunc "MobPoints"; - end; -} - -001-3.gat,0,0,0,0 monster JackO 1022,5,180000,170000,Mob6H - -001-3.gat,0,0,0 script Mob6H -1,{ - set @mobID, 1022; - callfunc "MobPoints"; - end; -} - -001-2.gat,132,25,0,0 monster JackO 1022,1,3600000,1800000,Mob8H - -001-2.gat,0,0,0 script Mob8H -1,{ - set @mobID, 1022; - callfunc "MobPoints"; - end; -} - -020-2.gat,77,64,20,10 monster JackO 1022,1,3600000,1800000,Mob13H - -020-2.gat,0,0,0 script Mob13H -1,{ - set @mobID, 1022; - callfunc "MobPoints"; - end; -} - -003-1.gat,0,0,0,0 monster JackO 1022,1,3600000,1800000,Mob15H - -003-1.gat,0,0,0 script Mob15H -1,{ - set @mobID, 1022; - callfunc "MobPoints"; - end; -} - -011-4.gat,76,79,6,1 monster JackO 1022,1,3600000,1800000,Mob17H - -011-4.gat,0,0,0 script Mob17H -1,{ - set @mobID, 1022; - callfunc "MobPoints"; - end; -} - -009-2.gat,113,47,24,6 monster JackO 1022,1,3600000,1800000,Mob20H - -009-2.gat,0,0,0 script Mob20H -1,{ - set @mobID, 1022; - callfunc "MobPoints"; - end; -} - -020-4.gat,0,0,0,0 monster JackO 1022,1,3600000,1800000,Mob21H - -020-4.gat,0,0,0 script Mob21H -1,{ - set @mobID, 1022; - callfunc "MobPoints"; - end; -} - -05-3.gat,86,34,0,0 monster JackO 1022,2,1800000,900000,Mob22H - -05-3.gat,0,0,0 script Mob22H -1,{ - set @mobID, 1022; - callfunc "MobPoints"; - end; -} - -010-2.gat,26,88,0,0 monster JackO 1022,1,3600000,1800000,Mob23H - -010-2.gat,0,0,0 script Mob23H -1,{ - set @mobID, 1022; - callfunc "MobPoints"; - end; -} - -006-1.gat,115,121,0,0 monster JackO 1022,1,3600000,1800000,Mob24H - -006-1.gat,0,0,0 script Mob24H -1,{ - set @mobID, 1022; - callfunc "MobPoints"; - end; -} - -006-3.gat,30,125,0,0 monster JackO 1022,1,3600000,1800000,Mob25H - -006-3.gat,0,0,0 script Mob25H -1,{ - set @mobID, 1022; - callfunc "MobPoints"; - end; -} - -12-1.gat,19,54,0,0 monster JackO 1022,1,3600000,1800000,Mob26H - -12-1.gat,0,0,0 script Mob26H -1,{ - set @mobID, 1022; - callfunc "MobPoints"; - end; -} - -012-3.gat,54,130,0,0 monster JackO 1022,1,3600000,1800000,Mob27H - -012-3.gat,0,0,0 script Mob27H -1,{ - set @mobID, 1022; - callfunc "MobPoints"; - end; -} - -004-1.gat,68,20,0,0 monster JackO 1022,1,3600000,1800000,Mob34H - -004-1.gat,0,0,0 script Mob34H -1,{ - set @mobID, 1022; - callfunc "MobPoints"; - end; -} - -009-3.gat,26,103,0,0 monster JackO 1022,1,3600000,1800000,Mob35H - -009-3.gat,0,0,0 script Mob35H -1,{ - set @mobID, 1022; - callfunc "MobPoints"; - end; -} - -018-2.gat,121,46,0,0 monster JackO 1022,1,3600000,1800000,Mob38H - -018-2.gat,0,0,0 script Mob38H -1,{ - set @mobID, 1022; - callfunc "MobPoints"; - end; -} diff --git a/world/map/npc/halloween/2008/prize_master.txt b/world/map/npc/halloween/2008/prize_master.txt deleted file mode 100644 index 34d4236b..00000000 --- a/world/map/npc/halloween/2008/prize_master.txt +++ /dev/null @@ -1,458 +0,0 @@ -// - -010-2.gat,43,32,0 script Prize Master 150,{ - if (Halloween08 == 65535) goto L_Finished; - - if (Halloween08 != 0) goto L_DidExplain; - callsub S_Explain; - -L_DidExplain: - - // Get detailed info about equipment - callfunc "ProcessEquip"; - - if (@head == 647) goto L_DevControl; - if (@head == 615) goto L_Pumpkin; - if (@head == 616) goto L_Axe; - if (@head == 617) goto L_Pirate; - if (@head == 621) goto L_Eyepatch; - if (@head == 622) goto L_Bandana; - if (@head == 634) goto L_FaceMask; - if (@head == 675) goto L_GradCap; - if (@head == 678) goto L_NohMask; - if (@head == 679) goto L_DemonMask; - if (@head == 656) goto L_SerfHat; - if (@head == 1214) goto L_Bunny; - if (@head == 643) goto L_WCowboy; - if (@head == 644) goto L_BCowboy; - if (@head == 1204) goto L_Antler; - - if (Halloween08 & 1) goto L_Random_Done; - mes "[Prize Master]"; - mes "A lovely costume, here is your candy."; - set Halloween08, Halloween08 | 1; - set @temp, rand(5) + 1; - getitem "Candy", @temp; - close; - -L_Random_Done: - mes "[Prize Master]"; - mes "\"I don't like that one.\""; - close; - - - - - -L_Pumpkin: - if (Halloween08 & 2) goto L_Pumpkin_Done; - if (@torso != 720) goto L_Pumpkin_Bad; - set Halloween08, Halloween08 | 2; - set @temp, pow(1080, BaseLevel) * 100; - getexp @temp, 0; - mes "[" + @temp + " experience points]"; - close; - -L_Pumpkin_Bad: - mes "[Prize Master]"; - mes "\"You aren't convincing me. That doesn't look like a Jack O at all.\""; - close; - -L_Pumpkin_Done: - mes "[Prize Master]"; - mes "\"I think I've seen this Jack O before.\""; - close; - - - - - -L_Axe: - if (Halloween08 & 4) goto L_Axe_Done; - mes "[Prize Master]"; - mes "\"You look like you need some help!\""; - set Halloween08, Halloween08 | 4; - getitem "MediumHealingPotion", 1; - close; - -L_Axe_Done: - mes "[Prize Master]"; - mes "\"You've pulled the axe on me already.\""; - close; - - - - - -L_Pirate: - if (Halloween08 & 8) goto L_Pirate_Done; - if (@torso != 2060) goto L_Pirate_BadTorso; - if (Sex == 0 && !(@legsB == 632 || @legsB == 586)) goto L_Pirate_BadLegs_Female; - if (Sex == 1 && !(@legsB == 610 || @legsB == 586)) goto L_Pirate_BadLegs_Male; - mes "[Prize Master]"; - mes "\"A lovely pirate, but ye be missing this.\""; - set Halloween08, Halloween08 | 8; - getitem "ToySabre", 1; - close; - -L_Pirate_BadTorso: - if (@torsoC != cRed) goto L_Pirate_BadColor; - mes "[Prize Master]"; - mes "\"That shirt won't work.\""; - close; - -L_Pirate_BadColor: - mes "[Prize Master]"; - mes "\"Not quite what I'm looking for. Do you remember the story of the brave pirate captain who always wore a certain color before battle?\""; - close; - -L_Pirate_BadLegs_Male: - mes "[Prize Master]"; - if (@legsB == 632) mes "\"A skirt on a man? Not for the captain!\""; - if (@legsB != 632) mes "\"Those pants don't convince me.\""; - close; - -L_Pirate_BadLegs_Female: - mes "[Prize Master]"; - if (@legsB == 610) mes "\"Jeans don't befit a woman captain.\""; - if (@legsB != 632) mes "\"Those pants don't convince me.\""; - close; - -L_Pirate_Done: - mes "[Prize Master]"; - mes "\"Yarr, ye look familiar.\""; - close; - - - - -L_Eyepatch: - if (Halloween08 & 16) goto L_Pirate_Done; - if (@torso != 2060) goto L_Pirate_BadTorso; - if (Sex == 0 && !(@legsB == 632 || @legsB == 586)) goto L_Pirate_BadLegs_Female; - if (Sex == 1 && !(@legsB == 610 || @legsB == 586)) goto L_Pirate_BadLegs_Male; - mes "[Prize Master]"; - mes "\"Maybe you can use this to replace your eye.\""; - set Halloween08, Halloween08 | 16; - set @temp, rand(2) + 1; - getitem "Pearl", @temp; - close; - - - - -L_Bandana: - if (Halloween08 & 32) goto L_Pirate_Done; - if (@torsoC != cWhite) goto L_Bandana_Bad; - mes "[Prize Master]"; - mes "\"Here's a clue for you.\""; - set Halloween08, Halloween08 | 32; - set @temp, rand(10) + 551; - getitem @temp, 1; - close; - -L_Bandana_Bad: - mes "[Prize Master]"; - mes "\"That shirt doesn't befit a pirate swabie.\""; - close; - - - - -L_FaceMask: - if (Halloween08 & 64) goto L_FaceMask_Done; - if (!(@torso == 2081 || @torso == 2089) && ((@torsoC != cGreen && @torsoC != cDarkGreen) || (@legsC != cGreen && @legsC != cDarkGreen))) goto L_FaceMask_Bad; - mes "[Prize Master]"; - mes "\"A lovely swamp thing.\""; - set Halloween08, Halloween08 | 64; - set @temp, rand(5) + 1; - getitem "RawLog", @temp; - close; - -L_FaceMask_Bad: - mes "[Prize Master]"; - mes "\"That mask makes me think of green. Try again.\""; - close; - -L_FaceMask_Done: - mes "[Prize Master]"; - mes "\"Another swamp thing? Next.\""; - close; - - - - -L_GradCap: - if (Halloween08 & 128) goto L_GradCap_Done; - if (@torso != 2086) goto L_GradCap_Bad; - mes "[Prize Master]"; - mes "\"Here, professor, maybe you can figure this out.\""; - set Halloween08, Halloween08 | 128; - getitem "ScarabArmlet", 1; - close; - -L_GradCap_Bad: - mes "[Prize Master]"; - mes "\"That doesn't work at all.\""; - close; - -L_GradCap_Done: - mes "[Prize Master]"; - mes "\"Sorry, professor, but I've already seen you.\""; - close; - - - - - -L_NohMask: - if (Halloween08 & 256) goto L_NohMask_Done; - if (@torsoC != cBlack || @legsC != cBlack) goto L_NohMask_Bad; - mes "[Prize Master]"; - mes "\"Ah, a thief. Just take these.\""; - set Halloween08, Halloween08 | 256; - set @temp, rand(10) + 1; - getitem "CasinoCoins", @temp; - close; - -L_NohMask_Bad: - mes "[Prize Master]"; - mes "\"That's rather bright for a thief.\""; - close; - -L_NohMask_Done: - mes "[Prize Master]"; - mes "\"I've caught you trying to get another prize for the same mask.\""; - close; - - - - - -L_DemonMask: - if (Halloween08 & 512) goto L_DemonMask_Done; - if (@torsoC != cRed || @legsC != cRed) goto L_DemonMask_Bad; - mes "[Prize Master]"; - mes "\"I hope this reminds you of home.\""; - set Halloween08, Halloween08 | 512; - set @temp, rand(3) + 1; - getitem "PileOfAsh", @temp; - close; - -L_DemonMask_Bad: - mes "[Prize Master]"; - mes "\"That just clashes.\""; - close; - -L_DemonMask_Done: - mes "[Prize Master]"; - mes "\"A bit too many ghouls, don't you think?\""; - close; - - - - -L_SerfHat: - if (Halloween08 & 1024) goto L_SerfHat_Done; - if (@torsoB != 1202) goto L_SerfHat_BadTorso; - if (@legsB != 586 && @legsB != 632) goto L_SerfHat_BadLegs; - mes "[Prize Master]"; - mes "It doesn't look like you can even afford a costume. Have this anyways."; - set Halloween08, Halloween08 | 1024; - getitem "Orange", 1; - close; - -L_SerfHat_BadTorso: - mes "[Prize Master]"; - mes "\"Your shirt is too fancy for that hat.\""; - close; - -L_SerfHat_BadLegs: - mes "[Prize Master]"; - mes "\"Your pants are too fancy for that hat.\""; - close; - -L_SerfHat_Done: - mes "[Prize Master]"; - mes "\"You've got your prize. Maybe you can sell it to get a better costume.\""; - close; - - - - -L_Bunny: - if (Halloween08 & 6144 == 6144) goto L_Bunny_Done; - if (@torsoC == cBlack && @legsC == cBlack) goto L_Bunny_Black; - if (@torsoC == cWhite && @legsC == cWhite) goto L_Bunny_White; - mes "[Prize Master]"; - mes "\"That doesn't look very much like a bunny to be.\""; - close; - -L_Bunny_Done: - mes "[Prize Master]"; - mes "\"I've seen enough bunnies from you.\""; - close; - -L_Bunny_Black: - if (Halloween08 & 2048) goto L_Bunny_Black_Done; - mes "[Prize Master]"; - mes "\"A prize for the lovely bunny.\""; - set Halloween08, Halloween08 | 2048; - getitem "YellowEasterEgg", 1; - getitem "PinkEasterEgg", 1; - getitem "TealEasterEgg", 1; - close; - -L_Bunny_Black_Done: - mes "[Prize Master]"; - mes "\"Another one?\""; - close; - -L_Bunny_White: - if (Halloween08 & 4096) goto L_Bunny_White_Done; - mes "[Prize Master]"; - mes "\"I think you missed some eggs.\""; - set Halloween08, Halloween08 | 4096; - getitem "RedEasterEgg", 1; - getitem "GreenEasterEgg", 1; - getitem "BlueEasterEgg", 1; - close; - -L_Bunny_White_Done: - mes "[Prize Master]"; - mes "\"Another one?\""; // TODO - close; - - - - -L_WCowboy: - if (Halloween08 & 8192) goto L_Cowboy_Done; - if (@torsoC != cWhite) goto L_WCowboy_BadTorso; - if (@legs != 642) goto L_Cowboy_BadLegs; - mes "[Prize Master]"; - mes "\"This should help out on the trail.\""; - set Halloween08, Halloween08 | 8192; - getitem "ChickenLeg", 1; - close; - -L_WCowboy_BadTorso: - mes "[Prize Master]"; - mes "\"That shirt isn't quite a white at that hat.\""; - close; - -L_Cowboy_BadLegs: - mes "[Prize Master]"; - if (@legsB == 632) mes "\"How can you stand to ride a horse in that skirt?\""; - if (@legsB != 632) mes "\"How can you stand to ride a horse in those pants?\""; - close; - -L_Cowboy_Done: - mes "[Prize Master]"; - mes "\"I've already seen you, partner. Move along.\""; - close; - - - - -L_BCowboy: - if (Halloween08 & 16384) goto L_Cowboy_Done; - if (@torsoC != cBlack) goto L_BCowboy_BadTorso; - if (@legs != 642) goto L_Cowboy_BadLegs; - mes "[Prize Master]"; - mes "\"These will help out on the trail.\""; - set Halloween08, Halloween08 | 16384; - getitem "RoastedMaggot", 3; - close; - -L_BCowboy_BadTorso: - mes "[Prize Master]"; - mes "\"Fashion doesn't seem to be your forte. Try to match that hat better.\""; - close; - - - - - -L_Antler: - if (Halloween08 & 32768) goto L_Antler_Done; - if (@torso != -1 && @legs != -1) goto L_Antler_Bad; - mes "[Prize Master]"; - mes "\"You're a brave deer. Have an apple.\""; - set Halloween08, Halloween08 | 32768; - set @temp, rand(50) + 1; - getitem "RedApple", @temp; - close; - -L_Antler_Bad: - mes "[Prize Master]"; - mes "\"Antlers AND clothing? I don't think so.\""; - close; - -L_Antler_Done: - mes "[Prize Master]"; - mes "\"This buck looks familiar.\""; - close; - - - - -L_Finished: - mes "[Prize Master]"; - mes "\"It seems you've received your 16 prizes.\""; - close; - -L_DevControl: - menu - "Announce Open", L_Dev_Announce_Open, - "Announce Remind", L_Dev_Announce_Remind, - "Announce Close", L_Dev_Announce_Close, - "Spawn Jack O", L_Dev_Spawn_JackO, - "Spawn Jack O 2", L_Dev_Spawn_JackO_2, - "Spawn Jack O in Tulimshar", L_Dev_Spawn_JackO_Tulimshar, - "Spawn Jack O in Hurnscald", L_Dev_Spawn_JackO_Hurnscald, - "Spawn Skulls", L_Dev_Spawn_Skulls; - close; - -L_Dev_Announce_Open: - announce "A costume party has started at Dimond's Cove. Everyone is invited!", 0; - close; - -L_Dev_Announce_Remind: - announce "The costume party at Dimond's Cove is still going. Please stop by for prizes!", 0; - close; - -L_Dev_Announce_Close: - announce "The costume party Dimond's Cove will be ending soon. Thank you for participating!", 0; - close; - -L_Dev_Spawn_JackO: - monster "this", 34, 34, "Jack O", 1022, 1; - close; - -L_Dev_Spawn_JackO_2: - monster "this", 38, 41, "Jack O", 1022, 1; - close; - -L_Dev_Spawn_JackO_Tulimshar: - monster "001-1.gat", 44, 70, "Jack O", 1022, 1; - announce "A ghost in Tulimshar!", 0; - close; - -L_Dev_Spawn_JackO_Hurnscald: - monster "010-2.gat", 52, 40, "Jack O", 1022, 1; - announce "A ghost in Hurnscald!", 0; - close; - -L_Dev_Spawn_Skulls: - monster "this", 32, 39, "Fire Skull", 1023, 1; - monster "this", 36, 39, "Poison Skull", 1024, 1; - close; - -S_Explain: - mes "[Prize Master]"; - mes "\"We're holding a costume party to celebrate Halloween. Each accepted costume gets a prize. Each participant is allowed up to 16 prizes.\""; - next; - - return; -} diff --git a/world/map/npc/halloween/2009/Candyman.txt b/world/map/npc/halloween/2009/Candyman.txt deleted file mode 100644 index d0b4e24d..00000000 --- a/world/map/npc/halloween/2009/Candyman.txt +++ /dev/null @@ -1,309 +0,0 @@ -//################################################################################# -//# This script contains files for Halloween 2009. # -//# Courtesy of: Ceros [scripting], Salmondine [drops], skipy & lien [Candyman], # -//# Freeyorp [the real scripting + PvP quest [[I wish I could have his babies]], # -//# Beelzebub for the Skull mask, Jaxad [for ... and implementation help] # -//# Remoitnane, for putting up with Freeyorp's mistakes during playtesting # -//# Needed: 50 Candy, 50 Chocolate Bars, 50 Caramel Apples, ~60 of any Lollipop # -//# Reward: Skull Mask # -//################################################################################# - -// This script is buggy, don't even think of enabling it -// -o11c - -// The Candy Man -009-1.gat,90,27,0 script The Candy Man 183, { - - set @STATE_KNOWS_CANDYMAN, 1; - set @STATE_FETCH_QUEST, 2; - set @STATE_FETCH_DONE, 3; - set @STATE_PVP_QUEST, 4; - set @LAST_KILL_STATE, 10; - set @STATE_FINISHED, 11; - - if ((strcharinfo(0) == "xxMOIKANOXX")) goto L_DIE_IN_A_FIRE; - if (rand(7) > 4) goto L_Malus_PC; - if (Candyman == 0 && BaseLevel <= 30) goto L_Candy_Too_Young; - if (Candyman == @STATE_KNOWS_CANDYMAN) goto L_Candy_Mean_Bastard; - if (Candyman == @STATE_FETCH_QUEST) goto L_Candy_Check; - if (Candyman == @STATE_FETCH_DONE) goto L_Candy_Done; - if (Candyman >= @STATE_PVP_QUEST && Candyman < @LAST_KILL_STATE) goto L_Kill_Someone; - if (Candyman == @LAST_KILL_STATE) goto L_PvP_Done; - if (Candyman == @STATE_FINISHED) goto L_Finished; - if (Candyman == 0) goto L_Candy_Start; - close; - -L_Candy_Start: - if (Sex) - set @honorific$, "boy"; - if (!Sex) - set @honorific$, "girl"; - mes "[The Candy Man]"; - mes "\"Hello little " + @honorific$ + "... want some candy?\""; - next; - menu - "... uh... sure?", L_Candy_Is_A_Girls_Best_Friend, - "No way, creepo! My mom told me about people like you!", -; - close; - -L_Candy_Is_A_Girls_Best_Friend: - mes "[The Candy Man]"; - mes "\"Well too bad! I want it all!\""; - set Candyman, @STATE_KNOWS_CANDYMAN; - close; - -L_Candy_Mean_Bastard: - mes "[The Candy Man]"; - mes "\"What do you wan-- wait. I'm sorry, maybe you could give me a hand, perhaps? There'd be something in it for you, I promise.\""; - next; - menu - "With what - and what would be in it for me?", L_Candy_More_Info, - "Sorry, no time for the likes of you.", close, - "[Clap loudly]", L_Candy_Insult; - close; - -L_Candy_Insult: - callsub S_Taunt_PC; - itemheal -Hp, 0; - misceffect sfx_magic_war; - misceffect sfx_magic_war, strcharinfo(0); - close; - - L_Candy_More_Info: - mes "[The Candy Man]"; - mes "\"You see.. I need some candy for a.. party that I am going to tonight. But, alas, I didn't bring enough candy for everyone. If you bring me the candy I need, I'll give you something to remind you of me and scare others. How's that sound?\""; - next; - menu - "Sorry, I don't like the sound of this..", -, - "Hmm.. OK..", L_Candy_Accept; - close; - -L_Candy_Accept: - set Candyman, @STATE_FETCH_QUEST; - close; - -L_Candy_Check: - mes "[The Candy Man]"; - mes "\"So what have you brought me, fleshy one?\""; - next; - - if (countitem("ChocolateBar") < 50 || countitem("Candy") < 50 || countitem("LollipopColor1") + countitem("LollipopColor2") + countitem("LollipopColor3") < 60 || countitem("CaramelApple") < 50 ) goto L_Check_Not_Enough; - -//L_Sugar_Daddy: OK, so it isn't needed but it is still funny - - mes "[The Candy Man]"; - mes "\"Hmm.. yes, yes.. it seems you do have enough candy. And I guess a promise is a promise and all that happy... stuff. Very well, here is this mask. It's a striking resemblance, isn't it?\""; - - set @LollipopTotal, countItem("LollipopColor1") + countItem("LollipopColor2") + countItem("LollipopColor3"); - - delitem "LollipopColor1", 60 * countItem("LollipopColor1") / @LollipopTotal; // FIXME: Rounding errors? - delitem "LollipopColor2", 60 * countItem("LollipopColor2") / @LollipopTotal; - delitem "LollipopColor3", 60 * countItem("LollipopColor3") / @LollipopTotal; - delitem "ChocolateBar", 50; - delitem "Candy", 50; - delitem "CaramelApple", 50; - - set Candyman, @STATE_FETCH_DONE; - mes "[The Candy Man gives you a Skull Mask.]"; - getitem "SkullMask", 1; - mes "[12,000 experience points]"; - getexp 12000, 0; - - set $CandyOpsComplete, $CandyOpsComplete + 1; - - next; - - mes "[The Candy Man]"; - mes "\"Oh screw it, this is just no fun.\""; - callsub S_Taunt_PC; - misceffect sfx_magic_war; - misceffect sfx_magic_war, strcharinfo(0); - itemheal -Hp, 0; - close; - -L_Check_Not_Enough: - mes "[The Candy Man]"; - mes "\"No, not enough candy, I need more!\""; - mes "\"Yes...\""; - if (countItem("ChocolateBar") < 50) mes "\"Chocolate is always delicious, I need some more from you before I will consider your offerings complete...\""; - if (countItem("Candy") < 50) mes "\"There is the candy, wrapped up and full of energy so good.\""; - if (countItem("CaramelApple") < 50) mes "\"I have seen many caramel apples go by. I will not rest until I have them!\""; - if (countitem("LollipopColor1") + countitem("LollipopColor2") + countitem("LollipopColor3") < 60) mes "\"Lollipops. Any combination, I care not about which types you bring.\""; - mes "\"Come back when you have enough!\""; - close; - -L_Candyman_Trick: - mes "[The Candy Man]"; - mapannounce "009-1", "Mwahahahaha!", 0; - mapannounce "009-2", "Mwahahahaha!", 0; - misceffect sfx_magic_astral; - misceffect sfx_magic_war, strcharinfo(0); - areamonster "this", 88, 25, 92, 29, "", 1022, 1 + rand($CandyOpsComplete) / (5 + rand(rand($CandyOpsComplete))); - close; - -L_Candy_Done: - mes "[The Candy Man]"; - mes "\"Sorry chum, you already got your mask and I already got my candy.\""; - - next; - menu - "Oookay...", -, - "You're sure?", L_Asking_For_It; - close; - -L_Asking_For_It: - mes "[The Candy Man]"; - mes "\"Oooh, we have an eager one here, it seems. Weeeell, I might have something more for you, if you can do something amusing...\""; - next; - menu - "What did you have in mind?", L_PvP_Intro, - "[Carefully back away...]", -; - close; - -L_PvP_Intro: - mes "[The Candy Man]"; - mes "\"Mhm, mhmhmm. Well, there is nothing quite as utterly delightful as watching you little people run around and kill each other. If, say, you manage to kill enough worthy opponents in an amusing manner, I may well have something... special... for you.\""; - next; - set Candyman, @STATE_PVP_QUEST; - menu - "Sure. Mhm. Mhm.", L_PvP_Accept, - "Oooer. That doesn't sound nice at all!", -; - - mes "[The Candy Man]"; - mes "\"How unfortunate. Because I wasn't asking!\""; - goto L_PvP_Warp; - -L_PvP_Accept: - mes "[The Candy Man]"; - mes "\"Good. Because I wasn't asking! Mhm. Mhm. Ahaha, bwuhahahahah!\""; - goto L_PvP_Warp; - -L_PvP_Warp: - misceffect sfx_magic_astral; - misceffect 20, strcharinfo(0); // Teleportation cloud; - warp "001-3", 0, 0; - close; - -L_Kill_Someone: - mes "[The Candy Man]"; - mes "\"Mm? What are you doing back here, get into it!\""; - goto L_PvP_Warp; - -OnPCKilledEvent: - if (Candyman >= 4 && Candyman < 10) goto L_kill_target_recruit; - message strcharinfo(0), "As everything fades, you hear distant laughter..."; - attachrid(@killerrid); - if (Candyman >= 10) close; - if (Candyman >= 4) goto L_killer_check; - close; - -L_kill_target_recruit: - message strcharinfo(0), "Tut tut. Seems you were too hasty."; - if (Candyman > 5 && Candyman < 11) set Candyman, Candyman - 1; - attachrid(@killerrid); - if (Candyman >= 10) close; - if (Candyman >= 4) goto L_killer_check; - setarray @messages$, "Ouch, I felt that you silly person! That 'weakling' you killed gave me some nice candy... now you will suffer...", "Oooh, a good kill... do you want to work for meee for that? Come and see me...", "Exquisite, a perfect kill... can you do it again? Come see me, I'll make it worth your while...", "Awwwww, that was no fun, you couldn't even see the fool's face. Nevermind, he has failed me, he will pay...", "Hmph, you just _know_ you can do better than that..."; - set @pos, rand(getarraysize(@messages$)); - message strcharinfo(0), @messages$[@pos]; - if (@pos == 0) itemheal -Hp / 2 - 40, -Sp / 2 - 40; - close; - -L_killer_check: - if (BaseLevel > @victimlvl) - goto L_kill_boring; - goto L_kill_worthy; - -L_kill_boring: - setarray @messages$, "Bah, not strong enough! Try someone more interesting, and crush them!", "That was no fun. Killing weaklings is only fun when _I_ do it.", "Too fast, that was over just too fast. Kill someone stronger!", "Boooorring. Crush a worthy foe already!"; - message strcharinfo(0), @messages$[rand(getarraysize(@messages$))]; - close; - -L_kill_worthy: - set Candyman, Candyman + 1; - if (Candyman == 10) goto L_final_kill; - setarray @messages$, "Yes! Yes! More! You must kill more of them!", "Get another one. Destroy them! Make it as good as this one!", "Utterly delightful, go smite another one!", "Mhm, mhm. Yes... simply sublime."; - message strcharinfo(0), @messages$[rand(getarraysize(@messages$))]; - getexp 1000 + rand(@victimlvl, @victimlvl * @victimlvl), 0; - close; - -L_final_kill: - message strcharinfo(0), "Yes! YES! _YES!_ Perfect, just perfect. Well, I think it may well be time for a reward, don't you think? Mhm, mhm. Come to see me, and claim your prize..."; - getexp 15000, 0; - close; - -L_PvP_Done: - mes "[The Candy Man]"; - mes "\"Aha, that was good, yes, very good, mhm.\""; - mes "\"And now, your reward...\""; - mes "\"You have your treat...\""; - mes ""; - mes "[20 000 experience points!]"; - mes "[20 000 gp!]"; - getexp 20000, 0; - set Zeny, Zeny + 20000; - set Candyman, @STATE_FINISHED; - - mes ""; - mes "\"Now, your trick! Mhm, mhmmhmhmhehhm!\""; - goto L_Candyman_Trick; - - -L_Finished: - mes "[The Candy Man]"; - mes "\"Just you wait to see what happens when someone else gives me all that I need, mhm, mhm.\""; - close; - -L_Candy_Too_Young: - - mes "[The Candy Man]"; - mes "\"I don't think you have enough experience to get what I want..\""; - close; - -L_DIE_IN_A_FIRE: - - mes "[The Candy Man]"; - mes "Hi "+strcharinfo(0)+", I heard you were buying up all the candy before I got here..."; - next; - menu - "Whut?",-, - "Uh...",-; - - mes "Very, very bad to steal info out of #tmw-content. No candy for you!"; - callsub S_Taunt_PC; - misceffect sfx_magic_war; - misceffect sfx_magic_war, strcharinfo(0); - itemheal -Hp, 0; - close; - -S_Taunt_PC: - setarray @taunts$, "Die, " + strcharinfo(0) + "!", "Ahah. Aheh. Ahehmwahehehah!", strcharinfo(0) + ", you bore me...", "Rocks fall, everybody dies!", "Why so glum, chum? Everybody has to DIE SOMETIME!", "Why so SERIOUS?", "Do you know how I got this smile, " + strcharinfo(0) + "?", "What, you said you wanted an ivory complexion like mine?", "Tick, tock, tick, tock, BOOM", "BOOM HEADSHOT", "Jigga whut?"; - npctalk @taunts$[rand(getarraysize(@taunts$))]; - return; - -L_Malus_PC: - set @effect, rand(6); - if (@effect == 0) mes "\"Time for you to visit some of my friends...\""; - if (@effect == 0) misceffect sfx_magic_astral; - if (@effect == 0) misceffect 20, strcharinfo(0); - if (@effect == 0) warp "027-1", 0, 0; - if (@effect == 1) mes "\"Misplaced something?\""; - if (@effect == 1) unequipbyid rand(11); - if (@effect == 1) unequipbyid rand(11); - if (@effect == 2) mes "\"Time to cool off, mhm, mhmm.\""; - if (@effect == 2) misceffect sfx_magic_astral; - if (@effect == 2) misceffect 20, strcharinfo(0); - if (@effect == 2) warp "020-1", 0, 0; - if (@effect == 3) mes "\"Ahahehah. Is it me, or is it breezy in here? Mhm.\""; - if (@effect == 3) nude; - if (@effect == 4) mes "\"How delightedly fancy, but I think I can do better for you... aha, aha.\""; - if (@effect == 4) misceffect sfx_magic_astral; - if (@effect == 4) setlook 1, 1+rand(6); - if (@effect == 4) setlook 6, 1+rand(9); - if (@effect == 5) mes "\"...are you still here? Well, not for long...\""; - if (@effect == 5) misceffect sfx_magic_astral; - if (@effect == 5) misceffect 20, strcharinfo(0); - if (@effect == 5) warp "005-3", 0, 0; - close; - -} diff --git a/world/map/npc/halloween/2010/gak.txt b/world/map/npc/halloween/2010/gak.txt deleted file mode 100644 index 92d559d8..00000000 --- a/world/map/npc/halloween/2010/gak.txt +++ /dev/null @@ -1,1256 +0,0 @@ -010-1.gat,29,48,0 script Gak 188, { - - if ($hween10 == 2) goto L_Event_Over; - - if (hween10 > 4 && hween10 < 9) goto L_Collecting_Sweets; - if (hween10 == 9) goto L_Hunger_Sated; - if (hween10 == 10) goto L_Reward_Returning; - if (hween10 == 11) goto L_Miscount_Bugfix; - if (hween10 == 12) goto L_Gaks_Little_Shop; - - if ($hween10 == 1) goto L_Event_Over_2; - - if (hween10 == 1) goto L_Knows_Gak; - if (hween10 == 2) goto L_Gak_Has_Tongue; - if (hween10 == 3) goto L_Bones_Check; - if (hween10 == 4) goto L_Request_Sweets; - - mes "[Broken Skeleton]"; - set hween10, 1; - mes ""; - mes "\"Gak... gak, gak! Gak gak gak gak!\""; - close; - -L_Knows_Gak: - if (countitem("Tongue") > 0) goto L_Has_Tongue; - mes "[Gak]"; - mes ""; - mes "\"Gak gak! Gak gak, gak gak gak!\""; - close; - -L_Has_Tongue: - mes "[Gak]"; - mes ""; - mes "The skeleton notices a slimy, dead tongue you have with you, and eyes it eagerly."; - next; - mes "[Gak]"; - mes ""; - mes "At least, you assume he is eager. \"Gak gak gak! Gak gak gak gak GAK GAK!\""; - next; - menu - "Give the tongue to him", L_Give_Tongue, - "Taunt him by showing him the tongue, but not giving it", L_Give_Tongue_Die, - "Walk away", -; - close; - -L_Give_Tongue: - if (countitem("Tongue") < 1) goto L_Tongue_Gone_Die; - delitem "Tongue", 1; - set hween10, 2; - mes "[Gak]"; - mes ""; - mes "The skeleton grabs the tongue from you and shoves it into his mouth. After stretching his jaw for some moments, he grins at you unpleasantly."; - next; - mes "[Gak]"; - mes ""; - mes "\"Ssso! What bringsss you here, mortal?\""; - next; - menu - "I just chanced upon you here, and figured you could use a tongue.", L_Thanks, - "The Hallowe'en event is FINALLY here, of course I'm going to play it.", L_Whut, - "Nothing.", -; - close; - -L_Tongue_Gone_Die: - mes "[Gak]"; - mes ""; - mes "He reaches out for the tongue, but then realises you don't have it. With an angry a look on his face as a skeleton can have, he slashes at you with his remaining arm."; - goto L_Die; - -L_Give_Tongue_Die: - mes "[Gak]"; - mes ""; - mes "Angrily, the skeleton reaches out and claws you with his remaining arm."; - if (countitem("Tongue") < 1) goto L_Die; - next; - delitem "Tongue", 1; - mes "[Gak]"; - mes ""; - mes "As you fall, he takes the tongue from you anyway."; - set hween10, 2; - goto L_Die; - -L_Die: - close2; - itemheal -Hp -1, 0; - end; - -L_Thanks: - mes "[Gak]"; - mes ""; - mes "\"Well, that wasss mighty thoughtful of you, friend... I wonder if perhapsss you could do me another favour?\""; - next; - menu - "Sure! Anything you want.", L_Sure, - "I'll be right, thanks.", -; - close; - -L_Whut: - mes "[Gak]"; - mes ""; - mes "\"What?\""; - close; - -L_Gak_Has_Tongue: - mes "[Gak]"; - mes ""; - mes "\"Hello again, little friend. Could you posssibly do me another favour?\""; - next; - menu - "I sure can, what is it?", L_Sure, - "Uh, no thanks.", -; - close; - -L_Sure: - mes "[Gak]"; - mes ""; - mes "\"It wasss nice if you to bring me thisss tongue, but asss you can sssee I still have a few things missing.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Maybe you could bring me a few bonesss so I could patch myssself up?\""; - next; - menu - "I'm on it!", L_Bones, - "Nah, that sounds a bit boring.", -; - close; - -L_Bones: - set hween10, 3; - mes "[Gak]"; - mes ""; - mes "\"Wonderful! I can't wait until I can properly walk around attacking thingsss again.\""; - close; - -L_Bones_Check: - mes "[Gak]"; - mes ""; - mes "\"Hallo again. Have you brought me any bonesss?\""; - next; - setarray @menuitems$, "", "", "", "", ""; - set @c, 0; - - if (countitem("Bone") < 5) goto L_bones_four; - set @menuitems$[@c], "Take five bones."; - set @menuid[@c], 0; - set @c, @c + 1; - -L_bones_four: - if (countitem("Bone") < 4) goto L_bones_three; - set @menuitems$[@c], "Take four bones."; - set @menuid[@c], 1; - set @c, @c + 1; - -L_bones_three: - if (countitem("Bone") < 3) goto L_bones_two; - set @menuitems$[@c], "Take three bones."; - set @menuid[@c], 2; - set @c, @c + 1; - -L_bones_two: - if (countitem("Bone") < 2) goto L_bones_one; - set @menuitems$[@c], "Take two bones."; - set @menuid[@c], 3; - set @c, @c + 1; - -L_bones_one: - if (countitem("Bone") < 1) goto L_bones_menu; - set @menuitems$[@c], "Take one bone."; - set @menuid[@c], 4; - set @c, @c + 1; - -L_bones_menu: - set @menuitems$[@c], "I don't have any bones."; - set @menuid[@c], 5; - set @c, @c + 1; - menu - @menuitems$[0], -, - @menuitems$[1], -, - @menuitems$[2], -, - @menuitems$[3], -, - @menuitems$[4], -, - @menuitems$[5], -, - @menuitems$[6], -; - set @menu, @menu -1; - if (@menu >= @c) close; - if (@menuid[@menu] == 5) goto L_offer_no_items; - mes "[Gak]"; - mes ""; - mes "Ssso many? Jussst what I needed. Let me sssee if they are sssuitable..."; - next; - - if (@menuid[@menu] == 0) set @bonecount, 5; - if (@menuid[@menu] == 1) set @bonecount, 4; - if (@menuid[@menu] == 2) set @bonecount, 3; - if (@menuid[@menu] == 3) set @bonecount, 2; - if (@menuid[@menu] == 4) set @bonecount, 1; - if (countitem("Bone") < @bonecount) goto L_Not_Enough_Bones; - - delitem "Bone", @bonecount; - set @bonecount, @bonecount + 1; - set @hween10_givebones, 0; - -// in a rush, raising and then lowering is the best thing I can think of to make the loop work properly. - -L_Bone_Loop: - set @bonecount, @bonecount - 1; - if @bonecount < 1 goto L_Bones_Feedback; - set @temp1, rand(@bonecount + 5); - if @temp1 > @bonecount goto L_Bone_Loop; - set @hween10_givebones, @hween10_givebones + 1; - goto L_Bone_Loop; - -L_Not_Enough_Bones: - mes "[Gak]"; - mes ""; - mes "\"Hey... you don't have that many bonesss!\""; - close; - -L_offer_no_items: - mes "[Gak]"; - mes ""; - mes "\"Sssucch a pity...\""; - close; - -L_Bones_Feedback: - if (@hween10_givebones == 0) goto L_Bones_Feedback_None; - mes "[Gak]"; - mes ""; - mes "\"Hmm... I think I can ussse " + @hween10_givebones + " of thessse bonesss.\""; - next; - set hween10_bonecount, hween10_bonecount + @hween10_givebones; - if (hween10_bonecount > 7) goto L_Enough_Bones; - mes "[Gak]"; - mes ""; - mes "\"But I ssstill need more! Pleassse bring them to me.\""; - close; - -L_Bones_Feedback_None: - mes "[Gak]"; - mes ""; - mes "\"I can't ussse any of theesse boness. I need more!\""; - close; - -L_Enough_Bones: - set hween10, 4; - mes "[Gak]"; - mes ""; - mes "\"And that should be enough for my dark purposssesss.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Now... I wonder...\" He flicks his tongue around his dry and ancient teeth. \"I wonder if you could get me sssomething to eat?\""; - next; - mes "[Gak]"; - mes ""; - mes "\"All thisss hard work gathering bonesss hasss made me...\""; - next; - mes "[Gak]"; - mes ""; - mes "\"HUNGRY!\""; - next; - menu - "Uh, what would you like to eat?", L_Request_Sweets, - "This is a burial site, I'm sure there are plenty of worms around.", L_Worms, - "Me too, actually. I gotta eat. Bye!", -; - close; - -L_Worms: - mes "[Gak]"; - mes ""; - mes "\"True... but they are sssmall, and not asss sssweet asss what I'd like!\""; - next; - -L_Request_Sweets: - mes "[Gak]"; - mes ""; - mes "\"Asss I'm sssure you know, it wasss Hallowe'en recently. I'll bet you had great time collecting sssweetsss with your friendsss, hm?\""; - next; - menu - "The guy organising that was too lazy - it never happened.", L_Time_Management, - "Well, what's it to you?", L_Leftover_Sweets, - "You're creeping me out.", -; - close; - -L_Time_Management: - mes "[Gak]"; - mes ""; - mes "\"That'sss jussst too bad. People with poor time management shouldn't be put in charge of important thingsss like that.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"But never mind. Even if you didn't get to go trick-or-treating, there will ssstill be plenty of dropped sssweets lying around.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"People are ssso carelesss! To my benefit, of courssse. Ssso what do you sssay? Can you bring me asss many sssweetsss as you can find?\""; - menu - "I guess so.", L_Confirm_Sweethunting, - "No, I'd rather eat 'em myself.", -; - close; - -L_Leftover_Sweets: - mes "[Gak]"; - mes ""; - mes "\"Each year at Hallowe'en, all you little girlsss and boysss run about begging for candy. And each year, ssso much of it is dropped, and wasssted!\""; - next; - mes "[Gak]"; - mes ""; - mes "\"But I don't mind eating sssweetsss just becaussse they're a couple of weeksss old! Bring me lotsss, and you shall have a reward.\""; - next; - menu - "Well, okay then.", L_Confirm_Sweethunting, - "Wait, free sweets!? Why did no one tell me?", -; - close; - -L_Confirm_Sweethunting: - set hween10, 5; - mes "[Gak]"; - mes ""; - mes "\"My ssstomach groansss with anticipa - uh, well, my bonesss creak with anticipation. Tell all your little friendsss to bring my any sssweetsss they find, too: I really am VERY hungry!\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Remember, though, and thisss isss important: the more sssweetsss YOU PERSSSONALLY bring me, the better YOUR reward will be!\""; - close; - -L_Collecting_Sweets: - mes "[Gak]"; - mes ""; - mes "\"Ssso, do you have any sssweetsss for me?\""; - next; - setarray @menuitems$, "", "", "", "", ""; - set @c, 0; - - if (countitem("TonoriDelight") < 1) goto L_Sweets_Marshmallow; - set @menuitems$[@c], "Tonori Delight."; - set @menuid[@c], 0; - set @c, @c + 1; - -L_Sweets_Marshmallow: - if (countitem("Marshmallow") < 1) goto L_Sweets_JellySkull; - set @menuitems$[@c], "Marshmallow."; - set @menuid[@c], 1; - set @c, @c + 1; - -L_Sweets_JellySkull: - if (countitem("JellySkull") < 1) goto L_Sweets_CandyPumpkin; - set @menuitems$[@c], "Jelly Skull."; - set @menuid[@c], 2; - set @c, @c + 1; - -L_Sweets_CandyPumpkin: - if (countitem("CandyPumpkin") < 1) goto L_Sweets_Menu; - set @menuitems$[@c], "Candy Pumpkin."; - set @menuid[@c], 3; - set @c, @c + 1; - -L_Sweets_Menu: - set @menuitems$[@c], "I don't have any sweets."; - set @menuid[@c], 4; - set @c, @c + 1; - menu - @menuitems$[0], -, - @menuitems$[1], -, - @menuitems$[2], -, - @menuitems$[3], -, - @menuitems$[4], -, - @menuitems$[5], -; - set @menu, @menu -1; - if (@menu >= @c) close; - - if (@menuid[@menu] == 0) set @giveitem$, "TonoriDelight"; - if (@menuid[@menu] == 1) set @giveitem$, "Marshmallow"; - if (@menuid[@menu] == 2) set @giveitem$, "JellySkull"; - if (@menuid[@menu] == 3) set @giveitem$, "CandyPumpkin"; - // We need something to handle what happens when we select that the character does not have any sweets - if (@menuid[@menu] == 4) goto L_offer_no_items; - - mes "[Gak]"; - mes ""; - mes "\"How many of those do you have for me?\""; - next; - menu - "Take all of them.", -, - "One hundred of them.", -, - "Fifty of them.", -, - "Ten of them.", -, - "Five of them.", -, - "One of them.", -, - "This many...", -; - set @menu, @menu - 1; - - if (@menu == 0) set @givecounter, countitem(@giveitem$); - if (@menu == 1) set @givecounter, 100; - if (@menu == 2) set @givecounter, 50; - if (@menu == 3) set @givecounter, 10; - if (@menu == 4) set @givecounter, 5; - if (@menu == 5) set @givecounter, 1; - if (@menu == 6) input @givecounter; - if (@menu > 6) close; - if (countitem(@giveitem$) < @givecounter) goto L_Not_Enough_Sweeties; - delitem @giveitem$, @givecounter; - if ($hween10 == 1) set hween10, hween10 + 1; - if (@giveitem$ == "TonoriDelight") set $hween10_tondel, $hween10_tondel + @givecounter; - if (@giveitem$ == "Marshmallow") set $hween10_mmallow, $hween10_mmallow + @givecounter; - if (@giveitem$ == "JellySkull") set $hween10_jelskul, $hween10_jelskul + @givecounter; - if (@giveitem$ == "CandyPumpkin") set $hween10_canpump, $hween10_canpump + @givecounter; - if (@giveitem$ == "TonoriDelight") set hween10_collect_tondel, hween10_collect_tondel + @givecounter; - if (@giveitem$ == "Marshmallow") set hween10_collect_mmallow, hween10_collect_mmallow + @givecounter; - if (@giveitem$ == "JellySkull") set hween10_collect_jelskul, hween10_collect_jelskul + @givecounter; - if (@giveitem$ == "CandyPumpkin") set hween10_collect_canpump, hween10_collect_canpump + @givecounter; - - set hween10_collect, hween10_collect + @givecounter; - - mes "[Gak]"; - mes ""; - mes "\"Thank you for your generousss donation to my caussse. Ssso far, you and your friendsss have brought me " + $hween10_tondel + " Tonori Delightsss, " + $hween10_mmallow + " Marshmallowsss, " + $hween10_jelskul + " Jelly Ssskullsss, and " + $hween10_canpump + " Candy Pumpkinsss.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"You persssonally have brought me " + hween10_collect + " sssweetsss.\""; - next; - if (hween10 > 8) goto L_Hunger_Sated; - mes "[Gak]"; - mes ""; - if (hween10 == 5) mes "\"But I ssstill need more! I'm ssstill HUNGRY!\""; - if (hween10 == 6) mes "\"I ssstill need a few more, however... I'm ssstill HUNGRY!\""; - if (hween10 == 7) mes "\"I'd like more, though. I'm ssstill hungry.\""; - if (hween10 == 8) mes "\"Hmm... what a meal! Although, jussst a couple more sssweetsss wouldn't hurt. I'm ssstill a bit peckish.\""; - close; - -L_Not_Enough_Sweeties: - mes "[Gak]"; - mes ""; - mes "\"Hey! Don't teassse me; you know very well that you don't have that many sssweetsss.\""; - close; - -L_Hunger_Sated: - set hween10, 10; - mes "[Gak]"; - mes ""; - mes "The last of the sweets falls out the bottom of the skeleton's skull, bouncing down between his ribs before tumbling out to join the countless thousands that lie in a vast mound of them beside him."; - next; - mes "[Gak]"; - mes ""; - mes "\"Buuurp!\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Now that, my friend, was a DELICIOUSSS meal, if I do sssay ssso myssself. It'sss not every day I get to feassst upon sssuch delectable treatsss.\""; - next; - menu - "Okay, whatever. Now how about my reward?", L_Reward, - "I'm pleased to hear it. Now... a reward, perhaps?", L_Polite_Request, - "It was my pleasure.", L_My_Pleasure; - close; - -L_Reward_Returning: - mes "[Gak]"; - mes ""; - mes "\"Hello again, friend.\""; - next; - menu - "Can I have a reward now?", L_Reward, - "Hello.", -; - close; - -L_Polite_Request: - mes "[Gak]"; - mes "\"Of courssse a reward! Jussst who do you think I am, not to giving rewardsss to people who were kind enough to give me a bit of a hand?\""; - next; - goto L_Reward; - -L_My_Pleasure: - mes "[Gak]"; - mes ""; - mes "\"Good, good!\""; - close; - -L_Reward: - mes "[Gak]"; - mes ""; - // took out here a lot - mes "\"Well, you DID bring me an awful lot of sssweetsss. I have with me a sssmall collection of preciousss itemsss, thingsss I've acquired in variousss waysss.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"I can let you have sssome thingsss out of thisss collection. You brought me " + hween10_collect + " sssweetsss, ssso I will give you itemsss worth twice that amount of gold piecesss.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"For example, if you had given me 1,000 sssweetsss I would give you 2,000GP worth of itemsss. Except actually, I don't like marshmallowsss that much. Thossse are equivalent to jussst 1GP each.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Not to say that I'm sure of your currencccy here... but it sssshould give you an idea, yessss?\""; - next; - set hween10, 12; - set hween10_credits, hween10_collect_tondel + hween10_collect_jelskul + hween10_collect_canpump; - set hween10_credits, hween10_credits * 2; - set hween10_credits, hween10_credits + hween10_collect_mmallow; - mes "[Gak]"; - mes ""; - mes "\"Looksss like you have " + hween10_credits + " ... 'creditsss', shall we call them? Now, let'ss have a look at my waresss.\""; - next; - goto L_Shop_Inventory; - -L_Gaks_Little_Shop: - mes "[Gak]"; - mes ""; - mes "\"You have " + hween10_credits + " creditsss. Tell me what you'd like to buy - or asssk me about it. Sssome of thessse itemsss have very interesssting ssstories attached to them.\""; - next; - -L_Shop_Inventory: - menu - "Opera Mask (9,000 credits)", L_Buy_OperaMask, - "Tell me about the Opera Mask.", L_Info_OperaMask, - "Jester Mask (7,000 credits)", L_Buy_JesterMask, - "Tell me about the Jester Mask.", L_Info_JesterMask, - "Witch's Hat (4,500 credits)", L_Buy_WitchsHat, - "Tell me about the Witch's Hat.", L_Info_WitchsHat, - "Goblin Mask (2,500 credits)", L_Buy_GoblinMask, - "Tell me about the Goblin Mask.", L_Info_GoblinMask, - "Guy Fawkes Mask (800 credits)", L_Buy_GuyFawkesMask, - "Tell me about the Guy Fawkes Mask.", L_Info_GuyFawkesMask, - "Scissors (500 credits)", L_Buy_Scissors, - "Tell me about the Scissors.", L_Info_Scissors, - "Shock Sweet (200 credits)", L_Buy_ShockSweet, - "Tell me about Shock Sweets.", L_Info_ShockSweet, - "Bone Arrow (1 credit)", L_Buy_BoneArrow, - "Tell me about Bone Arrows.", L_Info_BoneArrow, - "Nothing today, thanks.", -; - close; - -L_Buy_OperaMask: - if (hween10_credits < 9000) goto L_Too_Few_Credits; - mes "[Gak]"; - mes ""; - mes "\"Ah, yesss! A friend of mine usssed to wear that masssk. He wasss very famousss in hisss time - had quite a fandom.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Are you sssure you want to buy the Opera Masssk?\""; - next; - menu - "Yes.", -, - "No.", L_Gaks_Little_Shop; - getinventorylist; - if (@inventorylist_count == 100) goto L_Full_Inventory; - if (hween10_credits < 9000) goto L_Too_Few_Credits; - set hween10_credits, hween10_credits - 9000; - set hween10_paid, hween10_paid + 9000; - getitem "OperaMask", 1; - mes "[Gak]"; - mes ""; - mes "\"Enjoy it!\""; - next; - goto L_Gaks_Little_Shop; - -L_Buy_JesterMask: - if (hween10_credits < 7000) goto L_Too_Few_Credits; - mes "[Gak]"; - mes ""; - mes "\"I'm sssure you'll have fun with thisss masssk. 'Fun', get it?\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Are you sssure you want to buy the Jessster Masssk?\""; - next; - menu - "Yes.", -, - "No.", L_Gaks_Little_Shop; - getinventorylist; - if (@inventorylist_count == 100) goto L_Full_Inventory; - if (hween10_credits < 7000) goto L_Too_Few_Credits; - set hween10_credits, hween10_credits - 7000; - set hween10_paid, hween10_paid + 7000; - getitem "JesterMask", 1; - mes "[Gak]"; - mes ""; - mes "\"Enjoy it!\""; - next; - goto L_Gaks_Little_Shop; - -L_Buy_WitchsHat: - if (hween10_credits < 4500) goto L_Too_Few_Credits; - mes "[Gak]"; - mes ""; - mes "\"I was wondering witch one you would take.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Are you sssure you want to buy the Witch'sss Hat?\""; - next; - menu - "Yes.", -, - "No.", L_Gaks_Little_Shop; - getinventorylist; - if (@inventorylist_count == 100) goto L_Full_Inventory; - if (hween10_credits < 4500) goto L_Too_Few_Credits; - set hween10_credits, hween10_credits - 4500; - set hween10_paid, hween10_paid + 4500; - getitem "WitchHat", 1; - mes "[Gak]"; - mes ""; - mes "\"Enjoy it!\""; - next; - goto L_Gaks_Little_Shop; - -L_Buy_GoblinMask: - if (hween10_credits < 2500) goto L_Too_Few_Credits; - mes "[Gak]"; - mes ""; - mes "\"Hmm, I never much liked that one myssself.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Are you sssure you want to buy the Goblin Masssk?\""; - next; - menu - "Yes.", -, - "No.", L_Gaks_Little_Shop; - getinventorylist; - if (@inventorylist_count == 100) goto L_Full_Inventory; - if (hween10_credits < 2500) goto L_Too_Few_Credits; - set hween10_credits, hween10_credits - 2500; - set hween10_paid, hween10_paid + 2500; - getitem "GoblinMask", 1; - mes "[Gak]"; - mes ""; - mes "\"Enjoy it!\""; - next; - goto L_Gaks_Little_Shop; - -L_Buy_GuyFawkesMask: - if (hween10_credits < 800) goto L_Too_Few_Credits; - mes "[Gak]"; - mes ""; - mes "\"Cheap, huh? Barely more than a penny for thisss guy.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Are you sssure you want to buy the Guy Fawkesss Masssk?\""; - next; - menu - "Yes.", -, - "No.", L_Gaks_Little_Shop; - getinventorylist; - if (@inventorylist_count == 100) goto L_Full_Inventory; - if (hween10_credits < 800) goto L_Too_Few_Credits; - set hween10_credits, hween10_credits - 800; - set hween10_paid, hween10_paid + 800; - getitem "GuyFawkesMask", 1; - mes "[Gak]"; - mes ""; - mes "\"Enjoy it!\""; - next; - goto L_Gaks_Little_Shop; - -L_Buy_Scissors: - if (hween10_credits < 500) goto L_Too_Few_Credits; - mes "[Gak]"; - mes ""; - mes "\"My own pair of ssscissssorsss! But I haven't been needing them lately asss much asss I usssed to.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Are you sssure you want to buy the Scissors?\""; - next; - menu - "Yes.", -, - "No.", L_Gaks_Little_Shop; - getinventorylist; - if (@inventorylist_count == 100) goto L_Full_Inventory; - if (hween10_credits < 500) goto L_Too_Few_Credits; - set hween10_credits, hween10_credits - 500; - set hween10_paid, hween10_paid + 500; - getitem "Scissors", 1; - mes "[Gak]"; - mes ""; - mes "\"Enjoy it!\""; - next; - goto L_Gaks_Little_Shop; - -L_Buy_ShockSweet: - if (hween10_credits < 200) goto L_Too_Few_Credits; - mes "[Gak]"; - mes ""; - mes "\"I'll be glad to be rid of sssome of thessse terrifying sssweetsss...\""; - next; - mes "[Gak]"; - mes ""; - mes "\"How many would you like to buy?\""; - next; - menu - "1", -, - "2", -, - "3", -, - "4", -, - "5", -, - "None", -; - - if (@menu < 0 || @menu > 6) close; - if (@menu == 6) goto L_Gaks_Little_Shop; - set @shocksweets, @menu; - set @cost, @shocksweets * 200; - if (hween10_credits < @cost) goto L_Too_Few_Credits; - getinventorylist; - if (@inventorylist_count == 100 && countitem("ShockSweet") < 1) goto L_Full_Inventory; - set hween10_credits, hween10_credits - @cost; - set hween10_paid, hween10_paid + @cost; - getitem "ShockSweet", @shocksweets; - mes "[Gak]"; - mes ""; - mes "\"I would sssay 'enjoy them', but I doubt you will.\""; - next; - goto L_Gaks_Little_Shop; - -L_Buy_BoneArrow: - if (hween10_credits < 1) goto L_Too_Few_Credits; - mes "[Gak]"; - mes ""; - mes "\"Deadly, but nearly weightlessss. A good choice!\""; - next; - mes "[Gak]"; - mes ""; - mes "\"How many would you like to buy?\""; - next; - menu - "1", -, - "5", -, - "10", -, - "50", -, - "100", -, - "500", -, - "1000", -, - "None", -; - - if (@menu < 1 || @menu > 8) close; - if (@menu == 1) set @bonearrows, 1; - if (@menu == 2) set @bonearrows, 5; - if (@menu == 3) set @bonearrows, 10; - if (@menu == 4) set @bonearrows, 50; - if (@menu == 5) set @bonearrows, 100; - if (@menu == 6) set @bonearrows, 500; - if (@menu == 7) set @bonearrows, 1000; - if (@menu == 8) goto L_Gaks_Little_Shop; - if (hween10_credits < @bonearrows) goto L_Too_Few_Credits; - getinventorylist; - if (@inventorylist_count == 100 && countitem("BoneArrows") < 1) goto L_Full_Inventory; - set hween10_credits, hween10_credits - @bonearrows; - set hween10_paid, hween10_paid + @bonearrows; - getitem "BoneArrows", @bonearrows; - mes "[Gak]"; - mes ""; - mes "\"Usse them wisssely. They're hard to come by.\""; - next; - goto L_Gaks_Little_Shop; - -L_Too_Few_Credits: - mes "[Gak]"; - mes ""; - mes "\"Are you trying to kid me? You haven't enough creditsss for that!\""; - next; - goto L_Gaks_Little_Shop; - -L_Info_OperaMask: - mes "[Gak]"; - mes ""; - mes "\"Ah, yesss. My Opera Masssk. There'sss quite a ssstory sssurrounding thisss one...\""; - next; - mes "[Gak]"; - mes ""; - mes "\"One day in Tonori, many yearsss ago, the Princessss Azura mysssteriousssly vanished. The King'sss men sssearched high and low, but found no trace of her.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"It wasss assssumed - correctly - that she mussst have been kidnapped. Ssso the King put a hefty reward on her safe return - a hundred thousssand gold piecesss.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"However, the Princessss wasss not returned. One year after she had disssappeared, the King raisssed the reward by fifty thousssand gold - and each year after, too, for ssstill the Princessss wasss not returned.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Asss time went by, the King became more and more sssure that hisss daughter mussst be dead. He wasss, however, wrong...\""; - next; - mes "[Gak]"; - mes ""; - mes "\"At that very moment, a pirate galleon wasss sssailing merrily along the Rivalry Coassst. Itsss crew sssang ssea-shantiesss and bounced around the rigging.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Sssuddenly, though, the pirate captain ssspied sssomething terrible ahead of them. Water ssswirled around and around like a giant bathtub being emptied....\""; - next; - mes "[Gak]"; - mes ""; - mes "\"A maelssstrom!\""; - next; - mes "[Gak]"; - mes ""; - mes "\"The captain tried to tell hisss crew to turn the ship around, but they couldn't hear him over their sssinging. They were ssswept, ssspiraling, into the cavernousss hole in the sssea.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"The piratesss realisssed, then, what was happening, and ssstopped sssinging at once. The captain ordered them to remove the sssailsss and tie them down like parachutesss.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"The plan worked. Asss they fell, the air caught under the sssailsss and ssslowed the falling of the ship. Sssoon they landed gently on the bottom of the ocean.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Peering around in the gloom, the pirate captain sssaw a prone figure on a rock nearby. He climbed out of the ship and hurried over.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"But before he could reach them, a jet of flame ssstreaked passst above him, and a great ssslimy creature emerged from the sssea in front of him...\""; - next; - mes "[Gak]"; - mes ""; - mes "\"A dragon!\""; - next; - mes "[Gak]"; - mes ""; - mes "\"The captain jumped out of the way asss the dragon once again breathed fire. The captain turned to sssee hisss ship in flamesss.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"The dragon sssmiled evilly and opened itsss mouth to eat the captain. But when it had ssset the ship on fire it had accidentally lit the fusssesss of the cannonsss, and at thisss moment they fired.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Cannonball after cannonball thudded into the dragon, sssending it reeling back into the sssea. The captain picked up the figure from the rock, and looked about to sssee how he might essscape.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"And asss he did, it grew very dark; looking above him, he sssaw that the maelssstorm wasss collapsssing. He held the figure tightly to keep them sssafe, and braced himssself.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"The water hit them from either ssside asss though Triton, the god of the sssea, had clapped hisss handsss upon them. They were lifted from the bottom and carried with great ssspeed to the sssurface.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"They rossse bessside a ship of the King'sss navy, aboard it a mage - who had closssed the maelssstorm - and the King himssself, who had come to watch.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"And asss both he and the pirate captain looked down to the figure whom the latter had found on the bottom of the sssea, they gasssped at who it wasss...\""; - next; - mes "[Gak]"; - mes ""; - mes "\"The Princessss!\""; - next; - mes "[Gak]"; - mes ""; - mes "\"In return for finding her, the pirate captain was given sssix hundred thousssand gold piecesss, a Royal Pardon for Piracy, a Pirate Permit and the Princessss'sss hand in marriage.\""; - next; - mes "[Gak]"; - mes ""; - mes "The skeleton pausssesss for a moment to sssigh in rememberance. \"It wasss a very good opera,\" he continues."; - next; - mes "[Gak]"; - mes ""; - mes "\"After it had ended, I went backssstage and bought an opera masssk sssigned by the lead actor, and alssso a nice cossstume that I needed for work.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Thisss isss, of courssse, that very masssk. It'sss worth a lot becausssse of the autograph.\""; - next; - goto L_Gaks_Little_Shop; - -L_Info_JesterMask: - next; - mes "[Gak]"; - mes ""; - mes "\"Ah, yesss. Quite a ssscary little thing, isssn't it? And it hasss quite a hissstory, too.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Back in the lassst daysss of the Tonorian King Efeniunkanduiti Khan there were many plotsss to remove him from the throne, and the biggessst sssource of thessse plotsss wasss the Bell Sssociety.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"The King wasss quite worried about all thisss, asss you would imagine, ssso he hired a jessster to make light of any misssfortune.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"The jessster wasss undoubtedly funny, and the ssscary yet sssilly cossstume he wore ssseemed to emphasssissse the hilarity of him. The King cheered consssiderably with the jessster juggling, doing sssomersssaults and telling punsss in hisss court.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"But there wasss one man who didn't like the jessster at all: Prince Akhendo-Al Mosssesssmuchasssdad Khan. The jessster'sss masssk concealed hisss experessssion, which disssconcerted Akhendo-Al greatly.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"He tried to explain hisss feelingsss to hisss father, but the King wasssn't paying attention. He wasss too busssy laughing at the joke the jessster had jussst made about Akhendo-Al'sss sssour face.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"But the King should have lissstened before it wasss too late. One night a piercing ssscream woke the palace, and ssservants came hurrying to the King'sss chamber: but he wasss already dead. A long, wicked knife had been thrussst into hisss heart.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Akhendo-Al looked around at the gathered ssservantsss and guardsss, and ssaw what he had sssussspected from the firssst: the jessster wasss gone!\""; - next; - mes "[Gak]"; - mes ""; - mes "\"He raced back the way he had come, and down to the entrance hall. Asss he reached the main doorsss, a voice behind him laughed. He turned to sssee the jessster at the top of the ssstairsss he had jussst dessscended!\""; - next; - mes "[Gak]"; - mes ""; - mes "\"The chassse wasss on. Akhendo-Al ran asss fassst asss he could back up the ssstairsss, and down a passssage which the jessster had disssappeared down. Laughter echoed around him asss he ran through the palace, occassssionally catching a glimpssse of the jessster ahead.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Sssoon, Akhendo-Al found himssself at the top of the palace'sss bell tower. On the other ssside of the great bellsss he sssaw the jessster, sssilhouetted againssst the moon, and sssmiling cruelly.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"'There's no escape for you now,' Akhendo-Al told him, and drew hisss sssabre. 'Try to run, and I shall cut you down.'\""; - next; - mes "[Gak]"; - mes ""; - mes "\"But the jessster sssmiled, and turned to ssstand at the edge of the tower, looking down at the moat that lay far below.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Akhendo-Al ssstared asss the jessster opened hisss armsss wide...\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Then the jessster turned, and shrugged. 'But I've already accomplished my tasssk. The tyrant king isss dead.'\""; - next; - mes "[Gak]"; - mes ""; - mes "\"The Prince tied the jessster'sss handsss with sssome ssspare bell-rope, and took him down to a group of palace guards. Together, they led the jessster to the dungeonsss and sssecured him. Angrily, the Prince removed the man'sss masssk. Then he and the guardsss gasssped in sssurprissse.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"The man wasss Gorrik, captain of the palace guard!\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Gorrik gave a mossst long-winded explanation of why he wasss dressssed asss a jessster, and assssurred Akhendo-Al that he had certainly not killed the king. But the prince wasss now king, and he knew that Gorrik wasss the murderer. He sssentenced the man to execution.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"To hisss disssapointment, the old guard captain essscaped and fled the country. He came here, and thisss isss the very jessster masssk he wore.\""; - next; - goto L_Gaks_Little_Shop; - -L_Info_WitchsHat: - next; - mes "[Gak]"; - mes ""; - mes "\"Which? Ah, yesss, that one. Hmm. Well, many yearsss ago thessse foressstsss usssed to be home to witchesss.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"I came upon one myssself sssoon after I arrived in Argaes, many yearsss ago, while I wasss alive. I had recently been forced to leave my mother country, where we had not many treesss - the vassst foressstsss were very ssstrange to me.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"I wasss ssstranded far to the Sssouth of here - that area isss ssstill wildernesss today. For daysss I travelled through the thick foressstsss, looking for civilation or - at leassst - sssomething to eat.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Eventually I came upon a sssmall cottage in a clearing. Overcome with hunger, I thought I might knock and asssk if they had anything to eat. But asss I approached, I noticed sssomething very ssstrange...\""; - next; - mes "[Gak]"; - mes ""; - mes "\"The entire houssse wasss made of sssweeetsss! The walls were bricksss of tonori delight, the wallsss were translucent jelly ssskullsss sssquished into a pane, the roof wasss thatched with marshmallow and the ground wasss paved with flattened candy pumpkinsss.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"I quickly forgot about asssking for food and ssset about eating the houssse. I took great handfulsss from the wallsss and jammed them into my mouth. It lessss than a minute my face wasss sssmeared all over, and my handsss ssso covered in sssticky sssweetsss that you couldn't sssee any ssskin.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Then the door sssuddenly opened, and out ssstepped what I knew at once wasss a witch. The long black cloak, the pointy black hat, and the broomssstick she clutched in one hand aided me in thisss deduction.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Well, there'sss really only one thing you can do when a witch catchesss you eating her wallsss. You run for it. But I barely had time to move before she cassst an evil ssspell. I fell forward on my face, and felt myssself being dragged back toward her by invisssible forcesss.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Thessse sssame forcesss then flipped me over onto my back. The witch looked furiousssly angry. 'Why,' she sssaid, 'are you eating my wall?'\""; - next; - mes "[Gak]"; - mes ""; - mes "\"The anssswer 'Becaussse I wasss hungry' ssseemed a fairly obviousss one to me, but you don't act sssmart to a witch. I told her I had been unaware that the cottage wasss inhabited.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Well, that ssset her glaring even more. 'You didn't see the smoke coming from the chimney? You didn't stop to consider that sweets left lying around in a wood are hardly likely to be so clean and fresh and... well... there?'\""; - next; - mes "[Gak]"; - mes ""; - mes "\"I complimented her on how fine her sssweetsss were. She sssighed wearily.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"'But you've no idea,' she told me, 'how tiresome it is to keep them looking like that. I'm always cooking up more sweets for repairs, which I need to do constantly because my walls are always getting eaten by vermin.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"'I have a large store of sweets underneath my house, to which I add and from which I take every morning. Patching holes, shaving away layers of sweets that have grown mouldy and replacing with a thin layer of new sweets... and when it rains! You wouldn't believe!'\""; - next; - mes "[Gak]"; - mes ""; - mes "\"She glanced up at the roof of her houssse. 'I have a huge big sheet of waterproof canvas,' she went on. 'And as soon as it looks like rain I have to rush out here and tie it over my roof - if this house gets rained on, that's the end of it, I tell you. I'd have to rebuild from scratch.'\""; - next; - mes "[Gak]"; - mes ""; - mes "\"I hadn't realisssed what hard work the upkeep for a houssse made from sssweetsss wasss. I wasss now very sssorry for eating ssso much of her houssse without even asssking, and I told her ssso. But she glared again.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"'Never you mind MY worries,' she told me. 'You should be more concerned about your own!'\""; - next; - mes "[Gak]"; - mes ""; - mes "\"I remember ssswallowing nervousssly. 'My worriesss?'\""; - next; - mes "[Gak]"; - mes ""; - mes "\"'I hope you don't think you're leaving here,' sssaid the witch. 'You're staying and working for me until you've repaid what you ate.'\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Thisss wasssn't ssso bad asss I'd firssst thought it would be. I had three mealssss a day of the witch'sss cooking - not sssweetsss, but real mealsss and they were ever ssso much nicer. The work wasss hard, but I had many interesssting conversssationsss with the witch.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"It took sssome time to repay my debt, but finally I had worked enough. The witch - whossse name wasss Alissssa - gave me a bag of sssweetsss to take with me when I left. But I didn't want to go - what wasss there for me in the North?\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Ssso I ssstayed, in fact. We ate that bag of sssweetsss together, and from then on we did half the choresss each. Thossse were great daysss.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"But it wasss dangerousss, living down there in the Sssouth, back then. One night were were attacked by a tribe of goblinsss.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"I tried to protect Alissssa, but I wasss killed. I don't know what happened to her, becaussse it wasss many yearsss before I returned from the dead.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"When I did, I found myssself lying in a clearing in the foressst. The bracken wasss thickly growing and there were many young treesss, but sssearching around I dissscovered a trapdoor leading into a cellar. I wasss in the remainsss of our houssse.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"When I returned from the cellar, I ssspotted sssomething black lying in the grassss. It wasss Alissssa's pointy hat - unharmed by the yearsss becaussse of itsss magic.\""; - next; - mes "[Gak]"; - mes ""; - mes "The skeleton sighs as well as he can without lungs. \"Thisss witch'sss hat isss, of courssse, that very one. I've hung on to it for sssuch a long time - you couldn't imagine how long. I think it'sss time to let it go. If you truly want it, you can have it.\""; - next; - goto L_Gaks_Little_Shop; - -L_Info_GoblinMask: - mes "[Gak]"; - mes ""; - mes "\"Aha, yesss. There usssed to be a village far to the Sssouth where they wore thossse.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"In thossse daysss there were many goblin tribesss down there, who would regularly attack human villagesss. No one really knew why, it wasss jussst what goblinsss did.\" He looks sad for a moment. \"Well, in thisss village - which wasss called Turnap - they devisssed a clever ssscheme to protect themssselvesss from the goblinsss...\""; - next; - mes "[Gak]"; - mes ""; - mes "\"They made themssselvesss masssksss, like thisss one, to look like goblinsss. They figured the goblinsss wouldn't attack them if they did thisss.\" He grins like only a skeleton can. "; - next; - mes "[Gak]"; - mes ""; - mes "\"Of courssse, thossse goblinsss jussst thought the people of Turnap were another tribe that wasss invading there territory. They attacked and killed everyone.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"I had lived nearby for sssome time, and had been given thisss masssk to protect myssself on one of my visssitsss there. It did me asss much good asss it did them...\""; - next; - mes "[Gak]"; - mes ""; - mes "\"You can have it, if you want, but jussst remember: it won't protect you from the goblinsss!\""; - next; - goto L_Gaks_Little_Shop; - -L_Info_GuyFawkesMask: - mes "[Gak]"; - mes ""; - mes "\"Over in Tonori there isss a traditional celebration known asss 'Guy Fawkesss Day'. Sssee, many yearsss ago there wasss a guy named Fawkesss.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"He wasss a member of a sssecret sssociety. The Bell Sssociety, it wasss called. Their aim wasss to rid Tonori of itsss king, Efeniunkanduiti Khan.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Now, Fawkesss was a pretty exciteable guy. He had thessse visssionsss of blowing up the entire palace. The other membersss of the sssociety thought thisss wasss unnecessssary, but would neverthelessss be pretty cool.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Ssso, over time, they acquired enough explosssivesss to put Fawkesss' plansss into action. One dark night in late Autumn they gained entry to the palace, and placed great barrelsss of explosssivesss in ssstrategic locationsss.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Then came the time to light the fussse. The othersss went outssside to watch the show, and Fawkesss crept back down the cellarsss, where the ten-minute fussse lay waiting to be lit.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Unfortunately, it wasss at that moment that sssome of the Palace Guard showed up. They were a disssobient pair - they rarely lissstened to the commandsss of their ssseniorsss, and were currently sssneaking down to the cellarsss to sssteal themssselves sssome wine.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Of courssse, when they sssaw Fawkesss about to light the fussse they quickly ssseized him and tied him to a possst. After they had poured themssselvesss a drink, they ssstarted to interrogate him.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"But dessspite their tauntsss and no matter how many timesss they hit him, Fawkesss sssaid nothing. He wasss a brave guy.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Eventually, the guardsss told him that even if he didn't ssspeak, they could sssee that he had been trying to blow up the palace. They were completely drunk by thisss time, and sssaid that once they had gone to relieve themssselvesss they would hang him right there in the cellar.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Asss it isss tradional to do before executing sssomeone, the guardsss gave Fawkesss a pipe for hisss lassst sssmoke. They then left to ussse the toilet.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"It'sss rather obviousss what happened next. Once he wasss sssure they had gone, Fawkesss rolled himssself over in hisss bondsss and pressssed the sssmoking pipe againssst the fussse.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"The ressst of the Bell Sssociety, ssstanding outssside the palace, had a magnificent view asss the centre of the palace was blown into the sssky and the wallsss crumpled outwardsss. Asss Fawkesss had not returned, they guessssed that he mussst not have been able to essscape.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"The two palace guardsss, unfortunately, sssurvived. Asss the wall collapsssed they crashed into the moat along with the ressst of the rubble, but managed to free themssselves.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"The Bell Sssociety essscaped, sssad for their lossss of Fawkesss but jubilant that they had sssuccesssfully killed the King. Unfortunately, the newssspaper next day revealed that he had not even been in the palace at the time! He wasss not even hurt!\""; - next; - mes "[Gak]"; - mes ""; - mes "\"The people of Tulimshar thought it very funny that sssuch a lot of effort had come to nothing. The palace was of courssse dessstroyed, but the Bell Sssociety had failed. Now we celebrate Guy Fawkesss day, in a lasssting jessst at the wasssted effort of the Bell Society.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Thisss masssk is meant to look like Fawkesss, but it doesssn't really. He wasssn't sssuch a smiley guy.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"I don't like Guy Fawkesss Day myssself, ssso I'm ssselling it cheaply.\""; - next; - goto L_Gaks_Little_Shop; - -L_Info_Scissors: - mes "[Gak]"; - mes ""; - mes "\"Yesss, my old ssscissssorsss. I had to cut my own hair with them once, to disssguissse myssself - which I had to do to essscape the country unnoticed.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"It'sss rather a long ssstory, but... well, I wasss in fact running from my execution. I came to Argaesss ssso that I didn't have to lossse my head.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"But that'sss long in the passst. Here and now, they're very good for changing your hairssstyle without bothering to go all the way to the barber.\""; - next; - goto L_Gaks_Little_Shop; - -L_Info_ShockSweet: - mes "[Gak]"; - mes ""; - mes "\"Thossse? Shocking thingsss...\""; - next; - goto L_Gaks_Little_Shop; - - -L_Info_BoneArrow: - mes "[Gak]"; - mes ""; - mes "\"Ahh, yessss. I happen to have sssso many leftover bonesss from what people have been giving me. I couldn't take them all, of courssse... there were very few that were responsssive enough for I needed, and now, I have the bessst.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Would be ssssssuch a pity to wassste the leftoverss though... I've been enchanting the ressst for usse as weaponssss. Nothing too ssspecial, but they are verry light.\""; - next; - goto L_Gaks_Little_Shop; - -L_Event_Over: - if (hween10 < 5) goto L_Event_Over_1; - if (hween10 < 13) goto L_Event_Over_2; - mes "[Gak]"; - mes ""; - mes "\"Well, it'sss been very nice meeting you, friend, but I think I'll be heading off sssoon. I hear the Northern farmsss are pleasssant at this time of year.\""; - close; - -L_Event_Over_1: - mes "[Gak]"; - mes ""; - mes "\"Hmm, hello. And goodbye.\""; - close; - -L_Event_Over_2: - mes "[Gak]"; - mes ""; - mes "\"Thank you for thossse sssweetsss, they were quite deliciousss. But I think I'll be leaving sssoon.\""; - close; - -L_Full_Inventory: - mes "[Gak]"; - mes ""; - mes "\"Ssseems you don't have room for thisss.\""; - close; - -L_Miscount_Bugfix: - if (hween10_collect_canpump != 0) goto L_Do_Miscount_Bugfix; - set hween10, 12; - goto L_Gaks_Little_Shop; - -L_Do_Miscount_Bugfix: - - mes "[Gak]"; - mes ""; - mes "\"Er.\" While his expression is as stony as ever, he sounds quite embarrassed."; - next; - mes "[Gak]"; - mes ""; - mes "\"Seems I forgot some thingsss earlier... you should actually have " + (hween10_collect_canpump << 1) + " more creditsss than I calculated before.\""; - next; - mes "[Gak]"; - mes ""; - mes "\"Sssorry.\""; - next; - - menu - "\"Hmph. Well, you can correct that now, right?", -; - - mes "[Gak]"; - mes ""; - mes "\"Of courssse. It is done. Sssorry about that\""; - set hween10_credits, hween10_credits + (hween10_collect_canpump << 1); - set hween10, 12; - next; - goto L_Gaks_Little_Shop; - -} - diff --git a/world/map/npc/halloween/2011/_import.txt b/world/map/npc/halloween/2011/_import.txt deleted file mode 100644 index 89728d86..00000000 --- a/world/map/npc/halloween/2011/_import.txt +++ /dev/null @@ -1,2 +0,0 @@ -npc: npc/halloween/2011/config.txt -npc: npc/halloween/2011/trick_or_treat.txt diff --git a/world/map/npc/halloween/2011/config.txt b/world/map/npc/halloween/2011/config.txt deleted file mode 100644 index a62e680e..00000000 --- a/world/map/npc/halloween/2011/config.txt +++ /dev/null @@ -1,228 +0,0 @@ -// Halloween 2011 -// Authors: alastrim, enchilado, o11c -// This file initializes global constants, which includes dialog. - -// Event Configuration: -// Generic stuff -// $@hw2011_start_day = the first day in October the quest can be done -// $@hw2011_year = the year this quest is activated, for event necromancers -// $@hw2011_memory_count = Number of masks each NPC remembers -// $@hw2011_min_level = Minimum level to go trick-or-treating - -// Global stuff -// $@hw2011_big_reward$ = The main reward randomly given, usually after the counter has reached 7-10 -// $@hw2011_sweets$ = Array with all the sweets to be given as treats -// $@hw2011_sweets_num = Size of that array -// $@hw2011_mask_IDs = Array with the IDs of all the masks that cover your face + The Scary Axehat -// $@hw2011_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 -// $@hw2011_npc_<name> = constants for @hw2011_npc_id, the index into the array -// $@hw2011_npc_names$ = Array with all NPC names inside brackets, to be used in the function -// $@hw2011_greetings$ = Array with all the NPC initial greetings when you "trick or treat" them -// $@hw2011_trick_notscary$ = Array with the less scary menu options -// $@hw2011_react_notscary$ = Array with all the reactions to the less scary menu options -// $@hw2011_trick_scary$ = Array with scary menu options -// $@hw2011_react_scary$ = Array with all the reactions to the scary menu options -// $@hw2011_trick_veryscary$ = Array with the most scary menu options -// $@hw2011_react_veryscary$ = Array with all the reactions to the very scary menu options - -// !!! IMPORTANT NOTE: a maximum of 15 NPCs can be used for this quest !!! - --|script|#hw2011config|-1,{ -OnInit: - // Set this to 1 for testing, to enable for all of October - set $@hw2011_start_day, 24; - // Using this means the calling NPCs don't need to be edited when the event - // is done, but allows the possibility of reenabling it in a later year. - // If we make it an annual event it will become obsolete. - set $@hw2011_year, 2011; - // How many, maximum is 8 - set $@hw2011_memory_count, 5; - // Level to go trick-or-treating - // Don't decrease this below 10 or the surgeon will be filled with plot holes - set $@hw2011_min_level, 10; - - set $@hw2011_big_reward$, "BunchOfParsley"; - set $@hw2011_got_big_reward, 0x10000; - // TODO: review this list - // all sweets are equal currently - setarray $@hw2011_sweets$, - "OrangeCupcake", - "ChocolateCake", - "Candy", - "DecorCandy", - "Cake", - "CandyCane", - "XmasCake", - "ChocolateBar", - "GingerBreadMan", - "XmasCandyCane", - "CherryCake", - "WhiteCake", - "OrangeCake", - "AppleCake", - "TonoriDelight", - "Marshmallow", - "JellySkull", - "CandyPumpkin", - "CranberryLollipop", - "GrapeLollipop", - "OrangeLollipop"; - set $@hw2011_sweets_num, getarraysize($@hw2011_sweets$); - - setarray $@hw2011_mask_IDs, 678, 679, 1221, 634, 615, 639, 769, 801, 1218, 1276, 1277, 1279, 4027, 616; - setarray $@hw2011_scare_factors, 2, 4, 4, 4, 2, 3, 2, 2, 1, 3, 2, 4, 4, 4; - - // temporary counter - set $@n, 0; - - set $@hw2011_npc_caretaker, $@n; - set $@hw2011_npc_names$[$@n], "[Caretaker]"; - set $@hw2011_greetings$[$@n], "\"Alright, come on then. Show me your trick.\""; - set $@hw2011_trick_notscary$[$@n], "Trick? You must have misheard me. I've come because the Government needs to build a road through your house."; - set $@hw2011_react_notscary$[$@n], "\"And?\""; - set $@hw2011_trick_scary$[$@n], "You look pretty deceased to me, old man. Undead must die! Yaah!"; - set $@hw2011_react_scary$[$@n], "\"Now listen here, I'm as alive as you - oh. Say, that was a good trick!\""; - set $@hw2011_trick_veryscary$[$@n], "Your wife... she's - she's - she's DEAD!"; - set $@hw2011_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 $@hw2011_npc_eurni, $@n; - set $@hw2011_npc_names$[$@n], "[Eurni the Surgeon]"; - set $@hw2011_greetings$[$@n], "\"Oh, right.\""; - set $@hw2011_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 $@hw2011_react_notscary$[$@n], "\"Heheh, sucks, buddy. But there's always a risk.\""; - set $@hw2011_trick_scary$[$@n], "Look out! A scorpion!"; - set $@hw2011_react_scary$[$@n], "\"Where? Darn things, I think they're what keep scaring away my customers.\""; - set $@hw2011_trick_veryscary$[$@n], "I know about your hobby of performing numerous sex changes on yourself."; - set $@hw2011_react_veryscary$[$@n], "\"Shut up! Look, will you hold your tongue if I give you more treats...?\""; - - set $@n, $@n + 1; - - set $@hw2011_npc_george, $@n; - set $@hw2011_npc_names$[$@n], "[George the Pirate]"; - set $@hw2011_greetings$[$@n], "\"Shiver me timbers! What do ye mean?\""; - set $@hw2011_trick_notscary$[$@n], "Well... I do a trick, and then... you give me a treat..."; - set $@hw2011_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 $@hw2011_trick_scary$[$@n], "Your eyepatch is on the wrong eye!"; - set $@hw2011_react_scary$[$@n], "\"Arrrrh, so it is! Ta for pointing it out, mate - wait, no it isn't! Harhar, what a good trick!\""; - set $@hw2011_trick_veryscary$[$@n], "By the powers, ye're a daft landlubber to be sure, ye barnacle-ridden swab!"; - set $@hw2011_react_veryscary$[$@n], "\"Arrrrh, ye scurvy dog! I'm sure my first mate will return with the ship eventually.\""; - - set $@n, $@n + 1; - - set $@hw2011_npc_inac, $@n; - set $@hw2011_npc_names$[$@n], "[Inac]"; - set $@hw2011_greetings$[$@n], "\"Oh, yes?\""; - set $@hw2011_trick_notscary$[$@n], "Yes, we monsters moved into the tunnels... and now we're coming out... for revenge!"; - set $@hw2011_react_notscary$[$@n], "\"Haha! That's the worse trick I've seen today.\""; - set $@hw2011_trick_scary$[$@n], "One of those monsters you mentioned is crawling out of the well!"; - set $@hw2011_react_scary$[$@n], "\"He IS? Where!? Aah! Oh. You were just tricking, right? Hahaha, that was good, I really believed you.\""; - set $@hw2011_trick_veryscary$[$@n], "Yeah, but it's all fossil water. One day it's gonna dry up!"; - set $@hw2011_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 $@hw2011_npc_kfahr, $@n; - set $@hw2011_npc_names$[$@n], "[Kfahr the Warrior]"; - set $@hw2011_greetings$[$@n], "\"Ah, yes!\" He rubs his hands. \"Trick away, then!\""; - set $@hw2011_trick_notscary$[$@n], "Meh... I'm only trick-or-treating you to avoid listening to your BORING stories."; - set $@hw2011_react_notscary$[$@n], "\"Boring?\" He grins. \"You must be mistaking me for someone else.\""; - set $@hw2011_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 $@hw2011_react_scary$[$@n], "\"What? But- but- why do they- oh, you tricked me. I was about to really get worried for a moment.\""; - set $@hw2011_trick_veryscary$[$@n], "Have you heard? Tulimshar was destroyed by a giant Desert Worm!"; - set $@hw2011_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 $@hw2011_npc_nurse, $@n; - set $@hw2011_npc_names$[$@n], "[Nurse]"; - set $@hw2011_greetings$[$@n], "\"I don't know why I let the Mayor trick me into this... well, go on then.\""; - set $@hw2011_trick_notscary$[$@n], "I ate too much Hallowe'en candy, now I'm sick!"; - set $@hw2011_react_notscary$[$@n], "\"Well, no one's to blame but yourself, you know. Just make sure you don't eat any more.\""; - set $@hw2011_trick_scary$[$@n], "Hurnscald has been struck by plague! You must come and tend to the dying!"; - set $@hw2011_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 $@hw2011_trick_veryscary$[$@n], "The Doctor asked me to tell you that he doesn't want to see you any more."; - set $@hw2011_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 $@hw2011_npc_pachua, $@n; - set $@hw2011_npc_names$[$@n], "[Chief Pachua]"; - set $@hw2011_greetings$[$@n], "\"Ah, the strange custom the Government man told me about.\""; - set $@hw2011_trick_notscary$[$@n], "Look out! A scorpion!"; - set $@hw2011_react_notscary$[$@n], "\"Don't mind him, he won't hurt you. Er... so I give you sweets now, or what?\""; - set $@hw2011_trick_scary$[$@n], "Yes, the ritual giving of treats... LOTS of treats... or else!"; - set $@hw2011_react_scary$[$@n], "\"Alright, here you go.\""; - set $@hw2011_trick_veryscary$[$@n], "Yes, the ritual giving of treats followed by the sacrifice of the treat-giver..."; - set $@hw2011_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 $@hw2011_npc_tathin, $@n; - set $@hw2011_npc_names$[$@n], "[Tathin]"; - set $@hw2011_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 $@hw2011_trick_notscary$[$@n], "Of course I will... not!"; - set $@hw2011_react_notscary$[$@n], "\"Hm!\""; - set $@hw2011_trick_scary$[$@n], "Regulations, smegulations. The Tonori Government can go suck a lollipop for all I care!"; - set $@hw2011_react_scary$[$@n], "\"!? How dare you - oh, that was your trick! You did have me worried for a moment...\""; - set $@hw2011_trick_veryscary$[$@n], "What regulations?"; - set $@hw2011_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 $@hw2011_npc_vincent, $@n; - set $@hw2011_npc_names$[$@n], "[Vincent]"; - set $@hw2011_greetings$[$@n], "\"Ooh, okay! Trick away!\""; - set $@hw2011_trick_notscary$[$@n], "Look out! A scorpion!"; - set $@hw2011_react_notscary$[$@n], "\"They're everywhere in this desert! Don't worry about them.\""; - set $@hw2011_trick_scary$[$@n], "Hey, that action figure you're building just CAME TO LIFE!"; - set $@hw2011_react_scary$[$@n], "\"Really? Cool! Where? What? You were tricking me? WAAAH!\""; - set $@hw2011_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 $@hw2011_react_veryscary$[$@n], "\"My Bug Leg action figure! You broke it!\""; - - set $@n, $@n + 1; - - set $@hw2011_npc_weellos, $@n; - set $@hw2011_npc_names$[$@n], "[Weellos]"; - set $@hw2011_greetings$[$@n], "\"Trick me, then!\""; - set $@hw2011_trick_notscary$[$@n], "Look out! A scorpion!"; - set $@hw2011_react_notscary$[$@n], "\"Pesky things, I know, but they're everywhere around here...\""; - set $@hw2011_trick_scary$[$@n], "Actually, it's a fake. It was built just ten years ago."; - set $@hw2011_react_scary$[$@n], "\"No! But I've read all the accounts... oh, haha! Very funny!\""; - set $@hw2011_trick_veryscary$[$@n], "They say the earthquake ruined the foundations of this building, and that it's going to fall down."; - set $@hw2011_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 $@hw2011_npc_zack, $@n; - set $@hw2011_npc_names$[$@n], "[Zack]"; - set $@hw2011_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 $@hw2011_trick_notscary$[$@n], "You think this is something to do with Hallowe'en? Hands up!"; - set $@hw2011_react_notscary$[$@n], "\"Heh... That was ok.\""; - set $@hw2011_trick_scary$[$@n], "And now that I've found you, you die!"; - set $@hw2011_react_scary$[$@n], "\"Aah! What did I do? Oh - wait - I see! That was a good one!\""; - set $@hw2011_trick_veryscary$[$@n], "Yes, I have found you. After all these years."; - set $@hw2011_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 $@hw2011_num_npcs, $@n + 1; - set $@hw2011_all_npc_bits, 0xFFFFFFFF << (32 - $@hw2011_num_npcs); - - set $@n, 0; -} diff --git a/world/map/npc/halloween/2011/trick_or_treat.txt b/world/map/npc/halloween/2011/trick_or_treat.txt deleted file mode 100644 index 1b502d65..00000000 --- a/world/map/npc/halloween/2011/trick_or_treat.txt +++ /dev/null @@ -1,251 +0,0 @@ -// Halloween 2011 -// Authors: alastrim, enchilado, o11c -// This is a function that implements the whole quest (or at least stage 1) -// Note: this function doesn't usually return - -// In the appropriate NPCs, do something like: -//+ set @hw2011_npc_id, $@hw2011_npc_vincent; -//+ if (gettime(7) == $@hw2011_year && gettime(6) == 10 && gettime(5) >= $@hw2011_start_day) -//+ callfunc "TrickOrTreat2011"; -// Later note: it turns out that callfunc in an "if" is actually illegal. - -// Variables: -// $@hw2011_maskmemory = Sliced Array containing the record of the last masks used to trick or treat each NPC. -// @hw2011_npc_id = NPC id, this variable is set when calling this function by an NPC -// hw2011 = 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. - -function|script|TrickOrTreat2011|{ - if ((gettimetick(2)-TUT_var < 7*86400) || (BaseLevel < $@hw2011_min_level)) //player must be created at least 1 weeks ago - goto L_QuickReturn; - menu - "Trick or Treat", -, - "[Go to normal NPC dialog]", L_QuickReturn; - - set @mask, getequipid(equip_head); - if (@mask == 647) - menu - "Reset my quest state", L_ResetMe, - "Reset this NPC's mask memory", L_ResetMask, - "Just do the quest", -; -L_Begin: - set @karma, hw2011 & 0xffff; - // must be early to handle all the one-off mes;s in the init stuff - mes $@hw2011_npc_names$[@hw2011_npc_id]; - - if (@mask == -1) - goto L_NoMask; - - // set the scare factor of the equipped mask - set @mask_index, 0; - set @scare_factor, 1; -L_MaskLoop: - if ($@hw2011_mask_IDs[@mask_index] == @mask) - goto L_FoundMask; - set @mask_index, @mask_index + 1; - if ($@hw2011_mask_IDs[@mask_index]) - goto L_MaskLoop; - // not a mask in the list - set @mask, 0; - goto L_MaskDone; - -L_FoundMask: - set @scare_factor, $@hw2011_scare_factors[@mask_index]; - if (@mask != 616) - goto L_MaskDone; - mes "\"Aaargh... Gross! This is sick! I can't even look at your face...\""; - // I would have done this instead of having the dialog explain - //set @mask, 0; -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 -L_MaskMemoryCheck: - set @tmp, $@hw2011_maskmemory[8 * @hw2011_npc_id + @loop]; - if (!@tmp) - goto L_MaskMemoryNo; - if (@tmp == @mask) - goto L_MaskMemoryYes; - set @loop, @loop + 1; - if (@loop != $@hw2011_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; -L_Count_Sweets: - if ($@hw2011_sweets$[@loop] == "") - goto L_Check_Inventory; - if (countitem($@hw2011_sweets$[@loop])) - set @sweets_types, @sweets_types + 1; - set @loop, @loop + 1; - goto L_Count_Sweets; - -L_Check_Inventory: - getinventorylist; - if (@inventorylist_count + (@loop - @hw2011_invy) > 100) - goto L_Full_Inventory; - - if (@mask) - goto L_Check_Karma; - // check if the player's face is remembered - if (hw2011 & (0x1 << (31 - @hw2011_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($@hw2011_num_npcs, 0xffff) <= @karma) - goto L_Cheater; - // this is a cheap, limited form of ilog2 - if ((@karma >= 0x10) && !(rand( 4 - (@karma >= 0x40) + (@karma >= 0x100) + (@karma >= 0x400) ))) - goto L_Cheater; - if (hw2011 & $@hw2011_got_big_reward) - goto L_Tricking_Trick_or_Treat; - // assert: @karma < $@hw2011_num_npcs - if (rand($@hw2011_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 $@hw2011_big_reward$, 1; - set hw2011, hw2011 | $@hw2011_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 != 0xFFFF) - set hw2011, hw2011 + 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 $@hw2011_npc_names$[@hw2011_npc_id]; - mes $@hw2011_greetings$[@hw2011_npc_id]; - next; - // TODO: should we randomize these? (in a subsequent commit) - menu - $@hw2011_trick_notscary$[@hw2011_npc_id], L_Tricking_Notscary, - $@hw2011_trick_scary$[@hw2011_npc_id], L_Tricking_Scary, - $@hw2011_trick_veryscary$[@hw2011_npc_id], L_Tricking_Veryscary; - -L_Tricking_Notscary: - mes $@hw2011_npc_names$[@hw2011_npc_id]; - mes $@hw2011_react_notscary$[@hw2011_npc_id]; - goto L_Tricking_Reward; - -L_Tricking_Scary: - mes $@hw2011_npc_names$[@hw2011_npc_id]; - mes $@hw2011_react_scary$[@hw2011_npc_id]; - set @scare_factor, @scare_factor * 2; - goto L_Tricking_Reward; - -L_Tricking_Veryscary: - mes $@hw2011_npc_names$[@hw2011_npc_id]; - mes $@hw2011_react_veryscary$[@hw2011_npc_id]; - set @scare_factor, @scare_factor * 3; - goto L_Tricking_Reward; - -L_Tricking_Reward: - next; - if (@karma >= 0x10) - set @scare_factor, rand(@scare_factor / 2, @scare_factor); - if (@karma >= 0x100) - set @scare_factor, rand(@scare_factor / 2, @scare_factor); - if (@karma >= 0x1000) - set @scare_factor, rand(@scare_factor / 2, @scare_factor); - if (@scare_factor < 1) - set @scare_factor, 1; -L_Tricking_Reward_Loop: - if (!@scare_factor) - goto L_Tricking_End; - // NOTE: it gives out one piece at a time, but can loop several times - getitem $@hw2011_sweets$[rand($@hw2011_sweets_num)], 1; - - set @scare_factor, @scare_factor - 1; - goto L_Tricking_Reward_Loop; -L_SetRememberFace: - set hw2011, hw2011 | (0x1 << (31 - @hw2011_npc_id)); - goto L_Close; - -L_Tricking_End: - mes $@hw2011_npc_names$[@hw2011_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; -L_SetRememberMask: - set $@hw2011_maskmemory[8 * @hw2011_npc_id + @loop], $@hw2011_maskmemory[8 * @hw2011_npc_id + @loop - 1]; - set @loop, @loop - 1; - if (@loop) - goto L_SetRememberMask; - set $@hw2011_maskmemory[8 * @hw2011_npc_id], @mask; - set hw2011, hw2011 + 1; - goto L_Close; - -L_Full_Inventory: - mes $@hw2011_npc_names$[@hw2011_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_ScaryFace: - mes "\"Eeeeeeeeeeeeeeeeeeeeeeeeeeekkkkkkkkkkkkkkkkk!!!\""; - mes "\"Oh, that's your face ...\""; - next; - set @mask, 0; - set @scarefactor, 2 + rand(3); - goto L_MaskDone; - -L_NoMask: - // TODO: are there any other players to make fun of? - if (getcharid(3) == 2160466 || getcharid(3) == 2177906 || getcharid(3) == 2157647) - goto L_ScaryFace; - mes $@hw2011_npc_names$[@hw2011_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 @hw2011_npc_id, 0; - close; - -L_QuickReturn: - set @hw2011_npc_id, 0; - return; - -L_ResetMe: - set hw2011, 0; - goto L_Close; - -L_ResetMask: - // the rest will be implicitly cleared - set $@hw2011_maskmemory[8 * @hw2011_npc_id], 0; - goto L_Close; -} diff --git a/world/map/npc/scripts.conf b/world/map/npc/scripts.conf index 986dcbab..2c8538af 100644 --- a/world/map/npc/scripts.conf +++ b/world/map/npc/scripts.conf @@ -33,77 +33,6 @@ npc: npc/items/unequipcb.txt npc: npc/items/launcher_ammo.txt import: npc/_import.txt -// Christmas 2006 -// npc: npc/xmas/2006/xmas1.txt -// npc: npc/xmas/2006/xmas2.txt -// npc: npc/xmas/2006/xmas3.txt -// npc: npc/xmas/2006/xmas4.txt -// npc: npc/xmas/2006/xmas5.txt -// npc: npc/xmas/2006/xmas6.txt -// npc: npc/xmas/2006/xmas7.txt -// npc: npc/xmas/2006/xmas8.txt -// npc: npc/xmas/2006/xmas9.txt -// npc: npc/xmas/2006/xmas10.txt -// npc: npc/xmas/2006/xmas11.txt -// npc: npc/xmas/2006/xmas12.txt -// npc: npc/xmas/2006/xmas13.txt -// npc: npc/xmas/2006/xmas14.txt -// npc: npc/xmas/2006/xmas15.txt -// npc: npc/xmas/2006/xmas16.txt -// npc: npc/xmas/2006/xmas17.txt -// npc: npc/xmas/2006/xmas18.txt -// npc: npc/xmas/2006/xmas19.txt -// npc: npc/xmas/2006/xmas20.txt - -// Halloween 2007 -// npc: npc/halloween/2007/monsters.txt -// npc: npc/halloween/2007/summon.txt - -// Christmas 2007 -// npc: npc/xmas/2007/pre-xmas.txt -// npc: npc/xmas/2007/after-xmas.txt - -// Easter 2008 -// npc: npc/easter/2008/monsters.txt -// npc: npc/easter/2008/npc.txt - -// Halloween 2008 -// npc: npc/halloween/2008/monsters.txt -// npc: npc/halloween/2008/prize_master.txt - -// Christmas 2008 -// npc: npc/xmas/2008/event.txt - -// Halloween 2009 -// npc: npc/halloween/2009/Candyman.txt - -// Christmas 2009 -// npc: npc/xmas/2009/event.txt - -// Easter 2010 -// When enabling, some entries in 028-1 would also need to be uncommented, the warp from 028-1 would need to be commented out. The changes to the old woman and some other NPCs weren't able to be preserved, but are recorded in the git repository. -//import: npc/easter/2010/_import.txt - -// Halloween 2010 -// npc: npc/halloween/2010/gak.txt - -// import: npc/xmas/2010/_import.txt - -// it's probably safe to just leave NPCs as-is when disabling -// this is a pretty well-behaved quest -// of course, we haven't written a part 2 yet -// There has been some discussion about making this an annual quest, -// although there would need to be more work for that. -import: npc/halloween/2011/_import.txt - -// Christmas 2011 -// import: npc/xmas/2011/_import.txt - -// Easter 2012 -// import: npc/easter/2012/_import.txt - -// Christmas 2012 -// import: npc/xmas/2012/_import.txt npc: npc/annuals/fathertime.txt // Annual Christmas npc: npc/annuals/xmas/config.txt diff --git a/world/map/npc/xmas/2006/xmas1.txt b/world/map/npc/xmas/2006/xmas1.txt deleted file mode 100644 index be44a482..00000000 --- a/world/map/npc/xmas/2006/xmas1.txt +++ /dev/null @@ -1,246 +0,0 @@ -002-2.gat,41,60,0 script Xmas1 105,{ - if(XMASQUEST1 == 1) goto L_only_once; - mes "[Helper Santa]"; - mes "It's Christmas."; - mes "The time for gifts and family reunions"; - next; - - mes "[Helper Santa]"; - mes "You get a gift from me."; - mes "The kind will depend on whether"; - mes "you've been nice or naughty."; - next; - - menu "Want one?",L_nicenaughty,"No thanks.",L_no; - -L_nicenaughty: - set XMASQUEST1,1; - mes "[Helper Santa]"; - mes "In my book you're marked as..."; - next; - set @TEMP,rand(9); - if(@TEMP == 6) goto L_naughty; - goto L_nice; - -L_nice: - mes "[Helper Santa]"; - mes "...nice!"; - set @TEMP,rand(17); - next; - if(@TEMP == 0) goto L_nice_0; - if(@TEMP == 1) goto L_nice_1; - if(@TEMP == 2) goto L_nice_2; - if(@TEMP == 3) goto L_nice_3; - if(@TEMP == 4) goto L_nice_4; - if(@TEMP == 5) goto L_nice_5; - if(@TEMP == 6) goto L_nice_6; - if(@TEMP == 7) goto L_nice_7; - if(@TEMP == 8) goto L_nice_8; - if(@TEMP == 9) goto L_nice_9; - if(@TEMP == 10) goto L_nice_10; - if(@TEMP == 11) goto L_nice_11; - if(@TEMP == 12) goto L_nice_12; - if(@TEMP == 13) goto L_nice_13; - if(@TEMP == 14) goto L_nice_14; - if(@TEMP == 15) goto L_nice_15; - if(@TEMP == 16) goto L_nice_16; - if(@TEMP == 17) goto L_nice_17; - -L_naughty: - mes "[Helper Santa]"; - mes "...naughty!"; - set @TEMP,rand(6); - next; - if(@TEMP == 0) goto L_naughty_0; - if(@TEMP == 1) goto L_naughty_1; - if(@TEMP == 2) goto L_naughty_2; - if(@TEMP == 3) goto L_naughty_3; - if(@TEMP == 4) goto L_naughty_4; - if(@TEMP == 5) goto L_naughty_5; - if(@TEMP == 6) goto L_naughty_6; - -L_naughty_0: - mes "[Helper Santa]"; - mes "Ho ho ho!"; - mes "I borrowed some of your money for"; - mes "my present budget this year."; - set Zeny,Zeny-rand(500,1500); - close; - -L_naughty_1: - mes "[Helper Santa]"; - mes "You will get a spanking"; - next; - mes "[Helper Santa]"; - mes "Remember to be nice to people!"; - gmcommand "@die "; - close; - -L_naughty_2: - mes "[Helper Santa]"; - mes "But I won't mind!"; - mes "Have a char reset as a present." - next; - mes "[Helper Santa]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_naughty_3: - mes "[Helper Santa]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Helper Santa]"; - mes "Merry Christmas!"; - close; - -L_naughty_4: - mes "[Helper Santa]"; - mes "Your sex will now change!"; - mes "You always get naughty things for naughty things."; - mes "It's karma!"; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_naughty_5: - mes "[Helper Santa]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Helper Santa]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_naughty_6: - mes "[Helper Santa]"; - mes "I'll diss you around the server."; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@kami "+strcharinfo(0)+" is not in the holiday mood."; - close; - -L_nice_0: - mes "[Helper Santa]"; - mes "So you wanted money?."; - set Zeny,Zeny+rand(1,1000000); - close; - -L_nice_1: - mes "[Helper Santa]"; - mes "These hats are really hot now!"; - getitem "ChristmasTreeHat",1; - close; - -L_nice_2: - mes "[Helper Santa]"; - mes "Axe Hats are always on the cutting edge!"; - getitem "AxeHat",1; - close; - -L_nice_3: - mes "[Helper Santa]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_nice_4: - mes "[Helper Santa]"; - mes "Now you can Goggle all you want."; - getitem "Goggles",1; - close; - -L_nice_5: - mes "[Helper Santa]"; - mes "Let's Goggle all night long!"; - getitem "LeatherGoggles",1; - close; - -L_nice_6: - mes "[Helper Santa]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_nice_7: - mes "[Helper Santa]"; - mes "This patch is not an eyesore."; - getitem "Eyepatch",1; - close; - -L_nice_8: - mes "[Helper Santa]"; - mes "Bandana time!"; - getitem "Bandana",1; - close; - -L_nice_9: - mes "[Helper Santa]"; - mes "5000 exp!"; - getexp 5000,0; - close; - -L_nice_10: - mes "[Helper Santa]"; - mes "Soft packages are always nice."; - getitem "CottonShirt",1; - close; - -L_nice_11: - mes "[Helper Santa]"; - mes "Chuck Norris style!"; - getitem "RangerHat",1; - close; - -L_nice_12: - mes "[Helper Santa]"; - mes "Even Rudolph would be envious now."; - getitem "AntlerHat",1; - close; - -L_nice_13: - mes "[Helper Santa]"; - mes "Now you can become a Santa too!"; - getitem "SantaBeardHat",1; - close; - -L_nice_14: - mes "[Helper Santa]"; - mes "Now you can became a Santa too!"; - getitem "SantaHat",1; - close; - -L_nice_15: - mes "[Helper Santa]"; - mes "These gloves should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_nice_16: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "VNeckSweater",1; - close; - -L_nice_17: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_only_once: - mes "[Helper Santa]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Helper Santa]"; - mes "You're not in the Christmas spirit?"; - mes "I hope you get into this gift extravaganza soon."; - close; -} diff --git a/world/map/npc/xmas/2006/xmas10.txt b/world/map/npc/xmas/2006/xmas10.txt deleted file mode 100644 index e1c614c7..00000000 --- a/world/map/npc/xmas/2006/xmas10.txt +++ /dev/null @@ -1,243 +0,0 @@ -002-3.gat,57,64,0 script Xmas10 105,{ - if(XMASQUEST10 == 1) goto L_only_once; - mes "[Helper Santa]"; - mes "It's Christmas. The time for gifts and family reunions"; - next; - - mes "[Helper Santa]"; - mes "You get a gift from me. The kind will depend on whether you've been nice or naughty."; - next; - - menu "Want one?",L_nicenaughty,"No thanks.",L_no; - -L_nicenaughty: - set XMASQUEST10,1; - mes "[Helper Santa]"; - mes "In my book you're marked as..."; - next; - set @TEMP,rand(9); - if(@TEMP == 6) goto L_naughty; - goto L_nice; - -L_nice: - mes "[Helper Santa]"; - mes "...nice!"; - set @TEMP,rand(17); - next; - if(@TEMP == 0) goto L_nice_0; - if(@TEMP == 1) goto L_nice_1; - if(@TEMP == 2) goto L_nice_2; - if(@TEMP == 3) goto L_nice_3; - if(@TEMP == 4) goto L_nice_4; - if(@TEMP == 5) goto L_nice_5; - if(@TEMP == 6) goto L_nice_6; - if(@TEMP == 7) goto L_nice_7; - if(@TEMP == 8) goto L_nice_8; - if(@TEMP == 9) goto L_nice_9; - if(@TEMP == 10) goto L_nice_10; - if(@TEMP == 11) goto L_nice_11; - if(@TEMP == 12) goto L_nice_12; - if(@TEMP == 13) goto L_nice_13; - if(@TEMP == 14) goto L_nice_14; - if(@TEMP == 15) goto L_nice_15; - if(@TEMP == 16) goto L_nice_16; - if(@TEMP == 17) goto L_nice_17; - -L_naughty: - mes "[Helper Santa]"; - mes "...naughty!"; - set @TEMP,rand(6); - next; - if(@TEMP == 0) goto L_naughty_0; - if(@TEMP == 1) goto L_naughty_1; - if(@TEMP == 2) goto L_naughty_2; - if(@TEMP == 3) goto L_naughty_3; - if(@TEMP == 4) goto L_naughty_4; - if(@TEMP == 5) goto L_naughty_5; - if(@TEMP == 6) goto L_naughty_6; - -L_naughty_0: - mes "[Helper Santa]"; - mes "Ho ho ho!"; - mes "I borrowed some of your money for"; - mes "my present budget this year."; - set Zeny,Zeny-rand(500,1500); - close; - -L_naughty_1: - mes "[Helper Santa]"; - mes "You will get a spanking"; - next; - mes "[Helper Santa]"; - mes "Remember to be nice to people!"; - gmcommand "@die "; - close; - -L_naughty_2: - mes "[Helper Santa]"; - mes "But I won't mind!"; - mes "Have a char reset as a present." - next; - mes "[Helper Santa]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_naughty_3: - mes "[Helper Santa]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Helper Santa]"; - mes "Merry Christmas!"; - close; - -L_naughty_4: - mes "[Helper Santa]"; - mes "Your sex will now change!"; - mes "You always get naughty things for naughty things."; - mes "It's karma!"; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_naughty_5: - mes "[Helper Santa]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Helper Santa]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_naughty_6: - mes "[Helper Santa]"; - mes "I'll diss you around the server."; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@kami "+strcharinfo(0)+" is not in the holiday mood."; - close; - -L_nice_0: - mes "[Helper Santa]"; - mes "So you wanted money?."; - set Zeny,Zeny+rand(1,1000000); - close; - -L_nice_1: - mes "[Helper Santa]"; - mes "These hats are really hot now!"; - getitem "ChristmasTreeHat",1; - close; - -L_nice_2: - mes "[Helper Santa]"; - mes "Axe Hats are always on the cutting edge!"; - getitem "AxeHat",1; - close; - -L_nice_3: - mes "[Helper Santa]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_nice_4: - mes "[Helper Santa]"; - mes "Now you can Goggle all you want."; - getitem "Goggles",1; - close; - -L_nice_5: - mes "[Helper Santa]"; - mes "Let's Goggle all night long!"; - getitem "LeatherGoggles",1; - close; - -L_nice_6: - mes "[Helper Santa]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_nice_7: - mes "[Helper Santa]"; - mes "This patch is not an eyesore."; - getitem "Eyepatch",1; - close; - -L_nice_8: - mes "[Helper Santa]"; - mes "Bandana time!"; - getitem "Bandana",1; - close; - -L_nice_9: - mes "[Helper Santa]"; - mes "5000 exp!"; - getexp 5000,0; - close; - -L_nice_10: - mes "[Helper Santa]"; - mes "Soft packages are always nice."; - getitem "CottonShirt",1; - close; - -L_nice_11: - mes "[Helper Santa]"; - mes "Chuck Norris style!"; - getitem "RangerHat",1; - close; - -L_nice_12: - mes "[Helper Santa]"; - mes "Even Rudolph would be envious now."; - getitem "AntlerHat",1; - close; - -L_nice_13: - mes "[Helper Santa]"; - mes "Now you can become a Santa too!"; - getitem "SantaBeardHat",1; - close; - -L_nice_14: - mes "[Helper Santa]"; - mes "Now you can became a Santa too!"; - getitem "SantaHat",1; - close; - -L_nice_15: - mes "[Helper Santa]"; - mes "These gloves should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_nice_16: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "VNeckSweater",1; - close; - -L_nice_17: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_only_once: - mes "[Helper Santa]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Helper Santa]"; - mes "You're not in the Christmas spirit?"; - mes "I hope you get into this gift extravaganza soon."; - close; -} diff --git a/world/map/npc/xmas/2006/xmas11.txt b/world/map/npc/xmas/2006/xmas11.txt deleted file mode 100644 index d995798f..00000000 --- a/world/map/npc/xmas/2006/xmas11.txt +++ /dev/null @@ -1,246 +0,0 @@ -001-1.gat,73,51,0 script Xmas11 105,{ - if(XMASQUEST11 == 1) goto L_only_once; - mes "[Helper Santa]"; - mes "It's Christmas."; - mes "The time for gifts and family reunions"; - next; - - mes "[Helper Santa]"; - mes "You get a gift from me."; - mes "The kind will depend on whether"; - mes "you've been nice or naughty."; - next; - - menu "Want one?",L_nicenaughty,"No thanks.",L_no; - -L_nicenaughty: - set XMASQUEST11,1; - mes "[Helper Santa]"; - mes "In my book you're marked as..."; - next; - set @TEMP,rand(9); - if(@TEMP == 6) goto L_naughty; - goto L_nice; - -L_nice: - mes "[Helper Santa]"; - mes "...nice!"; - set @TEMP,rand(17); - next; - if(@TEMP == 0) goto L_nice_0; - if(@TEMP == 1) goto L_nice_1; - if(@TEMP == 2) goto L_nice_2; - if(@TEMP == 3) goto L_nice_3; - if(@TEMP == 4) goto L_nice_4; - if(@TEMP == 5) goto L_nice_5; - if(@TEMP == 6) goto L_nice_6; - if(@TEMP == 7) goto L_nice_7; - if(@TEMP == 8) goto L_nice_8; - if(@TEMP == 9) goto L_nice_9; - if(@TEMP == 10) goto L_nice_10; - if(@TEMP == 11) goto L_nice_11; - if(@TEMP == 12) goto L_nice_12; - if(@TEMP == 13) goto L_nice_13; - if(@TEMP == 14) goto L_nice_14; - if(@TEMP == 15) goto L_nice_15; - if(@TEMP == 16) goto L_nice_16; - if(@TEMP == 17) goto L_nice_17; - -L_naughty: - mes "[Helper Santa]"; - mes "...naughty!"; - set @TEMP,rand(6); - next; - if(@TEMP == 0) goto L_naughty_0; - if(@TEMP == 1) goto L_naughty_1; - if(@TEMP == 2) goto L_naughty_2; - if(@TEMP == 3) goto L_naughty_3; - if(@TEMP == 4) goto L_naughty_4; - if(@TEMP == 5) goto L_naughty_5; - if(@TEMP == 6) goto L_naughty_6; - -L_naughty_0: - mes "[Helper Santa]"; - mes "Ho ho ho!"; - mes "I borrowed some of your money for"; - mes "my present budget this year."; - set Zeny,Zeny-rand(500,1500); - close; - -L_naughty_1: - mes "[Helper Santa]"; - mes "You will get a spanking"; - next; - mes "[Helper Santa]"; - mes "Remember to be nice to people!"; - gmcommand "@die "; - close; - -L_naughty_2: - mes "[Helper Santa]"; - mes "But I won't mind!"; - mes "Have a char reset as a present." - next; - mes "[Helper Santa]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_naughty_3: - mes "[Helper Santa]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Helper Santa]"; - mes "Merry Christmas!"; - close; - -L_naughty_4: - mes "[Helper Santa]"; - mes "Your sex will now change!"; - mes "You always get naughty things for naughty things."; - mes "It's karma!"; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_naughty_5: - mes "[Helper Santa]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Helper Santa]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_naughty_6: - mes "[Helper Santa]"; - mes "I'll diss you around the server."; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@kami "+strcharinfo(0)+" is not in the holiday mood."; - close; - -L_nice_0: - mes "[Helper Santa]"; - mes "So you wanted money?."; - set Zeny,Zeny+rand(1,1000000); - close; - -L_nice_1: - mes "[Helper Santa]"; - mes "These hats are really hot now!"; - getitem "ChristmasTreeHat",1; - close; - -L_nice_2: - mes "[Helper Santa]"; - mes "Axe Hats are always on the cutting edge!"; - getitem "AxeHat",1; - close; - -L_nice_3: - mes "[Helper Santa]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_nice_4: - mes "[Helper Santa]"; - mes "Now you can Goggle all you want."; - getitem "Goggles",1; - close; - -L_nice_5: - mes "[Helper Santa]"; - mes "Let's Goggle all night long!"; - getitem "LeatherGoggles",1; - close; - -L_nice_6: - mes "[Helper Santa]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_nice_7: - mes "[Helper Santa]"; - mes "This patch is not an eyesore."; - getitem "Eyepatch",1; - close; - -L_nice_8: - mes "[Helper Santa]"; - mes "Bandana time!"; - getitem "Bandana",1; - close; - -L_nice_9: - mes "[Helper Santa]"; - mes "5000 exp!"; - getexp 5000,0; - close; - -L_nice_10: - mes "[Helper Santa]"; - mes "Soft packages are always nice."; - getitem "CottonShirt",1; - close; - -L_nice_11: - mes "[Helper Santa]"; - mes "Chuck Norris style!"; - getitem "RangerHat",1; - close; - -L_nice_12: - mes "[Helper Santa]"; - mes "Even Rudolph would be envious now."; - getitem "AntlerHat",1; - close; - -L_nice_13: - mes "[Helper Santa]"; - mes "Now you can become a Santa too!"; - getitem "SantaBeardHat",1; - close; - -L_nice_14: - mes "[Helper Santa]"; - mes "Now you can became a Santa too!"; - getitem "SantaHat",1; - close; - -L_nice_15: - mes "[Helper Santa]"; - mes "These gloves should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_nice_16: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "VNeckSweater",1; - close; - -L_nice_17: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_only_once: - mes "[Helper Santa]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Helper Santa]"; - mes "You're not in the Christmas spirit?"; - mes "I hope you get into this gift extravaganza soon."; - close; -} diff --git a/world/map/npc/xmas/2006/xmas12.txt b/world/map/npc/xmas/2006/xmas12.txt deleted file mode 100644 index 8162d41d..00000000 --- a/world/map/npc/xmas/2006/xmas12.txt +++ /dev/null @@ -1,246 +0,0 @@ -011-3.gat,26,51,0 script Xmas12 105,{ - if(XMASQUEST12 == 1) goto L_only_once; - mes "[Helper Santa]"; - mes "It's Christmas."; - mes "The time for gifts and family reunions"; - next; - - mes "[Helper Santa]"; - mes "You get a gift from me."; - mes "The kind will depend on whether"; - mes "you've been nice or naughty."; - next; - - menu "Want one?",L_nicenaughty,"No thanks.",L_no; - -L_nicenaughty: - set XMASQUEST12,1; - mes "[Helper Santa]"; - mes "In my book you're marked as..."; - next; - set @TEMP,rand(9); - if(@TEMP == 6) goto L_naughty; - goto L_nice; - -L_nice: - mes "[Helper Santa]"; - mes "...nice!"; - set @TEMP,rand(17); - next; - if(@TEMP == 0) goto L_nice_0; - if(@TEMP == 1) goto L_nice_1; - if(@TEMP == 2) goto L_nice_2; - if(@TEMP == 3) goto L_nice_3; - if(@TEMP == 4) goto L_nice_4; - if(@TEMP == 5) goto L_nice_5; - if(@TEMP == 6) goto L_nice_6; - if(@TEMP == 7) goto L_nice_7; - if(@TEMP == 8) goto L_nice_8; - if(@TEMP == 9) goto L_nice_9; - if(@TEMP == 10) goto L_nice_10; - if(@TEMP == 11) goto L_nice_11; - if(@TEMP == 12) goto L_nice_12; - if(@TEMP == 13) goto L_nice_13; - if(@TEMP == 14) goto L_nice_14; - if(@TEMP == 15) goto L_nice_15; - if(@TEMP == 16) goto L_nice_16; - if(@TEMP == 17) goto L_nice_17; - -L_naughty: - mes "[Helper Santa]"; - mes "...naughty!"; - set @TEMP,rand(6); - next; - if(@TEMP == 0) goto L_naughty_0; - if(@TEMP == 1) goto L_naughty_1; - if(@TEMP == 2) goto L_naughty_2; - if(@TEMP == 3) goto L_naughty_3; - if(@TEMP == 4) goto L_naughty_4; - if(@TEMP == 5) goto L_naughty_5; - if(@TEMP == 6) goto L_naughty_6; - -L_naughty_0: - mes "[Helper Santa]"; - mes "Ho ho ho!"; - mes "I borrowed some of your money for"; - mes "my present budget this year."; - set Zeny,Zeny-rand(500,1500); - close; - -L_naughty_1: - mes "[Helper Santa]"; - mes "You will get a spanking"; - next; - mes "[Helper Santa]"; - mes "Remember to be nice to people!"; - gmcommand "@die "; - close; - -L_naughty_2: - mes "[Helper Santa]"; - mes "But I won't mind!"; - mes "Have a char reset as a present." - next; - mes "[Helper Santa]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_naughty_3: - mes "[Helper Santa]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Helper Santa]"; - mes "Merry Christmas!"; - close; - -L_naughty_4: - mes "[Helper Santa]"; - mes "Your sex will now change!"; - mes "You always get naughty things for naughty things."; - mes "It's karma!"; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_naughty_5: - mes "[Helper Santa]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Helper Santa]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_naughty_6: - mes "[Helper Santa]"; - mes "I'll diss you around the server."; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@kami "+strcharinfo(0)+" is not in the holiday mood."; - close; - -L_nice_0: - mes "[Helper Santa]"; - mes "So you wanted money?."; - set Zeny,Zeny+rand(1,1000000); - close; - -L_nice_1: - mes "[Helper Santa]"; - mes "These hats are really hot now!"; - getitem "ChristmasTreeHat",1; - close; - -L_nice_2: - mes "[Helper Santa]"; - mes "Axe Hats are always on the cutting edge!"; - getitem "AxeHat",1; - close; - -L_nice_3: - mes "[Helper Santa]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_nice_4: - mes "[Helper Santa]"; - mes "Now you can Goggle all you want."; - getitem "Goggles",1; - close; - -L_nice_5: - mes "[Helper Santa]"; - mes "Let's Goggle all night long!"; - getitem "LeatherGoggles",1; - close; - -L_nice_6: - mes "[Helper Santa]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_nice_7: - mes "[Helper Santa]"; - mes "This patch is not an eyesore."; - getitem "Eyepatch",1; - close; - -L_nice_8: - mes "[Helper Santa]"; - mes "Bandana time!"; - getitem "Bandana",1; - close; - -L_nice_9: - mes "[Helper Santa]"; - mes "5000 exp!"; - getexp 5000,0; - close; - -L_nice_10: - mes "[Helper Santa]"; - mes "Soft packages are always nice."; - getitem "CottonShirt",1; - close; - -L_nice_11: - mes "[Helper Santa]"; - mes "Chuck Norris style!"; - getitem "RangerHat",1; - close; - -L_nice_12: - mes "[Helper Santa]"; - mes "Even Rudolph would be envious now."; - getitem "AntlerHat",1; - close; - -L_nice_13: - mes "[Helper Santa]"; - mes "Now you can become a Santa too!"; - getitem "SantaBeardHat",1; - close; - -L_nice_14: - mes "[Helper Santa]"; - mes "Now you can became a Santa too!"; - getitem "SantaHat",1; - close; - -L_nice_15: - mes "[Helper Santa]"; - mes "These gloves should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_nice_16: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "VNeckSweater",1; - close; - -L_nice_17: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_only_once: - mes "[Helper Santa]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Helper Santa]"; - mes "You're not in the Christmas spirit?"; - mes "I hope you get into this gift extravaganza soon."; - close; -} diff --git a/world/map/npc/xmas/2006/xmas13.txt b/world/map/npc/xmas/2006/xmas13.txt deleted file mode 100644 index 479e11c2..00000000 --- a/world/map/npc/xmas/2006/xmas13.txt +++ /dev/null @@ -1,246 +0,0 @@ -002-4.gat,68,95,0 script Xmas13 105,{ - if(XMASQUEST13 == 1) goto L_only_once; - mes "[Helper Santa]"; - mes "It's Christmas."; - mes "The time for gifts and family reunions"; - next; - - mes "[Helper Santa]"; - mes "You get a gift from me."; - mes "The kind will depend on whether"; - mes "you've been nice or naughty."; - next; - - menu "Want one?",L_nicenaughty,"No thanks.",L_no; - -L_nicenaughty: - set XMASQUEST13,1; - mes "[Helper Santa]"; - mes "In my book you're marked as..."; - next; - set @TEMP,rand(9); - if(@TEMP == 6) goto L_naughty; - goto L_nice; - -L_nice: - mes "[Helper Santa]"; - mes "...nice!"; - set @TEMP,rand(17); - next; - if(@TEMP == 0) goto L_nice_0; - if(@TEMP == 1) goto L_nice_1; - if(@TEMP == 2) goto L_nice_2; - if(@TEMP == 3) goto L_nice_3; - if(@TEMP == 4) goto L_nice_4; - if(@TEMP == 5) goto L_nice_5; - if(@TEMP == 6) goto L_nice_6; - if(@TEMP == 7) goto L_nice_7; - if(@TEMP == 8) goto L_nice_8; - if(@TEMP == 9) goto L_nice_9; - if(@TEMP == 10) goto L_nice_10; - if(@TEMP == 11) goto L_nice_11; - if(@TEMP == 12) goto L_nice_12; - if(@TEMP == 13) goto L_nice_13; - if(@TEMP == 14) goto L_nice_14; - if(@TEMP == 15) goto L_nice_15; - if(@TEMP == 16) goto L_nice_16; - if(@TEMP == 17) goto L_nice_17; - -L_naughty: - mes "[Helper Santa]"; - mes "...naughty!"; - set @TEMP,rand(6); - next; - if(@TEMP == 0) goto L_naughty_0; - if(@TEMP == 1) goto L_naughty_1; - if(@TEMP == 2) goto L_naughty_2; - if(@TEMP == 3) goto L_naughty_3; - if(@TEMP == 4) goto L_naughty_4; - if(@TEMP == 5) goto L_naughty_5; - if(@TEMP == 6) goto L_naughty_6; - -L_naughty_0: - mes "[Helper Santa]"; - mes "Ho ho ho!"; - mes "I borrowed some of your money for"; - mes "my present budget this year."; - set Zeny,Zeny-rand(500,1500); - close; - -L_naughty_1: - mes "[Helper Santa]"; - mes "You will get a spanking"; - next; - mes "[Helper Santa]"; - mes "Remember to be nice to people!"; - gmcommand "@die "; - close; - -L_naughty_2: - mes "[Helper Santa]"; - mes "But I won't mind!"; - mes "Have a char reset as a present." - next; - mes "[Helper Santa]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_naughty_3: - mes "[Helper Santa]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Helper Santa]"; - mes "Merry Christmas!"; - close; - -L_naughty_4: - mes "[Helper Santa]"; - mes "Your sex will now change!"; - mes "You always get naughty things for naughty things."; - mes "It's karma!"; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_naughty_5: - mes "[Helper Santa]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Helper Santa]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_naughty_6: - mes "[Helper Santa]"; - mes "I'll diss you around the server."; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@kami "+strcharinfo(0)+" is not in the holiday mood."; - close; - -L_nice_0: - mes "[Helper Santa]"; - mes "So you wanted money?."; - set Zeny,Zeny+rand(1,1000000); - close; - -L_nice_1: - mes "[Helper Santa]"; - mes "These hats are really hot now!"; - getitem "ChristmasTreeHat",1; - close; - -L_nice_2: - mes "[Helper Santa]"; - mes "Axe Hats are always on the cutting edge!"; - getitem "AxeHat",1; - close; - -L_nice_3: - mes "[Helper Santa]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_nice_4: - mes "[Helper Santa]"; - mes "Now you can Goggle all you want."; - getitem "Goggles",1; - close; - -L_nice_5: - mes "[Helper Santa]"; - mes "Let's Goggle all night long!"; - getitem "LeatherGoggles",1; - close; - -L_nice_6: - mes "[Helper Santa]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_nice_7: - mes "[Helper Santa]"; - mes "This patch is not an eyesore."; - getitem "Eyepatch",1; - close; - -L_nice_8: - mes "[Helper Santa]"; - mes "Bandana time!"; - getitem "Bandana",1; - close; - -L_nice_9: - mes "[Helper Santa]"; - mes "5000 exp!"; - getexp 5000,0; - close; - -L_nice_10: - mes "[Helper Santa]"; - mes "Soft packages are always nice."; - getitem "CottonShirt",1; - close; - -L_nice_11: - mes "[Helper Santa]"; - mes "Chuck Norris style!"; - getitem "RangerHat",1; - close; - -L_nice_12: - mes "[Helper Santa]"; - mes "Even Rudolph would be envious now."; - getitem "AntlerHat",1; - close; - -L_nice_13: - mes "[Helper Santa]"; - mes "Now you can become a Santa too!"; - getitem "SantaBeardHat",1; - close; - -L_nice_14: - mes "[Helper Santa]"; - mes "Now you can became a Santa too!"; - getitem "SantaHat",1; - close; - -L_nice_15: - mes "[Helper Santa]"; - mes "These gloves should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_nice_16: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "VNeckSweater",1; - close; - -L_nice_17: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_only_once: - mes "[Helper Santa]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Helper Santa]"; - mes "You're not in the Christmas spirit?"; - mes "I hope you get into this gift extravaganza soon."; - close; -} diff --git a/world/map/npc/xmas/2006/xmas14.txt b/world/map/npc/xmas/2006/xmas14.txt deleted file mode 100644 index c538cd82..00000000 --- a/world/map/npc/xmas/2006/xmas14.txt +++ /dev/null @@ -1,246 +0,0 @@ -005-1.gat,46,46,0 script Xmas14 105,{ - if(XMASQUEST14 == 1) goto L_only_once; - mes "[Helper Santa]"; - mes "It's Christmas."; - mes "The time for gifts and family reunions"; - next; - - mes "[Helper Santa]"; - mes "You get a gift from me."; - mes "The kind will depend on whether"; - mes "you've been nice or naughty."; - next; - - menu "Want one?",L_nicenaughty,"No thanks.",L_no; - -L_nicenaughty: - set XMASQUEST14,1; - mes "[Helper Santa]"; - mes "In my book you're marked as..."; - next; - set @TEMP,rand(9); - if(@TEMP == 6) goto L_naughty; - goto L_nice; - -L_nice: - mes "[Helper Santa]"; - mes "...nice!"; - set @TEMP,rand(17); - next; - if(@TEMP == 0) goto L_nice_0; - if(@TEMP == 1) goto L_nice_1; - if(@TEMP == 2) goto L_nice_2; - if(@TEMP == 3) goto L_nice_3; - if(@TEMP == 4) goto L_nice_4; - if(@TEMP == 5) goto L_nice_5; - if(@TEMP == 6) goto L_nice_6; - if(@TEMP == 7) goto L_nice_7; - if(@TEMP == 8) goto L_nice_8; - if(@TEMP == 9) goto L_nice_9; - if(@TEMP == 10) goto L_nice_10; - if(@TEMP == 11) goto L_nice_11; - if(@TEMP == 12) goto L_nice_12; - if(@TEMP == 13) goto L_nice_13; - if(@TEMP == 14) goto L_nice_14; - if(@TEMP == 15) goto L_nice_15; - if(@TEMP == 16) goto L_nice_16; - if(@TEMP == 17) goto L_nice_17; - -L_naughty: - mes "[Helper Santa]"; - mes "...naughty!"; - set @TEMP,rand(6); - next; - if(@TEMP == 0) goto L_naughty_0; - if(@TEMP == 1) goto L_naughty_1; - if(@TEMP == 2) goto L_naughty_2; - if(@TEMP == 3) goto L_naughty_3; - if(@TEMP == 4) goto L_naughty_4; - if(@TEMP == 5) goto L_naughty_5; - if(@TEMP == 6) goto L_naughty_6; - -L_naughty_0: - mes "[Helper Santa]"; - mes "Ho ho ho!"; - mes "I borrowed some of your money for"; - mes "my present budget this year."; - set Zeny,Zeny-rand(500,1500); - close; - -L_naughty_1: - mes "[Helper Santa]"; - mes "You will get a spanking"; - next; - mes "[Helper Santa]"; - mes "Remember to be nice to people!"; - gmcommand "@die "; - close; - -L_naughty_2: - mes "[Helper Santa]"; - mes "But I won't mind!"; - mes "Have a char reset as a present." - next; - mes "[Helper Santa]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_naughty_3: - mes "[Helper Santa]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Helper Santa]"; - mes "Merry Christmas!"; - close; - -L_naughty_4: - mes "[Helper Santa]"; - mes "Your sex will now change!"; - mes "You always get naughty things for naughty things."; - mes "It's karma!"; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_naughty_5: - mes "[Helper Santa]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Helper Santa]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_naughty_6: - mes "[Helper Santa]"; - mes "I'll diss you around the server."; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@kami "+strcharinfo(0)+" is not in the holiday mood."; - close; - -L_nice_0: - mes "[Helper Santa]"; - mes "So you wanted money?."; - set Zeny,Zeny+rand(1,1000000); - close; - -L_nice_1: - mes "[Helper Santa]"; - mes "These hats are really hot now!"; - getitem "ChristmasTreeHat",1; - close; - -L_nice_2: - mes "[Helper Santa]"; - mes "Axe Hats are always on the cutting edge!"; - getitem "AxeHat",1; - close; - -L_nice_3: - mes "[Helper Santa]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_nice_4: - mes "[Helper Santa]"; - mes "Now you can Goggle all you want."; - getitem "Goggles",1; - close; - -L_nice_5: - mes "[Helper Santa]"; - mes "Let's Goggle all night long!"; - getitem "LeatherGoggles",1; - close; - -L_nice_6: - mes "[Helper Santa]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_nice_7: - mes "[Helper Santa]"; - mes "This patch is not an eyesore."; - getitem "Eyepatch",1; - close; - -L_nice_8: - mes "[Helper Santa]"; - mes "Bandana time!"; - getitem "Bandana",1; - close; - -L_nice_9: - mes "[Helper Santa]"; - mes "5000 exp!"; - getexp 5000,0; - close; - -L_nice_10: - mes "[Helper Santa]"; - mes "Soft packages are always nice."; - getitem "CottonShirt",1; - close; - -L_nice_11: - mes "[Helper Santa]"; - mes "Chuck Norris style!"; - getitem "RangerHat",1; - close; - -L_nice_12: - mes "[Helper Santa]"; - mes "Even Rudolph would be envious now."; - getitem "AntlerHat",1; - close; - -L_nice_13: - mes "[Helper Santa]"; - mes "Now you can become a Santa too!"; - getitem "SantaBeardHat",1; - close; - -L_nice_14: - mes "[Helper Santa]"; - mes "Now you can became a Santa too!"; - getitem "SantaHat",1; - close; - -L_nice_15: - mes "[Helper Santa]"; - mes "These gloves should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_nice_16: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "VNeckSweater",1; - close; - -L_nice_17: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_only_once: - mes "[Helper Santa]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Helper Santa]"; - mes "You're not in the Christmas spirit?"; - mes "I hope you get into this gift extravaganza soon."; - close; -} diff --git a/world/map/npc/xmas/2006/xmas15.txt b/world/map/npc/xmas/2006/xmas15.txt deleted file mode 100644 index 3be50241..00000000 --- a/world/map/npc/xmas/2006/xmas15.txt +++ /dev/null @@ -1,246 +0,0 @@ -001-3.gat,112,54,0 script Xmas15 105,{ - if(XMASQUEST15 == 1) goto L_only_once; - mes "[Helper Santa]"; - mes "It's Christmas."; - mes "The time for gifts and family reunions"; - next; - - mes "[Helper Santa]"; - mes "You get a gift from me."; - mes "The kind will depend on whether"; - mes "you've been nice or naughty."; - next; - - menu "Want one?",L_nicenaughty,"No thanks.",L_no; - -L_nicenaughty: - set XMASQUEST15,1; - mes "[Helper Santa]"; - mes "In my book you're marked as..."; - next; - set @TEMP,rand(9); - if(@TEMP == 6) goto L_naughty; - goto L_nice; - -L_nice: - mes "[Helper Santa]"; - mes "...nice!"; - set @TEMP,rand(17); - next; - if(@TEMP == 0) goto L_nice_0; - if(@TEMP == 1) goto L_nice_1; - if(@TEMP == 2) goto L_nice_2; - if(@TEMP == 3) goto L_nice_3; - if(@TEMP == 4) goto L_nice_4; - if(@TEMP == 5) goto L_nice_5; - if(@TEMP == 6) goto L_nice_6; - if(@TEMP == 7) goto L_nice_7; - if(@TEMP == 8) goto L_nice_8; - if(@TEMP == 9) goto L_nice_9; - if(@TEMP == 10) goto L_nice_10; - if(@TEMP == 11) goto L_nice_11; - if(@TEMP == 12) goto L_nice_12; - if(@TEMP == 13) goto L_nice_13; - if(@TEMP == 14) goto L_nice_14; - if(@TEMP == 15) goto L_nice_15; - if(@TEMP == 16) goto L_nice_16; - if(@TEMP == 17) goto L_nice_17; - -L_naughty: - mes "[Helper Santa]"; - mes "...naughty!"; - set @TEMP,rand(6); - next; - if(@TEMP == 0) goto L_naughty_0; - if(@TEMP == 1) goto L_naughty_1; - if(@TEMP == 2) goto L_naughty_2; - if(@TEMP == 3) goto L_naughty_3; - if(@TEMP == 4) goto L_naughty_4; - if(@TEMP == 5) goto L_naughty_5; - if(@TEMP == 6) goto L_naughty_6; - -L_naughty_0: - mes "[Helper Santa]"; - mes "Ho ho ho!"; - mes "I borrowed some of your money for"; - mes "my present budget this year."; - set Zeny,Zeny-rand(500,1500); - close; - -L_naughty_1: - mes "[Helper Santa]"; - mes "You will get a spanking"; - next; - mes "[Helper Santa]"; - mes "Remember to be nice to people!"; - gmcommand "@die "; - close; - -L_naughty_2: - mes "[Helper Santa]"; - mes "But I won't mind!"; - mes "Have a char reset as a present." - next; - mes "[Helper Santa]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_naughty_3: - mes "[Helper Santa]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Helper Santa]"; - mes "Merry Christmas!"; - close; - -L_naughty_4: - mes "[Helper Santa]"; - mes "Your sex will now change!"; - mes "You always get naughty things for naughty things."; - mes "It's karma!"; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_naughty_5: - mes "[Helper Santa]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Helper Santa]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_naughty_6: - mes "[Helper Santa]"; - mes "I'll diss you around the server."; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@kami "+strcharinfo(0)+" is not in the holiday mood."; - close; - -L_nice_0: - mes "[Helper Santa]"; - mes "So you wanted money?."; - set Zeny,Zeny+rand(1,1000000); - close; - -L_nice_1: - mes "[Helper Santa]"; - mes "These hats are really hot now!"; - getitem "ChristmasTreeHat",1; - close; - -L_nice_2: - mes "[Helper Santa]"; - mes "Axe Hats are always on the cutting edge!"; - getitem "AxeHat",1; - close; - -L_nice_3: - mes "[Helper Santa]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_nice_4: - mes "[Helper Santa]"; - mes "Now you can Goggle all you want."; - getitem "Goggles",1; - close; - -L_nice_5: - mes "[Helper Santa]"; - mes "Let's Goggle all night long!"; - getitem "LeatherGoggles",1; - close; - -L_nice_6: - mes "[Helper Santa]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_nice_7: - mes "[Helper Santa]"; - mes "This patch is not an eyesore."; - getitem "Eyepatch",1; - close; - -L_nice_8: - mes "[Helper Santa]"; - mes "Bandana time!"; - getitem "Bandana",1; - close; - -L_nice_9: - mes "[Helper Santa]"; - mes "5000 exp!"; - getexp 5000,0; - close; - -L_nice_10: - mes "[Helper Santa]"; - mes "Soft packages are always nice."; - getitem "CottonShirt",1; - close; - -L_nice_11: - mes "[Helper Santa]"; - mes "Chuck Norris style!"; - getitem "RangerHat",1; - close; - -L_nice_12: - mes "[Helper Santa]"; - mes "Even Rudolph would be envious now."; - getitem "AntlerHat",1; - close; - -L_nice_13: - mes "[Helper Santa]"; - mes "Now you can become a Santa too!"; - getitem "SantaBeardHat",1; - close; - -L_nice_14: - mes "[Helper Santa]"; - mes "Now you can became a Santa too!"; - getitem "SantaHat",1; - close; - -L_nice_15: - mes "[Helper Santa]"; - mes "These gloves should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_nice_16: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "VNeckSweater",1; - close; - -L_nice_17: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_only_once: - mes "[Helper Santa]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Helper Santa]"; - mes "You're not in the Christmas spirit?"; - mes "I hope you get into this gift extravaganza soon."; - close; -} diff --git a/world/map/npc/xmas/2006/xmas16.txt b/world/map/npc/xmas/2006/xmas16.txt deleted file mode 100644 index 039c2a08..00000000 --- a/world/map/npc/xmas/2006/xmas16.txt +++ /dev/null @@ -1,246 +0,0 @@ -001-2.gat,37,24,0 script Xmas16 105,{ - if(XMASQUEST16 == 1) goto L_only_once; - mes "[Helper Santa]"; - mes "It's Christmas."; - mes "The time for gifts and family reunions"; - next; - - mes "[Helper Santa]"; - mes "You get a gift from me."; - mes "The kind will depend on whether"; - mes "you've been nice or naughty."; - next; - - menu "Want one?",L_nicenaughty,"No thanks.",L_no; - -L_nicenaughty: - set XMASQUEST16,1; - mes "[Helper Santa]"; - mes "In my book you're marked as..."; - next; - set @TEMP,rand(9); - if(@TEMP == 6) goto L_naughty; - goto L_nice; - -L_nice: - mes "[Helper Santa]"; - mes "...nice!"; - set @TEMP,rand(17); - next; - if(@TEMP == 0) goto L_nice_0; - if(@TEMP == 1) goto L_nice_1; - if(@TEMP == 2) goto L_nice_2; - if(@TEMP == 3) goto L_nice_3; - if(@TEMP == 4) goto L_nice_4; - if(@TEMP == 5) goto L_nice_5; - if(@TEMP == 6) goto L_nice_6; - if(@TEMP == 7) goto L_nice_7; - if(@TEMP == 8) goto L_nice_8; - if(@TEMP == 9) goto L_nice_9; - if(@TEMP == 10) goto L_nice_10; - if(@TEMP == 11) goto L_nice_11; - if(@TEMP == 12) goto L_nice_12; - if(@TEMP == 13) goto L_nice_13; - if(@TEMP == 14) goto L_nice_14; - if(@TEMP == 15) goto L_nice_15; - if(@TEMP == 16) goto L_nice_16; - if(@TEMP == 17) goto L_nice_17; - -L_naughty: - mes "[Helper Santa]"; - mes "...naughty!"; - set @TEMP,rand(6); - next; - if(@TEMP == 0) goto L_naughty_0; - if(@TEMP == 1) goto L_naughty_1; - if(@TEMP == 2) goto L_naughty_2; - if(@TEMP == 3) goto L_naughty_3; - if(@TEMP == 4) goto L_naughty_4; - if(@TEMP == 5) goto L_naughty_5; - if(@TEMP == 6) goto L_naughty_6; - -L_naughty_0: - mes "[Helper Santa]"; - mes "Ho ho ho!"; - mes "I borrowed some of your money for"; - mes "my present budget this year."; - set Zeny,Zeny-rand(500,1500); - close; - -L_naughty_1: - mes "[Helper Santa]"; - mes "You will get a spanking"; - next; - mes "[Helper Santa]"; - mes "Remember to be nice to people!"; - gmcommand "@die "; - close; - -L_naughty_2: - mes "[Helper Santa]"; - mes "But I won't mind!"; - mes "Have a char reset as a present." - next; - mes "[Helper Santa]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_naughty_3: - mes "[Helper Santa]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Helper Santa]"; - mes "Merry Christmas!"; - close; - -L_naughty_4: - mes "[Helper Santa]"; - mes "Your sex will now change!"; - mes "You always get naughty things for naughty things."; - mes "It's karma!"; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_naughty_5: - mes "[Helper Santa]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Helper Santa]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_naughty_6: - mes "[Helper Santa]"; - mes "I'll diss you around the server."; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@kami "+strcharinfo(0)+" is not in the holiday mood."; - close; - -L_nice_0: - mes "[Helper Santa]"; - mes "So you wanted money?."; - set Zeny,Zeny+rand(1,1000000); - close; - -L_nice_1: - mes "[Helper Santa]"; - mes "These hats are really hot now!"; - getitem "ChristmasTreeHat",1; - close; - -L_nice_2: - mes "[Helper Santa]"; - mes "Axe Hats are always on the cutting edge!"; - getitem "AxeHat",1; - close; - -L_nice_3: - mes "[Helper Santa]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_nice_4: - mes "[Helper Santa]"; - mes "Now you can Goggle all you want."; - getitem "Goggles",1; - close; - -L_nice_5: - mes "[Helper Santa]"; - mes "Let's Goggle all night long!"; - getitem "LeatherGoggles",1; - close; - -L_nice_6: - mes "[Helper Santa]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_nice_7: - mes "[Helper Santa]"; - mes "This patch is not an eyesore."; - getitem "Eyepatch",1; - close; - -L_nice_8: - mes "[Helper Santa]"; - mes "Bandana time!"; - getitem "Bandana",1; - close; - -L_nice_9: - mes "[Helper Santa]"; - mes "5000 exp!"; - getexp 5000,0; - close; - -L_nice_10: - mes "[Helper Santa]"; - mes "Soft packages are always nice."; - getitem "CottonShirt",1; - close; - -L_nice_11: - mes "[Helper Santa]"; - mes "Chuck Norris style!"; - getitem "RangerHat",1; - close; - -L_nice_12: - mes "[Helper Santa]"; - mes "Even Rudolph would be envious now."; - getitem "AntlerHat",1; - close; - -L_nice_13: - mes "[Helper Santa]"; - mes "Now you can become a Santa too!"; - getitem "SantaBeardHat",1; - close; - -L_nice_14: - mes "[Helper Santa]"; - mes "Now you can became a Santa too!"; - getitem "SantaHat",1; - close; - -L_nice_15: - mes "[Helper Santa]"; - mes "These gloves should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_nice_16: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "VNeckSweater",1; - close; - -L_nice_17: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_only_once: - mes "[Helper Santa]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Helper Santa]"; - mes "You're not in the Christmas spirit?"; - mes "I hope you get into this gift extravaganza soon."; - close; -} diff --git a/world/map/npc/xmas/2006/xmas17.txt b/world/map/npc/xmas/2006/xmas17.txt deleted file mode 100644 index 02034b1d..00000000 --- a/world/map/npc/xmas/2006/xmas17.txt +++ /dev/null @@ -1,246 +0,0 @@ -011-1.gat,106,58,0 script Xmas17 105,{ - if(XMASQUEST17 == 1) goto L_only_once; - mes "[Helper Santa]"; - mes "It's Christmas."; - mes "The time for gifts and family reunions"; - next; - - mes "[Helper Santa]"; - mes "You get a gift from me."; - mes "The kind will depend on whether"; - mes "you've been nice or naughty."; - next; - - menu "Want one?",L_nicenaughty,"No thanks.",L_no; - -L_nicenaughty: - set XMASQUEST17,1; - mes "[Helper Santa]"; - mes "In my book you're marked as..."; - next; - set @TEMP,rand(9); - if(@TEMP == 6) goto L_naughty; - goto L_nice; - -L_nice: - mes "[Helper Santa]"; - mes "...nice!"; - set @TEMP,rand(17); - next; - if(@TEMP == 0) goto L_nice_0; - if(@TEMP == 1) goto L_nice_1; - if(@TEMP == 2) goto L_nice_2; - if(@TEMP == 3) goto L_nice_3; - if(@TEMP == 4) goto L_nice_4; - if(@TEMP == 5) goto L_nice_5; - if(@TEMP == 6) goto L_nice_6; - if(@TEMP == 7) goto L_nice_7; - if(@TEMP == 8) goto L_nice_8; - if(@TEMP == 9) goto L_nice_9; - if(@TEMP == 10) goto L_nice_10; - if(@TEMP == 11) goto L_nice_11; - if(@TEMP == 12) goto L_nice_12; - if(@TEMP == 13) goto L_nice_13; - if(@TEMP == 14) goto L_nice_14; - if(@TEMP == 15) goto L_nice_15; - if(@TEMP == 16) goto L_nice_16; - if(@TEMP == 17) goto L_nice_17; - -L_naughty: - mes "[Helper Santa]"; - mes "...naughty!"; - set @TEMP,rand(6); - next; - if(@TEMP == 0) goto L_naughty_0; - if(@TEMP == 1) goto L_naughty_1; - if(@TEMP == 2) goto L_naughty_2; - if(@TEMP == 3) goto L_naughty_3; - if(@TEMP == 4) goto L_naughty_4; - if(@TEMP == 5) goto L_naughty_5; - if(@TEMP == 6) goto L_naughty_6; - -L_naughty_0: - mes "[Helper Santa]"; - mes "Ho ho ho!"; - mes "I borrowed some of your money for"; - mes "my present budget this year."; - set Zeny,Zeny-rand(500,1500); - close; - -L_naughty_1: - mes "[Helper Santa]"; - mes "You will get a spanking"; - next; - mes "[Helper Santa]"; - mes "Remember to be nice to people!"; - gmcommand "@die "; - close; - -L_naughty_2: - mes "[Helper Santa]"; - mes "But I won't mind!"; - mes "Have a char reset as a present." - next; - mes "[Helper Santa]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_naughty_3: - mes "[Helper Santa]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Helper Santa]"; - mes "Merry Christmas!"; - close; - -L_naughty_4: - mes "[Helper Santa]"; - mes "Your sex will now change!"; - mes "You always get naughty things for naughty things."; - mes "It's karma!"; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_naughty_5: - mes "[Helper Santa]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Helper Santa]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_naughty_6: - mes "[Helper Santa]"; - mes "I'll diss you around the server."; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@kami "+strcharinfo(0)+" is not in the holiday mood."; - close; - -L_nice_0: - mes "[Helper Santa]"; - mes "So you wanted money?."; - set Zeny,Zeny+rand(1,1000000); - close; - -L_nice_1: - mes "[Helper Santa]"; - mes "These hats are really hot now!"; - getitem "ChristmasTreeHat",1; - close; - -L_nice_2: - mes "[Helper Santa]"; - mes "Axe Hats are always on the cutting edge!"; - getitem "AxeHat",1; - close; - -L_nice_3: - mes "[Helper Santa]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_nice_4: - mes "[Helper Santa]"; - mes "Now you can Goggle all you want."; - getitem "Goggles",1; - close; - -L_nice_5: - mes "[Helper Santa]"; - mes "Let's Goggle all night long!"; - getitem "LeatherGoggles",1; - close; - -L_nice_6: - mes "[Helper Santa]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_nice_7: - mes "[Helper Santa]"; - mes "This patch is not an eyesore."; - getitem "Eyepatch",1; - close; - -L_nice_8: - mes "[Helper Santa]"; - mes "Bandana time!"; - getitem "Bandana",1; - close; - -L_nice_9: - mes "[Helper Santa]"; - mes "5000 exp!"; - getexp 5000,0; - close; - -L_nice_10: - mes "[Helper Santa]"; - mes "Soft packages are always nice."; - getitem "CottonShirt",1; - close; - -L_nice_11: - mes "[Helper Santa]"; - mes "Chuck Norris style!"; - getitem "RangerHat",1; - close; - -L_nice_12: - mes "[Helper Santa]"; - mes "Even Rudolph would be envious now."; - getitem "AntlerHat",1; - close; - -L_nice_13: - mes "[Helper Santa]"; - mes "Now you can become a Santa too!"; - getitem "SantaBeardHat",1; - close; - -L_nice_14: - mes "[Helper Santa]"; - mes "Now you can became a Santa too!"; - getitem "SantaHat",1; - close; - -L_nice_15: - mes "[Helper Santa]"; - mes "These gloves should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_nice_16: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "VNeckSweater",1; - close; - -L_nice_17: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_only_once: - mes "[Helper Santa]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Helper Santa]"; - mes "You're not in the Christmas spirit?"; - mes "I hope you get into this gift extravaganza soon."; - close; -} diff --git a/world/map/npc/xmas/2006/xmas18.txt b/world/map/npc/xmas/2006/xmas18.txt deleted file mode 100644 index 6f9ab2b7..00000000 --- a/world/map/npc/xmas/2006/xmas18.txt +++ /dev/null @@ -1,246 +0,0 @@ -002-2.gat,97,18,0 script Xmas18 105,{ - if(XMASQUEST18 == 1) goto L_only_once; - mes "[Helper Santa]"; - mes "It's Christmas."; - mes "The time for gifts and family reunions"; - next; - - mes "[Helper Santa]"; - mes "You get a gift from me."; - mes "The kind will depend on whether"; - mes "you've been nice or naughty."; - next; - - menu "Want one?",L_nicenaughty,"No thanks.",L_no; - -L_nicenaughty: - set XMASQUEST18,1; - mes "[Helper Santa]"; - mes "In my book you're marked as..."; - next; - set @TEMP,rand(9); - if(@TEMP == 6) goto L_naughty; - goto L_nice; - -L_nice: - mes "[Helper Santa]"; - mes "...nice!"; - set @TEMP,rand(17); - next; - if(@TEMP == 0) goto L_nice_0; - if(@TEMP == 1) goto L_nice_1; - if(@TEMP == 2) goto L_nice_2; - if(@TEMP == 3) goto L_nice_3; - if(@TEMP == 4) goto L_nice_4; - if(@TEMP == 5) goto L_nice_5; - if(@TEMP == 6) goto L_nice_6; - if(@TEMP == 7) goto L_nice_7; - if(@TEMP == 8) goto L_nice_8; - if(@TEMP == 9) goto L_nice_9; - if(@TEMP == 10) goto L_nice_10; - if(@TEMP == 11) goto L_nice_11; - if(@TEMP == 12) goto L_nice_12; - if(@TEMP == 13) goto L_nice_13; - if(@TEMP == 14) goto L_nice_14; - if(@TEMP == 15) goto L_nice_15; - if(@TEMP == 16) goto L_nice_16; - if(@TEMP == 17) goto L_nice_17; - -L_naughty: - mes "[Helper Santa]"; - mes "...naughty!"; - set @TEMP,rand(6); - next; - if(@TEMP == 0) goto L_naughty_0; - if(@TEMP == 1) goto L_naughty_1; - if(@TEMP == 2) goto L_naughty_2; - if(@TEMP == 3) goto L_naughty_3; - if(@TEMP == 4) goto L_naughty_4; - if(@TEMP == 5) goto L_naughty_5; - if(@TEMP == 6) goto L_naughty_6; - -L_naughty_0: - mes "[Helper Santa]"; - mes "Ho ho ho!"; - mes "I borrowed some of your money for"; - mes "my present budget this year."; - set Zeny,Zeny-rand(500,1500); - close; - -L_naughty_1: - mes "[Helper Santa]"; - mes "You will get a spanking"; - next; - mes "[Helper Santa]"; - mes "Remember to be nice to people!"; - gmcommand "@die "; - close; - -L_naughty_2: - mes "[Helper Santa]"; - mes "But I won't mind!"; - mes "Have a char reset as a present." - next; - mes "[Helper Santa]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_naughty_3: - mes "[Helper Santa]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Helper Santa]"; - mes "Merry Christmas!"; - close; - -L_naughty_4: - mes "[Helper Santa]"; - mes "Your sex will now change!"; - mes "You always get naughty things for naughty things."; - mes "It's karma!"; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_naughty_5: - mes "[Helper Santa]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Helper Santa]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_naughty_6: - mes "[Helper Santa]"; - mes "I'll diss you around the server."; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@kami "+strcharinfo(0)+" is not in the holiday mood."; - close; - -L_nice_0: - mes "[Helper Santa]"; - mes "So you wanted money?."; - set Zeny,Zeny+rand(1,1000000); - close; - -L_nice_1: - mes "[Helper Santa]"; - mes "These hats are really hot now!"; - getitem "ChristmasTreeHat",1; - close; - -L_nice_2: - mes "[Helper Santa]"; - mes "Axe Hats are always on the cutting edge!"; - getitem "AxeHat",1; - close; - -L_nice_3: - mes "[Helper Santa]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_nice_4: - mes "[Helper Santa]"; - mes "Now you can Goggle all you want."; - getitem "Goggles",1; - close; - -L_nice_5: - mes "[Helper Santa]"; - mes "Let's Goggle all night long!"; - getitem "LeatherGoggles",1; - close; - -L_nice_6: - mes "[Helper Santa]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_nice_7: - mes "[Helper Santa]"; - mes "This patch is not an eyesore."; - getitem "Eyepatch",1; - close; - -L_nice_8: - mes "[Helper Santa]"; - mes "Bandana time!"; - getitem "Bandana",1; - close; - -L_nice_9: - mes "[Helper Santa]"; - mes "5000 exp!"; - getexp 5000,0; - close; - -L_nice_10: - mes "[Helper Santa]"; - mes "Soft packages are always nice."; - getitem "CottonShirt",1; - close; - -L_nice_11: - mes "[Helper Santa]"; - mes "Chuck Norris style!"; - getitem "RangerHat",1; - close; - -L_nice_12: - mes "[Helper Santa]"; - mes "Even Rudolph would be envious now."; - getitem "AntlerHat",1; - close; - -L_nice_13: - mes "[Helper Santa]"; - mes "Now you can become a Santa too!"; - getitem "SantaBeardHat",1; - close; - -L_nice_14: - mes "[Helper Santa]"; - mes "Now you can became a Santa too!"; - getitem "SantaHat",1; - close; - -L_nice_15: - mes "[Helper Santa]"; - mes "These gloves should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_nice_16: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "VNeckSweater",1; - close; - -L_nice_17: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_only_once: - mes "[Helper Santa]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Helper Santa]"; - mes "You're not in the Christmas spirit?"; - mes "I hope you get into this gift extravaganza soon."; - close; -} diff --git a/world/map/npc/xmas/2006/xmas19.txt b/world/map/npc/xmas/2006/xmas19.txt deleted file mode 100644 index aa37d19e..00000000 --- a/world/map/npc/xmas/2006/xmas19.txt +++ /dev/null @@ -1,246 +0,0 @@ -020-1.gat,90,83,0 script Xmas19 105,{ - if(XMASQUEST19 == 1) goto L_only_once; - mes "[Helper Santa]"; - mes "It's Christmas."; - mes "The time for gifts and family reunions"; - next; - - mes "[Helper Santa]"; - mes "You get a gift from me."; - mes "The kind will depend on whether"; - mes "you've been nice or naughty."; - next; - - menu "Want one?",L_nicenaughty,"No thanks.",L_no; - -L_nicenaughty: - set XMASQUEST19,1; - mes "[Helper Santa]"; - mes "In my book you're marked as..."; - next; - set @TEMP,rand(9); - if(@TEMP == 6) goto L_naughty; - goto L_nice; - -L_nice: - mes "[Helper Santa]"; - mes "...nice!"; - set @TEMP,rand(17); - next; - if(@TEMP == 0) goto L_nice_0; - if(@TEMP == 1) goto L_nice_1; - if(@TEMP == 2) goto L_nice_2; - if(@TEMP == 3) goto L_nice_3; - if(@TEMP == 4) goto L_nice_4; - if(@TEMP == 5) goto L_nice_5; - if(@TEMP == 6) goto L_nice_6; - if(@TEMP == 7) goto L_nice_7; - if(@TEMP == 8) goto L_nice_8; - if(@TEMP == 9) goto L_nice_9; - if(@TEMP == 10) goto L_nice_10; - if(@TEMP == 11) goto L_nice_11; - if(@TEMP == 12) goto L_nice_12; - if(@TEMP == 13) goto L_nice_13; - if(@TEMP == 14) goto L_nice_14; - if(@TEMP == 15) goto L_nice_15; - if(@TEMP == 16) goto L_nice_16; - if(@TEMP == 17) goto L_nice_17; - -L_naughty: - mes "[Helper Santa]"; - mes "...naughty!"; - set @TEMP,rand(6); - next; - if(@TEMP == 0) goto L_naughty_0; - if(@TEMP == 1) goto L_naughty_1; - if(@TEMP == 2) goto L_naughty_2; - if(@TEMP == 3) goto L_naughty_3; - if(@TEMP == 4) goto L_naughty_4; - if(@TEMP == 5) goto L_naughty_5; - if(@TEMP == 6) goto L_naughty_6; - -L_naughty_0: - mes "[Helper Santa]"; - mes "Ho ho ho!"; - mes "I borrowed some of your money for"; - mes "my present budget this year."; - set Zeny,Zeny-rand(500,1500); - close; - -L_naughty_1: - mes "[Helper Santa]"; - mes "You will get a spanking"; - next; - mes "[Helper Santa]"; - mes "Remember to be nice to people!"; - gmcommand "@die "; - close; - -L_naughty_2: - mes "[Helper Santa]"; - mes "But I won't mind!"; - mes "Have a char reset as a present." - next; - mes "[Helper Santa]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_naughty_3: - mes "[Helper Santa]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Helper Santa]"; - mes "Merry Christmas!"; - close; - -L_naughty_4: - mes "[Helper Santa]"; - mes "Your sex will now change!"; - mes "You always get naughty things for naughty things."; - mes "It's karma!"; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_naughty_5: - mes "[Helper Santa]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Helper Santa]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_naughty_6: - mes "[Helper Santa]"; - mes "I'll diss you around the server."; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@kami "+strcharinfo(0)+" is not in the holiday mood."; - close; - -L_nice_0: - mes "[Helper Santa]"; - mes "So you wanted money?."; - set Zeny,Zeny+rand(1,1000000); - close; - -L_nice_1: - mes "[Helper Santa]"; - mes "These hats are really hot now!"; - getitem "ChristmasTreeHat",1; - close; - -L_nice_2: - mes "[Helper Santa]"; - mes "Axe Hats are always on the cutting edge!"; - getitem "AxeHat",1; - close; - -L_nice_3: - mes "[Helper Santa]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_nice_4: - mes "[Helper Santa]"; - mes "Now you can Goggle all you want."; - getitem "Goggles",1; - close; - -L_nice_5: - mes "[Helper Santa]"; - mes "Let's Goggle all night long!"; - getitem "LeatherGoggles",1; - close; - -L_nice_6: - mes "[Helper Santa]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_nice_7: - mes "[Helper Santa]"; - mes "This patch is not an eyesore."; - getitem "Eyepatch",1; - close; - -L_nice_8: - mes "[Helper Santa]"; - mes "Bandana time!"; - getitem "Bandana",1; - close; - -L_nice_9: - mes "[Helper Santa]"; - mes "5000 exp!"; - getexp 5000,0; - close; - -L_nice_10: - mes "[Helper Santa]"; - mes "Soft packages are always nice."; - getitem "CottonShirt",1; - close; - -L_nice_11: - mes "[Helper Santa]"; - mes "Chuck Norris style!"; - getitem "RangerHat",1; - close; - -L_nice_12: - mes "[Helper Santa]"; - mes "Even Rudolph would be envious now."; - getitem "AntlerHat",1; - close; - -L_nice_13: - mes "[Helper Santa]"; - mes "Now you can become a Santa too!"; - getitem "SantaBeardHat",1; - close; - -L_nice_14: - mes "[Helper Santa]"; - mes "Now you can became a Santa too!"; - getitem "SantaHat",1; - close; - -L_nice_15: - mes "[Helper Santa]"; - mes "These gloves should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_nice_16: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "VNeckSweater",1; - close; - -L_nice_17: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_only_once: - mes "[Helper Santa]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Helper Santa]"; - mes "You're not in the Christmas spirit?"; - mes "I hope you get into this gift extravaganza soon."; - close; -} diff --git a/world/map/npc/xmas/2006/xmas2.txt b/world/map/npc/xmas/2006/xmas2.txt deleted file mode 100644 index 379449a2..00000000 --- a/world/map/npc/xmas/2006/xmas2.txt +++ /dev/null @@ -1,246 +0,0 @@ -019-1.gat,99,42,0 script Xmas2 105,{ - if(XMASQUEST2 == 1) goto L_only_once; - mes "[Helper Santa]"; - mes "It's Christmas."; - mes "The time for gifts and family reunions"; - next; - - mes "[Helper Santa]"; - mes "You get a gift from me."; - mes "The kind will depend on whether"; - mes "you've been nice or naughty."; - next; - - menu "Want one?",L_nicenaughty,"No thanks.",L_no; - -L_nicenaughty: - set XMASQUEST2,1; - mes "[Helper Santa]"; - mes "In my book you're marked as..."; - next; - set @TEMP,rand(9); - if(@TEMP == 6) goto L_naughty; - goto L_nice; - -L_nice: - mes "[Helper Santa]"; - mes "...nice!"; - set @TEMP,rand(17); - next; - if(@TEMP == 0) goto L_nice_0; - if(@TEMP == 1) goto L_nice_1; - if(@TEMP == 2) goto L_nice_2; - if(@TEMP == 3) goto L_nice_3; - if(@TEMP == 4) goto L_nice_4; - if(@TEMP == 5) goto L_nice_5; - if(@TEMP == 6) goto L_nice_6; - if(@TEMP == 7) goto L_nice_7; - if(@TEMP == 8) goto L_nice_8; - if(@TEMP == 9) goto L_nice_9; - if(@TEMP == 10) goto L_nice_10; - if(@TEMP == 11) goto L_nice_11; - if(@TEMP == 12) goto L_nice_12; - if(@TEMP == 13) goto L_nice_13; - if(@TEMP == 14) goto L_nice_14; - if(@TEMP == 15) goto L_nice_15; - if(@TEMP == 16) goto L_nice_16; - if(@TEMP == 17) goto L_nice_17; - -L_naughty: - mes "[Helper Santa]"; - mes "...naughty!"; - set @TEMP,rand(6); - next; - if(@TEMP == 0) goto L_naughty_0; - if(@TEMP == 1) goto L_naughty_1; - if(@TEMP == 2) goto L_naughty_2; - if(@TEMP == 3) goto L_naughty_3; - if(@TEMP == 4) goto L_naughty_4; - if(@TEMP == 5) goto L_naughty_5; - if(@TEMP == 6) goto L_naughty_6; - -L_naughty_0: - mes "[Helper Santa]"; - mes "Ho ho ho!"; - mes "I borrowed some of your money for"; - mes "my present budget this year."; - set Zeny,Zeny-rand(500,1500); - close; - -L_naughty_1: - mes "[Helper Santa]"; - mes "You will get a spanking"; - next; - mes "[Helper Santa]"; - mes "Remember to be nice to people!"; - gmcommand "@die "; - close; - -L_naughty_2: - mes "[Helper Santa]"; - mes "But I won't mind!"; - mes "Have a char reset as a present." - next; - mes "[Helper Santa]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_naughty_3: - mes "[Helper Santa]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Helper Santa]"; - mes "Merry Christmas!"; - close; - -L_naughty_4: - mes "[Helper Santa]"; - mes "Your sex will now change!"; - mes "You always get naughty things for naughty things."; - mes "It's karma!"; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_naughty_5: - mes "[Helper Santa]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Helper Santa]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_naughty_6: - mes "[Helper Santa]"; - mes "I'll diss you around the server."; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@kami "+strcharinfo(0)+" is not in the holiday mood."; - close; - -L_nice_0: - mes "[Helper Santa]"; - mes "So you wanted money?."; - set Zeny,Zeny+rand(1,1000000); - close; - -L_nice_1: - mes "[Helper Santa]"; - mes "These hats are really hot now!"; - getitem "ChristmasTreeHat",1; - close; - -L_nice_2: - mes "[Helper Santa]"; - mes "Axe Hats are always on the cutting edge!"; - getitem "AxeHat",1; - close; - -L_nice_3: - mes "[Helper Santa]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_nice_4: - mes "[Helper Santa]"; - mes "Now you can Goggle all you want."; - getitem "Goggles",1; - close; - -L_nice_5: - mes "[Helper Santa]"; - mes "Let's Goggle all night long!"; - getitem "LeatherGoggles",1; - close; - -L_nice_6: - mes "[Helper Santa]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_nice_7: - mes "[Helper Santa]"; - mes "This patch is not an eyesore."; - getitem "Eyepatch",1; - close; - -L_nice_8: - mes "[Helper Santa]"; - mes "Bandana time!"; - getitem "Bandana",1; - close; - -L_nice_9: - mes "[Helper Santa]"; - mes "5000 exp!"; - getexp 5000,0; - close; - -L_nice_10: - mes "[Helper Santa]"; - mes "Soft packages are always nice."; - getitem "CottonShirt",1; - close; - -L_nice_11: - mes "[Helper Santa]"; - mes "Chuck Norris style!"; - getitem "RangerHat",1; - close; - -L_nice_12: - mes "[Helper Santa]"; - mes "Even Rudolph would be envious now."; - getitem "AntlerHat",1; - close; - -L_nice_13: - mes "[Helper Santa]"; - mes "Now you can become a Santa too!"; - getitem "SantaBeardHat",1; - close; - -L_nice_14: - mes "[Helper Santa]"; - mes "Now you can became a Santa too!"; - getitem "SantaHat",1; - close; - -L_nice_15: - mes "[Helper Santa]"; - mes "These gloves should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_nice_16: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "VNeckSweater",1; - close; - -L_nice_17: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_only_once: - mes "[Helper Santa]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Helper Santa]"; - mes "You're not in the Christmas spirit?"; - mes "I hope you get into this gift extravaganza soon."; - close; -} diff --git a/world/map/npc/xmas/2006/xmas20.txt b/world/map/npc/xmas/2006/xmas20.txt deleted file mode 100644 index 449bf26c..00000000 --- a/world/map/npc/xmas/2006/xmas20.txt +++ /dev/null @@ -1,246 +0,0 @@ -001-1.gat,55,28,0 script Xmas20 105,{ - if(XMASQUEST20 == 1) goto L_only_once; - mes "[Helper Santa]"; - mes "It's Christmas."; - mes "The time for gifts and family reunions"; - next; - - mes "[Helper Santa]"; - mes "You get a gift from me."; - mes "The kind will depend on whether"; - mes "you've been nice or naughty."; - next; - - menu "Want one?",L_nicenaughty,"No thanks.",L_no; - -L_nicenaughty: - set XMASQUEST20,1; - mes "[Helper Santa]"; - mes "In my book you're marked as..."; - next; - set @TEMP,rand(9); - if(@TEMP == 6) goto L_naughty; - goto L_nice; - -L_nice: - mes "[Helper Santa]"; - mes "...nice!"; - set @TEMP,rand(17); - next; - if(@TEMP == 0) goto L_nice_0; - if(@TEMP == 1) goto L_nice_1; - if(@TEMP == 2) goto L_nice_2; - if(@TEMP == 3) goto L_nice_3; - if(@TEMP == 4) goto L_nice_4; - if(@TEMP == 5) goto L_nice_5; - if(@TEMP == 6) goto L_nice_6; - if(@TEMP == 7) goto L_nice_7; - if(@TEMP == 8) goto L_nice_8; - if(@TEMP == 9) goto L_nice_9; - if(@TEMP == 10) goto L_nice_10; - if(@TEMP == 11) goto L_nice_11; - if(@TEMP == 12) goto L_nice_12; - if(@TEMP == 13) goto L_nice_13; - if(@TEMP == 14) goto L_nice_14; - if(@TEMP == 15) goto L_nice_15; - if(@TEMP == 16) goto L_nice_16; - if(@TEMP == 17) goto L_nice_17; - -L_naughty: - mes "[Helper Santa]"; - mes "...naughty!"; - set @TEMP,rand(6); - next; - if(@TEMP == 0) goto L_naughty_0; - if(@TEMP == 1) goto L_naughty_1; - if(@TEMP == 2) goto L_naughty_2; - if(@TEMP == 3) goto L_naughty_3; - if(@TEMP == 4) goto L_naughty_4; - if(@TEMP == 5) goto L_naughty_5; - if(@TEMP == 6) goto L_naughty_6; - -L_naughty_0: - mes "[Helper Santa]"; - mes "Ho ho ho!"; - mes "I borrowed some of your money for"; - mes "my present budget this year."; - set Zeny,Zeny-rand(500,1500); - close; - -L_naughty_1: - mes "[Helper Santa]"; - mes "You will get a spanking"; - next; - mes "[Helper Santa]"; - mes "Remember to be nice to people!"; - gmcommand "@die "; - close; - -L_naughty_2: - mes "[Helper Santa]"; - mes "But I won't mind!"; - mes "Have a char reset as a present." - next; - mes "[Helper Santa]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_naughty_3: - mes "[Helper Santa]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Helper Santa]"; - mes "Merry Christmas!"; - close; - -L_naughty_4: - mes "[Helper Santa]"; - mes "Your sex will now change!"; - mes "You always get naughty things for naughty things."; - mes "It's karma!"; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_naughty_5: - mes "[Helper Santa]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Helper Santa]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_naughty_6: - mes "[Helper Santa]"; - mes "I'll diss you around the server."; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@kami "+strcharinfo(0)+" is not in the holiday mood."; - close; - -L_nice_0: - mes "[Helper Santa]"; - mes "So you wanted money?."; - set Zeny,Zeny+rand(1,1000000); - close; - -L_nice_1: - mes "[Helper Santa]"; - mes "These hats are really hot now!"; - getitem "ChristmasTreeHat",1; - close; - -L_nice_2: - mes "[Helper Santa]"; - mes "Axe Hats are always on the cutting edge!"; - getitem "AxeHat",1; - close; - -L_nice_3: - mes "[Helper Santa]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_nice_4: - mes "[Helper Santa]"; - mes "Now you can Goggle all you want."; - getitem "Goggles",1; - close; - -L_nice_5: - mes "[Helper Santa]"; - mes "Let's Goggle all night long!"; - getitem "LeatherGoggles",1; - close; - -L_nice_6: - mes "[Helper Santa]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_nice_7: - mes "[Helper Santa]"; - mes "This patch is not an eyesore."; - getitem "Eyepatch",1; - close; - -L_nice_8: - mes "[Helper Santa]"; - mes "Bandana time!"; - getitem "Bandana",1; - close; - -L_nice_9: - mes "[Helper Santa]"; - mes "5000 exp!"; - getexp 5000,0; - close; - -L_nice_10: - mes "[Helper Santa]"; - mes "Soft packages are always nice."; - getitem "CottonShirt",1; - close; - -L_nice_11: - mes "[Helper Santa]"; - mes "Chuck Norris style!"; - getitem "RangerHat",1; - close; - -L_nice_12: - mes "[Helper Santa]"; - mes "Even Rudolph would be envious now."; - getitem "AntlerHat",1; - close; - -L_nice_13: - mes "[Helper Santa]"; - mes "Now you can become a Santa too!"; - getitem "SantaBeardHat",1; - close; - -L_nice_14: - mes "[Helper Santa]"; - mes "Now you can became a Santa too!"; - getitem "SantaHat",1; - close; - -L_nice_15: - mes "[Helper Santa]"; - mes "These gloves should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_nice_16: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "VNeckSweater",1; - close; - -L_nice_17: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_only_once: - mes "[Helper Santa]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Helper Santa]"; - mes "You're not in the Christmas spirit?"; - mes "I hope you get into this gift extravaganza soon."; - close; -} diff --git a/world/map/npc/xmas/2006/xmas3.txt b/world/map/npc/xmas/2006/xmas3.txt deleted file mode 100644 index 009819e8..00000000 --- a/world/map/npc/xmas/2006/xmas3.txt +++ /dev/null @@ -1,246 +0,0 @@ -020-1.gat,67,62,0 script Xmas3 105,{ - if(XMASQUEST3 == 1) goto L_only_once; - mes "[Helper Santa]"; - mes "It's Christmas."; - mes "The time for gifts and family reunions"; - next; - - mes "[Helper Santa]"; - mes "You get a gift from me."; - mes "The kind will depend on whether"; - mes "you've been nice or naughty."; - next; - - menu "Want one?",L_nicenaughty,"No thanks.",L_no; - -L_nicenaughty: - set XMASQUEST3,1; - mes "[Helper Santa]"; - mes "In my book you're marked as..."; - next; - set @TEMP,rand(9); - if(@TEMP == 6) goto L_naughty; - goto L_nice; - -L_nice: - mes "[Helper Santa]"; - mes "...nice!"; - set @TEMP,rand(17); - next; - if(@TEMP == 0) goto L_nice_0; - if(@TEMP == 1) goto L_nice_1; - if(@TEMP == 2) goto L_nice_2; - if(@TEMP == 3) goto L_nice_3; - if(@TEMP == 4) goto L_nice_4; - if(@TEMP == 5) goto L_nice_5; - if(@TEMP == 6) goto L_nice_6; - if(@TEMP == 7) goto L_nice_7; - if(@TEMP == 8) goto L_nice_8; - if(@TEMP == 9) goto L_nice_9; - if(@TEMP == 10) goto L_nice_10; - if(@TEMP == 11) goto L_nice_11; - if(@TEMP == 12) goto L_nice_12; - if(@TEMP == 13) goto L_nice_13; - if(@TEMP == 14) goto L_nice_14; - if(@TEMP == 15) goto L_nice_15; - if(@TEMP == 16) goto L_nice_16; - if(@TEMP == 17) goto L_nice_17; - -L_naughty: - mes "[Helper Santa]"; - mes "...naughty!"; - set @TEMP,rand(6); - next; - if(@TEMP == 0) goto L_naughty_0; - if(@TEMP == 1) goto L_naughty_1; - if(@TEMP == 2) goto L_naughty_2; - if(@TEMP == 3) goto L_naughty_3; - if(@TEMP == 4) goto L_naughty_4; - if(@TEMP == 5) goto L_naughty_5; - if(@TEMP == 6) goto L_naughty_6; - -L_naughty_0: - mes "[Helper Santa]"; - mes "Ho ho ho!"; - mes "I borrowed some of your money for"; - mes "my present budget this year."; - set Zeny,Zeny-rand(500,1500); - close; - -L_naughty_1: - mes "[Helper Santa]"; - mes "You will get a spanking"; - next; - mes "[Helper Santa]"; - mes "Remember to be nice to people!"; - gmcommand "@die "; - close; - -L_naughty_2: - mes "[Helper Santa]"; - mes "But I won't mind!"; - mes "Have a char reset as a present." - next; - mes "[Helper Santa]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_naughty_3: - mes "[Helper Santa]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Helper Santa]"; - mes "Merry Christmas!"; - close; - -L_naughty_4: - mes "[Helper Santa]"; - mes "Your sex will now change!"; - mes "You always get naughty things for naughty things."; - mes "It's karma!"; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_naughty_5: - mes "[Helper Santa]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Helper Santa]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_naughty_6: - mes "[Helper Santa]"; - mes "I'll diss you around the server."; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@kami "+strcharinfo(0)+" is not in the holiday mood."; - close; - -L_nice_0: - mes "[Helper Santa]"; - mes "So you wanted money?."; - set Zeny,Zeny+rand(1,1000000); - close; - -L_nice_1: - mes "[Helper Santa]"; - mes "These hats are really hot now!"; - getitem "ChristmasTreeHat",1; - close; - -L_nice_2: - mes "[Helper Santa]"; - mes "Axe Hats are always on the cutting edge!"; - getitem "AxeHat",1; - close; - -L_nice_3: - mes "[Helper Santa]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_nice_4: - mes "[Helper Santa]"; - mes "Now you can Goggle all you want."; - getitem "Goggles",1; - close; - -L_nice_5: - mes "[Helper Santa]"; - mes "Let's Goggle all night long!"; - getitem "LeatherGoggles",1; - close; - -L_nice_6: - mes "[Helper Santa]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_nice_7: - mes "[Helper Santa]"; - mes "This patch is not an eyesore."; - getitem "Eyepatch",1; - close; - -L_nice_8: - mes "[Helper Santa]"; - mes "Bandana time!"; - getitem "Bandana",1; - close; - -L_nice_9: - mes "[Helper Santa]"; - mes "5000 exp!"; - getexp 5000,0; - close; - -L_nice_10: - mes "[Helper Santa]"; - mes "Soft packages are always nice."; - getitem "CottonShirt",1; - close; - -L_nice_11: - mes "[Helper Santa]"; - mes "Chuck Norris style!"; - getitem "RangerHat",1; - close; - -L_nice_12: - mes "[Helper Santa]"; - mes "Even Rudolph would be envious now."; - getitem "AntlerHat",1; - close; - -L_nice_13: - mes "[Helper Santa]"; - mes "Now you can become a Santa too!"; - getitem "SantaBeardHat",1; - close; - -L_nice_14: - mes "[Helper Santa]"; - mes "Now you can became a Santa too!"; - getitem "SantaHat",1; - close; - -L_nice_15: - mes "[Helper Santa]"; - mes "These gloves should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_nice_16: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "VNeckSweater",1; - close; - -L_nice_17: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_only_once: - mes "[Helper Santa]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Helper Santa]"; - mes "You're not in the Christmas spirit?"; - mes "I hope you get into this gift extravaganza soon."; - close; -} diff --git a/world/map/npc/xmas/2006/xmas4.txt b/world/map/npc/xmas/2006/xmas4.txt deleted file mode 100644 index 22b43a61..00000000 --- a/world/map/npc/xmas/2006/xmas4.txt +++ /dev/null @@ -1,246 +0,0 @@ -020-3.gat,24,50,0 script Xmas4 105,{ - if(XMASQUEST4 == 1) goto L_only_once; - mes "[Helper Santa]"; - mes "It's Christmas."; - mes "The time for gifts and family reunions"; - next; - - mes "[Helper Santa]"; - mes "You get a gift from me."; - mes "The kind will depend on whether"; - mes "you've been nice or naughty."; - next; - - menu "Want one?",L_nicenaughty,"No thanks.",L_no; - -L_nicenaughty: - set XMASQUEST4,1; - mes "[Helper Santa]"; - mes "In my book you're marked as..."; - next; - set @TEMP,rand(9); - if(@TEMP == 6) goto L_naughty; - goto L_nice; - -L_nice: - mes "[Helper Santa]"; - mes "...nice!"; - set @TEMP,rand(17); - next; - if(@TEMP == 0) goto L_nice_0; - if(@TEMP == 1) goto L_nice_1; - if(@TEMP == 2) goto L_nice_2; - if(@TEMP == 3) goto L_nice_3; - if(@TEMP == 4) goto L_nice_4; - if(@TEMP == 5) goto L_nice_5; - if(@TEMP == 6) goto L_nice_6; - if(@TEMP == 7) goto L_nice_7; - if(@TEMP == 8) goto L_nice_8; - if(@TEMP == 9) goto L_nice_9; - if(@TEMP == 10) goto L_nice_10; - if(@TEMP == 11) goto L_nice_11; - if(@TEMP == 12) goto L_nice_12; - if(@TEMP == 13) goto L_nice_13; - if(@TEMP == 14) goto L_nice_14; - if(@TEMP == 15) goto L_nice_15; - if(@TEMP == 16) goto L_nice_16; - if(@TEMP == 17) goto L_nice_17; - -L_naughty: - mes "[Helper Santa]"; - mes "...naughty!"; - set @TEMP,rand(6); - next; - if(@TEMP == 0) goto L_naughty_0; - if(@TEMP == 1) goto L_naughty_1; - if(@TEMP == 2) goto L_naughty_2; - if(@TEMP == 3) goto L_naughty_3; - if(@TEMP == 4) goto L_naughty_4; - if(@TEMP == 5) goto L_naughty_5; - if(@TEMP == 6) goto L_naughty_6; - -L_naughty_0: - mes "[Helper Santa]"; - mes "Ho ho ho!"; - mes "I borrowed some of your money for"; - mes "my present budget this year."; - set Zeny,Zeny-rand(500,1500); - close; - -L_naughty_1: - mes "[Helper Santa]"; - mes "You will get a spanking"; - next; - mes "[Helper Santa]"; - mes "Remember to be nice to people!"; - gmcommand "@die "; - close; - -L_naughty_2: - mes "[Helper Santa]"; - mes "But I won't mind!"; - mes "Have a char reset as a present." - next; - mes "[Helper Santa]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_naughty_3: - mes "[Helper Santa]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Helper Santa]"; - mes "Merry Christmas!"; - close; - -L_naughty_4: - mes "[Helper Santa]"; - mes "Your sex will now change!"; - mes "You always get naughty things for naughty things."; - mes "It's karma!"; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_naughty_5: - mes "[Helper Santa]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Helper Santa]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_naughty_6: - mes "[Helper Santa]"; - mes "I'll diss you around the server."; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@kami "+strcharinfo(0)+" is not in the holiday mood."; - close; - -L_nice_0: - mes "[Helper Santa]"; - mes "So you wanted money?."; - set Zeny,Zeny+rand(1,1000000); - close; - -L_nice_1: - mes "[Helper Santa]"; - mes "These hats are really hot now!"; - getitem "ChristmasTreeHat",1; - close; - -L_nice_2: - mes "[Helper Santa]"; - mes "Axe Hats are always on the cutting edge!"; - getitem "AxeHat",1; - close; - -L_nice_3: - mes "[Helper Santa]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_nice_4: - mes "[Helper Santa]"; - mes "Now you can Goggle all you want."; - getitem "Goggles",1; - close; - -L_nice_5: - mes "[Helper Santa]"; - mes "Let's Goggle all night long!"; - getitem "LeatherGoggles",1; - close; - -L_nice_6: - mes "[Helper Santa]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_nice_7: - mes "[Helper Santa]"; - mes "This patch is not an eyesore."; - getitem "Eyepatch",1; - close; - -L_nice_8: - mes "[Helper Santa]"; - mes "Bandana time!"; - getitem "Bandana",1; - close; - -L_nice_9: - mes "[Helper Santa]"; - mes "5000 exp!"; - getexp 5000,0; - close; - -L_nice_10: - mes "[Helper Santa]"; - mes "Soft packages are always nice."; - getitem "CottonShirt",1; - close; - -L_nice_11: - mes "[Helper Santa]"; - mes "Chuck Norris style!"; - getitem "RangerHat",1; - close; - -L_nice_12: - mes "[Helper Santa]"; - mes "Even Rudolph would be envious now."; - getitem "AntlerHat",1; - close; - -L_nice_13: - mes "[Helper Santa]"; - mes "Now you can become a Santa too!"; - getitem "SantaBeardHat",1; - close; - -L_nice_14: - mes "[Helper Santa]"; - mes "Now you can became a Santa too!"; - getitem "SantaHat",1; - close; - -L_nice_15: - mes "[Helper Santa]"; - mes "These gloves should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_nice_16: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "VNeckSweater",1; - close; - -L_nice_17: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_only_once: - mes "[Helper Santa]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Helper Santa]"; - mes "You're not in the Christmas spirit?"; - mes "I hope you get into this gift extravaganza soon."; - close; -} diff --git a/world/map/npc/xmas/2006/xmas5.txt b/world/map/npc/xmas/2006/xmas5.txt deleted file mode 100644 index ef7673dd..00000000 --- a/world/map/npc/xmas/2006/xmas5.txt +++ /dev/null @@ -1,246 +0,0 @@ -020-2.gat,22,32,0 script Xmas5 105,{ - if(XMASQUEST5 == 1) goto L_only_once; - mes "[Helper Santa]"; - mes "It's Christmas."; - mes "The time for gifts and family reunions"; - next; - - mes "[Helper Santa]"; - mes "You get a gift from me."; - mes "The kind will depend on whether"; - mes "you've been nice or naughty."; - next; - - menu "Want one?",L_nicenaughty,"No thanks.",L_no; - -L_nicenaughty: - set XMASQUEST5,1; - mes "[Helper Santa]"; - mes "In my book you're marked as..."; - next; - set @TEMP,rand(9); - if(@TEMP == 6) goto L_naughty; - goto L_nice; - -L_nice: - mes "[Helper Santa]"; - mes "...nice!"; - set @TEMP,rand(17); - next; - if(@TEMP == 0) goto L_nice_0; - if(@TEMP == 1) goto L_nice_1; - if(@TEMP == 2) goto L_nice_2; - if(@TEMP == 3) goto L_nice_3; - if(@TEMP == 4) goto L_nice_4; - if(@TEMP == 5) goto L_nice_5; - if(@TEMP == 6) goto L_nice_6; - if(@TEMP == 7) goto L_nice_7; - if(@TEMP == 8) goto L_nice_8; - if(@TEMP == 9) goto L_nice_9; - if(@TEMP == 10) goto L_nice_10; - if(@TEMP == 11) goto L_nice_11; - if(@TEMP == 12) goto L_nice_12; - if(@TEMP == 13) goto L_nice_13; - if(@TEMP == 14) goto L_nice_14; - if(@TEMP == 15) goto L_nice_15; - if(@TEMP == 16) goto L_nice_16; - if(@TEMP == 17) goto L_nice_17; - -L_naughty: - mes "[Helper Santa]"; - mes "...naughty!"; - set @TEMP,rand(6); - next; - if(@TEMP == 0) goto L_naughty_0; - if(@TEMP == 1) goto L_naughty_1; - if(@TEMP == 2) goto L_naughty_2; - if(@TEMP == 3) goto L_naughty_3; - if(@TEMP == 4) goto L_naughty_4; - if(@TEMP == 5) goto L_naughty_5; - if(@TEMP == 6) goto L_naughty_6; - -L_naughty_0: - mes "[Helper Santa]"; - mes "Ho ho ho!"; - mes "I borrowed some of your money for"; - mes "my present budget this year."; - set Zeny,Zeny-rand(500,1500); - close; - -L_naughty_1: - mes "[Helper Santa]"; - mes "You will get a spanking"; - next; - mes "[Helper Santa]"; - mes "Remember to be nice to people!"; - gmcommand "@die "; - close; - -L_naughty_2: - mes "[Helper Santa]"; - mes "But I won't mind!"; - mes "Have a char reset as a present." - next; - mes "[Helper Santa]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_naughty_3: - mes "[Helper Santa]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Helper Santa]"; - mes "Merry Christmas!"; - close; - -L_naughty_4: - mes "[Helper Santa]"; - mes "Your sex will now change!"; - mes "You always get naughty things for naughty things."; - mes "It's karma!"; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_naughty_5: - mes "[Helper Santa]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Helper Santa]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_naughty_6: - mes "[Helper Santa]"; - mes "I'll diss you around the server."; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@kami "+strcharinfo(0)+" is not in the holiday mood."; - close; - -L_nice_0: - mes "[Helper Santa]"; - mes "So you wanted money?."; - set Zeny,Zeny+rand(1,1000000); - close; - -L_nice_1: - mes "[Helper Santa]"; - mes "These hats are really hot now!"; - getitem "ChristmasTreeHat",1; - close; - -L_nice_2: - mes "[Helper Santa]"; - mes "Axe Hats are always on the cutting edge!"; - getitem "AxeHat",1; - close; - -L_nice_3: - mes "[Helper Santa]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_nice_4: - mes "[Helper Santa]"; - mes "Now you can Goggle all you want."; - getitem "Goggles",1; - close; - -L_nice_5: - mes "[Helper Santa]"; - mes "Let's Goggle all night long!"; - getitem "LeatherGoggles",1; - close; - -L_nice_6: - mes "[Helper Santa]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_nice_7: - mes "[Helper Santa]"; - mes "This patch is not an eyesore."; - getitem "Eyepatch",1; - close; - -L_nice_8: - mes "[Helper Santa]"; - mes "Bandana time!"; - getitem "Bandana",1; - close; - -L_nice_9: - mes "[Helper Santa]"; - mes "5000 exp!"; - getexp 5000,0; - close; - -L_nice_10: - mes "[Helper Santa]"; - mes "Soft packages are always nice."; - getitem "CottonShirt",1; - close; - -L_nice_11: - mes "[Helper Santa]"; - mes "Chuck Norris style!"; - getitem "RangerHat",1; - close; - -L_nice_12: - mes "[Helper Santa]"; - mes "Even Rudolph would be envious now."; - getitem "AntlerHat",1; - close; - -L_nice_13: - mes "[Helper Santa]"; - mes "Now you can become a Santa too!"; - getitem "SantaBeardHat",1; - close; - -L_nice_14: - mes "[Helper Santa]"; - mes "Now you can became a Santa too!"; - getitem "SantaHat",1; - close; - -L_nice_15: - mes "[Helper Santa]"; - mes "These gloves should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_nice_16: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "VNeckSweater",1; - close; - -L_nice_17: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_only_once: - mes "[Helper Santa]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Helper Santa]"; - mes "You're not in the Christmas spirit?"; - mes "I hope you get into this gift extravaganza soon."; - close; -} diff --git a/world/map/npc/xmas/2006/xmas6.txt b/world/map/npc/xmas/2006/xmas6.txt deleted file mode 100644 index 0f974212..00000000 --- a/world/map/npc/xmas/2006/xmas6.txt +++ /dev/null @@ -1,246 +0,0 @@ -010-2.gat,92,37,0 script Xmas6 105,{ - if(XMASQUEST6 == 1) goto L_only_once; - mes "[Helper Santa]"; - mes "It's Christmas."; - mes "The time for gifts and family reunions"; - next; - - mes "[Helper Santa]"; - mes "You get a gift from me."; - mes "The kind will depend on whether"; - mes "you've been nice or naughty."; - next; - - menu "Want one?",L_nicenaughty,"No thanks.",L_no; - -L_nicenaughty: - set XMASQUEST6,1; - mes "[Helper Santa]"; - mes "In my book you're marked as..."; - next; - set @TEMP,rand(9); - if(@TEMP == 6) goto L_naughty; - goto L_nice; - -L_nice: - mes "[Helper Santa]"; - mes "...nice!"; - set @TEMP,rand(17); - next; - if(@TEMP == 0) goto L_nice_0; - if(@TEMP == 1) goto L_nice_1; - if(@TEMP == 2) goto L_nice_2; - if(@TEMP == 3) goto L_nice_3; - if(@TEMP == 4) goto L_nice_4; - if(@TEMP == 5) goto L_nice_5; - if(@TEMP == 6) goto L_nice_6; - if(@TEMP == 7) goto L_nice_7; - if(@TEMP == 8) goto L_nice_8; - if(@TEMP == 9) goto L_nice_9; - if(@TEMP == 10) goto L_nice_10; - if(@TEMP == 11) goto L_nice_11; - if(@TEMP == 12) goto L_nice_12; - if(@TEMP == 13) goto L_nice_13; - if(@TEMP == 14) goto L_nice_14; - if(@TEMP == 15) goto L_nice_15; - if(@TEMP == 16) goto L_nice_16; - if(@TEMP == 17) goto L_nice_17; - -L_naughty: - mes "[Helper Santa]"; - mes "...naughty!"; - set @TEMP,rand(6); - next; - if(@TEMP == 0) goto L_naughty_0; - if(@TEMP == 1) goto L_naughty_1; - if(@TEMP == 2) goto L_naughty_2; - if(@TEMP == 3) goto L_naughty_3; - if(@TEMP == 4) goto L_naughty_4; - if(@TEMP == 5) goto L_naughty_5; - if(@TEMP == 6) goto L_naughty_6; - -L_naughty_0: - mes "[Helper Santa]"; - mes "Ho ho ho!"; - mes "I borrowed some of your money for"; - mes "my present budget this year."; - set Zeny,Zeny-rand(500,1500); - close; - -L_naughty_1: - mes "[Helper Santa]"; - mes "You will get a spanking"; - next; - mes "[Helper Santa]"; - mes "Remember to be nice to people!"; - gmcommand "@die "; - close; - -L_naughty_2: - mes "[Helper Santa]"; - mes "But I won't mind!"; - mes "Have a char reset as a present." - next; - mes "[Helper Santa]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_naughty_3: - mes "[Helper Santa]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Helper Santa]"; - mes "Merry Christmas!"; - close; - -L_naughty_4: - mes "[Helper Santa]"; - mes "Your sex will now change!"; - mes "You always get naughty things for naughty things."; - mes "It's karma!"; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_naughty_5: - mes "[Helper Santa]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Helper Santa]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_naughty_6: - mes "[Helper Santa]"; - mes "I'll diss you around the server."; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@kami "+strcharinfo(0)+" is not in the holiday mood."; - close; - -L_nice_0: - mes "[Helper Santa]"; - mes "So you wanted money?."; - set Zeny,Zeny+rand(1,1000000); - close; - -L_nice_1: - mes "[Helper Santa]"; - mes "These hats are really hot now!"; - getitem "ChristmasTreeHat",1; - close; - -L_nice_2: - mes "[Helper Santa]"; - mes "Axe Hats are always on the cutting edge!"; - getitem "AxeHat",1; - close; - -L_nice_3: - mes "[Helper Santa]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_nice_4: - mes "[Helper Santa]"; - mes "Now you can Goggle all you want."; - getitem "Goggles",1; - close; - -L_nice_5: - mes "[Helper Santa]"; - mes "Let's Goggle all night long!"; - getitem "LeatherGoggles",1; - close; - -L_nice_6: - mes "[Helper Santa]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_nice_7: - mes "[Helper Santa]"; - mes "This patch is not an eyesore."; - getitem "Eyepatch",1; - close; - -L_nice_8: - mes "[Helper Santa]"; - mes "Bandana time!"; - getitem "Bandana",1; - close; - -L_nice_9: - mes "[Helper Santa]"; - mes "5000 exp!"; - getexp 5000,0; - close; - -L_nice_10: - mes "[Helper Santa]"; - mes "Soft packages are always nice."; - getitem "CottonShirt",1; - close; - -L_nice_11: - mes "[Helper Santa]"; - mes "Chuck Norris style!"; - getitem "RangerHat",1; - close; - -L_nice_12: - mes "[Helper Santa]"; - mes "Even Rudolph would be envious now."; - getitem "AntlerHat",1; - close; - -L_nice_13: - mes "[Helper Santa]"; - mes "Now you can become a Santa too!"; - getitem "SantaBeardHat",1; - close; - -L_nice_14: - mes "[Helper Santa]"; - mes "Now you can became a Santa too!"; - getitem "SantaHat",1; - close; - -L_nice_15: - mes "[Helper Santa]"; - mes "These gloves should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_nice_16: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "VNeckSweater",1; - close; - -L_nice_17: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_only_once: - mes "[Helper Santa]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Helper Santa]"; - mes "You're not in the Christmas spirit?"; - mes "I hope you get into this gift extravaganza soon."; - close; -} diff --git a/world/map/npc/xmas/2006/xmas7.txt b/world/map/npc/xmas/2006/xmas7.txt deleted file mode 100644 index 46ae458a..00000000 --- a/world/map/npc/xmas/2006/xmas7.txt +++ /dev/null @@ -1,246 +0,0 @@ -003-1.gat,130,66,0 script Xmas7 105,{ - if(XMASQUEST7 == 1) goto L_only_once; - mes "[Helper Santa]"; - mes "It's Christmas."; - mes "The time for gifts and family reunions"; - next; - - mes "[Helper Santa]"; - mes "You get a gift from me."; - mes "The kind will depend on whether"; - mes "you've been nice or naughty."; - next; - - menu "Want one?",L_nicenaughty,"No thanks.",L_no; - -L_nicenaughty: - set XMASQUEST7,1; - mes "[Helper Santa]"; - mes "In my book you're marked as..."; - next; - set @TEMP,rand(9); - if(@TEMP == 6) goto L_naughty; - goto L_nice; - -L_nice: - mes "[Helper Santa]"; - mes "...nice!"; - set @TEMP,rand(17); - next; - if(@TEMP == 0) goto L_nice_0; - if(@TEMP == 1) goto L_nice_1; - if(@TEMP == 2) goto L_nice_2; - if(@TEMP == 3) goto L_nice_3; - if(@TEMP == 4) goto L_nice_4; - if(@TEMP == 5) goto L_nice_5; - if(@TEMP == 6) goto L_nice_6; - if(@TEMP == 7) goto L_nice_7; - if(@TEMP == 8) goto L_nice_8; - if(@TEMP == 9) goto L_nice_9; - if(@TEMP == 10) goto L_nice_10; - if(@TEMP == 11) goto L_nice_11; - if(@TEMP == 12) goto L_nice_12; - if(@TEMP == 13) goto L_nice_13; - if(@TEMP == 14) goto L_nice_14; - if(@TEMP == 15) goto L_nice_15; - if(@TEMP == 16) goto L_nice_16; - if(@TEMP == 17) goto L_nice_17; - -L_naughty: - mes "[Helper Santa]"; - mes "...naughty!"; - set @TEMP,rand(6); - next; - if(@TEMP == 0) goto L_naughty_0; - if(@TEMP == 1) goto L_naughty_1; - if(@TEMP == 2) goto L_naughty_2; - if(@TEMP == 3) goto L_naughty_3; - if(@TEMP == 4) goto L_naughty_4; - if(@TEMP == 5) goto L_naughty_5; - if(@TEMP == 6) goto L_naughty_6; - -L_naughty_0: - mes "[Helper Santa]"; - mes "Ho ho ho!"; - mes "I borrowed some of your money for"; - mes "my present budget this year."; - set Zeny,Zeny-rand(500,1500); - close; - -L_naughty_1: - mes "[Helper Santa]"; - mes "You will get a spanking"; - next; - mes "[Helper Santa]"; - mes "Remember to be nice to people!"; - gmcommand "@die "; - close; - -L_naughty_2: - mes "[Helper Santa]"; - mes "But I won't mind!"; - mes "Have a char reset as a present." - next; - mes "[Helper Santa]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_naughty_3: - mes "[Helper Santa]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Helper Santa]"; - mes "Merry Christmas!"; - close; - -L_naughty_4: - mes "[Helper Santa]"; - mes "Your sex will now change!"; - mes "You always get naughty things for naughty things."; - mes "It's karma!"; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_naughty_5: - mes "[Helper Santa]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Helper Santa]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_naughty_6: - mes "[Helper Santa]"; - mes "I'll diss you around the server."; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@kami "+strcharinfo(0)+" is not in the holiday mood."; - close; - -L_nice_0: - mes "[Helper Santa]"; - mes "So you wanted money?."; - set Zeny,Zeny+rand(1,1000000); - close; - -L_nice_1: - mes "[Helper Santa]"; - mes "These hats are really hot now!"; - getitem "ChristmasTreeHat",1; - close; - -L_nice_2: - mes "[Helper Santa]"; - mes "Axe Hats are always on the cutting edge!"; - getitem "AxeHat",1; - close; - -L_nice_3: - mes "[Helper Santa]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_nice_4: - mes "[Helper Santa]"; - mes "Now you can Goggle all you want."; - getitem "Goggles",1; - close; - -L_nice_5: - mes "[Helper Santa]"; - mes "Let's Goggle all night long!"; - getitem "LeatherGoggles",1; - close; - -L_nice_6: - mes "[Helper Santa]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_nice_7: - mes "[Helper Santa]"; - mes "This patch is not an eyesore."; - getitem "Eyepatch",1; - close; - -L_nice_8: - mes "[Helper Santa]"; - mes "Bandana time!"; - getitem "Bandana",1; - close; - -L_nice_9: - mes "[Helper Santa]"; - mes "5000 exp!"; - getexp 5000,0; - close; - -L_nice_10: - mes "[Helper Santa]"; - mes "Soft packages are always nice."; - getitem "CottonShirt",1; - close; - -L_nice_11: - mes "[Helper Santa]"; - mes "Chuck Norris style!"; - getitem "RangerHat",1; - close; - -L_nice_12: - mes "[Helper Santa]"; - mes "Even Rudolph would be envious now."; - getitem "AntlerHat",1; - close; - -L_nice_13: - mes "[Helper Santa]"; - mes "Now you can become a Santa too!"; - getitem "SantaBeardHat",1; - close; - -L_nice_14: - mes "[Helper Santa]"; - mes "Now you can became a Santa too!"; - getitem "SantaHat",1; - close; - -L_nice_15: - mes "[Helper Santa]"; - mes "These gloves should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_nice_16: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "VNeckSweater",1; - close; - -L_nice_17: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_only_once: - mes "[Helper Santa]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Helper Santa]"; - mes "You're not in the Christmas spirit?"; - mes "I hope you get into this gift extravaganza soon."; - close; -} diff --git a/world/map/npc/xmas/2006/xmas8.txt b/world/map/npc/xmas/2006/xmas8.txt deleted file mode 100644 index 89c2eee9..00000000 --- a/world/map/npc/xmas/2006/xmas8.txt +++ /dev/null @@ -1,246 +0,0 @@ -007-1.gat,125,37,0 script Xmas8 105,{ - if(XMASQUEST8 == 1) goto L_only_once; - mes "[Helper Santa]"; - mes "It's Christmas."; - mes "The time for gifts and family reunions"; - next; - - mes "[Helper Santa]"; - mes "You get a gift from me."; - mes "The kind will depend on whether"; - mes "you've been nice or naughty."; - next; - - menu "Want one?",L_nicenaughty,"No thanks.",L_no; - -L_nicenaughty: - set XMASQUEST8,1; - mes "[Helper Santa]"; - mes "In my book you're marked as..."; - next; - set @TEMP,rand(9); - if(@TEMP == 6) goto L_naughty; - goto L_nice; - -L_nice: - mes "[Helper Santa]"; - mes "...nice!"; - set @TEMP,rand(17); - next; - if(@TEMP == 0) goto L_nice_0; - if(@TEMP == 1) goto L_nice_1; - if(@TEMP == 2) goto L_nice_2; - if(@TEMP == 3) goto L_nice_3; - if(@TEMP == 4) goto L_nice_4; - if(@TEMP == 5) goto L_nice_5; - if(@TEMP == 6) goto L_nice_6; - if(@TEMP == 7) goto L_nice_7; - if(@TEMP == 8) goto L_nice_8; - if(@TEMP == 9) goto L_nice_9; - if(@TEMP == 10) goto L_nice_10; - if(@TEMP == 11) goto L_nice_11; - if(@TEMP == 12) goto L_nice_12; - if(@TEMP == 13) goto L_nice_13; - if(@TEMP == 14) goto L_nice_14; - if(@TEMP == 15) goto L_nice_15; - if(@TEMP == 16) goto L_nice_16; - if(@TEMP == 17) goto L_nice_17; - -L_naughty: - mes "[Helper Santa]"; - mes "...naughty!"; - set @TEMP,rand(6); - next; - if(@TEMP == 0) goto L_naughty_0; - if(@TEMP == 1) goto L_naughty_1; - if(@TEMP == 2) goto L_naughty_2; - if(@TEMP == 3) goto L_naughty_3; - if(@TEMP == 4) goto L_naughty_4; - if(@TEMP == 5) goto L_naughty_5; - if(@TEMP == 6) goto L_naughty_6; - -L_naughty_0: - mes "[Helper Santa]"; - mes "Ho ho ho!"; - mes "I borrowed some of your money for"; - mes "my present budget this year."; - set Zeny,Zeny-rand(500,1500); - close; - -L_naughty_1: - mes "[Helper Santa]"; - mes "You will get a spanking"; - next; - mes "[Helper Santa]"; - mes "Remember to be nice to people!"; - gmcommand "@die "; - close; - -L_naughty_2: - mes "[Helper Santa]"; - mes "But I won't mind!"; - mes "Have a char reset as a present." - next; - mes "[Helper Santa]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_naughty_3: - mes "[Helper Santa]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Helper Santa]"; - mes "Merry Christmas!"; - close; - -L_naughty_4: - mes "[Helper Santa]"; - mes "Your sex will now change!"; - mes "You always get naughty things for naughty things."; - mes "It's karma!"; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_naughty_5: - mes "[Helper Santa]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Helper Santa]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_naughty_6: - mes "[Helper Santa]"; - mes "I'll diss you around the server."; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@kami "+strcharinfo(0)+" is not in the holiday mood."; - close; - -L_nice_0: - mes "[Helper Santa]"; - mes "So you wanted money?."; - set Zeny,Zeny+rand(1,1000000); - close; - -L_nice_1: - mes "[Helper Santa]"; - mes "These hats are really hot now!"; - getitem "ChristmasTreeHat",1; - close; - -L_nice_2: - mes "[Helper Santa]"; - mes "Axe Hats are always on the cutting edge!"; - getitem "AxeHat",1; - close; - -L_nice_3: - mes "[Helper Santa]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_nice_4: - mes "[Helper Santa]"; - mes "Now you can Goggle all you want."; - getitem "Goggles",1; - close; - -L_nice_5: - mes "[Helper Santa]"; - mes "Let's Goggle all night long!"; - getitem "LeatherGoggles",1; - close; - -L_nice_6: - mes "[Helper Santa]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_nice_7: - mes "[Helper Santa]"; - mes "This patch is not an eyesore."; - getitem "Eyepatch",1; - close; - -L_nice_8: - mes "[Helper Santa]"; - mes "Bandana time!"; - getitem "Bandana",1; - close; - -L_nice_9: - mes "[Helper Santa]"; - mes "5000 exp!"; - getexp 5000,0; - close; - -L_nice_10: - mes "[Helper Santa]"; - mes "Soft packages are always nice."; - getitem "CottonShirt",1; - close; - -L_nice_11: - mes "[Helper Santa]"; - mes "Chuck Norris style!"; - getitem "RangerHat",1; - close; - -L_nice_12: - mes "[Helper Santa]"; - mes "Even Rudolph would be envious now."; - getitem "AntlerHat",1; - close; - -L_nice_13: - mes "[Helper Santa]"; - mes "Now you can become a Santa too!"; - getitem "SantaBeardHat",1; - close; - -L_nice_14: - mes "[Helper Santa]"; - mes "Now you can became a Santa too!"; - getitem "SantaHat",1; - close; - -L_nice_15: - mes "[Helper Santa]"; - mes "These gloves should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_nice_16: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "VNeckSweater",1; - close; - -L_nice_17: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_only_once: - mes "[Helper Santa]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Helper Santa]"; - mes "You're not in the Christmas spirit?"; - mes "I hope you get into this gift extravaganza soon."; - close; -} diff --git a/world/map/npc/xmas/2006/xmas9.txt b/world/map/npc/xmas/2006/xmas9.txt deleted file mode 100644 index 325be4a3..00000000 --- a/world/map/npc/xmas/2006/xmas9.txt +++ /dev/null @@ -1,246 +0,0 @@ -011-4.gat,71,34,0 script Xmas9 105,{ - if(XMASQUEST9 == 1) goto L_only_once; - mes "[Helper Santa]"; - mes "It's Christmas."; - mes "The time for gifts and family reunions"; - next; - - mes "[Helper Santa]"; - mes "You get a gift from me."; - mes "The kind will depend on whether"; - mes "you've been nice or naughty."; - next; - - menu "Want one?",L_nicenaughty,"No thanks.",L_no; - -L_nicenaughty: - set XMASQUEST9,1; - mes "[Helper Santa]"; - mes "In my book you're marked as..."; - next; - set @TEMP,rand(9); - if(@TEMP == 6) goto L_naughty; - goto L_nice; - -L_nice: - mes "[Helper Santa]"; - mes "...nice!"; - set @TEMP,rand(17); - next; - if(@TEMP == 0) goto L_nice_0; - if(@TEMP == 1) goto L_nice_1; - if(@TEMP == 2) goto L_nice_2; - if(@TEMP == 3) goto L_nice_3; - if(@TEMP == 4) goto L_nice_4; - if(@TEMP == 5) goto L_nice_5; - if(@TEMP == 6) goto L_nice_6; - if(@TEMP == 7) goto L_nice_7; - if(@TEMP == 8) goto L_nice_8; - if(@TEMP == 9) goto L_nice_9; - if(@TEMP == 10) goto L_nice_10; - if(@TEMP == 11) goto L_nice_11; - if(@TEMP == 12) goto L_nice_12; - if(@TEMP == 13) goto L_nice_13; - if(@TEMP == 14) goto L_nice_14; - if(@TEMP == 15) goto L_nice_15; - if(@TEMP == 16) goto L_nice_16; - if(@TEMP == 17) goto L_nice_17; - -L_naughty: - mes "[Helper Santa]"; - mes "...naughty!"; - set @TEMP,rand(6); - next; - if(@TEMP == 0) goto L_naughty_0; - if(@TEMP == 1) goto L_naughty_1; - if(@TEMP == 2) goto L_naughty_2; - if(@TEMP == 3) goto L_naughty_3; - if(@TEMP == 4) goto L_naughty_4; - if(@TEMP == 5) goto L_naughty_5; - if(@TEMP == 6) goto L_naughty_6; - -L_naughty_0: - mes "[Helper Santa]"; - mes "Ho ho ho!"; - mes "I borrowed some of your money for"; - mes "my present budget this year."; - set Zeny,Zeny-rand(500,1500); - close; - -L_naughty_1: - mes "[Helper Santa]"; - mes "You will get a spanking"; - next; - mes "[Helper Santa]"; - mes "Remember to be nice to people!"; - gmcommand "@die "; - close; - -L_naughty_2: - mes "[Helper Santa]"; - mes "But I won't mind!"; - mes "Have a char reset as a present." - next; - mes "[Helper Santa]"; - mes "Abracadabra!"; - gmcommand "@charstreset "+strcharinfo(0); - gmcommand "@charskreset "+strcharinfo(0); - close; - -L_naughty_3: - mes "[Helper Santa]"; - mes "You will now get randomly warped!"; - next; - gmcommand "@jump "; - mes "[Helper Santa]"; - mes "Merry Christmas!"; - close; - -L_naughty_4: - mes "[Helper Santa]"; - mes "Your sex will now change!"; - mes "You always get naughty things for naughty things."; - mes "It's karma!"; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@charchangesex "+strcharinfo(0); - close; - -L_naughty_5: - mes "[Helper Santa]"; - mes "I'll now kill all monsters on this map."; - next; - mes "[Helper Santa]"; - mes "Done!"; - gmcommand "@killmonster2 "; - close; - -L_naughty_6: - mes "[Helper Santa]"; - mes "I'll diss you around the server."; - next; - mes "[Helper Santa]"; - mes "Ho ho ho!"; - gmcommand "@kami "+strcharinfo(0)+" is not in the holiday mood."; - close; - -L_nice_0: - mes "[Helper Santa]"; - mes "So you wanted money?."; - set Zeny,Zeny+rand(1,1000000); - close; - -L_nice_1: - mes "[Helper Santa]"; - mes "These hats are really hot now!"; - getitem "ChristmasTreeHat",1; - close; - -L_nice_2: - mes "[Helper Santa]"; - mes "Axe Hats are always on the cutting edge!"; - getitem "AxeHat",1; - close; - -L_nice_3: - mes "[Helper Santa]"; - mes "You just won a Pirate Hat!"; - getitem "PirateHat",1; - close; - -L_nice_4: - mes "[Helper Santa]"; - mes "Now you can Goggle all you want."; - getitem "Goggles",1; - close; - -L_nice_5: - mes "[Helper Santa]"; - mes "Let's Goggle all night long!"; - getitem "LeatherGoggles",1; - close; - -L_nice_6: - mes "[Helper Santa]"; - mes "You just won a Circlet!"; - getitem "Circlet",1; - close; - -L_nice_7: - mes "[Helper Santa]"; - mes "This patch is not an eyesore."; - getitem "Eyepatch",1; - close; - -L_nice_8: - mes "[Helper Santa]"; - mes "Bandana time!"; - getitem "Bandana",1; - close; - -L_nice_9: - mes "[Helper Santa]"; - mes "5000 exp!"; - getexp 5000,0; - close; - -L_nice_10: - mes "[Helper Santa]"; - mes "Soft packages are always nice."; - getitem "CottonShirt",1; - close; - -L_nice_11: - mes "[Helper Santa]"; - mes "Chuck Norris style!"; - getitem "RangerHat",1; - close; - -L_nice_12: - mes "[Helper Santa]"; - mes "Even Rudolph would be envious now."; - getitem "AntlerHat",1; - close; - -L_nice_13: - mes "[Helper Santa]"; - mes "Now you can become a Santa too!"; - getitem "SantaBeardHat",1; - close; - -L_nice_14: - mes "[Helper Santa]"; - mes "Now you can became a Santa too!"; - getitem "SantaHat",1; - close; - -L_nice_15: - mes "[Helper Santa]"; - mes "These gloves should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_nice_16: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "VNeckSweater",1; - close; - -L_nice_17: - mes "[Helper Santa]"; - mes "This should keep you warm."; - getitem "TurtleneckSweater",1; - close; - -L_only_once: - mes "[Helper Santa]"; - mes "You already got one from me."; - close; - -L_no: - mes "[Helper Santa]"; - mes "You're not in the Christmas spirit?"; - mes "I hope you get into this gift extravaganza soon."; - close; -} diff --git a/world/map/npc/xmas/2007/after-xmas.txt b/world/map/npc/xmas/2007/after-xmas.txt deleted file mode 100644 index e62205ed..00000000 --- a/world/map/npc/xmas/2007/after-xmas.txt +++ /dev/null @@ -1,140 +0,0 @@ -020-1.gat,78,85,0 script Santa 105,{ - if (QUEST_xmas07_state == 2) goto L_State2; - mes "[Santa Clause]"; - mes "Ho! Ho! Ho!"; - mes "You people from The Mana World"; - mes "were very nice to me. So many"; - mes "milk and cookies for me..."; - next; - - if (QUEST_xmas07_milk + QUEST_xmas07_cookies == 0) goto L_Nothing; - if (QUEST_xmas07_milk + QUEST_xmas07_cookies < 10) goto L_Notenough; - - set @leastItems, $QUEST_xmas07_milk; - if ($QUEST_xmas07_milk > $QUEST_xmas07_cookies) set @leastItems, $QUEST_xmas07_cookies; - if (@leastItems >= 100) set @presents, 1; - if (@leastItems >= 200) set @presents, 2; - if (@leastItems >= 400) set @presents, 3; - if (@leastItems >= 800) set @presents, 4; - if (@leastItems >= 1600) set @presents, 5; - if (@leastItems >= 3200) set @presents, 6; - if (@leastItems >= 6400) set @presents, 7; - if (@leastItems >= 12800) set @presents, 8; - if (@leastItems >= 25600) set @presents, 9; - if (@leastItems >= 51200) set @presents, 10; - if (@leastItems >= 102400) set @presents, 11; - if (@leastItems >= 204800) set @presents, 12; - if (@leastItems >= 409600) set @presents, 13; - if (@leastItems >= 819200) set @presents, 14; - - - mes "[Santa Clause]"; - mes "Now you deserve your presents. I got"; - mes @presents + " presents for you. Do you"; - mes "want them now?"; - next; - menu "Yes! Presents! Presents! Presents!", -, "No, maybe later.", L_Close; - - - L_Givepresent: - if (@presents == QUEST_xmas07_presents) goto L_Enoughpresents; - - mes "[Santa Clause]"; - mes "Let's see what I got for you in my sack...."; - next; - - set QUEST_xmas07_presents, QUEST_xmas07_presents + 1; - set @TEMP,rand(7); - if(@TEMP == 0) goto L_present_0; - if(@TEMP == 1) goto L_present_1; - if(@TEMP == 2) goto L_present_2; - if(@TEMP == 3) goto L_present_3; - if(@TEMP == 4) goto L_present_4; - if(@TEMP == 5) goto L_present_5; - if(@TEMP == 6) goto L_present_6; - - - L_Enoughpresents: - mes "[Santa Clause]"; - mes "That's all I got for you."; - mes "Merry Christmas!"; - set QUEST_xmas07_state, 2; - close; - - L_present_0: - mes "[Santa Clause]"; - mes "Here you got a new funky hat!"; - getitem "FunkyHat", 1; - next; - goto L_Givepresent; - - L_present_1: - mes "[Santa Clause]"; - mes "Here you got a pompouse top hat!"; - getitem "TopHat", 1; - next; - goto L_Givepresent; - - L_present_2: - mes "[Santa Clause]"; - mes "Here you got a funny elven hat!"; - getitem "ChristmasElfHat", 1; - next; - goto L_Givepresent; - - L_present_3: - mes "[Santa Clause]"; - mes "Here you got a creepy face mask!"; - getitem "FaceMask", 1; - next; - goto L_Givepresent; - - L_present_4: - mes "[Santa Clause]"; - mes "Here you got a stylish mushroom hat!"; - getitem "MushHat", 1; - next; - goto L_Givepresent; - - L_present_5: - mes "[Santa Clause]"; - mes "Here you got an evil mushroom hat!"; - getitem "ShroomHat", 1; - next; - goto L_Givepresent; - - L_present_6: - mes "[Santa Clause]"; - mes "Here you got a beautiful skirt!"; - getitem "CottonSkirt", 1; - next; - goto L_Givepresent; - - L_State2: - mes "[Santa Clause]"; - mes "Ho! Ho! Ho!"; - mes "I hope you like your presents."; - mes "See you next year."; - close; - - L_Notenough: - mes "[Santa Clause]"; - mes "But you did nothing to help. You"; - mes "only donated " + (QUEST_xmas07_milk + QUEST_xmas07_cookies) + " items and now you"; - mes "want a present while others did"; - mes "all the work? get lost!"; - close; - - L_Nothing: - mes "[Santa Clause]"; - mes "But you did nothing to help. You"; - mes "did not donate one item while"; - mes "others did all the work."; - mes "Get lost!"; - close; - - L_Close: - close; - - -}
\ No newline at end of file diff --git a/world/map/npc/xmas/2007/pre-xmas.txt b/world/map/npc/xmas/2007/pre-xmas.txt deleted file mode 100644 index 1adc37bb..00000000 --- a/world/map/npc/xmas/2007/pre-xmas.txt +++ /dev/null @@ -1,224 +0,0 @@ -020-1.gat,76,85,0 script Assistant 105,{ - if (QUEST_xmas07_state == 1) goto L_State1; - - mes "[Santas Assistant]"; - mes "I got really bad news."; - mes "Santa Clause won't come to"; - mes "The Mana World this year."; - next; - menu "Who cares? I don't want any presents.", L_Close, "Why not?", -; - mes "[Santas Assistant]"; - mes "Well, he is in some kind of"; - mes "depression. He says people"; - mes "love him only for his presents"; - mes "and don't really care about"; - mes "him as a person."; - next; - menu "Well, not my problem.", L_Close, "Can't we do something for him?", -; - mes "[Santas Assistant]"; - mes "Well, he really loves milk"; - mes "and cookies. When we would"; - mes "collect a really large pile"; - mes "of milk and cookies he will"; - mes "maybe come and pay us a visit."; - next; - menu "Sorry, I got no time for that.", L_Close, "Great idea! Let's begin.", -; - set QUEST_xmas07_state, 1; - - L_State1: - menu "I got some milk.", L_Exchange_Milk, "I got some cookies.", L_Exchange_Cookies, "How is the collecting going?", L_Status, "Where can I find milk and cookies?", L_Help; - - L_Exchange_Milk: - if (countitem("Milk") == 0) goto L_Exchange_Gotnothing; - mes "[Santas Assistant]"; - mes "Aaaaah, " + countitem("Milk") + " milk."; - mes "Thanks for your contribution."; - set QUEST_xmas07_milk, QUEST_xmas07_milk + countitem("Milk"); - set $QUEST_xmas07_milk, $QUEST_xmas07_milk + countitem("Milk"); - delitem("Milk"), countitem("Milk"); - close; - - L_Exchange_Cookies: - if (countitem("SantaCookie") == 0) goto L_Exchange_Gotnothing; - mes "[Santas Assistant]"; - mes "Aaaaah, " + countitem("SantaCookie") + " cookies."; - mes "Thanks for your contribution."; - set QUEST_xmas07_cookies, QUEST_xmas07_cookies + countitem("SantaCookie"); - set $QUEST_xmas07_cookies, $QUEST_xmas07_cookies + countitem("SantaCookie"); - delitem(SantaCookie"), countitem("SanteCookie"); - close; - - L_Help: - mes "[Santas Assistant]"; - mes "Milk is dropped by santa slimes and fluffies."; - mes "You can find Santa slimes on the"; - mes "snow field to the south and fluffies"; - mes "at the coast south of Hurnscald."; - next; - mes "[Santas Assistant]"; - mes "Rudolph and Santa slimes"; - mes "always bring some cookies with them."; - close; - - L_Exchange_Gotnothing: - mes "[Santas Assistant]"; - mes "Actually, you don't seem to have any."; - close; - - L_Status: - mes "[Santas Assistant]"; - mes "OK, thus far you brought me"; - mes QUEST_xmas07_milk + " packets of milk and"; - mes QUEST_xmas07_cookies + " christmas cookies."; - mes "All people together brought"; - mes $QUEST_xmas07_milk + " packets of milk and"; - mes $QUEST_xmas07_cookies + " christmas cookies."; - next; - mes "[Santas Assistant]"; - set @leastItems, $QUEST_xmas07_milk; - if ($QUEST_xmas07_milk > $QUEST_xmas07_cookies) set @leastItems, $QUEST_xmas07_cookies; - if (@leastItems >= 819200) goto L_Present14; - if (@leastItems >= 409600) goto L_Present13; - if (@leastItems >= 204800) goto L_Present12; - if (@leastItems >= 102400) goto L_Present11; - if (@leastItems >= 51200) goto L_Present10; - if (@leastItems >= 25600) goto L_Present9; - if (@leastItems >= 12800) goto L_Present8; - if (@leastItems >= 6400) goto L_Present7; - if (@leastItems >= 3200) goto L_Present6; - if (@leastItems >= 1600) goto L_Present5; - if (@leastItems >= 800) goto L_Present4; - if (@leastItems >= 400) goto L_Present3; - if (@leastItems >= 200) goto L_Present2; - if (@leastItems >= 100) goto L_Present1; - mes "I guess that won't impress santa"; - mes "much. We need at least 100 of"; - mes "both to make him come to us."; - close; - - L_Present1: - mes "This means santa will bring"; - mes "everyone a present. When we"; - mes "can collect 200 of each he"; - mes "will maybe give everyone two"; - mes "presents."; - close; - - L_Present2: - mes "This means santa will bring"; - mes "everyone two presents. When we"; - mes "can collect 400 of each he"; - mes "will maybe give everyone three"; - mes "presents."; - close; - - L_Present3: - mes "This means santa will bring"; - mes "everyone three presents. When we"; - mes "can collect 800 of each he"; - mes "will maybe give everyone four"; - mes "presents."; - close; - - L_Present4: - mes "This means santa will bring"; - mes "everyone four presents. When we"; - mes "can collect 1600 of each he"; - mes "will maybe give everyone five"; - mes "presents."; - close; - - L_Present5: - mes "This means santa will bring"; - mes "everyone five presents. When we"; - mes "can collect 3200 of each he"; - mes "will maybe give everyone six"; - mes "presents."; - close; - - L_Present6: - mes "This means santa will bring"; - mes "everyone six presents. When we"; - mes "can collect 6400 of each he"; - mes "will maybe give everyone seven"; - mes "presents."; - close; - - L_Present7: - mes "This means santa will bring"; - mes "everyone seven presents. When we"; - mes "can collect 12800 of each he"; - mes "will maybe give everyone eight"; - mes "presents."; - close; - - L_Present8: - mes "This means santa will bring"; - mes "everyone eight presents. When we"; - mes "can collect 25600 of each he"; - mes "will maybe give everyone nine"; - mes "presents."; - close; - - L_Present9: - mes "This means santa will bring"; - mes "everyone nine presents. When we"; - mes "can collect 51200 of each he"; - mes "will maybe give everyone ten"; - mes "presents."; - close; - - L_Present10: - mes "Over fiftythousand of both?"; - mes "Did you guys hire some chinese"; - mes "gold farmers?"; - mes "This means santa will bring"; - mes "everyone ten presents. When we"; - mes "can collect 102400 of each he"; - mes "will maybe give everyone eleven"; - mes "presents."; - close; - - L_Present11: - mes "What? You guys broke the"; - mes "hundredthousand item limit??"; - mes "This means santa will bring"; - mes "everyone eleven presents. When we"; - mes "can collect 204800 of each he"; - mes "will maybe give everyone twelve"; - mes "presents."; - close; - - L_Present12: - mes "Another hundredthousand of each?"; - mes "You guys really have no live!"; - mes "This means santa will bring"; - mes "everyone twelfe presents. When we"; - mes "can collect 404800 of each he"; - mes "will maybe give everyone thirteen"; - mes "presents."; - close; - - L_Present13: - mes "What the f...? Four Hundred Thousand???"; - mes "There is no way people collected"; - mes "that many stuff in just a week."; - mes "This means santa will bring"; - mes "everyone thirteen presents. When we"; - mes "can collect 819200 of each he"; - mes "will maybe give everyone fourteen"; - mes "presents."; - close; - - L_Present14: - mes "OK, OK, you guys found a bug"; - mes "to cheat the christmas event"; - mes "this year. You will each get"; - mes "fourteen presents."; - mes "But this is really enough."; - mes "Are you happy now?"; - close; - - L_Close: - close; -} diff --git a/world/map/npc/xmas/2008/event.txt b/world/map/npc/xmas/2008/event.txt deleted file mode 100644 index 228b8e3d..00000000 --- a/world/map/npc/xmas/2008/event.txt +++ /dev/null @@ -1,604 +0,0 @@ -// - -020-1.gat,78,85,0 script Santa 105,{ - mes "[Santa Claus]"; - mes "\"Ho! Ho! Ho!\""; - next; - - if (QUEST_xmas08_state == 0) goto L_SantaStart; - if (QUEST_xmas08_state & (1 << 10)) goto L_SantaFinished; - - mes "[Santa Claus]"; - mes "\"So, how are we doing?\""; - next; - menu "I've found them all!", L_SantaCheck, "I still have a few to find.", -, "What am I doing again?", L_SantaExplain; - mes "[Santa Claus]"; - mes "\"Well that's okay."; - mes "Please do keep searching!\""; - close; - -L_SantaCheck: - if (QUEST_xmas08_state & 0x3FF == 0x3FF) goto L_SantaComplete; - mes "[Santa Claus]"; - mes "\"Ah now, please don't lie to me, I don't want to have to put you on my naughty list!\""; - close; - -L_SantaComplete: - mes "[Santa Claus]"; - mes "\"Splendid!"; - mes "I knew I could count on you to find them all.\""; - next; - mes "[Santa Claus]"; - mes "\"Now, let me see what I have here for you.\""; - next; - mes "Santa fumbles around in a large sack and pulls out a Mouboo head hat!"; - getitem "MoubooHead",1; - set QUEST_xmas08_state, QUEST_xmas08_state | (1 << 10); - next; - mes "[Santa Claus]"; - mes "\"I thought you'd like that."; - mes "It's a very good likeness, don't you think?\""; - next; - mes "[Santa Claus]"; - mes "\"Well now, since I know all my Reinboo are safe,"; - mes "I can get back to giving out presents to the people of The Mana World.\""; - next; - mes "[Santa Claus]"; - mes "\"Once again, thank you very much for helping me out."; - mes ""; - mes "Merry Christmas!\""; - close; - -L_SantaExplain: - mes "[Santa Claus]"; - mes "\"Well you agreed to help me find all nine of my lost Reinboo."; - mes "Until I know they're all safe and well I don't feel able to give out any presents.\""; - close; - - -L_SantaStart: - mes "[Santa Claus]"; - mes "\"I came all this way to bring presents to the people of The Mana World,"; - mes "but it seems my reinboo's have all got lost!\""; - next; - mes "[Santa Claus]"; - mes "\"So you see I won't be able to give out any presents until I know they're all safe and well."; - mes ""; - if (BaseLevel < 20) goto L_SantaYoung; - mes "Will you help me find all nine of them, please?\""; - next; - menu "Of course I will, Santa!", L_SantaStartYes, "Sorry, I have better things to do.", -; - close; - -L_SantaYoung: - mes "\"I'd ask you to help me find them, but I think you're still a bit young.\""; - close; - -L_SantaStartYes: - set QUEST_xmas08_state, QUEST_xmas08_state | 1; - mes "[Santa Claus]"; - mes "\"Oh that is excellent news!"; - mes "Thank you.\""; - next; - mes "Santa shakes your hand with delight."; - close; - - -L_SantaFinished: - set @TEMP,rand(2); - if(@TEMP == 0) goto L_Chat1; - if(@TEMP == 1) goto L_Chat2; - -L_Chat1: - mes "[Santa Claus]"; - mes "\"Ahh, it's so great to see everyone's smiles when they open a present, don't you think?\""; - close; - -L_Chat2: - mes "[Santa Claus]"; - mes "\"Did I remember to get Mrs. Claus something?"; - mes "Oh dear, I can't remember if I did.\""; - close; -} - -//Reinboo Locations - for temp reference. -//004-1 51 25 -//005-1 178 41 -//009-3 23 105 -//012-1 47 38 -//013-1 130 21 -//014-1 91 19 -//015-1 50 76 -//016-1 33 87 -//020-1 98 116 - -004-1.gat,51,25,0 script Dasher 170,{ - if (QUEST_xmas08_state & (1 << 1)) goto L_ChatReinboo; - if (QUEST_xmas08_state & 1) goto L_FoundReinboo; - - mes "The Reinboo seems to ignore you"; - close; - -L_FoundReinboo: - mes "[Dasher]"; - mes "\"Say, you smell like Santa Claus."; - mes ""; - mes "You don't look much like him though.\""; - next; - menu "Santa asked me to help find you.", -; - mes "[Dasher]"; - mes "\"Oh well, in that case you can tell him that I'm right here and I'm fine."; - mes ""; - mes "I suppose I should explain how I got here really.\""; - next; - mes "[Dasher]"; - mes "\"I was flying about with a few other Reinboo after we got here,"; - mes "we were playing games, any way I got rather tired of flying and ended up having to land in this area."; - mes "So I need to rest up for a while before I can make it back to Santa.\""; - next; - menu "Okay, I'll Santa that when I see him."; - mes "[Dasher]"; - mes "\"Thank you and Merry Christmas!\""; - set QUEST_xmas08_state, QUEST_xmas08_state | (1 << 1); - close; - -L_ChatReinboo: - set @TEMP,rand(2); - if(@TEMP == 0) goto L_Chat1; - if(@TEMP == 1) goto L_Chat2; - -L_Chat1: - mes "[Dasher]"; - mes "\"It sure is hot out here in the desert.\""; - close; - -L_Chat2: - mes "[Dasher]"; - mes "\"I wonder what Santa got me for Christmas.\""; - close; -} - -005-1.gat,178,41,0 script Dancer 170,{ - if (QUEST_xmas08_state & (1 << 2)) goto L_ChatReinboo; - if (QUEST_xmas08_state & 1) goto L_FoundReinboo; - - mes "The Reinboo seems to ignore you"; - close; - -L_FoundReinboo: - mes "[Dancer]"; - mes "\"Hrmm, you smell quite like Santa Claus.\""; - next; - menu "I've been sent by Santa to find you.", -; - mes "[Dancer]"; - mes "\"Oh I see."; - mes "I'm just doing a bit of sight seeing, I haven't been to The Mana World before."; - mes ""; - mes "The snakes down there seem to lack the Christmas spirit so I'm walking around up here.\""; - next; - mes "[Dancer]"; - mes "\"If you could, can you tell Santa that I'm okay and I'll be back shortly?\""; - next; - menu "Sure!", -; - mes "[Dancer]"; - mes "\"Great!"; - mes "Happy Christmas!\""; - set QUEST_xmas08_state, QUEST_xmas08_state | (1 << 2); - close; - -L_ChatReinboo: - set @TEMP,rand(2); - if(@TEMP == 0) goto L_Chat1; - if(@TEMP == 1) goto L_Chat2; - -L_Chat1: - mes "[Dancer]"; - mes "\"Let's see, I've been around the forest and I'm nearly done with the desert now."; - mes "I guess after that it's back up to Santa.\""; - close; - -L_Chat2: - mes "[Dancer]"; - mes "\"The snakes don't seem to understand a word I'm saying.\""; - close; -} - -009-3.gat,23,105,0 script Prancer 170,{ - if (QUEST_xmas08_state & (1 << 3)) goto L_ChatReinboo; - if (QUEST_xmas08_state & 1) goto L_FoundReinboo; - - mes "The Reinboo seems to ignore you"; - close; - -L_FoundReinboo: - mes "[Prancer]"; - mes "\"Santa?\""; - next; - mes "[Prancer]"; - mes "\"No, wait you're not Santa Claus.\""; - next; - menu "Santa sent me to find you!", -; - mes "[Prancer]"; - mes "\"Oh really?"; - mes "That's good to know.\""; - next; - menu "How did you get down here by the way?", -; - mes "[Prancer]"; - mes "\"To be honest with you I have absolutely no idea."; - mes "But I'm perfectly fine."; - mes "If Santa could come and help me out of here, that would be nice.\""; - next; - menu "Okay, I'll tell him.", -; - mes "[Prancer]"; - mes "\"Thank you!\""; - set QUEST_xmas08_state, QUEST_xmas08_state | (1 << 3); - close; - -L_ChatReinboo: - set @TEMP,rand(2); - if(@TEMP == 0) goto L_Chat1; - if(@TEMP == 1) goto L_Chat2; - -L_Chat1: - mes "[Prancer]"; - mes "\"It's rather cold down here, it's a good job I have that fire to warm myself with.\""; - close; - -L_Chat2: - mes "[Prancer]"; - mes "\"I still can't remember how I ended up down here.\""; - close; -} - -012-1.gat,47,38,0 script Vixen 170,{ - if (QUEST_xmas08_state & (1 << 4)) goto L_ChatReinboo; - if (QUEST_xmas08_state & 1) goto L_FoundReinboo; - - mes "The Reinboo seems to ignore you"; - close; - -L_FoundReinboo: - mes "[Vixen]"; - mes "\"Hello there."; - mes "What can I do for you?\""; - next; - menu "I'm finding all the Reinboo for Santa!", -; - mes "[Vixen]"; - mes "\"You came all the way up here just to find me?"; - mes "Wow, you must be such a nice person to do that!\""; - next; - mes "[Vixen]"; - mes "\"Hrmm, I guess Santa must be a bit worried though."; - mes "Could you tell him where I am and that I'm okay?\""; - next; - menu "Sure thing.", -; - mes "[Vixen]"; - mes "\"Thank you very much."; - mes ""; - mes "Merry Christmas!\""; - set QUEST_xmas08_state, QUEST_xmas08_state | (1 << 4); - close; - -L_ChatReinboo: - set @TEMP,rand(2); - if(@TEMP == 0) goto L_Chat1; - if(@TEMP == 1) goto L_Chat2; - -L_Chat1: - mes "[Vixen]"; - mes "\"What a lovely view you get from here!\""; - close; - -L_Chat2: - mes "[Vixen]"; - mes "\"I hope walking up here didn't tire you out.\""; - close; -} - -013-1.gat,130,21,0 script Comet 170,{ - if (QUEST_xmas08_state & (1 << 5)) goto L_ChatReinboo; - if (QUEST_xmas08_state & 1) goto L_FoundReinboo; - - mes "The Reinboo seems to ignore you"; - close; - -L_FoundReinboo: - mes "[Comet]"; - mes "\"Erm.. Hi!"; - mes "Why do you smell like Santa?\""; - next; - menu "Probably because he shook my hand.", -; - mes "[Comet]"; - mes "\"Oh, so you've been talking to him have you."; - mes ""; - mes "No don't say it, let me guess.\""; - next; - mes "[Comet]"; - mes "\"Santa has sent you to find all of his Reinboo because he's lost them."; - mes "Is that about right?\""; - next; - menu "Yup, that's it!", -; - mes "[Comet]"; - mes "\"It's happened before, long story."; - mes ""; - mes "So yeah, just tell him that I'm here, I'll make my way back to him later.\""; - next; - menu "Okay, I will.", -; - mes "[Comet]"; - mes "\"So I suppose you'd like to know how I ended up... wherever I am.\""; - next; - mes "[Comet]"; - mes "\"A few of us were flying about, as we do."; - mes "Then this big gust of wind came and carried me over this forest!"; - mes "I was forced to land just down there on the road."; - mes "I've just had a quick nap and I'll try and make it back to Santa soon.\""; - next; - menu "Ah right, well I'll tell Santa that too.", -; - mes "[Comet]"; - mes "\"Okay, thanks for finding me."; - mes "Merry Christmas!\""; - set QUEST_xmas08_state, QUEST_xmas08_state | (1 << 5); - close; - -L_ChatReinboo: - set @TEMP,rand(2); - if(@TEMP == 0) goto L_Chat1; - if(@TEMP == 1) goto L_Chat2; - -L_Chat1: - mes "[Comet]"; - mes "\"I'll tell you what, these flowers taste nice.\""; - close; - -L_Chat2: - mes "[Comet]"; - mes "\"I wonder where the others are?\""; - close; -} - -014-1.gat,91,19,0 script Cupid 170,{ - if (QUEST_xmas08_state & (1 << 6)) goto L_ChatReinboo; - if (QUEST_xmas08_state & 1) goto L_FoundReinboo; - - mes "The Reinboo seems to ignore you"; - close; - -L_FoundReinboo: - menu "Hi, Santa sent me to find you.", -; - mes "[Cupid]"; - mes "\"Hi!"; - mes "Santa sent you to find me? Why what's happened?\""; - next; - menu "All of the Reinboo have gone missing!", -; - mes "[Cupid]"; - mes "\"Oh dear, I thought I was the only one who went off to explore."; - mes ""; - mes "I thought it would be nice to explore the forests around here."; - mes "We don't have forests like this where I live.\""; - next; - menu "What do the forests where you live look like?", -; - mes "[Cupid]"; - mes "\"Did you see the Christmas tree by Santa?"; - mes "It's pretty much all like that, of course we decorated the tree Santa is next to.\""; - next; - menu "I'll tell Santa you're here then, okay?", -; - mes "[Cupid]"; - mes "\"Yes, please do."; - mes "Oh, Happy Christmas!\""; - set QUEST_xmas08_state, QUEST_xmas08_state | (1 << 6); - close; - -L_ChatReinboo: - set @TEMP,rand(2); - if(@TEMP == 0) goto L_Chat1; - if(@TEMP == 1) goto L_Chat2; - -L_Chat1: - mes "[Cupid]"; - mes "\"Do you think there is any fish in this river.\""; - close; - -L_Chat2: - mes "[Cupid]"; - mes "\"I wonder what Santa looks like without a beard.\""; - close; -} - -015-1.gat,50,76,0 script Donner 170,{ - if (QUEST_xmas08_state & (1 << 7)) goto L_ChatReinboo; - if (QUEST_xmas08_state & 1) goto L_FoundReinboo; - - mes "The Reinboo seems to ignore you"; - close; - -L_FoundReinboo: - menu "Hi, Santa sent me to find you.", -; - mes "[Donner]"; - mes "\"Santa? Tell Santa I won't work for him anymore.\""; - next; - menu "Why?", -; - mes "[Donner]"; - mes "\"I got enough of that fat bum. We have to pull him all around the globe and he gets all the praise.\""; - next; - mes "[Donner]"; - mes "\"Do you know how heavy that guy is? He also pays bad and we always have to work on holidays.\""; - next; - menu "But Santa needs you!", -; - mes "[Donner]"; - mes "\"Really? What would he do to persuade me to keep working for him?\""; - next; - menu "How about a 5% raise?",-; - mes "[Donner]"; - mes "\"I think someone with my work experience deserves more than that.\""; - next; - menu "Then a 10% raise?",-; - mes "[Donner]"; - mes "\"Sounds better."; - mes "But I think I can find someone else in the present delivery industry who is willing to pay that."; - mes "I've heard the easter bunnies are hiring...\""; - next; - menu "How about a health plan?",-; - mes "[Donner]"; - mes "\"Including dental care?\""; - next; - menu "Sure.",-; - mes "[Donner]"; - mes "\"And full sickness pay?\""; - next; - menu "I am pretty sure he will agree to that.",-; - mes "[Donner]"; - mes "\"OK, tell Santa I will come back to work tomorrow.\""; - set QUEST_xmas08_state, QUEST_xmas08_state | (1 << 7); - close; - -L_ChatReinboo: - set @TEMP,rand(2); - if(@TEMP == 0) goto L_Chat1; - if(@TEMP == 1) goto L_Chat2; - -L_Chat1: - mes "[Donner]"; - mes "\"Santa had better pull through on this deal.\""; - close; - -L_Chat2: - mes "[Donner]"; - mes "\"I wonder if I could get more holiday as well.\""; - close; -} - -016-1.gat,33,87,0 script Blitzen 170,{ - if (QUEST_xmas08_state & (1 << 8)) goto L_ChatReinboo; - - mes "[Blitzen]"; - mes "\"HIC!...HIC!....HIC!...\""; - next; - mes "The Reinboo staggers and almost falls down, but catches itself in the last moment."; - next; - mes "[Blitzen]"; - mes "\"Oh boy, I don't feel well.\""; - - if (QUEST_xmas08_state & 1) goto L_FoundReinboo; - - close; - -L_FoundReinboo: - next; - menu "Are you alright?",-; - mes "[Blitzen]"; - mes "\"Are you... are y-you... are you santa?\""; - next; - menu "No, but he sent me to search for you.",-; - mes "[Blitzen]"; - mes "\"I... I was searching for S-Santa aaaaall around."; - mes "...went to pub HIC! to warm myself HIC!\""; - next; - mes "[Blitzen]"; - mes "\"The nice man gave me warm drink HIC!\""; - next; - mes "[Blitzen]"; - mes "\"First mug tasted strange HIC! Second better HIC! Third really good HIC\""; - next; - mes "[Blitzen]"; - mes "\"After the fourth mug everything started spinning.\""; - next; - mes "[Blitzen]"; - mes "\"No idea what happened then.\""; - next; - mes "[Blitzen]"; - mes "\"HIC!\""; - next; - menu "You are drunk.",-; - mes "[Blitzen]"; - mes "\"Seems so.\""; - next; - menu "I will show you the way to Santa",-; - mes "[Blitzen]"; - mes "\"Th...Thank you.\""; - next; - mes "[Blitzen]"; - mes "\"I think I will find the way now... I hope.\""; - next; - mes "[Blitzen]"; - mes "\"HIC!\""; - set QUEST_xmas08_state, QUEST_xmas08_state | (1 << 8); - close; - -L_ChatReinboo: - set @TEMP,rand(2); - if(@TEMP == 0) goto L_Chat1; - if(@TEMP == 1) goto L_Chat2; - -L_Chat1: - mes "[Blitzen]"; - mes "\"Ooooh, my head!\""; - close; - -L_Chat2: - mes "[Blitzen]"; - mes "\"I promise, I will stop drinking. I know I can do it. I did it a hundred times.\""; - close; -} - -020-1.gat,98,116,0 script Rudolf 170,{ - if (QUEST_xmas08_state & (1 << 9)) goto L_ChatReinboo; - if (QUEST_xmas08_state & 1) goto L_FoundReinboo; - - mes "The Reinboo seems to ignore you"; - close; - -L_FoundReinboo: - menu "Hi!", -; - mes "[Rudolf]"; - mes "\"No, I'm not doing autographs!\""; - next; - menu "No, that's not what I was going to say.", -; - mes "[Rudolf]"; - mes "\"Well then what do you want?"; - mes "I am very busy you know.\""; - next; - menu "I'm helping Santa find his Reinboo.", -; - mes "[Rudolf]"; - mes "\"Congratulations you found me."; - mes "Anything else?\""; - next; - menu "Umm... Are you okay?", -; - mes "[Rudolf]"; - mes "\"What do you mean by that?\""; - next; - menu "You just seem a bit edgy.", -; - mes "[Rudolf]"; - mes "\"Well if you had to put with being the 'famous one' you'd understand.\""; - next; - mes "[Rudolf]"; - mes "\"It's hard to get time to myself, you know?."; - mes ""; - mes "People don't even leave me alone when I doing my shopping.\""; - next; - mes "[Rudolf]"; - mes "\"Erm... yeah."; - mes "Sorry, I should just save all that for my therapist.\""; - next; - menu "It's okay. I'll tell Santa you're here, alright?", -; - mes "[Rudolf]"; - mes "\"Yeah, okay."; - mes "Take care.\""; - set QUEST_xmas08_state, QUEST_xmas08_state | (1 << 9); - close; - -L_ChatReinboo: - set @TEMP,rand(2); - if(@TEMP == 0) goto L_Chat1; - if(@TEMP == 1) goto L_Chat2; - -L_Chat1: - mes "[Rudolf]"; - mes "\"You know the song about me?"; - mes "Yeah, well I don't get a penny from it.\""; - close; - -L_Chat2: - mes "[Rudolf]"; - mes "\"Can I have some space please?.\""; - close; -}
\ No newline at end of file diff --git a/world/map/npc/xmas/2009/event.txt b/world/map/npc/xmas/2009/event.txt deleted file mode 100644 index 9750e661..00000000 --- a/world/map/npc/xmas/2009/event.txt +++ /dev/null @@ -1,131 +0,0 @@ -020-1.gat,78,85,0 script Santa 105,{ - if (QUEST_Christmas09_state > 0) goto L_Finished; - - set @cond, 0; - if (countitem("RedOrnament") > 0) set @cond, @cond + 1; - if (countitem("YellowOrnament") > 0) set @cond, @cond + 1; - if (countitem("GreenOrnament") > 0) set @cond, @cond + 1; - if (countitem("AquaOrnament") > 0) set @cond, @cond + 1; - if (countitem("BlueOrnament") > 0) set @cond, @cond + 1; - if (countitem("MagentaOrnament") > 0) set @cond, @cond + 1; - - if (@cond == 6) goto L_Give; - - if ((strcharinfo(0) == "xxDimondXX")) goto L_LUMP_OF_COAL; - if (SANTA == 0 && BaseLevel <= 30) goto L_SANTA_TOO_YOUNG; - -L_SANTA_Start: - if (Sex) - set @honorific$, "Young Hero"; - if (!Sex) - set @honorific$, "Young Heroine"; - - mes "[Santa Claus]"; - mes "\"ho-hum ho-hum ho-hum, I'm sorry, " + @honorific$ + " Not really in the Christmas spirit."; - mes "That Evil Jack Frost has stolen all the Christmas ornaments!"; - mes "He will never get off the Naughty List!"; - mes "How can we have Christmas without a proper Christmas tree?\""; - mes "\"The Elves are too depressed to work"; - mes "Christmas will be ruined!\""; - next; - menu - "Christmas is all about money anyway!, Bah-Humbug!.", L_SANTA_DISAPPOINTED, - "There must be something that can be done!", L_SANTA_DESCRIBE_QUEST; - close; - - - -L_Message: - mes "[Santa Claus]"; - mes "\"Say, Why don't you help me?"; - mes "In fact, You are just the " + @honorific$ + " I am looking for!\""; - mes "\"What do you say, will you help save Christmas?\""; - next; - menu - "No way, you should have had elves guarding the tree!.", L_SANTA_DISAPPOINTED, - "Of course I will help save Christmas", L_SANTA_DESCRIBE_QUEST; - close; - -L_SANTA_DESCRIBE_QUEST: - mes "[Santa Claus]"; - mes "\"Jack Frost hid the ornaments with monsters all over the world.\""; - mes "\"When you recover 6 different kinds of ornaments I will"; - mes "give you some special gifts!\""; - if (@cond > 0) mes "You already have found "+@cond+" different ornaments!"; - close; - -L_Give: - getinventorylist; - set @freeslots, 100 - @inventorylist_count; - if (countitem("RedOrnament") <= 1) set @freeslots, @freeslots + 1; - if (countitem("YellowOrnament") <= 1) set @freeslots, @freeslots + 1; - if (countitem("GreenOrnament") <= 1) set @freeslots, @freeslots + 1; - if (countitem("AquaOrnament") <= 1) set @freeslots, @freeslots + 1; - if (countitem("BlueOrnament") <= 1) set @freeslots, @freeslots + 1; - if (countitem("MagentaOrnament") <= 1) set @freeslots, @freeslots + 1; - if (@freeslots < 3) goto L_NoRoom; - delitem "RedOrnament", 1; - delitem "YellowOrnament", 1; - delitem "GreenOrnament", 1; - delitem "AquaOrnament", 1; - delitem "BlueOrnament", 1; - delitem "MagentaOrnament", 1; - mes "[Santa Claus]"; - mes "\"I knew I could count on you!:"; - mes "Please accept these small gifts:"; - mes "The official Christmas 2009 headgear!"; - mes "And a little something from the elves to say Thank You!"; - mes "Ho Ho Ho Merry Christmas!\""; - getitem "SnowGoggles", 1; - setarray @snowglob$, "SantaSnowGlobe", "SnowmanSnowGlobe"; - getitem @snowglob$[rand(getarraysize(@snowglob$))], 1; - setarray @oldstock$, "SantaBeardHat", "ChristmasTreeHat", "Goggles", "LeatherGoggles", "AntlerHat"; - getitem @oldstock$[rand(getarraysize(@oldstock$))], 1; - mes ""; - mes "[You received 20,000 experience points!]"; - mes "[You received 20,000 gold!]"; - getexp 20000, 0; - set Zeny, Zeny + 20000; - set QUEST_Christmas09_state, 1; - close; - -L_NoRoom: - mes "[Santa Claus]"; - mes ""; - mes "\"Oh dear, it seem you don't have enough space for everything. If you can make space for"; - mes "a few more things, I'll have some goodies for you...\""; - close; - -L_Finished: - mes "[Santa Claus]"; - mes "\"You already completed the quest."; - mes "But maybe you are feeling the Christmas Spirit,"; - mes "And would like to help others complete it too?\""; - close; - -L_LUMP_OF_COAL: - mes "[Santa Claus]"; - mes "\"Hi "+strcharinfo(0)+",You are on the Naughty list."; - mes "Maybe you teased developers too much in IRC?,"; - mes "Maybe at the quests end you will only get a lump of coal?\""; - close; - next; - menu - "No way I'm doing this quest for a lump of coal!", close, - "I Dimond D. Stone promise to be nice in IRC.", L_SANTA_DESCRIBE_QUEST; - close; - -L_SANTA_TOO_YOUNG: - mes "[Santa Claus]"; - mes "\"You are just too young for such a heroic quest, off with you now...\""; - close; - -L_SANTA_DISAPPOINTED: - mes "[Santa Claus]"; - mes "\"Too bad, " + @honorific$ + " , you've been on the NICE LIST since you were 3.\""; - close; - -} - - - diff --git a/world/map/npc/xmas/2010/_import.txt b/world/map/npc/xmas/2010/_import.txt deleted file mode 100644 index e68c6992..00000000 --- a/world/map/npc/xmas/2010/_import.txt +++ /dev/null @@ -1,2 +0,0 @@ -npc: npc/xmas/2010/santa.txt -npc: npc/xmas/2010/golbanez.txt diff --git a/world/map/npc/xmas/2010/golbanez.txt b/world/map/npc/xmas/2010/golbanez.txt deleted file mode 100644 index a32b70c9..00000000 --- a/world/map/npc/xmas/2010/golbanez.txt +++ /dev/null @@ -1,322 +0,0 @@ -//################################################################################# -//# -//# Golbanez for Christmas 2010 -//# -//# Authors: alastrim, PjotrOrial -//# -//# reviewed by: -//# -//# This is Golbanez, he took Santa Claus as a hostage. -//# Santa will be accessible only if players give what golbenez want. -//# if the player reach santa, he will donate some stuff to the players. -//# -//################################################################################# - -// Please, remove the debug script bofore releasing the quest. - -//031-3.gat,215,294,0 script Debug 204,{ - -// mes "What you want to do?"; -// menu -// "Change 'Maze'",-, -// "Change Golbenez_Inn_Cost(Your Donations)",_cost, -// "Change Xmas2010",_xmas, -// "Clean all variables.",_clean, -// "Nothing",_end; - -// mes "Old Value: " + Maze; -// input Maze; -// mes "New Value: " + Maze; -// close; - -//_xmas: -// mes "Old Value: " + Xmas2010; -// input Xmas2010; -// mes "New Value: " + Xmas2010; -// close; - -//_cost: -// mes "Old Value: " + Golbenez_Inn_Cost; -// input Golbenez_Inn_Cost; -// mes "New Value: " + Golbenez_Inn_Cost; -// close; - -//_clean: -// mes "Golbenez_Inn_Cost Old Value: " + Golbenez_Inn_Cost; -// set Golbenez_Inn_Cost, 0; -// mes "Golbenez_Inn_Cost New Value: " + Golbenez_Inn_Cost; -// mes "Maze Old Value: " + Maze; -// set Maze, 0; -// mes "Maze New Value: " + Maze; -// mes "Xmas2010 old value: " + Xmas2010; -// set Xmas2010, 0; -// mes "Xmas2010 New Value: " + Xmas2010; -// mes "Yellow Old Value: " + Yellow; -// set Silver, 0; -// mes "Yellow New Value: " + Yellow; -// mes "White Old Value: " + White; -// set Golden, 0; -// mes "White New Value: " + White; -// mes "Count_White Old Value: " + Count_White; -// set Count_White, 0; -// mes "Count_White New Value: " + Count_White; -// mes "Count_Yellow Old Value: " + Count_Yellow; -// set Count_Yellow, 0; -// mes "Count_Yellow New Value: " + Count_Yellow; - - -// close; - -//_end: -// close; - -//} - -031-3.gat,215,296,0 script #Golbenez#_M 204,{ - - if (Golbenez_Inn_Cost >= 5000000) goto Glb_Inn_Enough; - if (Xmas2010 > 0) goto L_Intro; - if (BaseLevel < 40) goto L_Young; - - mes "[Golbenez]"; - mes "\"Mortal! I am Golbenez! I have broken through the barriers of space and time!\""; - next; - mes "\"Well to let you know, I have taken Santa Claus hostage.\""; - next; - mes "\"This may sound hard to you... But I need lots of stuff for building the way to place of leisure."; - next; - mes "\"So if you want to have gifts at Christmas... we should make a deal: Bring me money."; - next; - menu - "But I am broke!",L_Broke, - "Ok, but how much do you need?",-; - mes "[Golbenez]"; - mes "\"Not much. A few millions would do!\""; - next; - menu - "WHAT! But no one has so much money!",-, - "Ehh... I dont like Christmas anyway... Bye!",L_Close; - - mes "[Golbenez]"; - mes "\"Hey, you think I dont know about your inflation problems? Dont try to fool me, you must be filthy rich!\""; - next; - menu - "Ok, you got me. Im rich!",-, - "Im not rich! But is there any other way to help you?",-; - - mes "[Golbenez]"; - mes "\"Well... What I really want is money, but I can propose a different way to help Santa. When I took Santa as hostage he tried to resist and, in the process of submitting him by force, a lot of present boxes were dropped in the ground.\""; - next; - mes "\"I was intrigued by those boxes... They were Yellow and White. When I finally took control of the situation, I noticed that the monsters in the cave stole all the Boxes! Now, here is my idea: if you get ALL the boxes back to me, I can release santa.\""; - next; - mes "\"Im willing to consider a conversion of each Present Box donated to an amount in Gold Pieces. So, a Yellow Present is equivalent to 50.000 Gold Pieces and a White Present, 100.000 Gold Pieces. I am pretty sure he dropped 40 Yellow and 30 White boxes. So, if you bring me all of them, it would be equivalent to 5 million Gold Pieces, exactly what I was going to ask you.\""; - next; - mes "\"But don't be a fool. You will find these presents only with the monsters in the Ice Cave where Santa is hidden.\""; - next; - mes "\"So, bring me Money and/or Present Boxes and Santa can be released. Now, there is one more thing. Santa is in a very complicated Ice Cave in nivalis. I can control all the entrances in this cave. And I will only let you reach Santa after you pay me what I want.\""; - next; - mes "\"If you choose to find the present boxes, instead of paying in Gold Pieces, it is going to be easier for you if you bring them in small lots. Don't wait until you have everything. Remember: The more you give me, the closer you can get to santa.\""; - next; - -L_Intro: - if (Xmas2010 == 0) set Xmas2010, 1; - mes "\"So far, you have brought presents and money in a total value of " + Golbenez_Inn_Cost + " gold pieces. The people of your world have brought me " + $Golbenez_Inn_Cost + " gold pieces. What would you like to give?\""; - -L_Menu: - - menu - "I'd like to spend some money.", Glb_money, - "I'd like to give some Yellow presents.", -, - "I'd like to give some White presents.", -, - "Why do you want present boxes?",Glb_whypresents, - "Can I bring other items?", Glb_otheritems, - "Nevermind.", Glb_nvm; - - // in this array the items should be filled in. Remember to change the ID when the boxes are added to item_db. - set @menuitem[2], 4021; - set @menuitem[3], 4022; - set @menuvalue[2], 50000; - set @menuvalue[3], 100000; - - mes "\"How many presents do you want to give?\""; - - input @count; - - if (countitem(@menuitem[@menu]) < @count ) goto Glb_noitems; - if (@menuitem[@menu] == 4021) goto L_Check_Yellow; - if (@menuitem[@menu] == 4022) goto L_Check_White; - -L_Check_Yellow: - // If you have already donated more than you have collected in the right way (Via script), - // then whatever you have donated so far will remain, but if you have some spare boxes, - // it will be not possible to give it. - if (Count_Yellow > Yellow) set Yellow, Count_Yellow; - if (Count_Yellow + @count > Yellow) goto L_Fail_Box; - - if (Count_Yellow >= 40) goto L_Done_Yellow; - if (@count > Yellow) goto L_Fail_Box; - delitem @menuitem[@menu], @count; - set Count_Yellow, Count_Yellow + @count; - set @Give, (@count * @menuvalue[@menu]); - goto Golbenez_pay_presents; - -L_Check_White: - // If you have already donated more than you have collected in the right way (Via script), - // then whatever you have donated so far will remain, but if you have some spare boxes, - // it will be not possible to give it. - if (Count_White > White) set White, Count_White; - if (Count_White + @count > White) goto L_Fail_Box; - - if (Count_White >= 30) goto L_Done_White; - if (@count > White) goto L_Fail_Box; - delitem @menuitem[@menu], @count; - set Count_White, Count_White + @count; - set @Give, (@count * @menuvalue[@menu]); - goto Golbenez_pay_presents; - -L_Fail_Box: - mes "[Golbenez]"; - mes "\"How did you get those present boxes? I am monitoring the cave and I do not remember to see you getting this by yourself. I do not like this.\""; - close; - -L_Done_Yellow: - mes "[Golbenez]"; - mes "\"You already gave me all the Yellow Boxes that I wanted. I don't even want to know how you got these boxes.\""; - close; - -L_Done_White: - mes "[Golbenez]"; - mes "\"You already gave me all the White Boxes that I wanted. I don't even want to know how you got these boxes.\""; - close; - -Glb_money: - input @Give; - if (@Give <= 0) close; - if (Zeny < @Give) goto Glb_Inn_NotEnoughZeny; - goto Golbenez_pay; - -Glb_checkGlAn: - set @glob_an$ , "Golbenez: " + strcharinfo(0) + " accounted to free santa"; - - // depending on the absolute amount setup another global announcement. - if( @Give >3000000 ) goto Golbenez_an_5; - if( @Give > 2000000 ) goto Golbenez_an_4; - if( @Give > 1000000 ) goto Golbenez_an_3; - if( @Give > 700000 ) goto Golbenez_an_2; - if( @Give > 350000 ) goto Golbenez_an_1; - if (Golbenez_Inn_Cost < 5000000) goto L_Needmore; - if (Golbenez_Inn_Cost >= 5000000) goto Glb_Inn_Enough; - close; - -Golbenez_an_1: - set @glob_an$, @glob_an$ + " with a great effort."; - goto Golbenez_an; - -Golbenez_an_2: - set @glob_an$, @glob_an$ + " with an honest contribution."; - goto Golbenez_an; - -Golbenez_an_3: - set @glob_an$, @glob_an$ + " with a great effort. Such a generous person."; - goto Golbenez_an; - -Golbenez_an_4: - set @glob_an$, @glob_an$ + " with a remarkable effort. Impressive!"; - goto Golbenez_an; - -Golbenez_an_5: - set @glob_an$, @glob_an$ + " with a huge effort. What a honorable donation!"; - goto Golbenez_an; - -Golbenez_an: - announce @glob_an$, 0; - if (Golbenez_Inn_Cost < 5000000) goto L_Needmore; - if (Golbenez_Inn_Cost >= 5000000) goto Glb_Inn_Enough; - close; - -Golbenez_pay: - set Golbenez_Inn_Cost, Golbenez_Inn_Cost + @Give; - set $Golbenez_Inn_Cost, $Golbenez_Inn_Cost + @Give; - set Zeny, Zeny - @Give; - goto Glb_checkGlAn; - -Golbenez_pay_presents: - set Golbenez_Inn_Cost, Golbenez_Inn_Cost + @Give; - set $Golbenez_Inn_Cost, $Golbenez_Inn_Cost + @Give; - if (Golbenez_Inn_Cost < 5000000) goto L_Needmore; - if (Golbenez_Inn_Cost >= 5000000) goto Glb_Inn_Enough; - close; - - -Glb_Inn_NotEnoughZeny: - mes "[Golbenez]"; - mes "\"You don't have as much as you say you do. Come back when you can give the gold pieces you say you can.\""; - close; - -Glb_noitems: - mes "[Golbenez]"; - mes "\"You don't have as many as you say you do. Come back when you have enough.\""; - close; - -Glb_nvm: - mes "[Golbenez]"; - mes "\"That's too bad.\""; - close; - -Glb_whypresents: - mes "[Golbenez]"; - mes "\"The presents contain some sort of spiritual attachment that aids in the creation of dimensional connections to this plane of existence. The white ones contain the stronger spiritual attachment, followed by the yellow and then green, blue and purple present boxes. But I am not interested in the last three kinds.\""; - close; - -Glb_otheritems: - mes "[Golbenez]"; - mes "\"No you cannot!\""; - next; - mes "\"I will not discuss any further, mortal!\""; - close; - - -L_Needmore: - mes "[Golbenez]"; - mes "\"You brought me the equivalent to " +Golbenez_Inn_Cost+ " Gold Pieces. This is not enough.\""; - next; - mes "\"Keep working. The closer you get to the amount of money I need, the closer you can get to Santa on that big Ice cave.\""; - - if (Golbenez_Inn_Cost >= 500000 && Golbenez_Inn_Cost < 1000000) set Maze, 1; - if (Golbenez_Inn_Cost >= 1000000 && Golbenez_Inn_Cost < 1500000) set Maze, 2; - if (Golbenez_Inn_Cost >= 1500000 && Golbenez_Inn_Cost < 2000000) set Maze, 3; - if (Golbenez_Inn_Cost >= 2000000 && Golbenez_Inn_Cost < 2500000) set Maze, 4; - if (Golbenez_Inn_Cost >= 2500000 && Golbenez_Inn_Cost < 3000000) set Maze, 5; - if (Golbenez_Inn_Cost >= 3000000 && Golbenez_Inn_Cost < 3500000) set Maze, 6; - if (Golbenez_Inn_Cost >= 3500000 && Golbenez_Inn_Cost < 4000000) set Maze, 7; - if (Golbenez_Inn_Cost >= 4000000 && Golbenez_Inn_Cost < 5000000) set Maze, 8; - - close; - -L_Broke: - mes "[Golbenez]"; - mes "\"Then say goodbye to christmas.\""; - close; - -L_Close: - close; - -L_Young: - mes "[Golbenez]"; - mes "\"You are too young, even for mortal standards. You can't do anything to save santa.\""; - close; - -Glb_Inn_Enough: - set Maze, 9; - mes "[Golbenez]"; - mes "\"Ok mortal!\""; - next; - mes "\"I have collected enough for now. You are now able to reach Santa.\""; - next; - mes "\"This will definitely help me finish the place of leisure.\""; - next; - mes "\"Have fun trying to save Santa from that cold maze!\""; - close; -} - - diff --git a/world/map/npc/xmas/2010/santa.txt b/world/map/npc/xmas/2010/santa.txt deleted file mode 100644 index 781dc70f..00000000 --- a/world/map/npc/xmas/2010/santa.txt +++ /dev/null @@ -1,102 +0,0 @@ -//################################################################################# -//# -//# Santa for Christmas 2010 -//# -//# Authors: alastrim, PjotrOrial -//# -//# reviewed by: -//# -//# This is Santa Claus. -//# He was taken as hostage by golbanez, and now that he is free, he would like to -//# give a reward for those who helped him. -//# -//################################################################################# - - -031-3.gat,122,51,0 script Santa 105,{ - - if (Sex) set @honorific$, "young hero"; - if (Sex) set @gender$, "boy"; - if (!Sex) set @honorific$, "young heroine"; - if (!Sex) set @gender$, "girl"; - if (Xmas2010 == 2) goto L_Returning; - if (Xmas2010 == 3) goto L_Stocking_Prize; - if (Xmas2010 == 4) goto L_Event_Done; - -L_start: - mes "The old man's eyes open wide as he sees you."; - next; - mes "[Santa Claus]"; - mes "\"Ho-Ho-ho! It is so good to see you here " +@honorific$+ "!\""; - next; - menu - "Im " + strcharinfo(0) + " and I am here to save you from Golbenez.",-; - mes "\"I cant believe it... are you really " +strcharinfo(0)+ "? I remember all the comments that... 'Thing' was making about building his way to a 'Leisure Place' and how your donations would really help him.\""; - next; - mes "\"What is his name again? Erh... Golbinos? Galvanis? Ho-hum... All I know is that it was keeping me hostage in this cold labyrinth. And you proved yourself a good " +@gender$+ " by helping me with all those donations!\""; - next; - if (gettime(6) != 12 || gettime(5) >= 25) goto L_Skip_Dialogue; - mes "\"Well, I am really late! In a few hours I have to start my usual present giving routine... But not before I give you a special gift for all you did.\""; - next; -L_Skip_Dialogue: - mes "\"Let me see... From what I can remember, Galvenio said that the only way someone could enter this cave is by giving him at least 5 Million Gold Pieces! It means you really did a good job!\""; - next; - -L_Calculate_Prizes: - getinventorylist; - if (@inventorylist_count == 100) goto L_full; - setarray @prizes, 1216, 629, 630, 634, 1214, 633, 628, 627, 621; - mes "\"You are so generous! I believe I can give you one of the hats from this bag. I know you like these silly hats. Yes, Santa knows this kind of thing... Ho-Ho-Ho! Put your hand here and pick one hat... No, you cant look, it MUST be a surprise...\""; - getitem @prizes[rand(8)], 1; - set Xmas2010, 2; - set Golbenez_Inn_Cost, 0; - next; - -L_Returning: - mes "[Santa Claus]"; - mes "\"I hope you liked your gift.\""; - next; - menu - "Yes Santa, you are the best!",L_Close, - "Ehh, it is not what I expected.",L_Bad, - "I loved it!",-; - -L_Stocking_Prize: - set Xmas2010, 3; - getinventorylist; - if (@inventorylist_count == 100) goto L_full; - mes "[Santa Claus]"; - mes "\"Good to know you liked it! Now I would like to give you a personal item. It is not a hat, but something that will always make you remember how grateful I am.\""; - next; - menu - "Wonderful! Santa, You are great! Is it another hat?",-; - next; - mes "\"No, not a hat. Here, take this. I have been using it for the last three months... It is my favorite and it means a lot to me.\""; - getitem "RedChristmasStocking", 1; - set Xmas2010, 4; - close2; - percentheal -20, 0; - message strcharinfo(0), "You suddenly get dizzy... Something is not right with you. Maybe you shouldnt have put the Red Stocking so close to your face!"; - end; - -L_full: - mes "[Santa Claus]"; - mes "\"Your backpack seems to be full. You should get rid of some unused stuff before you get my gifts, or maybe try one super resistant red bag, my personal favorite! Hoh-hoh!\""; - close; - -L_Close: - mes "[Santa Claus]"; - mes "\"Ho, Ho... Ok, see you later " +@honorific$+ "!\""; - close; - -L_Bad: - mes "[Santa Claus]"; - mes "\"Hmm... and I was thinking you were a good " +@gender$+ "! Dont be ungrateful and next time, think before you get a gift.\""; - close; - -L_Event_Done: - mes "[Santa Claus]"; - mes "\"Hello again " +strcharinfo(0)+ "! I cant chat with you right now, because we are really late for Christmas, but, when it is over, you will always be welcome in my house for a hot chocolate.\""; - close; - -} diff --git a/world/map/npc/xmas/2011/_import.txt b/world/map/npc/xmas/2011/_import.txt deleted file mode 100644 index ac91097a..00000000 --- a/world/map/npc/xmas/2011/_import.txt +++ /dev/null @@ -1,19 +0,0 @@ -npc: npc/xmas/2011/badguy.txt -npc: npc/xmas/2011/beddingHelper.txt -npc: npc/xmas/2011/bodyguards.txt -npc: npc/xmas/2011/chiefHelper.txt -npc: npc/xmas/2011/deliverPresentsHelper.txt -npc: npc/xmas/2011/doll.txt -npc: npc/xmas/2011/entranceHelpers.txt -npc: npc/xmas/2011/emptyBoxesHelper.txt -npc: npc/xmas/2011/glitterHelper.txt -npc: npc/xmas/2011/guardOfHonor.txt -npc: npc/xmas/2011/illHelper.txt -npc: npc/xmas/2011/leatherBall.txt -npc: npc/xmas/2011/monsters.txt -npc: npc/xmas/2011/plushMouboo.txt -npc: npc/xmas/2011/reinboos.txt -npc: npc/xmas/2011/santa.txt -npc: npc/xmas/2011/stickReinboo.txt -npc: npc/xmas/2011/xmas2011config.txt -npc: npc/xmas/2011/wrappingPaperHelper.txt diff --git a/world/map/npc/xmas/2011/badguy.txt b/world/map/npc/xmas/2011/badguy.txt deleted file mode 100644 index 6663c904..00000000 --- a/world/map/npc/xmas/2011/badguy.txt +++ /dev/null @@ -1,458 +0,0 @@ -// This file is part of Christmas Event 2011 -// author: Jenalya -// Balthasar is sent by Santa's antagonist to sabotage the preparations for Christmas -// gives rewards depending on how much the player helped to sabotage - -030-2.gat,100,31,0|script|Balthasar|251,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - if ((BaseLevel < 30) || (gettimetick(2)-TUT_var < 3*7*86400)) // player must be created at least three weeks ago - goto L_NoHelp; - - set @plushmouboo, (xmas11 & $@xmas11_PlushMoubooMask) >> $@xmas11_PlushMoubooShift; - set @stickreinboo, (xmas11 & $@xmas11_StickReinbooMask) >> $@xmas11_StickReinbooShift; - set @ball, (xmas11 & $@xmas11_BallMask) >> $@xmas11_BallShift; - set @doll, (xmas11 & $@xmas11_DollMask) >> $@xmas11_DollShift; - - set @input_amount, 1; - set @output_amount, 3; - - if (xmas11 & $@xmas11_talkedToBadGuy) goto L_Helping; - - mes "[Sneaky person]"; - mes "\"Hey there! Yes, you! Are you here to see the great Santa?"; - mes "But he's hiding in his room, isn't he? Too busy for us normal people, right?\""; - next; - mes "\"Tell me... would you like to help me with some... trick?"; - mes "Don't worry, nothing mean... just a joke. A joke, yes.\""; - menu - "Ahm, sure.",L_Agree, - "You're scary. I don't want to help you.",L_Disagree; - -L_Agree: - mes "He smiles."; - mes "[Sneaky person]"; - mes "\"Very nice, yes, very nice. You will see, it is fun."; - mes "We'll just play some tricks on all these busy busy helpers of the great Santa.\""; - next; - mes "\"They're a bit mixed up.\""; - mes "He giggles in a very creepy way."; - next; - mes "[Sneaky person]"; - mes "\"So, go to see if you can... help them. Talk to the Chief Helper, he should be somewhere upstairs. And when they ask you to do something..."; - mes "You can come to ask old Balthasar how we can trick them, eh?\""; - set xmas11, xmas11 | $@xmas11_talkedToBadGuy; - goto L_Close; - -L_Disagree: - mes "[Sneaky person]"; - mes "\"Oh, com'on. Do you really think old Balthasar is scary?"; - mes "No, no, no, I'm harmless. Like a baby.\""; - mes "He grins in a very creepy way."; - next; - mes "[Balthasar]"; - mes "\"If you change your mind, just come back...\""; - set xmas11, xmas11 | $@xmas11_talkedToBadGuy; - goto L_Close; - -L_Helping: - mes "[Balthasar]"; - mes "\"Welcome back my dear friend. Did you get any tasks to do? Did they ask you for help?"; - mes "Maybe I can give you some advice on how to... trick them. Yes, harmless tricks.\""; - - cleararray @choice_idx, 0, 9; - cleararray @choice$, "", 9; - - set @C_reinboo, 1; - set @C_bedding, 2; - set @C_glitter, 3; - set @C_potion, 4; - set @C_plushmouboo, 5; - set @C_stickreinboo, 6; - set @C_ball, 7; - set @C_doll, 8; - set @C_nevermind, 9; - - // counter of available answers - set @choices_nr, 0; - - if (!(xmas11 & $@xmas11_startedReinbooSearch)) - goto L_NoReinboo; - set @choice_idx[@choices_nr], @C_reinboo; - set @choice$[@choices_nr], "I have to search for some lost mouboos..."; - set @choices_nr, @choices_nr + 1; - -L_NoReinboo: - if (!(xmas11 & $@xmas11_Bedding) || (xmas11 & $@xmas11_BeddingDone)) - goto L_NoBedding; - set @choice_idx[@choices_nr], @C_bedding; - set @choice$[@choices_nr], "I shall get some White Fur as bedding."; - set @choices_nr, @choices_nr + 1; - -L_NoBedding: - if (!(xmas11 & $@xmas11_Decoration) || (xmas11 & $@xmas11_DecorationDone)) - goto L_NoGlitter; - set @choice_idx[@choices_nr], @C_glitter; - set @choice$[@choices_nr], "They want Topaz and Ruby Powder for decoration."; - set @choices_nr, @choices_nr + 1; - -L_NoGlitter: - if (!(xmas11 & $@xmas11_Potion) || (xmas11 & $@xmas11_PotionDone)) - goto L_NoPotion; - set @choice_idx[@choices_nr], @C_potion; - set @choice$[@choices_nr], "There is some helper who's not feeling well. He wants a Healing Potion."; - set @choices_nr, @choices_nr + 1; - -L_NoPotion: - if (@plushmouboo != 3) - goto L_NoPlushMouboo; - set @choice_idx[@choices_nr], @C_plushmouboo; - set @choice$[@choices_nr], "I have to pack this Plush Mouboo."; - set @choices_nr, @choices_nr + 1; - -L_NoPlushMouboo: - if (@stickreinboo != 3) - goto L_NoStickReinboo; - set @choice_idx[@choices_nr], @C_stickreinboo; - set @choice$[@choices_nr], "I have to pack this Stick Reinboo."; - set @choices_nr, @choices_nr + 1; - -L_NoStickReinboo: - if (@ball != 3) - goto L_NoBall; - set @choice_idx[@choices_nr], @C_ball; - set @choice$[@choices_nr], "I have to pack this Leather Ball."; - set @choices_nr, @choices_nr + 1; - -L_NoBall: - if (@doll != 3) - goto L_NoDoll; - set @choice_idx[@choices_nr], @C_doll; - set @choice$[@choices_nr], "I have to pack this Doll."; - set @choices_nr, @choices_nr + 1; - -L_NoDoll: - set @choice_idx[@choices_nr], @C_nevermind; - set @choice$[@choices_nr], "Nevermind."; - - menu - @choice$[0],-, - @choice$[1],-, - @choice$[2],-, - @choice$[3],-, - @choice$[4],-, - @choice$[5],-, - @choice$[6],-, - @choice$[7],-, - @choice$[8],-; - - set @menu, @menu - 1; - if (@choice_idx[@menu] == 0) - goto L_Close; - if (@choice_idx[@menu] == @C_reinboo) - goto L_ReinbooAdvice; - if (@choice_idx[@menu] == @C_bedding) - goto L_BeddingAdvice; - if (@choice_idx[@menu] == @C_glitter) - goto L_GlitterAdvice; - if (@choice_idx[@menu] == @C_potion) - goto L_PotionAdvice; - if (@choice_idx[@menu] == @C_plushmouboo) - goto L_PlushMoubooWrapping; - if (@choice_idx[@menu] == @C_stickreinboo) - goto L_StickReinbooWrapping; - if (@choice_idx[@menu] == @C_ball) - goto L_BallWrapping; - if (@choice_idx[@menu] == @C_doll) - goto L_DollWrapping; - if ((@choice_idx[@menu] == @C_nevermind)) - goto L_Close; - goto L_Close; - -L_ReinbooAdvice: - mes "Balthasar giggles spitefully."; - mes "[Balthasar]"; - mes "\"Oh, right, the poor lost Reinboos. So far far away from home.\""; - next; - mes "\"They really really like candy and sweets."; - mes "It would be mean not to give them candy, wouldn't it?\""; - goto L_Close; - -L_BeddingAdvice: - mes "[Balthasar]"; - mes "\"White Fur? Don't you think it's cruel to use fur for that? Real cruel, yes."; - mes "Why not use simple Cotton Cloth instead?\""; - goto L_Close; - -L_GlitterAdvice: - mes "[Balthasar]"; - mes "\"Gem powder is expensive, isn't it? Too expensive to use it for glitter, don't you think so?"; - mes "I can make you some replacement powder easily.\""; - next; - mes "Just bring me some powder from those fuzzy ball things, how are they called again?"; - mes "Ah, Spectres and Wisps. That was it.\""; - menu - "Here is some Spectre Powder.",L_RedPowder, - "I have some Wisp Powder.",L_YellowPowder, - "I'll go and get it.",L_Close; - goto L_Close; - -L_PotionAdvice: - mes "[Balthasar]"; - mes "\"Oh, not feeling well? What a poor guy! But drinking a healing potion..."; - mes "It's much healthier to let the body recover itself, don't you think so?\""; - next; - mes "\"Too much medication is bad, yes, bad. Why don't you give him something nice to drink instead?\""; - goto L_Close; - -L_RedPowder: - if (countitem("SpectrePowder") < @input_amount) - goto L_NoItem; - delitem "SpectrePowder", @input_amount; - getitem "RedPowder", @output_amount; - mes "[Balthasar]"; - mes "\"Here, here it is.\""; - goto L_Close; - -L_YellowPowder: - if (countitem("WispPowder") < @input_amount) - goto L_NoItem; - delitem "WispPowder", @input_amount; - getitem "YellowPowder", @output_amount; - mes "[Balthasar]"; - mes "\"Here, here it is.\""; - goto L_Close; - -L_PlushMoubooWrapping: - mes "[Balthasar]"; - mes "\"Oh, a Plush Mouboo - what a silly thing, really silly thing."; - mes "Don't you think we should put something more useful, expedient in that box?\""; - next; - mes "\"What about ... a nice Cotton Shirt? A decent Cotton Shirt would be nice, don't you think so?"; - mes "Give me an Empty Present Box, a Cotton Shirt and that Plush Mouboo. I'll pack that box for you.\""; - menu - "Sure, here it is.",-, - "One moment, I need to get the stuff.",L_Close, - "I don't think this is a good idea.",L_Close; - if ((countitem("CottonShirt") < 1) || (countitem("OpenPresentBox") < 1) || (countitem("PlushMouboo") < 1)) - goto L_NoItem; - getinventorylist; - if (@inventorylist_count == 100) - goto L_Full_Inv; - delitem "CottonShirt", 1; - delitem "OpenPresentBox", 1; - delitem "PlushMouboo", 1; - getitem "ClosedChristmasBox", 1; - set @plushmouboo, 4; - set xmas11, (xmas11 & ~($@xmas11_PlushMoubooMask) | (@plushmouboo << $@xmas11_PlushMoubooShift)); - mes "He bags the Plush Mouboo you gave him and puts the cotton shirt into the box."; - goto L_Close; - -L_StickReinbooWrapping: - mes "[Balthasar]"; - mes "\"Ooh, a stick reinboo! Don't you think this is an obnoxious thing? Really really mean, yes."; - mes "Do you know, reinboos are clever, they can even speak. And this is a toy reinboo! Very very disrespectful, right?\""; - next; - mes "\"Do you think... do you think we should punish the brat that wished for this disrespectful toy? I think so, yes, disrespectful brat."; - mes "Let's put... let's put a Raw Log in there instead, yes. Give me an Empty Present Box, a Raw Log and that Stick Reinboo. I'll prepare that box for you.\""; - menu - "Sure, here it is.",-, - "One moment, I need to get the stuff.",L_Close, - "I think the Stick Reinboo is nice!",L_Close; - if ((countitem("RawLog") < 1) || (countitem("OpenPresentBox") < 1) || (countitem("StickReinboo") < 1)) - goto L_NoItem; - getinventorylist; - if (@inventorylist_count == 100) - goto L_Full_Inv; - delitem "RawLog", 1; - delitem "OpenPresentBox", 1; - delitem "StickReinboo", 1; - getitem "ClosedChristmasBox", 1; - set @stickreinboo, 4; - set xmas11, (xmas11 & ~($@xmas11_StickReinbooMask) | (@stickreinboo << $@xmas11_StickReinbooShift)); - mes "He puts away the Stick Reinboo and packs the Raw Log in the box."; - goto L_Close; - -L_BallWrapping: - mes "[Balthasar]"; - mes "\"A ball? Eh, ah, a ball... ah -"; - mes "but what if the kid that gets it rather needs something to get warm?\""; - next; - mes "\"Let's put a piece of Coal in there instead! Yes, piece of Coal, that's good."; - mes "Empty Present Box, a piece of Coal and the Ball. I'll pack the box for you.\""; - menu - "Sure, here it is.",-, - "One moment, I need to get the stuff.",L_Close, - "Come on, now you're getting really implausible.",L_Close; - if ((countitem("Coal") < 1) || (countitem("OpenPresentBox") < 1) || (countitem("LeatherBall") < 1)) - goto L_NoItem; - getinventorylist; - if (@inventorylist_count == 100) - goto L_Full_Inv; - delitem "Coal", 1; - delitem "OpenPresentBox", 1; - delitem "LeatherBall", 1; - getitem "ClosedChristmasBox", 1; - set @ball, 4; - set xmas11, (xmas11 & ~($@xmas11_BallMask) | (@ball << $@xmas11_BallShift)); - mes "He takes the ball, puts the coal into the box and closes it."; - goto L_Close; - - -L_DollWrapping: - mes "[Balthasar]"; - mes "\"Let me see, have a look... Oh, they made that kind of doll already last year. This is not very creative, is it?"; - mes "The child will be disappointed, yes, deeply disappointed to get such an ... uncool present, yes.\""; - next; - mes "\"We should fix that, yes, fix it. We can put some of these nice Mouboo Figurines in the box instead."; - mes "Bring me an Empty Present Box, a Mouboo Figurine and the Doll. I'll pack the box for you.\""; - menu - "Sure, here it is.",-, - "One moment, I need to get the stuff.",L_Close, - "A Mouboo Figurine is lame.",L_Close; - if ((countitem("MoubooFigurine") < 1) || (countitem("OpenPresentBox") < 1) || (countitem("Doll") < 1)) - goto L_NoItem; - getinventorylist; - if (@inventorylist_count == 100) - goto L_Full_Inv; - delitem "MoubooFigurine", 1; - delitem "OpenPresentBox", 1; - delitem "Doll", 1; - getitem "ClosedChristmasBox", 1; - set @doll, 4; - set xmas11, (xmas11 & ~($@xmas11_DollMask) | (@doll << $@xmas11_DollShift)); - mes "He puts the doll in his pocket and packs the Mouboo Figurine into the box."; - goto L_Close; - -L_NoEvent: - mes "[Balthasar]"; - mes "\"How did you come in at this time of the year? As sneaky as I am, hey?"; - mes "But you should leave anyway.\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - callfunc "xmas2011points"; - if (xmas11 & $@xmas11_BadGuyReward) goto L_Done; - - if (@sabotagepoints == 0) - goto L_NoHelp; - getinventorylist; - if (@inventorylist_count > 80) - goto L_Full_Inv; - mes "[Balthasar]"; - - if (@sabotagepoints < $@xmas2011_main_rewardcost) - goto L_NoMainReward; - getitem "Sunglasses", 1; - set @sabotagepoints, @sabotagepoints - $@xmas2011_main_rewardcost; - mes "\"You've shown great skill in the art of infiltration and sabotage. I'm so proud of you, very proud, yes.\""; - next; - -L_NoMainReward: - if (@sabotagepoints < $@xmas2011_toy_rewardcost) - goto L_NoToyReward; -L_ToyAgain: - set @toy_reward, rand(4); - if (@toy_reward == 0) - getitem "PlushMouboo", 1; - if (@toy_reward == 1) - getitem "StickReinboo", 1; - if (@toy_reward == 2) - getitem "Doll", 1; - if (@toy_reward == 3) - getitem "LeatherBall", 1; - set @sabotagepoints, @sabotagepoints - $@xmas2011_toy_rewardcost; - if (@sabotagepoints >= $@xmas2011_toy_rewardcost) - goto L_ToyAgain; - mes "\"I think you earned yourself some fun with these toy things.\""; - next; - -L_NoToyReward: - if (@sabotagepoints < $@xmas2011_gloves_rewardcost) - goto L_NoGlovesReward; - set @gloves, $@xmas2011_glove_id + rand(10); - getitem @gloves, 1; - set @sabotagepoints, @sabotagepoints - $@xmas2011_gloves_rewardcost; - mes "\"This will help to keep your hands warm when operating in such cold areas.\""; - next; - -L_NoGlovesReward: - if (@sabotagepoints == 0) - goto L_Done; - mes "\"Have some candy.\""; - next; - if (@sabotagepoints < $@xmas2011_gingerbreadman_rewardcost) - goto L_NoGBMReward; - set @candy_amount, @sabotagepoints/$@xmas2011_gingerbreadman_rewardcost; - getitem "GingerBreadMan", @candy_amount; - set @sabotagepoints, @sabotagepoints - @candy_amount*$@xmas2011_gingerbreadman_rewardcost; -L_NoGBMReward: - if (@sabotagepoints < $@xmas2011_xmascake_rewardcost) - goto L_NoXmasCakeReward; - set @candy_amount, @sabotagepoints/$@xmas2011_xmascake_rewardcost; - getitem "XmasCake", @candy_amount; - set @sabotagepoints, @sabotagepoints - @candy_amount*$@xmas2011_xmascake_rewardcost; -L_NoXmasCakeReward: - if (@sabotagepoints < $@xmas2011_candy_rewardcost) - goto L_Done; - set @candy_amount, @sabotagepoints/$@xmas2011_candy_rewardcost; - getitem "Candy", @candy_amount; - set @sabotagepoints, @sabotagepoints - @candy_amount*$@xmas2011_candy_rewardcost; - -L_Done: - mes "[Balthasar]"; - mes "\"It was so much fun, wasn't it?\""; - set xmas11, xmas11 | $@xmas11_BadGuyReward; - goto L_Close; - -L_NoItem: - mes "[Balthasar]"; - mes "\"Eh? Where is it? Go and get it!\""; - goto L_Close; - -L_Full_Inv: - mes "[Balthasar]"; - mes "\"Oh, you have a lot of stuff with you, yes many many things."; - mes "Come back with less things in your backpack.\""; - goto L_Close; - -L_NoHelp: - mes "[Balthasar]"; - mes "\"Eh? Are you having fun with the cheesy Christmas stuff? Pah.\""; - goto L_Close; - -L_Close: - set @input_amount, 0; - set @output_amount, 0; - set @plushmouboo, 0; - set @stickreinboo, 0; - set @ball, 0; - set @doll, 0; - set @C_reinboo, 0; - set @C_bedding, 0; - set @C_glitter, 0; - set @C_potion, 0; - set @C_plushmouboo, 0; - set @C_stickreinboo, 0; - set @C_ball, 0; - set @C_doll, 0; - set @C_nervermind, 0; - set @choices_nr, 0; - cleararray @choice_idx, 0, 9; - cleararray @choice$, "", 9; - set @menu, 0; - set @inventorylist_count, 0; - set @toy_reward, 0; - set @gloves, 0; - set @candy_amount, 0; - set @sabotagepoints, 0; - set @helppoints, 0; - set @inventorylist_count, 0; - close; -} diff --git a/world/map/npc/xmas/2011/beddingHelper.txt b/world/map/npc/xmas/2011/beddingHelper.txt deleted file mode 100644 index 7d424bd5..00000000 --- a/world/map/npc/xmas/2011/beddingHelper.txt +++ /dev/null @@ -1,105 +0,0 @@ -// This file is part of Christmas Event 2011 -// author: Jenalya -// Osmo asks for some White Fur which is used for bedding some presents in the boxes -// can be sabotaged by given Cloth instead -// 00 not talked -// 10 asked for Bedding -// 01 done in good way -// 11 done in bad way - -030-2.gat,37,77,0|script|Osmo|328,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - set @bedding_amount, 10; - - if (xmas11 & $@xmas11_BeddingDone) goto L_Done; - if (xmas11 & $@xmas11_Bedding) goto L_Bedding; - if (xmas11 & $@xmas11_talkedToChief) goto L_Helping; - - mes "[Busy Helper]"; - mes "\"What? Uh, excuse me, I have some work to do.\""; - goto L_Close; - -L_Helping: - mes "[Osmo]"; - mes "\"You came in at just the right moment. I was informed that our bedding material for fragile presents is nearly depleted."; - mes "Could you bring me " + @bedding_amount + " White Furs?\""; - next; - mes "[Osmo]"; - mes "\"Take care that it's real White Fur."; - mes "Other materials tend to go out of place in the present box, leaving the fragile content unprotected from any pushes.\""; - set xmas11, xmas11 | $@xmas11_Bedding; - goto L_Close; - -L_Bedding: - mes "[Osmo]"; - mes "\"Ah, you're back. Do you have the " + @bedding_amount + " White Fur needed as bedding for fragile presents?\""; - if ((countitem("WhiteFur") >= @bedding_amount) && (countitem("CottonCloth") >= @bedding_amount)) - menu - "Yeah, here it is. (Give the White Fur.)",L_Fur, - "Sure, here it is. (Give the Cotton Cloth.)",L_Cloth, - "No, I'm still working on that.",L_Close; - if (countitem("WhiteFur") >= @bedding_amount) - menu - "Yeah, here it is. (Give the White Fur.)",L_Fur, - "No, I'm still working on that.",L_Close; - if (countitem("CottonCloth") >= @bedding_amount) - menu - "Sure, here it is. (Give the Cotton Cloth.)",L_Cloth, - "No, I'm still working on that.",L_Close; - goto L_Close; - -L_Fur: - if (countitem("WhiteFur") < @bedding_amount) - goto L_NoItems; - delitem "WhiteFur", @bedding_amount; - set xmas11, xmas11 & ~$@xmas11_Bedding; - set xmas11, xmas11 | $@xmas11_BeddingDone; - mes "[Osmo]"; - mes "\"Wonderful! Thanks for your effort.\""; - goto L_Close; - -L_Cloth: - if (countitem("CottonCloth") < @bedding_amount) - goto L_NoItems; - delitem "CottonCloth", @bedding_amount; - set xmas11, xmas11 | $@xmas11_BeddingDone; - mes "He doesn't notice that you're giving him Cotton Cloth."; - mes "[Osmo]"; - mes "\"Wonderful! Thanks for your effort.\""; - goto L_Close; - -L_Done: - mes "[Osmo]"; - if (xmas11 & $@xmas11_Bedding) - mes "\"The Fur you brought me isn't working very well.\""; - if (!(xmas11 & $@xmas11_Bedding)) - mes "\"Thanks for helping out with the bedding material.\""; - goto L_Close; - -L_NoEvent: - mes "[Osmo]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Osmo]"; - mes "\"I have to say that I'm satisfied with our work, even if it was very stressful this year.\""; - goto L_Close; - -L_NoItems: - mes "[Osmo]"; - mes "\"Where do you have it? Is this a joke?\""; - goto L_Close; - -L_Close: - set @bedding_amount, 0; - close; -} diff --git a/world/map/npc/xmas/2011/bodyguards.txt b/world/map/npc/xmas/2011/bodyguards.txt deleted file mode 100644 index acabe022..00000000 --- a/world/map/npc/xmas/2011/bodyguards.txt +++ /dev/null @@ -1,126 +0,0 @@ -// This file is part of Christmas Event 2011 -// author: Jenalya -// Bodyguards who don't let you enter Santa's room until after Christmas - -030-2.gat,76,88,0|script|Vilhelmiina|335,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - mes "[Vilhelmiina]"; - mes "\"You can't get in that room now. Santa is very busy.\""; - menu - "But I want to talk to Santa!",-, - "Understood.",L_Close; - mes "[Vilhelmiina]"; - mes "\"So? Now guess what me and my brother are here for?\""; - goto L_Close; - -L_NoEvent: - mes "[Vilhelmiina]"; - mes "\"How did you get in? At this time of the year this house isn't in use.\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Vilhelmiina]"; - mes "\"Santa is ready to see visitors now. You may enter.\""; - goto L_Close; - -L_Close: - close; -} - -030-2.gat,80,88,0|script|Verneri|334,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - mes "[Verneri]"; - mes "\"This is Santa's room.\""; - menu - "I want to see him!",-, - "Ok.",L_Close; - mes "The bodyguard takes a daunting look over his glasses at you."; - mes "[Verneri]"; - mes "\"No.\""; - goto L_Close; - -L_NoEvent: - mes "[Verneri]"; - mes "\"What are you doing in here? At this time of the year this house isn't in use.\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Verneri]"; - mes "\"You can enter now.\""; - goto L_Close; - -L_Close: - close; -} - -030-2.gat,152,22,0|script|Vanamo|332,{ - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - - mes "[Vanamo]"; - mes "\"This area is restricted. You're not allowed to enter.\""; - close; - -L_NoEvent: - mes "[Vanamo]"; - mes "\"What are you doing in here? At this time of the year this house isn't in use.\""; - warp "030-1.gat", 99, 55; - close; -} - -030-2.gat,89,23,0|script|Vihtori|333,{ - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - - mes "[Vihtori]"; - mes "\"Mh? I'm having a break.\""; - close; - -L_NoEvent: - mes "[Vihtori]"; - mes "\"What are you doing in here? At this time of the year this house isn't in use.\""; - warp "030-1.gat", 99, 55; - close; -} - -// door to Santa's room -030-2.gat,78,87,0|script|#door|400,1,1{ - - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - end; - -L_RewardTime: - warp "030-2.gat", 194, 67; - end; -} - -// entrance of the building -030-1.gat,99,53,0|script|#Door|400,1,1,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - end; - - warp "030-2.gat", 88, 50; - end; -} diff --git a/world/map/npc/xmas/2011/chiefHelper.txt b/world/map/npc/xmas/2011/chiefHelper.txt deleted file mode 100644 index dcca2ed4..00000000 --- a/world/map/npc/xmas/2011/chiefHelper.txt +++ /dev/null @@ -1,89 +0,0 @@ -// This file is part of Christmas Event 2011 -// author: Jenalya -// Warrick is the Chief of Santa's helpers, starts the quest - -030-2.gat,87,77,0|script|Chief Warrick|329,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - if ((BaseLevel < 30) || (gettimetick(2)-TUT_var < 3*7*86400)) // player must be created at least three weeks ago - goto L_NoHelp; - - if (xmas11 & $@xmas11_talkedToChief) goto L_Helping; - - mes "[Important looking Person]"; - mes "\"Welcome to the home of Santa! My name is Warrick, I'm the chief of Santa's helpers."; - mes "As you certainly know Christmas is near. Therefore we're very very busy.\""; - next; - mes "\"For this reason I have to ask you to leave and come back some at some more convenient time.\""; - menu - "But I want to see Santa!",-, - "I'm so excited! This is really Santa's house?",-, - "This is not very friendly. Isn't Christmas about love and happiness and all?",-; - mes "Warrick sighs."; - mes "[Chief Warrick]"; - mes "\"Usually we'd be more obliging. But this year - our preparations for Christmas -"; - mes "Everything is going wrong, we're missing ingredients for the Christmas candy and material for the toys."; - mes "The lists about the good and bad kids got mixed up, everything is in utter confusion."; - mes "And to make matters worse some of the reinboos are missing!\""; - next; - mes "\"Oh, please excuse me. I didn't mean to moan."; - mes "However, as you can see we have to deal with some serious problems here."; - mes "So I'd appreciate if you could just leave and not interfere.\""; - menu - "But I can help!",-; - mes "He hesitates."; - mes "[Chief Warrick]"; - mes "\"I'm not sure...\""; - menu - "Really, I can do a lot of things.",-; - mes "[Chief Warrick]"; - mes "\"Well, alright. I suppose it can't get worse than it already is."; - mes "Go to the helpers all over the house and ask them what is needed."; - mes "This will show you're hired as a co-helper.\""; - mes "He stabs your chest with his finger and leaves a blinking mark."; - set xmas11, xmas11 | $@xmas11_talkedToChief; - goto L_Close; - -L_Helping: - callfunc "xmas2011points"; - mes "[Chief Warrick]"; - if ((@sabotagepoints + @helppoints) < $@xmas2011_totalpoints) - mes "\"I hope you're doing well.\""; - if ((@sabotagepoints + @helppoints) == $@xmas2011_totalpoints) - mes "\"It seems we're catching up with the tasks to do, thanks to your help.\""; - goto L_Close; - -L_NoEvent: - mes "[Chief Warrick]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "Warrick looks really tired."; - mes "[Chief Warrick]"; - mes "\"I'm so glad it's over for this year."; - mes "Did you already talk to Santa?\""; - goto L_Close; - -L_NoHelp: - mes "[Chief Warrick]"; - mes "\"Hello young one. Welcome to Santa's house."; - mes "Have a look around and enjoy your visit, but please don't interrupt the busy helpers.\""; - mes "He smiles at you."; - goto L_Close; - -L_Close: - set @sabotagepoints, 0; - set @helppoints, 0; - close; -} - -//030-2.gat,85,33,0|script|Debug|105,{ -// callfunc "xmas2011debug"; -//} diff --git a/world/map/npc/xmas/2011/deliverPresentsHelper.txt b/world/map/npc/xmas/2011/deliverPresentsHelper.txt deleted file mode 100644 index 8b49d196..00000000 --- a/world/map/npc/xmas/2011/deliverPresentsHelper.txt +++ /dev/null @@ -1,269 +0,0 @@ -// author: Jenalya -// Aaron collects the finished toys -// good way: give toy + open box + wrapping -// bad way: give closed box prepared at the bad guy + wrapping - -030-2.gat,127,41,0|script|Aaron|328,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - set @plushmouboo, (xmas11 & $@xmas11_PlushMoubooMask) >> $@xmas11_PlushMoubooShift; - set @stickreinboo, (xmas11 & $@xmas11_StickReinbooMask) >> $@xmas11_StickReinbooShift; - set @ball, (xmas11 & $@xmas11_BallMask) >> $@xmas11_BallShift; - set @doll, (xmas11 & $@xmas11_DollMask) >> $@xmas11_DollShift; - - if (xmas11 & $@xmas11_talkedToChief) goto L_Helping; - - mes "[Busy Helper]"; - mes "\"This is a disaster!\""; - goto L_Close; - -L_Helping: - mes "[Aaron]"; - mes "\"Hello there! Do you have any finished toys ready for being packed and wrapped?"; - mes "We also need an empty box and wrapping paper.\""; - - cleararray @choice_idx, 0, 9; - cleararray @choice$, "", 9; - - set @C_plushmouboo, 1; - set @C_plushmouboobox, 2; - set @C_stickreinboo, 3; - set @C_stickreinboobox, 4; - set @C_ball, 5; - set @C_ballbox, 6; - set @C_doll, 7; - set @C_dollbox, 8; - set @C_nevermind, 9; - - // counter of available answers - set @choices_nr, 0; - - if (@plushmouboo != 3) - goto L_NoPlushMouboo; - set @choice_idx[@choices_nr], @C_plushmouboo; - set @choice$[@choices_nr], "This Plush Mouboo needs to be packed."; - set @choices_nr, @choices_nr + 1; - -L_NoPlushMouboo: - if (@plushmouboo != 4) - goto L_NoPlushMoubooBox; - set @choice_idx[@choices_nr], @C_plushmouboobox; - set @choice$[@choices_nr], "I already packed this Plush Mouboo..."; - set @choices_nr, @choices_nr + 1; - -L_NoPlushMoubooBox: - if (@stickreinboo != 3) - goto L_NoStickReinboo; - set @choice_idx[@choices_nr], @C_stickreinboo; - set @choice$[@choices_nr], "This Stick Reinboo needs to be packed."; - set @choices_nr, @choices_nr + 1; - -L_NoStickReinboo: - if (@stickreinboo != 4) - goto L_NoStickReinbooBox; - set @choice_idx[@choices_nr], @C_stickreinboobox; - set @choice$[@choices_nr], "I already packed this Stick Reinboo..."; - set @choices_nr, @choices_nr + 1; - -L_NoStickReinbooBox: - if (@ball != 3) - goto L_NoBall; - set @choice_idx[@choices_nr], @C_ball; - set @choice$[@choices_nr], "This Leather Ball needs to be packed."; - set @choices_nr, @choices_nr + 1; - -L_NoBall: - if (@ball != 4) - goto L_NoBallBox; - set @choice_idx[@choices_nr], @C_ballbox; - set @choice$[@choices_nr], "I already packed this Leather Ball..."; - set @choices_nr, @choices_nr + 1; - -L_NoBallBox: - if (@doll != 3) - goto L_NoDoll; - set @choice_idx[@choices_nr], @C_doll; - set @choice$[@choices_nr], "This Doll needs to be packed."; - set @choices_nr, @choices_nr + 1; - -L_NoDoll: - if (@doll != 4) - goto L_NoDollBox; - set @choice_idx[@choices_nr], @C_dollbox; - set @choice$[@choices_nr], "I already packed this Doll..."; - set @choices_nr, @choices_nr + 1; - -L_NoDollBox: - set @choice_idx[@choices_nr], @C_nevermind; - set @choice$[@choices_nr], "I'll be back later."; - - menu - @choice$[0],-, - @choice$[1],-, - @choice$[2],-, - @choice$[3],-, - @choice$[4],-, - @choice$[5],-, - @choice$[6],-, - @choice$[7],-, - @choice$[8],-; - - set @menu, @menu - 1; - if (@choice_idx[@menu] == 0) - goto L_Close; - - if ((@choice_idx[@menu] == @C_plushmouboo)|| (@choice_idx[@menu] == @C_plushmouboobox)) - set @toy$, "PlushMouboo"; - if (@choice_idx[@menu] == @C_plushmouboo) - goto L_Pack; - if (@choice_idx[@menu] == @C_plushmouboobox) - goto L_Wrap; - - if ((@choice_idx[@menu] == @C_stickreinboo) || (@choice_idx[@menu] == @C_stickreinboobox)) - set @toy$, "StickReinboo"; - if (@choice_idx[@menu] == @C_stickreinboo) - goto L_Pack; - if (@choice_idx[@menu] == @C_stickreinboobox) - goto L_Wrap; - - if ((@choice_idx[@menu] == @C_ball) || (@choice_idx[@menu] == @C_ballbox)) - set @toy$, "LeatherBall"; - if (@choice_idx[@menu] == @C_ball) - goto L_Pack; - if (@choice_idx[@menu] == @C_ballbox) - goto L_Wrap; - - if ((@choice_idx[@menu] == @C_doll) || (@choice_idx[@menu] == @C_dollbox)) - set @toy$, "Doll"; - if (@choice_idx[@menu] == @C_doll) - goto L_Pack; - if (@choice_idx[@menu] == @C_dollbox) - goto L_Wrap; - - if ((@choice_idx[@menu] == @C_nevermind)) - goto L_Close; - goto L_Close; - -L_Pack: - mes "[Aaron]"; - mes "\"Very well, do you also have a box and wrapping paper?\""; - - callsub S_WrappingColor; - - if ((countitem("OpenPresentBox") < 1) || (countitem(@wrappingColor$) < 1) || (countitem(@toy$) < 1)) - goto L_NoItems; - delitem "OpenPresentBox", 1; - delitem @wrappingColor$, 1; - delitem @toy$, 1; - mes "[Aaron]"; - mes "\"Excellent! Give it to me!\""; - mes "He takes the box, puts the toy into it and wraps it skillfully with the paper you gave him."; - mes "Then he writes something on a paper next to him."; - goto L_Deliver; - -L_Wrap: - mes "[Aaron]"; - mes "\"Ah, even better! Do you also have some wrapping paper?\""; - - callsub S_WrappingColor; - - if ((countitem("ClosedChristmasBox") < 1) || (countitem(@wrappingColor$) < 1)) - goto L_NoItems; - delitem "ClosedChristmasBox", 1; - delitem @wrappingColor$, 1; - mes "[Aaron]"; - mes "\"Alright. Give it to me.\""; - mes "He takes the box and wraps it elaborately with the paper you gave him."; - mes "Then he writes something on a paper next to him."; - goto L_Deliver; - -L_Deliver: - if (@toy$ == "PlushMouboo") - set @plushmouboo, @plushmouboo + 2; - if (@toy$ == "PlushMouboo") - set xmas11, (xmas11 & ~($@xmas11_PlushMoubooMask) | (@plushmouboo << $@xmas11_PlushMoubooShift)); - - if (@toy$ == "StickReinboo") - set @stickreinboo, @stickreinboo + 2; - if (@toy$ == "StickReinboo") - set xmas11, (xmas11 & ~($@xmas11_StickReinbooMask) | (@stickreinboo << $@xmas11_StickReinbooShift)); - - if (@toy$ == "LeatherBall") - set @ball, @ball + 2; - if (@toy$ == "LeatherBall") - set xmas11, (xmas11 & ~($@xmas11_BallMask) | (@ball << $@xmas11_BallShift)); - - if (@toy$ == "Doll") - set @doll, @doll + 2; - if (@toy$ == "Doll") - set xmas11, (xmas11 & ~($@xmas11_DollMask) | (@doll << $@xmas11_DollShift)); - - goto L_Close; - -L_NoEvent: - mes "[Aaron]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Aaron]"; - mes "\"That was a lot of hard work this year.\""; - goto L_Close; - -L_NoItems: - mes "[Aaron]"; - mes "\"Don't be silly. Where are the items?\""; - goto L_Close; - -L_Close: - set @plushmouboo, 0; - set @stickreinboo, 0; - set @ball, 0; - set @doll, 0; - set @C_plushmouboo, 0; - set @C_plushmouboobox, 0; - set @C_stickreinboo, 0; - set @C_stickreinboobox, 0; - set @C_ball, 0; - set @C_ballbox, 0; - set @C_doll, 0; - set @C_dollbox, 0; - set @C_nevermind, 0; - set @choices_nr, 0; - cleararray @choice_idx, 0, 9; - cleararray @choice$, "", 9; - set @menu, 0; - set @toy$, ""; - set @wrappingColor$, ""; - close; - -S_WrappingColor: - menu - "Yeah, I have this red dotted.",-, - "Sure, see this yellow dotted.",-, - "Yes, what about this blue dotted?",-, - "Here, I have this purple striped.",-, - "Isn't this red golden striped one wonderful?",-, - "Here is this green red striped.",-, - "No, I'll get it.",L_Close; - if (@menu == 1) - set @wrappingColor$, "RedDottedWrap"; - if (@menu == 2) - set @wrappingColor$, "YellowDottedWrap"; - if (@menu == 3) - set @wrappingColor$, "BlueDottedWrap"; - if (@menu == 4) - set @wrappingColor$, "PurpleStripedWrap"; - if (@menu == 5) - set @wrappingColor$, "RedGoldenStripedWrap"; - if (@menu == 6) - set @wrappingColor$, "GreenRedStripedWrap"; - return; -} diff --git a/world/map/npc/xmas/2011/doll.txt b/world/map/npc/xmas/2011/doll.txt deleted file mode 100644 index 7c1ca6c6..00000000 --- a/world/map/npc/xmas/2011/doll.txt +++ /dev/null @@ -1,176 +0,0 @@ -// This file is part of Christmas Event 2011 -// author: Jenalya -// Doll states: -// 1: got order from Taito -// 2: Raimo said that he needs more material -// 3: Raimo created the Doll -// 4: gave Doll to the bad guy -// 5: delivered the Doll without giving it to the bad guy -// 6: delivered fake present instead of Doll - -030-2.gat,37,85,0|script|Taito|328,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - set @doll, (xmas11 & $@xmas11_DollMask) >> $@xmas11_DollShift; - - if (@doll > 0) goto L_Ordered; - if (xmas11 & $@xmas11_talkedToChief) goto L_Helping; - - mes "This helper is very focused on his paperworks."; - mes "[Busy Helper]"; - mes "\"Ah! You startled me! I need to do some paperwork, please don't sneak up on me like that!\""; - goto L_Close; - -L_Helping: - mes "[Taito]"; - mes "\"Hm? Oh, you're here to help? Very good, I have something you could do.\""; - mes "He gives you some piece of paper. It looks very confusing to you."; - next; - mes "[Taito]"; - mes "\"Please bring this to Raimo.\""; - set @doll, 1; - set xmas11, (xmas11 & ~($@xmas11_DollMask) | (@doll << $@xmas11_DollShift)); - goto L_Close; - -L_Ordered: - mes "[Taito]"; - mes "\"Oh? I'm sorry. I was concentrating. I don't have more tasks for you.\""; - goto L_Close; - -L_NoEvent: - mes "[Taito]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "Taito is fallen asleep on his desk."; - goto L_Close; - -L_Close: - set @doll, 0; - close; -} - -030-2.gat,153,39,0|script|Raimo|329,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - set @doll, (xmas11 & $@xmas11_DollMask) >> $@xmas11_DollShift; - set @cotton_amount, 2; - set @dye_amount, 2; - set @spike_amount, 2; - - if (@doll >= 3) goto L_DollDone; - if (@doll == 2) goto L_Doll; - if (xmas11 & $@xmas11_talkedToChief) goto L_Helping; - - mes "The helper is busy sorting some tools and materials."; - goto L_Close; - -L_Helping: - mes "[Raimo]"; - mes "\"Oh, hello. Do you have something to do? Because I don't have. We're only allowed to create toys that were ordered!"; - mes "And now I'm sitting here with nothing to do but sorting my tools. Which are already sorted.\""; - mes "He sighs."; - if (@doll == 0) - goto L_Close; - next; - menu - "Taito gave me this paper for you.",-, - "Oh, that's not nice.", L_Close; - mes "[Raimo]"; - mes "\"Ah, let's see! Mh, a doll. I think there are some materials missing."; - mes "Could you bring me " + @cotton_amount + " Cotton Cloths, " + @dye_amount + " Light Blue Dyes and " + @spike_amount + " Hard Spikes?"; - set @doll, 2; - callsub S_Update_Var; - goto L_Close; - -L_Doll: - mes "[Raimo]"; - mes "\"I need " + @cotton_amount + " Cotton Cloths, " + @dye_amount + " Light Blue Dyes and " + @spike_amount + " Hard Spikes for the Doll.\""; - menu - "Here it is.",-, - "I don't have it yet.",L_Close; - if ((countitem("CottonCloth") < @cotton_amount) || (countitem("LightBlueDye") < @dye_amount) || (countitem("HardSpike") < @spike_amount)) - goto L_NoItems; - getinventorylist; - if (@inventorylist_count == 100) - goto L_Full_Inv; - delitem "CottonCloth", @cotton_amount; - delitem "LightBlueDye", @dye_amount; - delitem "HardSpike", @spike_amount; - set @doll, 3; - callsub S_Update_Var; - getitem "Doll", 1; - mes "[Raimo]"; - mes "\"Alright, let's start.\""; - mes "He takes your items and starts to do many different things."; - mes "He dyes the Cotton Cloths and while waiting for them to dry, he takes out a doll without hair, clothes or face from his workbench."; - mes "It seems he has already prepared that. He rummages in another drawer of his workbench and pulls out a ball of red wool."; - mes "While attaching strings of wool to the dolls head, he talks to you."; - next; - mes "[Raimo]"; - mes "\"You know, usually it's really fun to be one of Santa's helpers. But this year something's going really wrong. I wonder what the reason for this is."; - mes "All kind of material deliveries went wrong, the guys up in the office are all roused up because their paperwork got mixed up and I heard some of the Reinboos are lost!\""; - next; - mes "\"It's kind of odd, isn't it?\""; - mes "While he is talking, he finishes attaching the hair and tailors a cute little dress from the dyed Cotton Cloths."; - mes "He carefully puts on the dress and takes the Hard Spikes you gave him."; - next; - mes "[Raimo]"; - mes "\"These spikes are excellent for making eyes, have a look.\""; - mes "He takes a sharp knife and starts carving them. After a short while he has managed to bring them into a round shape, with a gap on the backside part. He takes a needle and sewing thread and attaches them to the doll's face."; - next; - mes "[Raimo]"; - mes "\"Alright, it's done. Could you please bring it to Aaron?\""; - goto L_Close; - -L_DollDone: - mes "[Raimo]"; - mes "\"Do you have another order for me? I'm bored.\""; - goto L_Close; - -L_NoEvent: - mes "[Raimo]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Raimo]"; - mes "\"Ah, we're finally done for this year.\""; - goto L_Close; - -L_NoItems: - mes "[Raimo]"; - mes "\"You don't have it!\""; - goto L_Close; - -L_Full_Inv: - mes "[Raimo]"; - mes "\"You have a full backpack! Come back when you're carrying less things.\""; - goto L_Close; - -L_Close: - set @cotton_amount, 0; - set @fur_amount, 0; - set @doll, 0; - set @inventorylist_count, 0; - close; - -S_Update_Var: - set xmas11, (xmas11 & ~($@xmas11_DollMask) | (@doll << $@xmas11_DollShift)); - return; -} diff --git a/world/map/npc/xmas/2011/emptyBoxesHelper.txt b/world/map/npc/xmas/2011/emptyBoxesHelper.txt deleted file mode 100644 index afca6a4d..00000000 --- a/world/map/npc/xmas/2011/emptyBoxesHelper.txt +++ /dev/null @@ -1,68 +0,0 @@ -// This file is part of Christmas Event 2011 -// author: Jenalya -// Urmas asks for raw logs to make empty presents boxes -// later he can be asked for those boxes to put toys in - -030-2.gat,140,41,0|script|Urmas|328,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - set @log_amount, 2; - - if (xmas11 & $@xmas11_talkedToChief) goto L_Helping; - - mes "[Busy Helper]"; - mes "\"Don't stand in the way! We have some serious problems here.\""; - goto L_Close; - -L_Helping: - mes "[Urmas]"; - mes "\"Ah, I see you're one of the seasonal helpers. Ok, listen to me."; - mes "\"We have a shortage on the empty present boxes. Don't ask me how that can happen!"; - mes "Those paper-shufflers up there probably messed up the ordering or something. Pah.\""; - next; - mes "\"However, we need to fix it. I have only a few boxes left."; - mes "Bring me some wood, so I can make new boxes out of it."; - mes @log_amount + " Raw Logs will do for one box.\""; - if (countitem("RawLog") < @log_amount) - goto L_Close; - next; - mes "\"How many boxes do you need?\""; - input @amount; - if (@amount <= 0) - goto L_Close; - if (countitem("RawLog") < @amount*@log_amount) - goto L_NoItems; - delitem "RawLog", @amount*@log_amount; - mes "[Urmas]"; - mes "\"Alright! Good job, kid. I'll start to make some more boxes now."; - mes "Here, take this in the meanwhile and put some toys in it.\""; - getitem "OpenPresentBox", @amount; - goto L_Close; - -L_NoEvent: - mes "[Urmas]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Urmas]"; - mes "\"Ha, we did it. That really wasn't a piece of cake this year.\""; - goto L_Close; - -L_NoItems: - mes "[Urmas]"; - mes "\"Eh? Are you kidding?\""; - goto L_Close; - -L_Close: - set @log_amount, 0; - set @amount, 0; - close; -} diff --git a/world/map/npc/xmas/2011/entranceHelpers.txt b/world/map/npc/xmas/2011/entranceHelpers.txt deleted file mode 100644 index 38ba818c..00000000 --- a/world/map/npc/xmas/2011/entranceHelpers.txt +++ /dev/null @@ -1,76 +0,0 @@ -// This file is part of Christmas Event 2011 -// author: Jenalya -// The NPCs in this file are for background information - -030-2.gat,74,29,0|script|Vellamo|328,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - mes "[Vellamo]"; - mes "\"Those terrible slimes! It's a disaster!"; - mes "No matter what I do they always come back!\""; - next; - mes "\"How am I supposed to work under these conditions!"; - mes "This is unacceptable! Those icky slimes!\""; - next; - mes "\"They have occupied the entire basement where all our materials and all the remaining presents are stored."; - mes "Grrrr.\""; - mes "He seems too freaked out to have a decent conversation."; - goto L_Close; - -L_NoEvent: - mes "[Vellamo]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Vellamo]"; - mes "\"Those annoying slimes are still there.\""; - mes "Vellamo seems to be totally overwrought."; - goto L_Close; - -L_Close: - close; -} - -// welcome Guy -030-2.gat,87,40,0|script|Valtteri|328,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - mes "[Valterri]"; - mes "\"Welcome to Santa's house."; - mes "We're currently busy with the preparations for Christmas, so please don't interrupt the helpers.\""; - menu - "Wow, this place looks much smaller from the outside.",-, - "Thank you.",L_Close; - mes "[Valterri]"; - mes "\"Isn't it obvious? Magic!"; - mes "Santa is a member of The Sages of Kazei, which is a council of powerful wizards who rule our lands.\""; - goto L_Close; - -L_RewardTime: - mes "[Valterri]"; - mes "\"Welcome to Santa's house."; - mes "We just finished the Christmas rush.\""; - goto L_Close; - -L_NoEvent: - mes "[Valtteri]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_Close: - close; -} diff --git a/world/map/npc/xmas/2011/glitterHelper.txt b/world/map/npc/xmas/2011/glitterHelper.txt deleted file mode 100644 index 79a40146..00000000 --- a/world/map/npc/xmas/2011/glitterHelper.txt +++ /dev/null @@ -1,110 +0,0 @@ -// This file is part of Christmas Event 2011 -// author: Jenalya -// Eljas asks for Diamond Powder and Ruby Powder for decoration -// can be sabotaged with Red Powder and Yellow Powder, Saboteur can make that out of Wisp and Spectre Powder -// Coding of Decoration: -// 00 not talked -// 10 asked for Decoration -// 01 done in good way -// 11 done in bad way - -030-2.gat,31,81,0|script|Eljas|328,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - set @red_amount, 5; - set @yellow_amount, 5; - - if (xmas11 & $@xmas11_DecorationDone) goto L_Done; - if (xmas11 & $@xmas11_Decoration) goto L_Powder; - if (xmas11 & $@xmas11_talkedToChief) goto L_Helping; - - mes "[Busy Helper]"; - mes "\"Mh? Excuse me, I'm very busy right now.\""; - goto L_Close; - -L_Helping: - mes "[Eljas]"; - mes "\"Hello. We have some problems here. Something went wrong with the shipment of the ingredients for our decoration glitter."; - mes "Could you bring me " + @red_amount + " Ruby Powders and " + @yellow_amount + " Topaz Powders?\""; - next; - mes "[Eljas]"; - mes "\"But make sure it is really gempowder and not some kind of cheap replacement."; - mes "You know, our decoration glitter is intensified by some magic, and that only works with real gempowders. Otherwise it'll lose its effect after a while.\""; - set xmas11, xmas11 | $@xmas11_Decoration; - goto L_Close; - -L_Powder: - mes "[Eljas]"; - mes "\"Welcome back. Do you have the " + @red_amount + " Ruby Powders and " + @yellow_amount + " Topaz Powders needed for the decoration glitter?\""; - if ((countitem("RubyPowder") >= @red_amount) && (countitem("TopazPowder") >= @yellow_amount) && (countitem("RedPowder") >= @red_amount) && (countitem("YellowPowder") >= @yellow_amount)) - menu - "Yeah, here it is. (Give the gem powders.)",L_GemPowders, - "Sure, here it is. (Give the fake powders.)",L_FakePowders, - "No, I'm still working on that.",L_Close; - if ((countitem("RubyPowder") >= @red_amount) && (countitem("TopazPowder") >= @yellow_amount)) - menu - "Yeah, here it is. (Give the gem powders.)",L_GemPowders, - "No, I'm still working on that.",L_Close; - if ((countitem("RedPowder") >= @red_amount) && (countitem("YellowPowder") >= @yellow_amount)) - menu - "Sure, here it is. (Give the fake powders.)",L_FakePowders, - "No, I'm still working on that.",L_Close; - goto L_Close; - -L_GemPowders: - if ((countitem("RubyPowder") < @red_amount) || (countitem("TopazPowder") < @yellow_amount)) - goto L_NoItems; - delitem "RubyPowder", @red_amount; - delitem "TopazPowder", @yellow_amount; - set xmas11, xmas11 & ~$@xmas11_Decoration; - set xmas11, xmas11 | $@xmas11_DecorationDone; - mes "[Eljas]"; - mes "\"Excellent! Thank you very much.\""; - goto L_Close; - -L_FakePowders: - if ((countitem("RedPowder") < @red_amount) || (countitem("YellowPowder") < @yellow_amount)) - goto L_NoItems; - delitem "RedPowder", @red_amount; - delitem "YellowPowder", @yellow_amount; - set xmas11, xmas11 | $@xmas11_DecorationDone; - mes "He doesn't notice that you're giving him fake powders."; - mes "[Eljas]"; - mes "\"Excellent! Thank you very much.\""; - goto L_Close; - -L_Done: - mes "[Eljas]"; - if (xmas11 & $@xmas11_Decoration) - mes "\"Even after your help, the powder still isn't working right. Maybe it got wet.\""; - if (!(xmas11 & $@xmas11_Decoration)) - mes "\"Thanks for bringing the powders.\""; - goto L_Close; - -L_NoEvent: - mes "[Eljas]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Eljas]"; - mes "\"I need a vacation.\""; - goto L_Close; - -L_NoItems: - mes "[Eljas]"; - mes "\"Eh? Are you kidding?\""; - goto L_Close; - -L_Close: - set @red_amount, 0; - set @yellow_amount, 0; - close; -} diff --git a/world/map/npc/xmas/2011/guardOfHonor.txt b/world/map/npc/xmas/2011/guardOfHonor.txt deleted file mode 100644 index 57c0cc1e..00000000 --- a/world/map/npc/xmas/2011/guardOfHonor.txt +++ /dev/null @@ -1,164 +0,0 @@ -// This file is part of Christmas Event 2011 -// author: Jenalya -// Nutcrackers are magical beings serving Santa as guards of honor - -// outside of the building -030-1.gat,89,51,0|script|Grigory the Nutcracker|330,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - - mes "[Grigory the Nutcracker]"; - mes "\"Welcome to Santa's house. Please behave well.\""; - close; - -L_NoEvent: - mes "[Grigory the Nutcracker]"; - mes "\"This is Santa's house. But he isn't home at the moment.\""; - close; -} - -030-1.gat,89,54,0|script|Vadim the Nutcracker|330,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - - mes "[Vadim the Nutcracker]"; - mes "\"Welcome. Enjoy your time in Santa's residence.\""; - close; - -L_NoEvent: - mes "[Vadim the Nutcracker]"; - mes "\"This is Santa's residence, but he isn't here at the moment.\""; - close; -} - -// in the entrance area -030-2.gat,83,43,0|script|Andrey the Nutcracker|330,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - - mes "[Andrey the Nutcracker]"; - mes "\"Hello. Have a nice time visiting Santa's home."; - mes "Be careful not to cause trouble, we, the Nutcracker Guard of Honor, guarantee peace in this house.\""; - close; - -L_NoEvent: - mes "[Andrey the Nutcracker]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - close; -} - -030-2.gat,99,23,0|script|Eugeny the Nutcracker|330,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - - mes "[Eugeny the Nutcracker]"; - mes "\"Greetings. The workshop is upstairs.\""; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day)) - close; - next; - mes "\"Usually the helpers are very friendly and would explain what they do to the visitors.\""; - mes "But there is some trouble this year and they're all under great pressure."; - mes "You can have a look, but be gentle and don't disturb them.\""; - close; - -L_NoEvent: - mes "[Eugeny the Nutcracker]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - close; -} - -030-2.gat,77,23,0|script|Leonid the Nutcracker|330,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - - mes "[Leonid the Nutcracker]"; - mes "\"Hello. Feel free to have a look around.\""; - close; - -L_NoEvent: - mes "[Leonid the Nutcracker]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - close; -} - -// in office -030-2.gat,47,81,0|script|Yakov the Nutcracker|330,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - - mes "[Yakov the Nutcracker]"; - mes "\"Greetings. I hope you find your visit interesting.\""; - menu - "What is behind that door?",-, - "Yeah, it's very interesting.",L_Close; - mes "[Yakov the Nutcracker]"; - mes "\"The Archive. Restricted area, you're not allowed to enter.\""; -L_Close: - close; - -L_NoEvent: - mes "[Yakov the Nutcracker]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - close; -} - -// in the room before Santa's -030-2.gat,96,77,0|script|Taras the Nutcracker|330,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - mes "[Taras the Nutcracker]"; - mes "\"Hello. Santa's room is down the hallway."; - mes "But he has a lot of things to take care of, so he isn't receiving visitors at the moment.\""; - close; - -L_RewardTime: - mes "[Taras the Nutcracker]"; - mes "\"Hello. Santa's room is down the hallway.\""; - close; - -L_NoEvent: - mes "[Taras the Nutcracker]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - close; -} - -030-2.gat,99,77,0|script|Stepan the Nutcracker|330,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - - mes "[Stepan the Nutcracker]"; - mes "\"Greetings. The dormitory is up there."; - mes "I think Ismo went up there because he isn't feeling well. Please let him rest.\""; - close; - -L_NoEvent: - mes "[Stepan the Nutcracker]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - close; -} diff --git a/world/map/npc/xmas/2011/illHelper.txt b/world/map/npc/xmas/2011/illHelper.txt deleted file mode 100644 index 48f8600d..00000000 --- a/world/map/npc/xmas/2011/illHelper.txt +++ /dev/null @@ -1,101 +0,0 @@ -// This file is part of Christmas Event 2011 -// author: Jenalya -// Ismo is ill and can't work because of that, asks for a small healing potion -// bad: give him a cactus potion instead -// 00 not talked -// 10 asked for powders -// 01 done in good way -// 11 done in bad way - -030-2.gat,127,89,0|script|Ismo|329,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - if (xmas11 & $@xmas11_PotionDone) goto L_Done; - if (xmas11 & $@xmas11_Potion) goto L_Asked; - if (xmas11 & $@xmas11_talkedToChief) goto L_Helping; - - mes "[Ill Helper]"; - mes "\"Uh, my head.\""; - goto L_Close; - -L_Helping: - mes "[Ismo]"; - mes "\"Hello. I'm not feeling well. My head hurts so bad and I'm all weary.\""; - next; - mes "\"Could you bring me a Small Healing Potion?\""; - set xmas11, xmas11 | $@xmas11_Potion; - goto L_Close; - -L_Asked: - mes "[Ismo]"; - mes "\"Ah, you're back. Do you have a Small Healing Potion for me? I feel so bad.\""; - if ((countitem("SmallHealingPotion") >= 1) && (countitem("CactusPotion") >= 1)) - menu - "Yeah, here it is. (Give the Small Healing Potion.)",L_Heal, - "Sure, here it is. (Give the Cactus Potion.)",L_Cactus, - "Not yet, sorry.",L_Close; - if (countitem("SmallHealingPotion") >= 1) - menu - "Yeah, here it is. (Give the Small Healing Potion.)",L_Heal, - "Not yet, sorry.",L_Close; - if (countitem("CactusPotion") >= 1) - menu - "Sure, here it is. (Give Cactus Potion.)",L_Cactus, - "Not yet, sorry.",L_Close; - goto L_Close; - -L_Heal: - if (countitem("SmallHealingPotion") < 1) - goto L_NoItems; - delitem "SmallHealingPotion", 1; - set xmas11, xmas11 & ~$@xmas11_Potion; - set xmas11, xmas11 | $@xmas11_PotionDone; - mes "[Ismo]"; - mes "\"Ah, thank you.\""; - mes "He drinks the potion."; - goto L_Close; - -L_Cactus: - if (countitem("CactusPotion") < 1) - goto L_NoItems; - delitem "CactusPotion", 1; - set xmas11, xmas11 | $@xmas11_PotionDone; - mes "He doesn't notice that you're giving him a Cactus Potion."; - mes "[Ismo]"; - mes "\"Ah, thank you.\""; - mes "He drinks the potion."; - goto L_Close; - -L_Done: - mes "[Ismo]"; - if (xmas11 & $@xmas11_Potion) - mes "\"I don't really feel better yet. Maybe it takes a while to take effect?\""; - if (!(xmas11 & $@xmas11_Potion)) - mes "\"Thanks for bringing me the Small Healing Potion, I feel slightly better now.\""; - goto L_Close; - -L_NoEvent: - mes "[Ismo]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Ismo]"; - mes "\"I'm getting better.\""; - goto L_Close; - -L_NoItems: - mes "[Ismo]"; - mes "\"Where is it?\""; - goto L_Close; - -L_Close: - close; -} diff --git a/world/map/npc/xmas/2011/leatherBall.txt b/world/map/npc/xmas/2011/leatherBall.txt deleted file mode 100644 index 66e3be2b..00000000 --- a/world/map/npc/xmas/2011/leatherBall.txt +++ /dev/null @@ -1,175 +0,0 @@ -// This file is part of Christmas Event 2011 -// author: Jenalya -// Leather Ball states: -// 1: got order from Tarmo -// 2: Iivo said that he needs more material -// 3: Iivo created the Leather Ball -// 4: gave Leather Ball to the bad guy -// 5: delivered the Leather Ball without giving it to the bad guy -// 6: delivered fake present instead of Leather Ball - -030-2.gat,37,81,0|script|Tarmo|328,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - set @ball, (xmas11 & $@xmas11_BallMask) >> $@xmas11_BallShift; - - if (@ball > 0) goto L_Ordered; - if (xmas11 & $@xmas11_talkedToChief) goto L_Helping; - - mes "[Busy Helper]"; - mes "\"Oh, hello. I'm very sorry, I can't help you. I need to work on all these papers here.\""; - goto L_Close; - -L_Helping: - mes "[Tarmo]"; - mes "\"Mh? Oh, are you new? Well, I suppose it's a good idea to hire more helpers."; - mes "Listen, I have this ordering form. Can you bring it to Iivo for me?\""; - set @ball, 1; - set xmas11, (xmas11 & ~($@xmas11_BallMask) | (@ball << $@xmas11_BallShift)); - menu - "Sure, I'll do that.",L_Close, - "What is it?",-; - mes "[Tarmo]"; - mes "\"The form? It's an order for a toy. We have a shortage on material this year. Some things went wrong with the delivery of it."; - mes "That's why we are producing only explicitly ordered toys this year.\""; - goto L_Close; - -L_Ordered: - mes "[Tarmo]"; - mes "\"Ah, hello. Please bring the order to Iivo."; - mes "I don't have anything else for you to do.\""; - goto L_Close; - -L_NoEvent: - mes "[Tarmo]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Tarmo]"; - mes "\"Given all the misfortunes, we did a pretty good job I think.\""; - goto L_Close; - -L_Close: - set @ball, 0; - close; -} - -030-2.gat,154,33,0|script|Iivo|329,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - set @ball, (xmas11 & $@xmas11_BallMask) >> $@xmas11_BallShift; - set @leather_amount, 1; - set @maggotslime_amount, 10; - - if (@ball >= 3) goto L_LeatherBallDone; - if (@ball == 2) goto L_LeatherBall; - if (@ball == 1) goto L_Order; - if (xmas11 & $@xmas11_talkedToChief) goto L_Helping; - - mes "[Busy Helper]"; - mes "\"Hello there. I hope you have a good time visiting Santa's home."; - mes "We're usually more hospitable, but this year... I don't know why, but everything is going wrong.\""; - goto L_Close; - -L_Helping: - mes "[Iivo]"; - mes "\"Hi there. I'm a bit bored because we're nearly out of material."; - mes "I need an order to make some toys.\""; - if (@ball == 0) - goto L_Close; -L_Order: - mes "[Iivo]"; - mes "\"I wish the guys up there in the office would send me something to do.\""; - menu - "Tarmo gave me an order for a Leather Ball.",-, - "Yeah, it's a shame.", L_Close; - mes "[Iivo]"; - mes "\"Really? That's great! Let me see."; - mes "Ah, there are some things missing. I need " + @leather_amount + " Leather Patch?"; - mes "I need also about " + @maggotslime_amount + " Maggot Slimes. It's an ingredient for the lotion that is used to imbue the leather.\""; - set @ball, 2; - callsub S_Update_Var; - goto L_Close; - -L_LeatherBall: - mes "[Iivo]"; - mes "\"I need " + @leather_amount + " Leather Patch and " + @maggotslime_amount + " Maggot Slimes for the Leather Ball.\""; - menu - "Here it is.",-, - "I don't have it yet.",L_Close; - if ((countitem("LeatherPatch") < @leather_amount) || (countitem("MaggotSlime") < @maggotslime_amount)) - goto L_NoItems; - getinventorylist; - if (@inventorylist_count == 100) - goto L_Full_Inv; - delitem "LeatherPatch", @leather_amount; - delitem "MaggotSlime", @maggotslime_amount; - set @ball, 3; - callsub S_Update_Var; - getitem "LeatherBall", 1; - mes "[Iivo]"; - mes "\"Great!\""; - mes "He takes the material and starts to cut the leather in pieces. Afterwards he seams them together."; - mes "It seems to be hard to stitch the leather and takes a while."; - next; - mes "You get distracted and start daydreaming."; - mes "[Iivo]"; - mes "\"Alright! Now the impregnation.\""; - mes "You startle out of your daydream as he speaks."; - next; - mes "Iivo mixes the maggot slimes with some other ingredients you can't exactly identify and rubs the ball with it."; - mes "[Iivo]"; - mes "\"Very good. It's done. Can you take it to Aaron to get it packed?\""; - goto L_Close; - -L_LeatherBallDone: - mes "[Iivo]"; - mes "\"I hope the kids will have fun with the ball I made. Did you already bring it to Aaron?\""; - goto L_Close; - -L_NoEvent: - mes "[Iivo]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Iivo]"; - mes "\"This year's Christmas preparations really were chaotic. I hope we'll do better next year.\""; - goto L_Close; - -L_NoItems: - mes "[Iivo]"; - mes "\"You don't have it!\""; - goto L_Close; - -L_Full_Inv: - mes "[Iivo]"; - mes "\"You have a full backpack! Come back when you're carrying less things.\""; - goto L_Close; - -L_Close: - set @cotton_amount, 0; - set @fur_amount, 0; - set @ball, 0; - set @inventorylist_count, 0; - close; - -S_Update_Var: - set xmas11, (xmas11 & ~($@xmas11_BallMask) | (@ball << $@xmas11_BallShift)); - return; -} diff --git a/world/map/npc/xmas/2011/monsters.txt b/world/map/npc/xmas/2011/monsters.txt deleted file mode 100644 index 5f583ac5..00000000 --- a/world/map/npc/xmas/2011/monsters.txt +++ /dev/null @@ -1,33 +0,0 @@ -// This file is part of Christmas Event 2011 -// author: Jenalya - -030-2.gat,20,19,52,48|monster|SantaSlime|1015,5,120000,30000,xmasMob030-2::On1015 - -030-2.gat,0,0,0|script|xmasMob030-2|-1,{ -On1015: - set @mobID, 1015; - callfunc "MobPoints"; - end; - -} - -030-1.gat,0,0|monster|Wisp|1040,5,120000,30000,xmasMob030-1::On1040 -030-1.gat,0,0|monster|Spectre|1042,5,120000,30000,xmasMob030-1::On1042 -030-1.gat,0,0|monster|Poltergeist|1047,5,120000,30000,xmasMob030-1::On1047 - -030-1.gat,0,0,0|script|xmasMob030-1|-1,{ -On1040: - set @mobID, 1040; - callfunc "MobPoints"; - end; - -On1042: - set @mobID, 1042; - callfunc "MobPoints"; - end; - -On1047: - set @mobID, 1047; - callfunc "MobPoints"; - end; -} diff --git a/world/map/npc/xmas/2011/plushMouboo.txt b/world/map/npc/xmas/2011/plushMouboo.txt deleted file mode 100644 index 9c9b1b9b..00000000 --- a/world/map/npc/xmas/2011/plushMouboo.txt +++ /dev/null @@ -1,212 +0,0 @@ -// This file is part of Christmas Event 2011 -// author: Jenalya -// Plush Mouboo states: -// 1: got order from Rikhard -// 2: Launo said that he needs more material -// 3: Launo created the Plush Mouboo -// 4: gave Plush Mouboo to the bad guy -// 5: delivered the Plush Mouboo without giving it to the bad guy -// 6: delivered fake present instead of Plush Mouboo - -030-2.gat,31,77,0|script|Rikhard|329,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - set @plushmouboo, (xmas11 & $@xmas11_PlushMoubooMask) >> $@xmas11_PlushMoubooShift; - - if (@plushmouboo > 0) goto L_Ordered; - if (xmas11 & $@xmas11_talkedToChief) goto L_Helping; - - mes "You see some guy grubbing in a huge mound of paper."; - mes "[Busy Helper]"; - mes "\"Where is this fu-\""; - mes "He suddenly notices you nearby."; - mes "[Busy Helper]"; - mes "\"- ahrm, fiddly paper.\""; - goto L_Close; - -L_Helping: - mes "[Rikhard]"; - mes "\"Ah! You came in at just the right moment! I need someone to deliver this Christmas-present-toy-ordering-form to Launo."; - mes "Here, take this.\""; - mes "He puts some piece of paper in your hand."; - next; - mes "It seems to be some kind of form, but is very confusing to you. It contains a lot of boxes with some numbers scrabbled in and some hard to read words."; - menu - "Er, what is this?",-, - "Wait a sec, what do you want me to do with that?",-; - mes "Rikhard mumbles something about hiring nonskilled workers."; - mes "[Rikhard]"; - mes "\"Ok, listen - we're organizing the Christmas business here. We're keeping track of who was a good or bad kid this year and what was written on the wish lists."; - mes "And the good children get what they wished for, remember? So, this is a Christmas-present-toy-ordering-form to order a Plush Mouboo for some very well-behaved cute little girl.\""; - next; - mes "\"Launo is very skilled at creating plush toys, so you need to bring him this form.\""; - mes "He waves at you with his hand and then digs into the papers again."; - set @plushmouboo, 1; - set xmas11, (xmas11 & ~($@xmas11_PlushMoubooMask) | (@plushmouboo << $@xmas11_PlushMoubooShift)); - goto L_Close; - -L_Ordered: - mes "[Rikhard]"; - mes "\"Did you already give Launo the Christmas-present-toy-ordering-form? Yes?"; - mes "Ok, I have some more paperwork to do, so please don't interrupt.\""; - goto L_Close; - -L_NoEvent: - mes "[Rikhard]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Rikhard]"; - mes "\"With sufficient organization you can achieve everything.\""; - mes "He smiles happily."; - goto L_Close; - -L_Close: - set @plushmouboo, 0; - close; -} - -030-2.gat,135,31,0|script|Launo|329,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - set @plushmouboo, (xmas11 & $@xmas11_PlushMoubooMask) >> $@xmas11_PlushMoubooShift; - set @cotton_amount, 5; - set @fur_amount, 2; - - if (@plushmouboo >= 3) goto L_PlushMoubooDone; - if (@plushmouboo == 2) goto L_PlushMouboo; - if (@plushmouboo == 1) goto L_Order; - if (xmas11 & $@xmas11_talkedToChief) goto L_Helping; - - mes "[Busy Helper]"; - mes "\"Mh, mh, mh. This is not good.\""; - goto L_Close; - -L_Helping: - mes "[Launo]"; - mes "\"Mh? Oh, you're here to help?"; - mes "That's very kind of you.\""; - next; - mes "\"Though I can't do anything right now."; - mes "I'm specialized in making plush toys. Usually I'd just create dozens of them and if they aren't on this year's wishlists, they'd be used next year.\""; - mes "He sighs."; - next; - mes "\"But since we're short in material, we got the order to only create toys that are requested."; - mes "And now I sit here and wait to get such an order. But the guys up in the office seem to have some problems getting their paperwork done."; - mes "Maybe you can go up there and ask if there's a plush toy to make?\""; - goto L_Close; - -L_Order: - mes "Launo sighs."; - mes "[Launo]"; - mes "\"I wish I had an order for a toy.\""; - menu - "I have one for you! Rikhard gave me an order for a Plush Mouboo.",-, - "Well, bad luck.", L_Close; - mes "Launos gets a happier look on his face."; - mes "[Launo]"; - mes "\"A Plush Mouboo? I love doing them!"; - mes "Ok, let's see if I have all the material needed.\""; - next; - mes "[Launo]"; - mes "\"Hrm, it seems I need some more Cotton, could you bring me " + @cotton_amount + " Cotton Cloths?"; - mes "And I need some fur to make the belly extra fluffy. " + @fur_amount + " pieces of White Fur would be good, I can dye the color myself.\""; - set @plushmouboo, 2; - callsub S_Update_Var; - goto L_Close; - -L_PlushMouboo: - mes "[Launo]"; - mes "\"I need " + @cotton_amount + " Cotton Cloths and " + @fur_amount + " pieces of White Fur for the Plush Mouboo.\""; - menu - "I have it!",-, - "I'm still working on that.",L_Close; - if ((countitem("CottonCloth") < @cotton_amount) || (countitem("WhiteFur") < @fur_amount)) - goto L_NoItems; - getinventorylist; - if (@inventorylist_count == 100) - goto L_Full_Inv; - delitem "CottonCloth", @cotton_amount; - delitem "WhiteFur", @fur_amount; - set @plushmouboo, 3; - callsub S_Update_Var; - getitem "PlushMouboo", 1; - mes "[Launo]"; - mes "\"Excellent! I'll start right away.\""; - next; - mes "He puts the items you gave him into a pot with brown dye and takes them out again after short while, putting them to dry on the desk."; - mes "In the meanwhile he rummages in his workbench and gets out some tools and a wood template."; - next; - mes "The workbench seems to have a heating mechanism or something since the cloth and fur is already dry."; - mes "He takes the wood template, puts it on the cloth and draws very tiny lines on it. Then he cuts it out with very quick but confident movements."; - next; - mes "After that he takes the different parts and starts to sew them together."; - mes "He stops before it's finished, leaving a hole where he puts in some stuffing."; - next; - mes "He's kneading it a bit to arrange the stuffing properly in the toy and finally stitches up the hole."; - mes "Finally he adds some knobs for the eyes and presents you the Plush Mouboo."; - next; - mes "[Launo]"; - mes "\"Here you go! Isn't it delightful?\""; - menu - "Wow, that was quick!",-; - mes "[Launo]"; - mes "\"Well yeah, I'm used to working quickly. Usually we produce many more toys.\""; - mes "However, now it needs to be put in a present box and then that box has to be wrapped.\""; - next; - mes "\"Could you take care of that? Urmas should have some boxes for you and Reino takes care of the wrapping paper."; - mes "The place to wrap the presents is at Aaron's desk.\""; - goto L_Close; - -L_PlushMoubooDone: - mes "[Launo]"; - mes "\"I feel much better now after I got some work done. Please take care of packing, wrapping, and giving it to Aaron.\""; - goto L_Close; - -L_NoEvent: - mes "[Launo]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Launo]"; - mes "\"Huh, it was really stressful this year."; - mes "But imagining the happy kids cuddling the plush toys I made - that makes amends for all that.\""; - goto L_Close; - -L_NoItems: - mes "[Launo]"; - mes "\"You don't have it!\""; - goto L_Close; - -L_Full_Inv: - mes "[Launo]"; - mes "\"You have a full backpack! Come back when you're carrying less things.\""; - goto L_Close; - -L_Close: - set @cotton_amount, 0; - set @fur_amount, 0; - set @plushmouboo, 0; - set @inventorylist_count, 0; - close; - -S_Update_Var: - set xmas11, (xmas11 & ~($@xmas11_PlushMoubooMask) | (@plushmouboo << $@xmas11_PlushMoubooShift)); - return; -} diff --git a/world/map/npc/xmas/2011/reinboos.txt b/world/map/npc/xmas/2011/reinboos.txt deleted file mode 100644 index b79e1f5b..00000000 --- a/world/map/npc/xmas/2011/reinboos.txt +++ /dev/null @@ -1,687 +0,0 @@ -// This file is part of Christmas Event 2011 -// author: Jenalya -// Grombadil gives the task to search for the lost Reinboos after the player talked to the Chief helper -// Home Reinboos: Reimeles, Leimeres -// Lost Reinboos: Meireles, Meileres, Reilemes, Leiremes -// coding for a lost reinboo -// b1b0 -// 00 : haven't talked yet -// 01 : talked -// 10 : Good -// 11 : Bad - -030-1.gat,103,54,0|script|Grombadil|105,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - if (xmas11 & $@xmas11_startedReinbooSearch) goto L_Search; - - mes "The man is grumbling to himself and seems very worried."; - if (xmas11 & $@xmas11_talkedToChief) - goto L_Help; - goto L_Close; - -L_Help: - menu - "Chief Warrick asked me to help out a bit.",-, - "Nevermind.",L_Close; - mes "[Santa's Helper]"; - mes "\"He did? Well, I indeed have a problem."; - mes "I'm Grombadil, Santa's equerry - the person in charge of the Reinboos."; - next; - mes "\"Those Reinboos, you know, are much more clever than a normal animal and can even talk."; - mes "But they are more like children than an adult.\""; - next; - mes "\"And I fear something happened to some of my little fosterlings."; - mes "It isn't a long time until Christmas and they all should have already arrived here."; - mes "But look!\""; - next; - mes "He waves his hands to point at the area around him."; - mes "[Grombadil]"; - mes "\"Only Reimeles and Leimeres are here."; - mes "Meireles, Reilemes, Meileres and Leiremes are missing!"; - mes "And I have no idea where they could be!\""; - next; - mes "\"They could be anywhere and I can't leave here. Would you find them for me?\""; - menu - "Don't worry, they're as good as home.",-, - "I'll keep my eyes open.",-, - "I'm on my way!",-; - mes "Grombadil looks relieved."; - mes "[Grombadil]"; - mes "\"Oh, one thing before you leave!\""; - next; - mes "\"As I told you, they're a bit like children. And as children they love all kind of candy."; - mes "But it's not good for them, they get an upset stomach from eating sweet stuff.\""; - next; - mes "\"So don't give them candy! You might want to take some apples with you, that's much better for them."; - mes "Red apples. Don't give them candy. Good luck.\""; - set xmas11, xmas11 | $@xmas11_startedReinbooSearch; - goto L_Close; - -L_Search: - mes "[Grombadil]"; - mes "\"Welcome back! I hope you'll be able to find my fosterlings before it's too late."; - mes "Imagine what would happen if they don't arrive in time!\""; - next; - mes "\"And remember, don't give them candy, but red apples. Those are the best ones."; - - - cleararray @choice_idx, 0, 5; - cleararray @choice$, "", 5; - - set @C_r1, 1; - set @C_r2, 2; - set @C_r3, 3; - set @C_r4, 4; - set @C_nevermind, 5; - - // counter of available answers - set @choices_nr, 0; - - if (!(xmas11 & $@xmas11_firstReinbooDone)) - goto L_NoR1; - set @choice_idx[@choices_nr], @C_r1; - set @choice$[@choices_nr], "I found Meireles, he's about to come home."; - set @choices_nr, @choices_nr + 1; - -L_NoR1: - if (!(xmas11 & $@xmas11_secondReinbooDone)) - goto L_NoR2; - set @choice_idx[@choices_nr], @C_r2; - set @choice$[@choices_nr], "Meileres is on his way home."; - set @choices_nr, @choices_nr + 1; - -L_NoR2: - if (!(xmas11 & $@xmas11_thirdReinbooDone)) - goto L_NoR3; - set @choice_idx[@choices_nr], @C_r3; - set @choice$[@choices_nr], "Reilemes said he'll follow my smell back home."; - set @choices_nr, @choices_nr + 1; - -L_NoR3: - if (!(xmas11 & $@xmas11_fourthReinbooDone)) - goto L_NoR4; - set @choice_idx[@choices_nr], @C_r4; - set @choice$[@choices_nr], "I found Leiremes, he should be here anytime."; - set @choices_nr, @choices_nr + 1; - -L_NoR4: - set @choice_idx[@choices_nr], @C_nevermind; - set @choice$[@choices_nr], "I'm still searching."; - - menu - @choice$[0],-, - @choice$[1],-, - @choice$[2],-, - @choice$[3],-, - @choice$[4],-; - - set @menu, @menu - 1; - if (@choice_idx[@menu] == 0) - goto L_Close; - if ((@choice_idx[@menu] == @C_nevermind)) - goto L_Close; - mes "[Grombadil]"; - mes "\"Ah, that are good news!\""; - goto L_Close; - -L_NoEvent: - mes "[Grombadil]"; - mes "\"Everything is calm and peaceful.\""; - mes "He smiles."; - goto L_Close; - -L_RewardTime: - mes "[Grombadil]"; - mes "\"All this stress is finally over. You might want to talk to Santa.\""; - goto L_Close; - -L_Close: - cleararray @choice_idx, 0, 5; - cleararray @choice$, "", 5; - set @C_r1, 0; - set @C_r2, 0; - set @C_r3, 0; - set @C_r4, 0; - set @C_nevermind, 0; - set @choices_nr, 0; - close; -} - -030-1.gat,96,57,0|script|Reimeles|170,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - mes "[Reimeles the Reinboo]"; - mes "\"I miss Reilemes, he's my best friend.\""; - close; - -L_NoEvent: - mes "[Reimeles the Reinboo]"; - mes "\"Hello. Do you want to see Santa? He's not at home.\""; - close; - -L_RewardTime: - mes "[Reimeles the Reinboo]"; - mes "\"Ah, I'm tired. But it was fun!\""; - close; -} - -030-1.gat,100,46,0|script|Leimeres|170,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - mes "[Leimeres the Reinboo]"; - mes "\"I like the snowflakes. Look, I can catch them with my mouth!\""; - close; - -L_NoEvent: - mes "[Leimeres the Reinboo]"; - mes "\"It's nice here, isn't it?\""; - close; - -L_RewardTime: - mes "[Leimeres the Reinboo]"; - mes "\"It was fun to ride with Santa!\""; - close; -} - -006-1.gat,126,112,0|script|Meireles the Reinboo|170,{ - set @cake_amount, 3; - set @apple_amount, 5; - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - if ((xmas11 & $@xmas11_firstReinboo) && (xmas11 & $@xmas11_firstReinbooDone)) goto L_Bad; - if (!(xmas11 & $@xmas11_firstReinboo) && (xmas11 & $@xmas11_firstReinbooDone)) goto L_Good; - if (xmas11 & $@xmas11_firstReinboo) goto L_Food; - if (xmas11 & $@xmas11_startedReinbooSearch) goto L_Search; - - mes "The reinboo shys away from you. It seems to be frightened."; - goto L_Close; - -L_Search: - mes "The Reinboo comes close to you."; - mes "[Meireles the Reinboo]"; - mes "\"Your smell is familiar!\""; - menu - "Grombadil sent me to find you.",-, - "I don't talk with animals!",L_Close; - mes "[Meireles the Reinboo]"; - mes "\"Oh! Yes, I shouldn't be here, but home."; - mes "But I got lost.\""; - menu - "What happened?",-; - mes "The Reinboo seems to feel ashamed."; - mes "[Meireles the Reinboo]"; - mes "\"I was stupid. I was on the way home, but there was some guy with a mask."; - mes "He gave me tasty cakes! So tasty...\""; - next; - mes "\"He made me go with him, he said he had more cakes. But he tricked me!"; - mes "He dashed some powder into my face and ran away."; - mes "The powder burned in my nose and made me forget the smell of the way home.\""; - next; - mes "\"I tried to find the way, but I'm totally lost."; - mes "This place is very odd.\""; - next; - mes "\"And all this running around made me become hungry.\""; -L_Food: - mes "The Reinboo snuffles on you."; - set xmas11, xmas11 | $@xmas11_firstReinboo; - next; - if (countitem("OrangeCake") >= @cake_amount) - goto L_Cake; - mes "[Meireles the Reinboo]"; - mes "\"Can you bring me some Orange Cakes? Please?"; - mes "When I have something to eat I can follow your smell back home.\""; - if (countitem("RedApple") < @apple_amount) - goto L_Close; - menu - "I'll try to find some.",L_Close, - "Cakes aren't good for you, remember? But I have some apples.",L_GiveApple; - -L_Cake: - mes "[Meireles the Reinboo]"; - mes "\"You have some Orange Cakes! Give them to me! Please?\""; - if (countitem("RedApple") >= @apple_amount) - menu - "I have something that is better for you. Apples!",L_GiveApple, - "No, I want to keep them.",L_Close, - "Ok, here.",L_GiveCake; - menu - "No, I want to keep them.",L_Close, - "Ok, here.",L_GiveCake; - -L_GiveCake: - if (countitem("OrangeCake") < @cake_amount) - goto L_NoItem; - delitem "OrangeCake", @cake_amount; - mes "[Meireles the Reinboo]"; - mes "\"Yam!\""; - mes "The Reinboo munches the Orange Cakes."; - set xmas11, xmas11 | $@xmas11_firstReinbooDone; - goto L_Close; - -L_GiveApple: - if (countitem("RedApple") < @apple_amount) - goto L_NoItem; - delitem "RedApple", @apple_amount; - mes "[Meireles the Reinboo]"; - mes "\"Apples, bah. Ok.\""; - mes "The Reinboo munches the Apples."; - set xmas11, xmas11 | $@xmas11_firstReinbooDone; - set xmas11, xmas11 & ~$@xmas11_firstReinboo; - goto L_Close; - -L_NoItem: - mes "[Meireles the Reinboo]"; - mes "\"Huh? It disappeared!\""; - goto L_Close; - -L_Good: - mes "[Meireles the Reinboo]"; - mes "\"I feel better now. I'm about to follow your smell back to Grombadil.\""; - goto L_Close; - -L_Bad: - mes "[Meireles the Reinboo]"; - mes "\"Uh, I don't feel well. My stomach hurts. I have to rest a little longer.\""; - goto L_Close; - -L_NoEvent: - mes "The Reinboo just looks at you."; - goto L_Close; - -L_RewardTime: - mes "[Meireles the Reinboo]"; - mes "\"Phew, that was close. I nearly didn't make it back in time."; - mes "But everything went well and now I came back because this place made me curious.\""; - goto L_Close; - -L_Close: - set @cake_amount, 0; - set @apple_amount, 0; - close; -} - -012-1.gat,66,55,0|script|Meileres the Reinboo|170,{ - set @cake_amount, 3; - set @apple_amount, 5; - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - if ((xmas11 & $@xmas11_secondReinboo) && (xmas11 & $@xmas11_secondReinbooDone)) goto L_Bad; - if (!(xmas11 & $@xmas11_secondReinboo) && (xmas11 & $@xmas11_secondReinbooDone)) goto L_Good; - if (xmas11 & $@xmas11_secondReinboo) goto L_Food; - if (xmas11 & $@xmas11_startedReinbooSearch) goto L_Search; - - mes "The reinboo shys away from you. It seems to be frightened."; - goto L_Close; - -L_Search: - mes "The Reinboo snuffles on your clothes."; - mes "[Meileres the Reinboo]"; - mes "\"Mh, you smell like home.\""; - menu - "Grombadil sent me to find you.",-, - "Back off from me!",L_Close; - mes "[Meileres the Reinboo]"; - mes "\"Grombadil! He must be worried!\""; - menu - "He is. How did you get lost?",-, - "What are you doing here?",-; - mes "The Reinboo seems abashed."; - mes "[Meileres the Reinboo]"; - mes "\"There was this guy with candy. Very tasty candy."; - mes "He promised to give me more candy, so I followed him.\""; - next; - mes "\"But he didn't give me more candy! He dashed some stinging powder into my face!"; - mes "It hurt my nose and my eyes. And then he was gone and I don't know where I am.\""; - next; - mes "\"Usually I could find the way back with my remarkable nose."; - mes "But because of that stinging powder I can't remember the smell of the way back.\""; - next; - mes "\"And I'm hungry.\""; -L_Food: - mes "The Reinboo snuffles on you again."; - set xmas11, xmas11 | $@xmas11_secondReinboo; - next; - if (countitem("ChocolateCake") >= @cake_amount) - goto L_Cake; - mes "[Meileres the Reinboo]"; - mes "\"Can you bring me some Chocolate Cakes? Please?"; - mes "Then I can go home, I can follow your smell to find the way.\""; - if (countitem("RedApple") < @apple_amount) - goto L_Close; - menu - "I will see what I can do.",L_Close, - "Cakes aren't good for you! But I have some apples.",L_GiveApple; - -L_Cake: - mes "[Meileres the Reinboo]"; - mes "\"You have some Chocolate Cakes! Can I have them? Can I have them?\""; - if (countitem("RedApple") >= @apple_amount) - menu - "I have something that is better for you. Apples!",L_GiveApple, - "No, I want to keep them.",L_Close, - "Ok, here.",L_GiveCake; - menu - "No, I want to keep them.",L_Close, - "Ok, here.",L_GiveCake; - -L_GiveCake: - if (countitem("ChocolateCake") < @cake_amount) - goto L_NoItem; - delitem "ChocolateCake", @cake_amount; - mes "[Meileres the Reinboo]"; - mes "\"Yay!\""; - mes "The Reinboo munches the Chocolate Cakes."; - set xmas11, xmas11 | $@xmas11_secondReinbooDone; - goto L_Close; - -L_GiveApple: - if (countitem("RedApple") < @apple_amount) - goto L_NoItem; - delitem "RedApple", @apple_amount; - mes "[Meileres the Reinboo]"; - mes "\"Hrm, ok, I'll eat the apples.\""; - mes "The Reinboo munches the Apples."; - set xmas11, xmas11 | $@xmas11_secondReinbooDone; - set xmas11, xmas11 & ~$@xmas11_secondReinboo; - goto L_Close; - -L_NoItem: - mes "[Meileres the Reinboo]"; - mes "\"Huh? It disappeared!\""; - goto L_Close; - -L_Good: - mes "[Meileres the Reinboo]"; - mes "\"Hello! I'm about to follow your smell back to Grombadil.\""; - goto L_Close; - -L_Bad: - mes "[Meileres the Reinboo]"; - mes "\"Uh, my stomach. It hurts. I have to rest a little longer.\""; - goto L_Close; - -L_NoEvent: - mes "The Reinboo just looks at you."; - goto L_Close; - -L_RewardTime: - mes "[Meileres the Reinboo]"; - mes "\"Phew, that was close. I nearly didn't make it back in time."; - mes "But everything went well and now I came back because this place is interesting.\""; - goto L_Close; - -L_Close: - set @cake_amount, 0; - set @apple_amount, 0; - close; -} - -018-1.gat,114,41,0|script|Reilemes the Reinboo|170,{ - set @cake_amount, 3; - set @apple_amount, 5; - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - if ((xmas11 & $@xmas11_thirdReinboo) && (xmas11 & $@xmas11_thirdReinbooDone)) goto L_Bad; - if (!(xmas11 & $@xmas11_thirdReinboo) && (xmas11 & $@xmas11_thirdReinbooDone)) goto L_Good; - if (xmas11 & $@xmas11_thirdReinboo) goto L_Food; - if (xmas11 & $@xmas11_startedReinbooSearch) goto L_Search; - - mes "The reinboo shys away from you. It seems to be frightened."; - goto L_Close; - -L_Search: - mes "The Reinboo comes closer and snuffles on your clothes."; - mes "[Reilemes the Reinboo]"; - mes "\"Did you met Reimeles? He's my best friend. I miss him.\""; - menu - "Yes, Grombadil sent me to find you.",-, - "Hey, stay away from me!",L_Close; - mes "[Reilemes the Reinboo]"; - mes "\"Oh, Grombadil! He's very nervous, right? I should have been home long ago.\""; - menu - "He is. How did you get lost?",-, - "Reimeles misses you too, why are you here?",-; - mes "The Reinboo seems embarrassed."; - mes "[Reilemes the Reinboo]"; - mes "\"I got distracted. Some man gave me tasty candy!"; - mes "He said he had more at his place and told me to come with him.\""; - next; - mes "\"But there wasn't more tasty candy! He dashed some stinging powder into my face!"; - mes "My eyes and nose still feel itchy.\""; - next; - mes "\"That's why I can't find the way back. My nose doesn't remember the smell!\""; - next; - mes "\"And I'm hungry.\""; -L_Food: - mes "The Reinboo snuffles on you again."; - set xmas11, xmas11 | $@xmas11_thirdReinboo; - next; - if (countitem("WhiteCake") >= @cake_amount) - goto L_Cake; - mes "[Reilemes the Reinboo]"; - mes "\"Can you bring me some White Cakes? I love those!"; - mes "Then I can go home, I can follow your smell to find the way.\""; - if (countitem("RedApple") < @apple_amount) - goto L_Close; - menu - "I will see what I can do.",L_Close, - "Cakes aren't good for you! But I have some apples.",L_GiveApple; - -L_Cake: - mes "[Reilemes the Reinboo]"; - mes "\"You have some White Cakes! I want those! Please, can I have them?\""; - if (countitem("RedApple") >= @apple_amount) - menu - "I have something that is better for you. Apples!",L_GiveApple, - "No, I want to keep them.",L_Close, - "Ok, here.",L_GiveCake; - menu - "No, I want to keep them.",L_Close, - "Ok, here.",L_GiveCake; - -L_GiveCake: - if (countitem("WhiteCake") < @cake_amount) - goto L_NoItem; - delitem "WhiteCake", @cake_amount; - mes "[Reilemes the Reinboo]"; - mes "\"Yay!\""; - mes "The Reinboo munches the White Cakes."; - set xmas11, xmas11 | $@xmas11_thirdReinbooDone; - goto L_Close; - -L_GiveApple: - if (countitem("RedApple") < @apple_amount) - goto L_NoItem; - delitem "RedApple", @apple_amount; - mes "[Reilemes the Reinboo]"; - mes "\"Hrm, ok, I'll eat the apples.\""; - mes "The Reinboo munches the Apples."; - set xmas11, xmas11 | $@xmas11_thirdReinbooDone; - set xmas11, xmas11 & ~$@xmas11_thirdReinboo; - goto L_Close; - -L_NoItem: - mes "[Reilemes the Reinboo]"; - mes "\"Huh? It disappeared!\""; - goto L_Close; - -L_Good: - mes "[Reilemes the Reinboo]"; - mes "\"Hello! I'm about to follow your smell back to Grombadil and Reimeles.\""; - goto L_Close; - -L_Bad: - mes "[Reilemes the Reinboo]"; - mes "\"Uh, my stomach. It hurts. I have to rest a little longer.\""; - goto L_Close; - -L_NoEvent: - mes "The Reinboo just looks at you."; - goto L_Close; - -L_RewardTime: - mes "[Reilemes the Reinboo]"; - mes "\"I was nearly late! But everything went well."; - mes "Now I'm playing hide and seek with Reimeles.\""; - goto L_Close; - -L_Close: - set @cake_amount, 0; - set @apple_amount, 0; - close; -} - -017-1.gat,35,49,0|script|Leiremes the Reinboo|170,{ - set @cake_amount, 3; - set @apple_amount, 5; - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - if ((xmas11 & $@xmas11_fourthReinboo) && (xmas11 & $@xmas11_fourthReinbooDone)) goto L_Bad; - if (!(xmas11 & $@xmas11_fourthReinboo) && (xmas11 & $@xmas11_fourthReinbooDone)) goto L_Good; - if (xmas11 & $@xmas11_fourthReinboo) goto L_Food; - if (xmas11 & $@xmas11_startedReinbooSearch) goto L_Search; - - mes "The reinboo shys away from you. It seems to be frightened."; - goto L_Close; - -L_Search: - mes "The Reinboo approaches you and snuffles on your clothes."; - mes "[Leiremes the Reinboo]"; - mes "\"I like your smell. You smell like home. Have you been at Santa's place?\""; - menu - "I was, I'm searching for you.",-, - "Wah, a talking Reinboo!",L_Close; - mes "[Leiremes the Reinboo]"; - mes "\"Searching for me? Oh, I'm late, right? I'm so sorry. I didn't mean to cause trouble.\""; - menu - "How did you get lost?",-, - "Well, now I found you. How did you come here?",-; - mes "The Reinboo looks at you sheepishly."; - mes "[Leiremes the Reinboo]"; - mes "\"I... I did something stupid. There was a man, he was really friendly to me. He gave me candy!"; - mes "I love candy. It's so tasty! The man said he can give me more at his place.\""; - next; - mes "\"So I went with him. But he was evil! He didn't give me candy! He dashed some bad itchy powder in my face."; - mes "It made me forget the smell of the way home and now I'm lost.\""; - next; - mes "\"I was wandering around and searching for it. But that only made me tired. And hungry. Oh, I wish I had more candy.\""; -L_Food: - mes "The Reinboo snuffles on you again."; - set xmas11, xmas11 | $@xmas11_fourthReinboo; - next; - if (countitem("AppleCake") >= @cake_amount) - goto L_Cake; - mes "[Leiremes the Reinboo]"; - mes "\"Can you bring me some Apple Cakes? I like them so much."; - mes "After that I will feel better and go home. Because I can follow your smell.\""; - if (countitem("RedApple") < @apple_amount) - goto L_Close; - menu - "Ok, hang on.",L_Close, - "Apple Cakes? What about apples instead?",L_GiveApple; - -L_Cake: - mes "[Leiremes the Reinboo]"; - mes "\"You have some Apple Cakes! Tasty tasty Apple Cakes! Can I have them?\""; - if (countitem("RedApple") >= @apple_amount) - menu - "I have something that is better for you. Apples!",L_GiveApple, - "No, I want to keep them.",L_Close, - "Ok, here.",L_GiveCake; - menu - "No, I want to keep them.",L_Close, - "Ok, here.",L_GiveCake; - -L_GiveCake: - if (countitem("AppleCake") < @cake_amount) - goto L_NoItem; - delitem "AppleCake", @cake_amount; - mes "[Leiremes the Reinboo]"; - mes "\"Hooray!\""; - mes "The Reinboo munches the Apple Cakes."; - set xmas11, xmas11 | $@xmas11_fourthReinbooDone; - goto L_Close; - -L_GiveApple: - if (countitem("RedApple") < @apple_amount) - goto L_NoItem; - delitem "RedApple", @apple_amount; - mes "[Leiremes the Reinboo]"; - mes "\"But - but cakes are much more tasty! Bleah, ok.\""; - mes "The Reinboo munches the Apples."; - set xmas11, xmas11 | $@xmas11_fourthReinbooDone; - set xmas11, xmas11 & ~$@xmas11_fourthReinboo; - goto L_Close; - -L_NoItem: - mes "[Leiremes the Reinboo]"; - mes "\"Huh? It disappeared!\""; - goto L_Close; - -L_Good: - mes "[Leiremes the Reinboo]"; - mes "\"I'm not hungry anymore. Just a short break, then I'll go home.\""; - goto L_Close; - -L_Bad: - mes "[Leiremes the Reinboo]"; - mes "\"Uh uh uh. It hurts. I need to rest a little longer.\""; - goto L_Close; - -L_NoEvent: - mes "The Reinboo just looks at you."; - goto L_Close; - -L_RewardTime: - mes "[Leiremes the Reinboo]"; - mes "\"Ha, it was fun to ride with Santa! I came back here because this place is nice.\""; - goto L_Close; - -L_Close: - set @cake_amount, 0; - set @apple_amount, 0; - close; -} diff --git a/world/map/npc/xmas/2011/santa.txt b/world/map/npc/xmas/2011/santa.txt deleted file mode 100644 index de2265d9..00000000 --- a/world/map/npc/xmas/2011/santa.txt +++ /dev/null @@ -1,142 +0,0 @@ -// This file is part of Christmas Event 2011 -// author: Jenalya -// Santa's room is open after Christmas -// gives rewards depending on how much the player helped - -030-2.gat,197,62,0|script|Santa|105,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - if (xmas11 & $@xmas11_talkedToChief) goto L_Helping; - - mes "[Santa]"; - mes "\"Oh, how did you come in? I'm very sorry, but I have to ask you to leave my room."; - mes "I'll have time for you after Christmas.\""; - warp "030-2.gat", 78, 88; - goto L_Close; - -L_Helping: - mes "[Santa]"; - mes "\"Hello. I see you're helping with the preparations for Christmas. That's very kind of you."; - mes "But I have to ask you to leave my room, I'll have time for you after Christmas.\""; - warp "030-2.gat", 78, 88; - goto L_Close; - -L_NoEvent: - mes "[Santa]"; - mes "\"I'm sorry, no visitors this time of the year.\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - callfunc "xmas2011points"; - if (xmas11 & $@xmas11_SantaReward) goto L_Done; - - mes "[Santa]"; - mes "\"Welcome to my house!\""; - - if (@helppoints == 0) - goto L_NoHelp; - getinventorylist; - if (@inventorylist_count > 80) - goto L_Full_Inv; - mes "[Santa]"; - mes "\"I see you've been helping with the preparations for Christmas.\""; - if (@sabotagepoints > 0) - mes "A sad look crosses his face."; - next; - if (@helppoints < $@xmas2011_main_rewardcost) - goto L_NoMainReward; - getitem "ElfNightcap", 1; - set @helppoints, @helppoints - $@xmas2011_main_rewardcost; - mes "\"Things would've been a disaster without your help! Please have this."; - mes "Something a helper of mine really needs after the work is done.\""; - next; - -L_NoMainReward: - if (@helppoints < $@xmas2011_toy_rewardcost) - goto L_NoToyReward; -L_ToyAgain: - set @toy_reward, rand(4); - if (@toy_reward == 0) - getitem "PlushMouboo", 1; - if (@toy_reward == 1) - getitem "StickReinboo", 1; - if (@toy_reward == 2) - getitem "Doll", 1; - if (@toy_reward == 3) - getitem "LeatherBall", 1; - set @helppoints, @helppoints - $@xmas2011_toy_rewardcost; - if (@helppoints >= $@xmas2011_toy_rewardcost) - goto L_ToyAgain; - mes "\"I have some toys for you.\""; - next; - -L_NoToyReward: - if (@helppoints < $@xmas2011_gloves_rewardcost) - goto L_NoGlovesReward; - set @gloves, $@xmas2011_glove_id + rand(10); - getitem @gloves, 1; - set @helppoints, @helppoints - $@xmas2011_gloves_rewardcost; - mes "\"This will keep your hands warm.\""; - next; - -L_NoGlovesReward: - if (@helppoints == 0) - goto L_Done; - mes "\"Have some candy.\""; - next; - if (@helppoints < $@xmas2011_gingerbreadman_rewardcost) - goto L_NoGBMReward; - set @candy_amount, @helppoints/$@xmas2011_gingerbreadman_rewardcost; - getitem "GingerBreadMan", @candy_amount; - set @helppoints, @helppoints - @candy_amount*$@xmas2011_gingerbreadman_rewardcost; -L_NoGBMReward: - if (@helppoints < $@xmas2011_xmascake_rewardcost) - goto L_NoXmasCakeReward; - set @candy_amount, @helppoints/$@xmas2011_xmascake_rewardcost; - getitem "XmasCake", @candy_amount; - set @helppoints, @helppoints - @candy_amount*$@xmas2011_xmascake_rewardcost; -L_NoXmasCakeReward: - if (@helppoints < $@xmas2011_candy_rewardcost) - goto L_Done; - set @candy_amount, @helppoints/$@xmas2011_candy_rewardcost; - getitem "Candy", @candy_amount; - set @helppoints, @helppoints - @candy_amount*$@xmas2011_candy_rewardcost; - -L_Done: - mes "[Santa]"; - mes "\"Merry Christmas!\""; - set xmas11, xmas11 | $@xmas11_SantaReward; - goto L_Close; - -L_Full_Inv: - mes "[Santa]"; - mes "\"Ho, you carry a lot of things with you. Please come back later.\""; - goto L_Close; - -L_NoHelp: - mes "[Santa]"; - if (@sabotagepoints > 0) - mes "\"You weren't a good kid this year...\""; - if (@sabotagepoints > 0) - mes "He looks very disappointed."; - if (@sabotagepoints == 0) - mes "\"Please enjoy your time in my house! Merry Christmas!\""; - goto L_Close; - -L_Close: - set @menu, 0; - set @inventorylist_count, 0; - set @toy_reward, 0; - set @gloves, 0; - set @candy_amount, 0; - set @sabotagepoints, 0; - set @helppoints, 0; - close; -} diff --git a/world/map/npc/xmas/2011/stickReinboo.txt b/world/map/npc/xmas/2011/stickReinboo.txt deleted file mode 100644 index 95e84b54..00000000 --- a/world/map/npc/xmas/2011/stickReinboo.txt +++ /dev/null @@ -1,192 +0,0 @@ -// This file is part of Christmas Event 2011 -// author: Jenalya -// Stick Reinboo states: -// 1: got order from Akseli -// 2: Kalevi said that he needs more material -// 3: Kalevi created the Stick Reinboo -// 4: gave Stick Reinboo to the bad guy -// 5: delivered the Stick Reinboo without giving it to the bad guy -// 6: delivered fake present instead of Stick Reinboo - -030-2.gat,31,85,0|script|Akseli|329,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - set @stickreinboo, (xmas11 & $@xmas11_StickReinbooMask) >> $@xmas11_StickReinbooShift; - - if (@stickreinboo > 0) goto L_Ordered; - if (xmas11 & $@xmas11_talkedToChief) goto L_Helping; - - mes "[Busy Helper]"; - mes "\"Hello. Are you doing a sightseeing of Santa's house? That's very nice for you."; - mes "We're currently very busy with the preparations for Christmas, so please don't interrupt.\""; - goto L_Close; - -L_Helping: - mes "[Akseli]"; - mes "\"Ah, hello. Could you do me a small favor?"; - mes "I have this order for a Stick Reinboo, can you bring it to Kalevi?\""; - mes "He gives you some piece of paper."; - next; - mes "It seems to be some kind of form, but you can't really identify anything on it. It contains a lot of boxes with some numbers scrabbled in and some hard to read words."; - set @stickreinboo, 1; - set xmas11, (xmas11 & ~($@xmas11_StickReinbooMask) | (@stickreinboo << $@xmas11_StickReinbooShift)); - menu - "Alright, will do that.",L_Close, - "Erm, what is this?",-; - mes "[Akseli]"; - mes "\"Not important for you to know. Just bring it to Kalevi.\""; - mes "He's already busy with his paperworks again."; - goto L_Close; - -L_Ordered: - mes "[Akseli]"; - mes "\"Oh, hello again. Did you already give Kalevi the order?\""; - goto L_Close; - -L_NoEvent: - mes "[Akseli]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Akseli]"; - mes "\"I'm so tired now.\""; - goto L_Close; - -L_Close: - set @stickreinboo, 0; - close; -} - -030-2.gat,147,23,0|script|Kalevi|329,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - set @stickreinboo, (xmas11 & $@xmas11_StickReinbooMask) >> $@xmas11_StickReinbooShift; - - set @log_amount, 2; - set @leather_amount, 1; - - if (@stickreinboo >= 3) goto L_StickReinbooDone; - if (@stickreinboo == 2) goto L_StickReinboo; - if (@stickreinboo == 1) goto L_Order; - if (xmas11 & $@xmas11_talkedToChief) goto L_Helping; - - mes "This helper seems quite happy, humming a happy melody."; - mes "[Busy Helper]"; - mes "\"Hello there. I can't work at the moment, because we're only allowed to create toys that are explicitly ordered.\""; - goto L_Close; - -L_Helping: - mes "Kalevi gets droopy as he sees you coming near."; - mes "[Kalevi]"; - mes "\"Oh, hello. Do you want anything?\""; - menu - "Why aren't you working? Everyone else is busy!",-, - "No, I'm fine.",L_Close; - mes "[Kalevi]"; - mes "\"I'm not allowed! We're only allowed to create toys that are ordered. Because of the shortage of material, you know.\""; - if (@stickreinboo == 0) - goto L_Close; -L_Order: - mes "Kalevi doesn't seem motivated."; - menu - "Akseli gave me this order here for you!",-, - "Nevermind.",L_Close; - mes "[Kalevi]"; - mes "\"He did? Ah, well, ok.\""; - mes "He sighs and takes the paper."; - next; - mes "[Kalevi]"; - mes "\"Ha, but I don't have the material needed for the Stick Reinboo!"; - mes "\"I'd need " + @log_amount + " Raw Log and " + @leather_amount + " leather patch. That's hard to get.\""; - next; - mes "\"So I can't work I guess.\""; - set @stickreinboo, 2; - callsub S_Update_Var; - goto L_Close; - -L_StickReinboo: - mes "[Kalevi]"; - mes "\"You're back. As I told you I can't work without the material.\""; - menu - "Ok, nevermind.",L_Close, - "I can get it for you. What do you need again?",-; - mes "Kalevi doesn't look pleased."; - mes "[Kalevi]"; - mes "\"I need " + @log_amount + " Raw Log and " + @leather_amount + " leather patch. That's hard to get.\""; - menu - "I have it!",-, - "Ok, I'll bring those.",L_Close; - if ((countitem("RawLog") < @log_amount) || (countitem("LeatherPatch") < @leather_amount)) - goto L_NoItems; - getinventorylist; - if (@inventorylist_count == 100) - goto L_Full_Inv; - delitem "RawLog", @log_amount; - delitem "LeatherPatch", @leather_amount; - set @stickreinboo, 3; - callsub S_Update_Var; - getitem "StickReinboo", 1; - mes "[Kalevi]"; - mes "\"Ok, ok, you got me. Let's start.\""; - next; - mes "He takes the Raw Logs and starts carving and polishing, forming one long stick and a shorter one. Then he takes the Leather Patch and cuts it into certain shaped pieces."; - mes "He sews them together, stuffs it and leaves one hole on the bottom and one on each side. There he attaches the sticks he carved. The short one is covered by the ears."; - next; - mes "After that he adds some details to make it have a face."; - mes "[Kalevi]"; - mes "\"Alright, done. Do me a favor and bring it to Aaron, ok?\""; - goto L_Close; - -L_StickReinbooDone: - mes "[Kalevi]"; - mes "\"Ok, now I can relax again. Unless you're bringing another order for me?\""; - mes "He seems worried that you could bring him more work to do."; - goto L_Close; - -L_NoEvent: - mes "[Kalevi]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Kalevi]"; - mes "\"You know, everyone is complaining how stressful it was this year."; - mes "But I don't think it was that bad at all.\""; - goto L_Close; - -L_NoItems: - mes "[Kalevi]"; - mes "\"Ha, don't speak nonsense. You don't have it, so I don't have to start working.\""; - goto L_Close; - -L_Full_Inv: - mes "[Kalevi]"; - mes "\"You have a full backpack! Come back when you're carrying less things.\""; - goto L_Close; - -L_Close: - set @log_amount, 0; - set @leather_amount, 0; - set @stickreinboo, 0; - set @inventorylist_count, 0; - close; - -S_Update_Var: - set xmas11, (xmas11 & ~($@xmas11_StickReinbooMask) | (@stickreinboo << $@xmas11_StickReinbooShift)); - return; -} diff --git a/world/map/npc/xmas/2011/wrappingPaperHelper.txt b/world/map/npc/xmas/2011/wrappingPaperHelper.txt deleted file mode 100644 index 9c1b9064..00000000 --- a/world/map/npc/xmas/2011/wrappingPaperHelper.txt +++ /dev/null @@ -1,149 +0,0 @@ -// This file is part of Christmas Event 2011 -// author: Jenalya -// Reino asks for reed bundles and water to make wrapping paper -// also for some dyes to make them colorful -// later he can be asked for those papers to wrap boxes - -030-2.gat,140,31,0|script|Reino|328,{ - - if (!(gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_start_day) - && !(gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_NoEvent; - if ((gettime(7) == $@xmas2011_year && gettime(6) == 12 && gettime(5) >= $@xmas2011_reward_start_day) - || (gettime(7) == ($@xmas2011_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2011_reward_end_day)) - goto L_RewardTime; - - set @reed_amount, 2; - set @water_amount, 1; - - if (xmas11 & $@xmas11_talkedToChief) goto L_Helping; - - mes "[Busy Helper]"; - mes "\"Excuse me, but please don't interrupt. We're all very busy.\""; - goto L_Close; - -L_Helping: - mes "[Reino]"; - mes "\"Oh, I see you're here to help. Maybe you can assist me with a problem we have."; - mes "We're nearly out of wrapping paper for the present boxes."; - mes "That's very very bad. Can you imagine how it would look if the presents didn't have wrapping paper?\""; - next; - mes "\"So, eh, I can only give you some of the remaining wrapping paper if you bring me the needed material to make new wrapping paper."; - mes "For making one roll of wrapping paper, I need " + @reed_amount + " Reed Bundles, " + @water_amount + " Bottle of Water and some dye to make it colored.\""; - next; -L_Again: - mes "\"Let's see... These are the regulations for wrapping paper colors and designs for this year. Tell me which you want.\""; - mes "He shows you an official looking piece of paper."; - menu - "Red dotted (2 Red Dyes)",L_Red, - "Yellow dotted (2 Yellow Dyes)",L_Yellow, - "Blue dotted (2 Light Blue Dyes)",L_LightBlue, - "Purple striped (1 Purple Dye)",L_Purple, - "Red with golden stripes (1 Red Dye and 1 Yellow Dye)",L_RedGolden, - "Green with red stripes (1 Green Dye and 1 Red Dye)",L_GreenRed, - "Why do you have a regulation for wrapping papers?!",L_Regulation, - "I'm on my way.",L_Close; - -L_Red: - if ((countitem("ReedBundle") < @reed_amount) || (countitem("BottleOfWater") < @water_amount) || (countitem("RedDye") < 1)) - goto L_NoItems; - delitem "ReedBundle", @reed_amount; - delitem "BottleOfWater", @water_amount; - delitem "RedDye", 2; - getitem "RedDottedWrap", 1; - mes "[Reino]"; - mes "\"This one is classical.\""; - goto L_MadePaper; - -L_Yellow: - if ((countitem("ReedBundle") < @reed_amount) || (countitem("BottleOfWater") < @water_amount) || (countitem("YellowDye") < 1)) - goto L_NoItems; - delitem "ReedBundle", @reed_amount; - delitem "BottleOfWater", @water_amount; - delitem "YellowDye", 2; - getitem "YellowDottedWrap", 1; - mes "[Reino]"; - mes "\"Right, bright paper brings good vibes.\""; - goto L_MadePaper; - -L_LightBlue: - if ((countitem("ReedBundle") < @reed_amount) || (countitem("BottleOfWater") < @water_amount) || (countitem("LightBlueDye") < 1)) - goto L_NoItems; - delitem "ReedBundle", @reed_amount; - delitem "BottleOfWater", @water_amount; - delitem "LightBlueDye", 2; - getitem "BlueDottedWrap", 1; - mes "[Reino]"; - mes "\"Plain and simple. Here.\""; - goto L_MadePaper; - -L_Purple: - if ((countitem("ReedBundle") < @reed_amount) || (countitem("BottleOfWater") < @water_amount) || (countitem("PurpleDye") < 1)) - goto L_NoItems; - delitem "ReedBundle", @reed_amount; - delitem "BottleOfWater", @water_amount; - delitem "PurpleDye", 1; - getitem "PurpleStripedWrap", 1; - mes "[Reino]"; - mes "\"Mh, personally I don't like it that much, but here you go.\""; - goto L_MadePaper; - -L_RedGolden: - if ((countitem("ReedBundle") < @reed_amount) || (countitem("BottleOfWater") < @water_amount) || (countitem("RedDye") < 1) || (countitem("YellowDye") < 1)) - goto L_NoItems; - delitem "ReedBundle", @reed_amount; - delitem "BottleOfWater", @water_amount; - delitem "RedDye", 1; - delitem "YellowDye", 1; - getitem "RedGoldenStripedWrap", 1; - mes "[Reino]"; - mes "\"Good choice, this is my favorite this year.\""; - goto L_MadePaper; - -L_GreenRed: - if ((countitem("ReedBundle") < @reed_amount) || (countitem("BottleOfWater") < @water_amount) || (countitem("RedDye") < 1) || (countitem("GreenDye") < 1)) - goto L_NoItems; - delitem "ReedBundle", @reed_amount; - delitem "BottleOfWater", @water_amount; - delitem "RedDye", 1; - delitem "GreenDye", 1; - getitem "GreenRedStripedWrap", 1; - mes "[Reino]"; - mes "\"Yeah, this is really Christmas-styled.\""; - goto L_MadePaper; - -L_MadePaper: - next; - mes "\"Do you need more wrapping paper?\""; - menu - "Yes.",L_Again, - "No, I have all I need.",L_Close; - -L_Regulation: - mes "Reino seems irritated."; - mes "[Reino]"; - mes "\"Well, because, ah - there would be total chaos without regulations!"; - mes "You know, this Christmas business requires a lot of coordination. Things have to be well-ordered.\""; - goto L_Close; - -L_NoEvent: - mes "[Reino]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Reino]"; - mes "\"I love Christmas time. Even if it was total chaos this year.\""; - goto L_Close; - -L_NoItems: - mes "[Reino]"; - mes "\"Oh? It seems you don't have the required items.\""; - goto L_Close; - -L_Close: - set @reed_amount, 0; - set @water_amount, 0; - close; -} diff --git a/world/map/npc/xmas/2011/xmas2011config.txt b/world/map/npc/xmas/2011/xmas2011config.txt deleted file mode 100644 index 54f7140c..00000000 --- a/world/map/npc/xmas/2011/xmas2011config.txt +++ /dev/null @@ -1,195 +0,0 @@ --|script|#xmas2011config|-1,{ -OnInit: - set $@xmas2011_start_day, 10; - set $@xmas2011_reward_start_day, 25; - set $@xmas2011_reward_end_day, 6; - set $@xmas2011_year, 2011; - set $@xmas2011_glove_id, 2160; - - set $@xmas11_talkedToChief, 0x00000001; - set $@xmas11_talkedToBadGuy, 0x00000002; - - set $@xmas11_startedReinbooSearch, 0x00000004; - set $@xmas11_firstReinboo, 0x00000008; - set $@xmas11_firstReinbooDone, 0x00000010; - set $@xmas11_secondReinboo, 0x00000020; - set $@xmas11_secondReinbooDone, 0x00000040; - set $@xmas11_thirdReinboo, 0x00000080; - set $@xmas11_thirdReinbooDone, 0x00000100; - set $@xmas11_fourthReinboo, 0x00000200; - set $@xmas11_fourthReinbooDone, 0x00000400; - - set $@xmas11_Decoration, 0x00000800; - set $@xmas11_DecorationDone, 0x00001000; - set $@xmas11_Bedding, 0x00002000; - set $@xmas11_BeddingDone, 0x00004000; - set $@xmas11_Potion, 0x00008000; - set $@xmas11_PotionDone, 0x00010000; - - set $@xmas11_PlushMoubooMask, 0x000E0000; - set $@xmas11_PlushMoubooShift, 17; - - set $@xmas11_StickReinbooMask, 0x00700000; - set $@xmas11_StickReinbooShift, 20; - - set $@xmas11_DollMask, 0x03800000; - set $@xmas11_DollShift, 23; - - set $@xmas11_BallMask, 0x1C000000; - set $@xmas11_BallShift, 26; - - set $@xmas11_BadGuyReward, 0x20000000; - set $@xmas11_SantaReward, 0x40000000; - -// 0x80000000 - - set $@xmas2011_reinboopoints, 10; // there are 4 reinboos - set $@xmas2011_beddingpoints, 10; - set $@xmas2011_glitterpoints, 10; - set $@xmas2011_potionpoints, 10; - set $@xmas2011_plushmouboopoints, 10; - set $@xmas2011_stickreinboopoints, 10; - set $@xmas2011_ballpoints, 10; - set $@xmas2011_dollpoints, 10; - - set $@xmas2011_totalpoints, 4*$@xmas2011_reinboopoints + $@xmas2011_beddingpoints + $@xmas2011_glitterpoints + $@xmas2011_potionpoints + $@xmas2011_plushmouboopoints + $@xmas2011_stickreinboopoints + $@xmas2011_ballpoints + $@xmas2011_dollpoints; - - set $@xmas2011_main_rewardcost, 70; - set $@xmas2011_toy_rewardcost, 30; - set $@xmas2011_gloves_rewardcost, 8; - set $@xmas2011_gingerbreadman_rewardcost, 5; - set $@xmas2011_xmascake_rewardcost, 3; - set $@xmas2011_candy_rewardcost, 1; -} - -// calculates the points for helping and sabotaging -function|script|xmas2011points|{ - set @plushmouboo, (xmas11 & $@xmas11_PlushMoubooMask) >> $@xmas11_PlushMoubooShift; - set @stickreinboo, (xmas11 & $@xmas11_StickReinbooMask) >> $@xmas11_StickReinbooShift; - set @ball, (xmas11 & $@xmas11_BallMask) >> $@xmas11_BallShift; - set @doll, (xmas11 & $@xmas11_DollMask) >> $@xmas11_DollShift; - set @helppoints, 0; - set @sabotagepoints, 0; - - if ((xmas11 & $@xmas11_firstReinbooDone) && !(xmas11 & $@xmas11_firstReinboo)) - set @helppoints, @helppoints + $@xmas2011_reinboopoints; - if ((xmas11 & $@xmas11_firstReinbooDone) && (xmas11 & $@xmas11_firstReinboo)) - set @sabotagepoints, @sabotagepoints + $@xmas2011_reinboopoints; - - if ((xmas11 & $@xmas11_secondReinbooDone) && !(xmas11 & $@xmas11_secondReinboo)) - set @helppoints, @helppoints + $@xmas2011_reinboopoints; - if ((xmas11 & $@xmas11_secondReinbooDone) && (xmas11 & $@xmas11_secondReinboo)) - set @sabotagepoints, @sabotagepoints + $@xmas2011_reinboopoints; - - if ((xmas11 & $@xmas11_thirdReinbooDone) && !(xmas11 & $@xmas11_thirdReinboo)) - set @helppoints, @helppoints + $@xmas2011_reinboopoints; - if ((xmas11 & $@xmas11_thirdReinbooDone) && (xmas11 & $@xmas11_thirdReinboo)) - set @sabotagepoints, @sabotagepoints + $@xmas2011_reinboopoints; - - if ((xmas11 & $@xmas11_fourthReinbooDone) && !(xmas11 & $@xmas11_fourthReinboo)) - set @helppoints, @helppoints + $@xmas2011_reinboopoints; - if ((xmas11 & $@xmas11_fourthReinbooDone) && (xmas11 & $@xmas11_fourthReinboo)) - set @sabotagepoints, @sabotagepoints + $@xmas2011_reinboopoints; - - if ((xmas11 & $@xmas11_PotionDone) && !(xmas11 & $@xmas11_Potion)) - set @helppoints, @helppoints + $@xmas2011_potionpoints; - if ((xmas11 & $@xmas11_PotionDone) && (xmas11 & $@xmas11_Potion)) - set @sabotagepoints, @sabotagepoints + $@xmas2011_potionpoints; - - if ((xmas11 & $@xmas11_BeddingDone) && !(xmas11 & $@xmas11_Bedding)) - set @helppoints, @helppoints + $@xmas2011_beddingpoints; - if ((xmas11 & $@xmas11_BeddingDone) && (xmas11 & $@xmas11_Bedding)) - set @sabotagepoints, @sabotagepoints + $@xmas2011_beddingpoints; - - if ((xmas11 & $@xmas11_DecorationDone) && !(xmas11 & $@xmas11_Decoration)) - set @helppoints, @helppoints + $@xmas2011_glitterpoints; - if ((xmas11 & $@xmas11_DecorationDone) && (xmas11 & $@xmas11_Decoration)) - set @sabotagepoints, @sabotagepoints + $@xmas2011_glitterpoints; - - if (@plushmouboo == 5) - set @helppoints, @helppoints + $@xmas2011_plushmouboopoints; - if (@plushmouboo == 6) - set @sabotagepoints, @sabotagepoints + $@xmas2011_plushmouboopoints; - - if (@stickreinboo == 5) - set @helppoints, @helppoints + $@xmas2011_stickreinboopoints; - if (@stickreinboo == 6) - set @sabotagepoints, @sabotagepoints + $@xmas2011_stickreinboopoints; - - if (@ball == 5) - set @helppoints, @helppoints + $@xmas2011_ballpoints; - if (@ball == 6) - set @sabotagepoints, @sabotagepoints + $@xmas2011_ballpoints; - - if (@doll == 5) - set @helppoints, @helppoints + $@xmas2011_dollpoints; - if (@doll == 6) - set @sabotagepoints, @sabotagepoints + $@xmas2011_dollpoints; - - set @plushmouboo, 0; - set @stickreinboo, 0; - set @ball, 0; - set @doll, 0; - return; -} - -function|script|xmas2011debug|{ - menu - "i'm fine",L_Close, - "show my points",L_Points, - "show variable",L_Var, - "restart",L_Restart, - "reset",-; - set xmas11, 0; - close; -L_Restart: - set xmas11, 0; - set xmas11, xmas11 | $@xmas11_talkedToChief; - close; - -L_Points: - callfunc "xmas2011points"; - mes "Good points: " + @helppoints; - mes "Bad points: " + @sabotagepoints; - close; - -L_Var: - mes "Talked to Chief: " + ((xmas11 & 0x1)); - mes "Talked to Bad Guy: " + ((xmas11 & 0x2) >> 1); - mes "Started Reinboo: " + ((xmas11 & 0x4) >> 2); - mes "R1 Bit 0: " + ((xmas11 & 0x8) >> 3); - mes "R1 Bit 1: " + ((xmas11 & 0x10) >> 4); - mes "R2 Bit 0: " + ((xmas11 & 0x20) >> 5); - mes "R2 Bit 1: " + ((xmas11 & 0x40) >> 6); - mes "R3 Bit 0: " + ((xmas11 & 0x80) >> 7); - mes "R3 Bit 1: " + ((xmas11 & 0x100) >> 8); - mes "R4 Bit 0: " + ((xmas11 & 0x200) >> 9); - mes "R4 Bit 1: " + ((xmas11 & 0x400) >> 10); - mes "Dec Bit 0: " + ((xmas11 & 0x800) >> 11); - mes "Dec Bit 1: " + ((xmas11 & 0x1000) >> 12); - mes "Bed Bit 0: " + ((xmas11 & 0x2000) >> 13); - mes "Bed Bit 1: " + ((xmas11 & 0x4000) >> 14); - mes "Pot Bit 0: " + ((xmas11 & 0x8000) >> 15); - mes "Pot Bit 1: " + ((xmas11 & 0x10000) >> 16); - mes "plushmouboo b0: " + ((xmas11 & 0x20000) >> 17); - mes "plushmouboo b1: " + ((xmas11 & 0x40000) >> 18); - mes "plushmouboo b2: " + ((xmas11 & 0x80000) >> 19); - mes "stickreinboo b0: " + ((xmas11 & 0x100000) >> 20); - mes "stickreinboo b1: " + ((xmas11 & 0x200000) >> 21); - mes "stickreinboo b1: " + ((xmas11 & 0x400000) >> 22); - mes "doll b0: " + ((xmas11 & 0x800000) >> 23); - mes "doll b1: " + ((xmas11 & 0x1000000) >> 24); - mes "doll b2: " + ((xmas11 & 0x2000000) >> 25); - mes "ball b0: " + ((xmas11 & 0x4000000) >> 26); - mes "ball b1: " + ((xmas11 & 0x8000000) >> 27); - mes "ball b2: " + ((xmas11 & 0x10000000) >> 28); - mes "bad guy reward: " + ((xmas11 & 0x20000000) >> 29); - mes "santa reward: " + ((xmas11 & 0x40000000) >> 30); - mes "not used: " + ((xmas11 & 0x80000000) >> 31); - close; - -L_Close: - set @helppoints, 0; - set @sabotagepoints, 0; - close; -} diff --git a/world/map/npc/xmas/2012/_import.txt b/world/map/npc/xmas/2012/_import.txt deleted file mode 100644 index 871334e0..00000000 --- a/world/map/npc/xmas/2012/_import.txt +++ /dev/null @@ -1,18 +0,0 @@ -npc: npc/xmas/2012/bodyguardRoastAcorns.txt -npc: npc/xmas/2012/bodyguards.txt -npc: npc/xmas/2012/chiefHelper.txt -npc: npc/xmas/2012/doors.txt -npc: npc/xmas/2012/equerry.txt -npc: npc/xmas/2012/helpers.txt -npc: npc/xmas/2012/helpersSaddleRug.txt -npc: npc/xmas/2012/helpersStorage.txt -npc: npc/xmas/2012/helpersTalisman.txt -npc: npc/xmas/2012/guardOfHonor.txt -npc: npc/xmas/2012/monsters.txt -npc: npc/xmas/2012/reinbooFlightProblems.txt -npc: npc/xmas/2012/reinboos.txt -npc: npc/xmas/2012/reinboosTransport.txt -npc: npc/xmas/2012/reinbooTrainer.txt -npc: npc/xmas/2012/reinbooYoung.txt -npc: npc/xmas/2012/santa.txt -npc: npc/xmas/2012/xmas2012config.txt diff --git a/world/map/npc/xmas/2012/bodyguardRoastAcorns.txt b/world/map/npc/xmas/2012/bodyguardRoastAcorns.txt deleted file mode 100644 index db9856b9..00000000 --- a/world/map/npc/xmas/2012/bodyguardRoastAcorns.txt +++ /dev/null @@ -1,94 +0,0 @@ -// This file is part of Christmas Event 2012 -// author: Jenalya - -030-2.gat,89,23,0|script|Verneri|334,{ - callfunc "xmas2012time"; - - set @reinboo, (xmas2012 & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - if (@reinboo > 7) goto L_RoastAcornAgain; - - mes "[Verneri]"; - mes "\"Hm? I'm currently having a break. It's really nice here at the fireplace, isn't it?\""; - next; - mes "\"Ah, I remember when I was a child we used to roast acorns at the fireplace. We dunked them into Iron Potion and then put them over the fire for a while. That gave a tasty icing.\""; - if (@reinboo != 7) - goto L_Close; - menu - "Neiremes needs nutrient food, let's roast some.", -, - "Children's stuff...", L_Close; - - mes "[Verneri]"; - mes "\"The little Reinboo? Ah, I heard he has some problems with flying.\""; - next; - mes "\"Well, if you get some Acorns and Iron Potions, we can do that."; - mes "With one Iron Potion we can ice about " + $@xmas2012_acorn_amount + " Acorns.\""; - next; - mes "\"I think Neiremes will need about " + $@xmas2012_roasted_acorn_amount + " Roasted Acorns.\""; - next; - mes "[Verneri]"; - mes "\"Do you have everything we need? Shall we start?\""; - menu - "Sure!", L_Roast, - "I need to get the ingredients.", L_Close; - -L_Roast: - if (countitem("Acorn") < $@xmas2012_acorn_amount || countitem("IronPotion") < 1) - goto L_NoItems; - - delitem "IronPotion", 1; - delitem "Acorn", $@xmas2012_acorn_amount; - - mes "Verneri takes the Iron Potion and the Acorns from you. He pours the potion into some bowl and adds the Acorns."; - mes "Then he puts the bowl over the fire, stirring it every now and then. After a while it starts to smell really tasty."; - next; - mes "[Verneri]"; - mes "\"Here we are! Let me take one of them, ok?\""; - mes "He carefully takes one of the roasted acorns and eats it."; - next; - - set @roasted_acorns, $@xmas2012_acorn_amount - 1 - rand(4); - mes "[Verneri]"; - mes "\"Ouch, hot. But tasty! Here's the rest of them for Neiremes. Some of them might be burnt, I'll throw those away.\""; - getitem "RoastedAcorn", @roasted_acorns; - menu - "Let's roast some more.", L_Roast, - "Thank you.", L_Close; - -L_RoastAcornAgain: - mes "[Verneri]"; - mes "\"Hello again. Do you want to roast some more acorns? They're delicious, right? Maybe we should do this every year.\""; - menu - "Not now.", L_Close, - "Yes, I brought the ingredients.", L_Roast; - -L_NoItems: - mes "[Verneri]"; - mes "\"You need to bring at least one Iron Potion and " + $@xmas2012_acorn_amount + " Acorns.\""; - goto L_Close; - -L_RewardTime: - mes "[Verneri]"; - mes "\"Now that Christmas is over we're going to leave this residence soon. Santa spends the rest of the year at other places on Kaizei, untiringly working on the concerns of the Sages of Kaizei. He's really impressive.\""; - if (@reinboo < 8) - goto L_Close; - next; - mes "\"Make sure to come back next year. We could roast some more acorns then.\""; - goto L_Close; - -L_NoEvent: - mes "[Verneri]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_Close: - set @reinboo, 0; - set @xmas_time, 0; - close; -} diff --git a/world/map/npc/xmas/2012/bodyguards.txt b/world/map/npc/xmas/2012/bodyguards.txt deleted file mode 100644 index 0fffcc19..00000000 --- a/world/map/npc/xmas/2012/bodyguards.txt +++ /dev/null @@ -1,91 +0,0 @@ -// This file is part of Christmas Event 2012 -// author: Jenalya - -030-2.gat,76,88,0|script|Vilhelmiina|335,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - - mes "[Vilhelmiina]"; - mes "\"This is Santa's room. But he isn't here.\""; - menu - "Ok, thanks.", L_Close, - "Could you let me in anyway?", L_Enter, - "Where is he?", L_Where; - -L_Where: - mes "[Vilhelmiina]"; - mes "\"Maybe he went to talk to Chief Warrick? Or he's over in the workshop? Or in the basement? I don't know.\""; - close; - -L_Enter: - mes "[Vilhelmiina]"; - mes "\"No!\""; - close; - -L_Close: - set @xmas_time, 0; - close; - -L_NoEvent: - mes "[Vilhelmiina]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - close; -} - -030-2.gat,80,88,0|script|Vihtori|333,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - - mes "[Vihtori]"; - mes "\"Santa isn't in his room at the moment.\""; - menu - "I see.", L_Close, - "Could I wait for him inside?", L_Enter, - "Where do I find him?", L_Where; - -L_Where: - mes "[Vihtori]"; - mes "\"Talking to some helpers I think. Just have a look around the house, I'm sure you'll find him.\""; - close; - -L_Enter: - mes "[Vihtori]"; - mes "\"What cheek! Of course not!\""; - close; - -L_Close: - set @xmas_time, 0; - close; - -L_NoEvent: - mes "[Vihtori]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - close; -} - -030-2.gat,152,22,0|script|Vanamo|332,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - - mes "[Vanamo]"; - mes "\"This area is restricted. You're not allowed to enter.\""; - next; - mes "..."; - next; - mes "\"Ehm... enjoy your visit in Santa's residence!\""; - close; - -L_NoEvent: - mes "[Vanamo]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - close; -} diff --git a/world/map/npc/xmas/2012/chiefHelper.txt b/world/map/npc/xmas/2012/chiefHelper.txt deleted file mode 100644 index 10116f53..00000000 --- a/world/map/npc/xmas/2012/chiefHelper.txt +++ /dev/null @@ -1,67 +0,0 @@ -// This file is part of Christmas Event 2012 -// author: Jenalya - -030-2.gat,87,77,0|script|Chief Warrick|329,{ - callfunc "xmas2012time"; - - set @reinboo, (xmas2012 & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - if (@reinboo == 14) goto L_Done; - if (@reinboo > 8) goto L_Talisman; - if (@reinboo > 1) goto L_Neiremes; - - mes "[Chief Warrick]"; - mes "\"Welcome to Santa's residence. We're currently in the Christmas preparations, but feel free to have a look around the house and talk to the helpers.\""; - - if ((BaseLevel < 30) || (gettimetick(2) - TUT_var < 4*7*86400)) // player must be created at least four weeks ago - goto L_Close; - menu - "Can I help somehow?", -, - "Thank you.", L_Close; - mes "[Chief Warrick]"; - mes "\"Help? Oh, did you hear about the troubles we had last year? Well, everything is going well this year, so we don't need help from outside this time."; - mes "Unless...\""; - next; - mes "\"Maybe you could have a talk with Grombadil, the equerry. He mentioned some trouble with one of the young Reinboos that are going to begin their duty this year. You can find him outside the house.\""; - goto L_Close; - -L_Neiremes: - mes "[Chief Warrick]"; - mes "\"I really hope Neiremes will pull himself together soon enough. Everything else is going well, and it'd be a shame if all the preparations get ruined.\""; - goto L_Close; - -L_Talisman: - mes "[Chief Warrick]"; - mes "\"Tarmo told me about Neimeres' idea with the Flight Talisman. That kind of magic isn't very common among the Sages and their helpers, as it is rather archaic. But if it can help, why not?\""; - goto L_Close; - -L_Done: - mes "[Chief Warrick]"; - mes "\"Grombadil let me know that Neiremes has much more self-confidence now, thanks to you! Let's see how he does on the Christmas Flight. Make sure to be around at that time if you want to see how he will do.\""; - goto L_Close; - -L_NoEvent: - mes "[Chief Warrick]"; - mes "\"Excuse me, you should leave now. The residence is closed at this time of the year.\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Chief Warrick]"; - mes "\"This year's Christmas was a good year. And much less stressful than last year. Very well.\""; - if (@reinboo != 14) - goto L_Close; - next; - mes "\"You were of great help for Neiremes. I think he'd like to thank you personally.\""; - goto L_Close; - -L_Close: - set @reinboo, 0; - set @xmas_time, 0; - close; -} diff --git a/world/map/npc/xmas/2012/doors.txt b/world/map/npc/xmas/2012/doors.txt deleted file mode 100644 index 73bda9be..00000000 --- a/world/map/npc/xmas/2012/doors.txt +++ /dev/null @@ -1,13 +0,0 @@ -// This file is part of Christmas Event 2012 -// author: Jenalya - -// entrance of the building -030-1.gat,99,53,0|script|#Door|45,1,1,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - end; - - warp "030-2.gat", 88, 50; - end; -} diff --git a/world/map/npc/xmas/2012/equerry.txt b/world/map/npc/xmas/2012/equerry.txt deleted file mode 100644 index 9b88f19c..00000000 --- a/world/map/npc/xmas/2012/equerry.txt +++ /dev/null @@ -1,118 +0,0 @@ -// This file is part of Christmas Event 2012 -// author: Jenalya - -030-1.gat,106,54,0|script|Grombadil|105,{ - callfunc "xmas2012time"; - - set @reinboo, (xmas2012 & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - if (@reinboo == 14) goto L_Done; - if (@reinboo > 8) goto L_Talisman; - if (@reinboo == 8) goto L_Neimeres; - if (@reinboo > 5) goto L_Food; - if (@reinboo > 1) goto L_Blanket; - if (@reinboo == 1) goto L_Directions; - - mes "[Grombadil]"; - mes "\"Hello. I'm Grombadil, Santa's equerry - the person in charge of the Reinboos. This year two of the Reinboos are going to retire and two young ones are going to join the team."; - mes "But...\""; - next; - mes "\"One of the young ones, Neiremes... He's having trouble to learn flying. That's really worrying.\""; - - if ((BaseLevel < 30) || (gettimetick(2) - TUT_var < 4*7*86400)) // player must be created at least four weeks ago - goto L_Close; - - menu - "Can I do anything to help?", -, - "That's too bad.", L_Close; - mes "[Grombadil]"; - mes "\"Oh? I never got the idea to ask someone for help with this. But actually... I'm at the end of my ideas. And maybe Neiremes will listen better to some encouragement from the outside.\""; - set @reinboo, 1; - callfunc "xmas2012update_reinboo_var"; - next; -L_Directions: - mes "[Grombadil]"; - mes "\"You can find Neiremes in the Snowy Hills south west of here. But you can't reach the place directly.\""; - next; - mes "\"You could go through the caves that you can find north of here. But that's a long way, and who knows what's living in there."; - mes "Maybe it's better if you ask Meileres to bring you there. He might ask for some food in return though.\""; - goto L_Close; - -L_Blanket: - mes "[Grombadil]"; - mes "\"Did you talk to Neiremes already?\""; - menu - "Yes, he feels cold in the upper air.",-, - "Not yet.", L_Close; - - mes "[Grombadil]"; - mes "\"He feels cold? Hm, usually Reinboo fur is warm enough to prevent them from feeling cold, even high up in the air. But Neiremes always has been a bit more sensitive than others.\""; - next; - mes "\"Maybe some kind of saddle rug... You should talk to Raimo, he's very experienced with sewing.\""; - goto L_Close; - -L_Food: - mes "[Grombadil]"; - mes "\"I heard you brought the saddle rug to Neiremes. How's he doing now? Did he get better?\""; - menu - "Yes, he's back to training.", L_Close, - "He's hungry.", -; - - mes "[Grombadil]"; - mes "\"Hungry! Whatever you do, don't give him cakes to eat!\""; - menu - "Ok.", L_Close, - "Why?", L_Cake, - "But what should I give him instead?", L_Trainer; - goto L_Close; - -L_Cake: - mes "[Grombadil]"; - mes "\"Cakes are unhealthy, even for a grown-up reinboo. But for a young one even more. Unfortunately they like cakes so much..."; - mes "If you give him cakes, he'd probably just get an upset stomach. Then he won't be able to train at all.\""; - goto L_Close; - -L_Trainer: - mes "[Grombadil]"; - mes "\"I suppose Leiremes can give best advice about that, since he is training Neiremes. You can find him in the snowy hills as well.\""; - goto L_Close; - -L_Neimeres: - mes "[Grombadil]"; - mes "\"Meireles told me that Neiremes is back to training now. That's a relief.\""; - goto L_Close; - -L_Talisman: - mes "[Grombadil]"; - mes "\"Neimeres told me about this Flight Talisman. She always had unusual ideas. Well, if it helps...\""; - goto L_Close; - -L_Done: - mes "[Grombadil]"; - mes "\"You did a great effort to help Neiremes. Thanks for this. I just hope it was enough. We'll see on the Christmas flight. I'm sure you will want to come back to see if he did well.\""; - goto L_Close; - -L_NoEvent: - mes "[Grombadil]"; - mes "\"I can't imagine anything more satisfying than caring for my Reinboos.\""; - goto L_Close; - -L_RewardTime: - mes "[Grombadil]"; - mes "\"I'm so glad Neiremes did well.\""; - if (@reinboo != 14) - goto L_Close; - next; - mes "\"He's so happy. Why don't you go talk to him?\""; - goto L_Close; - -L_Close: - set @reinboo, 0; - set @xmas_time, 0; - close; -} diff --git a/world/map/npc/xmas/2012/guardOfHonor.txt b/world/map/npc/xmas/2012/guardOfHonor.txt deleted file mode 100644 index 3d64c948..00000000 --- a/world/map/npc/xmas/2012/guardOfHonor.txt +++ /dev/null @@ -1,151 +0,0 @@ -// This file is part of Christmas Event 2012 -// author: Jenalya -// Nutcrackers are magical beings serving Santa as guards of honor - -// outside of the building -030-1.gat,89,51,0|script|Grigory the Nutcracker|330,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - - mes "[Grigory the Nutcracker]"; - mes "\"Welcome to Santa's house. Please behave well.\""; - close; - -L_NoEvent: - mes "[Grigory the Nutcracker]"; - mes "\"This is Santa's house. But he isn't home at the moment.\""; - close; -} - -030-1.gat,89,54,0|script|Vadim the Nutcracker|330,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - - mes "[Vadim the Nutcracker]"; - mes "\"Welcome. Enjoy your time in Santa's residence.\""; - close; - -L_NoEvent: - mes "[Vadim the Nutcracker]"; - mes "\"This is Santa's residence, but he isn't here at the moment.\""; - close; -} - -// in the entrance area -030-2.gat,83,43,0|script|Andrey the Nutcracker|330,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - - mes "[Andrey the Nutcracker]"; - mes "\"Hello. Have a nice time visiting Santa's home."; - mes "Be careful not to cause trouble. We, the Nutcracker Guard of Honor, guarantee peace in this house.\""; - close; - -L_NoEvent: - mes "[Andrey the Nutcracker]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - close; -} - -030-2.gat,99,23,0|script|Eugeny the Nutcracker|330,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - - mes "[Eugeny the Nutcracker]"; - mes "\"Greetings. The workshop is upstairs.\""; - close; - -L_NoEvent: - mes "[Eugeny the Nutcracker]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - close; -} - -030-2.gat,77,23,0|script|Leonid the Nutcracker|330,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - - mes "[Leonid the Nutcracker]"; - mes "\"Hello. Feel free to have a look around.\""; - close; - -L_NoEvent: - mes "[Leonid the Nutcracker]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - close; -} - -// in office -030-2.gat,47,81,0|script|Yakov the Nutcracker|330,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - - mes "[Yakov the Nutcracker]"; - mes "\"Greetings. I hope you find your visit interesting.\""; - menu - "What is behind that door?", -, - "Yeah, it's very interesting.", L_Close; - mes "[Yakov the Nutcracker]"; - mes "\"The Archive. Restricted area, you're not allowed to enter.\""; - goto L_Close; - -L_NoEvent: - mes "[Yakov the Nutcracker]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_Close: - set @xmas_time, 0; - close; -} - -// in the room before Santa's -030-2.gat,96,77,0|script|Taras the Nutcracker|330,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - - mes "[Taras the Nutcracker]"; - mes "\"Hello. Santa's room is down the hallway.\""; - close; - -L_NoEvent: - mes "[Taras the Nutcracker]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - close; -} - -030-2.gat,99,77,0|script|Stepan the Nutcracker|330,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - - mes "[Stepan the Nutcracker]"; - mes "\"Greetings. The dormitory is up there. But everyone is busy with the Christmas preparations, so nobody's there.\""; - close; - -L_NoEvent: - mes "[Stepan the Nutcracker]"; - mes "\"How did you come in? At this time of the year the door should be locked!\""; - warp "030-1.gat", 99, 55; - close; -} diff --git a/world/map/npc/xmas/2012/helpers.txt b/world/map/npc/xmas/2012/helpers.txt deleted file mode 100644 index 6d8e2f97..00000000 --- a/world/map/npc/xmas/2012/helpers.txt +++ /dev/null @@ -1,271 +0,0 @@ -// This file is part of Christmas Event 2012 -// author: Jenalya - -// At the entrance - -030-2.gat,87,40,0|script|Valtteri|328,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - - mes "[Valtteri]"; - mes "\"Welcome to Sage Santa's residence."; - mes "Feel free to have a look around the house and talk to the helpers.\""; - next; - mes "\"In the room to the left there's our storage, where all the material we need is administrated."; - mes "Upstairs there you can find the workshop, where the Christmas presents are crafted."; - mes "Further upstairs there is the office, where helpers are working on paperwork and magic researches.\""; - next; - mes "\"If you wish to see Santa, you probably can find him in his office.\""; - close; - -L_NoEvent: - mes "[Valtteri]"; - mes "\"Excuse me, you shouldn't be here. Santa is only here during the Christmas time. Please leave.\""; - warp "030-1.gat", 99, 55; - close; -} - -// In the office - -030-2.gat,37,77,0|script|Osmo|328,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - - mes "[Osmo]"; - mes "\"Welcome. I hope you enjoy your visit in Santa's residence. You already saw the workshop where the Christmas presents are crafted, right?\""; - next; - mes "\"Well, here you are in the office. We're taking care of various administrative tasks. Some are related to Christmas, but we also need to keep the everyday business running."; - mes "Santa, as one of the most powerful Sages, has a lot of issues to pay attention to.\""; - goto L_Close; - -L_NoEvent: - mes "[Osmo]"; - mes "\"What are you doing here? The house isn't open to visitors at this time of the year.\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_Close: - set @xmas_time, 0; - close; -} - -030-2.gat,37,85,0|script|Taito|328,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - mes "[Taito]"; - mes "\"Hello. I'm sorry, but I'm very busy at the moment and want to concentrate. If you have any questions, ask one of the other helpers.\""; - goto L_Close; - -L_NoEvent: - mes "[Taito]"; - mes "\"What are you doing here? The house isn't open to visitors at this time of the year.\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Taito]"; - mes "\"I think we all did pretty good work this year. That's very reassuring, keeping in mind how chaotic it was last year.\""; - next; - mes "\"But there are rumors that our Christmas preparations were sabotaged last year!\""; - goto L_Close; - -L_Close: - set @xmas_time, 0; - close; -} - -030-2.gat,31,81,0|script|Eljas|328,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - - mes "[Eljas]"; - mes "\"Hello! Did you come to learn about the magic researches we're doing? Or because of Christmas?\""; - menu - "Because of Christmas.", L_Disappointed, - "The magic researches.", -; - mes "[Eljas]"; - mes "\"Wonderful! Naturally, that's a much more interesting topic anyway, isn't it?\""; - next; - mes "\"Well, the most astonishing discovery in our recent researches is a complex combination of Nature, Transmutation and Astral Magic to animate wooden figurines. Did you notice the Guards around the house?\""; - next; - mes "\"Originally those were simple nutcrackers, carved out of wood by our talented carpenters. With the results of our magic researches, we were able to transform them into animated beings, acting rudimentary self-determined and capable to perform simple tasks.\""; - next; - mes "\"At the moment we can keep them animated for an unlimited time, as long as the caster stays in range.\""; - goto L_Close; - -L_Disappointed: - mes "[Eljas]"; - mes "\"Oh, I see. Well, in that case you'll find the workshop area more interesting.\""; - goto L_Close; - -L_NoEvent: - mes "[Eljas]"; - mes "\"What are you doing here? The house isn't open to visitors at this time of the year.\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_Close: - set @xmas_time, 0; - close; -} - -030-2.gat,31,77,0|script|Rikhard|329,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - - mes "[Rikhard]"; - mes "\"I'm really glad that this year's Christmas preparations are going well. You know, last year nearly everything went wrong, so we all had to work really hard on that, and the everyday issues had to be neglected.\""; - next; - mes "\"But there are very important topics we have to take care on as Santa's helpers. The Sages have an important role in the politics of Kaizei.\""; - next; - mes "\"As an example, currently I'm working on analyzing a trade regulation proposal from Tulimshar's Wizard Council. I can't get into the details about this, obviously. But, let me tell you, those Tulimshar people try to get everything under their control.\""; - next; - mes "\"It's part of our work to maintain Kaizei's independency. In my opinion the Sages should be much more reluctant about this anyway. But well, I'm only a mere helper, this isn't up to me. I can only do my best to deliver an analysis as accurate as possible.\""; - next; - mes "\"Which is why I should go back to work now.\""; - goto L_Close; - -L_NoEvent: - mes "[Rikhard]"; - mes "\"What are you doing here? The house isn't open to visitors at this time of the year.\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_Close: - set @xmas_time, 0; - close; -} - -030-2.gat,31,85,0|script|Akseli|329,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - - mes "[Akseli]"; - mes "\"Ah, a visitor! Do you enjoy your time in Santa's residence?\""; - menu - "I'm confused, it's much bigger than from the outside.", -, - "Yes, it's really interesting.", L_Close, - "It's ok.", L_Close; - mes "[Akseli]"; - mes "\"Ah, yes, that's a magic technique almost all of the Sages use. The house is located in a shifted dimension.\""; - goto L_Close; - -L_NoEvent: - mes "[Akseli]"; - mes "\"What are you doing here? The house isn't open to visitors at this time of the year.\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_Close: - set @xmas_time, 0; - close; -} - -// In the workshop - -030-2.gat,127,41,0|script|Aaron|328,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - mes "[Aaron]"; - mes "\"Welcome to Santa's famous Christmas workshop. Feel free to have a look around and talk to the craftsmen.\""; - next; - mes "\"You have to know, Santa is a great promoter for skilled craftsmen. He's always looking out for talented persons who can join our team and get an excellent apprenticeship here.\""; - goto L_Close; - -L_NoEvent: - mes "[Aaron]"; - mes "\"I'm sorry, the house isn't open to visitors at the moment.\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Aaron]"; - mes "\"Christmas time is over. Time to move on to different tasks now.\""; - goto L_Close; - -L_Close: - set @xmas_time, 0; - close; -} - -030-2.gat,140,41,0|script|Urmas|328,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - mes "[Urmas]"; - mes "\"Uh, I fear I caught a cold.\""; - mes "He blows his nose."; - next; - mes "[Urmas]"; - mes "\"But it isn't that bad I couldn't work."; - mes "Maybe you shouldn't come too close, so you don't get infected.\""; - goto L_Close; - -L_NoEvent: - mes "[Urmas]"; - mes "\"I'm sorry, the house isn't open to visitors at the moment.\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Urmas]"; - mes "\"I feel tired. All this work, and on top of that I've got a cold. I think I'm going to have a long, restorative slumber.\""; - goto L_Close; - -L_Close: - set @xmas_time, 0; - close; -} - -030-2.gat,154,33,0|script|Iivo|329,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - mes "You see a helper cutting some leather pieces. He looks very focused on his work. Then he notices you."; - mes "[Iivo]"; - mes "\"Hu? Oh, hello. Feel free to watch.\""; - goto L_Close; - -L_NoEvent: - mes "[Iivo]"; - mes "\"I'm sorry, the house isn't open to visitors at the moment.\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Iivo]"; - mes "\"I like the Christmas time, when we can just work on the presents, and there aren't so many other issues to pay attention to. It always helps me to calm down and think about what happened during the past year.\""; - goto L_Close; - -L_Close: - set @xmas_time, 0; - close; -} diff --git a/world/map/npc/xmas/2012/helpersSaddleRug.txt b/world/map/npc/xmas/2012/helpersSaddleRug.txt deleted file mode 100644 index fb3db9d4..00000000 --- a/world/map/npc/xmas/2012/helpersSaddleRug.txt +++ /dev/null @@ -1,269 +0,0 @@ -// This file is part of Christmas Event 2012 -// author: Jenalya - -// Create Blanket -030-2.gat,153,39,0|script|Raimo|329,{ - callfunc "xmas2012time"; - - set @reinboo, (xmas2012 & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - if (@reinboo > 3) goto L_BlanketDone; - if (@reinboo == 3) goto L_BlanketNext; - - mes "You see a busy helper, working on some adorable little dolls."; - next; - mes "[Raimo]"; - mes "\"Hello there! Welcome to Santa's Christmas workshop. Most of the Christmas presents are crafted here."; - mes "Feel free to have a look around and talk to us helpers. Let me know if there's anything I can help you with.\""; - if (@reinboo != 2) - goto L_Close; - menu - "Actually, could you sew a blanket for Neiremes?", -, - "Thank you.", L_Close; - - mes "[Raimo]"; - mes "\"A blanket? Well, that'd be an easy task, provided you bring me some material. I need " + $@xmas2012_cotton_cloth_amount + " Cotton Cloths to create a blanket big enough for a Reinboo.\""; - menu - "Here, I have it.", -, - "I'll be right back.", L_Close; - - if (countitem("CottonCloth") < $@xmas2012_cotton_cloth_amount) - goto L_NoItem; - getinventorylist; - if ((checkweight("WhiteBlanket", 1) == 0) || (@inventorylist_count == 100)) - goto L_Inventory; - delitem "CottonCloth", $@xmas2012_cotton_cloth_amount; - getitem "WhiteBlanket", 1; - set @reinboo, 3; - callfunc "xmas2012update_reinboo_var"; - mes "Raimo takes the Cotton Cloths and starts working. It doesn't take long and he has created a simple blanket which he gives you."; - next; - mes "[Raimo]"; - mes "\"Here you go. Though I don't think it'll keep him warm enough when he's flying high up in the air."; - mes "You can ask Launo to pad it.\""; - goto L_Close; - -L_NoItem: - mes "[Raimo]"; - mes "\"You don't have it!\""; - goto L_Close; - -L_Inventory: - mes "[Raimo]"; - mes "\"You carry too much!\""; - goto L_Close; - -L_BlanketNext: - mes "[Raimo]"; - mes "\"Did you already ask Launo to pad the blanket I made?\""; - goto L_Close; - -L_BlanketDone: - mes "[Raimo]"; - mes "\"It's really kind of you to help Neiremes. I hope the blanket will help him.\""; - goto L_Close; - -L_NoEvent: - mes "[Raimo]"; - mes "\"I'm sorry, the house isn't open to visitors at the moment.\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Raimo]"; - mes "\"This year everything went pretty well. Not like last year!\""; - if (@reinboo != 14) - goto L_Close; - next; - mes "\"You should go and talk to Neiremes. I'm sure he'd like to thank you.\""; - goto L_Close; - -L_Close: - set @reinboo, 0; - set @xmas_time, 0; - close; -} - -// Create Saddle Rug -030-2.gat,135,31,0|script|Launo|329,{ - callfunc "xmas2012time"; - - set @reinboo, (xmas2012 & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - if (@reinboo > 4) goto L_BlanketDone; - if (@reinboo == 4) goto L_BlanketNext; - - mes "[Launo]"; - mes "\"Hello. I'm creating plush toys for Christmas.\""; - next; - mes "\"Are you here to talk to Santa? You might find him in his office, just go upstairs through the helpers' office.\""; - if (@reinboo != 3) - goto L_Close; - menu - "Could you pad this blanket for Neiremes?", -, - "Thank you.", L_Close; - - mes "[Launo]"; - mes "\"Oh, Neiremes is one of the young Reinboos who are going to join Santa's team, right? I heard he's rather insecure and has some problems with learning to fly over long distances.\""; - next; - mes "\"I'm very glad to help, if I can. Just bring me " + $@xmas2012_fluffy_fur_amount + " White Furs and give me the White Blanket, then I can add some padding which will keep Neiremes warm on his flights.\""; - menu - "Here, I have it.", -, - "I'll come back later.", L_Close; - - if ((countitem("WhiteBlanket") < 1) || (countitem("WhiteFur") < $@xmas2012_fluffy_fur_amount)) - goto L_NoItem; - getinventorylist; - if ((checkweight("WhiteSaddleRug", 1) == 0) || (@inventorylist_count == 100)) - goto L_Inventory; - delitem "WhiteFur", $@xmas2012_fluffy_fur_amount; - delitem "WhiteBlanket", 1; - getitem "WhiteSaddleRug", 1; - set @reinboo, 4; - callfunc "xmas2012update_reinboo_var"; - mes "Launo takes the White Blanket and the Fur you brought him. It doesn't take long until he's done and he gives you a very warm White Saddle Rug."; - next; - mes "[Launo]"; - mes "\"Done! This should keep Neiremes warm. Please bring it to him.\""; - menu - "But he said it should be red...", -; - mes "[Launo]"; - mes "\"Red? Oh, I see. Well, I think you should ask Reino for help with that. He's working on dying the wrapping papers, but I think he could also dye this Saddle Rug.\""; - goto L_Close; - -L_NoItem: - mes "[Launo]"; - mes "\"You don't have everything I need.\""; - goto L_Close; - -L_Inventory: - mes "[Launo]"; - mes "\"You have a lot of things with you. Come back when you carry less.\""; - goto L_Close; - -L_BlanketNext: - mes "[Launo]"; - mes "\"Talk to Reino about dying the White Saddle Rug.\""; - goto L_Close; - -L_BlanketDone: - mes "[Launo]"; - mes "\"I love the Christmas time. Creating plush toys is a very satisfying work for me, knowing how much joy they will bring.\""; - next; - mes "\"I wish I could do that all year long. But as a helper of a Sage, there are other duties as well.\""; - goto L_Close; - -L_NoEvent: - mes "[Launo]"; - mes "\"I'm sorry, the house isn't open to visitors at the moment.\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Launo]"; - mes "\"I'm a bit sad that Christmas is already over. I like the preparation time. But of course I'm glad everything went well.\""; - if (@reinboo != 14) - goto L_Close; - next; - mes "\"Have you talked to Neiremes already?\""; - goto L_Close; - -L_Close: - set @reinboo, 0; - set @xmas_time, 0; - close; -} - -// Dye Saddle Rug -030-2.gat,140,31,0|script|Reino|328,{ - callfunc "xmas2012time"; - - set @reinboo, (xmas2012 & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - mes "[Reino]"; - mes "\"Are you another visitor? We're working on the Christmas preparation here.\""; - mes "Reino seems to be a bit grumpy."; - if (@reinboo != 4) - goto L_Close; - menu - "I need help with this Saddle Rug for Neiremes...", -, - "I see. I'll ... let you work then.", L_Close; - mes "[Reino]"; - mes "\"Neiremes? One of the Reinboos? Why?\""; - menu - "He feels cold when he's high up in the air.", -, - "Forget it.", L_Close; - mes "Reino sighs."; - mes "[Reino]"; - mes "\"Well, all right. And what do you want me to do?\""; - menu - "This Saddle Rug needs to be red, because that's Santa's color.", -; - mes "[Reino]"; - mes "\"Of course! What a stupid question. Well, I tell you I'm doing some more serious work here than pampering some mollycoddle Reinboo.\""; - next; - mes "\"But if you bring me " + $@xmas2012_red_dye_amount + " Red Dyes, I think I can dye that Saddle Rug quickly.\""; - menu - "I have it with me.", -, - "I'll get that.", L_Close; - - if ((countitem("RedDye") < $@xmas2012_red_dye_amount) || (countitem("WhiteSaddleRug") < 1)) - goto L_NoItem; - getinventorylist; - if ((checkweight("RedSaddleRug", 1) == 0) || (@inventorylist_count == 100)) - goto L_Inventory; - delitem "RedDye", $@xmas2012_red_dye_amount; - delitem "WhiteSaddleRug", 1; - getitem "RedSaddleRug", 1; - set @reinboo, 5; - callfunc "xmas2012update_reinboo_var"; - mes "Reino takes your dyes and the Saddle Rug. He puts the dye into some bowl and dunks the Saddle Rug into it. After the Rug is soaked with the dye, he puts it by the side to dry."; - next; - mes "[Reino]"; - mes "\"Ok, done. Now I need to get back to my actual work. Bring that Red Saddle Rug to the Reinboo.\""; - goto L_Close; - -L_NoItem: - mes "[Reino]"; - mes "\"Don't waste my time! Come back when you have everything I need.\""; - goto L_Close; - -L_Inventory: - mes "[Reino]"; - mes "\"I suggest you to lighten your backpack first. It must be a pain to carry so many things around!\""; - goto L_Close; - -L_NoEvent: - mes "[Reino]"; - mes "\"I'm sorry, the house isn't open to visitors at the moment.\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Reino]"; - mes "\"It's a really good feeling when all the hard work pays off.\""; - if (@reinboo != 14) - goto L_Close; - next; - mes "\"By the way, did that Saddle Rug help? Did you talk to Neiremes already?\""; - goto L_Close; - -L_Close: - set @reinboo, 0; - set @xmas_time, 0; - close; -} diff --git a/world/map/npc/xmas/2012/helpersStorage.txt b/world/map/npc/xmas/2012/helpersStorage.txt deleted file mode 100644 index c9aa8f24..00000000 --- a/world/map/npc/xmas/2012/helpersStorage.txt +++ /dev/null @@ -1,96 +0,0 @@ -// This file is part of Christmas Event 2012 -// author: Jenalya - -030-2.gat,25,35,0|script|Vellamo|328,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - if (xmas2012 & $@xmas2012_CANDY_FLAG) - goto L_Candy; - - mes "[Vellamo]"; - mes "\"Oh, hello. Visitors usually don't come down here in the basement. Here we store several things, materials for the presents, the finished presents, supplies.\""; - menu - "Nice. I have to go.", L_Close, - "Do you need help with anything?", -; - mes "[Vellamo]"; - mes "\"Oh? You want to help us? Actually, there is one thing you could do. Did you see those weird slimes out there on the Snow Fields? Argh, I hate those creatures, last year they invaded the entire basement...\""; - next; - mes "\"However, this year they tried again, but I was able to hold them off. They just managed to devour most of our Candy supplies.\""; - next; - mes "\"So in case you find some of the Candies, feel free to bring them back. Ismo will give you some reward for them.\""; - set xmas2012, xmas2012 | $@xmas2012_CANDY_FLAG; - goto L_Close; - -L_Candy: - mes "[Vellamo]"; - mes "\"Ah, welcome back. When you have found some of the Candy, please give it to Ismo.\""; - goto L_Close; - -L_NoEvent: - mes "[Vellamo]"; - mes "\"I'm sorry, the house isn't open to visitors at the moment.\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Vellamo]"; - mes "\"Now that Christmas is over, we need to prepare everything for leaving the residence again. Santa spends the rest of the year in other places on Kaizei, working for the welfare of our continent.\""; - goto L_Close; - -L_Close: - set @xmas_time, 0; - close; -} - -030-2.gat,33,29,0|script|Ismo|329,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - if (xmas2012 & $@xmas2012_CANDY_FLAG) - goto L_Candy; - - mes "[Ismo]"; - mes "\"Hello. I'm helping Vellamo. He's the storage administrator.\""; - goto L_Close; - -L_Candy: - mes "[Ismo]"; - mes "\"Did you get back some Candy from the slimes?\""; - next; - - set @dq_level, 30; - set @dq_cost, 12; - set @dq_count, 3; - set @dq_name$, "Candy"; - set @dq_friendly_name$, "Candies"; - set @dq_money, 1000; - set @dq_exp, 200; - - callfunc "DailyQuest"; - - goto L_Close; - -L_NoEvent: - mes "[Ismo]"; - mes "\"I'm sorry, the house isn't open to visitors at the moment.\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Ismo]"; - mes "\"We're going to have a lot of work here now, because we're going to leave this residence soon.\""; - goto L_Close; - -L_Close: - set @xmas_time, 0; - close; -} diff --git a/world/map/npc/xmas/2012/helpersTalisman.txt b/world/map/npc/xmas/2012/helpersTalisman.txt deleted file mode 100644 index 09d81d4c..00000000 --- a/world/map/npc/xmas/2012/helpersTalisman.txt +++ /dev/null @@ -1,177 +0,0 @@ -// This file is part of Christmas Event 2012 -// author: Jenalya - -030-2.gat,37,81,0|script|Tarmo|328,{ - callfunc "xmas2012time"; - - set @reinboo, (xmas2012 & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - if (@reinboo > 12) goto L_Done; - if (@reinboo == 12) goto L_Santa; - if (@reinboo > 9) goto L_CarveTalisman; - - mes "[Tarmo]"; - mes "\"Hello. I hope you're enjoying your time in Santa's residence. If I can help you with anything, please let me know.\""; - if (@reinboo != 9) - goto L_Close; - menu - "We need a Flight Talisman for Neiremes.", -, - "Thanks.", L_Close; - mes "[Tarmo]"; - mes "\"A Flight Talisman? Was that Neimeres' idea? She always has such fancy ideas.\""; - next; - mes "\"Talisman magic isn't very common nowadays. It's an ancient form of magic, so you'd more likely find it used by shamans of tribes as the Mangarrs. They're living in the snow mountains north west of Nivalis.\""; - next; - mes "\"But nevertheless I'm well versed in various fields of magic, including such historical ones. I think you're right that such a simple symbol could encourage Neiremes.\""; - next; - mes "\"Here, take this drawing to Kalevi and ask him to carve such a form out of a Raw Log. In the meanwhile I'm going to research the spell to enchant the talisman.\""; - mes "He gives you a quick sketch of a longish form, with some scribbled remarks about the size."; - set @reinboo, 10; - callfunc "xmas2012update_reinboo_var"; - goto L_Close; - -L_CarveTalisman: - mes "[Tarmo]"; - mes "\"Show Kalevi the drawing I gave you and come back when you've got a Raw Talisman.\""; - if (@reinboo != 11) - goto L_Close; - menu - "I have it!", -, - "All right.", L_Close; - if (countitem("RawTalisman") < 1) - goto L_NoItem; - set @reinboo, 12; - callfunc "xmas2012update_reinboo_var"; - - mes "Tarmo takes the Talisman and inspects it critically. Then he nods and gives it back to you."; - mes "[Tarmo]"; - mes "\"This should do it. Very well. I read up some things about how to create a Flight Talisman. It seems we're going to need some part of the wings of a flying creature. You have to see if you can find such a thing.\""; - next; - mes "\"And about the spell itself... well, I think you should ask Santa to cast the spell, he's the most powerful mage I know.\""; - goto L_Close; - -L_NoItem: - mes "[Tarmo]"; - mes "\"Don't fool around! You don't have it.\""; - goto L_Close; - -L_Santa: - mes "[Tarmo]"; - mes "\"Remember, you need some part of the wings of a flying creature for the Flight Talisman. When you found something that might suffice, ask Santa to cast the spell.\""; - goto L_Close; - -L_Done: - mes "[Tarmo]"; - mes "\"I'm sure the Flight Talisman will help Neiremes to overcome his fears about flying.\""; - goto L_Close; - -L_NoEvent: - mes "[Tarmo]"; - mes "\"What are you doing here? The house isn't open to visitors at this time of the year.\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Tarmo]"; - mes "\"Neiremes flew excellently! I'm sure this is because of the Flight Talisman we created.\""; - if (@reinboo != 14) - goto L_Close; - next; - mes "\"Did you talk to him already?\""; - goto L_Close; - -L_Close: - set @reinboo, 0; - set @xmas_time, 0; - close; -} - -030-2.gat,147,23,0|script|Kalevi|329,{ - callfunc "xmas2012time"; - - set @reinboo, (xmas2012 & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - if (@reinboo == 11) goto L_Tarmo; - if (@reinboo > 11) goto L_Done; - - mes "[Kalevi]"; - mes "\"Oh, hello. Are you here to talk? The Christmas time brings so much hectic work... it's stressful."; - mes "I prefer when everything is calm and relaxed.\""; - if (@reinboo != 10) - goto L_Close; - menu - "Neiremes needs a Flight Talisman. Can you help?", -, - "Too bad.", L_Close; - mes "You give Kalevi the drawing from Tarmo and he looks at it for a while."; - mes "[Kalevi]"; - mes "\"This shouldn't be a problem. But you have to bring me " + $@xmas2012_raw_log_amount + " Raw Log, since the ones I have here are intended for some more presents.\""; - menu - "I have it.", -, - "Ok, I'll get that.", L_Close; - if (countitem("RawLog") < $@xmas2012_raw_log_amount) - goto L_NoItem; - getinventorylist; - if ((checkweight("RawTalisman", 1) == 0) || (@inventorylist_count == 100)) - goto L_Inventory; - delitem "RawLog", $@xmas2012_raw_log_amount; - getitem "RawTalisman", 1; - set @reinboo, 11; - callfunc "xmas2012update_reinboo_var"; - mes "Kalevi takes the wood and carves it, looking at the drawing every now and then. After he finished the carving, he polishes the piece to get rid of any splinters. Then he gives it to you."; - next; - mes "[Kalevi]"; - mes "\"Here it is. I hope it'll help.\""; - goto L_Close; - -L_NoItem: - mes "[Kalevi]"; - mes "\"You don't have it!\""; - goto L_Close; - -L_Inventory: - mes "[Kalevi]"; - mes "\"Wow, you have a lot of stuff with you. Isn't that too heavy?\""; - goto L_Close; - -L_Tarmo: - mes "[Kalevi]"; - mes "\"And, did you show the Raw Talisman I carved to Tarmo already? Is it usable?\""; - goto L_Close; - -L_Done: - mes "[Kalevi]"; - mes "\"A Flight Talisman! That's a really interesting idea.\""; - next; - mes "\"You know, I never thought about the difficulties the reinboos might have to face. I just took it as naturally that they transport Santa on his Christmas Flight.\""; - goto L_Close; - -L_NoEvent: - mes "[Kalevi]"; - mes "\"I'm sorry, the house isn't open to visitors at the moment.\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - mes "[Kalevi]"; - mes "\"Ah, I'm glad all the hustle and bustle is over.\""; - if (@reinboo != 14) - goto L_Close; - next; - mes "\"I wonder, did that Talisman I carved help? You should go to see Neiremes.\""; - goto L_Close; - -L_Close: - set @reinboo, 0; - set @xmas_time, 0; - close; -} diff --git a/world/map/npc/xmas/2012/monsters.txt b/world/map/npc/xmas/2012/monsters.txt deleted file mode 100644 index 8207861b..00000000 --- a/world/map/npc/xmas/2012/monsters.txt +++ /dev/null @@ -1,8 +0,0 @@ -030-1.gat,0,0,0,0|monster|Santa Slime|1015,4,100000,30000,Mob030-1::On1015 - -030-1.gat,0,0,0|script|SantaSlime030-1|-1,{ -On1015: - set @mobID, 1015; - callfunc "MobPoints"; - end; -} diff --git a/world/map/npc/xmas/2012/reinbooFlightProblems.txt b/world/map/npc/xmas/2012/reinbooFlightProblems.txt deleted file mode 100644 index c45117b3..00000000 --- a/world/map/npc/xmas/2012/reinbooFlightProblems.txt +++ /dev/null @@ -1,185 +0,0 @@ -// This file is part of Christmas Event 2012 -// author: Jenalya - -044-1.gat,71,101,0|script|Neiremes|331,{ - callfunc "xmas2012time"; - - set @reinboo, (xmas2012 & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - if (@reinboo == 14) goto L_Done; - if (@reinboo > 8) goto L_Training; - if (@reinboo == 8) goto L_Neimeres; - if (@reinboo > 6) goto L_Acorn; - if (@reinboo == 6) goto L_Hungry; - if (@reinboo > 1) goto L_Blanket; - - mes "[Neiremes]"; - mes "\"Hello? Please don't disturb me. I'm practicing.\""; - if (@reinboo == 0) - goto L_Close; - menu - "I'm here to help you!", -, - "Ok, sorry.", L_Close; - mes "[Neiremes]"; - mes "\"Help me? Oh, that's kind. Now that you say it, I can smell Grombadil on you. He sent you, right? He's so friendly to me. And I fear I'll dissapoint him.\""; - menu - "I'm sure you won't. What's causing you problems?", -, - "Pull yourself together! What's your problem?", -; - mes "[Neiremes]"; - mes "\"I... I have problems with flying. I can manage a short flight, but... well, first of all it's so terribly cold in the upper air!"; - mes "I don't like freezing.\""; - menu - "I'll try to get something to keep you warm.", -; - mes "[Neiremes]"; - mes "\"Oh, that's very kind! But... it has to be red, ok? It's Santa's color. I can't wear a different color!\""; - set @reinboo, 2; - callfunc "xmas2012update_reinboo_var"; - goto L_Close; - -L_Blanket: - mes "[Neiremes]"; - mes "\"Did you find something to keep me warm yet? I'm sure that'll help me to stay in the air for a longer time. And remember, I can only wear something red. Because it's Santa's color.\""; - if (@reinboo != 5) - goto L_Close; - menu - "I have a Red Saddle Rug for you!", -, - "Not yet.", L_Close; - - if (countitem("RedSaddleRug") < 1) - goto L_NoItem; - delitem "RedSaddleRug", 1; - set @reinboo, 6; - callfunc "xmas2012update_reinboo_var"; - - mes "[Neiremes]"; - mes "\"Oh, oh, oh! Amazing! It's so fluffy! And red! And warm! Thank you!\""; - mes "He takes the rug with his mouth and puts it on his back."; - next; - mes "[Neiremes]"; - mes "\"Can you fasten it onto my back? Pull that strap. Yes, that's right.\""; - next; - mes "\"Oh, I'm so happy. I'm sure now I can stay in the cold air for a longer time."; - mes "\"Unless..."; - menu - "Unless?", -, - "What's now the problem?", -; -L_Hungry: - mes "[Neiremes]"; - mes "\"Oh, I... I feel hungry now. It's hard to concentrate when I'm hungry. And I feel exhausted because of that. Yes. I need to eat first.\""; - next; - mes "\"Leiremes, my trainer, said it's not good to go on a long flight when you're hungry.\""; - menu - "Are you sure you aren't just afraid?", -, - "Ok, I'll get you something.", L_Close; - - mes "[Neiremes]"; - mes "\"Oh, don't be mean! I'm really hungry! I'm doing my best.\""; - goto L_Close; - -L_Acorn: - mes "[Neiremes]"; - mes "\"That Red Saddle Rug you brought me is really nice and warm. But I can't go on a long training flight when I'm hungry. Leiremes said it's dangerous to fly when you're hungry. He's my trainer and he's very wise.\""; - menu - "I'll try to find something appropriate.", L_Close, - "I've got some Roasted Acorns for you.", -; - - if (countitem("RoastedAcorn") < $@xmas2012_roasted_acorn_amount) - goto L_NoItem; - delitem "RoastedAcorn", $@xmas2012_roasted_acorn_amount; - set @reinboo, 8; - callfunc "xmas2012update_reinboo_var"; - - mes "[Neiremes]"; - mes "\"Roasted Acorns! Yum, yum, yum. Tasty!\""; - mes "Neiremes munches the acorns with visible delight."; - next; - mes "[Neiremes]"; - mes "\"Now I'm going back to training.\""; - next; -L_Neimeres: - mes "[Neiremes]"; - mes "\"Neimeres wanted to talk to you. I told her about the nice saddle rug you brought me and she got curious about you. She is just over there at the well.\""; - next; - mes "\"Mh... I think you have to go through that cave further downhill.\""; - goto L_Close; - -L_Training: - mes "[Neiremes]"; - mes "\"I'm training. Thank you for bringing me the saddle rug and the food. I'm doing my best now."; - mes "... If I only wouldn't have to fly so high...\""; - if (@reinboo != 13) - goto L_Close; - menu - "I have a Flight Talisman for you!", -, - "You just have to train harder!", L_Close; - mes "[Neiremes]"; - mes "\"Oh, exciting! What does it do? Does it help me?\""; - menu - "It'll keep you safe while you're flying.", -; - if (countitem("FlightTalisman") < 1) - goto L_NoItem; - delitem "FlightTalisman", 1; - set @reinboo, 14; - callfunc "xmas2012update_reinboo_var"; - mes "You give Neiremes the talisman."; - mes "[Neiremes]"; - mes "\"Oh, I already feel more safe. It's really powerful, is it? Thank you so much. I'm going to do another training flight, to test it.\""; - goto L_Close; - -L_Done: - mes "[Neiremes]"; - mes "\"Hello! I just made a very long and high training flight. And I didn't feel cold and I wasn't nervous! Are you proud of me? Thank you so much for bringing this Flight Talisman.\""; - next; - mes "\"Will you come to see how I did after Christmas?\""; - menu - "Of course I will!", -, - "When I have the time...", L_Please; - mes "[Neiremes]"; - mes "\"Yay!\""; - goto L_Close; - -L_Please: - mes "[Neiremes]"; - mes "\"Oh, please come!\""; - goto L_Close; - -L_NoItem: - mes "[Neiremes]"; - mes "\"Hey? You don't have it! That's mean.\""; - mes "Neiremes looks very sad."; - goto L_Close; - -L_NoEvent: - mes "Neiremes the Reinboo hums happily."; - goto L_Close; - -L_RewardTime: - mes "[Neiremes]"; - mes "\"Thank you so much for your help! It was really great to fly with Santa and the others. Neimeres was so happy too.\""; - if (@reinboo != 14) - goto L_Close; - - getinventorylist; - if ((checkweight("RedNose", 1) == 0) || (@inventorylist_count == 100)) - goto L_Inventory; - mes "\"Here, this is for you.\""; - getitem "RedNose", 1; - set @reinboo, 15; - callfunc "xmas2012update_reinboo_var"; - goto L_Close; - -L_Inventory: - mes "[Neiremes]"; - mes "\"Oh, I want to give you a gift, but you can't carry it.\""; - goto L_Close; - -L_Close: - set @reinboo, 0; - set @xmas_time, 0; - close; -} diff --git a/world/map/npc/xmas/2012/reinbooTrainer.txt b/world/map/npc/xmas/2012/reinbooTrainer.txt deleted file mode 100644 index adafec44..00000000 --- a/world/map/npc/xmas/2012/reinbooTrainer.txt +++ /dev/null @@ -1,85 +0,0 @@ -// This file is part of Christmas Event 2012 -// author: Jenalya - -044-1.gat,66,103,0|script|Leiremes|170,{ - callfunc "xmas2012time"; - - set @reinboo, (xmas2012 & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - if (@reinboo == 14) goto L_Done; - if (@reinboo > 8) goto L_Talisman; - if (@reinboo == 8) goto L_Neimeres; - if (@reinboo == 7) goto L_Food; - if (@reinboo == 6) goto L_Hungry; - if (@reinboo > 1) goto L_Blanket; - - mes "[Leiremes]"; - mes "\"Oh, I'm surprised to see you here. Humans doesn't come here often. We're here to train flying, so please don't disturb us.\""; - goto L_Close; - -L_Blanket: - mes "[Leiremes]"; - mes "\"It isn't easy to train Neiremes... We'll see if your efforts can help.\""; - goto L_Close; - -L_Hungry: - mes "[Leiremes]"; - mes "\"That's a very nice saddle rug you brought. Now Neiremes can't complain about the cold anymore.\""; - menu - "He's hungry now.", -; - - mes "[Leiremes]"; - mes "\"I see. Well, he should eat something nutrient but light. He probably wants a cake, but that'd feel too heavy in his stomach during the flight.\""; - next; - mes "\"I know, Roasted Acorns would be good.\""; - set @reinboo, 7; - callfunc "xmas2012update_reinboo_var"; - goto L_Close; - -L_Food: - mes "[Leiremes]"; - mes "\"Verneri, one of Santa's bodyguards, knows how to make really tasty Roasted Acorns. Maybe you should talk to him.\""; - goto L_Close; - -L_Neimeres: - mes "[Leiremes]"; - mes "\"Neiremes should go back to training now. Why don't you talk to Neimeres in the meanwhile? She's his flight partner.\""; - mes "\"Everyone of us has a flight partner, we start our service together and retire at the same time. My partner is Leimeres.\""; - goto L_Close; - -L_Talisman: - mes "[Leiremes]"; - mes "\"I heard about this idea with the Flight Talisman. I have to say, I'm a bit skeptical if that'll work. But I don't have any better ideas.\""; - goto L_Close; - -L_Done: - mes "[Leiremes]"; - mes "\"Since you gave the Flight Talisman to Neiremes he's really motivated. Thank you.\""; - next; - mes "\"The Christmas Flight will show how much it helped.\""; - goto L_Close; - -L_NoEvent: - mes "[Leiremes]"; - mes "\"I love flying over the snowy hills.\""; - goto L_Close; - -L_RewardTime: - mes "[Leiremes]"; - mes "\"Neiremes did very well on the flight with Santa. Thanks for your help!\""; - if (@reinboo != 14) - goto L_Close; - next; - mes "\"You should also talk to Neiremes. I think he wants to thank you personally.\""; - goto L_Close; - -L_Close: - set @reinboo, 0; - set @xmas_time, 0; - close; -} diff --git a/world/map/npc/xmas/2012/reinbooYoung.txt b/world/map/npc/xmas/2012/reinbooYoung.txt deleted file mode 100644 index d5e23c2b..00000000 --- a/world/map/npc/xmas/2012/reinbooYoung.txt +++ /dev/null @@ -1,74 +0,0 @@ -// This file is part of Christmas Event 2012 -// author: Jenalya - -044-1.gat,109,116,0|script|Neimeres|331,{ - callfunc "xmas2012time"; - - set @reinboo, (xmas2012 & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - if (@reinboo == 14) goto L_Done; - if (@reinboo > 8) goto L_Talisman; - if (@reinboo == 8) goto L_Afraid; - if (@reinboo > 1) goto L_Neiremes; - - mes "[Neimeres]"; - mes "\"Hello. What are you doing here? Humans usually don't come here, because they have to go through an icy cave with monsters living in there. You must be very brave.\""; - goto L_Close; - -L_Neiremes: - mes "[Neimeres]"; - mes "\"You're going to help Neiremes, right? I'm so worried. I want to fly with him!\""; - goto L_Close; - -L_Afraid: - mes "[Neimeres]"; - mes "\"You were helping Neiremes a lot! That's very kind. But... I don't think it's enough. He's afraid of being high up in the air for a long time.\""; - mes "Neimeres looks sad."; - next; - mes "[Neimeres]"; - mes "\"But I had an idea! Neiremes needs a Flight Talisman! Then he won't be afraid anymore!\""; - menu - "What is a Flight Talisman?", -; - mes "[Neimeres]"; - mes "\"It's a magical talisman that keeps you safe during flights, I think. I never saw one."; - mes "But Santa's helpers are very wise and know a lot of things. I'm sure they know about it.\""; - next; - mes "\"And Tarmo knows the most about magic items. Please ask him about it! I need to stay here, with Neiremes. He'd be sad if I go away.\""; - set @reinboo, 9; - callfunc "xmas2012update_reinboo_var"; - goto L_Close; - -L_Talisman: - mes "[Neimeres]"; - mes "\"Please ask Tarmo about the Flight Talisman! With such a talisman Neiremes won't be afraid anymore, I'm sure.\""; - goto L_Close; - -L_Done: - mes "[Neimeres]"; - mes "\"Thanks for bringing the Flight Talisman! Neiremes is training very hard now. I'm sure he will do well on Christmas! Make sure to stay around to hear how he did.\""; - goto L_Close; - -L_NoEvent: - mes "[Neimeres]"; - mes "\"These mountains are nice. I like being here.\""; - goto L_Close; - -L_RewardTime: - mes "[Neimeres]"; - mes "\"It was so wonderful to fly with Santa and Neiremes. He did really well! Oh, I'm so happy.\""; - if (@reinboo != 14) - goto L_Close; - next; - mes "\"You helped so much. Go talk to Neiremes. He wants to thank you.\""; - goto L_Close; - -L_Close: - set @reinboo, 0; - set @xmas_time, 0; - close; -} diff --git a/world/map/npc/xmas/2012/reinboos.txt b/world/map/npc/xmas/2012/reinboos.txt deleted file mode 100644 index d7707ee0..00000000 --- a/world/map/npc/xmas/2012/reinboos.txt +++ /dev/null @@ -1,99 +0,0 @@ -// This file is part of Christmas Event 2012 -// author: Jenalya - -030-1.gat,96,57,0|script|Reimeles|170,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - mes "[Reimeles]"; - mes "\"My flight partner Reilemes flew to the Snowy Hills, to train the young Reinboos who are going to join our team this year.\""; - goto L_Close; - -L_NoEvent: - mes "[Reimeles]"; - mes "\"This is Santa's residence.\""; - goto L_Close; - -L_RewardTime: - mes "[Reimeles]"; - mes "\"The Christmas Flight was a lot of fun this year!\""; - goto L_Close; - -L_Close: - set @xmas_time, 0; - close; -} - -030-1.gat,100,46,0|script|Leimeres|170,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - mes "[Leimeres]"; - mes "\"This year the snowflakes doesn't look as pretty as usual.\""; - menu - "I think they look totally normal.", -, - "That's weird.", L_Close, - "Are you sure?", -; - - mes "[Leimeres]"; - mes "\"Maybe I'm just not as happy as last year. I'm a bit worried."; - mes "The little Neiremes has problems to learn flying.\""; - - menu - "Neiremes?", -, - "That's too bad.", L_Close; - - mes "[Leimeres]"; - mes "\"Leiremes and I are going to retire this year. Neiremes and Neimeres will take our positions."; - mes "But what if he doesn't learn to fly? Does that mean I can't retire then? I'm worried.\""; - goto L_Close; - -L_NoEvent: - mes "[Leimeres]"; - mes "\"I like the snowflakes.\""; - goto L_Close; - -L_RewardTime: - mes "[Leimeres]"; - mes "\"It was an odd feeling not to be with Santa on his tour this year. But the young ones did well. I'm happy.\""; - goto L_Close; - -L_Close: - set @xmas_time, 0; - close; -} - -030-1.gat,103,54,0|script|Meireles|170,{ - callfunc "xmas2012time"; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - mes "[Meireles]"; - mes "\"Grombadil is worried. You see, some of the Reinboos from our team are going to retire this year. And some young ones are going to join.\""; - goto L_Close; - -L_NoEvent: - mes "[Meireles]"; - mes "\"Grombadil is our equerry. That means he takes care of us Reinboos. I think he's a very good equerry. I'm happy.\""; - goto L_Close; - -L_RewardTime: - mes "[Meireles]"; - mes "\"Nobody needs to be worried anymore. I'm glad.\""; - goto L_Close; - -L_Close: - set @xmas_time, 0; - close; -} diff --git a/world/map/npc/xmas/2012/reinboosTransport.txt b/world/map/npc/xmas/2012/reinboosTransport.txt deleted file mode 100644 index 0335f68c..00000000 --- a/world/map/npc/xmas/2012/reinboosTransport.txt +++ /dev/null @@ -1,181 +0,0 @@ -// This file is part of Christmas Event 2012 -// author: Jenalya - -030-1.gat,75,65,0|script|Meileres|170,{ - callfunc "xmas2012time"; - - set @reinboo, (xmas2012 & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - if (xmas2012 & $@xmas2012_FLIGHT_FLAG1) goto L_Again; - - mes "[Meileres]"; - mes "\"Hello. Are you here to see Santa and the helpers? They're inside the house.\""; - if (@reinboo < 1) - goto L_Close; - menu - "Could you bring me to Neiremes?", -, - "It's really cold here, I'll go inside.", L_Close; - mes "[Meileres]"; - mes "\"To Neiremes? Oh, but they're training! What do you want from Neiremes?\""; - menu - "Grombadil sent me to help him.", -, - "You're right, I should leave him alone.", L_Close; - mes "Meileres sniffs on you."; - mes "[Meileres]"; - mes "\"Well, I can smell that you talked to Grombadil. Ok. I can bring you there. But I need something to eat first.\""; - next; - mes "\"Otherwise I get tired, and we might fall from the sky! You don't want to fall from the sky, right?\""; - set xmas2012, xmas2012 | $@xmas2012_FLIGHT_FLAG1; - goto L_Pay; - -L_Again: - mes "[Meileres]"; - mes "\"Do you want me to bring you to Neiremes again?\""; - menu - "Yes.", L_Pay, - "No.", L_Close; - -L_Pay: - mes "[Meileres]"; - mes "\"Do you have anything tasty for me?\""; - menu - "What about Red Apples?", -, - "I could give you Chocolate Cake.", -, - "I have some White Cake here.", -, - "I can offer you some Orange Cake.", -, - "Would you like some Apple Cake?", -, - "You're greedy!", L_Close; - - set @flight_pay, @menu - 1; - mes "[Meileres]"; - mes "\"Ok. Give me " + $@xmas2012_flight_pay[@flight_pay] + " " + $@xmas2012_flight_pay_name$[@flight_pay] + " and I'll fly you over to Neiremes.\""; - menu - "Here it is.", -, - "I need to get it first.", L_Close; - - if (countitem($@xmas2012_flight_pay$[@flight_pay]) < $@xmas2012_flight_pay[@flight_pay]) - goto L_NoItem; - delitem $@xmas2012_flight_pay$[@flight_pay], $@xmas2012_flight_pay[@flight_pay]; - - mes "[Meileres]"; - mes "\"Yum, yum, tasty. Ok, let's start.\""; - warp "044-1.gat", 71, 103; - goto L_Close; - -L_NoItem: - mes "[Meileres]"; - mes "\"Where is it? Where is it? You don't have it!\""; - goto L_Close; - -L_NoEvent: - mes "[Meileres]"; - mes "\"I really don't understand why humans spend so much time in buildings. It's so much nicer outside.\""; - goto L_Close; - -L_RewardTime: - mes "[Meileres]"; - mes "\"Neiremes didn't have any problems with the flight! I'm so happy!\""; - if (@reinboo != 14) - goto L_Close; - next; - mes "\"Do you want me to bring you to Neiremes again?\""; - menu - "Yes.", L_Pay, - "No, thanks.", L_Close; - -L_Close: - set @reinboo, 0; - set @flight_pay, 0; - set @xmas_time, 0; - close; -} - -044-1.gat,66,100,0|script|Reilemes|170,{ - callfunc "xmas2012time"; - - set @reinboo, (xmas2012 & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - if (xmas2012 & $@xmas2012_FLIGHT_FLAG2) goto L_Again; - - mes "[Reilemes]"; - mes "\"Hello. We're here to train flying.\""; - if (@reinboo < 1) - goto L_Close; - menu - "Could you fly me back to Santa's place?", -, - "Good luck!", L_Close; - mes "[Reilemes]"; - mes "\"Hm. Ok, why not. But you have to give me something to eat first.\""; - set xmas2012, xmas2012 | $@xmas2012_FLIGHT_FLAG2; - next; - goto L_Pay; - -L_Again: - mes "[Reilemes]"; - mes "\"Do you want to return to Santa's residence?\""; - menu - "Yes.", L_Pay, - "No.", L_Close; - -L_Pay: - mes "[Reilemes]"; - mes "\"Do you have anything tasty for me?\""; - menu - "What about Red Apples?", -, - "I could give you Chocolate Cake.", -, - "I have some White Cake here.", -, - "I can offer you some Orange Cake.", -, - "Would you like some Apple Cake?", -, - "You're greedy!", L_Close; - - set @flight_pay, @menu - 1; - mes "[Reilemes]"; - mes "\"Ok. Give me " + $@xmas2012_flight_pay[@flight_pay] + " " + $@xmas2012_flight_pay_name$[@flight_pay] + " and I'll fly you over to Santa's place.\""; - menu - "Ok.", -, - "I changed my mind.", L_Close; - - if (countitem($@xmas2012_flight_pay$[@flight_pay]) < $@xmas2012_flight_pay[@flight_pay]) - goto L_NoItem; - delitem $@xmas2012_flight_pay$[@flight_pay], $@xmas2012_flight_pay[@flight_pay]; - - mes "[Reilemes]"; - mes "\"Yum, yum, tasty. Ok, let's start.\""; - warp "030-1.gat", 75, 68; - goto L_Close; - -L_NoItem: - mes "[Reilemes]"; - mes "\"Are you trying to trick me? You don't have it!\""; - goto L_Close; - -L_NoEvent: - mes "[Reilemes]"; - mes "\"I like these snowy hills.\""; - goto L_Close; - -L_RewardTime: - mes "[Reilemes]"; - mes "\"Neiremes and Neimeres did very good for their first Christmas Flight.\""; - next; - if (@reinboo != 14) - goto L_Again; - mes "\"What are you waiting for? Talk to Neiremes!\""; - goto L_Close; - -L_Close: - set @reinboo, 0; - set @flight_pay, 0; - set @xmas_time, 0; - close; -} diff --git a/world/map/npc/xmas/2012/santa.txt b/world/map/npc/xmas/2012/santa.txt deleted file mode 100644 index d79dff86..00000000 --- a/world/map/npc/xmas/2012/santa.txt +++ /dev/null @@ -1,119 +0,0 @@ -// This file is part of Christmas Event 2012 -// author: Jenalya - -030-2.gat,85,79,0|script|Santa|105,{ - callfunc "xmas2012time"; - - set @reinboo, (xmas2012 & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT; - - if (@xmas_time == $@xmas2012_no_event_time) - goto L_NoEvent; - if (@xmas_time == $@xmas2012_reward_time) - goto L_RewardTime; - - if (@reinboo > 13) goto L_Done; - if (@reinboo == 13) goto L_Neiremes; - if (@reinboo == 12) goto L_Talisman; - - mes "[Santa]"; - mes "\"Hello! Welcome to my house. Can I help you with something?\""; - menu - "I'm just having a look around.", L_Close, - "Can I help with the Christmas preparations?", -; - - if ((BaseLevel < 30) || (gettimetick(2) - TUT_var < 4*7*86400)) // player must be created at least four weeks ago - goto L_Young; - - mes "[Santa]"; - mes "\"Helping us? Mh, here in the house everything's going well. But my equerry Grombadil told me that one of the young Reinboos has trouble learning to fly. I suggest to ask him if he needs any assistance.\""; - goto L_Close; - -L_Talisman: - mes "[Santa]"; - mes "\"Hello " + strcharinfo(0) + ". I heard about your efforts to help Neiremes. I'm very happy to hear that.\""; - menu - "I need your help to create a Flight Talisman for him.", -, - "It's a pleasure.", L_Close; - mes "[Santa]"; - mes "\"A Flight Talisman? What an interesting idea! Do you have a Raw Talisman and some part of wings with you?\""; - menu - "Would Bat Wings work?", -, - "Not yet.", L_Close; - mes "[Santa]"; - mes "\"Hm, that's not the first creature that comes to my mind when thinking about wings. But it should work. Do you have " + $@xmas2012_bat_wing_amount + " Bat Wings?\""; - menu - "Yes, here.", -, - "I'll go and get them.", L_Close; - if ((countitem("BatWing") < $@xmas2012_bat_wing_amount) || (countitem("RawTalisman") < 1)) - goto L_NoItem; - getinventorylist; - if ((checkweight("FlightTalisman", 1) == 0) || (@inventorylist_count == 100)) - goto L_Inventory; - misceffect sfx_magic_transmute; - delitem "BatWing", $@xmas2012_bat_wing_amount; - delitem "RawTalisman", 1; - getitem "FlightTalisman", 1; - set @reinboo, 13; - callfunc "xmas2012update_reinboo_var"; - mes "Santa takes the items and casts a spell."; - next; - mes "\"It worked! Here is the Flight Talisman. Please bring it to Neiremes.\""; - goto L_Close; - -L_NoItem: - mes "[Santa]"; - mes "\"You're mistaken. There's something missing. Please come back when you have everything we need.\""; - goto L_Close; - -L_Inventory: - mes "[Santa]"; - mes "\"You shouldn't carry so many things. Come back when you have less with you.\""; - goto L_Close; - -L_Neiremes: - mes "[Santa]"; - mes "\"Did you bring the Flight Talisman to Neiremes already?\""; - goto L_Close; - -L_Done: - mes "[Santa]"; - mes "\"Thanks for all your help. I'm confident that Neiremes will do well on the Christmas flight.\""; - next; - mes "\"Please come back after Christmas, maybe I'll have a small present for you.\""; - goto L_Close; - -L_Young: - mes "[Santa]"; - mes "\"That's a very friendly offer! But I don't think we need any help.\""; - goto L_Close; - -L_NoEvent: - mes "[Santa]"; - mes "\"I'm very sorry, but I can't allow you inside here at the moment. Please come back around Christmas time.\""; - warp "030-1.gat", 99, 55; - goto L_Close; - -L_RewardTime: - if (xmas2012 & $@xmas2012_SANTA_FLAG) - goto L_SkipReward; - mes "[Santa]"; - mes "\"Hello my friend. I have a small gift for you.\""; - getitem "Candy", 10; - getitem "ChocolateBar", 3; - getitem "GingerBreadMan", 1; - set xmas2012, xmas2012 | $@xmas2012_SANTA_FLAG; - next; -L_SkipReward: - mes "[Santa]"; - mes "\"Merry Christmas!\""; - if (@reinboo != 14) - goto L_Close; - next; - mes "\"You should go to see Neiremes. He was very excited when he talked about your generosity.\""; - goto L_Close; - -L_Close: - set @reinboo, 0; - set @xmas_time, 0; - close; -} diff --git a/world/map/npc/xmas/2012/xmas2012config.txt b/world/map/npc/xmas/2012/xmas2012config.txt deleted file mode 100644 index 9a13ac82..00000000 --- a/world/map/npc/xmas/2012/xmas2012config.txt +++ /dev/null @@ -1,140 +0,0 @@ -// This file is part of Christmas Event 2012 -// author: Jenalya - -// NPC behavior depending on time: -// No Event Time: The event didn't start yet or already ended - the house is closed and the outside NPCs give generic dialogue -// Event Time: Christmas preparation is in progress, main quest can be done -// Reward Time: Christmas is over, if the main quest was finished, the reward can be taken - -// Main quest states saved in NIBBLE 0: -// 1: Grombadil asked the player to talk to Neiremes -// 2: Neiremes asked for a blanket -// 3: Raimo can sew a blanket out of cotton cloth, sends you to Launo with the blanket -// 4: Launo can make the blanket extra warm by adding some fluffy furs, sends you to Reino with the padded blanket -// 5: Reino can dye the blanket red with some red dyes, gives you the finished blanket to bring it to Neiremes -// 6: Gave finished blanket to Neiremes, he now asks for some food. Hint to the trainer reinboo -// 7: Trainer reinboo says that Roasted Acorns are suitable food. -// 8: gave roasted acorns to Neiremes, he sends you to Neimeres -// 9: Neimeres tells you about the Flight Talisman, sends you to Tarmo -// 10: Tarmo sends you to Kalevi, who can carve the raw form of the talisman -// 11: Kalevi carved the raw form, sends you back to Tarmo -// 12: Tarmo explains, that some kind of wing is needed, send you to Santa when found something suitable -// 13: Santa says bat wings aren't optimal, but ok and enchants the talisman, he sends you back to Neiremes -// 14: gave talisman to Neiremes -// 15: got reward from Neiremes: only available during Reward Time - -// Two reinboos offer transport between the two places where the quest NPCs are located -// Saving that the players knows them is done with flags in the first two bits of nibble 2 - -// The storage administrator Vellamo asks you to get back some candy stolen by the slimes -// this is saved in the third bit of nibble 2 -// after that, Ismo offers a daily quest with Candy - -// When the reward time started, players can get some candy from Santa, this is saved in the fourth bit of nibble 2 - --|script|#xmas2012config|-1,{ -OnInit: - set $@xmas2012_reward_start_day, 25; - set $@xmas2012_reward_end_day, 6; - set $@xmas2012_year, 2012; - - set $@xmas2012_event_time, 1; - set $@xmas2012_reward_time, 2; - set $@xmas2012_no_event_time, 3; - - set $@xmas2012_cotton_cloth_amount, 4; - set $@xmas2012_fluffy_fur_amount, 8; - set $@xmas2012_red_dye_amount, 2; - set $@xmas2012_acorn_amount, 10; - set $@xmas2012_roasted_acorn_amount, 30; - set $@xmas2012_raw_log_amount, 1; - set $@xmas2012_bat_wing_amount, 2; - - set $@xmas2012_FLIGHT_FLAG1, 0x00000100; - set $@xmas2012_FLIGHT_FLAG2, 0x00000200; - setarray $@xmas2012_flight_pay$, "RedApple", "ChocolateCake", "WhiteCake", "OrangeCake", "AppleCake"; - setarray $@xmas2012_flight_pay_name$, "Red Apples", "Chocolate Cake", "White Cake", "Orange Cake", "Apple Cake"; - setarray $@xmas2012_flight_pay, 5, 1, 1, 1, 1; - - set $@xmas2012_CANDY_FLAG, 0x00000400; - set $@xmas2012_SANTA_FLAG, 0x00000800; -} - -function|script|xmas2012time|{ -// debug -// if (@xmas_debug == $@xmas2012_event_time) -// goto L_Event_Time; -// if (@xmas_debug == $@xmas2012_reward_time) -// goto L_Reward_Time; -// if (@xmas_debug == $@xmas2012_no_event_time) -// goto L_No_Event_Time; - - if (gettime(7) == $@xmas2012_year && gettime(6) == 12 && gettime(5) < $@xmas2012_reward_start_day) - goto L_Event_Time; - - if ((gettime(7) == $@xmas2012_year && gettime(6) == 12 && gettime(5) >= $@xmas2012_reward_start_day) - || (gettime(7) == ($@xmas2012_year + 1) && gettime(6) == 1 && gettime(5) <= $@xmas2012_reward_end_day)) - goto L_Reward_Time; - -L_No_Event_Time: - set @xmas_time, $@xmas2012_no_event_time; - return; - -L_Event_Time: - set @xmas_time, $@xmas2012_event_time; - return; - -L_Reward_Time: - set @xmas_time, $@xmas2012_reward_time; - return; -} - -function|script|xmas2012update_reinboo_var|{ - set xmas2012, (xmas2012 & ~NIBBLE_0_MASK) | (@reinboo << NIBBLE_0_SHIFT); - return; -} - -function|script|xmas2012debug|{ - mes "What do you want to do?"; - menu - "Set time.", L_Time, - "Set reinboo quest state.", L_Reinboo, - "Reset complete quest state.", -, - "Do nothing.", L_Close; - - set xmas2012, 0; - goto L_Close; - -L_Time: - menu - "Event time.", -, - "Reward time.", -, - "No event time.", -, - "Clear time.", -; - - if (@menu == 1) - set @xmas_debug, $@xmas2012_event_time; - if (@menu == 2) - set @xmas_debug, $@xmas2012_reward_time; - if (@menu == 3) - set @xmas_debug, $@xmas2012_no_event_time; - if (@menu == 4) - set @xmas_debug, 0; - - goto L_Close; - -L_Reinboo: - mes "Quest state?"; - input @reinboo; - callfunc "xmas2012update_reinboo_var"; - goto L_Close; - -L_Close: - set @reinboo, 0; - set @xmas_time, 0; - close; -} - -// 030-1.gat,91,48,0|script|Debug|105,{ -// callfunc "xmas2012debug"; -// } |