keep velocity from fluttering between 2 and 3px / ms when falling...
authornemo
Fri, 10 Jan 2014 11:35:02 -0500
changeset 9967 40750e72514b
parent 9965 7ced30acf533
child 9969 f27921b31b61
keep velocity from fluttering between 2 and 3px / ms when falling...
hedgewars/uGearsHandlersMess.pas
--- a/hedgewars/uGearsHandlersMess.pas	Wed Jan 08 23:46:02 2014 +0100
+++ b/hedgewars/uGearsHandlersMess.pas	Fri Jan 10 11:35:02 2014 -0500
@@ -296,9 +296,9 @@
         end;
 
     // clip velocity at 2 - over 1 per pixel, but really shouldn't cause many actual problems.
-    if Gear^.dX.Round > 2 then
+    if Gear^.dX.Round > 1 then
         Gear^.dX.QWordValue:= 8589934592;
-    if Gear^.dY.Round > 2 then
+    if Gear^.dY.Round > 1 then
         Gear^.dY.QWordValue:= 8589934592;
 
     if (Gear^.State and gstSubmersible <> 0) and (gY > cWaterLine) then