Custom Lua`s (Post all your custom lua`s of any kind bosses anything)

[Chrispee]

Guys i have seen to much of threads with some scripted bosses or such so if Gast decides to keep this thread pls post all your lua`s here


Tks Chrispee

[Snailz]

Seems As This Thread Should Be Used. Ill Post Something i Made.

LUA :

function Boss_Spell1(Unit)
    Unit:CastSpell(30616)
end

function Boss_Spell2(Unit)
    Unit:CastSpell(45855)
end

function Boss_Spell3(Unit)
    Unit:CastSpell(30616)
end

function Boss_Spell4(Unit)
    Unit:CastSpell(16803)
end

function Boss_Spell5(Unit)
    Unit:CastSpell(27805)
end




function Boss_Phase1(Unit, event)
    if Unit:GetHealthPct() < 95 then
        Unit:RemoveEvents()
        Unit:SendChatMessage(11, 0, "You Are Doing Well .. So Far")
        Unit:CastSpellOnTarget(40875, Unit:GetRandomPlayer(0)) 
        Unit:CastSpellOnTarget(40875, Unit:GetRandomPlayer(0)) 
        Unit:CastSpellOnTarget(40875, Unit:GetRandomPlayer(0)) 
        Unit:CastSpellOnTarget(40875, Unit:GetRandomPlayer(0)) 
        Unit:RegisterEvent("Boss_Spell4",10000, 20)
        Unit:RegisterEvent("Boss_Spell3",16000, 999999)
        Unit:RegisterEvent("Boss_Spell2",25000, 999999)
        Unit:RegisterEvent("Boss_Phase2",1000, 1)
    end
end



function Boss_Phase2(Unit, event)
    if Unit:GetHealthPct() < 80 then
        Unit:RemoveEvents()
        Unit:CastSpellOnTarget(23171, Unit:GetRandomPlayer(1)) 
        Unit:CastSpellOnTarget(23171, Unit:GetRandomPlayer(1)) 
        Unit:CastSpellOnTarget(23171, Unit:GetRandomPlayer(1)) 
        Unit:SendChatMessage (11, 0, "Dont Get Too Close")
        Unit:RegisterEvent("Boss_Spell1",25000, 999999) 
        Unit:RegisterEvent("Boss_Spell5",25000, 999999) 
        Unit:SetScale(2)
        Unit:RegisterEvent("Boss_Phase3",1000, 1)
    end
end


function Boss_Phase3(Unit, event)
    if Unit:GetHealthPct() < 70 then
        Unit:RemoveEvents()
        Unit:CastSpellOnTarget(28458, Unit:GetMainTank()) 
        Unit:SendChatMessage (11, 0, "By By Tankie!....Now The Rest Of You.... Face My Minoins!")
        Unit:Emote(3)
        Unit:CastSpell(33506)
        Unit:CastSpell(33506)
        Unit:CastSpell(33506)
        Unit:RegisterEvent("Boss_Phase4",1000, 1)        

    end
end


function Boss_Phase4(Unit, event)
    if Unit:GetHealthPct() < 50 then
        Unit:RemoveEvents()
        Unit:SendChatMessage (11, 0, "Thats It!!, You All Die Now!..But Remember")
        Unit:PlaySoundToSet (11962)
        Unit:Castspell(32964)
        Unit:Castspell(37997)
        Unit:Castspell(37997)
        Unit:Castspell(37997)
        Unit:Castspell(37997)
        Unit:Castspell(37997)
        Unit:Castspell(37997)
        Unit:Castspell(37997)
        Unit:RegisterEvent("Boss_Phase5",1000, 1)        

    end
end



function Boss_Phase5(Unit, event)
    if Unit:GetHealthPct() < 20 then
        Unit:RemoveEvents()
        Unit:SendChatMessage (11, 0, "This Is The Final Straw... Time to Unleash Hell!")
        Unit:Castspell(32964)
        Unit:Castspell(37997)
        Unit:Castspell(37997)
        Unit:Castspell(37997)
        Unit:Castspell(37997)
        Unit:Castspell(37997)
        Unit:Castspell(37997)
        Unit:Castspell(37997)
        Unit:Castspell(32964)
        Unit:Castspell(37997)
        Unit:Castspell(37997)
        Unit:CastSpell(33506)
        Unit:CastSpell(33506)
        Unit:CastSpell(33506)
     

    end
end




function Kuthun_DiedSpawn(pUnit, Event)

x = pUnit:GetX();
y = pUnit:GetY();
z = pUnit:GetZ();
o = pUnit:GetO();

pUnit:SpawnCreature(2350002, x, y, z, o,0,50000);
end


RegisterUnitEvent(2350001,4, "Kuthun_DiedSpawn")




function Boss_OnCombat(Unit, event)
    Unit:SendChatMessage(11, 0, "You Have Come To Kill Kuthun?! You Cannot!")
    Unit:RegisterEvent("Boss_Phase1",1000, 0)
    Unit:PlaySoundToSet (11803)
end


function Boss_OnLeaveCombat(Unit, event)
    Unit:RemoveEvents()
    Unit:SendChatMessage(11, 0, "What's The Matter Cant Kill Me ?")
    Unit:SetScale(1)
end


function Boss_OnKilledTarget(Unit)
    Unit:SendChatMessage(11, 0, "Hahahaha. Die!")
    Unit:CastSpell(13048)
    Unit:PlaySoundToSet (11965)
end


function Boss_Death(Unit)
    Unit:SendChatMessage(12, 0, "N-n-n- No...It Cannot Be!")
    Unit:RemoveEvents()
    Unit:SetScale(1)
end

RegisterUnitEvent(2350001, 1, "Boss_OnCombat")
RegisterUnitEvent(2350001, 2, "Boss_OnLeaveCombat")
RegisterUnitEvent(2350001, 3, "Boss_OnKilledTarget")
RegisterUnitEvent(2350001, 4, "Boss_Death")

ID = 2350001
After Death Spawns 2350002

Name = Kuthun

[dude891]

I don't really like this idea since a lot of people would have to post here and nobody would actually take the time to look through the whole thing. Also, I don't think people actually go on this sight looking for boss fights. I think they usually are just scanning the forums and when they come across a boss fight they think seems interesting, they take a look at it. I think this thread will make it harder for LUA programmers to earn rep.

[Sonic Waffle]

I agree wit dude... not intrested!

[Arthas117]

Let's say we share SMALL scripts here? Anyway great idea, might come up with something But I'm busy with my bros custom repack :P

[Chrispee]

tks mate (fiiler)