can get a piece of charcoal.

This commit is contained in:
Bryce Covert
2015-11-22 14:55:34 -08:00
parent fb0dc333c6
commit 38f7dcfefb

View File

@@ -507,13 +507,19 @@
(update-in entities [:room :entities] #(assoc % :note (get-in entities [:room :note])))
entities))
(defn add-charcoal-if-necessary [entities]
(if (and (get-in entities [:state :seen-frankie?])
(not (actions/has-obtained? entities :charcoal)))
(update-in entities [:room :entities] assoc :charcoal (get-in entities [:room :charcoal]))
entities))
(defn make-night [screen entities]
(as-> entities entities
(update-in entities [:room :entities] #(dissoc % :butterfly))
(update-in entities [:room :entities] #(assoc % :cauldron (get-in entities [:room :cauldron])))
(update-in entities [:room :entities] assoc :charcoal (get-in entities [:room :charcoal]))
(add-charcoal-if-necessary entities)
(utils/play-sound! screen entities
(get-in entities [:room :cauldron-sound :sound])
(utils/sourced-volume-fn :cauldron 0.15 [139 73])