ego faces shopkeep.
This commit is contained in:
@@ -16,6 +16,10 @@
|
||||
"Ralphie" "Arthur" "Barney" "Harry" "Gus" "Mortimer" "Walt"])
|
||||
|
||||
(defn do-antique-dialogue [entities]
|
||||
(if (< (get-in @entities [:room :entities :ego :x])
|
||||
(get-in @entities [:room :entities :shopkeep :x]))
|
||||
(actions/do-stop entities :ego :face :right)
|
||||
(actions/do-stop entities :ego :face :left))
|
||||
(actions/do-dialogue entities
|
||||
:shopkeep "Oh, hello there."
|
||||
:shopkeep "Can I help you?")
|
||||
@@ -68,7 +72,7 @@
|
||||
"Is there anything here you will sell?"
|
||||
{:run #(actions/respond entities %
|
||||
:shopkeep "No, not until my son returns.")
|
||||
:choices #(-> % zip/left zip/left)}
|
||||
:choices son-choices}
|
||||
(if (get-in @entities [:state :opened-blinds?])
|
||||
"Since I got some light in here, will you open up shop?"
|
||||
"If I get some light in here, will you open up shop?")
|
||||
|
||||
Reference in New Issue
Block a user