From f9838d849df418ccf28b7eca9fbc71b8bac3124f Mon Sep 17 00:00:00 2001
From: qndel <stefan551@o2.pl>
Date: Fri, 29 Oct 2021 16:06:59 +0200
Subject: [PATCH] dont allow casting berserk on berserked monster

---
 Source/missiles.cpp | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/Source/missiles.cpp b/Source/missiles.cpp
index 7b7803bcd..8feb042d0 100644
--- a/Source/missiles.cpp
+++ b/Source/missiles.cpp
@@ -1389,6 +1389,8 @@ void AddBerserk(Missile &missile, Point dst, Direction /*midir*/)
 				continue;
 			if (monster._mmode == MonsterMode::Charge)
 				continue;
+			if ((monster._mFlags & MFLAG_BERSERK) != 0)
+				continue;
 
 			i = 6;
 			auto slvl = GetSpellLevel(missile._misource, SPL_BERSERK);