From: Stas'M <x86corez@gmail.com>
Date: Sat, 19 May 2018 23:43:27 +0000 (+0300)
Subject: Monsters: Check for blind area when shooting
X-Git-Url: http://deadsoftware.ru/gitweb?a=commitdiff_plain;h=daf9eff73e0fcfea6b846daebd5732cceb699e43;p=d2df-sdl.git

Monsters: Check for blind area when shooting

http://doom2d.org/forum/viewtopic.php?f=36&t=1885
---

diff --git a/src/game/g_monsters.pas b/src/game/g_monsters.pas
index e496521..f64850d 100644
--- a/src/game/g_monsters.pas
+++ b/src/game/g_monsters.pas
@@ -3243,6 +3243,19 @@ _end:
               wx := FObj.X + wx;
               wy := FObj.Y + MONSTER_ANIMTABLE[FMonsterType].wY;
 
+            // Ìîíñòð íå ìîæåò öåëèòüñÿ â îáúåêò çà ñïèíîé, ñòðåëÿÿ âëåâî:
+              if (FDirection = TDirection.D_LEFT) and (tx > wx) then
+              begin
+                tx := wx - 32;
+                ty := wy + Random(11) - 5;
+              end;
+            // È àíàëîãè÷íî, ñòðåëÿÿ âïðàâî:
+              if (FDirection = TDirection.D_RIGHT) and (tx < wx) then
+              begin
+                tx := wx + 32;
+                ty := wy + Random(11) - 5;
+              end;
+
             // Äåëàåì âûñòðåë íóæíûì îðóæèåì:
               case FMonsterType of
                 MONSTER_IMP: