diff options
| author | Gene Pasquet <dev@etenil.net> | 2026-04-08 07:08:54 +0100 |
|---|---|---|
| committer | Gene Pasquet <dev@etenil.net> | 2026-04-08 07:08:54 +0100 |
| commit | afc30a12e25215ff5e9226c3b4f8fd127d9a4d68 (patch) | |
| tree | f736393fb8ebfd8982a4b79310a08c57ee430ff0 /demo/shmup.scm | |
| parent | 9e8b75f9949259ef01942cd3717b79b044efddf7 (diff) | |
Move the engine-update to the scene
Diffstat (limited to 'demo/shmup.scm')
| -rw-r--r-- | demo/shmup.scm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/demo/shmup.scm b/demo/shmup.scm index fdffd71..f4897ae 100644 --- a/demo/shmup.scm +++ b/demo/shmup.scm @@ -79,7 +79,7 @@ (define (update-player player input) (let ((updated (chain player (entity-set _ #:vx (player-vx input)) - (apply-velocity-x _) + (apply-velocity-x _ #f 0) (clamp-player-x _)))) (when (input-pressed? input 'a) (play-sound 'shoot)) @@ -133,7 +133,8 @@ tilemap: #f camera: (make-camera x: 0 y: 0) tileset-texture: #f - camera-target: #f))) + camera-target: #f + engine-update: 'none))) update: (lambda (game dt) (set! *frame-count* (+ *frame-count* 1)) |