globals
   unit array udg_HeroesAll 
   integer udg_MaxIndex 
endglobals

function RandomHero takes nothing returns unit
    local integer rand = GetRandomInt(0, udg_MaxIndex)
    local unit Select = udg_HeroesAll[rand]
    set udg_HeroesAll[rand] = udg_HeroesAll[udg_MaxIndex]
    set udg_MaxIndex = udg_MaxIndex - 1
    return Select
endfunction

function Trig_Rndm_Actions takes nothing returns nothing
    local integer i = 0
    local unit hero
    loop
        exitwhen i > 11
        if GetPlayerSlotState(Player(i)) == PLAYER_SLOT_STATE_PLAYING then
            set hero = RandomHero()
            //...
            //Создать hero Для игрока i+1
            //...
            call CreateNUnitsAtLoc( 1, hero, Player(i), GetRectCenter(GetPlayableMapRect()), bj_UNIT_FACING )
            call DisplayTimedTextToForce(GetPlayersAll(),8,GetPlayerNameColor(GetPlayerId(GetOwni  ngPlayer(GetLastCreatedUnit())))+" has randomly selected the "+GetUnitName(GetLastCreatedUnit()))
        endif
        set i = i + 1
    endloop
endfunction

//===========================================================================
function InitTrig_Rndm takes nothing returns nothing
    set gg_trg_Rndm = CreateTrigger(  )
    call TriggerAddAction( gg_trg_Rndm, function Trig_Rndm_Actions )
endfunction

function RandomHeroForPlayers takes nothing returns nothing   
    local integer i = 0
    local unit hero
    local integer rand
    local unit array Heroes          
    // Укажи Самый послдений занятый слот в массиве
    local integer MaxIndex = 2
    // Заполни массив героев начиная со слота номер [0] и по порядку
    set Heroes[0] = ...                        
    set Heroes[1] = ... 
    set Heroes[2] = ... 
    loop
        exitwhen i > 11
        if GetPlayerSlotState(Player(i)) == PLAYER_SLOT_STATE_PLAYING then
            set rand = GetRandomInt(0, udg_MaxIndex)
            set hero = udg_Heroes[rand]
            set Heroes[rand] = Heroes[udg_MaxIndex]
            set MaxIndex = MaxIndex - 1
            //...
            //Создать hero Для игрока i+1
            //...
        endif
        set i = i + 1
    endloop
endfunction

globals
   unit array udg_HeroesAll 
   integer udg_MaxIndex 
endglobals

globals
   integer array udg_Heroes 
   integer udg_MaxIndex 
endglobals

function Init takes nothing returns nothing
    //При загрузке карты заполни массив героев начиная со слота номер [0] и по порядку
    set udg_Heroes[0] = '0000'                        
    set udg_Heroes[1] = '0000' 
    set udg_Heroes[2] = '0000'
    //Укажи Самый послдений занятый слот в массиве
    set udg_MaxIndex = 2
endfunction

function RandomTypeHero takes nothing returns integer
    local integer rand = GetRandomInt(0, udg_MaxIndex)
    local integer Select = udg_Heroes[rand]
    set udg_Heroes[rand] = udg_Heroes[udg_MaxIndex]
    set udg_MaxIndex = udg_MaxIndex - 1
    return Select
endfunction

function Action takes nothing returns nothing
    local integer i = 0
    local integer hero
    loop
        exitwhen i > 11
        if GetPlayerSlotState(Player(i)) == PLAYER_SLOT_STATE_PLAYING then
            set hero = RandomTypeHero()
            //...
            //Создать hero Для игрока i+1
            //...
        endif
        set i = i + 1
    endloop
endfunction