Code:
local BlackWarKodo = 14333
local BlightedElk = 26616
function Dennis_OnCombat(pUnit, Event)
pUnit:SendChatMessage(14, 0, "Bijf van me af!")
pUnit:RegisterEvent("Dennis_SummonAdds", math.random(40000, 42000), 0)
pUnit:RegisterEvent("Dennis_PoisonNova", math.random(15000, 17000), 0)
pUnit:RegisterEvent("Dennis_PowerfulBite", math.random(22000, 24000), 0)
pUnit:RegisterEvent("Dennis_VenomBolt", math.random(29000, 34000), 0)
end
function Dennis_OnLeaveCombat(pUnit, Event)
pUnit:RemoveEvents()
end
function Dennis_OnKillTarget(pUnit, Event)
local Text = math.random(1, 4)
if Text == 1 then
pUnit:SendChatMessage(14, 0, "Auw, ik ben door mijn enkel gegaan...")
elseif Text == 2 then
pUnit:SendChatMessage(14, 0, "Ben je al bang?")
elseif Text == 3 then
pUnit:SendChatMessage(14, 0, "Whahaha sukkel!")
end
end
function Dennis_OnDeath(pUnit, Event)
pUnit:RemoveEvents()
pUnit:SendChatMessage(14, 0, "Kutje, je was toch sterker als ik had gedacht.")
end
RegisterUnitEvent(555502, 1, "Dennis_OnCombat")
RegisterUnitEvent(555502, 2, "Dennis_OnLeaveCombat")
RegisterUnitEvent(555502, 3, "Dennis_OnKillTarget")
RegisterUnitEvent(555502, 4, "Dennis_OnDeath")
function Dennis_PhaseTwo(pUnit, Event)
if pUnit:GetHealthPct() <= 30 then
pUnit:RegisterEvent("Dennis_SummonAdds", math.random(40000, 42000), 0)
pUnit:RegisterEvent("Dennis_PoisonNova", math.random(15000, 17000), 0)
pUnit:RegisterEvent("Dennis_PowerfulBite", math.random(22000, 24000), 0)
pUnit:RegisterEvent("Dennis_VenomBolt", math.random(29000, 34000), 0)
end
end
function Dennis_SummonAdds(pUnit, Event)
pUnit:SendChatMessage(14, 0, "Schatjes! Kom me ff helpen, ik kan het niet alleen.")
local x,y,z,o = pUnit:GetX(),pUnit:GetY(),pUnit:GetZ(),pUnit:GetO()
pUnit:SpawnCreature(BlackWarKodo, x, y, z, o, 14, 0)
pUnit:SpawnCreature(BlackWarKodo, x, y, z, o, 14, 0)
pUnit:SpawnCreature(BlightedElk, x, y, z, o, 14, 0)
pUnit:SpawnCreature(BlightedElk, x, y, z, o, 14, 0)
end
function Dennis_PoisonNova(pUnit, Event)
pUnit:FullCastSpell(53425)
end
function Dennis_PowerfulBite(pUnit, Event)
pUnit:FullCastSpellOnTarget(28883, pUnit:GetMainTank())
end
function Dennis_VenomBolt(pUnit, Event)
pUnit:FullCastSpellOnTarget(45018, pUnit:GetMainTank())
end