From 8151c4cab23cba95798e34fa4447da398ef0efd8 Mon Sep 17 00:00:00 2001
From: Player701 <Player701@users.noreply.github.com>
Date: Fri, 22 Dec 2023 18:55:26 +0300
Subject: [PATCH] - Allow completion of 2018 Unleashed (pc_cp2.wad) MAP38

---
 wadsrc/static/zscript/level_compatibility.zs | 16 +++++++++++++++-
 1 file changed, 15 insertions(+), 1 deletion(-)

diff --git a/wadsrc/static/zscript/level_compatibility.zs b/wadsrc/static/zscript/level_compatibility.zs
index 0e5c90fa18..6142e30861 100644
--- a/wadsrc/static/zscript/level_compatibility.zs
+++ b/wadsrc/static/zscript/level_compatibility.zs
@@ -2171,7 +2171,21 @@ class LevelCompatibility : LevelPostProcessor
 				// fix bad skill flags for a monster that's required to be killed.
 				SetThingSkills(1184, 1);
 				break;
-			}			
+			}
+
+			case '3B4AAD34E46443BD505CC6053FCD842A': // pc_cp2.wad map38
+			{
+				// Emulate the effect of the hidden Commander Keen's death
+				// since the Keen actor is modified by DEHACKED and doesn't work as intended:
+
+				// 1) Replace the Keen with an imp
+				SetThingEdNum(101, 3004);
+
+				// 2) Set its special to emulate A_KeenDie
+				SetThingSpecial(101, Door_Open);
+				SetThingArgument(101, 0, 666);
+				SetThingArgument(101, 1, 16);
+			}
 		}
 	}
 }