more background updates.
This commit is contained in:
Binary file not shown.
|
Before Width: | Height: | Size: 36 KiB After Width: | Height: | Size: 30 KiB |
Binary file not shown.
Binary file not shown.
|
Before Width: | Height: | Size: 17 KiB After Width: | Height: | Size: 17 KiB |
Binary file not shown.
@@ -278,8 +278,8 @@
|
|||||||
entities))
|
entities))
|
||||||
|
|
||||||
(continue [this screen entities]
|
(continue [this screen entities]
|
||||||
(when (= (rand-int 50) 2)
|
(when (= (rand-int 5) 2)
|
||||||
(particle-effect! (:step-particles entities) :start))
|
#_(particle-effect! (:step-particles entities) :start))
|
||||||
(let [{from-x :x from-y :y :keys [left right scale-x] :as target-entity} (get-in entities [:room :entities target-id])
|
(let [{from-x :x from-y :y :keys [left right scale-x] :as target-entity} (get-in entities [:room :entities target-id])
|
||||||
[[target-x target-y] remainder] @targets-left]
|
[[target-x target-y] remainder] @targets-left]
|
||||||
(let [delta-x (- target-x from-x)
|
(let [delta-x (- target-x from-x)
|
||||||
|
|||||||
Reference in New Issue
Block a user