procedure Escape();    // Реакция на игроков на споте
const R = 77;   // радиус обнаружения
var skill: TSkill; legit: TPlayer;
begin
  if (User.DistTo(c_Spot_x, c_Spot_y, c_Spot_z) < R-5)
  and (PlayersInRangeOfSpotCount(R, c_Spot_x, c_Spot_y, c_Spot_z) > 0) then begin
    Engine.SetGameWindow(true);
    if (Find_Another_Players) then Engine.Print('Обнаружен легит: '+legit.Name+ ', '+IntToStr(legit.Level)+' lvl,  дист: '+FToStr(User.DistTo(legit)), 128);
    delay(222);
    Script.Suspend;
      if  engine.dfastmoveto_zxc (598.14, 718.11, 157.94)then delay(10000);
      if  engine.dfastmoveto_zxc (257.56, 765.76, 298.14)then delay(333);
    repeat
      while (PlayersInRangeOfSpotCount(R, c_Spot_x, c_Spot_y, c_Spot_z) > 0) do delay(333);
      delay(5000);
    until (PlayersInRangeOfSpotCount(R, c_Spot_x, c_Spot_y, c_Spot_z) = 0);
    if Engine.FastMoveTo_zxc(c_Spot_x, c_Spot_y, c_Spot_z) then delay(555);
    delay(555);
    Script.Resume;
   Engine.SetGameWindow(false);