diff -r c542c8e3cf77 -r c8c6ac44f51b hedgewars/uMisc.pas --- a/hedgewars/uMisc.pas Mon Mar 29 23:47:38 2010 +0000 +++ b/hedgewars/uMisc.pas Tue Mar 30 00:02:40 2010 +0000 @@ -98,8 +98,8 @@ bWaterRising : Boolean; ShowCrosshair : boolean; - CursorMovementX : Integer; - CursorMovementY : Integer; + CursorMovementX : LongInt; + CursorMovementY : LongInt; cDrownSpeed : hwFloat; cMaxWindSpeed : hwFloat; cWindSpeed : hwFloat; @@ -133,7 +133,7 @@ procedure freeModule; procedure SplitBySpace(var a, b: shortstring); procedure SplitByChar(var a, b: ansistring; c: char); -procedure movecursor(dx, dy: Integer); +procedure movecursor(dx, dy: LongInt); function hwSign(r: hwFloat): LongInt; function Min(a, b: LongInt): LongInt; function Max(a, b: LongInt): LongInt; @@ -199,7 +199,7 @@ end else b:= ''; end; -procedure movecursor(dx, dy: Integer); +procedure movecursor(dx, dy: LongInt); var x, y: LongInt; begin if (dx = 0) and (dy = 0) then exit;