screen transitions
This commit is contained in:
@@ -10,7 +10,13 @@
|
||||
|
||||
(defn make [screen]
|
||||
(rooms/make :interactions
|
||||
{}
|
||||
{:right-door {:box [286 140 306 160]
|
||||
:cursor :right
|
||||
:script (actions/get-script entities
|
||||
(actions/walk-to entities :ego [284 145])
|
||||
(actions/transition-background entities :outside-castle [82 180])
|
||||
(actions/walk-to entities :ego [129 148]))
|
||||
}}
|
||||
:layers [(assoc (texture "inside-castle/background.png") :x 0 :y 0 :baseline 0)
|
||||
(assoc (texture "inside-castle/pedestal-overlay.png") :x 0 :y 0 :baseline 135)]
|
||||
:entities {}
|
||||
|
||||
@@ -25,7 +25,9 @@
|
||||
:script (actions/get-script
|
||||
entities
|
||||
(actions/walk-to entities :ego [82 180])
|
||||
(actions/transition-background entities :inside-castle [280 145]))}
|
||||
(actions/transition-background entities :inside-castle [280 145])
|
||||
(actions/walk-to entities :ego [245 90]))
|
||||
:cursor :left}
|
||||
:garden {:box [103 170 178 200]
|
||||
:script (actions/get-script
|
||||
entities
|
||||
|
||||
Reference in New Issue
Block a user