Самая крупная целочисленная переменная

library greatestNumber initializer Init

    globals
        trigger TEST
        integer array myInt
    endglobals

    function maxValue takes integer from, integer to returns integer
        local integer i = from
        local integer max = myInt[from]
    
        loop
            set i = i + 1
            if myInt[i] > max then
                set max = myInt[i]
            endif
        exitwhen i >= to
        endloop
        
        return max
    endfunction
    
    function Test takes nothing returns nothing
        call BJDebugMsg(I2S(maxValue(0,7)))
    endfunction
    
    function Init takes nothing returns nothing
        
        set myInt[0] = 1
        set myInt[1] = 2
        set myInt[2] = 4
        set myInt[3] = 8
        set myInt[4] = 6
        set myInt[5] = 36
        set myInt[6] = 12
        set myInt[7] = 4
        
        set TEST = CreateTrigger()
        call TriggerRegisterPlayerKeyEventBJ(TEST,Player(0),bj_KEYEVENTTYPE_DEPRESS,bj_KEYEVENTKEY_UP)
        call TriggerAddAction(TEST,function Test)       
        
    endfunction

endlibrary