behind direction better.

This commit is contained in:
Bryce Covert
2015-11-06 08:03:04 -08:00
parent 51998792a8
commit 4328db3303
2 changed files with 15 additions and 8 deletions

Binary file not shown.

Before

Width:  |  Height:  |  Size: 6.4 KiB

After

Width:  |  Height:  |  Size: 3.2 KiB

View File

@@ -13,17 +13,24 @@
(defn make-night [entities]
(assoc-in entities [:room :entities :peeling :opacity] 0))
(defn make-left-dir [box]
{:box box
:script (actions/get-script
entities
(actions/walk-to entities :ego [122 140] :skip-type :end)
(actions/transition-background entities :outside-house [244 150])
(actions/walk-to entities :ego [158 110]))
:cursor :left})
(defn make [screen]
(rooms/make :music {:day :town-2 :night :night}
:name "Behind house"
:interactions
{:left-dir {:box [0 131 154 224]
:script (actions/get-script
entities
(actions/walk-to entities :ego [122 140] :skip-type :end)
(actions/transition-background entities :outside-house [244 150])
(actions/walk-to entities :ego [158 110]))
:cursor :left}
{:left-dir-1 (make-left-dir [0 48 20 240])
:left-dir-2 (make-left-dir [0 160 148 217])
:left-dir-3 (make-left-dir [130 120 154 160])
#_:crack #_{:box [68 100 73 114]
:script (actions/get-script
entities
@@ -38,7 +45,7 @@
(actions/play-animation entities :ego :squat)
(actions/give entities :mushrooms)
(actions/talk entities :ego "Perfectly ripe mushrooms!"))))}
:window {:box [103 100 130 140]
:window {:box [109 100 130 153]
:script (actions/get-script
entities
(actions/walk-to entities :ego [128 100])