various bug fixes.
This commit is contained in:
@@ -728,7 +728,7 @@
|
||||
(as-> entities e
|
||||
(assoc-in e [:tweens :fade-out] (tween/tween :fade-out screen [type :opacity] 0.0 1.0 time))
|
||||
(if music-changed?
|
||||
(assoc-in e [:tweens :fade-out-music] (tween/tween :fade-out-music screen [:volume :value] 1.0 0.0 time))
|
||||
(assoc-in e [:tweens :fade-out-music] (tween/tween :fade-out-music screen [:volume :value] (get-in entities [:volume :value]) 0.0 time))
|
||||
e)))
|
||||
|
||||
(continue [this screen entities]
|
||||
@@ -843,6 +843,7 @@
|
||||
(defn glad [entities]
|
||||
(actions/run-action entities
|
||||
(begin [this screen entities]
|
||||
(println "ORIGIN" (get-in entities [:room :entities :ego :origin-x]))
|
||||
(let [current-y (get-in entities [:room :entities :ego :y])
|
||||
to-y (+ current-y 15)]
|
||||
(-> entities
|
||||
|
||||
Reference in New Issue
Block a user