How do I fix this random team script?

After the first time it stops making teams even and makes it like AllPlayers VS 0 players

local teams = {"Really red","Really blue"}

local config = script.Configuration

game.Players.PlayerAdded:connect(function(player)
 if player:GetRankInGroup(config.GroupId.Value) >= config.RankId.Value then

player.Chatted:connect(function(chatmsg)
                if chatmsg:sub(1,9) == "Randomize" then

local players = game.Players:GetChildren()
for i = 1,#players do
local ChosenTeam = teams[math.random(1,#teams)]

   players[i].TeamColor = game.Teams:findFirstChild(ChosenTeam).TeamColor -- Picks one of the brick colors out of the teams table
end
end
end)
end
end)