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

more bug fixes.

Browse Source
This commit is contained in:
Remington Covert
2014-12-14 12:04:51 -08:00
parent 97e7e433dc
commit 77e7d7f59c
6 changed files with 30 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
desktop/src-common/advent/screens/rooms/inside_house.clj
View File

@@ -36,18 +36,21 @@
:ego "What's the password?"
:wizard "That's for me to know.")
:choices actions/previous-choices}
"Will you help me become a knight?"
(when (not (actions/has-obtained-all-of? entities [:trophy :medal :kiss]))
"Will you help me become a knight?")
{:run #(actions/respond entities %
:wizard "To become a knight you will need to be worthy in courage, wisdom, and might."
:wizard "Only then can you become worthy to pull the Sword of Blergh, and become a knight.")
:choices ["How can I prove that I'm worthy in wisdom?"
:choices [(when (not (actions/has-obtained? entities :trophy))
"How can I prove that I'm worthy in wisdom?")
{:run #(actions/respond entities %
:wizard "Every year we have the annual Town of Remington Junior Smarty Pants Derby."
:wizard "The whole town gets together to vote on who is the wisest in town, by a game of riddles."
:wizard "Last year's winner was a young man named Stan, in town."
:wizard "Last year's winner was a young man named Brian O'Brainy, in town."
:wizard "Maybe you can ask him.")
:choices actions/previous-choices}
"Can you make some kind of potion to make me strong?"
(when (not (actions/has-obtained? entities :medal))
"Can you make some kind of potion to make me strong?")
{:run #(actions/respond entities %
:wizard "Of course I could."
:wizard "I keep all sorts of potion recipes in my MagiSafe 5000."
@@ -55,7 +58,8 @@
:wizard "But that would be cheating wouldn't it?"
:wizard "Unfortunately, you're on your own.")
:choices actions/previous-choices}
"Aren't I already courageous enough?"
(when (not (actions/has-obtained? entities :kiss))
"Aren't I already courageous enough?")
{:run #(actions/respond entities %
:wizard "When was the last time you rescued a damsel in distress?"
:ego "Erm..."
@@ -69,6 +73,10 @@
:choices actions/previous-choices}
"Something else."
{:choices actions/something-else}]}
(when (actions/has-obtained-all-of? entities [:trophy :medal :kiss])
"Will you help me become a knight?")
{:run #(actions/respond entities % :wizard "It looks to me as if you are ready to pull the sword, boy!")
:choices actions/previous-choices}
(when (= 3 (get-in @entities [:state :mints-eaten]))
"The antique shopkeeper needs more fire mints.")
{:run #(do (actions/respond entities %