// [group,["mk1","mk2".....],delay] execVM "route.sqf";

_grp=_this select 0;
_un=leader _grp;
_mkarray=_this select 1;
_timeout=_this select 2;
{_x forcespeed 2.4; _x setBehaviour "SAFE"} foreach units _grp;

while {alive _un} do {

for [{_mn=0},{_mn<(count _mkarray)},{_mn=_mn+1}] do {

     _mk=getmarkerpos (_mkarray select _mn);

     while {_un distance _mk >24} do {

         //создание круга точек вокруг юнита, диаметр 25, шаг 10 град
         _R=25;
         _duration=0.1;
         _delay=0.01;
         _W=2*3.14147/_duration;
         _t=0;
         _ms=[];

         for "_j" from 0 to 360 step 10 do {
             CX1=_R*(cos(_W*_t+_j));
             CY1=_R*(sin(_w*_t+_j));
             _ms set[count _ms,[(getpos _un select 0)+CX1, (getpos _un select 1)+CY1, 0]];
         _t=_t+_delay;
         };

         //определение ближайшей к маркеру
         _dist=_un distance _mk;

         for [{_n=0},{_n<=(count _ms)},{_n=_n+1}] do {
//            sleep 0.01;
             _point=_ms select _n;
             _l1=_point distance _un;
             _l2=_point distance _mk;
             if (_l1+_l2-_dist<0.7) exitWith {{_x domove (_point)} foreach units _grp;_tmk=createMarker  

["TMk", _point]};
         };

         waituntil {_un distance (getmarkerpos "TMk") < 3};
         deleteMarker "TMk";
     };
      
     {_x domove (_mk)} foreach units _grp;
     waituntil {_un distance _mk < 3};
     sleep _timeout;

}; //конец верхнего for
sleep 0.1;
};