hedgewars/uIO.pas
branchqmlfrontend
changeset 12855 1b2b84315d27
parent 11843 01f88c3b7b66
parent 12789 28782e03b8f0
child 12860 e33bcb9d5e9c
--- a/hedgewars/uIO.pas	Thu Aug 11 23:05:14 2016 +0300
+++ b/hedgewars/uIO.pas	Sun Dec 17 00:09:24 2017 +0100
@@ -457,7 +457,8 @@
     CurrentHedgehog^ do
     if (State and gstChooseTarget) <> 0 then
         begin
-        isCursorVisible:= false;
+        if (Ammoz[CurAmmoType].Ammo.Propz and ammoprop_NoTargetAfter) <> 0 then
+            isCursorVisible:= false;
         if not CurrentTeam^.ExtDriven then
             begin
             if fromAI then
@@ -470,10 +471,13 @@
                 TargetPoint.X:= CursorPoint.X - WorldDx;
                 TargetPoint.Y:= cScreenHeight - CursorPoint.Y - WorldDy;
                 end;
+            if (WorldEdge <> weBounce) then
+                TargetPoint.X:= CalcWorldWrap(TargetPoint.X, 0);
             SendIPCXY('p', TargetPoint.X, TargetPoint.Y);
             end
         else
             begin
+            TargetPoint.X:= CalcWorldWrap(TargetPoint.X, 0);
             TargetPoint.X:= putX;
             TargetPoint.Y:= putY
             end;