[RELEASE] LUA Bossfight

[Shao111]

Here's a little script i've been working on. Decided to share with mmowned.

--[[ Shao - Bear.lua

Bear LUA script

Goes best with NPC DisplayID-21631 (But your free to do with it as you wish. =P)

Outline of the fight: ( [#] = Phase number )
[1]-90%-morphs into bear, increasing in size. Also, starts cleave.
[2]-77%-morphs into original self. Casts Maul.
[3]-60%-Morphs to Dragon form. Stuns Main agro every 7 secs. Stun is resistable.
[4]-37%-Casts berserking on slef and grows in size.
[5]-20%-Casts Enrage buff that stacks with berserking, also, casts "Ground rupture" (1-4k+knockback). Again, increases in size.
-- By Shao ]]



-- 
-- BEGIN SCRIPT FOR Bear
--


function Bear_Swipe(Unit)
    Unit:CastSpell(20605)
end

function Bear_Maul(Unit)
    Unit:CastSpell(26996)
end

function Bear_Stun(Unit)
    Unit:CastSpell(31755)
end

function Bear_Rage(Unit)
    Unit:CastSpell(24378)
end


function Bear_Final(Unit)
    Unit:CastSpell(14204)
    Unit:CastSpell(26478)
end



function Bear_Phase1(Unit, event)
    if Unit:GetHealthPct() < 90 then
        Unit:RemoveEvents()
        Unit:SendChatMessage(11, 0, "How dare you challenge me!")
        Unit:SetModel(762)
        Unit:SetScale(4)
        Unit:CastSpell(41232)
        Unit:RegisterEvent("Bear_Swipe",7500, 0)
        Unit:RegisterEvent("Bear_Phase2",1000, 0)
    end
end


function Bear_Phase2(Unit, event)
    if Unit:GetHealthPct() < 77 then
        Unit:RemoveEvents()
        Unit:SetModel(21631)
        Unit:SetScale(1.5)
        Unit:CastSpell(41232)
        Unit:RegisterEvent("Bear_Maul",8000, 0)
        Unit:RegisterEvent("Bear_Phase3",1000, 0)
    end
end


function Bear_Phase3(Unit, event)
    if Unit:GetHealthPct() < 60 then
        Unit:RemoveEvents()
        Unit:SendChatMessage(12, 0, "Time to DIE!")
        Unit:SetModel(21633)
        Unit:SetScale(2)
        Unit:CastSpell(41232)
        Unit:RegisterEvent("Bear_Stun",7500, 0)
        Unit:RegisterEvent("Bear_Phase4",1000, 0)
    end
end

function Bear_Phase4(Unit, event)
    if Unit:GetHealthPct() <= 37 then
        Unit:RemoveEvents()
        Unit:SetScale(2.5)
        Unit:SetModel(21633)
        Unit:CastSpell(41232)
        Unit:SendChatMessage(12, 0, "RAAAAWWWWWRRRRR!!!")
        Unit:RegisterEvent("Bear_Rage",8000, 0)
        Unit:RegisterEvent("Bear_Phase5", 1000, 0)
    end
end


function Bear_Phase5(Unit, event)
    if Unit:GetHealthPct() <= 20 then
        Unit:RemoveEvents()
        Unit:SendChatMessage(12, 0, "Nature's fury shall consume you!")
        Unit:SetScale(3)
        Unit:CastSpell(41232)
        Unit:RegisterEvent("Bear_Final",7000, 0)
    end
end

function Bear_OnCombat(Unit, event)
    Unit:SendChatMessage(11, 0, "Grrrr... You have awaken me from my slumber!")
    Unit:RegisterEvent("Bear_Phase1",1000, 0)
    Unit:RegisterEvent("Bear_Phase2",1000, 0)
    Unit:RegisterEvent("Bear_Phase3",1000, 0)
    Unit:RegisterEvent("Bear_Phase4",1000, 0)
    Unit:RegisterEvent("Bear_Phase5",1000, 0)
end


function Bear_OnLeaveCombat(Unit, event)
    Unit:RemoveEvents()
    Unit:SendChatMessage(11, 0, "MUUUAAAAHAHAHAHAHAHAHAHA!")
    Unit:SetScale(1)
    Unit:SetModel(21631)
end


function Bear_OnKilledTarget(Unit)
    Unit:SendChatMessage(11, 0, "Let that be a lesson!")
    Unit:CastSpell(36981)
end


function Bear_Death(Unit)
    Unit:SendChatMessage(12, 0, "Ohh... this is.. the wrong way to... die...")
    Unit:RemoveEvents()
    Unit:SetScale(1)
    Unit:SetModel(21631)
end

RegisterUnitEvent(200001, 1, "Bear_OnCombat")
RegisterUnitEvent(200001, 2, "Bear_OnLeaveCombat")
RegisterUnitEvent(200001, 3, "Bear_OnKilledTarget")
RegisterUnitEvent(200001, 4, "Bear_Death")

(Still need to create NPC with entryID 200001, or change 200001 to an existing mobs entryID.)

Credits to Gastric for his L33T Lua Guides.

Screens of the fight:
http://i53.photobucket.com/albums/g6...earBossOOC.jpg
http://i53.photobucket.com/albums/g6...nterCombat.jpg
http://i53.photobucket.com/albums/g6...BossPhase1.jpg
http://i53.photobucket.com/albums/g6...BossPhase2.jpg
http://i53.photobucket.com/albums/g6...BossPhase3.jpg
http://i53.photobucket.com/albums/g6...BossPhase4.jpg
http://i53.photobucket.com/albums/g6...BossPhase5.jpg
http://i53.photobucket.com/albums/g6...ossOnDeath.jpg



EDIT: If i can get a little feedback, i will continue to release them as i finish them.

Hope someone enjoys!

[Illidan1]

Nice do you have a Pictures? or maybe a Video, so we could check it out?

[Shao111]

Will post pics first thing after work , Fraps has been giving me problems recently

[Shao111]

/bump, updated with screens

[Illidan1]

Nice job mate , +Rep x8

[Shao111]

Ty much =)

[beltic]

looks good. gonna give it a try..

[zysus]

looks good

[Shao111]

/bump, released late, would like more of the communities feedback. (If many like, I may open a "Lua Boss Shop")

[Arthas117]

JUST OPEN THE SHOP FFS!! xD +rep

[Snailz]

Nice +rep.

[Shao111]

Nice, i'm in the middle of moving atm. Expect more info in the next week or so.

[Spartansp]

nice shao keep on the good work