eq2emu-content/SpawnScripts/FermentedGrape/apiratecutter.lua
2024-10-26 11:37:28 +00:00

89 lines
3 KiB
Lua
Executable file

--[[
Script Name : SpawnScripts/FermentedGrape/apiratecutter.lua
Script Author : Dorbin
Script Date : 2022.12.04 05:12:23
Script Purpose :
:
--]]
require "SpawnScripts/Generic/CombatModule"
function spawn(NPC, Spawn)
combatModule(NPC, Spawn)
AddTimer(NPC,MakeRandomInt(2000,5000),"EmoteLoop")
end
function EmoteLoop(NPC)
if not IsInCombat(NPC) then
SpawnSet(NPC,"mood_state",11852)
choice = MakeRandomInt(1,5)
if choice ==1 then
PlayFlavor(NPC,"","","threaten",0,0)
elseif choice ==2 then
PlayFlavor(NPC,"","","taunt",0,0)
elseif choice ==3 then
PlayFlavor(NPC,"","","neener",0,0)
elseif choice ==4 then
PlayFlavor(NPC,"","","swear",0,0)
elseif choice ==5 then
PlayFlavor(NPC,"","","violin",0,0)
end
end
AddTimer(NPC,5000,"EmoteLoop")
end
function respawn(NPC)
spawn(NPC)
end
function aggro(NPC,Spawn)
PlayFlavor(NPC, "voiceover/english/halfelf_eco_evil_1/ft/halfelf/halfelf_eco_evil_1_hail_gm_7344f21b.mp3", "I'm in the mood to kick someone in the teeth.", "kick", 620861878, 995351111, Spawn, 0)
local zone = GetZone(NPC)
local Pirate1 = GetSpawnByLocationID(zone, 133781037) --FIRSTMATE
local Pirate2 = GetSpawnByLocationID(zone, 133781036) --CUTTER
local Pirate3 = GetSpawnByLocationID(zone, 133781038)
local Pirate4 = GetSpawnByLocationID(zone, 133781039)
local Pirate5 = GetSpawnByLocationID(zone, 133781035)
local Pirate6 = GetSpawnByLocationID(zone, 133781034)
local Captain = GetSpawnByLocationID(zone, 133781033)
Attack(Pirate1,Spawn)
Attack(Pirate2,Spawn)
Attack(Pirate3,Spawn)
Attack(Pirate4,Spawn)
Attack(Pirate5,Spawn)
Attack(Pirate6,Spawn)
Attack(Captain,Spawn)
end
function death(NPC,Spawn)
local zone = GetZone(NPC)
local Pirate1 = GetSpawnByLocationID(zone, 133781037) --FIRSTMATE
local Pirate2 = GetSpawnByLocationID(zone, 133781036) --CUTTER
local Pirate3 = GetSpawnByLocationID(zone, 133781038)
local Pirate4 = GetSpawnByLocationID(zone, 133781039)
local Pirate5 = GetSpawnByLocationID(zone, 133781035)
local Pirate6 = GetSpawnByLocationID(zone, 133781034)
local Captain = GetSpawnByLocationID(zone, 133781033)
local Bartender = GetSpawnByLocationID(zone, 133781031)
local Bard = GetSpawnByLocationID(zone, 133781032)
local Bobick = GetSpawnByLocationID(zone, 133781027)
if not IsAlive(Pirate1) and not IsAlive(Pirate2) and not IsAlive(Pirate3) and not IsAlive(Pirate4) and not IsAlive(Pirate5) and not IsAlive(Pirate6) and not IsAlive(Captain) then
if HasQuest(Spawn,5784) then
SetStepComplete(Spawn,5784,1)
end
SpawnSet(Bartender,"name","a relieved bartender")
SpawnSet(Bartender,"mood_state",0)
SpawnSet(Bartender,"action_state",11214)
SpawnSet(Bard,"name","a thankful bard")
SpawnSet(Bard,"mood_state",11854)
SpawnSet(Bard,"action_state",0)
SpawnSet(Bobick,"action_state",11422)
SpawnSet(Bobick,"name","a satisfied patron")
end
end