diff options
Diffstat (limited to 'scene-loader.scm')
| -rw-r--r-- | scene-loader.scm | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/scene-loader.scm b/scene-loader.scm index 9b5545e..387bf38 100644 --- a/scene-loader.scm +++ b/scene-loader.scm @@ -24,11 +24,13 @@ (object-width obj) (object-height obj))) (tilemap-objects tilemap))) + ;; Create an SDL2 texture from a tileset's embedded image surface. + (define (create-texture-from-tileset renderer tileset) + (sdl2:create-texture-from-surface renderer (tileset-image tileset))) + ;; Create an SDL2 texture from the tileset image embedded in a tilemap. (define (create-tileset-texture renderer tilemap) - (sdl2:create-texture-from-surface - renderer - (tileset-image (tilemap-tileset tilemap)))) + (create-texture-from-tileset renderer (tilemap-tileset tilemap))) ;; Load a TMX tilemap file and store it in the game asset registry. ;; Returns the loaded tilemap struct. @@ -63,6 +65,7 @@ (scene (make-scene entities: '() tilemap: tm + tileset: #f camera: (make-camera x: 0 y: 0) tileset-texture: tex camera-target: #f))) |