--When players aggro--
function Angrond_OnCombat(pUnit, Event)
pUnit:RegisterEvent("Angrond_Final", 2000, 0)
pUnit:SendChatMessage(14, 0, "I don't know who you are, but I won't allow you to hinder our efforts!")
end

--When players run or, or the entire group wipes die--
function Angrond_OnLeaveCombat(pUnit, Event)
pUnit:SendChatMessage(14, 0, "The shadows shall consume all!")
pUnit:RemoveEvents()
end

--When he kills a player--
function Angrond_OnKilledTarget(pUnit, Event)
pUnit:SendChatMessage(14, 0, "Another sent to the shadows; I hope you won't mind if I feed upon your soul!")
pUnit:CastSpell(36300)
end

--When he himself dies--
function Angrond_OnDeath(pUnit, Event)
pUnit:SendChatMessage(14, 0, "I go now to the realm of shadows...forgive me master.")
pUnit:RemoveEvents()
end

--When he's half way dead--
function Angrond_half(pUnit, event, player)
if pUnit:GetHealthPct() == 50 then
pUnit:RegisterEvent("Angrond_Half", 1000, 1)
Unit:SendChatMessage(14, 0, "You're doing well for folls!"
end
end


--When he's at 20% Health--
function Angrond_Final(pUnit, event, player)
if pUnit:GetHealthPct() == 20 then
pUnit:SendChatMessage(14, 0, "This is but a taste of the shadows to come!")
pUnit:RegisterEvent("Angrond_Final", 1000, 0)
pUnit:CastSpellOnTarget(686, pUnit:GetMainTank())
end
end



RegisterUnitEvent(88803, 1, "Angrond_OnCombat")
RegisterUnitEvent(88803, 2, "Angrond_OnLeaveCombat")
RegisterUnitEvent(88803, 3, "Angrond_OnKilledTarget")
RegisterUnitEvent(88803, 4, "Agrond_OnDeath")