Lord Cyran

Heres another Boss fight i made..
At first he starts out ok Some melee strikes a few dots nothing too too heavy..at 72% it all changes
He casts a buff that makes him immune to all forms of damage except holy. Holy damage does 500% more damage. He also periodically casts Lethal strike on a nearby opponent which does about 8k damage.
Aside from casting 2 different types of fear in phase 3 he does a DD to nearby player for about 1k which also does AOE damage..
Phase 4 Every so often while hes under 20% he will Cast a spell on a nearby player that after 30 seconds causes them to take 5k damage.
He will also at some points create a portal to summon a demon or two
Npc id is 777884

let me know what you think and ill release some others..

Code:

---

function LordCyran_EnterCombat (pUnit, event)
        pUnit:SendChatMessage(14, 0, "Deviants...")
        pUnit:RegisterEvent("LordCyran_Fallout", 1000, 1)
        pUnit:RegisterEvent("LordCyran_Doomthrust", 24000, 0)
        pUnit:RegisterEvent("LordCyran_Armorslice", 20000, 0)
        pUnit:RegisterEvent("LordCyran_Phase2", 1000, 0)
end
function LordCyran_Fallout (pUnit, event)
        pUnit:FullCastSpellOnTarget(31472, pUnit:GetClosestPlayer())
end
function LordCyran_Doomthrust (pUnit, event)
        pUnit:FullCastSpellOnTarget(30744, pUnit:GetMainTank())
end
function LordCyran_Armorslice (pUnit, event)
        pUnit:FullCastSpellOnTarget(15656, pUnit:GetMainTank())
end
function LordCyran_Phase2 (pUnit, event)
      if pUnit:GetHealthPct() < 72 then
        pUnit:RemoveEvents()       
        pUnit:SendChatMessage(14, 0, "Bow before my Greatness!Proclaim yourselves among my faithful...and I may spare you")
        pUnit:RegisterEvent("LordCyran_Demoncall", 10000, 0)
        pUnit:RegisterEvent("LordCyran_Lethal", 15000, 0)
        pUnit:RegisterEvent("LordCyran_Valiant", 17000, 0)
        pUnit:RegisterEvent("LordCyran_Phase3", 1000, 0)
  end
end
function LordCyran_Demoncall (pUnit, event)
        pUnit:FullCastSpellOnTarget(28383, pUnit:GetMainTank())
end
function LordCyran_Lethal (pUnit, event)
        pUnit:FullCastSpellOnTarget(28308, pUnit:GetMainTank())
end
function LordCyran_Valiant (pUnit, event)
        pUnit:CastSpell(46287)
end
function LordCyran_Phase3 (pUnit, event)
      if pUnit:GetHealthPct() < 49 then
        pUnit:RemoveEvents()       
        pUnit:RegisterEvent("LordCyran_Demoralize", 20000, 0)
        pUnit:RegisterEvent("LordCyran_Impale", 50000, 0)
        pUnit:RegisterEvent("LordCyran_Terror", 35000, 0)
        pUnit:RegisterEvent("LordCyran_Phase4", 1000, 0)
  end
end
function LordCyran_Demoralize (pUnit, event)
        pUnit:CastSpell(27780)
end
function LordCyran_Impale (pUnit, event)
        pUnit:CastSpell(19781)
end
function LordCyran_Terror (pUnit, event)
        pUnit:FullCastSpellOnTarget(36950, pUnit:GetRandomPlayer(0))
end
function LordCyran_Phase4 (pUnit, event)
      if pUnit:GetHealthPct() < 20 then
        pUnit:RemoveEvents()
        pUnit:SendChatMessage(14, 0, "So...You have chosen...Death!")
        pUnit:CastSpell(39046)
  end
end
function LordCyran_LeaveCombat (pUnit, event)
        pUnit:RemoveEvents()
end
function LordCyran_Die (pUnit, event)
        pUnit:RemoveEvents()
        pUnit:SendChatMessage(14, 0, "Pity you cannot understand the reality of your situation....")   
end
RegisterUnitEvent(777884, 1, "LordCyran_EnterCombat")
RegisterUnitEvent(777884, 2, "LordCyran_LeaveCombat")
RegisterUnitEvent(777884, 4, "LordCyran_Die")

---