1618         end

  1618         end

  1619     end;

  1619     end;

  1620 isFirstFrame:= false

  1620 isFirstFrame:= false

  1621 end;

  1621 end;

  1622 

  1622 

  1623 procedure MoveCamera;

  1625 procedure MoveCamera;

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

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

  1626 begin

  1627 begin

  1627 {$IFNDEF MOBILE}

  1628 {$IFNDEF MOBILE}

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

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

  1629     uCursor.updatePosition();

  1630     uCursor.updatePosition();

  1630 {$ENDIF}

  1631 {$ENDIF}

  1631 z:= round(200/zoom);

  1632 z:= round(200/zoom);

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

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

  1633     if (not autoCameraOn) then

  1634     if (not autoCameraOn) then

  1634         FollowGear:= nil

  1635         FollowGear:= nil

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

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

  1637         begin

  1638         begin

  1638         FollowGear:= nil;

  1639         FollowGear:= nil;

  1639         prevPoint:= CursorPoint;

  1640         prevPoint:= CursorPoint;

  1640         exit

  1641         exit

  1850     bSelected:= false;

  1851     bSelected:= false;

  1851     bShowFinger:= false;

  1852     bShowFinger:= false;

  1852     Frames:= 0;

  1853     Frames:= 0;

  1853     WorldDx:= -512;

  1854     WorldDx:= -512;

  1854     WorldDy:= -256;

  1855     WorldDy:= -256;

  1855 

  1857 

  1856     FPS:= 0;

  1858     FPS:= 0;

  1857     CountTicks:= 0;

  1859     CountTicks:= 0;

  1858     SoundTimerTicks:= 0;

  1860     SoundTimerTicks:= 0;

  1859     prevPoint.X:= 0;

  1861     prevPoint.X:= 0;