eat mint.
This commit is contained in:
@@ -200,8 +200,7 @@
|
||||
(actions/talk entities :shopkeep "That's a portrait of my long lost son. "
|
||||
:shopkeep "Please put it back before you leave.")))
|
||||
(actions/get-script entities
|
||||
(actions/talk entities :shopkeep "No thanks, sonny.")))
|
||||
)
|
||||
(actions/talk entities :shopkeep "No thanks, sonny."))))
|
||||
:stand)
|
||||
:portrait portrait
|
||||
:beard (assoc (animation->texture screen beard)
|
||||
@@ -231,7 +230,9 @@
|
||||
:shopkeep "Go tell Gandarf that I need some more brewed up."
|
||||
:shopkeep "Pronto!"))
|
||||
(do (actions/walk-to entities :ego [159 62] :face :right)
|
||||
(actions/talk entities :ego "I'll just try one of these mints.")
|
||||
(if (= 0 (get-in @entities [:state :mints-eaten]))
|
||||
(actions/talk entities :ego "I'll just try one of these mints.")
|
||||
(actions/talk entities :ego "I'll just try another one of these mints."))
|
||||
(actions/play-animation entities :ego :reach)
|
||||
(actions/update-state entities (fn [s] (assoc s :mints-eaten (inc (s :mints-eaten)))))
|
||||
(sound! (sound (str "inside-antique/fire-" (get-in @entities [:state :mints-eaten]) ".ogg")) :play (utils/current-sound-volume))
|
||||
|
||||
Reference in New Issue
Block a user