globals
      integer MinIndex
      real array x
      real array y
      integer MaxIndex
      unit array AI_Hero
endglobals
function AI_Variable takes nothing returns nothing
   set x[1] = 100.
   set y[1] = -100.
   set x[2] = 300.
   set y[2] = -300.
   set x[3] = 500.
   set y[3] = -500.
   set x[4] = 700.
   set y[4] = -700.
   set MaxIndex = 4
   set AI_Hero[0] = gg_unit_Hmkg_0258 // Работаем с этим юнитом для теста, можно изменить на своего.
endfunction
function AI_CheckRun takes integer PlayerId returns integer
      local integer i = 0
      local real dist = 1000000
      local real xc = GetUnitX(AI_Hero[PlayerId])
      local real yc = GetUnitY(AI_Hero[PlayerId])   
      loop
      set i = i + 1
      exitwhen i > MaxIndex
          if SquareRoot(( ( x[i] - xc )*( x[i] - xc ) + ( y[i] - yc )*( y[i] - yc ))) < dist then
              set dist = SquareRoot(( ( x[i] - xc )*( x[i] - xc ) + ( y[i] - yc )*( y[i] - yc )))
              set MinIndex = i
          endif
      endloop
      return MinIndex
endfunction