--- a/hedgewars/uConsole.pas Wed Nov 17 22:14:41 2010 +0300
+++ b/hedgewars/uConsole.pas Wed Nov 17 22:19:58 2010 +0300
@@ -37,7 +37,7 @@
procedure doPut(putX, putY: LongInt; fromAI: boolean);
implementation
-uses uMisc, uStore, Types, uConsts, uGears, uTeams, uIO, uKeys, uWorld, uMobile,
+uses uMisc, uStore, Types, uConsts, uGears, uTeams, uIO, uKeys, uMobile,
uRandom, uAmmos, uStats, uChat, SDLh, uSound, uVisualGears, uScript, uTypes,
uVariables;
--- a/hedgewars/uIO.pas Wed Nov 17 22:14:41 2010 +0300
+++ b/hedgewars/uIO.pas Wed Nov 17 22:19:58 2010 +0300
@@ -42,7 +42,7 @@
procedure NetGetNextCmd;
implementation
-uses uConsole, uConsts, uWorld, uMisc, uLand, uChat, uTeams, uTypes, uVariables;
+uses uConsole, uConsts, uMisc, uLand, uChat, uTeams, uTypes, uVariables;
type PCmd = ^TCmd;
TCmd = packed record
--- a/hedgewars/uVariables.pas Wed Nov 17 22:14:41 2010 +0300
+++ b/hedgewars/uVariables.pas Wed Nov 17 22:19:58 2010 +0300
@@ -2013,6 +2013,20 @@
CurMinAngle, CurMaxAngle: Longword;
GameOver: boolean;
+ FollowGear: PGear;
+ WindBarWidth: LongInt;
+ bShowAmmoMenu: boolean;
+ bSelected: boolean;
+ bShowFinger: boolean;
+ Frames: Longword;
+ WaterColor, DeepWaterColor: TSDL_Color;
+ SkyOffset: LongInt;
+ HorizontOffset: LongInt;
+{$IFDEF COUNTTICKS}
+ cntTicks: LongWord;
+{$ENDIF}
+ cOffsetY: LongInt;
+
procedure initModule;
procedure freeModule;
--- a/hedgewars/uWorld.pas Wed Nov 17 22:14:41 2010 +0300
+++ b/hedgewars/uWorld.pas Wed Nov 17 22:19:58 2010 +0300
@@ -22,21 +22,6 @@
interface
uses SDLh, uGears, uConsts, uFloat, uRandom, uTypes;
-
-var FollowGear: PGear;
- WindBarWidth: LongInt;
- bShowAmmoMenu: boolean;
- bSelected: boolean;
- bShowFinger: boolean;
- Frames: Longword;
- WaterColor, DeepWaterColor: TSDL_Color;
- SkyOffset: LongInt;
- HorizontOffset: LongInt;
-{$IFDEF COUNTTICKS}
- cntTicks: LongWord;
-{$ENDIF}
- cOffsetY: LongInt;
-
procedure initModule;
procedure freeModule;