after i added this function the script stopped working?

It stopped working after i added the "ChooseColor()" function...

--//Values

Intermission = 5

--//Functions

function ChangeText(Text)
    local Players = game.Players:GetPlayers()
    for i = 1, #Players do
    Players[i].PlayerGui.CountdownGui.MainFrame.ActivityLabel.Text = Text
end
end

function StartIntermission()
    local Players = game.Players:GetChildren()
    for i = Intermission, 0, -1 do
    ChangeText("Choose your Color: " ..i)
    wait(1)
end
end

function ChooseColor()
    local Players = game.Players:GetChildren()
    local Colors = {"Blue", "Red", "Yellow", "Purple"}
    local n = math.random(1, 4)
    local Color = Colors[n]
    print("Color Chosen: "..Color)
        for i = 1, #Players do
        Players[i].PlayerGui.CountdownGui.MainFrame.ActivityLabel.Text = "Color Chosen: "..Color
    wait(1)
    local ColorPart = game.Workspace.Colors:FindFirstChild(""..Color)
    wait(0.1)
    ColorPart.Transparency = 1
    ColorPart.CanCollide = false
end

--//Main

while true do
    StartIntermission()
    ChangeText("Choosing Color...")
    ChooseColor()
    wait(1)
end
end