Code:
function Dwarfking_OnCombat(Unit, Event)
Unit:SendChatMessage(12, 0, "You Think You Can Defeat The Might Of The Dwarf King Prepare To Be Distroyed")
Unit:RegisterEvent("DwarfKing_Pain", 47000, 0)
Unit:RegisterEvent("DwarfKing_Phase1Runic",1000,0)
Unit:RegisterEvent("DwarfKing_Phase2Fire",1000,0)
Unit:RegisterEvent("DwarfKing_Phase3Shadow",1000,0)
end
function DwarfKing_Pain(pUnit, Event)
pUnit:FullCastSpellOnTarget(25367, pUnit:GetRandomPlayer(4))
end
function DwarfKing_DeathAndDecay(pUnit, Event)
pUnit:CastSpell(49938, pUnit:GetRandomPlayer(7))
end
function DwarfKing_HowlingBlast(pUnit, Event)
pUnit:FullCastSpellOnTarget(51411, pUnit:GetMainTank())
end
function DwarfKing_FireBarrage(pUnit, Event)
pUnit:FullCastSpellOnTarget(29958, pUnit:GetRandomPlayer(7))
end
function DwarfKing_RainOfFire(pUnit, Event)
pUnit:FullCastSpellOnTarget(43440, pUnit:GetRandomPlayer(7))
end
function DwarfKing_DevouringPlague(pUnit, Event)
pUnit:FullCastSpellOnTarget(48300, pUnit:GetRandomPlayer(7))
end
function DwarfKing_MindBlast(pUnit, Event)
pUnit:FullCastSpellOnTarget(48127, pUnit:GetMainTank())
end
function DwarfKing_Phase1Runic(pUnit, Event)
if pUnit:GetHealthPct() < 80 then
pUnit:RemoveEvents();
pUnit:SendChatMessage(12, 0, "Feel The Power Of Runes")
pUnit:FullCastSpell(0)
pUnit:RegisterEvent("DwarfKing_DeathAndDecay", 20000, 0)
pUnit:RegisterEvent("DwarfKing_HowlingBlast", 8000, 0)
end
end
function DwarfKing_Phase2Fire(pUnit, Event)
if pUnit:GetHealthPct() < 45 then
pUnit:RemoveEvents();
pUnit:SendChatMessage(12, 0, "Let The Fires Of Hell Burn Your Soul")
pUnit:FullCastSpell(0)
pUnit:RegisterEvent("DwarfKing_FireBarrage", 8000, 0)
pUnit:RegisterEvent("DwarfKing_RainOfFire", 10000, 0)
end
end
function DwarfKing_Phase3Shadow(pUnit, Event)
if pUnit:GetHealthPct() < 15 then
pUnit:RemoveEvents();
pUnit:SendChatMessage(12, 0, "It's Time For Darkness To Take Over Your Soul")
pUnit:FullCastSpell(0)
pUnit:RegisterEvent("DwarfKing_DevouringPlague", 15000, 0)
pUnit:RegisterEvent("DwarfKing_MindBlast", 8000, 0)
pUnit:RegisterEvent("DwarfKing_MindBlast", 8000, 0)
end
end
function dwarfking_OnLeaveCombat(Unit, Event)
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "Ha Ha Ha, Cowards All Cowards You Could Never Defeat Me.")
end
function Dwarfking_OnDied(pUnit, Event)
pUnit:RemoveEvents()
pUnit:SendChatMessage(12, 0, "What It Cannot Be, Me, Defeated by These, These.... Invaders")
pUnit:SendChatMessage(12, 0, "My Death Will Not Go Unavenged....")
end
function Dwarfking_OnKilledTarget(Unit, Event)
Unit:SendChatMessage(12, 0, "What A Wast Of My Time They Could Of Never Defeated The Might Of The Dwarf King")
end
RegisterUnitEvent(69999, 1, "Dwarfking_OnCombat")
RegisterUnitEvent(69999, 2, "dwarfking_OnLeaveCombat")
RegisterUnitEvent(69999, 3, "Dwarfking_OnKilledTarget")
RegisterUnitEvent(69999, 4, "Dwarfking_OnDied")
oh and each time i post errors on here i learn a little bit more so again thanx to everyone who has helped so far