safe looks correct now.
|
Before Width: | Height: | Size: 22 KiB After Width: | Height: | Size: 36 KiB |
|
Before Width: | Height: | Size: 1.3 KiB After Width: | Height: | Size: 1.3 KiB |
|
Before Width: | Height: | Size: 216 KiB After Width: | Height: | Size: 215 KiB |
|
Before Width: | Height: | Size: 218 KiB After Width: | Height: | Size: 244 KiB |
|
Before Width: | Height: | Size: 183 KiB After Width: | Height: | Size: 207 KiB |
|
Before Width: | Height: | Size: 71 KiB After Width: | Height: | Size: 128 KiB |
|
Before Width: | Height: | Size: 155 KiB After Width: | Height: | Size: 95 KiB |
|
Before Width: | Height: | Size: 259 KiB After Width: | Height: | Size: 254 KiB |
|
Before Width: | Height: | Size: 98 KiB After Width: | Height: | Size: 82 KiB |
|
Before Width: | Height: | Size: 172 KiB After Width: | Height: | Size: 151 KiB |
|
Before Width: | Height: | Size: 146 KiB After Width: | Height: | Size: 133 KiB |
@@ -129,7 +129,7 @@
|
|||||||
{:run #(actions/do-dialogue entities :ego %)}]}))
|
{:run #(actions/do-dialogue entities :ego %)}]}))
|
||||||
|
|
||||||
(defn make [screen]
|
(defn make [screen]
|
||||||
(let [safelock-sheet (texture! (utils/get-texture "inside-house/safe-lock.png") :split 9 2)
|
(let [safelock-sheet (texture! (utils/get-texture "inside-house/safe-lock.png") :split 11 6)
|
||||||
safe-lock (animation 0.1 (for [i (flatten [(repeat 20 0) 1 2 1 2 1 2 1 2 1 2 1 1 2 1 2 1 2 1 2 1 2 1 (range 3 20) 20 20 20 20 21 21 21 21 21 20 20 21 21 21 21 21 20 20 20 ])]
|
safe-lock (animation 0.1 (for [i (flatten [(repeat 20 0) 1 2 1 2 1 2 1 2 1 2 1 1 2 1 2 1 2 1 2 1 2 1 (range 3 20) 20 20 20 20 21 21 21 21 21 20 20 21 21 21 21 21 20 20 20 ])]
|
||||||
(aget safelock-sheet 0 i)))
|
(aget safelock-sheet 0 i)))
|
||||||
candle (utils/make-anim "inside-house/candle.png" [34 32] 0.2 [1 0 1 2])
|
candle (utils/make-anim "inside-house/candle.png" [34 32] 0.2 [1 0 1 2])
|
||||||
@@ -194,7 +194,7 @@
|
|||||||
(actions/get-script entities
|
(actions/get-script entities
|
||||||
(actions/do-dialogue entities
|
(actions/do-dialogue entities
|
||||||
:wizard "No thank you.")))})
|
:wizard "No thank you.")))})
|
||||||
:safe-lock (actions/start-animation screen (assoc (animation->texture screen safe-lock) :x 51 :y 95 :baseline 145
|
:safe-lock (actions/start-animation screen (assoc (animation->texture screen safe-lock) :x 50 :y 93 :baseline 145
|
||||||
:stand safe-lock)
|
:stand safe-lock)
|
||||||
:stand)
|
:stand)
|
||||||
:candle (assoc (animation->texture screen candle)
|
:candle (assoc (animation->texture screen candle)
|
||||||
|
|||||||