Проверка на самого ближнего юнита

	local unit u = SomeUnit
	local unit u1 = null
	local unit u2 = null
    local real x = GetUnitX(u)
    local real y = GetUnitY(u)
	local real r = 9999999
    local real i
    local group g = CreateGroup()

    call GroupEnumUnitsInRect(g,bj_mapInitialPlayableArea,null)
    loop
        set u1 = FirstOfGroup(g)
        exitwhen u1 == null
        if u1 != u then
            set i = DistanceBetweenCoordinates(x,GetUnitX(u1),y,GetUnitY(u1))
            if i < r then
                set r = i
                set u2 = u1
            endif
        endif
        call GroupRemoveUnit(g,u1)
    endloop

	call IssueTargetOrder(u,"attack",u2)
	
    call DestroyGroup(g)
    set g = null
	set u = null
	set u1 = null
	set u2 = null