This commit is contained in:
2015-05-07 18:18:17 -07:00
parent f6ed261b4c
commit 983a4ac251
6 changed files with 25 additions and 13 deletions

View File

@@ -114,8 +114,9 @@
:ego "Seems like a pretty sorry excuse for a puzzle."))))
(defn tie-up-warden [entities]
(actions/play-animation entities :ego :idea)
(actions/do-dialogue entities
:ego "Good thinking!"
:ego "I know!"
:ego "I'll tie him up.")
(actions/walk-to entities :ego [91 61] :face :left)
(actions/play-animation entities :ego :reach)
@@ -228,10 +229,10 @@
:door {:box [257 62 301 152]
:cursor :down
:script (actions/get-script entities (leave entities))}}
:layers [(assoc (texture "inside-jail/background.png") :x 0 :y 0 :baseline 0)
(assoc (texture "inside-jail/bars.png") :x 0 :y 0 :baseline 165)
(assoc (texture "inside-jail/glow.png") :x 0 :y 0 :baseline 240 :additive? true :opacity 0.35)
(assoc (texture "inside-jail/fg.png") :x 0 :y 5 :baseline 241 :parallax 1.5 )]
:layers [(assoc (texture "inside-jail/background.png") :x 0 :y 0 :baseline 0 :night-profile :none)
(assoc (texture "inside-jail/bars.png") :x 0 :y 0 :baseline 165 :night-profile :none)
(assoc (texture "inside-jail/glow.png") :x 0 :y 0 :baseline 240 :additive? true :opacity 0.35 :night-profile :none)
(assoc (texture "inside-jail/fg.png") :x 0 :y 5 :baseline 241 :parallax 1.5 :night-profile :none)]
:hotspots [{:box [121 40 258 44]
:fn (fn [screen entities]
@@ -262,6 +263,7 @@
:fall-asleep warden-fall-asleep
:anim warden-stand
:anim-start 0
:night-profile :none
:inhale (sound "inside-jail/inhale.ogg")
:exhale (sound "inside-jail/exhale.ogg")
:talk-color (color 0.9 0.3 0.9 1.0)
@@ -290,15 +292,18 @@
:rope (actions/get-script entities (tie-up-warden entities))})
:ball-n-chain (assoc (texture "inside-jail/ball-n-chain.png")
:x 80 :y 80 :baseline 160
:night-profile :none
:script (actions/get-script entities
(actions/walk-to entities :ego [103 83] :face :left)
(actions/play-animation entities :ego :squat)
(actions/remove-entity entities :ball-n-chain)
(actions/give entities :ball-n-chain)))
:moveable-bars (assoc (texture "inside-jail/moveable-bars.png")
:x 132 :y 77 :baseline 163)
:night-profile :none
:x 132 :y 77 :baseline 163)
:crowbar (assoc (texture "inside-jail/crowbar.png")
:x 304 :y 65 :baseline 175
:night-profile :none
:script (actions/get-script entities
(if (get-in @entities [:state :opened-bars?])
(do (actions/walk-to entities :ego [295 55] :face :right)
@@ -308,6 +313,7 @@
(actions/talk entities :ego "It's a crowbar."))
(actions/talk entities :ego "I can't reach it."))))
:closed-window (assoc (texture "inside-jail/window.png")
:night-profile :none
:x 99 :y 111 :baseline 128)}
:collision "inside-jail/collision-locked.png"
:collision-free (advent.pathfind/map-from-resource "inside-jail/collision-free.png")