diff options
Diffstat (limited to 'scenes/intro.scm')
| -rw-r--r-- | scenes/intro.scm | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/scenes/intro.scm b/scenes/intro.scm index 0592eed..cc6c5a0 100644 --- a/scenes/intro.scm +++ b/scenes/intro.scm @@ -16,6 +16,7 @@ ;;; <http://www.gnu.org/licenses/>. (define-module (scenes intro) + #:use-module (chickadee audio) #:use-module (chickadee math rect) #:use-module (chickadee math vector) #:use-module (chickadee render font) @@ -27,7 +28,7 @@ #:use-module (config) #:use-module (scenes game) #:use-module (oop goops) - #:export (<intro>)) + #:export (intro)) (define-class <intro> (<scene>)) @@ -88,3 +89,8 @@ to dry.")) (when (eq? key 'return) (switch-scene (root-node) (game)))) + +(define (intro) + (set-music-volume! 1.0) + (play-music (load-music "assets/music/intro.ogg") #:loop? #f) + (make <intro>)) |