Ucator Chosmos

A = altogasal
H = herbio
Au = Aurora
Ca = Cathaklysmos
Ar = ariound
Hi = Hirindal
Cap = Captain Narmalus
Cr = Cronos(big boss)


function AOnS(pUnit, event)
        A = pUnit
    pUnit:SendChatMessage(14, 0,"")
end

function HOnS(pUnit, event)
        H = pUnit
    pUnit:SendChatMessage(14, 0,"")
end

function AuOnS(pUnit, event)
        Au = pUnit
    pUnit:SendChatMessage(14, 0,"")
end

function CaOnS(pUnit, event)
        Ca = pUnit
    pUnit:SendChatMessage(14, 0,"")
end

function HOnS(pUnit, event)
        Ar = pUnit
    pUnit:SendChatMessage(14, 0,"")
end

function HiOnS(pUnit, event)
        Hi = pUnit
    pUnit:SendChatMessage(14, 0,"")
end

function ArOnS(pUnit, event)
        Cap = pUnit
    pUnit:SendChatMessage(14, 0,"")
end


function phase_two(pUnit, event)
A:UnRoot()
H:UnRoot()
Cap:Root()
Au:Root()
Ca:Root()
Ar:Root()
Hi:Root()
Cr:Root()
A:RegisterEvent("AdolaminPhase2", 1000, 0)
H:RegisterEvent("AdolaminPhase2", 1000, 0)
Au:RegisterEvent("AdolaminPhase2", 1000, 0)


function AOnS(pUnit, event)
        A = pUnit
    pUnit:SendChatMessage(14, 0,"")
end


function ALeave(pUnit, event)
    pUnit:RemoveEvents()
    pUnit:SendChatMessage(14, 0,"")
end


function ADie(pUnit, event)
    pUnit:RemoveEvents()
    pUnit:SendChatMessage(12, 0," ")
end


function ASlay(pUnit, event)
    local kill = math.random(1, 3)
        if kill == 1 then
    pUnit:PlaySoundToSet(8827)
    pUnit:SendChatMessage(14, 0, "You..are next!")
        end
        if kill == 2 then
    pUnit:PlaySoundToSet(8825)
    pUnit:SendChatMessage(14, 0, "You..are mine now!")
        end
        if kill == 3 then
    pUnit:PlaySoundSet(8827)
    pUnit:SendChatMessage(14, 0, " ")
        end
end


function Leave(pUnit, event)
    pUnit:RemoveEvents()
    pUnit:SendChatMessage(14, 0,"")
end


function Die(pUnit, event)
    pUnit:RemoveEvents()
    pUnit:SendChatMessage(12, 0," ")
end


function Slay(pUnit, event)
    local kill = math.random(1, 3)
        if kill == 1 then
    pUnit:PlaySoundToSet(8827)
    pUnit:SendChatMessage(14, 0, "You..are next!")
        end
        if kill == 2 then
    pUnit:PlaySoundToSet(8825)
    pUnit:SendChatMessage(14, 0, "You..are mine now!")
        end
        if kill == 3 then
    pUnit:PlaySoundSet(8827)
    pUnit:SendChatMessage(14, 0, " ")
        end
end


RegisterUnitEvent(350, 1, "AAggro")
RegisterUnitEvent(350, 2, "ALeave")
RegisterUnitEvent(350, 3, "ASlay")
RegisterUnitEvent(350, 4, "ADie")
RegisterUnitEvent(350, 18, "AOnS")
RegisterUnitEvent(350, 1, "Aggro")
RegisterUnitEvent(350, 2, "ALeave")
RegisterUnitEvent(350, 3, "Slay")
RegisterUnitEvent(350, 4, "Die")