summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRicardo Wurmus <rekado@elephly.net>2018-07-18 23:18:10 +0200
committerRicardo Wurmus <rekado@elephly.net>2018-07-27 17:15:45 +0200
commit44480bdd38da7560a38bbea24e916a4939f2a167 (patch)
tree56305621030ec40ef4f328947b8f005e6ccaaa72
parentfe901faed35fbc4d626fa6828bbe0f2e4bbab000 (diff)
Use simpler dialog box.
-rw-r--r--scenes/game.scm10
1 files changed, 3 insertions, 7 deletions
diff --git a/scenes/game.scm b/scenes/game.scm
index c1984e0..e142607 100644
--- a/scenes/game.scm
+++ b/scenes/game.scm
@@ -142,10 +142,6 @@
(load-tile-font "assets/fonts/bubblemad_8x8.png" 8 8
" !\"©_%❤'()*+,-./0123456789:←<=>?@abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"))
-(define-asset text-bubble
- (load-image "assets/images/paper.png"))
-
-
(define (start-position game name)
"Look up the start position for an object with the given NAME in the
map's object layer."
@@ -421,9 +417,9 @@ map's object layer."
(make <node-2d>
#:children
(list game
- (make <sprite>
+ (make <filled-rect>
#:name 'text-bubble
- #:region (make-rect 0.0 0.0 300.0 100.0)
+ #:region (make-rect 0.0 0.0 %width 50)
#:position (vec2 0 0)
#:visible? #f
- #:texture (asset-ref text-bubble))))))
+ #:color (make-color 0 0 0 0.5))))))