Hello, these are 2 scripts I put together some time ago and they never got released. I am pretty sure they work but I never got to test them out.
The Arthas/Lich King fight is a custom fight, but the Ke'thuzad figh it almost identical to the real Naxx fight. Hope you enjoy
Arthas
Code:
function Arthas_OnCombat(Unit, Event)
Unit:SendChatMessage(12, 0, "Foolish mortal, you dare to challenge the great? You will regret this day!!")
Unit:RegisterEvent("Arthas_SolarStrike", 60000, 5)
Unit:RegisterEvent("Arthas_Grow", 15000, 20)
Unit:RegisterEvent("Arthas_Icebolt", 45000, 50)
end
function Arthas_OnKilledTarget(Unit, Event)
Unit:SendChatMessage(12, 0, "Muahaha! This is what you get for challenging the Lich King!")
end
function Arthas_SolarStrike(pUnit, Event)
pUnit:FullCastSpellOnTarget(35189, pUnit:GetMainTank())
end
function Arthas_Grow(pUnit, Event)
pUnit:CastSpell(35180)
end
function Arthas_Icebolt(pUnit, Event)
pUnit:FullCastSpellOnTarget(31249, pUnit:GetRandomPlayer(0))
end
function Arthas_Spawn(pUnit, Event)
if pUnit:GetHealthPct() < 25 then
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
pUnit:SpawnCreature(00000)
Unit:SendChatMessage(12,0, "Come my minions")
pUnit:RemoveEvents();
end
end
function Arthas_Yell(pUnit, Event)
if pUnit:GetHealthPct() < 10 then
Unit:SendChatMessage(12,0, "Noo, I am losing my power!!")
Unit:CastSpell(35179)
end
end
function Arthas_OnDied(Unit, Event)
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "No... It cannot be possible. I will return to see another day.")
end
end
RegisterUnitEvent(0000, 1, "EnterCombat_OnCombat")
RegisterUnitEvent(0000, 2, "KilledTarget_OnKilledTarget")
RegisterUnitEvent(0000, 3, "OnDeath_OnDied")
For this, he spawns some mobs to help him, you need to change the ID from 00000 to what ever the mob ID that you want him spawning is. Also remember to change the entry ID at the bottom.
Kel'thuzad
Code:
function Kel'Thuzad_OnCombat(Unit, Event)
Unit:SendChatMessage(11, 0, "What is this? Someone trying to defeat me? Think again!")
Unit:RegisterEvent("Kel'Thuzad_Frostbolt", 12500, 0)
Unit:RegisterEvent("Kel'thuzad_FrostboltVolley", 15000, 0)
Unit:RegisterEvent("Kel'Thuzad_Chains", 45000, 0)
Unit:RegisterEvent("Kel'Thuzad_Detonate", 35000, 0)
Unit:RegisterEvent("Kel'Thuzad_FrostBlast", 100000, 0)
end
function Kel'Thuzad_Frostbolt(pUnit, Event)
pUnit:FullCastSpellOnTarget(28478, pUnit:GetRandomPlayer(7))
end
function Kel'thuzad_FrostboltVolley(pUnit, Event)
pUnit:FullCastSpellOnTarget(29957, pUnit:GetMainTank())
end
function Kel'Thuzad_Chains(pUnit, Event)
pUnit:FullCastSpellOnTarget(28410, pUnit:GetRandomPlayer(5))
end
function Kel'Thuzad_Detonate(pUnit, Event)
pUnit:FullCastSpellOnTarget(27819, pUnit:GetRandomPlayer(0))
end
function Kel'Thuzad_FrostBlast(pUnit, Event)
pUnit:FullCastSpellOnTarget(27808, pUnit:GetRandomPlayer(0))
end
function Kel'Thuzad_Phase2(pUnit, Event)
if pUnit:GetHealthPct() < 40 then
pUnit:RemoveEvents();
Unit:SendChatMessage(11, 0, "I am getting weak! Come my minions, help me fend of these intruders.")
pUnit:SpawnCreature(16441)
pUnit:SpawnCreature(16441)
pUnit:SpawnCreature(16441)
pUnit:SpawnCreature(16441)
pUnit:SpawnCreature(16441)
end
function Kel'Thuzad_onDied(Unit, Event)
Unit:SendChatMessage(11, 0, "Do not rejoice... your victory is a hollow one... for I shall return with powers beyond your imagining!")
end
end
RegisterUnitEvent(0000, 1, "EnterCombat_OnCombat")
RegisterUnitEvent(0000, 2, "OnDeath_OnDied")
For this, Kel'thuzad will spawn 5 mobs, at the moments I believe they are attuned for level 70, you can make a new mob and but the ID in there... Also remember to change the entry ID at the end.
If you have any corrections, suggestions, criticism let me know, I will fix it.
--Pimpin_N0ob