Cleanup, redo damage direction

2025-06-08 20:40:58 +01:00
parent 5b1e4fba4e
commit 70c78824f3
12 changed files with 105 additions and 147 deletions
@@ -114,7 +114,7 @@ useBulletPayload bu = case _buPayload bu of
    BulFlak -> makeFlak bu
    BulFrag -> makeFragBullets
    BulGas -> (`makeGasCloud` V2 0 0)
-    BulBall FlamingBall -> incBallAt
+--    BulBall FlamingBall -> incBallAt
    BulBall ExplosiveBall -> \p -> cWorld . lWorld . shockwaves .:~ concBall p
    BulBall ElectricalBall -> makeStaticBall
    BulBall FlashBall -> makeFlashBall