notid/gitea-docker
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

happy with the ending.

Browse Source
This commit is contained in:
Bryce Covert
2018-02-10 22:22:57 -08:00
parent 2ab191c2d5
commit e9b1c8b0a4
2 changed files with 11 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
desktop/src-common/advent/screens/rooms/common.clj
View File

@@ -396,9 +396,7 @@
(-> entities
(assoc-in [:tweens :ego-x] (tween/tween :ego-x screen [:room :entities :ego :x] 200 163 0.5 :ease tween/ease-linear))
(assoc-in [:tweens :ego-y] (tween/tween :ego-y screen [:room :entities :ego :y] 166 186 0.5 :ease tween/ease-out-cubic))
(update-in [:room :entities :bloodclot-swallow-top] #(actions/start-animation screen % :swallow))
(update-in [:room :entities :bloodclot-swallow-bottom] #(actions/start-animation screen % :swallow))))
(assoc-in [:tweens :ego-y] (tween/tween :ego-y screen [:room :entities :ego :y] 166 186 0.5 :ease tween/ease-out-cubic))))
(continue [this screen entities]
entities)
(done? [this screen entities]
@@ -443,7 +441,7 @@
(Thread/sleep time))
(defn fall-in [entities]
(Thread/sleep 500)
(Thread/sleep 1500)
(actions/run-action entities
(begin [this screen entities]
@@ -500,16 +498,20 @@
(update-in [:room :entities :sword-spin] assoc :opacity 1 :scale-x 0.5 :scale-y 0.5)
(assoc-in [:room :entities :falling-bg :opacity] 1)
(assoc-in [:room :entities :belly-bottom :opacity] 1)
(assoc-in [:room :entities :sword-spin :y] 320)
(update-in [:room :entities :falling-bg ] dissoc :anim)
)))
(Thread/sleep 2000)
(actions/tween entities :sword-fall (fn [screen entities]
(tween/tween :sword-fall screen [:room :entities :sword-spin :y] 240 120 1.5 :ease tween/ease-linear)))
(tween/tween :sword-fall screen [:room :entities :sword-spin :y] 320 120 1.0 :ease tween/ease-linear)))
(actions/update-entities entities (fn [e]
(-> e
(assoc-in [:room :entities :belly-bottom :opacity] 0))))
(show-big-bloodclot entities 0)
(Thread/sleep 1000)
(actions/update-entities entities (fn [e]
(-> e
(update-in [:room :entities :bloodclot-swallow-top] #(actions/start-animation % :uhoh))