[LuA Script] Sarovar

[Myerz]

http://i378.photobucket.com/albums/oo226/InfernosInfinite/Myerz-Logo.png

function Sarovar_Chain(pUnit, Event)
Chaintarget=pUnit:GetMainTank();
pUnit:CastSpellOnTarget(37089, Chaintarget)
end

function Sarovar_Felfireball(pUnit, Event)
felfiretarget=pUnit:GetMainTank();
pUnit:StopMovement(3000)
pUnit:FullCastSpellOnTarget(39058, felfiretarget)
end

function Sarovar_SpawnPhases(pUnit, Event)
pUnit:RegisterEvent("Sarovar_85", 5000, 1)
pUnit:RegisterEvent("Sarovar_70", 5000, 1)
pUnit:RegisterEvent("Sarovar_55", 5000, 1)
pUnit:RegisterEvent("Sarovar_40", 5000, 1)
pUnit:RegisterEvent("Sarovar_25", 5000, 1)
end

--85
function Sarovar_85(pUnit, Event)
if pUnit:GetHealthPct() <= 85 and Done_85 ~= 1 then
local x = pUnit:GetX()
local y = pUnit:GetY()
local z = pUnit:GetZ()
local o = pUnit:GetO()
pUnit:SpawnCreature(70001, x+4, y, z, o, 14, 0)
Done_85 = 1
else
end
end

--70
function Sarovar_70(pUnit, Event)
if pUnit:GetHealthPct() <= 70 and Done_70 ~= 1 then
local x = pUnit:GetX()
local y = pUnit:GetY()
local z = pUnit:GetZ()
local o = pUnit:GetO()
pUnit:SpawnCreature(70001, x+4, y, z, o, 14, 0)
pUnit:SpawnCreature(70001, x-4, y, z, o, 14, 0)
Done_70 = 1
end
end

--55
function Sarovar_55(pUnit, Event)
if pUnit:GetHealthPct() <= 55 and Done_55 ~= 1 then
local x = pUnit:GetX()
local y = pUnit:GetY()
local z = pUnit:GetZ()
local o = pUnit:GetO()
pUnit:SpawnCreature(70001, x+4, y+4, z, o, 14, 0)
pUnit:SpawnCreature(70001, x-4, y, z, o, 14, 0)
pUnit:SpawnCreature(70001, x+4, y, z, o, 14, 0)
Done_55 = 1
end
end

--40
function Sarovar_40(pUnit, Event)
if pUnit:GetHealthPct() <= 40 and Done_40 ~= 1 then
local x = pUnit:GetX()
local y = pUnit:GetY()
local z = pUnit:GetZ()
local o = pUnit:GetO()
pUnit:SpawnCreature(70001, x+4, y-4, z, o, 14, 0)
pUnit:SpawnCreature(70001, x-4, y+4, z, o, 14, 0)
pUnit:SpawnCreature(70001, x+4, y, z, o, 14, 0)
pUnit:SpawnCreature(70001, x-4, y, z, o, 14, 0)
Done_40 = 1
end
end

--25
function Sarovar_25(pUnit, Event)
if pUnit:GetHealthPct() <= 25 and Done_25 ~= 1 then
local x = pUnit:GetX()
local y = pUnit:GetY()
local z = pUnit:GetZ()
local o = pUnit:GetO()
pUnit:SpawnCreature(70001, x+4, y-4, z, o, 14, 0)
pUnit:SpawnCreature(70001, x+4, y, z, o, 14, 0)
pUnit:SpawnCreature(70001, x-4, y+4, z, o, 14, 0)
pUnit:SpawnCreature(70001, x-4, y, z, o, 14, 0)
Done_25 = 1
end
end

function Sarovar_Felinfuse(pUnit, Event)
if pUnit:GetHealthPct() <= 10 then
pUnit:RemoveEvents()
pUnit:CastSpell(44505)
end
end

function Sarovar_Combat(pUnit, Event)
pUnit:RegisterEvent("Sarovar_Chain", 7400, 0)
pUnit:RegisterEvent("Sarovar_SpawnPhases", 1000, 0)
pUnit:RegisterEvent("Sarovar_Felfireball", 24000, 0)
pUnit:RegisterEvent("Sarovar_Felinfuse", 7000, 0)
end

function Sarovar_LeaveCombat(pUnit, Event)
pUnit:RemoveEvents()
end

function Sarovar_Died(pUnit, Event)
pUnit:RemoveEvents()
end

RegisterUnitEvent(70000, 1, "Sarovar_Combat")
RegisterUnitEvent(70000, 2, "Sarovar_LeaveCombat")
RegisterUnitEvent(70000, 4, "Sarovar_Died")