justin/loop
1
0
Fork 0
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

Remove DamageEffect

Browse Source
This commit is contained in:
justin
2025-06-07 10:28:17 +01:00
parent 500772f2f9
commit 2b39152060
16 changed files with 41 additions and 58 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Dodge/Prop/Moving.hs
+1 -1
View File
@@ -23,7 +23,7 @@ fallSmallBounceDamage pr w =
dodamage' cr
| dist (_crPos cr) p < crRad (cr ^. crType) + 5 =
cr & crState . csDamage
.:~ Damage CRUSHING (floor . (* 10) . max 0 . subtract 5 . abs $ _prVelZ pr) (p -.- v) p (p +.+ v) NoDamageEffect
.:~ Damage CRUSHING (floor . (* 10) . max 0 . subtract 5 . abs $ _prVelZ pr) (p -.- v) p (p +.+ v)
| otherwise = cr
fallSmallBounce :: Prop -> World -> World