summaryrefslogtreecommitdiff
path: root/scenes/intro.scm
diff options
context:
space:
mode:
authorRicardo Wurmus <rekado@elephly.net>2018-08-08 18:53:44 +0200
committerRicardo Wurmus <rekado@elephly.net>2018-08-08 18:53:44 +0200
commit9383dcc5e654f96421b73205911ad755c748a648 (patch)
tree0230b9f68bf89b396a99c75c15e62b5e342173aa /scenes/intro.scm
parent78bea2fae49b2175f74d5c672af0c45089e77295 (diff)
intro: Rearrange text.
Diffstat (limited to 'scenes/intro.scm')
-rw-r--r--scenes/intro.scm10
1 files changed, 6 insertions, 4 deletions
diff --git a/scenes/intro.scm b/scenes/intro.scm
index 30ea844..8758a50 100644
--- a/scenes/intro.scm
+++ b/scenes/intro.scm
@@ -61,9 +61,9 @@ History yields to the present.
The present crumbles underfoot.
You better move."
"\
-A leaf has turned. The sunshine
-warms and blinds. The leaf begins
-to dry."))
+A leaf has turned.
+The sunshine warms and blinds.
+The leaf begins to dry."))
(set! *random-state* (random-state-from-platform))
@@ -87,7 +87,9 @@ to dry."))
#:name 'welcome
#:font game-font
#:text part
- #:position (vec2 16.0 (- 150.0 (* 12 i)))))
+ #:position (vec2 (- (/ %width 2)
+ (/ (font-line-width (asset-ref game-font) part) 2))
+ (- 120.0 (* 15 i)))))
parts (iota (length parts))))))
(define-method (on-key-press (intro <intro>) key mods repeat?)