(define-module (bonnie-bee assets) #:use-module (chickadee audio) #:use-module (chickadee graphics text) #:use-module (chickadee graphics texture) #:use-module (catbird asset) #:export (monogram-font background-image particle-image darkness-image lightness-image chickadee-image bee-atlas bullet-atlas popcorn-atlas flower-atlas turret-atlas moth-atlas beetle-atlas explosion-sound pickup-sound enemy-shoot-sound enemy-hit-sound player-death-sound player-shoot-sound player-bomb-sound pollen-release-sound hehehe-sound alarm-sound intro-music main-music)) (define (scope-datadir file-name) (let ((prefix (or (getenv "BONNIE_BEE_DATADIR") (getcwd)))) (string-append prefix "/" file-name))) (define (font-file file-name) (scope-datadir (string-append "assets/fonts/" file-name))) (define (image-file file-name) (scope-datadir (string-append "assets/images/" file-name))) (define (audio-file file-name) (scope-datadir (string-append "assets/sounds/" file-name))) (define-font monogram-font (font-file "monogram_extended.ttf") 12) (define-image background-image (image-file "background.png")) (define-image particle-image (image-file "particle.png")) (define-image darkness-image (image-file "darkness.png")) (define-image lightness-image (image-file "lightness.png")) (define-image chickadee-image (image-file "chickadee.png")) (define-tileset bee-atlas (image-file "bee.png") 32 32) (define-tileset bullet-atlas (image-file "bullets.png") 16 16) (define-tileset flower-atlas (image-file "flower.png") 64 64) (define-tileset popcorn-atlas (image-file "popcorn.png") 32 32) (define-tileset turret-atlas (image-file "turret.png") 64 64) (define-tileset moth-atlas (image-file "moth.png") 64 64) (define-tileset beetle-atlas (image-file "beetle.png") 128 64) (define-audio explosion-sound (audio-file "explosion.wav")) (define-audio pickup-sound (audio-file "pickup.wav")) (define-audio enemy-shoot-sound (audio-file "enemy-shoot.wav")) (define-audio enemy-hit-sound (audio-file "enemy-hit.wav")) (define-audio player-death-sound (audio-file "player-death.wav")) (define-audio player-shoot-sound (audio-file "player-shoot.wav")) (define-audio player-bomb-sound (audio-file "player-bomb.wav")) (define-audio pollen-release-sound (audio-file "pollen-release.wav")) (define-audio hehehe-sound (audio-file "hehehe.wav")) (define-audio alarm-sound (audio-file "alarm.wav")) (define-audio intro-music (audio-file "intro.ogg") #:mode 'stream) (define-audio main-music (audio-file "main.ogg") #:mode 'stream)