From 67ad81d9f78251ac0369db24046e1455c1d66769 Mon Sep 17 00:00:00 2001 From: Peter Tillemans Date: Tue, 21 May 2024 13:55:12 +0200 Subject: [PATCH] fixed sprite-batch size for bigger levels --- game/render/level.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/game/render/level.scm b/game/render/level.scm index 8650048..5c76628 100644 --- a/game/render/level.scm +++ b/game/render/level.scm @@ -22,7 +22,7 @@ (set! tile-texture (load-image "assets/images/simples_pimples.png" #:transparent-color black)) (set! tile-atlas (split-texture tile-texture 16 16)) - (set! sprite-batch (make-sprite-batch tile-texture #:capacity 1000)) + (set! sprite-batch (make-sprite-batch tile-texture #:capacity 1200)) ) @@ -51,7 +51,7 @@ (y (* 16 row)) (tile (level-tile-at level x y)) (texture-region (texture-atlas-ref tile-atlas (level-tile-index tile)))) - (format #f "tile ~a at ~a ~a~%" (level-tile-index tile) x y) + (display (format #f "tile ~a at ~a ~a~%" (level-tile-index tile) row column)) (sprite-batch-add! sprite-batch (vec2 x y) #:texture-region texture-region))) (iota (level-width level) 0)))