Allow debris to do damage

2022-06-16 02:46:18 +01:00
parent a7201b8fb6
commit 6d5d651566
6 changed files with 30 additions and 7 deletions
@@ -22,6 +22,7 @@ damageBlockWith dm = case _dmType dm of
    CUTTING     -> blHPs %~ reduceHead dam
    EXPLOSIVE   -> blHPs %~ reduceHead dam
    CONCUSSIVE  -> blHPs %~ reduceHead dam
+    CRUSHING    -> blHPs %~ reduceHead (dam `div` 4)
    LASERING    -> id
    SPARKING    -> id
    FLAMING     -> id