notid/gitea-docker
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

peddler has better explanation.

Browse Source
This commit is contained in:
Remington Covert
2014-12-14 19:46:35 -08:00
parent f406ae412f
commit 5b2c9b4d43
1 changed files with 4 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
desktop/src-common/advent/screens/rooms/outside_castle.clj
View File

@@ -33,8 +33,8 @@
:ego "But I haven't got any money!" :ego "But I haven't got any money!"
:peddler "Well I'm afraid you won't have the choicest of earplugs." :peddler "Well I'm afraid you won't have the choicest of earplugs."
:ego "Can't I give you something else for them?" :ego "Can't I give you something else for them?"
:peddler "Well, I am low on choice children's toys." :peddler "I'll tell you what, I don't have any thing for the kids that come to my stand."
:peddler "If you can bring me one, and I mean the choicest of toys, I will give you the earplugs."))} :peddler "If you can bring me the choicest of toys, and I mean the choicest of toys, I will give you the earplugs."))}
"I'm interested in a glass eye." "I'm interested in a glass eye."
{:run #(do (actions/update-state entities (fn [state] (assoc state :wants-toy true))) {:run #(do (actions/update-state entities (fn [state] (assoc state :wants-toy true)))
(actions/respond entities % (actions/respond entities %
@@ -57,7 +57,8 @@
:ego "But I'm broke!" :ego "But I'm broke!"
:peddler "Well I'm afraid you won't have the choicest of motivational tapes." :peddler "Well I'm afraid you won't have the choicest of motivational tapes."
:ego "Is there anything else you'd take instead?" :ego "Is there anything else you'd take instead?"
:peddler "If you can bring me a nice kid's toy, I will give you the tapes."))} :peddler "I'll tell you what, I don't have any thing for the kids that come to my stand."
:peddler "If you can bring me the choicest of kid's toys, I will give you the tapes."))}
"Nevermind." {:run #(actions/respond entities % :peddler "Goodbye, sir.")}]})) "Nevermind." {:run #(actions/respond entities % :peddler "Goodbye, sir.")}]}))
(defn give-teddy [entities] (defn give-teddy [entities]