From 0c5d45bec2d061991c627b66ad6acad05fbdddeb Mon Sep 17 00:00:00 2001 From: Gene Pasquet Date: Mon, 23 Jun 2025 00:03:06 +0100 Subject: Progress on tilemap parser --- src/game.scm | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'src/game.scm') diff --git a/src/game.scm b/src/game.scm index a7f1695..d1e38f0 100644 --- a/src/game.scm +++ b/src/game.scm @@ -8,7 +8,8 @@ miscmacros (prefix sdl2 "sdl2:") (prefix sdl2-ttf "ttf:") - (prefix sdl2-image "img:")) + (prefix sdl2-image "img:") + tilemap) (define +color-depth+ 32) (define +screen-width+ 600) @@ -49,6 +50,9 @@ (define *joystick* (if (> (sdl2:num-joysticks) 0) (sdl2:joystick-open! 0) #f)) +(define *level* (load-tilemap "assets/level-0.tmx")) + +(define (draw-tile target tileset tile-id)) (set! (sdl2:render-draw-color *renderer*) +background-color+) (sdl2:render-clear! *renderer*) -- cgit v1.2.3