diff options
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)) |