summaryrefslogtreecommitdiff
path: root/bonnie-bee/popcorn.scm
diff options
context:
space:
mode:
authorDavid Thompson <dthompson@vistahigherlearning.com>2022-10-12 06:48:14 -0400
committerDavid Thompson <dthompson@vistahigherlearning.com>2022-10-27 13:22:50 -0400
commite287a11c4387382277c31735504fc762c33b4cee (patch)
treeb262dc8de64db21a7d2cb2c980f2be39805d6a34 /bonnie-bee/popcorn.scm
parentf713890a773a7d6ff666277592eec72f2328a5b6 (diff)
Switch to Catbird engine.
Diffstat (limited to 'bonnie-bee/popcorn.scm')
-rw-r--r--bonnie-bee/popcorn.scm10
1 files changed, 5 insertions, 5 deletions
diff --git a/bonnie-bee/popcorn.scm b/bonnie-bee/popcorn.scm
index 594e88c..1fde520 100644
--- a/bonnie-bee/popcorn.scm
+++ b/bonnie-bee/popcorn.scm
@@ -10,9 +10,9 @@
#:use-module (chickadee scripting)
#:use-module (chickadee utils)
#:use-module (oop goops)
- #:use-module (starling asset)
- #:use-module (starling node)
- #:use-module (starling node-2d)
+ #:use-module (catbird asset)
+ #:use-module (catbird node)
+ #:use-module (catbird node-2d)
#:export (<popcorn>))
(define-class <popcorn> (<damageable> <actor>))
@@ -35,8 +35,8 @@
#f))
(define-method (on-death (popcorn <popcorn>))
- (audio-play (asset-ref explosion-sound))
+ (audio-play (artifact explosion-sound))
(let ((p (position popcorn)))
- (add-particle-emitter (particles (particles (parent popcorn)))
+ (add-particle-emitter (particles (& (parent popcorn) particles))
(make-particle-emitter (make-rect (vec2-x p) (vec2-y p) 1.0 1.0)
4 3))))