[2.4][LUA] The Boss Scripts!

[BrantX]

BrantX Presents!
The 2.4 Boss Scripts!
of Blua - The Return.


These bosses are Mostly Blizz-Like!
Revision 44: /Stable/Blizzlike/2.4
is the original placement!

Anyway here we go!

Selin Fireheart - First boss of Magisters' Terrace.
Video shown here! ImageShack - Hosting :: selinfireheartwr0.flv
Yes the video is old and its out-dated but its still a example!
LUA Script is here.

-- This script is Scripted by BrantX of Blua.
-- This is free for everyone to use...
-- This can be released but Proper Credits must be given.
-- Enjoy
-- The end of Terms 


function Sellin_OnKill(pUnit,Event)
	pUnit:SendChatMessage(14, 0, "Enough distractions!")
	pUnit:PlaySoundToSet(12388)
end

function Selin_EnterCombat(pUnit,Event)
	pUnit:SendChatMessage(14, 0, "You only waste my time!")
	pUnit:PlaySoundToSet(12378)
pUnit:RegisterEvent("phase_1",1000, 0)
end

-- He Drains Mana from a Crsytal!
function phase_1(pUnit, Event)
 if pUnit:GetHealthPct() < 99 then
  pUnit:RemoveEvents();
	pUnit:FullCastSpellOnTarget(46153,pUnit:GetRandomFriend())
	pUnit:SendChatMessage(14, 0, "My hunger knows no bounds!")
	pUnit:PlaySoundToSet(12381)
  pUnit:RegisterEvent("phase_2",1000, 0)
 end
end
 
-- Empower and then casts Fel-Explosion
function phase_2(pUnit, Event)
 if pUnit:GetHealthPct() < 98 then
  pUnit:RemoveEvents();
	pUnit:SendChatMessage(14, 0, "Yes! I am a god!")
	pUnit:PlaySoundToSet(12382)
	pUnit:SetScale(2)
	pUnit:FullCastSpellOnTarget(44314,pUnit:GetClosestPlayer())
  pUnit:RegisterEvent("phase_3",1000, 0)
 end
end
 
-- De-Power
function phase_3(pUnit, Event)
 if pUnit:GetHealthPct() < 96 then
  pUnit:RemoveEvents();
	pUnit:SendChatMessage(14, 0, "No! More... I must have more! ")
	pUnit:PlaySoundToSet(12383)
	pUnit:FullCastSpellOnTarget(44314,pUnit:GetClosestPlayer())
	pUnit:SetScale(1)
  pUnit:RegisterEvent("phase_4",1000, 0)
 end
end
 
-- Rinse and Repeat!
function phase_4(pUnit, Event)
 if pUnit:GetHealthPct() < 91 then
  pUnit:RemoveEvents();
	pUnit:FullCastSpellOnTarget(46153,pUnit:GetRandomFriend())
	pUnit:SendChatMessage(14, 0, "My hunger knows no bounds!")
	pUnit:PlaySoundToSet(12381)
  pUnit:RegisterEvent("phase_5",1000, 0)
 end
end


function phase_5(pUnit, Event)
 if pUnit:GetHealthPct() < 90 then
  pUnit:RemoveEvents();
	pUnit:SendChatMessage(14, 0, "Yes! I am a god!")
	pUnit:PlaySoundToSet(12382)
	pUnit:SetScale(2)
	pUnit:FullCastSpellOnTarget(44314,pUnit:GetClosestPlayer())
  pUnit:RegisterEvent("phase_6",1000, 0)
 end
end


function phase_6(pUnit, Event)
 if pUnit:GetHealthPct() < 76 then
  pUnit:RemoveEvents();
	pUnit:SendChatMessage(14, 0, "No! More... I must have more! ")
	pUnit:PlaySoundToSet(12383)
	pUnit:FullCastSpellOnTarget(44314,pUnit:GetClosestPlayer())
	pUnit:SetScale(1)
  pUnit:RegisterEvent("phase_7",1000, 0)
 end
end


function phase_7(pUnit, Event)
 if pUnit:GetHealthPct() < 71 then
  pUnit:RemoveEvents();
	pUnit:FullCastSpellOnTarget(46153,pUnit:GetRandomFriend())
	pUnit:SendChatMessage(14, 0, "My hunger knows no bounds!")
	pUnit:PlaySoundToSet(12381)
  pUnit:RegisterEvent("phase_8",1000, 0)
 end
end


function phase_8(pUnit, Event)
 if pUnit:GetHealthPct() < 70 then
  pUnit:RemoveEvents();
	pUnit:SendChatMessage(14, 0, "Yes! I am a god!")
	pUnit:PlaySoundToSet(12382)
	pUnit:SetScale(2)
	pUnit:FullCastSpellOnTarget(44314,pUnit:GetClosestPlayer())
  pUnit:RegisterEvent("phase_9",1000, 0)
 end
end


function phase_9(pUnit, Event)
 if pUnit:GetHealthPct() < 63 then
  pUnit:RemoveEvents();
	pUnit:SendChatMessage(14, 0, "No! More... I must have more! ")
	pUnit:PlaySoundToSet(12383)
	pUnit:FullCastSpellOnTarget(44314,pUnit:GetClosestPlayer())
	pUnit:SetScale(1)
  pUnit:RegisterEvent("phase_10",1000, 0)
 end
end


function phase_10(pUnit, Event)
 if pUnit:GetHealthPct() < 59 then
  pUnit:RemoveEvents();
	pUnit:FullCastSpellOnTarget(46153,pUnit:GetRandomFriend())
	pUnit:SendChatMessage(14, 0, "My hunger knows no bounds!")
	pUnit:PlaySoundToSet(12381)
  pUnit:RegisterEvent("phase_11",1000, 0)
 end
end



function phase_11(pUnit, Event)
 if pUnit:GetHealthPct() < 55 then
  pUnit:RemoveEvents();
  pUnit:FullCastSpell(44314,pUnit:GetClosestPlayer())
  pUnit:RegisterEvent("phase_12",1000, 0)
 end
end


function phase_12(pUnit, Event)
 if pUnit:GetHealthPct() < 53 then
  pUnit:RemoveEvents();
  pUnit:FullCastSpell(44314,pUnit:GetClosestPlayer())
  pUnit:RegisterEvent("phase_13",1000, 0)
 end
end


function phase_13(pUnit, Event)
 if pUnit:GetHealthPct() < 49 then
  pUnit:RemoveEvents();
	pUnit:SendChatMessage(14, 0, "No! More... I must have more! ")
	pUnit:PlaySoundToSet(12383)
	pUnit:FullCastSpellOnTarget(44314,pUnit:GetClosestPlayer())
	pUnit:SetScale(1)
  pUnit:RegisterEvent("phase_14",1000, 0)
 end
end


function phase_14(pUnit, Event)
 if pUnit:GetHealthPct() < 46 then
  pUnit:RemoveEvents();
  pUnit:FullCastSpell(44314,pUnit:GetClosestPlayer())
  pUnit:RegisterEvent("phase_15",1000, 0)
 end
end

function phase_15(pUnit, Event)
 if pUnit:GetHealthPct() < 42 then
  pUnit:RemoveEvents();
  pUnit:FullCastSpell(44314,pUnit:GetClosestPlayer())
  pUnit:RegisterEvent("phase_16",1000, 0)
 end
end


function phase_16(pUnit, Event)
 if pUnit:GetHealthPct() < 39 then
  pUnit:RemoveEvents();
	pUnit:FullCastSpellOnTarget(46153,pUnit:GetRandomFriend())
	pUnit:SendChatMessage(14, 0, "My hunger knows no bounds!")
	pUnit:PlaySoundToSet(12381)
  pUnit:RegisterEvent("phase_17",1000, 0)
 end
end


function phase_17(pUnit, Event)
 if pUnit:GetHealthPct() < 36 then
  pUnit:RemoveEvents();
  pUnit:FullCastSpell(44314,pUnit:GetClosestPlayer())
  pUnit:RegisterEvent("phase_18",1000, 0)
 end
end


function phase_18(pUnit, Event)
 if pUnit:GetHealthPct() < 34 then
  pUnit:RemoveEvents();
  pUnit:FullCastSpell(44314,pUnit:GetClosestPlayer())
  pUnit:RegisterEvent("phase_19",1000, 0)
 end
end


function phase_19(pUnit, Event)
 if pUnit:GetHealthPct() < 30 then
  pUnit:RemoveEvents();
	pUnit:SendChatMessage(14, 0, "No! More... I must have more! ")
	pUnit:PlaySoundToSet(12383)
	pUnit:FullCastSpellOnTarget(44314,pUnit:GetClosestPlayer())
	pUnit:SetScale(1)
  pUnit:RegisterEvent("phase_20",1000, 0)
 end
end


function phase_20(pUnit, Event)
 if pUnit:GetHealthPct() < 26 then
  pUnit:RemoveEvents();
  pUnit:FullCastSpell(44314,pUnit:GetClosestPlayer())
  pUnit:RegisterEvent("phase_21",1000, 0)
 end
end


function phase_21(pUnit, Event)
 if pUnit:GetHealthPct() < 22 then
  pUnit:RemoveEvents();
  pUnit:FullCastSpell(44314,pUnit:GetClosestPlayer())
  pUnit:RegisterEvent("phase_22",1000, 0)
 end
end


function phase_22(pUnit, Event)
 if pUnit:GetHealthPct() < 18 then
  pUnit:RemoveEvents();
  pUnit:FullCastSpell(44314,pUnit:GetClosestPlayer())
  pUnit:RegisterEvent("phase_23",1000, 0)
 end
end


function phase_23(pUnit, Event)
 if pUnit:GetHealthPct() < 14 then
  pUnit:RemoveEvents();
  pUnit:FullCastSpell(44314,pUnit:GetClosestPlayer())
  pUnit:RegisterEvent("phase_24",1000, 0)
 end
end


function phase_24(pUnit, Event)
 if pUnit:GetHealthPct() < 10 then
  pUnit:RemoveEvents();
  pUnit:FullCastSpell(44314,pUnit:GetClosestPlayer())
  pUnit:RegisterEvent("phase_25",1000, 0)
 end
end


function phase_25(pUnit, Event)
 if pUnit:GetHealthPct() < 09 then
  pUnit:RemoveEvents();
	  pUnit:FullCastSpell(44314,pUnit:GetClosestPlayer())
	pUnit:FullCastSpellOnTarget(46155,pUnit:GetClosestPlayer())
  pUnit:RegisterEvent("phase_26",1000, 0)
 end
end


function phase_26(pUnit, Event)
 if pUnit:GetHealthPct() < 05 then
  pUnit:RemoveEvents();
	pUnit:FullCastSpellOnTarget(46153,pUnit:GetRandomFriend())
	pUnit:SendChatMessage(14, 0, "My hunger knows no bounds!")
	pUnit:PlaySoundToSet(12381)
  pUnit:FullCastSpell(44314,pUnit:GetClosestPlayer())
  pUnit:RegisterEvent("phase_27",1000, 0)
 end
end


function phase_27(pUnit, Event)
 if pUnit:GetHealthPct() < 04 then
  pUnit:RemoveEvents();
  pUnit:FullCastSpell(34807)
	pUnit:SendChatMessage(14, 0, "Yes! I am a god!")
	pUnit:PlaySoundToSet(12382)
	pUnit:SetScale(2)
	pUnit:FullCastSpellOnTarget(44314,pUnit:GetClosestPlayer())
	pUnit:FullCastSpellOnTarget(46155,pUnit:GetClosestPlayer())
  pUnit:RegisterEvent("phase_28",1000, 0)
 end
end

function phase_28(pUnit, Event)
 if pUnit:GetHealthPct() < 03 then
  pUnit:RemoveEvents();
  pUnit:FullCastSpell(44314,pUnit:GetClosestPlayer())
  pUnit:RegisterEvent("phase_29",1000, 0)
 end
end

function phase_29(pUnit, Event)
 if pUnit:GetHealthPct() < 02 then
  pUnit:RemoveEvents();
	pUnit:SendChatMessage(14, 0, "No! More... I must have more! ")
	pUnit:PlaySoundToSet(12383)
	pUnit:FullCastSpellOnTarget(44314,pUnit:GetClosestPlayer())
	pUnit:SetScale(1)
  end
end


function Selin_Start(pUnit, Event)
 pUnit:RegisterEvent("phase_1",1000, 0)
end


RegisterUnitEvent(24723, 1, "Selin_Start")
RegisterUnitEvent(24723, 3, "Sellin_OnKill")
RegisterUnitEvent(24723, 1, "Selin_EnterCombat")

http://svn.assembla.com/svn/Blua/Sta..._Fireheart.lua

Vexallus - The Second boss of Magisters' Terrace!
Video is coming soon!
LUA Script here!

-- Vexallus
-- Created by BrantX of Blua.
-- Lets beging with the basic stuff
function Vex_OnKill(pUnit,Event)
	pUnit:SendChatMessage(14, 0, "Con...sume.")
	pUnit:PlaySoundToSet(12393)
  end

  
-- Don't erase the register event because it makes him cast the spell every 3 seconds.
function Vex_OnCombat(pUnit, Event)
pUnit:RegisterEvent("Vex_Arcane", 3000, 8)
	pUnit:SendChatMessage(14, 0, "Drain... life...")
	pUnit:PlaySoundToSet(12389)
end
-- This casts the spell every 3 seconds i think.
-- Spell is Arcane Shock, http://www.wowhead.com/?spell=44319
-- Now its time to script!
function Vex_Arcane(pUnit, Event)
c = math.random(10);
if (c < 7) then
   pUnit:FullCastSpellOnTarget(44319, pUnit:GetClosestPlayer(0))
    pUnit:SendChatMessage(14, 0, "Un...con...tainable.")
	pUnit:PlaySoundToSet(12392)
   end
end



-- Main case of Overload, Don't erase.
function Vex_CastOverload(pUnit,Event)
 if pUnit:GetHealthPct() < 10 then
pUnit:RegisterEvent("Vex_Overload", 2500, 8)
end
end

-- The spell Overload is casted in this function.
function Vex_Overload(pUnit, Event)
c = math.random(10);
if (c < 7) then
	pUnit:FullCastSpellOnTarget(44353, pUnit:GetClosestPlayer())
	pUnit:SendChatMessage(14, 0, "Un...leash...")
	pUnit:PlaySoundToSet(12390)
	  end
	end





-- Mob/Add spawns.. I Freaking hate these...
function Vex_Adds(pUnit,Event)
 if pUnit:GetHealthPct() < 85 then
 if pUnit:GetHealthPct() < 70 then
 if pUnit:GetHealthPct() < 55 then
 if pUnit:GetHealthPct() < 40 then
 if pUnit:GetHealthPct() < 25 then
	pUnit:SpawnCreature(24745, 231, -207, 6, 0, 16, 60000)
	end
   end
  end
 end
end
end

RegisterUnitEvent(24744, 3, "Vex_OnKill")
RegisterUnitEvent(24744, 1, "Vex_OnCombat")
RegisterUnitEvent(24744, 1, "Vex_CastOverload")
RegisterUnitEvent(24744, 1, "Vex_Adds")

http://svn.assembla.com/svn/Blua/Sta...xallus_Fix.lua

Vexallus_Adds - Vexallus Adds Script
Video will be coming soon!
LUA is here.

-- Vexallus-Adds.lua
function Add_Death(pUnit,Event)
	pUnit:FullCastSpellOnTarget(44335,pUnit:GetClosestPlayer())
end

function Add_Spell(pUnit,Event)
	pUnit:FullCastSpellOnTarget(44342,pUnit:GetRandomPlayer())
end

RegisterUnitEvent(24745, 1, "Add_Spell")
RegisterUnitEvent(24745, 4, "AddDeath")

http://svn.assembla.com/svn/Blua/Sta...xallus-Add.lua

Kil'Jaeden - The Final Boss of Sunwell Plateau.
Video will be coming soon!
LUA is here!

-- This script was lua scripted by BrantX and himself only, everything below is not a blizz-like encounter
-- but it is as close as i can get to Blizz-Like...
-- Please do not Re-Post, Re-Create, or Re-Upload this file on another website...
-- If it is found on another Website that is not posted by BrantX... Please Report me or Contact me
-- If any more help on this repack please contact me, or just ask on the thread... Enjoy!
--      					- BrantX


-- The OnKill and OnCombat stuff... Emerge is with this to...
function Kil_OnKill (pUnit, Event)
	pUnit:SendChatMessage(14, 0, "Another step towards destruction!")
	pUnit:PlaySoundToSet(12501)
end

function Kil_EnterCombat (pUnit, Event)
	pUnit:SendChatMessage(14, 0, "The expendible have perished... So be it! Now I shall succeed where Sargeras could not! I will bleed this wretched world and secure my place as the true master of the Burning Legion. The end has come! Let the unraveling of this world commence!")
	pUnit:PlaySoundToSet(12500)
	pUnit:CastSpell(35177)
end

-- Begin Phases
-- BrantX Comment --
-- Phase 01, is when the Hand of Kil'Jaeden are draining Aveena and are there when aggroed, when they die kil'jaeden spawns, i'll work on these scripts in the future...
-- THIS IS PHASE 02, THE SCRIPTS WITH KIL_PHASE01-*ID* ARE JUST PRE-PHASES.
function Kil_Phase01 (pUnit, Event)
 if pUnit:GetHealthPct() < 99 then
	pUnit:FullCastSpellOnTarget(45442,pUnit:GetRandomPlayer(O))
	pUnit:RegisterEvent("Kil_Phase02",1000, 0)
   end
end

-- BrantX Comment --
-- This is phase 2.02, This casts Legion Lightning...
function Kil_Phase02 (pUnit,Event)
 if pUnit:GetHealthPct() < 93 then
	pUnit:FullCastSpellOnTarget(45664,pUnit:GetRandomPlayer())
	pUnit:RegisterEvent("Kil_Phase03",1000, 0)
   end
end

-- BrantX Comment --
-- This is phase 2.03, This casts Legion Fire bloom...
function Kil_Phase03 (pUnit,Event)
 if pUnit:GetHealthPct() < 85 then
	pUnit:FullCastSpellOnTarget(45642,pUnit:GetRandomPlayer(O))
	pUnit:FullCastSpellOnTarget(45642,pUnit:GetMainTank())
	pUnit:SendChatMessage(14, 0, "I will not be denied! This world shall fall!")
	pUnit:PlaySoundToSet(12508)
	pUnit:RegisterEvent("Kil_Phase04",1000, 0)
   end
end

-- BrantX Comment --
-- The Summon Shield Orb spell isn't found.. i have to manually do it but i will in a update... --
-- END THE SECOND(02) PHASE OF KILJAEDEN! TIME TO MOVE ON --

-- Phase 03 of Kil'Jaeden, Gets different here... --
function Kil_Phase04 (pUnit,Event)
 if pUnit:GetHealthPct() < 81 then
-- This is suppost to be Sinister Reflection, Can't find will move on --
	pUnit:RegisterEvent("Kil_Phase05",1000, 0)
   end
end

-- BrantX Comment --
-- Easyily Done --
function Kil_Phase05 (pUnit,Event)
 if pUnit:GetHealthPct() < 73 then
	pUnit:FullCastSpellOnTarget(45885,pUnit:GetRandomPlayer(O))
	pUnit:RegisterEvent("Kil_Phase06",1000, 0)
   end
end
 
 -- BrantX Comment --
 -- Easily Done --
function Kil_Phase06 (pUnit,Event)
 if pUnit:GetHealthPct() < 64 then
	pUnit:FullCastSpellOnTarget(45746,pUnit:GetRandomPlayer(O))
	pUnit:RegisterEvent("Kil_Phase07",1000, 0)
   end
end

-- BrantX Comment --
-- The Another Skip on Spells, Can't Find its  Summon Shield Orb only 1... --
function Kil_Phase07 (pUnit,Event)
 if pUnit:GetHealthPct() < 60 then
 pUnit:RegisterEvent("Kil_Phase08",1000, 0)
   end
end

-- BrantX Comment --
-- Begings to Channel! --
function Kil_Phase08 (pUnit,Event)
 if pUnit:GetHealthPct() < 57 then
	pUnit:Emote(404)
	pUnit:RegisterEvent("Kil_Phase09",1000, 0)
   end
end

-- BrantX Comment --
-- The Legendary, 47500-52500 Shadow Damaged Spell... Darkness of a Thousand Souls --
function Kil_Phase09 (pUnit,Event)
 if pUnit:GetHealthPct() < 56 then
	pUnit:Emote(0)
	pUnit:FullCastSpellOnTarget(45657,pUnit:GetClosestPlayer())
	pUnit:RegisterEvent("Kil_Phase10",1000, 0)
   end
end

-- BrantX Comment --
-- The end of Phase 03 now on to 04! not alot --
-- Sheilds arn't found so i will use Meteor Slam, if found please tell so i can re-write the script, Spell is Summon Shield Orb x3 --
function Kil_Phase10 (pUnit,Event)
 if pUnit:GetHealthPct() < 55 then
	pUnit:SendChatMessage(14, 0, "Do not harbor false hope. You cannot win!")
	pUnit:PlaySoundToSet(12509)
	pUnit:FullCastSpellOnTarget(45150,pUnit:GetClosestPlayer())
	pUnit:RegisterEvent("Kil_Phase11",1000, 0)
   end
end

-- BrantX Comment --
-- The Meteors --
function Kil_Phase11 (pUnit,Event)
 if pUnit:GetHealthPct() < 48 then
	pUnit:FullCastSpellOnTarget(41276,pUnit:GetClosestPlayer())
	pUnit:RegisterEvent("Kil_Phase12",1000, 0)
   end
end
-- THE END OF PHASE 04, NOW TO 05 THE LAST ONE!!! --

-- BrantX Comment --
-- Easy... Get to 25% and fight on... lol --
function Kil_Phase12 (pUnit,Event)
 if pUnit:GetHealthPct() < 25 then
	pUnit:CastSpell(46474)
	pUnit:SendChatMessage(14, 0, "Aggghh! The powers of the Sunwell... turn... against me! What have you done? What have you done???")
	pUnit:PlaySoundToSet(12510)
   end
end
-- The end of phase 05, wasn't that phase long?!?! -- 

-- This makes the phases playable! --
function Kil_start(pUnit, Event)
 pUnit:RegisterEvent("Kil_01",1000, 0)
end
-- End --




-- Register Unit Events --
RegisterUnitEvent (25315, 1, "Kil_start")
RegisterUnitEvent (25315, 3, "Kil_OnKill")
RegisterUnitEvent (25315, 1, "Kil_EnterCombat")

http://svn.assembla.com/svn/Blua/Sta..._KilJaeden.lua



Well there you are! If you want any more GOOD and FUN scripts that are created by Blua. You will know where to go! Enjoy these scripts as they were made for fun! nothing else!

NOTE/TERM. :
These scripts are for public use. They should not be re-released without credits! You may release if proper credits are given to the rightful owners. Blua. If these are stolen and credits are un-proper. Actions will be resulted. Enjoy!

[Moffeman]

Thats awesome BrantX

cant rep you, gotta spread

[BrantX]

Thanks Moffeman, All these scripts and more are posted/created by me and/or Blua.

[Entr0py]

****IN FINALY BRAAAAAAANT
lol
gj
+Repx2

[Mythers]

This is awesome!

Rep to you ^^

[Arthas117]

I'm proud to have teached both you and Moffeman lua

This is sick BrantX :O You're better than Moon++ :O

Edit: I didn't really teach you that pUnit stuff :/...or dunno can't remember lol

[BrantX]

Thanks guys for the feedback and Arthas117... i still love you ( in a gay way... I MEAN NOT! )

[latruwski]

i like it +rep m8

[BrantX]

Thanks Latruwski. That means alot from you i guess :P

[ungodlywow]

Thank you, if I could rep, I would .


*I know I just made 3 posts in a row, but Im thanking people that have helped me.

[BrantX]

Yeah... Well more scripts will be coming shortly...

[b!atch]

You know.. All these have alrdy been released xE

[Entr0py]

brants kiljaeden script is totaly sexy tho

[b!atch]

Idk about that. Never tested it:b

[BrantX]

B!atch don't ruin the moment.... Thats not cool...