shortened dialogue.
This commit is contained in:
@@ -31,10 +31,6 @@
|
|||||||
sheep. I'd like to click in the sheep pasture and expect Tick to
|
sheep. I'd like to click in the sheep pasture and expect Tick to
|
||||||
move over to the sheep, but currently it's not on the path, so he
|
move over to the sheep, but currently it's not on the path, so he
|
||||||
just doesn't move.
|
just doesn't move.
|
||||||
+ When in the jail, if you try to use the ball and chain with the
|
|
||||||
jailer before you are out of the jail, he will say something like
|
|
||||||
"how'd you get out" and then you restart the jail sequence even
|
|
||||||
though you never escaped from the jail
|
|
||||||
+ It took several times to get through the jail escape sequence
|
+ It took several times to get through the jail escape sequence
|
||||||
(which I think was expected and was entertaining), but after you've
|
(which I think was expected and was entertaining), but after you've
|
||||||
gone through it the first time some of the sequences can be
|
gone through it the first time some of the sequences can be
|
||||||
|
|||||||
@@ -123,18 +123,22 @@
|
|||||||
(defn get-key [ entities]
|
(defn get-key [ entities]
|
||||||
(actions/walk-to entities :ego [71 82] :face :left)
|
(actions/walk-to entities :ego [71 82] :face :left)
|
||||||
(actions/play-animation entities :ego :squat)
|
(actions/play-animation entities :ego :squat)
|
||||||
(actions/do-dialogue entities :ego "He's got something clutched in his hand!")
|
|
||||||
(actions/play-animation entities :ego :squat)
|
|
||||||
(actions/do-dialogue entities :ego "What's this?"
|
|
||||||
:ego "Hello hello!"
|
|
||||||
:ego "It's the key!")
|
|
||||||
(let [had-key-before? (actions/has-obtained? entities :key)]
|
(let [had-key-before? (actions/has-obtained? entities :key)]
|
||||||
(actions/give entities :key)
|
(if had-key-before?
|
||||||
(when (not had-key-before?)
|
(do
|
||||||
(actions/do-dialogue entities :ego "Come on! It's that easy to escape?"
|
(actions/do-dialogue entities :ego "He's got the key clutched in his hand!")
|
||||||
:ego "We're not going to at least do that dog and bone scenario?"
|
(actions/play-animation entities :ego :squat)
|
||||||
:ego "I get to just take the key and leave?"
|
(actions/give entities :key))
|
||||||
:ego "Seems like a pretty sorry excuse for a puzzle."))))
|
(do
|
||||||
|
(actions/do-dialogue entities :ego "He's got something clutched in his hand!")
|
||||||
|
(actions/play-animation entities :ego :squat)
|
||||||
|
(actions/do-dialogue entities :ego "What's this?"
|
||||||
|
:ego "Hello hello!"
|
||||||
|
:ego "It's the key!")
|
||||||
|
(actions/do-dialogue entities :ego "Come on! It's that easy to escape?"
|
||||||
|
:ego "We're not going to at least do that dog and bone scenario?"
|
||||||
|
:ego "I get to just take the key and leave?"
|
||||||
|
:ego "Seems like a pretty sorry excuse for a puzzle.")))))
|
||||||
|
|
||||||
(defn tie-up-warden [entities message]
|
(defn tie-up-warden [entities message]
|
||||||
(if (get-in @entities [:state :opened-bars?])
|
(if (get-in @entities [:state :opened-bars?])
|
||||||
@@ -259,16 +263,28 @@
|
|||||||
(actions/talk entities :ego "Phew! That was close!"))
|
(actions/talk entities :ego "Phew! That was close!"))
|
||||||
(actions/do-dialogue entities :ego "I don't know what to do with that.")))
|
(actions/do-dialogue entities :ego "I don't know what to do with that.")))
|
||||||
:sword (actions/get-script entities (actions/talk entities :ego "I wouldn't want to accidentally break the Sword of Blergh."))
|
:sword (actions/get-script entities (actions/talk entities :ego "I wouldn't want to accidentally break the Sword of Blergh."))
|
||||||
:rope (actions/get-script entities (if (get-in @entities [:state :bent-bars?])
|
:rope (actions/get-script entities (cond
|
||||||
(do (actions/walk-to entities :ego [102 88] :face :right)
|
(get-in @entities [:state :dropped-ball?])
|
||||||
(actions/do-dialogue entities :ego "Here goes.")
|
(do (actions/walk-to entities :ego [102 88] :face :right)
|
||||||
(actions/play-animation entities :ego :reach)
|
(actions/do-dialogue entities :ego "Here goes.")
|
||||||
(actions/do-dialogue entities
|
(actions/play-animation entities :ego :reach)
|
||||||
:ego "Uh oh. There's a guard right beneath the window."
|
(actions/do-dialogue entities
|
||||||
:ego "I had better not, or else I'd get caught."))
|
:ego "Wait a second."
|
||||||
(actions/do-dialogue entities :ego "Good thinking."
|
:ego "That guard is out cold."
|
||||||
:ego "But I can't fit out that window."
|
:ego "Why risk breaking my neck now?"))
|
||||||
:ego "And the bars are made of steel!")))
|
|
||||||
|
(get-in @entities [:state :bent-bars?])
|
||||||
|
(do (actions/walk-to entities :ego [102 88] :face :right)
|
||||||
|
(actions/do-dialogue entities :ego "Here goes.")
|
||||||
|
(actions/play-animation entities :ego :reach)
|
||||||
|
(actions/do-dialogue entities
|
||||||
|
:ego "Uh oh. There's a guard right beneath the window."
|
||||||
|
:ego "I had better not, or else I'd get caught."))
|
||||||
|
|
||||||
|
:else
|
||||||
|
(actions/do-dialogue entities :ego "Good thinking."
|
||||||
|
:ego "But I can't fit out that window."
|
||||||
|
:ego "And the bars are made of steel!")))
|
||||||
:key (actions/get-script entities (actions/walk-to entities :ego [102 88] :face :right)
|
:key (actions/get-script entities (actions/walk-to entities :ego [102 88] :face :right)
|
||||||
(actions/do-dialogue entities :ego "Here goes."
|
(actions/do-dialogue entities :ego "Here goes."
|
||||||
:ego "Wait..."
|
:ego "Wait..."
|
||||||
|
|||||||
Reference in New Issue
Block a user