various loading statements.

This commit is contained in:
Bryce Covert
2017-06-01 08:05:02 -07:00
parent 8d680eeaa6
commit d74604b578
29 changed files with 40 additions and 4 deletions

View File

@@ -17,6 +17,8 @@
[play-clj.g2d :refer :all])
(:import [com.badlogic.gdx.graphics Color]))
(println "loading " *ns*)
(defn make [screen atlas global-atlas]
(let [peddler-sheet (texture! (utils/atlas->texture atlas "peddler-talk" ) :split 18 36)
peddler-stand (utils/flip (animation 0.2 (for [i (flatten [(repeat 8 0) 6 (repeat 8 0) 6 (repeat 5 0) 4 5 4 5 4 5])]