1587         end

  1587         end

  1588     end;

  1588     end;

  1589 isFirstFrame:= false

  1589 isFirstFrame:= false

  1590 end;

  1590 end;

  1591 

  1591 

  1592 procedure MoveCamera;

  1594 procedure MoveCamera;

  1593 var EdgesDist, wdy, shs,z: LongInt;

  1595 var EdgesDist, wdy, shs,z: LongInt;

  1595 begin

  1596 begin

  1596 {$IFNDEF MOBILE}

  1597 {$IFNDEF MOBILE}

  1597 if (not (CurrentTeam^.ExtDriven and isCursorVisible and (not bShowAmmoMenu))) and cHasFocus and (GameState <> gsConfirm) then

  1598 if (not (CurrentTeam^.ExtDriven and isCursorVisible and (not bShowAmmoMenu))) and cHasFocus and (GameState <> gsConfirm) then

  1598     uCursor.updatePosition();

  1599     uCursor.updatePosition();

  1599 {$ENDIF}

  1600 {$ENDIF}

  1600 z:= round(200/zoom);

  1601 z:= round(200/zoom);

  1601 if not PlacingHogs and (FollowGear <> nil) and (not isCursorVisible) and (not bShowAmmoMenu) and (not fastUntilLag) then

  1602 if not PlacingHogs and (FollowGear <> nil) and (not isCursorVisible) and (not bShowAmmoMenu) and (not fastUntilLag) then

  1602     if (not autoCameraOn) then

  1603     if (not autoCameraOn) then

  1603         FollowGear:= nil

  1604         FollowGear:= nil

  1605     if ((abs(CursorPoint.X - prevPoint.X) + abs(CursorPoint.Y - prevpoint.Y)) > 4) then

  1606     if ((abs(CursorPoint.X - prevPoint.X) + abs(CursorPoint.Y - prevpoint.Y)) > 4) then

  1606         begin

  1607         begin

  1607         FollowGear:= nil;

  1608         FollowGear:= nil;

  1608         prevPoint:= CursorPoint;

  1609         prevPoint:= CursorPoint;

  1609         exit

  1610         exit

  1812     bSelected:= false;

  1813     bSelected:= false;

  1813     bShowFinger:= false;

  1814     bShowFinger:= false;

  1814     Frames:= 0;

  1815     Frames:= 0;

  1815     WorldDx:= -512;

  1816     WorldDx:= -512;

  1816     WorldDy:= -256;

  1817     WorldDy:= -256;

  1817 

  1819 

  1818     FPS:= 0;

  1820     FPS:= 0;

  1819     CountTicks:= 0;

  1821     CountTicks:= 0;

  1820     SoundTimerTicks:= 0;

  1822     SoundTimerTicks:= 0;

  1821     prevPoint.X:= 0;

  1823     prevPoint.X:= 0;