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

minor jail tweak.

Browse Source
This commit is contained in:
Bryce Covert
2015-08-13 22:26:25 -07:00
parent ffa264eb7b
commit 645f624e45
2 changed files with 13 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
desktop/src-common/advent/screens/rooms/inside_jail.clj
View File

@@ -137,16 +137,19 @@
:ego "Seems like a pretty sorry excuse for a puzzle."))))
(defn tie-up-warden [entities message]
(actions/play-animation entities :ego :idea)
(actions/do-dialogue entities
:ego "I know!"
:ego message)
(actions/walk-to entities :ego [91 61] :face :left)
(actions/play-animation entities :ego :reach)
(actions/do-dialogue entities
:warden "Hey! What do you think you're doing?"
:warden "Back in the slammer you go.")
(common/go-to-jail entities))
(if (get-in @entities [:state :opened-bars?])
(do
(actions/play-animation entities :ego :idea)
(actions/do-dialogue entities
:ego "I know!"
:ego message)
(actions/walk-to entities :ego [91 61] :face :left)
(actions/play-animation entities :ego :reach)
(actions/do-dialogue entities
:warden "Hey! What do you think you're doing?"
:warden "Back in the slammer you go.")
(common/go-to-jail entities))
(actions/talk entities :ego "What am I supposed to do while in this cell?")))
(defn search-hay [entities]
(actions/walk-to entities :ego [144 86] :face :right)