prevent sentries from getting stuck in the corners
authoralfadur
Sat, 11 Jul 2020 01:09:56 +0300
changeset 15714 7a4b719ac611
parent 15713 73c4e7d47575
child 15715 e0cdb6ae88ab
prevent sentries from getting stuck in the corners
hedgewars/uGearsHandlersMess.pas
--- a/hedgewars/uGearsHandlersMess.pas	Thu Jul 09 02:41:51 2020 +0300
+++ b/hedgewars/uGearsHandlersMess.pas	Sat Jul 11 01:09:56 2020 +0300
@@ -7190,7 +7190,8 @@
             break;
     end;
 
-    if (offset >= -maxYStep) and (offset <= maxYStep) then
+    if (offset >= -maxYStep) and (offset <= maxYStep)
+       and (TestCollisionYImpl(x + direction, y + offset, Sentry^.Radius, -1, Sentry^.CollisionMask) = 0) then
     begin
         if not TestOnly then
         begin