Как реализовать рандом выбор фракции но равное кол-во игроков в них... хз вообще

Подсчёт игроков

integer PlayerCount;

integer FirstTeamCount;
integer SecondTeamCount;

set FirstTeamCount = PlayerCount / 2

set SecondTeamCount = PlayerCount - FirstTeamCount

Перемешивание массива

integer array ALL // массив для всех игроков
integer array A // массив для первой комманды
integer array B // массив для второй комманды комманды

integer all = -1
integer a = -1
integer b = -1	

set all = all + 1 // 0
set ALL[all] = 3 // возьмём произвольные номера игроков
set all = all + 1 // 1
set ALL[all] = 5 
set all = all + 1 // 2
set ALL[all] = 7
set all = all + 1 // 3
set ALL[all] = 9

local integer r // заведём временную переменную для хранения случайного числа

loop
	set random = GetRandomInt(0, all) // Получаем случайный индекс массива ALL

	if a + 1 < FirstTeamCount then // если в первой комманде недостаточно игроков добавляем их туда
		set a = a + 1
		set A[a] = ALL[random]
	else // если первая комманда полная пихаем всех во вторую
		set b = b + 1
		set B[b] = ALL[random] 
	endif

	set ALL[random] = ALL[all] // Помещаем последний элемент массива на место случайного элемента
	set all = all - 1 // Двигаем курсор влево	
	exitwhen all < 0 // Выходим из цикла, если мы вышли за пределы массива
endloop

УВЫ я слишком туп для массивов