From 3fc18437f905f18aa4bf3b688930dbc68f8721b3 Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson@vistahigherlearning.com>
Date: Sat, 23 Oct 2021 17:09:34 -0400
Subject: Lots of tweaks and also sprite animations!

---
 bonnie-bee/moth.scm | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

(limited to 'bonnie-bee/moth.scm')

diff --git a/bonnie-bee/moth.scm b/bonnie-bee/moth.scm
index 8f4ed5f..bcd165b 100644
--- a/bonnie-bee/moth.scm
+++ b/bonnie-bee/moth.scm
@@ -19,9 +19,12 @@
 
 (define-method (on-boot (moth <moth>))
   (attach-to moth
-             (make <sprite>
-               #:texture moth-image
-               #:origin (vec2 32.0 32.0))))
+             (make <animated-sprite>
+               #:atlas moth-atlas
+               #:origin (vec2 32.0 32.0)
+               #:animations `((default . ,(make <animation>
+                                            #:frames #(0 1 0 2)
+                                            #:frame-duration .1))))))
 
 (define-method (on-collide (moth <moth>) (bullet <bullet>))
   (cond
-- 
cgit v1.2.3