team.SetUp (1, "Red", Color(255, 0, 0, 255))
team.SetUp (2, "Blue", Color(0, 0, 255, 255))

function GM:PlayerSpawn(ply) 
   if table.Count(team.GetPlayers(1)) < table.Count(team.GetPlayers(2)) then
   ply.SetTeam(1)
elseif table.Count(team.GetPlayers(2)) < table.Count(team.GetPlayers(1)) then
   ply.SetTeam(2)
else 
local i = math.random(0,1)
if i == 0 then
   ply:SetTeam(1)
else
   ply:SetTeam(2)
end
   end
end