anchor.diff:    ScrollAdv: Single;
     CursorPoint: TKMPointI;
     ScreenBounds: TRect;
  -  Temp:byte;
  +  I: Byte;
     MousePos: TPoint;
   begin
     {$IFDEF MSWindows}
  
positive.code:     fTopHill: Single;
      fPosition: TKMPointF;
      fScrolling: Boolean;
      PrevScrollAdv: array [1..24] of Single;
      PrevScrollPos: Byte;
      fViewportClip: TPoint;
      fViewRect: TKMRect;
      fZoom: Single;
  
negative.code:   fMapX := 1; //Avoid division by 0
    fMapY := 1; //Avoid division by 0
  
    fZoom := 1;
    ReleaseScrollKeys;
    gSoundPlayer.UpdateListener(fPosition.X, fPosition.Y);
  