function MbSetStyle takes multiboard mb, integer row, integer col returns nothing
call MultiboardSetItemStyle(MultiboardGetItem(mb, row , col ), true, false)
call MultiboardReleaseItem(MultiboardGetItem(mb, row , col))
endfunction

function
local multiboarditem mbi= null
    local force f = CreateForce()
    local integer a = 1
    local integer b = 1
    call ForceEnumPlayers(f, Condition(function Trig_MultiboardStandart_Func002002001001001))
    set udg_board = CreateMultiboard()
    call MultiboardSetRowCount(udg_board, CountPlayersInForceBJ(f)+2)
    call MultiboardSetColumnCount(udg_board, 5)
    call MultiboardSetTitleText(udg_board, "TRIGSTR_162")
    call MultiboardDisplay(udg_board, true)
        loop
        exitwhen a > 5
               loop
             exitwhen b > MultiboardGetRowCount(udg_board)
            call MbSetStyle(udg_board,b,a)
            if a==1 then
            set mbi = MultiboardGetItem(udg_board,b,a)
                call MultiboardSetItemWidth( mbi, 8.00 )
            else
            endif
            if a==2 then
            set mbi = MultiboardGetItem(udg_board,b,a)
                call MultiboardSetItemWidth( mbi, 2.10 )
            else
            endif
            if a==3 then
                set mbi = MultiboardGetItem(udg_board,b,a)
                call MultiboardSetItemWidth( mbi, 3.80 )
            else
            endif
            if a==4 then
                set mbi = MultiboardGetItem(udg_board,b,a)
                call MultiboardSetItemWidth( mbi, 4.50 )
            else
            endif
            if a==5 then
                set mbi = MultiboardGetItem(udg_board,b,a)
                call MultiboardSetItemWidth( mbi, 2.50 )
            else
            endif
            set b = b + 1
        endloop
        set a = a + 1
    endloop