summaryrefslogtreecommitdiff
path: root/game.scm
diff options
context:
space:
mode:
Diffstat (limited to 'game.scm')
-rw-r--r--game.scm16
1 files changed, 10 insertions, 6 deletions
diff --git a/game.scm b/game.scm
index a4c646c..0e75684 100644
--- a/game.scm
+++ b/game.scm
@@ -111,6 +111,10 @@
"audio" "setVolume"
(ref extern) f64 -> none)
+ (define-foreign load-image
+ "image" "new"
+ (ref string) -> (ref extern))
+
;; TODO: Add basic fmod as inline wasm function
;; Hoot's exact and inexact aren't working right. These next two
@@ -251,12 +255,12 @@
;; Elements
(define canvas (get-element-by-id "canvas"))
(define context (get-context canvas "2d"))
- (define image:background (get-element-by-id "image-background"))
- (define image:player (get-element-by-id "image-player"))
- (define image:player-bullet (get-element-by-id "image-player-bullet"))
- (define image:enemy-bullets (get-element-by-id "image-enemy-bullets"))
- (define image:map (get-element-by-id "image-map"))
- (define image:enemies (get-element-by-id "image-enemies"))
+ (define image:background (load-image "images/background.png"))
+ (define image:player (load-image "images/player.png"))
+ (define image:player-bullet (load-image "images/player-bullet.png"))
+ (define image:enemy-bullets (load-image "images/enemy-bullets.png"))
+ (define image:map (load-image "images/map.png"))
+ (define image:enemies (load-image "images/enemies.png"))
(define sound:explosion (load-sound-effect "audio/explosion.wav"))
(define sound:player-shoot (load-sound-effect "audio/player-shoot.wav"))
(define sound:player-death (load-sound-effect "audio/player-death.wav"))