define
    void = takes nothing returns nothing

    int  = integer
    intA  = integer array
    bool = boolean
enddefine 

globals
    unit array P_Unit
    intA PS_Kills
endglobals

redefine SetUnitX takes unit u, real new_x returns nothing
    if new_x >= 0 and new_x <= 2000 then
        call SetUnitX(u,new_x)
    endif
endredefine

function MySetUnitX takes unit u, real x returns nothing
    if x >= 0. && x <= 2000.
        SetUnitX(u, x)
    endif
endfunction

scope xxx

define
    private SetUnitX = MySetUnitX
enddefine

endscope

define
    ARENA_ARRAY_SIZE = 140
enddefine

struct arena
    unit array gexes_u [ARENA_ARRAY_SIZE]
endstruct

struct arena
unit array gexes_u [140ZE]
endstruct

define
    arena_array_size = 140
enddefine

struct arena
    unit array gexes_u [arena_array_size]
endstruct

define ARENA_ARRAY_SIZE = 140
//define arena_array_size = 140 // тоже работает

struct arena
    unit array gexes_u [ARENA_ARRAY_SIZE]
endstruct

library blablabla initializer init
define
    consti = constant integer
    end=endfunction
    exf=public function
    void=takes nothing returns nothing
enddefine

globals
    consti a
endglobals

exf init void
end

endlibrary