# HG changeset patch
# User nemo
# Date 1624476768 14400
# Node ID b06b33cf0a8948c383a4e36dd08391a142894292
# Parent  d5c37e78ab83ce00cb93dc0e745a6aa0ff0f533e
Hopefully this is a little more sensible

diff -r d5c37e78ab83 -r b06b33cf0a89 hedgewars/uGearsHandlersMess.pas
--- a/hedgewars/uGearsHandlersMess.pas	Tue Jun 22 22:13:55 2021 +0200
+++ b/hedgewars/uGearsHandlersMess.pas	Wed Jun 23 15:32:48 2021 -0400
@@ -396,10 +396,10 @@
         end;
 
     // clip velocity at 2 - over 1 per pixel, but really shouldn't cause many actual problems.
-    if Gear^.dX.Round > 1 then
-        Gear^.dX.QWordValue:= 8589934592;
-    if Gear^.dY.Round > 1 then
-        Gear^.dY.QWordValue:= 8589934592;
+    if Gear^.dX.QWordValue > 8160437862 then
+        Gear^.dX.QWordValue:= 8160437862;
+    if Gear^.dY.QWordValue > 8160437862 then
+        Gear^.dY.QWordValue:= 8160437862;
 
     if (Gear^.State and gstSubmersible <> 0) and CheckCoordInWater(gX, gY) then
         begin