it all works, rather smoothly too.

This commit is contained in:
Bryce Covert
2017-05-29 17:32:21 -07:00
parent 03cba14c2a
commit 42067c1080
19 changed files with 206 additions and 217 deletions

View File

@@ -360,11 +360,8 @@
(do (actions/do-dialogue entities :ego "What about this?" :game-player "No, that's not the solution. Keep looking.")
nil)))
(defn make [screen]
(let [[screet atlas] (utils/acquire-atlas screen "packed/inside-castle.atlas")
[screet global-atlas] (utils/acquire-atlas screen "packed/global.atlas")
sign (utils/make-anim-seq atlas "sign" [44 20] 0.3 (flatten [(repeat 20 0) 1 0 2 0 1 0 2 0 1 0 2 0 1]))
(defn make [screen atlas global-atlas]
(let [sign (utils/make-anim-seq atlas "sign" [44 20] 0.3 (flatten [(repeat 20 0) 1 0 2 0 1 0 2 0 1 0 2 0 1]))
game-player-talk-sheet (texture! (utils/atlas->texture atlas "game-player-talk") :split 40 44)
game-player-talk-up (animation 0.15 (for [i [0 2 0 2 0 2 0 3 0 2 0 1 0 0 0 0 2 0 2 0 3 0 1 0 1 0 0 1 0 2 0 3 0]]
(aget game-player-talk-sheet 0 i)))