tweak Y movement
authornemo
Sat, 08 Oct 2011 01:27:43 -0400
changeset 6098 959219241c67
parent 6097 db10abae541f
child 6099 e6dd54f8d334
tweak Y movement
hedgewars/uWorld.pas
--- a/hedgewars/uWorld.pas	Sat Oct 08 00:34:41 2011 -0400
+++ b/hedgewars/uWorld.pas	Sat Oct 08 01:27:43 2011 -0400
@@ -1197,7 +1197,7 @@
     else
     begin
         CursorPoint.X:= (prevPoint.X * 7 + hwRound(FollowGear^.X) + hwSign(FollowGear^.dX) * z + WorldDx) div 8;
-        if isPhone() then
+        if isPhone() or (cScreenHeight < 600) or ((hwSign(FollowGear^.dY) * z) < 10)  then
             CursorPoint.Y:= (prevPoint.Y * 7 + cScreenHeight - (hwRound(FollowGear^.Y) + WorldDy)) div 8
         else
             CursorPoint.Y:= (prevPoint.Y * 7 + cScreenHeight - (hwRound(FollowGear^.Y) + hwSign(FollowGear^.dY) * z + WorldDy)) div 8;