function main_syn takes nothing returns nothing
    local integer i = 0
    local integer r_u = 0  // Размер юнитов, которое нужно обработать
    local unit u = null
    
    call ReadMyData(gn_server+"main_fail.txt")// Читаем общедоступные данные с сервера
    
    set r_u = GetPlayerTechMaxAllowed(Player(15),0)
    
    loop
    exitwhen i > r_u
    if ( GetPlayerTechMaxAllowed(Player(15),5+r_u*5) != 0x10) then
        set u = Unit_car[GetPlayerTechMaxAllowed(Player(15),1+r_u*5)]
        call SetUnitX(u,Unit_real[2+r_u*5])
        call SetUnitY(u,Unit_real[3+r_u*5])
        call SetUnitFacing(u,Unit_real[4+r_u*5])// ставим наших юнитов в указанную точку, заданным поворотом.
        set r_u = r_u + 1
    else
        call RemoveUnit(Unit_car[GetPlayerTechMaxAllowed(Player(15),1+r_u*5)])
    endif
    
    endloop

endfunction