# HG changeset patch # User unc0rr # Date 1290021598 -10800 # Node ID 334fc848e0511f301de9fe6feb355c3889661eeb # Parent b89235e401e556348d1d491040924a4d9edfd156 uWorld diff -r b89235e401e5 -r 334fc848e051 hedgewars/uConsole.pas --- 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; diff -r b89235e401e5 -r 334fc848e051 hedgewars/uIO.pas --- 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 diff -r b89235e401e5 -r 334fc848e051 hedgewars/uVariables.pas --- 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; diff -r b89235e401e5 -r 334fc848e051 hedgewars/uWorld.pas --- 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;