inside castle.
This commit is contained in:
@@ -393,8 +393,8 @@
|
||||
(animation speed (split-texture atlas file [w h] frames))))
|
||||
|
||||
|
||||
(defn make-bird [screen p]
|
||||
(let [bird-sheet (texture! (get-texture "outside-castle/bird.png") :split 1 2)
|
||||
(defn make-bird [screen global-atlas p]
|
||||
(let [bird-sheet (texture! (atlas->texture global-atlas "bird") :split 1 2)
|
||||
bird-stand (animation 0.15 (for [i [0 1]]
|
||||
(aget bird-sheet 0 i)))]
|
||||
(assoc (animation->texture screen bird-stand)
|
||||
|
||||
Reference in New Issue
Block a user