closer to having gandarf be right.

This commit is contained in:
2015-05-05 22:23:27 -07:00
parent ae50600203
commit 4f67c1006d
6 changed files with 18 additions and 12 deletions

View File

@@ -345,7 +345,14 @@
(actions/play-animation entities :ego :reach)
(if (= :night (get-in @entities [:state :time]))
(actions/talk entities :ego "It's locked.")
(do (actions/transition-background entities :inside-house [237 0])
(do (actions/transition-background entities :inside-house [237 0] :between (fn [s e]
(if true
(assoc-in e [:room :entities :experiment] (get-in e [:room :experiment]))
e)))
(when (get-in @entities [:room :entities :experiment])
(actions/play-animation entities :experiment :experiment)
(actions/remove-entity entities :experiment))
(if (get-in @entities [:state :convinced-wizard?])
(do (actions/talk entities :wizard (str "Oh, hello there boy."))
(utils/save @entities))