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

climbing.

Browse Source
This commit is contained in:
Bryce Covert
2016-02-15 23:20:45 -08:00
parent bdf44b8760
commit a47093f607
22 changed files with 530 additions and 462 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
desktop/src-common/advent/screens/rooms/cat_tree.clj
View File

@@ -222,7 +222,13 @@
:ego "Thanks, I guess."))
(defn make-ladder-area [box]
{:box box
:script (actions/get-script entities (actions/talk entities :ego "It's a really big tree!"))
:script (actions/get-script entities
(actions/walk-to entities :ego [144 58] )
(actions/talk entities :ego "Maybe I can climb it!")
(actions/walk-straight-to entities :ego [144 72] :face :right)
(actions/play-animation entities :ego :climb)
(actions/walk-straight-to entities :ego [144 58])
(actions/talk entities :ego "Nope."))
:scripts {:ladder (actions/get-script entities
(actions/talk entities :ego "I'll just set this up.")
(actions/walk-to entities :ego [151 50] :face :left)