hedgewars/uAIMisc.pas
changeset 1519 7b6adbe5266a
parent 1352 405ad07cf875
child 1753 2ccba26f1aa4
--- a/hedgewars/uAIMisc.pas	Thu Nov 27 22:45:41 2008 +0000
+++ b/hedgewars/uAIMisc.pas	Fri Nov 28 14:52:00 2008 +0000
@@ -366,7 +366,7 @@
    if hwRound(Gear^.Y) > pY then inc(GoInfo.FallPix);
    if TestCollisionYwithGear(Gear, 1) then
       begin
-      inc(GoInfo.Ticks, 300);
+      inc(GoInfo.Ticks, 410);
       Gear^.State:= Gear^.State and not (gstMoving or gstHHJumping);
       Gear^.dY:= _0;
       Result:= true;