summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--assets/images/vignette.pngbin0 -> 16166 bytes
-rw-r--r--scenes/death.scm4
-rw-r--r--scenes/game.scm1
3 files changed, 5 insertions, 0 deletions
diff --git a/assets/images/vignette.png b/assets/images/vignette.png
new file mode 100644
index 0000000..d7f102d
--- /dev/null
+++ b/assets/images/vignette.png
Binary files differ
diff --git a/scenes/death.scm b/scenes/death.scm
index a2b6921..1e35563 100644
--- a/scenes/death.scm
+++ b/scenes/death.scm
@@ -40,6 +40,7 @@
#:export (death))
(define-asset death-map (load-tile-map "assets/maps/death.tmx"))
+(define-asset vignette-image (load-image "assets/images/vignette.png"))
(define-class <death> (<scene>)
(tile-map #:accessor tile-map #:init-form death-map)
@@ -246,6 +247,9 @@ void main (void) {
(make <node-2d>
#:children
(list death
+ (make <sprite>
+ #:name 'vignette
+ #:texture (asset-ref vignette-image))
(let ((text "Press any key to quit.")
(font death-font))
(make <label>
diff --git a/scenes/game.scm b/scenes/game.scm
index ac6d7df..fae998d 100644
--- a/scenes/game.scm
+++ b/scenes/game.scm
@@ -54,6 +54,7 @@
(define-asset test-map (load-tile-map "assets/maps/01.tmx"))
(define-asset error-sample (load-sample "assets/sounds/error.ogg"))
+(define-asset vignette-image (load-image "assets/images/vignette.png"))
(define-class <game> (<scene>)
(status #:accessor status #:init-form 'playing)