Деление голды как в доте 1

Советовал бы почитать учебники по математике за начальные классы.
Там как раз про то, как складывать, делить на количество и вычитать то, что не нужно

Дам ему прямой ответ, правда я лишь с третьего раза понял что он хотел.

Так как индексы 0 (1 в ГУИ - красный) и 6 (7 в ГУИ - зелёный) у нас компьютеры, с ними делиться не нужно, занчит кол-во игроков у нас не 12, а 10. получается так:

Скопировать в буфер

integer goldPerPlayer = R2I( 4265 / ( 12 - 2 ) )

Однако, если это делать по-человечески, то будет так:

Скопировать в буфер

function CountTeamPlayersEx takes integer team, playerslotstate slotstate, mapcontrol controlstate returns integer
    local integer i = 0
    local integer count = 0
    local player p = null
    local boolean isSlotOk = true
    local boolean isControlOk = true

    loop
        set p = Player( i )
        set isSlotOk = slotstate == null or GetPlayerSlotState( p ) == slotstate
        set isControlOk = controlstate == null or GetPlayerController( p ) == controlstate

        if isSlotOk and isControlOk and GetPlayerTeam( p ) == team then
            set count = count + 1
        endif

        set i = i + 1
        exitwhen i == bj_MAX_PLAYERS
    endloop

    set p = null // фактически не нужна, ибо Player( i ) не вызывает утечку.
    return count
endfunction

function CountRealTeamPlayers takes integer team returns integer
    return CountTeamPlayersEx( team, PLAYER_SLOT_STATE_PLAYING, MAP_CONTROL_USER )
endfunction

function GiveGoldToTeam takes integer team, integer gold returns nothing
    local integer i = 0

    loop
        set p = Player( i )
        if GetPlayerSlotState( p ) == PLAYER_SLOT_STATE_PLAYING and GetPlayerController( p ) == MAP_CONTROL_USER and GetPlayerTeam( p ) == team then
            call SetPlayerState( p, PLAYER_STATE_RESOURCE_GOLD, GetPlayerState( p, PLAYER_STATE_RESOURCE_GOLD ) + gold )
        endif

        set i = i + 1
        exitwhen i == bj_MAX_PLAYERS
    endloop
endfunction

function GiveGoldToPlayers takes integer gold returns nothing
	local integer team1Players = CountRealTeamPlayers( 0 )
	local integer team2Players = CountRealTeamPlayers( 1 )
    local integer playerCount  = team1Players + team2Players
	local integer goldPerTeam  = R2I( gold * .5 )
	
    call GiveGoldToTeam( 0, R2I( goldPerTeam / team1Players ) )
    call GiveGoldToTeam( 1, R2I( goldPerTeam / team2Players ) )
endfunction

Вроде как не допустил ошибок, если будет где-то ошибка, сообщи.