function DistanceBetweenPointsX takes real x,real y,real xx,real yy returns real//функция для получения дистанции меж координатами
    local real dx = xx - x
    local real dy = yy - y
    return SquareRoot(dx * dx + dy * dy)
endfunction

function GetFilterEnemy12 takes nothing returns boolean
    return IsPlayerEnemy(Player(12), GetOwningPlayer(GetFilterUnit())) and GetWidgetLife(GetFilterUnit()) > 0.405
endfunction

function XXX takes nothing returns nothing
local unit u = GetEnumUnit()//наш выбранный юнит
local real x = GetUnitX(u)
local real y = GetUnitY(u)
local real xx
local real yy
local real lastdis=1000.0//изначальный радиус
local boolexpr b = Condition(function GetFilterEnemy12)//Фильтр
local unit t
local group g = CreateGroup()
local unit f
	call GroupEnumUnitsInRange(g, x, y, 1000.0, b)//1000.0 оптимал
	loop
	 set f = FirstOfGroup(g)
	 exitwhen f == null
        //Мой код ГО!
		set xx = GetUnitX(f)
		set yy = GetUnitY(f)
		if DistanceBetweenPointsX(x,y,xx,yy) < lastdis then
			set t=f
			set lastdis=DistanceBetweenPointsX(x,y,xx,yy)
		endif		
        call GroupRemoveUnit(g, f)
	endloop
	call IssueTargetOrder(u,"attack",t)
call DestroyGroup(g)
call DestroyBoolExpr(b)
set u = null
set b = null
set t = null
set g = null
set f = null
endfunction

function Trig_res_Actions takes nothing returns nothing
	ForGroup(udg_g,function XXX)//udg_g - собственно наша группа нейтралов
endfunction

//===========================================================================
function InitTrig_res takes nothing returns nothing
    set gg_trg_res = CreateTrigger(  )//незамысловато назвал триггер - "res", х3 зачем так назвал.
    call TriggerRegisterTimerEventPeriodic( gg_trg_res, 0.50 )//0.50 - оптимальный промежуток.
    call TriggerAddAction( gg_trg_res, function Trig_res_Actions )
endfunction