--- a/hedgewars/VGSHandlers.inc	Sun Oct 24 10:11:30 2010 -0400
+++ b/hedgewars/VGSHandlers.inc	Sun Oct 24 22:00:36 2010 +0200
@@ -77,7 +77,7 @@
 var s: Longword;
     t: float;
 begin
-Gear^.X:= Gear^.X + (cWindSpeedf * 200 + Gear^.dX) * Steps;
+Gear^.X:= Gear^.X + (cWindSpeedf * 750 * Gear^.dX) * Steps;
 
 // up-and-down-bounce magic
 s := (GameTicks + Gear^.Timer) mod 4096;