small progress.
This commit is contained in:
@@ -17,6 +17,16 @@
|
||||
(actions/walk-to entities :ego [268 61] :face :left))
|
||||
|
||||
|
||||
(defn drop-walkie-talkie [entities]
|
||||
(actions/talk entities :ego "I'll drop one of these off in here.")
|
||||
(actions/walk-to entities :ego [155 64])
|
||||
(actions/walk-straight-to entities :ego [106 18] :face :left)
|
||||
(actions/play-animation entities :ego :squat)
|
||||
(actions/remove-item entities :walkie-talkies)
|
||||
(actions/give entities :walkie-talkie)
|
||||
(actions/walk-straight-to entities :ego [155 64]))
|
||||
|
||||
|
||||
|
||||
(defn present-frankie-choices [entities]
|
||||
(actions/present-choices entities {:choices ["Please, Frankie. Give me my stuff back!"
|
||||
@@ -97,7 +107,10 @@
|
||||
:stand stand)))
|
||||
|
||||
|
||||
|
||||
(defn attempt-walking-through-gate [entities]
|
||||
(actions/walk-to entities :ego [157 83])
|
||||
(actions/transition-background entities :inside-castle [280 145])
|
||||
(actions/walk-to entities :ego [245 90]))
|
||||
|
||||
|
||||
(defn make [screen]
|
||||
@@ -111,7 +124,9 @@
|
||||
:cursor :right}
|
||||
:left-dir {:box [105 93 169 212]
|
||||
:script (actions/get-script entities (attempt-walking-through-gate entities))
|
||||
:cursor :left}}
|
||||
:cursor :left}
|
||||
:big-tree {:box [20 10 82 235]
|
||||
:scripts {:walkie-talkies (actions/get-script entities (drop-walkie-talkie entities))}}}
|
||||
|
||||
:layers {:day [(assoc (texture "castle-gate/background.png") :x 0 :y 0 :baseline 0)]
|
||||
:night [(assoc (texture "castle-gate/background.png") :x 0 :y 0 :baseline 0)]}
|
||||
|
||||
Reference in New Issue
Block a user