uhmm simple as the title said, the logon/realms thing does NOT show any red text or errors loading the scripts, but they just seem not to want to work... Heres the ones I am using. IDs DO match atm. If you see anything wrong, please feel free to tell me and i will fix it. I use arc emu. default scripting engines.
Code:
-- --
-- Start function --
-- --
function Mage_OnCombat(Unit, Event)
Unit:SendChatMessage(14, 0, "What do you want!?")
Unit:SetCombatCapable(1)
Unit:SetFaction(35)
Unit:RegisterEvent("Mage_TalkStart1", 1000, 0)
end
-- --
-- Cinematic --
-- --
function Mage_TalkStart1(Unit,Event)
Unit:RemoveEvents()
Unit:SetCombatCapable(1)
x=Unit:GetX()
y=Unit:GetY()
z=Unit:GetZ()
o=Unit:GetO()
Unit:MoveTo(x, y+5, z, o)
Unit:SendChatMessage(12, 0, "Wait..What!? How!? How are you here... I knew I should of delt with you myself!")
Unit:RegisterEvent("Mage_TalkStart2", 7000, 0)
end
function Mage_TalkStart2(Unit,Event)
Unit:RemoveEvents()
Unit:StopMovement(2000)
Unit:SetCombatCapable(1)
x=Unit:GetX()
y=Unit:GetY()
z=Unit:GetZ()
o=Unit:GetO()
Unit:MoveTo(x, y-5, z, o)
Unit:SendChatMessage(12, 0, "Did you enjoy slaughtering my worthless men? I would of done it myself if not for that fool Blightbearer..")
Unit:RegisterEvent("Mage_TalkStart3", 9000, 0)
end
function Mage_TalkStart3(Unit,Event)
Unit:RemoveEvents()
Unit:StopMovement(2000)
Unit:SetCombatCapable(1)
x=Unit:GetX()
y=Unit:GetY()
z=Unit:GetZ()
o=Unit:GetO()
Unit:MoveTo(x+5, y, z, o)
Unit:SendChatMessage(12, 0, "I was soon to complete my project, but you worthless runts had to slay Uzkaron!")
Unit:RegisterEvent("Mage_TalkStart4", 9000, 0)
end
function Mage_TalkStart4(Unit,Event)
Unit:RemoveEvents()
Unit:StopMovement(2000)
Unit:SetCombatCapable(1)
x=Unit:GetX()
y=Unit:GetY()
z=Unit:GetZ()
o=Unit:GetO()
Unit:MoveTo(x-5, y, z, o)
Unit:SendChatMessage(12, 0, "A pity Highlord Blightbearer had to fall to such mortals as yourself, I would of loved to send the chimp crying to his followers. A "God" running from myself.. A sight for many indeed.")
Unit:RegisterEvent("Mage_TalkStart5", 10000, 0)
end
function Mage_TalkStart5(Unit,Event)
Unit:RemoveEvents()
Unit:StopMovement(2000)
Unit:SetCombatCapable(1)
x=Unit:GetX()
y=Unit:GetY()
z=Unit:GetZ()
o=Unit:GetO()
Unit:MoveTo(x+2, y+2, z, o)
Unit:SendChatMessage(12, 0, "I must say, you did proceed much further than I anticipated. I must congratulate you on that achievement. Such a tragic turn of events, though.")
Unit:RegisterEvent("Mage_TalkStart6", 10000, 0)
end
function Mage_TalkStart6(Unit,Event)
Unit:RemoveEvents()
Unit:SetCombatCapable(0)
Unit:SetFaction(14)
x=Unit:GetX()
y=Unit:GetY()
z=Unit:GetZ()
o=Unit:GetO()
Unit:MoveTo(x-2, y-2, z, o)
Unit:SendChatMessage(12, 0, "Enough chat! I must end what those morons started!")
Unit:RegisterEvent("Mage_Phase1", 1000, 0)
Unit:RegisterEvent("Mage_Spell1", 4000, 0)
Unit:RegisterEvent("Mage_Spell2", 10000, 0)
Unit:RegisterEvent("Mage_Spell3", 13000, 0)
end
function Mage_Phase1(Unit, Event)
if Unit:GetHealthPct() < 90 then
Unit:RemoveEvents()
Unit:SendChatMessage(14, 0, "Muahaha! Burn! Burn in malicous fire!")
Unit:CastSpell(42945)
Unit:RegisterEvent("Mage_Phase2", 1000, 0)
Unit:RegisterEvent("Mage_1Spell1", 4000, 0)
Unit:RegisterEvent("Mage_1Spell2", 12000, 0)
Unit:RegisterEvent("Mage_1Spell3", 4000, 0)
end
end
function Mage_Phase2(Unit, Event)
if Unit:GetHealthPct() < 75 then
Unit:RemoveEvents()
Unit:SendChatMessage(14, 0, "The power of arcane courses through my veins!")
Unit:CastSpell(46553)
Unit:RegisterEvent("Mage_Phase3", 1000, 0)
Unit:RegisterEvent("Mage_2Spell1", 5000, 0)
Unit:RegisterEvent("Mage_2Spell2", 4000, 0)
Unit:RegisterEvent("Mage_2Spell3", 6000, 0)
end
end
function Mage_Phase3(Unit, Event)
if Unit:GetHealthPct() < 60 then
Unit:RemoveEvents()
Unit:SendChatMessage(14, 0, "Starting to feel chilly, are we?!")
Unit:CastSpell(39035)
Unit:RegisterEvent("Mage_Phase4", 1000, 0)
Unit:RegisterEvent("Mage_3Spell1", 6000, 1)
Unit:RegisterEvent("Mage_3Spell2", 9000, 0)
Unit:RegisterEvent("Mage_3Spell3", 8000, 0)
end
end
function Mage_Phase4(Unit, Event)
if Unit:GetHealthPct() < 45 then
Unit:RemoveEvents()
Unit:SendChatMessage(14, 0, "This drags on far to long, I grow bored with you..")
Unit:CastSpell(52535)
Unit:RegisterEvent("Mage_Phase5", 1000, 0)
Unit:RegisterEvent("Mage_4Spell1", 20000, 0)
Unit:RegisterEvent("Mage_4Spell2", 10000, 0)
Unit:RegisterEvent("Mage_4Spell3", 6000, 0)
end
end
function Mage_Phase5(Unit, Event)
if Unit:GetHealthPct() < 30 then
Unit:RemoveEvents()
Unit:SendChatMessage(14, 0, "Hah! Pathetic magicks.. ")
Unit:CastSpell(31534)
Unit:RegisterEvent("Mage_Phase6", 1000, 0)
Unit:RegisterEvent("Mage_5Spell1", 13000, 0)
Unit:RegisterEvent("Mage_5Spell2", 14000, 0)
Unit:RegisterEvent("Mage_5Spell3", 4000, 0)
end
end
function Mage_Phase6(Unit, Event)
if Unit:GetHealthPct() < 15 then
Unit:RemoveEvents()
Unit:SendChatMessage(14, 0, "ENOUGH!! I shall end this now!")
Unit:CastSpell(29963)
Unit:RegisterEvent("Mage_6Spell1", 120000, 1)
Unit:RegisterEvent("Mage_6Spell2", 20000, 0)
Unit:RegisterEvent("Mage_6Spell3", 9000, 0)
Unit:RegisterEvent("Mage_6Spell4", 10000, 0)
Unit:RegisterEvent("Mage_6Spell4", 25000, 0)
Unit:RegisterEvent("Mage_6Spell5", 5400, 0)
end
end
-- --
-- Spells --
-- --
function Mage_Spell1(Unit, Event)
Unit:FullCastSpellOnTarget(54095, Unit:GetMainTank())
end
function Mage_Spell2(Unit, Event)
Unit:CastSpell(36876)
end
function Mage_Spell3(Unit, Event)
Unit:FullCastSpellOnTarget(55362, Unit:GetMainTank())
end
function Mage_1Spell1(Unit, Event)
Unit:FullCastSpellOnTarget(37110, Unit:GetRandomPlayer(0))
end
function Mage_1Spell2(Unit, Event)
Unit:FullCastSpellOnTarget(29964, Unit:GetRandomPlayer(0))
end
function Mage_1Spell3(Unit, Event)
Unit:FullCastSpellOnTarget(56934, Unit:GetRandomPlayer(0))
end
function Mage_2Spell1(Unit, Event)
Unit:CastSpell(36481)
end
function Mage_2Spell2(Unit, Event)
Unit:FullCastSpellOnTarget(29956, Unit:GetRandomPlayer(0))
end
function Mage_2Spell3(Unit, Event)
Unit:CastSpell(37106)
end
function Mage_3Spell1(Unit, Event)
Unit:FullCastSpellOnTarget(44572, Unit:GetMainTank())
end
function Mage_3Spell2(Unit, Event)
Unit:FullCastSpellOnTarget(46035, Unit:GetRandomPlayer(0))
end
function Mage_3Spell3(Unit, Event)
Unit:CastSpell(30095)
end
function Mage_4Spell1(Unit, Event)
Unit:FullCastSpellOnTarget(32863, Unit:GetRandomPlayer(0))
end
function Mage_4Spell2(Unit, Event)
Unit:FullCastSpellOnTarget(38913, Unit:GetRandomPlayer(0))
end
function Mage_4Spell3(Unit, Event)
Unit:FullCastSpellOnTarget(41069, Unit:GetMainTank())
end
function Mage_5Spell1(Unit, Event)
Unit:CastSpell(29951)
end
function Mage_5Spell2(Unit, Event)
Unit:CastSpell(40631)
end
function Mage_5Spell3(Unit, Event)
Unit:FullCastSpellOnTarget(47610, Unit:GetMainTank())
end
function Mage_6Spell1(Unit, Event)
Unit:SendChatMessage(14, 0, "Explode!")
Unit:CastSpell(56505)
end
function Mage_6Spell2(Unit, Event)
Unit:FullCastSpellOnTarget(42834, Unit:GetMainTank())
end
function Mage_6Spell3(Unit, Event)
Unit:CastSpell(33061)
end
function Mage_6Spell4(Unit, Event)
Unit:FullCastSpellOnTarget(44781, Unit:GetRandomPlayer(0))
end
function Mage_6Spell5(Unit, Event)
Unit:FullCastSpellOnTarget(42897, Unit:GetMainTank())
end
function Mage_OnLeaveCombat(Unit, Event)
Unit:SendChatMessage(14, 0, "As I thought! Nothing for the likes of me!")
Unit:RemoveEvents()
end
function Mage_OnKilledTarget(Unit, Event)
Unit:SendChatMessage(14, 0, "Oh the sorrow..")
end
function Mage_OnDied(Unit, Event)
Unit:SendChatMessage(14, 0, "Years of planning... Forgive me master..")
Unit:RemoveEvents()
end
RegisterUnitEvent(133716, 1, "Mage_OnCombat")
RegisterUnitEvent(133716, 2, "Mage_OnLeaveCombat")
RegisterUnitEvent(133716, 3, "Mage_OnKilledTarget")
RegisterUnitEvent(133716, 4, "Mage_OnDied")
Code:
function On_Gossip(unit, event, player)
unit:GossipCreateMenu(15, player, 0)
unit:GossipMenuAddItem(2, "I will go to Rohan!", 1, 0)
unit:GossipSendMenu(player)
end
function Gossip_Submenus(unit, event, player, id, intid, code)
if(intid == 1) then
player:Teleport(1, -4580.280762, -3706.275879, 46.666096)
end
RegisterUnitGossipEvent(99999, 1, "On_Gossip")
RegisterUnitGossipEvent(99999, 2, "Gossip_Submenus")
Code:
function ac_OnCombat(Unit, Event)
Unit:SendChatMessage(14, 0, "You shall not proceed!")
Unit:RegisterEvent("ac_Spell1", 6000, 0)
Unit:RegisterEvent("ac_Spell2", 12000, 0)
end
function ac_Spell1(Unit, Event)
Unit:FullCastSpellOnTarget(59248, Unit:GetMainTank())
end
function ac_Spell2(Unit, Event)
Unit:FullCastSpellOnTarget(34793, Unit:GetRandomPlayer(1))
end
function ac_OnLeaveCombat(Unit, Event)
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "No threat found. Resuming normal gaurd sequence.")
end
function ac_OnKilledTarget(Unit, Event)
Unit:SendChatMessage(12, 0, "Target eliminated. Determining next threat.")
end
function ac_OnDied(Unit, Event)
Unit:RemoveEvents()
Unit:SendChatMessage(14, 0, "WARNING! WARNING! CRITICAL SYSTEM FAILURE! ERUPTION IN 5, 4, 3, 2, 1-")
Unit:CastSpell(28450)
Unit:RemoveEvents()
end
RegisterUnitEvent(133721, 1, "ae_OnCombat")
RegisterUnitEvent(133721, 2, "ae_OnLeaveCombat")
RegisterUnitEvent(133721, 3, "ae_OnKilledTarget")
RegisterUnitEvent(133721, 4, "ae_OnDied")
Code:
function On_Gossip(unit, event, player)
unit:GossipCreateMenu(15, player, 0)
unit:GossipMenuAddItem(2, "I will go to Rohan!", 1, 0)
unit:GossipSendMenu(player)
end
function Gossip_Submenus(unit, event, player, id, intid, code)
if(intid == 1) then
player:Teleport(1, -4580.280762, -3706.275879, 46.666096)
end
RegisterUnitGossipEvent(99998, 1, "On_Gossip")
RegisterUnitGossipEvent(99998, 2, "Gossip_Submenus")
Code:
function Undead_Frost_Wyrm_EnterCombat(pUnit, event)
local timer1=math.random(5200, 13500)
local timer3=math.random(5200, 13500)
pUnit:RegisterEvent("Frostpaw_Rend", timer1, 1)
pUnit:RegisterEvent("Demoralizing_Shout", timer3, 1)
end
function Frostpaw_Rend(pUnit, event)
local timer2=math.random(10000, 22500)
if (pUnit:GetMainTank() ~= nil) then
pUnit:FullCastSpellOnTarget(12054, pUnit:GetMainTank())
pUnit:RegisterEvent("Frostpaw_Rend", timer2, 0)
end
end
function Demoralizing_Shout(pUnit, event)
local timer4=math.random(30000, 45000)
pUnit:CastSpell(13730)
pUnit:RegisterEvent("Demoralizing_Shout", timer4, 0)
end
RegisterUnitEvent (133799, 1, "Undead_Frost_Wyrm_EnterCombat")
Code:
function mt_OnCombat(Unit, Event)
Unit:SendChatMessage(12, 0, "I live to serve the Master!")
Unit:RegisterEvent("mt_Spell1", 6000, 0)
Unit:RegisterEvent("mt_Spell2", 20000, 0)
Unit:RegisterEvent("mt_Spell3", 15000, 0)
end
function mt_Spell1(Unit, Event)
Unit:FullCastSpellOnTarget(61087, Unit:GetMainTank())
end
function mt_Spell2(Unit, Event)
Unit:CastSpell(5762)
end
function mt_Spell3(Unit, Event)
Unit:CastSpell(54890)
end
function mt_OnLeaveCombat(Unit, Event)
Unit:RemoveEvents()
end
function mt_OnKilledTarget(Unit, Event)
Unit:SendChatMessage(12, 0, "For the Magus!")
end
function mt_OnDied(Unit, Event)
Unit:SendChatMessage(12, 0, "I am free! Thank you- and run! Run while you can!")
Unit:RemoveEvents()
end
RegisterUnitEvent(133729, 1, "mt_OnCombat")
RegisterUnitEvent(133729, 2, "mt_OnLeaveCombat")
RegisterUnitEvent(133729, 3, "mt_OnKilledTarget")
RegisterUnitEvent(133729, 4, "mt_OnDied")
Code:
function uk_OnCombat(Unit, Event)
Unit:SetFaction(35)
Unit:RegisterEvent("uk_TalkStart1", 1000, 0)
end
-- --
-- Cinematic --
-- --
function uk_TalkStart1(Unit,Event)
Unit:RemoveEvents()
Unit:SetCombatCapable(1)
x=Unit:GetX()
y=Unit:GetY()
z=Unit:GetZ()
o=Unit:GetO()
Unit:MoveTo(x, y+5, z, o)
Unit:SendChatMessage(14, 0, "Fools! Do you realize what you have done? I was in the middle of bending the will of Deathwing to my own! Although, the creature is more powerful than I anticipated...")
Unit:RegisterEvent("uk_TalkStart2", 9000, 0)
end
function uk_TalkStart2(Unit,Event)
Unit:RemoveEvents()
Unit:SetCombatCapable(0)
Unit:StopMovement(2000)
Unit:SendChatMessage(14, 0, "You think of me as a simple human? I am a champion of the black dragonflight! I have survived eons! I have witnessed the fall of empires! I have mastered every path, perfected every art! I am the messanger of the Old Gods themselves! Prepare yourselves, for utter destruction!")
Unit:SetModel(18194)
Unit:SetScale(0.3)
Unit:SetFaction(14)
Unit:RegisterEvent("uk_Phase1", 1000, 0)
Unit:RegisterEvent("uk_normalspell1", 30000, 0)
end
function uk_Phase1(Unit, Event)
if Unit:GetHealthPct() < 90 then
Unit:RemoveEvents()
Unit:SetScale(1)
Unit:SendChatMessage(12, 0, "Witness my first path, the brave and mighty Warrior!")
Unit:SetModel(16539)
Unit:CastSpell(37786)
Unit:RegisterEvent("uk_1spell1", 10000, 0)
Unit:RegisterEvent("uk_1spell2", 20000, 0)
Unit:RegisterEvent("uk_Phase2", 1000, 0)
end
end
function uk_Phase2(Unit, Event)
if Unit:GetHealthPct() < 81 then
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "See the power of my second path, the powerful and knowledge hungry Mage!")
Unit:SetModel(11396)
Unit:CastSpell(43426)
Unit:RegisterEvent("uk_2spell1", 5000, 0)
Unit:RegisterEvent("uk_2spell2", 20000, 0)
Unit:RegisterEvent("uk_Phase3", 1000, 0)
end
end
function uk_Phase3(Unit, Event)
if Unit:GetHealthPct() < 72 then
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "The third path, the stealthy rogue, hiding in the shadows and using cheap tricks.")
Unit:SetModel(2314)
Unit:RegisterEvent("uk_3spell1", 15000, 0)
Unit:RegisterEvent("uk_3spell2", 5000, 0)
Unit:RegisterEvent("uk_Phase4", 1000, 0)
end
end
function uk_Phase4(Unit, Event)
if Unit:GetHealthPct() < 63 then
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "The fourth path, the mighty Paladin, defender of the light and the Alliance.")
Unit:SetModel(1499)
Unit:CastSpell(41541)
Unit:RegisterEvent("uk_4spell1", 30000, 0)
Unit:RegisterEvent("uk_Phase5", 1000, 0)
end
end
function uk_Phase5(Unit, Event)
if Unit:GetHealthPct() < 54 then
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "Ahhh... The fifth path- the great Deathknight, the might of the Scourge.")
Unit:SetModel(16513)
Unit:RegisterEvent("uk_5spell1", 15000, 0)
Unit:RegisterEvent("uk_Phase6", 1000, 0)
end
end
function uk_Phase6(Unit, Event)
if Unit:GetHealthPct() < 45 then
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "My sixth path, the Hunter, stalker of the wild.")
Unit:SetModel(2206)
Unit:RegisterEvent("uk_summon1", 1000, 1)
Unit:RegisterEvent("uk_summon2", 1000, 1)
Unit:CastSpell(49067)
Unit:RegisterEvent("uk_Phase7", 1000, 0)
end
end
function uk_Phase7(Unit, Event)
if Unit:GetHealthPct() < 36 then
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "My seventh path, the Druid- warden of the forest.")
Unit:SetModel(21635)
Unit:RegisterEvent("uk_7spell1", 8000, 0)
Unit:RegisterEvent("uk_Phase8", 1000, 0)
end
end
function uk_Phase8(Unit, Event)
if Unit:GetHealthPct() < 27 then
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "The eighth path, the Shaman, calling upon the forces of the elements.")
Unit:SetModel(4542)
Unit:RegisterEvent("uk_8spell1", 10000, 0)
Unit:RegisterEvent("uk_Phase9", 1000, 0)
end
end
function uk_Phase9(Unit, Event)
if Unit:GetHealthPct() < 18 then
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "The ninth path, the priest, healing with the power of the Light or corrupting with the power of the Shadow.")
Unit:SetModel(1495)
Unit:RegisterEvent("uk_9spell1", 15000, 0)
Unit:RegisterEvent("uk_9spell2", 3000, 0)
Unit:RegisterEvent("uk_Phase10", 1000, 0)
end
end
function uk_Phase10(Unit, Event)
if Unit:GetHealthPct() < 9 then
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "The tenth path, the warlock, master of dark magic and destruction.")
Unit:SetModel(16309)
Unit:RegisterEvent("uk_10spell1", 2000, 0)
end
end
function uk_normalspell1 (Unit, Event)
Unit:CastSpell(38924)
end
function uk_1spell1 (Unit, Event)
Unit:FullCastSpellOnTarget(59035, Unit:GetMainTank())
end
function uk_1spell2 (Unit, Event)
Unit:FullCastSpellOnTarget(54132, Unit:GetRandomPlayer(1))
end
function uk_2spell1 (Unit, Event)
Unit:FullCastSpellOnTarget(28478, Unit:GetMainTank())
end
function uk_2spell2 (Unit, Event)
Unit:FullCastSpellOnTarget(54132, Unit:GetRandomPlayer(1))
end
function uk_3spell1 (Unit, Event)
Unit:FullCastSpellOnTarget(41978, Unit:GetMainTank())
end
function uk_3spell2 (Unit, Event)
Unit:FullCastSpellOnTarget(59409, Unit:GetRandomPlayer(1))
end
function uk_4spell1 (Unit, Event)
Unit:CastSpell(48817)
end
function uk_5spell1 (Unit, Event)
Unit:FullCastSpellOnTarget(55321, Unit:GetMainTank())
end
function uk_7spell1 (Unit, Event)
Unit:FullCastSpellOnTarget(54459, Unit:GetMainTank())
end
function uk_8spell1 (Unit, Event)
Unit:FullCastSpellOnTarget(61528, Unit:GetMainTank())
end
function uk_9spell1 (Unit, Event)
Unit:FullCastSpellOnTarget(46560, Unit:GetRandomPlayer(0))
end
function uk_9spell2 (Unit, Event)
Unit:FullCastSpellOnTarget(52722, Unit:GetMainTank())
end
function uk_10spell1 (Unit, Event)
Unit:FullCastSpellOnTarget(57374, Unit:GetMainTank())
end
function uk_summon1(Unit, Event)
local x = Unit:GetX();
local y = Unit:GetY();
local z = Unit:GetZ();
local o = Unit:GetO();
Unit:SpawnCreature (133707, x, y, z, o, 14 ,60000);
end
function uk_summon2(Unit, Event)
local x = Unit:GetX();
local y = Unit:GetY();
local z = Unit:GetZ();
local o = Unit:GetO();
Unit:SpawnCreature (133708, x, y, z, o, 14 ,60000);
end
function uk_OnLeaveCombat(Unit, Event)
Unit:RemoveEvents()
end
function uk_OnKilledTarget(Unit, Event)
Unit:SendChatMessage(14, 0, "Join the Dark Ones!")
end
function uk_OnDied(Unit, Event)
Unit:SendChatMessage(12, 0, "I... will... return....")
Unit:RemoveEvents()
Unit:SetModel(18194)
Unit:SetScale(0.3)
end
function uk_OnSpawn(Unit, Event)
Unit:RemoveEvents()
Unit:SetModel(16279)
end
RegisterUnitEvent(55555, 1, "uk_OnCombat")
RegisterUnitEvent(55555, 2, "uk_OnLeaveCombat")
RegisterUnitEvent(55555, 3, "uk_OnKilledTarget")
RegisterUnitEvent(55555, 4, "uk_OnDied")
RegisterUnitEvent(55555, 6, "uk_OnSpawn")
Code:
function dk_OnCombat(Unit, Event)
Unit:SendChatMessage(12, 0, "You shall make a fine addition to my army!")
Unit:RegisterEvent("dk_Spell1", 5000, 0)
Unit:RegisterEvent("dk_Spell5", 10000, 0)
Unit:RegisterEvent("dk_Phase1", 1000, 0)
end
function dk_Phase1(Unit, Event)
if Unit:GetHealthPct() < 65 then
Unit:RemoveEvents()
Unit:SendChatMessage(14, 0, "Deathknights! Aid me!")
Unit:RegisterEvent("dk_Phase2", 1000, 0)
Unit:RegisterEvent("dk_Summon", 1000, 2)
end
end
function dk_Phase2(Unit, Event)
if Unit:GetHealthPct() < 50 then
Unit:RemoveEvents()
Unit:SetModel(22702)
Unit:SetScale(2)
Unit:SendChatMessage(14, 0, "My mortal form is shed! Witness the power of true darkness!")
Unit:RegisterEvent("dk_Phase3", 1000, 0)
Unit:RegisterEvent("dk_Spell2", 5000, 0)
Unit:RegisterEvent("dk_Spell4", 20000, 0)
end
end
function dk_Phase3(Unit, Event)
if Unit:GetHealthPct() < 8 then
Unit:RemoveEvents()
Unit:SendChatMessage(14, 0, "I am fed by the power of death itself! FEEL MY WRATH!!!")
Unit:RegisterEvent("dk_Spell3", 6000, 0)
end
end
function dk_Spell1(Unit, Event)
Unit:FullCastSpellOnTarget(55321, Unit:GetMainTank())
end
function dk_Spell2(Unit, Event)
Unit:FullCastSpellOnTarget(57374, Unit:GetMainTank())
end
function dk_Spell3(Unit, Event)
Unit:CastSpell(59377)
end
function dk_Spell4(Unit, Event)
Unit:FullCastSpellOnTarget(21330, Unit:GetRandomPlayer(0))
end
function dk_Spell5(Unit, Event)
Unit:FullCastSpellOnTarget(55053, Unit:GetRandomPlayer(0))
end
function dk_Summon(Unit, Event)
local x = Unit:GetX();
local y = Unit:GetY();
local z = Unit:GetZ();
local o = Unit:GetO();
Unit:SpawnCreature (133711, x, y, z, o, 14 ,60000);
end
function dk_OnLeaveCombat(Unit, Event)
Unit:RemoveEvents()
end
function dk_OnKilledTarget(Unit, Event)
Unit:SendChatMessage(14, 0, "Rest while you can, for soon you too shall taste the sweet embrace of undeath!")
end
function dk_OnDied(Unit, Event)
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "Death... She stalks me... once more....")
end
RegisterUnitEvent(133714, 1, "dk_OnCombat")
RegisterUnitEvent(133714, 2, "dk_OnLeaveCombat")
RegisterUnitEvent(133714, 3, "dk_OnKilledTarget")
RegisterUnitEvent(133714, 4, "dk_OnDied")
Code:
function Necromancer_OnCombat(Unit, Event)
Unit:SendChatMessage(14, 0, "Your flesh is mine!")
Unit:RegisterEvent("Necromancer_Spell1", 3000, 0)
end
function Necromancer_Spell1(Unit, Event)
Unit:FullCastSpellOnTarget(36275, Unit:GetRandomPlayer(0))
end
function Necromancer_OnLeaveCombat(Unit, Event)
Unit:RemoveEvents()
end
function Necromancer_OnKillTarget(Unit, Event)
Unit:SendChatMessage(14, 0, "I will live up to Highlord Blightbearer's expectations!")
end
function Necromancer_OnDied(Unit, Event)
Unit:SendChatMessage(14, 0, "I have failed you master!")
Unit:RemoveEvents()
end
RegisterUnitEvent(133710, 1, "Necromancer_OnCombat")
RegisterUnitEvent(133710, 2, "Necromancer_OnLeaveCombat")
RegisterUnitEvent(133710, 3, "Necromancer_OnKillTarget")
RegisterUnitEvent(133710, 4, "Necromancer_OnDied")
Code:
function Deathknight_OnCombat(Unit, Event)
Unit:SendChatMessage(14, 0, "Death awaits you mortals!")
Unit:RegisterEvent("Deathknight_Spell1", 10000, 0)
end
function Deathknight_Spell1(Unit, Event)
Unit:FullCastSpellOnTarget(56361, Unit:GetMainTank())
end
function Deathknight_OnLeaveCombat(Unit, Event)
UnitRemoveEvents()
end
function Deathknight_OnKillTarget(Unit, Event)
Unit:SendChatMessage(14, 0, "Highlord Plaguebringer shall be pleased indeed.")
end
function Deathknight_OnDied(Unit, Event)
Unit:SendChatMessage(14, 0, "Highlord Plaguebringer shall see to your deaths!")
Unit:RemoveEvents()
end
RegisterUnitEvent(133711, 1, "Deathknight_OnCombat")
RegisterUnitEvent(133711, 2, "Deathknight_OnLeavecombat")
RegisterUnitEvent(133711, 3, "Deathknight_OnKillTarget")
RegisterUnitEvent(133711, 4, "Deathknight_OnDied")
Code:
function Sapphiron_Nether_Burn(Unit, event, miscunit, misc)
print "Sapphiron Nether Burn"
Unit:FullCastSpellOnTarget(30523,Unit:GetClosestPlayer())
Unit:SendChatMessage(11, 0, "Hello adventures ... This is the end of the line.")
end
function Sapphiron_Vode_Zone(Unit, event, miscunit, misc)
print "Sapphiron Vode Zone"
Unit:FullCastSpellOnTarget(30533,Unit:GetRandomPlayer())
Unit:SendChatMessage(11, 0, "Let unholy flames purge you!")
end
function Dragon_Spawn(pUnit, Event)
if pUnit:GetHealthPct() < 80 then
Unit:RemoveEvents();
Unit:FullCastSpell(0)
Unit:RegisterEvent("Dragon_Spawn",100,5)
Unit:RegisterEvent("Dragon_Spawn",1000,0)
end
function Dragon_Spawn(pUnit, Event)
if pUnit:GetHealthPct() < 40 then
Unit:RemoveEvents();
Unit:FullCastSpell(0)
Unit:RegisterEvent("Dragon_Spawn",100,5)
Unit:RegisterEvent("Dragon_Spawn",1000,0)
end
function Dragon_Spawn(pUnit, Event)
if pUnit:GetHealthPct() < 20 then
Unit:RemoveEvents();
Unit:FullCastSpell(0)
Unit:RegisterEvent("Dragon_Spawn",100,5)
Unit:RegisterEvent("Dragon_Spawn",1000,0)
end
function Sapphiron_Banish_Phase(Unit, event, miscunit, misc)
print "Sapphiron Banish Phase"
Unit:SendAreaTriggerMessage("BANISH PHASE")
Unit:FullCastSpell(35182)
Unit:FullCastSpellOnTarget(38524,Unit:GetClosestPlayer())
end
function Sapphiron_Enrage(Unit, event, miscunit, misc)
print "Sapphiron Enrage"
Unit:FullCastSpell(35595)
Unit:SendChatMessage(11, 0, "You will all die...")
end
function Dragon_Spawn(pUnit, Event)
local x = Unit:GetX();
local y = Unit:GetY();
local z = Unit:GetZ();
local o = Unit:GetO();
pUnit:SpawnCreature(133799, x, y, z, o, 14, 600000)
end
function Sapphiron(unit, event, miscunit, misc)
print "Sapphiron"
unit:RegisterEvent("Sapphiron_Portal_PhaseA",1000,1)
unit:RegisterEvent("Sapphiron_Nether_Burn",10000,0)
unit:RegisterEvent("Sapphiron_Vode_Zone",20000,0)
unit:RegisterEvent("Sapphiron_Banish_Phase",30000,0)
unit:RegisterEvent("Sapphiron_Portal_PhaseB",60000,0)
unit:RegisterEvent("Sapphiron_Enrage",540000,0)
unit:RegisterEvent("Dragon_Spawn",1000,5)
end
RegisterUnitEvent(15989,1,"Sapphiron")
Code:
function uk_OnCombat(Unit, Event)
Unit:SetFaction(35)
Unit:RegisterEvent("uk_TalkStart1", 1000, 0)
end
-- --
-- Cinematic --
-- --
function uk_TalkStart1(Unit,Event)
Unit:RemoveEvents()
Unit:SetCombatCapable(1)
x=Unit:GetX()
y=Unit:GetY()
z=Unit:GetZ()
o=Unit:GetO()
Unit:MoveTo(x, y+5, z, o)
Unit:SendChatMessage(14, 0, "Fools! Do you realize what you have done? I was in the middle of bending the will of Deathwing to my own! Although, the creature is more powerful than I anticipated...")
Unit:RegisterEvent("uk_TalkStart2", 9000, 0)
end
function uk_TalkStart2(Unit,Event)
Unit:RemoveEvents()
Unit:SetCombatCapable(0)
Unit:StopMovement(2000)
Unit:SendChatMessage(14, 0, "You think of me as a simple human? I am a champion of the black dragonflight! I have survived eons! I have witnessed the fall of empires! I have mastered every path, perfected every art! I am the messanger of the Old Gods themselves! Prepare yourselves, for utter destruction!")
Unit:SetModel(18194)
Unit:SetScale(0.3)
Unit:SetFaction(14)
Unit:RegisterEvent("uk_Phase1", 1000, 0)
Unit:RegisterEvent("uk_normalspell1", 30000, 0)
end
function uk_Phase1(Unit, Event)
if Unit:GetHealthPct() < 90 then
Unit:RemoveEvents()
Unit:SetScale(1)
Unit:SendChatMessage(12, 0, "Witness my first path, the brave and mighty Warrior!")
Unit:SetModel(16539)
Unit:CastSpell(37786)
Unit:RegisterEvent("uk_1spell1", 10000, 0)
Unit:RegisterEvent("uk_1spell2", 20000, 0)
Unit:RegisterEvent("uk_Phase2", 1000, 0)
end
end
function uk_Phase2(Unit, Event)
if Unit:GetHealthPct() < 81 then
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "See the power of my second path, the powerful and knowledge hungry Mage!")
Unit:SetModel(11396)
Unit:CastSpell(43426)
Unit:RegisterEvent("uk_2spell1", 5000, 0)
Unit:RegisterEvent("uk_2spell2", 20000, 0)
Unit:RegisterEvent("uk_Phase3", 1000, 0)
end
end
function uk_Phase3(Unit, Event)
if Unit:GetHealthPct() < 72 then
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "The third path, the stealthy rogue, hiding in the shadows and using cheap tricks.")
Unit:SetModel(2314)
Unit:RegisterEvent("uk_3spell1", 15000, 0)
Unit:RegisterEvent("uk_3spell2", 5000, 0)
Unit:RegisterEvent("uk_Phase4", 1000, 0)
end
end
function uk_Phase4(Unit, Event)
if Unit:GetHealthPct() < 63 then
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "The fourth path, the mighty Paladin, defender of the light and the Alliance.")
Unit:SetModel(1499)
Unit:CastSpell(41541)
Unit:RegisterEvent("uk_4spell1", 30000, 0)
Unit:RegisterEvent("uk_Phase5", 1000, 0)
end
end
function uk_Phase5(Unit, Event)
if Unit:GetHealthPct() < 54 then
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "Ahhh... The fifth path- the great Deathknight, the might of the Scourge.")
Unit:SetModel(16513)
Unit:RegisterEvent("uk_5spell1", 15000, 0)
Unit:RegisterEvent("uk_Phase6", 1000, 0)
end
end
function uk_Phase6(Unit, Event)
if Unit:GetHealthPct() < 45 then
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "My sixth path, the Hunter, stalker of the wild.")
Unit:SetModel(2206)
Unit:RegisterEvent("uk_summon1", 1000, 1)
Unit:RegisterEvent("uk_summon2", 1000, 1)
Unit:CastSpell(49067)
Unit:RegisterEvent("uk_Phase7", 1000, 0)
end
end
function uk_Phase7(Unit, Event)
if Unit:GetHealthPct() < 36 then
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "My seventh path, the Druid- warden of the forest.")
Unit:SetModel(21635)
Unit:RegisterEvent("uk_7spell1", 8000, 0)
Unit:RegisterEvent("uk_Phase8", 1000, 0)
end
end
function uk_Phase8(Unit, Event)
if Unit:GetHealthPct() < 27 then
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "The eighth path, the Shaman, calling upon the forces of the elements.")
Unit:SetModel(4542)
Unit:RegisterEvent("uk_8spell1", 10000, 0)
Unit:RegisterEvent("uk_Phase9", 1000, 0)
end
end
function uk_Phase9(Unit, Event)
if Unit:GetHealthPct() < 18 then
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "The ninth path, the priest, healing with the power of the Light or corrupting with the power of the Shadow.")
Unit:SetModel(1495)
Unit:RegisterEvent("uk_9spell1", 15000, 0)
Unit:RegisterEvent("uk_9spell2", 3000, 0)
Unit:RegisterEvent("uk_Phase10", 1000, 0)
end
end
function uk_Phase10(Unit, Event)
if Unit:GetHealthPct() < 9 then
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "The tenth path, the warlock, master of dark magic and destruction.")
Unit:SetModel(16309)
Unit:RegisterEvent("uk_10spell1", 2000, 0)
end
end
function uk_normalspell1 (Unit, Event)
Unit:CastSpell(38924)
end
function uk_1spell1 (Unit, Event)
Unit:FullCastSpellOnTarget(59035, Unit:GetMainTank())
end
function uk_1spell2 (Unit, Event)
Unit:FullCastSpellOnTarget(54132, Unit:GetRandomPlayer(1))
end
function uk_2spell1 (Unit, Event)
Unit:FullCastSpellOnTarget(28478, Unit:GetMainTank())
end
function uk_2spell2 (Unit, Event)
Unit:FullCastSpellOnTarget(54132, Unit:GetRandomPlayer(1))
end
function uk_3spell1 (Unit, Event)
Unit:FullCastSpellOnTarget(41978, Unit:GetMainTank())
end
function uk_3spell2 (Unit, Event)
Unit:FullCastSpellOnTarget(59409, Unit:GetRandomPlayer(1))
end
function uk_4spell1 (Unit, Event)
Unit:CastSpell(48817)
end
function uk_5spell1 (Unit, Event)
Unit:FullCastSpellOnTarget(55321, Unit:GetMainTank())
end
function uk_7spell1 (Unit, Event)
Unit:FullCastSpellOnTarget(54459, Unit:GetMainTank())
end
function uk_8spell1 (Unit, Event)
Unit:FullCastSpellOnTarget(61528, Unit:GetMainTank())
end
function uk_9spell1 (Unit, Event)
Unit:FullCastSpellOnTarget(46560, Unit:GetRandomPlayer(0))
end
function uk_9spell2 (Unit, Event)
Unit:FullCastSpellOnTarget(52722, Unit:GetMainTank())
end
function uk_10spell1 (Unit, Event)
Unit:FullCastSpellOnTarget(57374, Unit:GetMainTank())
end
function uk_summon1(Unit, Event)
local x = Unit:GetX();
local y = Unit:GetY();
local z = Unit:GetZ();
local o = Unit:GetO();
Unit:SpawnCreature (133707, x, y, z, o, 14 ,60000);
end
function uk_summon2(Unit, Event)
local x = Unit:GetX();
local y = Unit:GetY();
local z = Unit:GetZ();
local o = Unit:GetO();
Unit:SpawnCreature (133708, x, y, z, o, 14 ,60000);
end
function uk_OnLeaveCombat(Unit, Event)
Unit:RemoveEvents()
end
function uk_OnKilledTarget(Unit, Event)
Unit:SendChatMessage(14, 0, "Join the Dark Ones!")
end
function uk_OnDied(Unit, Event)
Unit:SendChatMessage(12, 0, "I... will... return....")
Unit:RemoveEvents()
Unit:SetModel(18194)
Unit:SetScale(0.3)
end
function uk_OnSpawn(Unit, Event)
Unit:RemoveEvents()
Unit:SetModel(16279)
end
RegisterUnitEvent(55555, 1, "uk_OnCombat")
RegisterUnitEvent(55555, 2, "uk_OnLeaveCombat")
RegisterUnitEvent(55555, 3, "uk_OnKilledTarget")
RegisterUnitEvent(55555, 4, "uk_OnDied")
RegisterUnitEvent(55555, 6, "uk_OnSpawn")