--[[ Script Name : SpawnScripts/PeatBog/questshipment1.lua Script Author : Shatou Script Date : 2020.01.08 09:01:53 Script Purpose : : --]] local ON_THE_MOVE_QUEST_ID = 510 local A_GNOLL_MACHINIST_ID = 1980065 local A_GNOLL_GUARD_ID = 1980064 local A_MACHINIST_ASSISTANT_ID = 1980066 function spawn(NPC) if GetSpawnLocationID(NPC)== 456189 then SetRequiredQuest(NPC, ON_THE_MOVE_QUEST_ID, 1, 1,0,0) elseif GetSpawnLocationID(NPC)== 456191 then SetRequiredQuest(NPC, ON_THE_MOVE_QUEST_ID, 2, 1,0,0) elseif GetSpawnLocationID(NPC)== 1587455 then SetRequiredQuest(NPC, ON_THE_MOVE_QUEST_ID, 3, 1,0,0) end end function hailed(NPC, Spawn) FaceTarget(NPC, Spawn) end function respawn(NPC) end function casted_on(NPC, Spawn, Message) PlayFlavor(NPC,"","","result_explosion_fireworks",0,0,Spawn) PlaySound(NPC,"sounds/liveevents/samhain2005/samhain05_explosion001.wav",GetX(NPC), GetY(NPC), GetZ(NPC),Spawn) AddTimer(NPC,800,"QuestUpdate",1,Spawn) if HasQuest(Spawn, ON_THE_MOVE_QUEST_ID) then if GetQuestStep(Spawn, ON_THE_MOVE_QUEST_ID) == 1 then if Message == "Place Explosives" then if GetSpawnLocationID(NPC)== 456189 then SetStepComplete(Spawn, ON_THE_MOVE_QUEST_ID, 1) elseif GetSpawnLocationID(NPC)== 456191 then SetStepComplete(Spawn, ON_THE_MOVE_QUEST_ID, 2) elseif GetSpawnLocationID(NPC)== 1587455 then SetStepComplete(Spawn, ON_THE_MOVE_QUEST_ID, 3) end end elseif GetQuestStep(Spawn, ON_THE_MOVE_QUEST_ID) == 2 then if Message == "Place Explosives" then if GetSpawnLocationID(NPC)== 456189 then SetStepComplete(Spawn, ON_THE_MOVE_QUEST_ID, 1) elseif GetSpawnLocationID(NPC)== 456191 then SetStepComplete(Spawn, ON_THE_MOVE_QUEST_ID, 2) elseif GetSpawnLocationID(NPC)== 1587455 then SetStepComplete(Spawn, ON_THE_MOVE_QUEST_ID, 3) end end elseif GetQuestStep(Spawn, ON_THE_MOVE_QUEST_ID) == 3 then if Message == "Place Explosives" then if GetSpawnLocationID(NPC)== 456189 then SetStepComplete(Spawn, ON_THE_MOVE_QUEST_ID, 1) elseif GetSpawnLocationID(NPC)== 456191 then SetStepComplete(Spawn, ON_THE_MOVE_QUEST_ID, 2) elseif GetSpawnLocationID(NPC)== 1587455 then SetStepComplete(Spawn, ON_THE_MOVE_QUEST_ID, 3) end end end end function QuestUpdate(NPC, Spawn, Message) local new_spawn_1 = SpawnMob(GetZone(Spawn), A_GNOLL_MACHINIST_ID, false, GetX(NPC) + 2.5, GetY(NPC), GetZ(NPC) - 3, 0) local new_spawn_2 = SpawnMob(GetZone(Spawn), A_GNOLL_GUARD_ID, false, GetX(NPC) + 2.5, GetY(NPC), GetZ(NPC) + 2.5, 0) local new_spawn_3 = SpawnMob(GetZone(Spawn), A_MACHINIST_ASSISTANT_ID, false, GetX(NPC) - 2.5, GetY(NPC), GetZ(NPC) + 2.5, 0) AddHate(Spawn, new_spawn_1, 100) AddHate(Spawn, new_spawn_2, 100) AddHate(Spawn, new_spawn_3, 100) end end