// (!!)индексация ректов от 0 до 63 включительно(!!)
function my_function takes nothing returns nothing
    local unit u = GetTriggerUnit()
    local integer Column = R2I((GetUnitX(u)-<ВерхнийЛевыйУголДоски.x>)/<РазмерЯчейки.x>)
    local integer Row    = R2I((<ВерхнийЛевыйУголДоски.y>-GetUnitY(u))/<РазмерЯчейки.y>)
    local integer IndexRect = Column+Row*<КоличествоЯчеекПоШирине> //Это <то значение что ты получал с помощью цикла от 1 до 64>-1
    local integer c = Column
    local integer r = Row 
    local integer i
    loop
        set c = c - 1 
        set r = r - 1
        exitwhen c < 0 or r < 0
        set i = c+r*<КоличествоЯчеекПоШирине>
        call <ПоставитьСтрелкуНаЯчейку>(udg_Square[i])
        if <ВРектеНаходитсяЮнит>(udg_Square[i]) then
            exitwhen true
        endif
    endloop
    set c = Column
    set r = Row 
    loop
        set c = c + 1 
        set r = r + 1
        exitwhen c >= <КоличествоЯчеекПоШирине> or r >= <КоличествоЯчеекПоВысоте>
        set i = c+r*<КоличествоЯчеекПоШирине>
        call <ПоставитьСтрелкуНаЯчейку>(udg_Square[i])
        if <ВРектеНаходитсяЮнит>(udg_Square[i]) then
            exitwhen true
        endif
    endloop
    set c = Column
    set r = Row 
    loop
        set c = c + 1
        set r = r - 1
        exitwhen c >= <КоличествоЯчеекПоШирине> or r < 0
        set i = c+r*<КоличествоЯчеекПоШирине>
        call <ПоставитьСтрелкуНаЯчейку>(udg_Square[i])
        if <ВРектеНаходитсяЮнит>(udg_Square[i]) then
            exitwhen true
        endif
    endloop
    set c = Column
    set r = Row 
    loop
        set c = c - 1
        set r = r + 1
        exitwhen c < 0 or r >= <КоличествоЯчеекПоВысоте>
        set i = c+r*<КоличествоЯчеекПоШирине>
        call <ПоставитьСтрелкуНаЯчейку>(udg_Square[i])
        if <ВРектеНаходитсяЮнит>(udg_Square[i]) then
            exitwhen true
        endif
    endloop
    set u = null
endfunction