From 38eee24832fe6da4f135cae455881ab97953b23a Mon Sep 17 00:00:00 2001 From: Gene Pasquet Date: Sat, 18 Apr 2026 02:47:10 +0100 Subject: Refresh docs and re-indent --- demo/platformer.scm | 38 +++++++++++++++++++------------------- 1 file changed, 19 insertions(+), 19 deletions(-) (limited to 'demo/platformer.scm') diff --git a/demo/platformer.scm b/demo/platformer.scm index 6e854fe..c11c390 100644 --- a/demo/platformer.scm +++ b/demo/platformer.scm @@ -40,24 +40,24 @@ (define *game* (make-game - title: "Demo: Platformer" width: 600 height: 400 - debug?: +debug?+ - - preload: (lambda (game) - (init-audio!) - (load-sounds! '((jump . "demo/assets/jump.wav")))) - - create: (lambda (game) - (let* ((s0 (game-load-scene! game "demo/assets/level-0.tmx")) - (s1 (scene-add-entity s0 (make-player))) - (s2 (update-scene s1 camera-target: 'player))) - (game-scene-set! game s2))) - - update: (lambda (game dt) - (let* ((input (game-input game)) - (scene (game-scene game)) - (player (update-player (car (scene-entities scene)) input))) - (game-scene-set! game - (update-scene scene entities: (list player))))))) + title: "Demo: Platformer" width: 600 height: 400 + debug?: +debug?+ + + preload: (lambda (game) + (init-audio!) + (load-sounds! '((jump . "demo/assets/jump.wav")))) + + create: (lambda (game) + (let* ((s0 (game-load-scene! game "demo/assets/level-0.tmx")) + (s1 (scene-add-entity s0 (make-player))) + (s2 (update-scene s1 camera-target: 'player))) + (game-scene-set! game s2))) + + update: (lambda (game dt) + (let* ((input (game-input game)) + (scene (game-scene game)) + (player (update-player (car (scene-entities scene)) input))) + (game-scene-set! game + (update-scene scene entities: (list player))))))) (game-run! *game*) -- cgit v1.2.3