summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-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?)