From da014e76778d55f0c90f47e07a2d66715d51099f Mon Sep 17 00:00:00 2001 From: Jessica Tölke Date: Thu, 16 Feb 2012 00:37:49 +0100 Subject: Blue sage quests --- world/map/npc/048-2/slimes.txt | 579 +++++++++++++++++++++++++++++++++++++++++ 1 file changed, 579 insertions(+) create mode 100644 world/map/npc/048-2/slimes.txt (limited to 'world/map/npc/048-2/slimes.txt') diff --git a/world/map/npc/048-2/slimes.txt b/world/map/npc/048-2/slimes.txt new file mode 100644 index 00000000..6266b0cd --- /dev/null +++ b/world/map/npc/048-2/slimes.txt @@ -0,0 +1,579 @@ +// Part of Blue Sage quests +// author: Jenalya +// see bluesageConfig for detailed quest description +// Slime spawns for the slime hunting subquest + +// Variables: +// $@Q_BlueSageSlimeX: Flag to save if a spawn point X is cleared +// $@BlueSageSlimeX_Amount: Number of slimes spawned at spawn point X +// $@BlueSageSlimeX_Spawn: Number of slimes alive from spawn point X +// $@SlimeXVictimID: ID of character that triggered the spawn at X + +// @slimes: Value of the byte 2 of QUEST_BlueSage, used only to check if started/complete +// @spawnSlimeX: Number of slimes killed by the character that triggered the spawn + +// white slimes +048-2.gat,181,95,0|script|#Slime0|32767,2,2,{ + set @slimes, ((QUEST_BlueSage & $@Q_BlueSageSlimes_MASK) >> $@Q_BlueSageSlimes_SHIFT); + set @spawnSlime0, 0; + + if (mobcount("048-2.gat", "#Slime0::OnSlimeDeath") < 0) // returns -1 if no monsters + set $@BlueSageSlime0_Spawn, 0; + + // if finished or haven't started yet or spawn already active or spawn already done, do nothing + if ((@slimes == 0) || ($@BlueSageSlime0_Spawn > 0) || (QUEST_BlueSage & $@Q_BlueSageSlime0)) + end; + + set @chance, rand(10); + if (@chance < 3) + goto L_End; + if (@chance < 4) + goto L_BlowUp; + + set $@Slime0VictimID, getcharid(3); + donpcevent "#Slime0::OnSpawn"; + goto L_End; + +L_BlowUp: + percentheal -100, 0; + message strcharinfo(0), "A slime dripped out of a bookshelf right in front of you and stepped onto it. It exploded. That hurt."; + goto L_End; + +L_End: + set @chance, 0; + set @slimes, 0; + end; + +OnSpawn: + if (attachrid($@Slime0VictimID) == 0) + goto L_Clean; + set $@BlueSageSlime0_Spawn, $@BlueSageSlime0_Amount; + areamonster "048-2.gat", 178, 92, 184, 98, "", 1093, $@BlueSageSlime0_Spawn, "#Slime0::OnSlimeDeath"; + end; + +OnSlimeDeath: + set $@BlueSageSlime0_Spawn, $@BlueSageSlime0_Spawn - 1; + if (mobcount("048-2.gat", "#Slime0::OnSlimeDeath") < 0) // returns -1 if no monsters + set $@BlueSageSlime0_Spawn, 0; + + if ($@Slime0VictimID == getcharid(3)) + goto L_Count; + if ($@BlueSageSlime0_Spawn == 0) + goto L_ClearedPoint; + end; + +L_Clean: + set $@Slime0VictimID, 0; + end; + +L_Count: + set @spawnSlime0, @spawnSlime0 + 1; + if ($@BlueSageSlime0_Spawn == 0) + goto L_ClearedPoint; + end; + +L_SlimesEscaped: + set @spawnSlime0, 0; + message strcharinfo(0), "You don't see any slime of that nest anymore. But did you really get all of them?"; + goto L_Clean; + +L_ClearedPoint: + if (attachrid($@Slime0VictimID) == 0) + goto L_Clean; + if (rand($@BlueSageSlime0_Amount - @spawnSlime0) != 0) + goto L_SlimesEscaped; + set QUEST_BlueSage, QUEST_BlueSage | $@Q_BlueSageSlime0; + message strcharinfo(0), "It wasn't easy, but you think that you extinguished this nest."; + + set @slimes, ((QUEST_BlueSage & $@Q_BlueSageSlimes_MASK) >> $@Q_BlueSageSlimes_SHIFT); + if (@slimes == 255) + message strcharinfo(0), "That had been a lot of slimes. You wonder if you're done now."; + set @slimes, 0; + goto L_Clean; +} + + +// white slimes +048-2.gat,164,123,0|script|#Slime1|32767,2,2,{ + set @slimes, ((QUEST_BlueSage & $@Q_BlueSageSlimes_MASK) >> $@Q_BlueSageSlimes_SHIFT); + set @spawnSlime1, 0; + + if (mobcount("048-2.gat", "#Slime1::OnSlimeDeath") < 0) // returns -1 if no monsters + set $@BlueSageSlime1_Spawn, 0; + + // if finished or haven't started yet or spawn already active or spawn already done, do nothing + if ((@slimes == 0) || ($@BlueSageSlime1_Spawn > 0) || (QUEST_BlueSage & $@Q_BlueSageSlime1)) + end; + + set @chance, rand(10); + if (@chance < 3) + goto L_End; + if (@chance < 4) + goto L_BlowUp; + + set $@Slime1VictimID, getcharid(3); + donpcevent "#Slime1::OnSpawn"; + goto L_End; + +L_BlowUp: + percentheal -100, 0; + message strcharinfo(0), "A slime dripped out of a bookshelf right in front of you and stepped onto it. It exploded. That hurt."; + goto L_End; + +L_End: + set @chance, 0; + set @slimes, 0; + end; + +OnSpawn: + if (attachrid($@Slime1VictimID) == 0) + goto L_Clean; + set $@BlueSageSlime1_Spawn, $@BlueSageSlime1_Amount; + areamonster "048-2.gat", 161, 120, 167, 126, "", 1093, $@BlueSageSlime1_Spawn, "#Slime1::OnSlimeDeath"; + end; + +OnSlimeDeath: + set $@BlueSageSlime1_Spawn, $@BlueSageSlime1_Spawn - 1; + if (mobcount("048-2.gat", "#Slime1::OnSlimeDeath") < 0) // returns -1 if no monsters + set $@BlueSageSlime1_Spawn, 0; + + if ($@Slime1VictimID == getcharid(3)) + goto L_Count; + if ($@BlueSageSlime1_Spawn == 0) + goto L_ClearedPoint; + end; + +L_Clean: + set $@Slime1VictimID, 0; + end; + +L_Count: + set @spawnSlime1, @spawnSlime1 + 1; + if ($@BlueSageSlime1_Spawn == 0) + goto L_ClearedPoint; + end; + +L_SlimesEscaped: + set @spawnSlime1, 0; + message strcharinfo(0), "You don't see any slime of that nest anymore. But did you really get all of them?"; + goto L_Clean; + +L_ClearedPoint: + if (attachrid($@Slime1VictimID) == 0) + goto L_Clean; + if (rand($@BlueSageSlime1_Amount - @spawnSlime1) != 0) + goto L_SlimesEscaped; + set QUEST_BlueSage, QUEST_BlueSage | $@Q_BlueSageSlime1; + message strcharinfo(0), "It wasn't easy, but you think that you extinguished this nest."; + + set @slimes, ((QUEST_BlueSage & $@Q_BlueSageSlimes_MASK) >> $@Q_BlueSageSlimes_SHIFT); + if (@slimes == 255) + message strcharinfo(0), "That had been a lot of slimes. You wonder if you're done now."; + set @slimes, 0; + goto L_Clean; +} + + +// white slimes +048-2.gat,198,115,0|script|#Slime2|32767,2,2,{ + set @slimes, ((QUEST_BlueSage & $@Q_BlueSageSlimes_MASK) >> $@Q_BlueSageSlimes_SHIFT); + set @spawnSlime2, 0; + + if (mobcount("048-2.gat", "#Slime2::OnSlimeDeath") < 0) // returns -1 if no monsters + set $@BlueSageSlime2_Spawn, 0; + + // if finished or haven't started yet or spawn already active or spawn already done, do nothing + if ((@slimes == 0) || ($@BlueSageSlime2_Spawn > 0) || (QUEST_BlueSage & $@Q_BlueSageSlime2)) + end; + + set @chance, rand(10); + if (@chance < 3) + goto L_End; + if (@chance < 4) + goto L_BlowUp; + + set $@Slime2VictimID, getcharid(3); + donpcevent "#Slime2::OnSpawn"; + goto L_End; + +L_BlowUp: + percentheal -100, 0; + message strcharinfo(0), "A slime dripped out of a bookshelf right in front of you and stepped onto it. It exploded. That hurt."; + goto L_End; + +L_End: + set @chance, 0; + set @slimes, 0; + end; + +OnSpawn: + if (attachrid($@Slime2VictimID) == 0) + goto L_Clean; + set $@BlueSageSlime2_Spawn, $@BlueSageSlime2_Amount; + areamonster "048-2.gat", 195, 112, 201, 118, "", 1093, $@BlueSageSlime2_Spawn, "#Slime2::OnSlimeDeath"; + end; + +OnSlimeDeath: + set $@BlueSageSlime2_Spawn, $@BlueSageSlime2_Spawn - 1; + if (mobcount("048-2.gat", "#Slime2::OnSlimeDeath") < 0) // returns -1 if no monsters + set $@BlueSageSlime2_Spawn, 0; + + if ($@Slime2VictimID == getcharid(3)) + goto L_Count; + if ($@BlueSageSlime2_Spawn == 0) + goto L_ClearedPoint; + end; + +L_Clean: + set $@Slime2VictimID, 0; + end; + +L_Count: + set @spawnSlime2, @spawnSlime2 + 1; + if ($@BlueSageSlime2_Spawn == 0) + goto L_ClearedPoint; + end; + +L_SlimesEscaped: + set @spawnSlime2, 0; + message strcharinfo(0), "You don't see any slime of that nest anymore. But did you really get all of them?"; + goto L_Clean; + +L_ClearedPoint: + if (attachrid($@Slime2VictimID) == 0) + goto L_Clean; + if (rand($@BlueSageSlime2_Amount - @spawnSlime2) != 0) + goto L_SlimesEscaped; + set QUEST_BlueSage, QUEST_BlueSage | $@Q_BlueSageSlime2; + message strcharinfo(0), "It wasn't easy, but you think that you extinguished this nest."; + + set @slimes, ((QUEST_BlueSage & $@Q_BlueSageSlimes_MASK) >> $@Q_BlueSageSlimes_SHIFT); + if (@slimes == 255) + message strcharinfo(0), "That had been a lot of slimes. You wonder if you're done now."; + set @slimes, 0; + goto L_Clean; +} + + +// white slimes +048-2.gat,167,79,0|script|#Slime3|32767,2,2,{ + set @slimes, ((QUEST_BlueSage & $@Q_BlueSageSlimes_MASK) >> $@Q_BlueSageSlimes_SHIFT); + set @spawnSlime3, 0; + + if (mobcount("048-2.gat", "#Slime3::OnSlimeDeath") < 0) // returns -1 if no monsters + set $@BlueSageSlime3_Spawn, 0; + + // if finished or haven't started yet or spawn already active or spawn already done, do nothing + if ((@slimes == 0) || ($@BlueSageSlime3_Spawn > 0) || (QUEST_BlueSage & $@Q_BlueSageSlime3)) + end; + + set @chance, rand(10); + if (@chance < 3) + goto L_End; + if (@chance < 4) + goto L_BlowUp; + + set $@Slime3VictimID, getcharid(3); + donpcevent "#Slime3::OnSpawn"; + goto L_End; + +L_BlowUp: + percentheal -100, 0; + message strcharinfo(0), "A slime dripped out of a bookshelf right in front of you and stepped onto it. It exploded. That hurt."; + goto L_End; + +L_End: + set @chance, 0; + set @slimes, 0; + end; + +OnSpawn: + if (attachrid($@Slime3VictimID) == 0) + goto L_Clean; + set $@BlueSageSlime3_Spawn, $@BlueSageSlime3_Amount; + areamonster "048-2.gat", 164, 76, 170, 82, "", 1093, $@BlueSageSlime3_Spawn, "#Slime3::OnSlimeDeath"; + end; + +OnSlimeDeath: + set $@BlueSageSlime3_Spawn, $@BlueSageSlime3_Spawn - 1; + if (mobcount("048-2.gat", "#Slime3::OnSlimeDeath") < 0) // returns -1 if no monsters + set $@BlueSageSlime3_Spawn, 0; + + if ($@Slime3VictimID == getcharid(3)) + goto L_Count; + if ($@BlueSageSlime3_Spawn == 0) + goto L_ClearedPoint; + end; + +L_Clean: + set $@Slime3VictimID, 0; + end; + +L_Count: + set @spawnSlime3, @spawnSlime3 + 1; + if ($@BlueSageSlime3_Spawn == 0) + goto L_ClearedPoint; + end; + +L_SlimesEscaped: + set @spawnSlime3, 0; + message strcharinfo(0), "You don't see any slime of that nest anymore. But did you really get all of them?"; + goto L_Clean; + +L_ClearedPoint: + if (attachrid($@Slime3VictimID) == 0) + goto L_Clean; + if (rand($@BlueSageSlime3_Amount - @spawnSlime3) != 0) + goto L_SlimesEscaped; + set QUEST_BlueSage, QUEST_BlueSage | $@Q_BlueSageSlime3; + message strcharinfo(0), "It wasn't easy, but you think that you extinguished this nest."; + + set @slimes, ((QUEST_BlueSage & $@Q_BlueSageSlimes_MASK) >> $@Q_BlueSageSlimes_SHIFT); + if (@slimes == 255) + message strcharinfo(0), "That had been a lot of slimes. You wonder if you're done now."; + set @slimes, 0; + goto L_Clean; +} + + +// blue slimes +048-2.gat,192,86,0|script|#Slime4|32767,2,2,{ + set @slimes, ((QUEST_BlueSage & $@Q_BlueSageSlimes_MASK) >> $@Q_BlueSageSlimes_SHIFT); + set @spawnSlime4, 0; + + if (mobcount("048-2.gat", "#Slime4::OnSlimeDeath") < 0) // returns -1 if no monsters + set $@BlueSageSlime4_Spawn, 0; + + // if finished or haven't started yet or spawn already active or spawn already done, do nothing + if ((@slimes == 0) || ($@BlueSageSlime4_Spawn > 0) || (QUEST_BlueSage & $@Q_BlueSageSlime4)) + end; + + set @chance, rand(10); + if (@chance < 3) + goto L_End; + if (@chance < 4) + goto L_BlowUp; + + set $@Slime4VictimID, getcharid(3); + donpcevent "#Slime4::OnSpawn"; + goto L_End; + +L_BlowUp: + percentheal -100, 0; + message strcharinfo(0), "A slime dripped out of a bookshelf right in front of you and stepped onto it. It exploded. That hurt."; + goto L_End; + +L_End: + set @chance, 0; + set @slimes, 0; + end; + +OnSpawn: + if (attachrid($@Slime4VictimID) == 0) + goto L_Clean; + set $@BlueSageSlime4_Spawn, $@BlueSageSlime4_Amount; + areamonster "048-2.gat", 189, 83, 195, 89, "", 1091, $@BlueSageSlime4_Spawn, "#Slime4::OnSlimeDeath"; + end; + +OnSlimeDeath: + set $@BlueSageSlime4_Spawn, $@BlueSageSlime4_Spawn - 1; + if (mobcount("048-2.gat", "#Slime4::OnSlimeDeath") < 0) // returns -1 if no monsters + set $@BlueSageSlime4_Spawn, 0; + + if ($@Slime4VictimID == getcharid(3)) + goto L_Count; + if ($@BlueSageSlime4_Spawn == 0) + goto L_ClearedPoint; + end; + +L_Clean: + set $@Slime4VictimID, 0; + end; + +L_Count: + set @spawnSlime4, @spawnSlime4 + 1; + if ($@BlueSageSlime4_Spawn == 0) + goto L_ClearedPoint; + end; + +L_SlimesEscaped: + set @spawnSlime4, 0; + message strcharinfo(0), "You don't see any slime of that nest anymore. But did you really get all of them?"; + goto L_Clean; + +L_ClearedPoint: + if (attachrid($@Slime4VictimID) == 0) + goto L_Clean; + if (rand($@BlueSageSlime4_Amount - @spawnSlime4) != 0) + goto L_SlimesEscaped; + set QUEST_BlueSage, QUEST_BlueSage | $@Q_BlueSageSlime4; + message strcharinfo(0), "It wasn't easy, but you think that you extinguished this nest."; + + set @slimes, ((QUEST_BlueSage & $@Q_BlueSageSlimes_MASK) >> $@Q_BlueSageSlimes_SHIFT); + if (@slimes == 255) + message strcharinfo(0), "That had been a lot of slimes. You wonder if you're done now."; + set @slimes, 0; + goto L_Clean; +} + + +// blue slimes +048-2.gat,183,110,0|script|#Slime5|32767,2,2,{ + set @slimes, ((QUEST_BlueSage & $@Q_BlueSageSlimes_MASK) >> $@Q_BlueSageSlimes_SHIFT); + set @spawnSlime5, 0; + + if (mobcount("048-2.gat", "#Slime5::OnSlimeDeath") < 0) // returns -1 if no monsters + set $@BlueSageSlime5_Spawn, 0; + + // if finished or haven't started yet or spawn already active or spawn already done, do nothing + if ((@slimes == 0) || ($@BlueSageSlime5_Spawn > 0) || (QUEST_BlueSage & $@Q_BlueSageSlime5)) + end; + + set @chance, rand(10); + if (@chance < 3) + goto L_End; + if (@chance < 4) + goto L_BlowUp; + + set $@Slime5VictimID, getcharid(3); + donpcevent "#Slime5::OnSpawn"; + goto L_End; + +L_BlowUp: + percentheal -100, 0; + message strcharinfo(0), "A slime dripped out of a bookshelf right in front of you and stepped onto it. It exploded. That hurt."; + goto L_End; + +L_End: + set @chance, 0; + set @slimes, 0; + end; + +OnSpawn: + if (attachrid($@Slime5VictimID) == 0) + goto L_Clean; + set $@BlueSageSlime5_Spawn, $@BlueSageSlime5_Amount; + areamonster "048-2.gat", 180, 107, 186, 113, "", 1091, $@BlueSageSlime5_Spawn, "#Slime5::OnSlimeDeath"; + end; + +OnSlimeDeath: + set $@BlueSageSlime5_Spawn, $@BlueSageSlime5_Spawn - 1; + if (mobcount("048-2.gat", "#Slime5::OnSlimeDeath") < 0) // returns -1 if no monsters + set $@BlueSageSlime5_Spawn, 0; + + if ($@Slime5VictimID == getcharid(3)) + goto L_Count; + if ($@BlueSageSlime5_Spawn == 0) + goto L_ClearedPoint; + end; + +L_Clean: + set $@Slime5VictimID, 0; + end; + +L_Count: + set @spawnSlime5, @spawnSlime5 + 1; + if ($@BlueSageSlime5_Spawn == 0) + goto L_ClearedPoint; + end; + +L_SlimesEscaped: + set @spawnSlime5, 0; + message strcharinfo(0), "You don't see any slime of that nest anymore. But did you really get all of them?"; + goto L_Clean; + +L_ClearedPoint: + if (attachrid($@Slime5VictimID) == 0) + goto L_Clean; + if (rand($@BlueSageSlime5_Amount - @spawnSlime5) != 0) + goto L_SlimesEscaped; + set QUEST_BlueSage, QUEST_BlueSage | $@Q_BlueSageSlime5; + message strcharinfo(0), "It wasn't easy, but you think that you extinguished this nest."; + + set @slimes, ((QUEST_BlueSage & $@Q_BlueSageSlimes_MASK) >> $@Q_BlueSageSlimes_SHIFT); + if (@slimes == 255) + message strcharinfo(0), "That had been a lot of slimes. You wonder if you're done now."; + set @slimes, 0; + goto L_Clean; +} + + +// blue slimes +048-2.gat,164,102,0|script|#Slime6|32767,2,2,{ + set @slimes, ((QUEST_BlueSage & $@Q_BlueSageSlimes_MASK) >> $@Q_BlueSageSlimes_SHIFT); + set @spawnSlime6, 0; + + if (mobcount("048-2.gat", "#Slime6::OnSlimeDeath") < 0) // returns -1 if no monsters + set $@BlueSageSlime6_Spawn, 0; + + // if finished or haven't started yet or spawn already active or spawn already done, do nothing + if ((@slimes == 0) || ($@BlueSageSlime6_Spawn > 0) || (QUEST_BlueSage & $@Q_BlueSageSlime6)) + end; + + set @chance, rand(10); + if (@chance < 3) + goto L_End; + if (@chance < 4) + goto L_BlowUp; + + set $@Slime6VictimID, getcharid(3); + donpcevent "#Slime6::OnSpawn"; + goto L_End; + +L_BlowUp: + percentheal -100, 0; + message strcharinfo(0), "A slime dripped out of a bookshelf right in front of you and stepped onto it. It exploded. That hurt."; + goto L_End; + +L_End: + set @chance, 0; + set @slimes, 0; + end; + +OnSpawn: + if (attachrid($@Slime6VictimID) == 0) + goto L_Clean; + set $@BlueSageSlime6_Spawn, $@BlueSageSlime6_Amount; + areamonster "048-2.gat", 161, 99, 167, 105, "", 1091, $@BlueSageSlime6_Spawn, "#Slime6::OnSlimeDeath"; + end; + +OnSlimeDeath: + set $@BlueSageSlime6_Spawn, $@BlueSageSlime6_Spawn - 1; + if (mobcount("048-2.gat", "#Slime6::OnSlimeDeath") < 0) // returns -1 if no monsters + set $@BlueSageSlime6_Spawn, 0; + + if ($@Slime6VictimID == getcharid(3)) + goto L_Count; + if ($@BlueSageSlime6_Spawn == 0) + goto L_ClearedPoint; + end; + +L_Clean: + set $@Slime6VictimID, 0; + end; + +L_Count: + set @spawnSlime6, @spawnSlime6 + 1; + if ($@BlueSageSlime6_Spawn == 0) + goto L_ClearedPoint; + end; + +L_SlimesEscaped: + set @spawnSlime6, 0; + message strcharinfo(0), "You don't see any slime of that nest anymore. But did you really get all of them?"; + goto L_Clean; + +L_ClearedPoint: + if (attachrid($@Slime6VictimID) == 0) + goto L_Clean; + if (rand($@BlueSageSlime6_Amount - @spawnSlime6) != 0) + goto L_SlimesEscaped; + set QUEST_BlueSage, QUEST_BlueSage | $@Q_BlueSageSlime6; + message strcharinfo(0), "It wasn't easy, but you think that you extinguished this nest."; + + set @slimes, ((QUEST_BlueSage & $@Q_BlueSageSlimes_MASK) >> $@Q_BlueSageSlimes_SHIFT); + if (@slimes == 255) + message strcharinfo(0), "That had been a lot of slimes. You wonder if you're done now."; + set @slimes, 0; + goto L_Clean; +} -- cgit v1.2.3-60-g2f50