[Release] Black Temple Script

[mager1794]

script isn't finished but im working on it heres what i have
tell me what you think

function highwarlord_needlespine1(Unit, Event)
Unit:CastSpell(39835)
end

function highwarlord_needlespine(Unit, Event)
Unit:CastSpell(39992)
Unit:RegisterEvent("highwarlord_needlespine1",0, 0)
end

function highwarlord_impalingspine(unit)
local plr = unit:GetClosestPlayer()
if (plr ~= nil) then
unit:CastSpellOnTarget(39837, plr) 
local spruch = math.random(1,2)
if (spruch == 1) then
Unit:SendChatMessage(12,0, "Stick around!")
elseif (spruch == 2) then
Unit:sendChatMessage(12,0, "I'll deal with you later!")
end

function highwarlord_tidalshield(unit)
unit:CastSpell(39872)
unit:SendChatMessage(12,0, "Blood will flow! ")
end

function highwarlord_enrage(unit)
unit:CastSpell(46587)
Unit:SendChatMessage(12,0, "My patience has run out! Die, die!")
end

function highwarlord_KilledTarget(unit, Event)
local spruch = math.random(1,2)
if (spruch == 1) then
Unit:SendChatMessage(12,0, "Your success was short lived!")
elseif (spruch == 2) then
Unit:sendChatMessage(12,0, "Time for you... to go!")
end

function highwarlord_OnCombat(Unit, Event)
Unit:SendChatMessage(12,0, "You will die, in the name of Lady Vashj!)
Unit:RegisterEvent("highwarlord_needlespine",7500, 0)
Unit:RegisterEvent("highwarlord_enrage",480000, 0)
Unit:RegisterEvent("highwarlord_tidalshield",60000, 0)
Unit:RegisterEvent("highwarlord_impalingspine",20000, 0)
end

function highwarlord_OnDied(Unit, Event)
Unit:SendChatMessage(12,0, "Lord Illidan will... crush you.")
unit:RemoveEvents()
end


RegisterUnitEvent(22887, 1, "highwarlord_OnEnterCombat")
RegisterUnitEvent(22887, 3, "highwarlord_OnKilledTarget")
RegisterUnitEvent(22887, 4, "highwarlord_OnDied") 

function aqueouslord_Crashingwave(unit)
unit:CastSpell(40100)
end

function aqueouslord_spawn(unit)
	x = pUnit:GetX ()
	y = pUnit:GetY ()
	z = pUnit:GetZ ()
	o = pUnit:GetO ()
	
	pUnit:SpawnCreature (22883, x, y, z, o, 21, 21000)

	x = x + 9

	pUnit:SpawnCreature (22883, x, y, z, o, 21, 21000)
end

function aqueouslord_vileslime(unit)
local plr = unit:GetTank()
if (plr ~= nil) then
unit:CastSpell(40099)
end

function aqueouslord_OnCombat(unit, event)
Unit:RegisterEvent("aqueouslord_vileslime",7500, 0)
Unit:RegisterEvent("aqueouslord_spawn",32000, 0)
Unit:RegisterEvent("aqueouslord_Crashingwave",60000, 0)
end

RegisterUnitEvent(22878, 1, "aqueouslord_OnCombat")

function aqueousspawn_merge(unit)
unit:GetUnitBySqlId(22878)
unit:CastSpell(40106)
Unit:RegisterEvent("aqueousspawn_merge1",10000, 0)
end

function aqueousspawn_merge1(unit)
Unit:GetUnitBySqlId(22883)
unit:CastSpell(5)
end

function aqueousspawn_sludgenova(unit)
Unit:CastSpell(40103)
end

function aqueousspawn_OnCombat(unit, event)
Unit:RegisterEvent("aqueousspawn_merge",16000, 0)
Unit:RegisterEvent("aqueousspawn_sludgenova",5000, 0)
end

RegisterUnitEvent(22883, 1, "aqueousspawn_OnCombat")


function coilskargeneral_buff(unit)
unit:CastSpell(40080)
end

function coilskargeneral_OnCombat(Unit, Event)
Unit:RegisterEvent("coilskargeneral_buff",28000, 0)
end

RegisterUnitEvent(22873, 1, "coilskargeneral_OnCombat")

function coilskarharpoon_hookednet(unit)
local plr = unit:GetClosestPlayer()
if (plr ~= nil) then
Unit:CastSpell(40082, plr)
end

function coilskarharpoon_mark(unit)
local plr = unit:GetRandomPlayer()
if (plr ~= nil) then
Unit:CastSpell(40084, plr)
end

function coilskarharpoon_OnCombat(Unit, Event)
Unit:RegisterEvent("coilskarharpoon_mark",17000, 0)
Unit:RegisterEvent("coilskarharpoon_hookednet",14000, 0)
local plr = unit:GetClosestPlayer()
if (plr ~= nil) then
Unit:CastSpell(40083, plr)
end

RegisterUnitEvent(22874, 1, "coilskarharpoon_OnCombat")


function coilskarseacaller_spells(unit)
local spruch = math.random(1,2)
if (spruch == 1) then
Unit:CastSpell(40088)
elseif (spruch == 2) then
Unit:CastSpell(40090)
end

function coilskarseacaller_OnCombat(unit, event)
Unit:CastSpell(40091)
Unit:RegisterEvent("coilskarseacaller_spells",7000, 0)
end


RegisterUnitEvent(22875, 1, "coilskarseacaller_OnCombat")

function coilskarsooth_holynova(unit)
unit:CastSpell(40096)
end

function coilskarsooth_heal(unit)
local plr = unit:GetRandomFriend()
if (plr ~= nil) then
unit:CastSpell(40097, plr)
end

function coilskarsooth_OnCombat(unit, Event)
Unit:RegisterEvent("coilskarsooth_heal",13000, 0)
Unit:RegisterEvent("coilskarsooth_holynova",6000, 0)
end

RegisterUnitEvent(22876, 1, "coilskarsooth_OnCombat")

function coilskarwrang_cleave(unit)
Unit:CastSpell(15484)
end

function coilskarwrang_lightningprod(unit)
local plr = unit:GetRandomPlayer()
if (plr ~= nil) then
Unit:CastSpell(40066, plr)
end


function coilskarwrang_OnCombat(unit, Event)
Unit:RegisterEvent("coilskarwrang_lightningprod",7500, 0)
Unit:RegisterEvent("coilskarwrang_cleave",6000, 0)
Unit:CastSpell(40076)
end

RegisterUnitEvent(22877, 1, "coilskarwrang_OnCombat")


function dragonturtle_shield(unit)
Unit:CastSpell(40087)
end

function dragonturtle_spit(unit)
local plr = unit:GetRandomPlayer()
if (plr ~= nil) then
Unit:CastSpell(40086, plr)
end

function dragonturtle_OnCombat(unit, event)
Unit:RegisterEvent("dragonturtle_shield",17000, 0)
Unit:RegisterEvent("dragonturtle_spit",7000, 0)
end

RegisterUnitEvent(22885, 1, "dragonturtle_OnCombat")
 

function leviathan_spray(unit)
local plr = unit:GetRandomPlayer()
if (plr ~= nil) then
Unit:CastSpell(40079, plr)
end

function leviathan_spit(unit)
local plr = unit:GetRandomPlayer()
if (plr ~= nil) then
Unit:CastSpell(40078, plr)
end

function leviathan_sweep(unit)
Unit:CastSpell(40077)
end

function leviathan_OnCombat(unit, event)
Unit:RegisterEvent("leviathan_sweep",13000, 0)
Unit:RegisterEvent("leviathan_spit",8000, 0)
Unit:RegisterEvent("leviathan_spray",11000, 0)
end

RegisterUnitEvent(22884, 1, "leviathan_OnCombat")




function bonechewertask_Enrage(unit)
unit:CastSpell(40845)
unit:GetUnitBySqlId(22963)
unit:CastSpell(40851)
end

function bonechewtask_OnCombat(unit, event)
Unit:RegisterEvent("bonechewertask_Enrage",10000, 0)
end

RegisterUnitEvent(23028, 1, "bonechewtask_OnCombat")

function bonechewerwork_OnCombat(unit, event)
Unit:CastSpell(40844)
end

RegisterUnitEvent(22968, 1, "bonechwerwork_OnCombat")


function bonechewerwyrm_Cleave(unit)
Unit:FullCastSpell(15284)
end

function bonechewerwyrm_Fixate(unit)
local plr = unit:GetRandomPlayer
if (plr ~= nil) then
Unit:FullCastSpell(40892, plr)
end

function bonechewerwyrm_Jab(unit)
local plr = unit:GetMainTank
if (plr ~= nil) then
unit:CastSpell(40895, plr)
end

function bonechewerwyrm_OnCombat(unit, event)
Unit:RegisterEvent("bonechewerwyrm_Cleave",4000, 0)
Unit:RegisterEvent("bonechewerwyrm_Fixate",14000, 0)
Unit:RegisterEvent("bonechewerwyrm_Jab",3000, 0)
end

RegisterUnitEvent(22960, 1, "bonechwerwyrm_OnCombat")

function dragonmawskystalker_Arrow(unit)
Unit:FullCastSpell(40872)
end

function dragonmawskystalker_OnCombat(unit, event)
unit:FullCastSpell(40873)
Unit:RegisterEvent("dragonmawskystalker_Arrow",8000, 0)
end 

RegisterUnitEvent(23030, 1, "bonechwerskystalker_OnCombat")



function Fearbringer_Flames(unit)
Unit:CastSpell(40938)
end

function Fearbringer_Chaos(unit)
Unit:CastSpell(40946)
end

function Fearbringer_Stomp(unit)
Unit:FullCastSpell(40936)
end

function Fearbringer_OnCombat(Unit, Event)
Unit:RegisterEvent("Fearbringer_Flames",7000, 0)
Unit:RegisterEvent("Fearbringer_Chaos",14000, 0)
Unit:RegisterEvent("Fearbringer_Stomp",17000, 0)
end

RegisterUnitEvent(22954, 1, "Fearbringer_OnCombat")



function supremus_hateful(unit)
local plr = unit:GetAddTank
if (plr ~= nil) then
unit:CastSpell(41926, plr)
end

function supremus_flame(unit)
local plr = unit:GetRandomPlayer
if (plr ~= nil) then
unit:CastSpell(40255, plr)
end

function supremus_punch(unit)
local plr = unit:GetRandomPlayer
if (plr ~= nil) then
unit:CastSpell(40126, plr)
end 

function supremus_geyser(unit)
Unit:CastSpell(42052)
end

function supremus_gaze(unit)
local plr = unit:GetRandomPlayer
if (plr ~= nil) then
unit:CastSpell(40414, plr)
end

function supremus_Phase1(unit)
  pUnit:RemoveEvents();
Unit:RegisterEvent("supremus_flame",20000, 0)
Unit:RegisterEvent("supremus_hateful",14000, 0)
end

function supremus_Phase2(unit)
  pUnit:RemoveEvents();
Unit:RegisterEvent("supremus_punch",8000, 0)
Unit:RegisterEvent("supremus_geyser",14000, 0)
Unit:RegisterEvent("supremus_gaze",10000, 0)
end

function supremus_OnCombat(Unit, Event)
local spruch = math.random(1,2)
if (spruch == 1) then
Unit:RegisterEvent("supremus_Phase1",45000, 0)
elseif (spruch == 2) then
Unit:RegisterEvent("supremus_Phase2",45000, 0)
end

[Lilltimmy]

Hmm, Is that Real or did you just make it?

[TheSpidey]

You're missing 'end's for functions that have 'if' statments :P

[mager1794]

good eye spidey ill fix when i update it a bit : )

and yes motivet i wrote this script myself