function phase_1(pUnit, Event)
if pUnit:GetHealthPct() < 70 then
pUnit:RemoveEvents();
pUnit:FullCastSpell(36853)
pUnit:FullCastSpell(19983)
pUnit:FullCastSpell(70123)
pUnit:FullCastSpell(19983)
pUnit:FullCastSpell(19983)
pUnit:FullCastSpell(36853)
pUnit:FullCastSpell(16033)
pUnit:FullCastSpell(69649)
pUnit:FullCastSpell(16033)
pUnit:FullCastSpell(70123)
pUnit:FullCastSpell(71077)
pUnit:FullCastSpell(16033)
pUnit:FullCastSpell(69649)
pUnit:RegisterEvent("phase_2",1000, 0)
end

function phase_2(pUnit, event)
if pUnit:GetHealthPct() <50 then
pUnit:FullCastSpell(70126)
pUnit:FullCastSpell(70157)
pUnit:FullCastSpell(71053)
pUnit:RegisterEvent("phase_1",1000, 0)
end

function phase_1(pUnit, event)
if pUnit:GetHealthPct() < 70 then
pUnit:RemoveEvents();
pUnit:FullCastSpell(36853)
pUnit:FullCastSpell(19983)
pUnit:FullCastSpell(70123)
pUnit:FullCastSpell(19983)
pUnit:FullCastSpell(19983)
pUnit:FullCastSpell(36853)
pUnit:FullCastSpell(16033)
pUnit:FullCastSpell(69649)
pUnit:FullCastSpell(16033)
pUnit:FullCastSpell(70123)
pUnit:FullCastSpell(71077)
pUnit:FullCastSpell(16033)
pUnit:FullCastSpell(69649)
pUnit:RegisterEvent("phase_3",1000, 0)
end

function phase_3(pUnit, event)
if pUnit:GetHealthPct() <50 then
pUnit:RemoveEvents();
pUnit:FullCastSpell(70107)
pUnit:SendChatMessage(12, 0 , "Obey my orders, mortals!")
pUnit:FullCastSpell(70123)
pUnit:FullCastSpell(70107)
pUnit:FullCastSpell(70123)
pUnit:FullCastSpell(70126)
pUnit:SendChatMe ssage(12, 0 , "Glory to the Lich King")
pUnit:FullCastSpell(70157)
pUnit:FullCastSpell(71053)
pUnit:FullCastSpell(70107)
pUnit:FullCastSpell(70123)
pUnit:SendChatMessag e(12, 0 , "You face Sindragosa fools!")
pUnit:FullCastSpell(70107)
pUnit:FullCastSpell(70123)
pUnit:FullCastSpell(70126)
pUnit:FullCastSpell(70157)
pUnit:FullCastSpel l(71053)
pUnit:FullCastSpell(70107)
pUnit:SendChatMessage(12, 0 , "Obey my orders, mortals!")
pUnit:FullCastSpell(70123)
pUnit:FullCastSpell(70107)
pUnit:FullCastSpell(70123)
pUnit:FullCastSpell(70126)
pUnit:FullCastSp ell(70157)
pUnit:FullCastSpell(71053)
pUnit:SendChatMessage(12, 0 , "Beat them my Minions!")
pUnit:RegisterEvent("phase_4",1000, 0)
end

function phase_4(pUnit, Event)
if pUnit:GetHealthPct() < 50 then
pUnit:RemoveEvents();
pUnit:FullCastSpell(70107)
pUnit:FullCastSpell(70107)

x = pUnit:GetX()
y = pUnit:GetY()
z = pUnit:GetZ()
o = pUnit:GetO()
pUnit:SpawnGameObject(177241, x, y, z, o, 600000)
end
x = pUnit:GetX()
y = pUnit:GetY()
z = pUnit:GetZ()
o = pUnit:GetO()
pUnit:SpawnGameObject(177241, x, y, z, o, 600000)
pUnit:SpawnCreature(500838, x, y, z, o, 360000);
pUnit:SpawnCreature(500838, x, y, z, o, 360000);
pUnit:SpawnCreature(500838, x, y, z, o, 360000);
pUnit:SpawnCreature(500838, x, y, z, o, 360000);
pUnit:SpawnCreature(500838, x, y, z, o, 360000);

RegisterUnitEvent (500838, 6, "BlackfreezeVoid_OnSpawn")
pUnit:SendChatMessage(12, 0 , "My master's will.")
pUnit:CastSpell(3130)
pUnit:CastSpell(3130)
pUnit:CastSpell(3130)
pUnit:CastSpell(3130)
pUnit:SendChatMessage(12, 0 , "Prepare for Freezing Experience.")
pUnit:RemoveEvents(phase_2)
pUnit:RegisterEvent("phase_3",1000, 0)
pUnit:RegisterUnitEvent (500838, 6, "FrezingOnSpawn")
end

function FrezingOnSpawn (Unit, Event)
Unitespawn (60000, 0)
RegisterUnitEvent(213378, 1, "boss_start")
end

function Boss_OnDied(pUnit)
pUnit:SendChatMessage("Master! Stop them!")
pUnit:RemoveEvents()
g = pUnit:GetTarget()
g:AddItem(50360, 1)
g:AddItem(50421, 1)
g:AddItem(50423, 1)
g:AddItem(50424, 1)
g:AddItem(50361, 1)
g:AddItem(51815, 1)
g:AddItem(51819, 1)
g:AddItem(51818, 1)

if pUnit:GetHealthPct() < 0 then
pUnit:SendChatMessage("Master! Stop them!")
pUnit:RemoveEvents()
end
end
end

There you go.