# HG changeset patch
# User Xeli
# Date 1331669386 -3600
# Node ID 95ee7bde3514040ad45f374ebf3aaed6259c3fd6
# Parent  d62f25f5d6ce1b15e46ee2d7d18ed5cfe5a672ba
allow for 0 values on AMShiftTarget, this allows for movement across one axis

diff -r d62f25f5d6ce -r 95ee7bde3514 hedgewars/uWorld.pas
--- a/hedgewars/uWorld.pas	Sat Mar 17 17:24:38 2012 -0400
+++ b/hedgewars/uWorld.pas	Tue Mar 13 21:09:46 2012 +0100
@@ -503,17 +503,23 @@
     AMShiftTargetY:= cScreenHeight - AmmoRect.y;
     AMShiftX:= AMShiftTargetX;
     AMShiftY:= AMShiftTargetY;
-
-    if (AMShiftTargetX div MENUSPEED) <  (AMShiftTargetY div MENUSPEED) then
+    
+    if (AMShiftTargetX = 0) or (AMShiftTargetY = 0) then
         begin
         MenuSpeedX:= MENUSPEED;
-        MenuSpeedY:= AMShiftTargetY div (AMShiftTargetX div MENUSPEED);
+        MENUSpeedY:= MENUSPEED;
         end
     else
-        begin
-        MenuSpeedX:= AMShiftTargetX div (AMShiftTargetY div MENUSPEED);
-        MenuSpeedY:= MENUSPEED;
-        end;
+        if (AMShiftTargetX div MENUSPEED) <  (AMShiftTargetY div MENUSPEED) then
+            begin
+            MenuSpeedX:= MENUSPEED;
+            MenuSpeedY:= AMShiftTargetY div (AMShiftTargetX div MENUSPEED);
+            end
+        else
+            begin
+            MenuSpeedX:= AMShiftTargetX div (AMShiftTargetY div MENUSPEED);
+            MenuSpeedY:= MENUSPEED;
+            end;
 end;
 
 if bShowAmmoMenu then // show ammo menu