Sorting Numbers Equally?

I have been working on a team balance script that balances money. (e.g two players have 15 cash and the third player has 40 cash, hence the two players will be on one team while the third player would be on another team.)

I had an idea where it would change every time a player was leaving or joining. So I came up with something sorta like this: (it is in a ModuleScript under ServerScriptService)

It has no errors, just doesn't accomplish what I need to fully do. Sometimes there's a team unbalance where a team would have 100 cash and the other team would have 5 cash.

Heres how it would work: a tolerancy would be created by adding up everyone's cash then dividing it by two (cause of two teams) So whatever cash is added beyond tolerancy it would put that player on the other team.

If you have any questions you can ask anytime

function module:ATeamBalance()
	
	--Variables
	local players = game.Players:GetPlayers()
	local total = 0
	local tolerancy 
	local grade = 1
	local starterPlayer = players[1]
	local starterCash = starterPlayer:WaitForChild("leaderstats").Money.Value
	--One player scenario
	if #players == 1 then
		return ("cannot balance team if no people")
	end
	
	--Finding total cash players have
	for i,v in pairs(players) do 
		total = total + v:WaitForChild("leaderstats").Money.Value
	end
	
	--Finding the cash teams must go up to. 
	tolerancy = math.floor(total / 2)
	
	--If starter cash is bigger than tolerancy
	while starterCash > tolerancy do
		grade = grade + 1
		starterPlayer = players[grade]
		starterCash = starterPlayer:WaitForChild("leaderstats").Money.Value
		wait()
	end
	if #players >= 2 then
		for i,v in pairs(players) do
			if starterPlayer ~= v and starterCash <= tolerancy then --assinging survivors if they have less cash then tolerancy.
				if v:WaitForChild("leaderstats").Money.Value <= tolerancy then -- If the current one has cash less than tolerancy
					starterCash = starterCash + v:WaitForChild("leaderstats").Money.Value
					v.Team = game.Teams.Team1
					starterPlayer.Team = game.Teams.Team1
				elseif v:WaitForChild("leaderstats").Money.Value >= tolerancy then
				
					--starterCash = v.leaderstats.Money.Value
					v.Team = game.Teams.Team2
				end
			elseif starterCash > tolerancy then
				starterCash = 0
				v.Team = game.Teams.Team2
			end
		end
	end
end