Allow for more variation in death timers

2026-04-03 21:06:53 +01:00
parent 789b94b514
commit 30b0bb55c0
3 changed files with 14 additions and 8 deletions
@@ -36,10 +36,8 @@ data Creature = Creature
    { _crPos :: Point3
    , _crOldPos :: Point3
    , _crOldOldPos :: Point3
--    , _crZVel :: Float
    , _crDir :: Float
    , _crMvDir :: Float
--    , _crMvAim :: Float
    , _crType :: CreatureType
    , _crID :: Int
    , _crHP :: CrHP
@@ -57,7 +55,7 @@ data Creature = Creature
    , _crGroup :: CrGroup
    , _crIntention :: Intention
    , _crName :: String
-    , _crDeathTimer :: Int
+    , _crDeathTimer :: Maybe Int
    , _crWallTouch :: IM.IntMap Point2
    }