Implement modules changing shell payloads

2024-12-24 21:13:58 +00:00
parent e82ef26b3e
commit 81fd2131e0
18 changed files with 82 additions and 18 deletions
@@ -30,7 +30,7 @@ moveShockwave w sw
    doDams w' =
        over (cWorld . lWorld . creatures) (IM.map damCr) $
            foldl'
-                (flip $ damageWall (Damage EXPLOSIVE 10000 p p p NoDamageEffect))
+                (flip $ damageWall (Damage EXPLOSIVE 1000 p p p NoDamageEffect))
                w'
                hitBlocks
    hitBlocks = map snd . overlapCircWalls p rad $ wlsNearCirc p rad w