Scripts problem...=(

function Sirako_OnCombat(unit, event)
    unit:SendChatMessage(12, 0, "HALT!")
    unit:RegisterEvent("Frost_bolt", 2000, 1)
    unit:RegisterEvent("Blizzard_RND", 3000, 1)
    unit:RegisterEvent("Next_phase1", 1000, 0)
end

function Frost_bolt(unit, event)
    unit:FullCastSpell(6949)
end

function Blizzard_RND(unit, event)
    unit:CastSpellOnTarget(42208, unit:GetRandomPlayer(0))
    unit:CastSpellOnTarget(42208, unit:GetRandomPlayer(0))
    unit:CastSpellOnTarget(42208, unit:GetRandomPlayer(0))
end

function Next_phase1(unit, event)
    unit:RemoveEvents()
    if ( unit:GetHealthPct() <= 95 ) then
        unit:SendChatMessage(12, 0, "|cff008080Die Kalte wird euch verschlingen|r!")
        unit:RegisterEvent("Ice_Lanz", 17000, 0)
        unit:RegisterEvent("Ice_Tomb", 13000, 0)
        unit:RegisterEvent("Ark_Volley", 15000, 0)
        unit:RegisterEvent("Phase_2", 1000, 0)
    end
end

function Ice_Tomb(unit, event)
    unit:FullCastSpellOnTarget(29670, unit:GetRandomPlayer(0))
    unit:SendChatMessage(42, 0, "Heilt "..unit:GetPlayer(name).." sonst stribt er")
end

function Ice_Lanz(unit, event)
    unit:CastSpellOnTarget(30455, unit:GetRandomPlayer(0))
end

function Ark_Volley(unit, event)
    unit:CastSpellOnTarget(29959, unit:GetMainTank())
end

function Phase_2(unit, event)
    unit:RemoveEvents()
    if (unit:GetHealthPct() <= 60 ) then
        unit:SendChatMessage(42, 0, "|cff008080Sirako beginnt in die Luft zu fliegen|r!")
        unit:SetFlying()
        unit:CreateWaypoint(5263.641602, -2165.962646, 1266.655884, 1.475179, 15000, 0, 15363)
        unit:CreateWaypoint(5242.205078, -2152.118164, 1266.655884, 0.249958, 15000, 0, 15363)
        unit:CreateWaypoint(5292.035645, -2176.776123, 1266.655884, 2.544892, 15000, 0, 15363)
        unit:CreateWaypoint(5250.574219, -2196.714111, 1267.911255, 1.372293, 15000, 0, 15363)
        unit:RegisterEvent("Ice_Peak", 3000, 0)
        unit:RegisterEvent("Ice_Could", 4500, 0)
        unit:RegisterEvent("Ice_Atem", 5000, 0)
        unit:RegisterEvent("Next_Phase3", 1000, 0)
    end
end

function Ice_Peak(unit, event)
    unit:CastSpellOnTarget(spell, unit:GetRandomPlayer(1))
end

function Ice_Could(unit, event)
    unit:CastSpellOnTarget(33395, unit:GetMainTank())
end

function Ice_Atem(unit, event)
    unit:CastSpellOnTarget(47425, unit:GetRandomPlayer(0))
end

function Next_Phase3(unit, event)
    unit:RemoveEvents()
    if (unit:GetHealthPct() <= 20 ) then
        unit:SendChatMessage(42, 0, "|cff008080Sirako nimmt die Angriffe wieder am Boden auf|r!")
        unit:MoveTo(5262.758301, -2167.310791, 1259.470093, 1.782269)
        unit:RegisterEvent("name", 2000, 0)
        unit:RegisterEvent("name", 3500, 1)
        unit:AddAura(7302, 36000)
        unit:SetFlaying()
    end
end

function Sirako_OnLeaveCombat(unit, event)
    unit:RemoveEvents()
    unit:SendChatMessage(12, 0, "Och ist euch für euch zu Kalt?!")
end

function Sirako_OnDeath(unit, event)
    unit:RemoveEvents()
    unit:SendChatMessage(12, 0, "Ich habe euch deutlich unterschätzt.")
end

function Sirako_OnKilledPlayer(unit, event)
    unit:SendChatMessage(12, 0, "Ihr seid gegen meiner Macht nicht gewachsen!")
end

RegisterUnitEvent(900001, 1, "Sirako_OnCombat")
RegisterUnitEvent(900001, 2, "Sirako_OnLeaveCombat")
RegisterUnitEvent(900001, 3, "Sirako_OnDeath")
RegisterUnitEvent(900001, 4, "Sirako_OnKilledPlayer")