diff options
| author | David Thompson <dthompson@vistahigherlearning.com> | 2021-10-23 17:09:34 -0400 |
|---|---|---|
| committer | David Thompson <dthompson@vistahigherlearning.com> | 2021-10-23 17:09:34 -0400 |
| commit | 3fc18437f905f18aa4bf3b688930dbc68f8721b3 (patch) | |
| tree | e14a25532309c88e2a33d5a7641f381a69733966 /bonnie-bee/popcorn.scm | |
| parent | fb31282c18f33acb6de24e604059df6d05477491 (diff) | |
Lots of tweaks and also sprite animations!
Diffstat (limited to 'bonnie-bee/popcorn.scm')
| -rw-r--r-- | bonnie-bee/popcorn.scm | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/bonnie-bee/popcorn.scm b/bonnie-bee/popcorn.scm index 8c70326..594e88c 100644 --- a/bonnie-bee/popcorn.scm +++ b/bonnie-bee/popcorn.scm @@ -19,9 +19,12 @@ (define-method (on-boot (popcorn <popcorn>)) (attach-to popcorn - (make <sprite> - #:texture popcorn-image - #:origin (vec2 16.0 16.0)))) + (make <animated-sprite> + #:atlas popcorn-atlas + #:origin (vec2 16.0 16.0) + #:animations `((default . ,(make <animation> + #:frames #(0 1) + #:frame-duration .25)))))) (define-method (on-collide (popcorn <popcorn>) (bullet <bullet>)) (if (player-bullet? bullet) |