globals
    region array regions
    rect array rects
    integer regionCount = 0
endglobals

function CreateRegionRect takes rect r returns region
    local region reg = CreateRegion()
    call RegionAddRect(reg, r)
    set regions[regionCount] = reg
    set rects[regionCount] = r
    set regionCount = regionCount + 1
    return reg
endfunction

function GetRectFromRegion takes region reg returns rect
    local integer i = 0
    loop
        exitwhen i >= regionCount
        if regions[i] == reg then
            return rects[i]
        endif
        set i = i + 1
    endloop
    return null
endfunction

function OnEnterRegion takes nothing returns nothing
    local region triggeringRegion = GetTriggeringRegion()
    local rect triggeringRect = GetRectFromRegion(triggeringRegion)
    local unit enteringUnit = GetTriggerUnit()

    // Теперь у тебя есть прямоугольник, в который вошел юнит
    call DisplayTextToPlayer(GetLocalPlayer(), 0, 0, "Юнитыч вошёл в область ЫЫЫЫ: " + R2S(GetRectWidthBJ(triggeringRect)) + "x" + R2S(GetRectHeightBJ(triggeringRect)))
    
endfunction

function InitTrigSmetoGPT takes nothing returns nothing
    local trigger t = CreateTrigger()
    local rect r1 = Rect(0, 0, 512, 512)
    local rect r2 = Rect(512, 512, 1024, 1024)
    local region reg1 = CreateRegionRect(r1)
    local region reg2 = CreateRegionRect(r2)
    call TriggerRegisterEnterRegion(t, reg1, null)
    call TriggerRegisterEnterRegion(t, reg2, null)
    call TriggerAddAction(t, function OnEnterRegion)
endfunction