Code:
function Spirit_OnKill(pUnit, Event)
pUnit: SendChatMessage(14, 0, "Pathetic Soul...")
end
function Spirit_EnterCombat(pUnit, Event)
pUnit: SendChatMessage(14, 0, "Your pathetic souls , lifes , even essences will soon belong to me...")
pUnit: RegisterEvent("Nethermancer", 1000, 0)
end
function Spirit_Nethermancer(pUnit, Event)
if pUnit: GetHealthPct() < 99 then
pUnit: RemoveEvents();
pUnit: FullCastSpellOnTarget(39329, pUnit: GetRandomPlayer(0))
pUnit: SendChatMessage(14, 0, "Do you really think you can whistand the power of nethermancer Melgen?!")
pUnit: RegisterEvent("Nethermancertwo", 1000, 0)
end
end
function Spirit_Nethermancertwo(pUnit, Event)
if pUnit: GetHealthPct() < 98 then
pUnit: RemoveEvents();
pUnit: CastSpell(42023)
pUnit: SendChatMessage(14, 0, "Arrgghahahaha! Fools!")
pUnit: RegisterEvent("Nethermancerall", 1000, 0)
end
end
function Spirit_Nethermancerall(pUnit, Event)
if pUnit: GetHealthPct() < 97 then
pUnit: RemoveEvents();
pUnit: FullCastSpellOnTarget(39329, pUnit: GetRandomPlayer(0))
pUnit: FullCastSpellOntarget(46161, pUnit: GetRandomPlayer(0))
pUnit: SendChatMessage(14, 0, "Be eaten by the void itself!")
pUnit: RegisterEvent("Waterone", 1000, 0)
end
end
function Spirit_Waterone(pUnit, Event)
if pUnit: GetHealthPct() < 95 then
pUnit: RemoveEvents();
pUnit: SendChatMessage(14, 0, "This was a just a boring test , the real game begins here! Arrgghahahaha!!!")
pUnit: SetModel (525)
pUnit: SetScale (3)
pUnit: CastSpell (43426)
pUnit: FullCastSpellOnTarget (37138, pUnit: GetMainTank())
pUnit: RegisterEvent("watertwo", 1000, 0)
end
end
function Spirit_watertwo(pUnit, Event)
if pUnit: GetHealthPct() < 93 then
pUnit: RemoveEvents();
pUnit: SendChatMessage(14, 0, "Ice heed my call!!!")
pUnit: CastSpell (37730)
pUnit: CastSpell (33239)
pUnit: RegisterEvent("waterthree", 1000, 0)
end
end
function Spirit_waterthree(pUnit, Event)
if pUnit: GetHealthPct() < 92 then
pUnit: RemoveEvents();
pUnit: SendChatMessage(14, 0, "Face your doom!!!")
pUnit: CastSpell (37730)
pUnit: CastSpell (33239)
pUnit: CastSpell (43426)
pUnit: FullCastSpellOnTarget (37138, pUnit: GetMainTank())
pUnit: RegisterEvent("poisonone", 1000, 0)
end
end
function Spirit_poisonone(pUnit, Event)
if pUnit: GetHealthPct() < 90 then
pUnit: RemoveEvents();
pUnit: SendChatMessage(14, 0, "From water to poison , from evil to pure evil. I'm gonna show you what fear truly is and the true form of Poison. Arrrgghahahaha!!!")
pUnit: SetModel (11172)
pUnit: SetScale (4)
pUnit: CastSpell (54098)
pUnit: CastSpell (54122)
pUnit: RegisterEvent("poisontwo", 1000, 0)
end
end
function Spirit_poisontwo(pUnit, Event)
if pUnit: GetHealthPct() < 88 then
pUnit: RemoveEvents();
pUnit: SendChatMessage(14, 0, "Fools! Now you will feel the terrible wrath of Melgen!!!")
pUnit: FullCastSpellOnTarget (43364, pUnit: GetMainTank())
pUnit: CastSpell (38219)
pUnit: RegisterEvent("poisonthree", 1000, 0)
end
end
function Spirit_poisonthree(pUnit, Event)
if pUnit: GetHealthPct() < 87 then
pUnit: RemoveEvents();
pUnit: SendChatMessage(14, 0, "Poison , consume them!!!!!")
pUnit: CastSpell (54098)
pUnit: CastSpell (54122)
pUnit: FullCastSpellOnTarget (43364, pUnit: GetMainTank())
pUnit: CastSpell (38219)
pUnit: RegisterEvent("bloodone", 1000, 0)
end
end
function Spirit_bloodone(pUnit, Event)
if pUnit: GetHealthPct() < 85 then
pUnit: RemoveEvents ();
pUnit: SetModel (17045)
pUnit: SetScale (5)
pUnit: SendChatMessage(14, 0, "Blood is my friend and it shall be your undoing mongrels!")
pUnit: FullCastSpellOnTarget (41238, pUnit: GetMainTank())
pUnit: CastSpell (41068)
pUnit: RegisterEvent("bloodtwo", 1000, 0)
end
end
function Spirit_bloodtwo(pUnit, Event)
if pUnit: GetHealthPct() < 84 then
pUnit: RemoveEvents ();
pUnit: SendChatMessage(14, 0, "I will rip the flesh out of you!")
pUnit: FullCastSpellOnTarget (41072, pUnit: GetRandomPlayer(0))
pUnit: CastSpell (3264)
pUnit: RegisterEvent("bloodthree", 1000, 0)
end
end
function Spirit_bloodthree(pUnit, Event)
if pUnit: GetHealthPct() < 83 then
pUnit: RemoveEvents ();
pUnit: SendChatMessage(14, 0, "Now is the time for your heart to explode!")
pUnit: FullCastSpellOnTarget (41072, pUnit: GetRandomPlayer(0))
pUnit: CastSpell (3264)
pUnit: FullCastSpellOnTarget (41238, pUnit: GetMainTank())
pUnit: CastSpell (41068)
pUnit: RegisterEvent("fireone", 1000, 0)
end
end
function Spirit_fireone(pUnit, Event)
if pUnit: GetHealthPct() < 80 then
pUnit: RemoveEvents ();
pUnit: SetModel (1204)
pUnit: SetScale (2)
pUnit: SendChatMessage(14, 0, "Die in my fiery hands!")
pUnit: FullCastSpellOnTarget (38010, pUnit: GetRandomPlayer(0))
pUnit: CastSpell (59469)
pUnit: RegisterEvent("firetwo", 1000, 0)
end
end
function Spirit_firetwo(pUnit, Event)
if pUnit: GetHealthPct() < 78 then
pUnit: RemoveEvents ();
pUnit: SetScale (3)
pUnit: SendChatMessage(14, 0, "Give up!")
pUnit: FullCastSpellOnTarget (41596, pUnit: GetRandomPlayer(0))
pUnit: CastSpell (36876)
pUnit: RegisterEvent("firethree", 1000, 0)
end
end
function Spirit_firethree(pUnit, Event)
if pUnit: GetHealthPct() < 77 then
pUnit: RemoveEvents ();
pUnit: SetScale (4)
pUnit: SendChatMessage(14, 0, "Flame , cut them in half!")
pUnit: FullCastSpellOnTarget (38010, pUnit: GetRandomPlayer(0))
pUnit: CastSpell (59469)
pUnit: FullCastSpellOnTarget (41596, pUnit: GetMainTank())
pUnit: CastSpell (36876)
pUnit: RegisterEvent("felone", 1000, 0)
end
end
function Spirit_felone(pUnit, Event)
if pUnit: GetHealthPct() < 75 then
pUnit: RemoveEvents ();
pUnit: SetModel (20431)
pUnit: SetScale (2)
pUnit: SendChatMessage(14, 0, "Behold the fel flame!")
pUnit: FullCastSpellOnTarget (38742, pUnit: GetRandomPlayer(0))
pUnit: CastSpell (40631)
pUnit: RegisterEvent("feltwo", 1000, 0)
end
end
function Spirit_feltwo(pUnit, Event)
if pUnit: GetHealthPct() < 73 then
pUnit: RemoveEvents ();
pUnit: SetScale (3)
pUnit: SendChatMessage(14, 0, "Soon my hands of death will engulf you all!")
pUnit: FullCastSpellOnTarget (46101, pUnit: GetMainTank(0))
pUnit: CastSpell (38813)
pUnit: RegisterEvent("felthree", 1000, 0)
end
end
function Spirit_felthree(pUnit, Event)
if pUnit: GetHealthPct() < 72 then
pUnit: RemoveEvents ();
pUnit: SetScale (4)
pUnit: SendChatMessage(14, 0, "Fel , empower me with your strengh to destroy!")
pUnit: FullCastSpellOnTarget (38742, pUnit: GetRandomPlayer(0))
pUnit: CastSpell (40631)
pUnit: FullCastSpellOnTarget (46101, pUnit: GetMainTank())
pUnit: CastSpell (38813)
pUnit: RegisterEvent("earth", 1000, 0)
end
end
function Spirit_earth(pUnit, Event)
if pUnit: GetHealthPct() < 70 then
pUnit: RemoveEvents ();
pUnit: SetScale (5)
pUnit: SetModel (453)
pUnit: SendChatMessage(14, 0, "Beware, I'm the earth itself!")
pUnit: CastSpell (64650)
pUnit: CastSpell (54193)
pUnit: CastSpell (63547)
pUnit: CastSpell (39050)
pUnit: RegisterEvent("air", 1000, 0)
end
end
function Spirit_air(pUnit, Event)
if pUnit: GetHealthPct() < 60 then
pUnit: RemoveEvents ();
pUnit: SetScale (5)
pUnit: SetModel (21130)
pUnit: SendChatMessage(14, 0, "Wind will mean you doom!")
pUnit: CastSpell (39261)
pUnit: CastSpell (43620)
pUnit: FullCastSpellOnTarget (46568, pUnit: GetRandomPlayer(0))
pUnit: CastSpell (6982)
pUnit: CastSpell (10092)
pUnit: RegisterEvent("strom", 1000, 0)
end
end
function Spirit_strom(pUnit, Event)
if pUnit: GetHealthPct() < 45 then
pUnit: RemoveEvents ();
pUnit: SetScale (5)
pUnit: SetModel (5494)
pUnit: SendChatMessage(14, 0, "Storm heed my call!")
pUnit: CastSpell (38145)
pUnit: FullCastSpellOnTarget (63673, pUnit: GetMainTank())
pUnit: FullCastSpellOnTarget (28299, pUnit: GetRandomPlayer(0))
pUnit: FullCastSpellOnTarget (56694, pUnit: GetRandomPlayer(0))
pUnit: CastSpell (43983)
pUnit: RegisterEvent("arcane", 1000, 0)
end
end
function Spirit_arcane(pUnit, Event)
if pUnit: GetHealthPct() < 20 then
pUnit: RemoveEvents ();
pUnit: SetScale (5)
pUnit: SetModel (16216)
pUnit: SendChatMessage(14, 0, "Now for some extra arcane fun! Arrrgghahahaha!!!!!")
pUnit: CastSpell (34172)
pUnit: FullCastSpellOnTarget (40940, pUnit: GetMainTank())
pUnit: FullCastSpellOnTarget (37271, pUnit: GetRandomPlayer(0))
pUnit: Castspell (21147)
pUnit: CastSpell (38539)
pUnit: RegisterEvent("Godofvoid", 1000, 0)
end
end
function Spirit_Godofvoid(pUnit, Event)
if pUnit: GetHealthPct() < 10 then
pUnit: RemoveEvents ();
pUnit: SetScale (10)
pUnit: SetModel (23428)
pUnit: SendChatMessage(14, 0, "Now you made me angry. You wanted my true form you got it! Now bow before the god of void!!!")
pUnit: CastSpell (38627)
pUnit: FullCastSpellOnTarget (46161, pUnit: GetMainTank())
pUnit: FullCastSpellOnTarget (33047, pUnit: GetRandomPlayer(0))
pUnit: FullCastSpellOnTarget (46289, pUnit: GetRandomPlayer(0))
pUnit: CastSpell (38524)
end
end
function Spirit_Start(pUnit, Event)
pUnit: RegisterEvent("Nethermancer", 1000, 0)
end
RegisterUnitEvent(32001, 1, "Spirit_Start")
RegisterUnitEvent(32001, 3, "Spirit_OnKill")
RegisterUnitEvent(32001, 1, "Spirit_EnterCombat")