Remove external corpses, handle them as creatures

2025-09-25 09:31:58 +01:00
parent fcb02850d0
commit 23f61081cf
33 changed files with 184 additions and 159 deletions
@@ -14,7 +14,7 @@ import Picture
 smallChaseCrit :: Creature
 smallChaseCrit =
    chaseCrit
-        { _crHP = 1
+        { _crHP = HP 1
        , _crInv = mempty
        }

@@ -28,7 +28,7 @@ chaseCrit :: Creature
 chaseCrit =
    defaultCreature
        { _crName = "chaseCrit"
-        , _crHP = 150
+        , _crHP = HP 150
        , _crInv = mempty
        , _crFaction = ColorFaction green
        , _crVocalization = chaseCritVocalization