Work on gibs and chasms

2025-08-01 09:39:13 +01:00
parent 7110ddb7a6
commit eeb7c8ac88
22 changed files with 586 additions and 373 deletions
@@ -24,7 +24,7 @@ applyPiercingDamage cr dm
    | crIsArmouredFrom p cr = f . makeSpark NormalSpark p1 (argV (p1 - p))
    | otherwise = f . damageHP cr (_dmAmount dm)
  where
-    f = cWorld . lWorld . creatures . ix (_crID cr) . crPos -~ _dmVector dm
+    f = cWorld . lWorld . creatures . ix (_crID cr) . crPos +~ _dmVector dm
            / V2 x x
    x = crMass (_crType cr)
    p = _dmPos dm