talking animation.

This commit is contained in:
=
2014-09-08 13:12:58 -07:00
parent 02538a8c05
commit 0507b26cca
14 changed files with 48 additions and 5 deletions

View File

@@ -59,7 +59,8 @@
(defn talk [target-id text]
(fn [screen entities]
(run! dialogue/talking-screen :on-talk :text text
:x (get-in entities [target-id :x]) :y (+ (get-in entities [target-id :y]) 25)
:x (get-in entities [target-id :x]) :y (+ (get-in entities [target-id :y]) 35)
:target-id target-id)
(-> entities
(update-in [target-id :actions] rest))))
(update-in [target-id :actions] rest)
(assoc-in [target-id :anim] (get-in entities [target-id :talk])))))