preparing for quittable scripts.

This commit is contained in:
Bryce Covert
2015-08-13 12:48:11 -07:00
parent 919695de81
commit ac3b8665ef
6 changed files with 66 additions and 66 deletions

View File

@@ -140,8 +140,8 @@
(-> entities
(update-in [:room :entities] dissoc :bloodclot)
(assoc-in [:tweens :flash] (tween/tween :flash screen [:white-fade :opacity] 0.0 1.0 0.2 :ease tween/ease-in-cubic))))
(can-skip? [this screen entities]
false))
(skip-type [this screen entities]
:none))
(actions/run-action entities
(begin [this screen entities]
entities)
@@ -154,8 +154,8 @@
(terminate [this screen entities]
entities)
(can-skip? [this screen entities]
false))
(skip-type [this screen entities]
:none))
(actions/run-action entities
(begin [this screen entities]
@@ -169,8 +169,8 @@
(terminate [this screen entities]
(update-in entities [:room :entities :ego] dissoc :stand-override))
(can-skip? [this screen entities]
false)))
(skip-type [this screen entities]
:none)))
(defn win []
(actions/get-script entities