hedgewars/uGears.pas
changeset 4623 fa24dac6c473
parent 4621 1d45bf63f25c
child 4637 0f22a53c4c1d
--- a/hedgewars/uGears.pas	Wed Dec 22 01:19:47 2010 -0500
+++ b/hedgewars/uGears.pas	Wed Dec 22 01:30:03 2010 -0500
@@ -919,7 +919,10 @@
     SpeechText:= ''; // in case it has not been consumed
 
     if (GameFlags and gfLowGravity) = 0 then
+        begin
         cGravity:= cMaxWindSpeed * 2;
+        cGravityf:= 0.00025 * 2
+        end;
 
     if (GameFlags and gfVampiric) = 0 then
         cVampiric:= false;
@@ -1094,7 +1097,10 @@
     end;
 
 if (GameFlags and gfLowGravity) <> 0 then
+    begin
     cGravity:= cMaxWindSpeed;
+    cGravityf:= 0.00025
+    end;
 
 if (GameFlags and gfVampiric) <> 0 then
     cVampiric:= true;