can get a piece of charcoal.
This commit is contained in:
@@ -507,13 +507,19 @@
|
|||||||
(update-in entities [:room :entities] #(assoc % :note (get-in entities [:room :note])))
|
(update-in entities [:room :entities] #(assoc % :note (get-in entities [:room :note])))
|
||||||
entities))
|
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]
|
(defn make-night [screen entities]
|
||||||
|
|
||||||
(as-> entities entities
|
(as-> entities entities
|
||||||
|
|
||||||
(update-in entities [:room :entities] #(dissoc % :butterfly))
|
(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 % :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
|
(utils/play-sound! screen entities
|
||||||
(get-in entities [:room :cauldron-sound :sound])
|
(get-in entities [:room :cauldron-sound :sound])
|
||||||
(utils/sourced-volume-fn :cauldron 0.15 [139 73])
|
(utils/sourced-volume-fn :cauldron 0.15 [139 73])
|
||||||
|
|||||||
Reference in New Issue
Block a user