Стандартные войска

Похоже, что никак. Смена владельца точно не помогает =)

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

function MeleeStartingAI takes nothing returns nothing
    local integer index
    local player  indexPlayer
    local race    indexRace

    set index = 0
    loop
        set indexPlayer = Player(index)
        if (GetPlayerSlotState(indexPlayer) == PLAYER_SLOT_STATE_PLAYING) then
            set indexRace = GetPlayerRace(indexPlayer)
            if (GetPlayerController(indexPlayer) == MAP_CONTROL_COMPUTER) then
                // Run a race-specific melee AI script.
                if (indexRace == RACE_HUMAN) then
                    call PickMeleeAI(indexPlayer, "human.ai", null, null)
                elseif (indexRace == RACE_ORC) then
                    call PickMeleeAI(indexPlayer, "orc.ai", null, null)
                elseif (indexRace == RACE_UNDEAD) then
                    call PickMeleeAI(indexPlayer, "undead.ai", null, null)
                    call RecycleGuardPosition(bj_ghoul[index])
                elseif (indexRace == RACE_NIGHTELF) then
                    call PickMeleeAI(indexPlayer, "elf.ai", null, null)
                else
                    // Unrecognized race.
                endif
                call ShareEverythingWithTeamAI(indexPlayer)
            endif
        endif

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

Лучше не надо т.к. ИИ просто сломается. У него всё до мелочей рассчитано.
Можно сделать так, что бы ты мог управлять ИИ, но он постоянно будет что-то строить и каждую секунду управлять своими войсками, так что ты не сможешь им нормально управлять.

1. Я бы просто брал большой диапазон рандома (порядка 1000) и потом просто делил результат для получения нужного элемента. Этого обычно более чем хватает - условия и вспомогательные функции не нужны, только арифметика.
2. Раз уж в дело пошли диапазоны - можно сразу запилить взвешенный рандом вместо обычного - когда у каждого элемента в списке есть свой вес примерно определяющий насколько чаще других этот элемент будет выбираться.