EQ2EMu/server/SpawnScripts/SourceEvil/VithLTar.lua

--[[
	Script Name	:	SpawnScripts/SourceEvil/VithLTar.lua
	Script Purpose	:	Make Vith attackable and spawns adds
	Script Author	:	Jabantiz , Edited Lemmeron fixed Vith not being attack-able and pet not dying
	Script Date	:	9/10/2016 , 17/8/2020
	Script Notes	:	BeginAttack() is called from a timer function set in eviltotem.lua
--]]

local Priest1ID = 433225
local Priest2ID = 433226
local PetID = 2540008
local VithID = 2540005

function spawn(NPC)
--	SetPlayerProximityFunction(NPC, 5, "InRange")
end

function respawn(NPC)
	spawn(NPC)
end

function BeginAttack(NPC, Spawn)
	local zone = GetZone(NPC)
	local Priest1 = SpawnByLocationID(zone, Priest1ID)
	local Priest2 = SpawnByLocationID(zone, Priest2ID)
		
	SpawnSet(NPC, "targetable", 1)
	SpawnSet(NPC, "visual_state", 0)
	
	PlayFlavor(NPC, "", "Now rot like your friends!", "", 1689589577, 4560189)
	
	if Priest1 ~= nil then
		Attack(Priest1, Spawn)
	end
	
	if Priest2 ~= nil then
		Attack(Priest2, Spawn)
	end
	
    SpawnSet(NPC, "faction", 1)
    SpawnSet(NPC, "show_level", 1)
    SpawnSet(NPC, "attackable", 1)
    Attack(NPC, Spawn)
	
	local Pet = GetSpawn(NPC, PetID)
	if Pet ~= nil then
		SpawnSet(Pet, "faction", 1)
                SpawnSet(Pet, "attackable", 1)
		Attack(Pet, Spawn)
	end
end

function death(NPC, Spawn)
        local Vithb = GetSpawn(NPC, VithID)
	local Petb = GetSpawn(Spawn, PetID)
        if Petb ~= nil then
            KillSpawn(Petb, Spawn)  
        end                       
end

--function InRange(NPC)
--    Say(NPC, "Remember any of these?  Maybe they were your friends."
--end