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

More dialogue tweaks.

Browse Source
This commit is contained in:
Remington Covert
2014-12-14 11:36:49 -08:00
parent 1ab740a30e
commit 97e7e433dc
1 changed files with 14 additions and 22 deletions
Download Patch File Download Diff File Expand all files Collapse all files

36
desktop/src-common/advent/screens/rooms/outside_house.clj
View File

@@ -68,38 +68,30 @@
:wizard "Pray tell, how do you, a mere wreckless youth, plan on becoming a knight?"))
:choices ["By pulling the Sword of Blergh from its stone!"
{:run #(actions/respond entities %
:wizard "Well, well. It sounds I was wrong about you."
:wizard "Indeed, you are on the path of setting your destructive past behind you."
:wizard "Well, well. It sounds like you've turned over a new leaf."
:wizard "But know this, the stone cannot be cheated easily."
:wizard "You must fulfill the age-old prophecy."
:wizard "'The Sword of Blergh with magic sting,' ..."
:wizard "... 'Shall yield to no earthly king.'"
:wizard "'To draw from hardened, weathered stone,' ..."
:wizard "... 'One must have valor, right to the bone.'"
:wizard "'Worthy in courage, wisdom and might,' ..."
:wizard "... 'only then with sword he'll fight.'"
:wizard "'But a hero should he prove not be,' ..."
:wizard "... 'Only ruin will fall on he.'"
:wizard "'Should he use guile or guise'..."
)
:wizard "'The Sword of Blergh with magic sting,\nShall yield to no earthly king'"
:wizard "'To draw from hardened, weathered stone,\nHe must have valor, to the bone.'"
:wizard "'Worthy in courage, wisdom and might,\nOnly then with sword he'll fight.'"
:wizard "'But a hero should he prove not be,\nOnly ruin will fall on he.'"
:wizard "'Fight he must, for one more test...'")
:choices ["Is this almost over?"
{:run #(do (actions/update-state entities (fn [state] (assoc state :convinced-wizard? true)))
(actions/respond entities %
:wizard "Patience, boy."
:wizard "... 'Such a man will have great surprise.'"
:wizard "If this is truely your quest, boy, then I will help you in your quest. "
:wizard "But heed the warning from the prophecy: No cheat can pull the Sword of Blergh."
:ego "No cheating."
:ego "Check."))}
:wizard "... 'He will die if not the best.'"
:wizard "If this is truely your quest, boy, then I will help you. "
:ego "So you're my friend now, Gandarf?"
:wizard "No, but I won't kick you out of my house, as long as you behave."))}
"*cough* *cough* *ahem*"
{:run #(do (actions/update-state entities (fn [state] (assoc state :convinced-wizard? true)))
(actions/respond entities %
:wizard "Excuse you. Moving on..."
:wizard "... 'Such a man will have great surprise.'"
:wizard "If this is truely your quest, boy, then I will help you in your quest. "
:wizard "But heed the warning from the prophecy: No cheat can pull the Sword of Blergh."
:ego "No cheating."
:ego "Check.")
:wizard "... 'He will die if not the best'"
:wizard "If this is truely your quest, boy, then I will help you. "
:ego "So you're my friend now, Gandarf?"
:wizard "No, but I won't kick you out of my house, as long as you behave.")
(utils/save @entities))}]}
"By besting swamp, foe, and the occasional bizarre conversation tree."
{:run #(do (actions/respond entities %