From c3ed3d3886a5eb56e7ac4655d98145936f5818b1 Mon Sep 17 00:00:00 2001 From: Bryce Covert Date: Sat, 15 Aug 2015 23:51:29 -0700 Subject: [PATCH] eat mint. --- desktop/src-common/advent/screens/rooms/inside_antique.clj | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/desktop/src-common/advent/screens/rooms/inside_antique.clj b/desktop/src-common/advent/screens/rooms/inside_antique.clj index 62ff9832..2811b6ca 100644 --- a/desktop/src-common/advent/screens/rooms/inside_antique.clj +++ b/desktop/src-common/advent/screens/rooms/inside_antique.clj @@ -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))