[Release]2 LUA Scripts I Made

[Juicyz]

These are just some of the LUA Scripts I made for Some Bosses. Enjoy

Lord Of The Seven Elements Script

function Lord_Of_The_Seven_Elements_FireBoltVolley(pUnit, event)
print "Lord_Of_The_Seven_Elements_FireBoltVolley Initiated..."
pUnit:FullCastSpell(30282)
end

function Lord_Of_The_Seven_Elements_SearingBurns(pUnit, event)
if math.random() < 0.5 then
print "Lord_Of_The_Seven_Elements_SearingBurns Initiated..."
pUnit:FullCastSpellOnTarget(30127, pUnit:GetMainTank())
end
end

function Lord_Of_The_Seven_Elements_HolyFire(pUnit, event)
print "Lord_Of_The_Seven_Elements_HolyFire Initiated..."
pUnit:FullCastSpellOnTarget(28882, pUnit:GetRandomPlayer(0))
end


function Lord_Of_The_Seven_Elements_RemoveShield(pUnit, event)
print "Lord_Of_The_Seven_Elements_ShieldRemove Initiated..."
pUnit:RemoveAura(41367)
end

function Lord_Of_The_Seven_Elements_Shield(pUnit, event)
print "Lord_Of_The_Seven_Elements_Shield Initiated..."
pUnit:FullCastSpell(41367)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_RemoveShield", 5000, 1)
end

function Lord_Of_The_Seven_Elements_Hellfirethree(pUnit, event)
if pUnit:GetHealthPct() < 25 then
Dothat=3;
print "Lord_Of_The_Seven_Elements_Hellfirethree Initiated..."
pUnit:StopMovement(6200)
pUnit:RemoveEvents()
pUnit:FullCastSpell(34659)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_FireBoltVolley", 13000, 0)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_SearingBurns", 16000, 0)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_HolyFire", 19000, 0)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_Shield", 1100, 1)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_PlayerLowHp", 100, 0)
end
end

function Lord_Of_The_Seven_Elements_Hellfiretwo(pUnit, event)
if pUnit:GetHealthPct() < 50 then
Dothat=2;
print "Lord_Of_The_Seven_Elements_Hellfiretwo Initiated..."
pUnit:StopMovement(6200)
pUnit:RemoveEvents()
pUnit:FullCastSpell(34659)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_FireBoltVolley", 13000, 0)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_SearingBurns", 16000, 0)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_HolyFire", 19000, 0)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_Hellfirethree", 1000, 0)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_Shield", 1100, 1)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_PlayerLowHp", 100, 0)
end
end

function Lord_Of_The_Seven_Elements_Hellfire(pUnit, event)
if pUnit:GetHealthPct() < 75 then
Dothat=1;
print "Lord_Of_The_Seven_Elements_Hellfire Initiated..."
pUnit:StopMovement(6200)
pUnit:RemoveEvents()
pUnit:FullCastSpell(34659)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_FireBoltVolley", 13000, 0)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_SearingBurns", 16000, 0)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_HolyFire", 19000, 0)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_Hellfiretwo", 1000, 0)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_Shield", 1100, 1)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_PlayerLowHp", 100, 0)
end
end

function Lord_Of_The_Seven_Elements_PlayerLowHp(pUnit, event)
Enemy=pUnit:GetRandomPlayer(0);
if Enemy:GetHealthPct() < 15 and pUnit:IsInCombat() then
print "Lord_Of_The_Seven_Elements_PlayerLowHp Initiated..."
pUnit:RemoveEvents()
pUnit:SendChatMessage(12, 0, "I have had enough of you!")
pUnit:FullCastSpell(30616)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_FireBoltVolley", 13000, 0)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_SearingBurns", 16000, 0)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_HolyFire", 19000, 0)

if Dothat == 0 then
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_Hellfire", 1000, 0)
end

if Dothat == 1 then
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_Hellfiretwo", 1000, 0)
end
if Dothat == 2 then
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_Hellfirethree", 1000, 0)
end
end
end

function Lord_Of_The_Seven_Elements_RemoveRezSickness(pUnit, event)
player=pUnit:GetRandomPlayer(0);
player:RemoveAura(15007)
end

function Lord_Of_The_Seven_Elements_OnEnterCombat(pUnit, event)
print "Lord_Of_The_Seven_Elements_Aggro initiated..."
pUnit:SendChatMessage(12, 0, "You will Die for this Disturbance!")
Dothat=0;
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_FireBoltVolley", 13000, 0)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_SearingBurns", 16000, 0)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_HolyFire", 19000, 0)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_Hellfire", 1000, 0)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_PlayerLowHp", 100, 0)
pUnit:RegisterEvent("Lord_Of_The_Seven_Elements_RemoveRezSickness", 50, 40)
end

RegisterUnitEvent(70076, 1, "Lord_Of_The_Seven_Elements_OnEnterCombat")

function Lord_Of_The_Seven_Elements_OnWipe(pUnit, event)
print "Lord_Of_The_Seven_Elements_Wipe Initiated..."
pUnit:RemoveEvents()
end

RegisterUnitEvent(70076, 2, "Lord_Of_The_Seven_Elements_OnWipe")

function Lord_Of_The_Seven_Elements_OnDie(pUnit, event)
print "Lord_Of_The_Seven_Elements_Dies Initiated..."
pUnit:RemoveEvents()
pUnit:SendChatMessage(12, 0, "You have won, Younglings. But without me... this world... will Rot away...")
end

RegisterUnitEvent(70076, 4, "Lord_Of_The_Seven_Elements_OnDie")

Fire King Of The Bog and His Guards

function Fire_King_Of_The_BogDeafeningRoarThree(pUnit, event)
if pUnit:GetHealthPct() < 25 then
print "Fire_King_Of_The_Bog_DeafeningRoar Initiated..."
pUnit:RemoveEvents()
pUnit:CastSpell(38850)
pUnit:RegisterEvent("Fire_King_Of_The_BogCleave", 17000, 0)
pUnit:RegisterEvent("Fire_King_Of_The_BogFear", 21000, 0)
end
end

function Fire_King_Of_The_BogDeafeningRoarTwo(pUnit, event)
if pUnit:GetHealthPct() < 50 then
print "Fire_King_Of_The_Bog_DeafeningRoar Initiated..."
pUnit:RemoveEvents()
pUnit:CastSpell(38850)
pUnit:RegisterEvent("Fire_King_Of_The_BogCleave", 17000, 0)
pUnit:RegisterEvent("Fire_King_Of_The_BogFear", 21000, 0)
pUnit:RegisterEvent("Fire_King_Of_The_BogDeafeningRoarThree", 1000, 0)
end
end

function Fire_King_Of_The_BogDeafeningRoar(pUnit, event)
if pUnit:GetHealthPct() < 75 then
print "Fire_King_Of_The_Bog_DeafeningRoar Initiated..."
pUnit:RemoveEvents()
pUnit:CastSpell(38850)
pUnit:RegisterEvent("Fire_King_Of_The_BogCleave", 17000, 0)
pUnit:RegisterEvent("Fire_King_Of_The_BogFear", 21000, 0)
pUnit:RegisterEvent("Fire_King_Of_The_BogDeafeningRoarTwo", 1000, 0)
end
end

function Fire_King_Of_The_BogCleave(pUnit, event)
print "Fire_King_Of_The_Bog_Cleave Initiating..."
pUnit:FullCastSpellOnTarget(31043, pUnit:GetMainTank())
end

function Fire_King_Of_The_BogFear(pUnit, event)
print "Fire_King_Of_The_Bog_fear Initiated..."
pUnit:FullCastSpellOnTarget(30530, pUnit:GetRandomPlayer(0))
end

function Fire_King_Of_The_BogTheFierce_RemoveRezSickness(pUnit, event)
player=pUnit:GetRandomPlayer(0);
player:RemoveAura(15007)
end

function Fire_King_Of_The_BogTheFierce_OnEnterCombat(pUnit, event)
print "Fire_King_Of_The_Bog_Aggro Initiating..."
pUnit:SendChatMessage(12, 0, "Sentinels, Help me in destroying these Rodents!")
print "Fire_King_Of_The_BogSpawnAdds initiating..."
pUnit:SpawnCreature(70063, -4834.209961, -1083.189941, 458.282990, 90, 14, 0)
pUnit:SpawnCreature(70063, -4834.496582, -1085.729126, 458.427917, 90, 14, 0)
pUnit:SpawnCreature(70063, -4834.881836, -1088.132568, 458.466556, 90, 14, 0)
pUnit:RegisterEvent("Fire_King_Of_The_BogCleave", 17000, 0)
pUnit:RegisterEvent("Fire_King_Of_The_BogFear", 21000, 0)
pUnit:RegisterEvent("Fire_King_Of_The_BogDeafeningRoar", 1000, 0)
pUnit:RegisterEvent("Fire_King_Of_The_BogTheFierce_RemoveRezSickness", 50, 40)
end

RegisterUnitEvent(70064, 1, "Fire_King_Of_The_BogTheFierce_OnEnterCombat")

function Fire_King_Of_The_BogTheFierce_Wipe(pUnit, event)
print "Fire_King_Of_The_Bog_Wipe Initiating..."
pUnit:RemoveEvents()
end

RegisterUnitEvent(70064, 2, "Fire_King_Of_The_BogTheFierce_Wipe")

function Fire_King_Of_The_BogTheFierce_Dies(pUnit, event)
print "Fire_King_Of_The_Bog_Dies Initiating..."
pUnit:SendChatMessage(12, 0, "You may have bested me... but My Lord Will Kill You")
pUnit:RemoveEvents()
end

RegisterUnitEvent(70064, 4, "Fire_King_Of_The_BogTheFierce_Dies")

/////////////////////////////Fire_King_Of_The_Bog Guard/////////////////////////////////
function Fire_King_Of_The_BogGuard_Whirlwind(pUnit, event)
if math.random() > 0.5 then
print "Fire_King_Of_The_BogGuardWhirlwind Initiating..."
pUnit:FullCastSpell(33500)
end
end

function Fire_King_Of_The_BogGuard_OnEnterCombat(pUnit, event)
print "Fire_King_Of_The_BogGuardAggro Initiating..."
pUnit:SendChatMessage(11, 0, "I Will Do My Best!")
pUnit:RegisterEvent("Fire_King_Of_The_BogGuard_Whirlwind", 3000, 0)
end

RegisterUnitEvent(70063, 1, "Fire_King_Of_The_BogGuard_OnEnterCombat")

function Fire_King_Of_The_BogGuard_OnWipe(pUnit, event)
print "Fire_King_Of_The_BogGuardWipe Initiating..."
pUnit:RemoveEvents()
pUnitdespawn(1000, 0)
end

RegisterUnitEvent(70063, 2, "Fire_King_Of_The_BogGuard_OnWipe")

function Fire_King_Of_The_BogGuard_OnDeath(pUnit, event)
print "Fire_King_Of_The_BogGuardDies Initiating..."
pUnit:RemoveEvents()
end

RegisterUnitEvent(70063, 4, "Fire_King_Of_The_BogGuard_OnDeath

Feel Free To Leech Or Do What Ever You Want Too....... Dont Post On Other Sites Without My Consent. (Big Word) Thank You

[SectorSeven]

You need to fix the way they are displayed... use quotes if code doesn't work

[Juicyz]

lolz oops WTH
I had them fixed but now they messed up more!!!!! damn!


FIXED!

[2dgreengiant]

just 2 scripts?

[TheSpidey]

Better than nothing

[Juicyz]

lolz Ill add more If U really want it.......

[Juicyz]

lolz.... Bump My Thread went away