function Boss_CheckA(Unit)
if Unit:GetHealthPct() < 80 then
Unit:CastSpell(23461)
Unit:SendChatMessage(12, 0, "Do You Think you can Beat me so Easily!)
end
end
function Boss_CheckB(Unit)
if Unit:GetHealthPct() < 60 then
Unit:CastSpell(38445)
Unit:SendChatMessage(12, 0, "Burn in HELL!")
end
end
function Boss_CheckC(Unit)
if Unit:GetHealthPct() < 40 then
Unit:CastSpell(36921)
Unit:SendChatMessage(12, 0, "Feast on my FIRE")
end
end
function Boss_CheckD(Unit)
if Unit:GetHealthPct() < 20 then
Unit:CastSpell(2997

Unit:SendChatMessage(12, 0, "You where NEVER PREPARED for my PYRO!!!")
end
end
function Boss_CheckE(Unit)
if Unit:GetHealthPct() < 6 then
Unit:CastSpell(19135)
Unit:SendChatMessage(12, 0, "Fine! You Brought the Pain!")
end
end
function Boss_Meteor(Unit)
Unit:CastSpell(41276)
Unit:SendChatMessage(12, 0, "SHOWER IN THIS")
end
function Boss_Burst(Unit)
Unit:CastSpell()
Unit:SendChatMessage(12, 0, "BURN IN AGONY")
end
function Boss_OnCombat(Unit, event)
Unit:SendChatMessage(12, 0, "You Have no Idea..")
Unit:RegisterEvent("Boss_CheckA",5000, 0)
Unit:RegisterEvent("Boss_CheckB",5000, 0)
Unit:RegisterEvent("Boss_CheckC",5000, 0)
Unit:RegisterEvent("Boss_CheckD",5000, 0)
Unit:RegisterEvent("Boss_CheckE",5000, 0)
Unit:RegisterEvent("Boss_Meteor",20000, 0)
Unit:RegisterEvent("Boss_Burst",10000, 0)
end
function Boss_OnLeaveCombat(Unit)
Unit:SendChatMessage(12, 0, "Weaklings You will never Defeat me")
Unit:RemoveEvents()
end
function Boss_OnKilledTarget(Unit)
Unit:SendChatMessage(12, 0, "Feel the Pain of my fire!")
Unit:RemoveEvents()
end
function Boss_OnDied(Unit)
Unit:SendChatMessage(12, 0, "My Fire Will Never Perish!")
Unit:RemoveEvents()
end
RegisterUnitEvent(80000, 1, "Boss_OnCombat")
RegisterUnitEvent(80000, 2, "Boss_OnLeaveCombat")
RegisterUnitEvent(80000, 3, "Boss_OnKilledTarget")
RegisterUnitEvent(80000, 4, "Boss_OnDied")