hedgewars/HHHandlers.inc
changeset 4647 20b982afbe6e
parent 4641 43d17e3b81de
child 4790 4cb3f7890fbd
--- a/hedgewars/HHHandlers.inc	Thu Dec 23 17:47:50 2010 +0100
+++ b/hedgewars/HHHandlers.inc	Thu Dec 23 20:26:31 2010 +0100
@@ -276,7 +276,8 @@
                              end;
                       amLowGravity: begin
                                     PlaySound(sndLowGravity);
-                                    cGravity:= cMaxWindSpeed
+                                    cGravity:= cMaxWindSpeed;
+                                    cGravityf:= 0.00025
                                     end;
                       amExtraDamage:begin 
                                     PlaySound(sndHellishImpact4);
@@ -668,12 +669,12 @@
        Gear^.dY:= Gear^.dY + cGravity;
 // this set of circumstances could be less complex if jumping was more clearly identified
        if ((GameFlags and gfMoreWind) <> 0) and 
-          (Gear^.Damage <> 0) or
+          (((Gear^.Damage <> 0) or
           ((CurAmmoGear <> nil) and
             ((CurAmmoGear^.AmmoType = amJetpack) or
             (CurAmmoGear^.AmmoType = amBirdy))) or
-          ((Gear^.dY.QWordValue + Gear^.dX.QWordValue) > _0_55.QWordValue)
-          then Gear^.dX := Gear^.dX + cWindSpeed * _0_2
+          ((Gear^.dY.QWordValue + Gear^.dX.QWordValue) > _0_55.QWordValue)))
+          then Gear^.dX := Gear^.dX + cWindSpeed / Gear^.Density
        end
    end 
 else