Rethink damage data type, work on damage sensors

2022-03-13 09:27:35 +00:00
parent d340fd73c3
commit 06a501ff88
30 changed files with 356 additions and 240 deletions
@@ -82,7 +82,7 @@ updateTurret rotSpeed mc w
            & creatures . ix cid . crPos .~ mcpos
            & creatures . ix cid . crDir .~ mcdir
    dodamage = machines . ix mcid %~ 
-        ( (mcDamage .~ [Electrical (min 2500 $ max 0 (elecDam - 10)) 0 0 0])
+        ( (mcDamage .~ [Damage Electrical (min 2500 $ max 0 (elecDam - 10)) 0 0 0 NoDamageEffect])
        . (mcHP -~ dam)
        )
    elecDamBranch