Add bee crits

This commit is contained in:
2026-04-20 12:25:39 +01:00
parent 722a25240e
commit adae6b84f4
20 changed files with 340 additions and 184 deletions
+4
View File
@@ -34,6 +34,8 @@ crWarningSounds cr = case cr ^. crType of
AutoCrit -> mempty
BarrelCrit{} -> mempty
LampCrit{} -> mempty
BeeCrit{} -> mempty
HiveCrit{} -> mempty
crDeathSounds :: Creature -> DeathType -> [SoundID]
crDeathSounds cr dt = case cr ^. crType of
@@ -47,6 +49,8 @@ crDeathSounds cr dt = case cr ^. crType of
AutoCrit -> mempty
BarrelCrit{} -> mempty
LampCrit{} -> mempty
BeeCrit{} -> defaultDeathSounds dt
HiveCrit{} -> defaultDeathSounds dt
defaultDeathSounds :: DeathType -> [SoundID]
defaultDeathSounds = \case