diff -r ed5450a89b96 -r 3f73901a350a hedgewars/uWorld.pas
--- a/hedgewars/uWorld.pas	Fri Mar 07 17:43:05 2008 +0000
+++ b/hedgewars/uWorld.pas	Fri Mar 07 18:10:03 2008 +0000
@@ -38,7 +38,8 @@
     Frames: Longword = 0;
 
 implementation
-uses uStore, uMisc, uTeams, uIO, uConsole, uKeys, uLocale, uSound, GL, uAmmos;
+uses uStore, uMisc, uTeams, uIO, uConsole, uKeys, uLocale, uSound, GL,
+     uAmmos, uVisualGears;
 const FPS: Longword = 0;
       CountTicks: Longword = 0;
       SoundTimerTicks: Longword = 0;
@@ -183,6 +184,8 @@
 DrawRepeated(sprSky, WorldDx * 3 div 8);
 DrawRepeated(sprHorizont, WorldDx * 3 div 5);
 
+DrawVisualGears;
+
 // Waves
 {$WARNINGS OFF}
 for i:= -1 to cWaterSprCount do DrawSprite(sprWater,  i * 256  + ((WorldDx + (RealTicks shr 6)      ) and $FF), cWaterLine + WorldDy - 64, 0, Surface);