# HG changeset patch
# User nemo
# Date 1372297210 14400
# Node ID ad1ec7212ac7493e31f16361e0d461667338f579
# Parent  9749524d176723e32c82b6b9433f8c179267f6ba
reduce shove frequency (perf). reduce dX so that less time is spent sliding.

diff -r 9749524d1767 -r ad1ec7212ac7 hedgewars/GSHandlers.inc
--- a/hedgewars/GSHandlers.inc	Thu Jun 27 12:18:35 2013 +0200
+++ b/hedgewars/GSHandlers.inc	Wed Jun 26 21:40:10 2013 -0400
@@ -1926,12 +1926,12 @@
         end
     else
         begin
-        if sticky then
+        if sticky and (GameTicks and $F = 0) then
             begin
             Gear^.Radius := 7;
             tdX:= Gear^.dX;
             tdY:= Gear^.dY;
-            Gear^.dX.QWordValue:= 214748365;
+            Gear^.dX.QWordValue:= 120000000;
             Gear^.dY.QWordValue:= 429496730;
             Gear^.dX.isNegative:= getrandom(2)<>1;
             Gear^.dY.isNegative:= true;