Shake screen when bomb explodes.

2024-05-25 20:21:37 -04:00 · 2024-05-25 20:21:37 -04:00 · d2eb41f6f3
commit d2eb41f6f3
parent 04b08df629
1 changed files with 2 additions and 1 deletions
--- a/game.scm
+++ b/game.scm
@ -319,8 +319,9 @@
                (('receive-electron x y)
                 (play-sound-effect audio:warp 0.25))
                (('explosion x y)
+                 ;; TODO: Particles!
                 (play-sound-effect audio:explosion)
-                 (pk 'BOOM!))
+                 (show-effect! (make-screen-shake-effect 0.2)))
                (_ (values)))
              (lp rest))))
         (update-objects!)