--- a/hedgewars/uLandObjects.pas	Fri Mar 07 19:44:00 2008 +0000
+++ b/hedgewars/uLandObjects.pas	Fri Mar 07 20:25:19 2008 +0000
@@ -400,7 +400,7 @@
    Readln(f, vobFramesCount, vobFrameTicks, vobVelocity, vobFallSpeed);
 
 for i:= 0 to Pred(vobCount) do
-    AddVisualGear( -cScreenWidth + random(cScreenWidth * 2 + 2048), random(1000), vgtFlake);
+    AddVisualGear( -cScreenWidth + random(cScreenWidth * 2 + 2048), random(1200) - 100, vgtFlake);
 
 Close(f);
 {$I+}