hedgewars/GSHandlers.inc
changeset 4602 ec84fb564bab
parent 4582 85e92b6e5ad4
child 4611 445d382cd401
--- a/hedgewars/GSHandlers.inc	Tue Dec 21 23:22:53 2010 +0100
+++ b/hedgewars/GSHandlers.inc	Wed Dec 22 02:50:17 2010 +0100
@@ -320,7 +320,7 @@
     if isFalling then 
         begin
         Gear^.dY := Gear^.dY + cGravity;
-        if (GameFlags and gfMoreWind) <> 0 then Gear^.dX := Gear^.dX + cWindSpeed * _16 / max(12,sqr(Gear^.Radius))
+        if (GameFlags and gfMoreWind) <> 0 then Gear^.dX := Gear^.dX + cWindSpeed / Gear^.Density
         end;
 
     Gear^.X := Gear^.X + Gear^.dX;