diff options
| author | David Thompson <dthompson@vistahigherlearning.com> | 2022-10-12 06:48:14 -0400 |
|---|---|---|
| committer | David Thompson <dthompson@vistahigherlearning.com> | 2022-10-27 13:22:50 -0400 |
| commit | e287a11c4387382277c31735504fc762c33b4cee (patch) | |
| tree | b262dc8de64db21a7d2cb2c980f2be39805d6a34 /bonnie-bee/turret.scm | |
| parent | f713890a773a7d6ff666277592eec72f2328a5b6 (diff) | |
Switch to Catbird engine.
Diffstat (limited to 'bonnie-bee/turret.scm')
| -rw-r--r-- | bonnie-bee/turret.scm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/bonnie-bee/turret.scm b/bonnie-bee/turret.scm index 5aae796..61a075c 100644 --- a/bonnie-bee/turret.scm +++ b/bonnie-bee/turret.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 (<turret>)) (define-class <turret> (<grounded> <damageable> <actor>)) @@ -38,15 +38,15 @@ (else #f))) (define-method (on-death (turret <turret>)) - (audio-play (asset-ref explosion-sound)) + (audio-play (artifact explosion-sound)) (let ((p (position turret))) - (add-particle-emitter (particles (particles (parent turret))) + (add-particle-emitter (particles (& (parent turret) particles)) (make-particle-emitter (make-rect (vec2-x p) (vec2-y p) 1.0 1.0) 10 3)) (for-range ((i 8)) (let ((theta (- (* (random:uniform) (/ pi -2.0)) (/ pi 4.0))) (speed (+ (* (random:uniform) 1.0) 1.0))) - (add-bullet (bullets (parent turret)) + (add-bullet (& (parent turret) bullets) medium-enemy-bullet p (vec2 (* (cos theta) speed) (* (sin theta) speed))))))) |