hedgewars/uWorld.pas
changeset 11156 efea685933ae
parent 11151 5c40c65b619d
child 11210 22f2e072d31e
--- a/hedgewars/uWorld.pas	Fri Sep 11 07:39:01 2015 +0200
+++ b/hedgewars/uWorld.pas	Fri Sep 11 08:15:17 2015 +0200
@@ -1737,7 +1737,7 @@
                     CursorPoint.X:= (prevPoint.X * 7 + dstX) div 8;
                 end;
 
-        if isPhone() or (cScreenHeight < 600) or ((FollowGear^.dY * z).Round < 10) then
+        if isPhone() or (cScreenHeight < 600) or (hwFloat(FollowGear^.dY * z).Round < 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;