hedgewars/uWorld.pas
branchhedgeroid
changeset 5341 479b4108789a
parent 5329 abfc41832374
parent 5294 67278f1cba2c
child 5375 ec4006837feb
equal deleted inserted replaced
5339:bc8560452143 5341:479b4108789a
  1163 if (not (CurrentTeam^.ExtDriven and isCursorVisible and not bShowAmmoMenu)) and cHasFocus then
  1163 if (not (CurrentTeam^.ExtDriven and isCursorVisible and not bShowAmmoMenu)) and cHasFocus then
  1164     uCursor.updatePosition();
  1164     uCursor.updatePosition();
  1165 {$ENDIF}
  1165 {$ENDIF}
  1166 
  1166 
  1167 if (not PlacingHogs) and (FollowGear <> nil) and (not isCursorVisible) and (not fastUntilLag) then
  1167 if (not PlacingHogs) and (FollowGear <> nil) and (not isCursorVisible) and (not fastUntilLag) then
  1168     if abs(CursorPoint.X - prevPoint.X) + abs(CursorPoint.Y - prevpoint.Y) > 4 then
  1168     if (not autoCameraOn) or (abs(CursorPoint.X - prevPoint.X) + abs(CursorPoint.Y - prevpoint.Y) > 4) then
  1169     begin
  1169     begin
  1170         FollowGear:= nil;
  1170         FollowGear:= nil;
  1171         prevPoint:= CursorPoint;
  1171         prevPoint:= CursorPoint;
  1172         exit
  1172         exit
  1173     end
  1173     end