[Release] Learner LUA Scripts

[bomber]

Too me this is noob stuff. It is what I did when I was first learning LUA. So to help out the community with learning all this noob stuff. I want you all to have a couple of scripts I have.

function Terror_Firebreath(Unit)
 Unit:CastSpell(29388)
end
function Terror_HowlOfTerror(Unit)
 Unit:CastSpell(18169)
end
function Terror_HeroicStrike(Unit)
 Unit:CastSpell(41975)
end
function Terror_AcidBreathe(Unit)
 Unit:CastSpell(24839)
end
function Terror_Scream(Unit)
 Unit:CastSpell(38496)
        Unit:CastSpell(40875)
end
function Terror_Phase1(Unit, event)
    if Unit:GetHealthPct() < 80 then
        Unit:RemoveEvents()
        Unit:SendChatMessage(11, 0, "DEATH....DESTRUCTION....PWNAGE!")
        Unit:RegisterEvent("Terror_Firebreath",8000, 5)
        Unit:RegisterEvent("Terror_HeroicStrike",8000,5)
        Unit:RegisterEvent("Terror_Phase2",1000, 0)
   end
end
function Terror_Phase2(Unit, event)
    if Unit:GetHealthPct() < 60 then
        Unit:RemoveEvents()
        Unit:SendChatMessage(11, 0, "Prepare to fell the wrath of TERROR!")
        Unit:RegisterEvent("Terror_AcidBreathe",8000, 5)
        Unit:RegisterEvent("Terror_Phase3",1000,0)
   end
end
function Terror_Phase3(Unit, event)
    if Unit:GetHealthPct() < 10 then
        Unit:RemoveEvents()
        Unit:SendChatMessage(11, 0, "No! No! NO MORTAL SHALL DEFEAT ME!")
        Unit:RegisterEvent("Terror_HowlOfTerror",8000, 5)
        Unit:RegisterEvent("Terror_Phase4",1000, 0)
   end
end
function Terror_Phase4(Unit, event)
    if Unit:GetHealthPct() < 5 then
        Unit:RemoveEvents()
        Unit:SendChatMessage(11, 0, "Silence! Let me meditate!")
        Unit:RegisterEvent("Terror_Scream",8000, 5)
   end
end
function Terror_OnCombat(Unit, event)
    Unit:SendChatMessage(11, 0, "Haha! A nice fight! I was getting quite lonely in my corner!")
    Unit:RegisterEvent("Terror_Phase1",1000, 0)
    Unit:RegisterEvent("Terror_Phase2",1000, 0)
    Unit:RegisterEvent("Terror_Phase3",1000, 0)
    Unit:RegisterEvent("Terror_Phase4",1000, 0)
end

function Terror_OnLeaveCombat(Unit, event)
    Unit:RemoveEvents()
    Unit:SetScale(1)
  
end

function Terror_OnKilledTarget(Unit)
    Unit:CastSpell(13048)
end

function Terror_Death(Unit)
    Unit:RemoveEvents()
    Unit:SetScale(1)  
end
RegisterUnitEvent(12211, 1, "Terror_OnCombat")
RegisterUnitEvent(12211, 2, "Terror_OnLeaveCombat")
RegisterUnitEvent(12211, 3, "Terror_OnKilledTarget")
RegisterUnitEvent(12211, 4, "Terror_Death")

function General_OnCombat(Unit, event)
    Unit:RegisterEvent("General_LifeDrain", 24000, 0)
    Unit:RegisterEvent("GEneral_Blizzard", 15000, 0)
    Unit:RegisterEvent("General_Cleave", 10000, 0)
    Unit:RegisterEvent("General_Enrage", 900000, 0)
    Unit:RegisterEvent("General_FrostBreath", 45000, 0)
    Unit:RegisterEvent("General_FrostImmune", 0, 0)
    Unit:RegisterEvent("General_FrostAura", 2000, 0)
    Unit:RegisterEvent("General_CloseToDeath", 500, 0)
end
function General_CloseToDeath(Unit, event)
    if Unit:GetHealthPct() <= 10 then
    Unit:RemoveEvents()
    Unit:RegisterEvent("General_FrostImmune", 0, 0)
    Unit:RegisterEvent("General_FrostAura", 2000, 0)
    Unit:RegisterEvent("General_LifeDrain", 24000, 0)
    Unit:RegisterEvent("General_Blizzard", 15000, 0)
    Unit:RegisterEvent("General_Cleave", 10000, 0)
    Unit:RegisterEvent("General_Enrage", 900000, 0)
    else
end
end
function General_Iceboltstart(Unit)
    Unit:RemoveEvents()
    Unit:RegisterEvent("General_Icebolt",General_Icebolt_Timer,0)
end
function General_Icebolt(Unit)
    local plr = Unit:GetRandomPlayer(0)
    if (plr ~= nil) then
    Unit:FullCastSpellOnTarget(28522, plr)
    Unit:RegisterEvent("General_FrostBreath3", 9000, 0)
  end
end
function General_FrostAura(Unit)
    Unit:CastSpell(28531)
end
function General_FrostImmune(Unit)
    Unit:CastSpell(34202)
end
function General_LifeDrain(Unit, event)
    Unit:StopMovement(5000)
    Unit:CastSpellOnTarget(38817, Unit:GetMainTank())
end
function General_Blizzard(Unit, event)
    Unit:CastSpell(29952)
end
function General_Cleave(Unit, event)
    Unit:CastSpellOnTarget(31345, Unit:GetMainTank())
end
function General_Enrage(Unit)
    Unit:CastSpell(18556)
end
function General_FrostBreath(Unit, event)
    Unit:RemoveEvents()
    Unit:CastSpell(17131)
    Unit:Emote(254)
    Unit:SetCombatCapable(1)
    Unit:RegisterEvent("General_FrostBreath2", 2000, 0)
end
function General_FrostBreath2(Unit, event)
    Unit:RegisterEvent("General_Iceboltstart", 10000, 0)
end
function General_FrostBreath3(Unit, event)
    Unit:RemoveEvents()
    Unit:FullCastSpell(28524)
    Unit:RemoveEvents()
    Unit:RegisterEvent("General_FrostBreath4", 8000, 0)
end
function General_FrostBreath4(Unit, event)
    Unit:RemoveEvents()    
    Unit:RemoveAura(17131)
    Unit:Emote(293)
    Unit:RegisterEvent("General_FrostBreath5", 4000, 0)
end
function General_FrostBreath5(Unit, event)
    Unit:SetCombatCapable(0)
    Unit:GetMainTank()
    Unit:RegisterEvent("General_FrostBreath", 67000, 0)
    Unit:RegisterEvent("General_FrostImmune", 0, 0)
    Unit:RegisterEvent("General_FrostAura", 2000, 0)
    Unit:RegisterEvent("General_LifeDrain", 24000, 0)
    Unit:RegisterEvent("General_Blizzard", 15000, 0)
    Unit:RegisterEvent("General_Cleave", 10000, 0)
    Unit:RegisterEvent("General_Enrage", 900000, 0)
end
function General_OnWipe(Unit)
    Unit:RemoveEvents()
end
function General_OnLeaveCombat(Unit)
    Unit:RemoveEvents()
end
function General_OnDied(Unit)
    Unit:RemoveEvents()
end
General_Icebolt_Timer = 1800
RegisterUnitEvent(98764, 1, "General_OnCombat")
RegisterUnitEvent(98764, 2, "General_OnLeaveCombat")
RegisterUnitEvent(98764, 3, "General_OnWipe")
RegisterUnitEvent(98764, 4, "General_OnDied")

These are two simple scripts. Enjoy them!

[GodOfWar]

Yep indeed I need to learn this +rep

[bomber]

It didn't take me long and the script I gave you is a cranky monster from my old server. Took forever to down him but drops were alright.