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

kind of nice sequence.

Browse Source
This commit is contained in:
Remington Covert
2015-02-18 12:52:55 -08:00
parent c7591dd3f2
commit 0c8dc65575
6 changed files with 49 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -14,11 +14,14 @@
(defn bloodclot-appear [entities]
(actions/run-action entities
(begin [this screen entities]
(particle-effect! (get-in entities [:room :entities :appear]) :reset)
(particle-effect! (get-in entities [:room :entities :appear]) :start)
(sound! (sound "inside-house/disappear.ogg") :play)
(-> entities
(assoc-in [:tweens :bloodclot-head-appear]
(utils/tween :bloodclot-head-appear screen [:room :entities :bloodclot-head :opacity] 0.0 1.0 0.2 :power 4.0))
(utils/tween :bloodclot-head-appear screen [:room :entities :bloodclot-head :opacity] 0.0 1.0 1.0 :power 4.0))
(assoc-in [:tweens :bloodclot-appear]
(utils/tween :bloodclot-appear screen [:room :entities :bloodclot :opacity] 0.0 1.0 0.2 :power 4.0))))
(utils/tween :bloodclot-appear screen [:room :entities :bloodclot :opacity] 0.0 1.0 1.0 :power 4.0))))
(continue [this screen entities]
entities)
@@ -119,8 +122,9 @@
(actions/walk-to entities :ego [85 145] :face :right)
(actions/transition-background entities :space [0 65] :transition-music? false)
(actions/walk-straight-to entities :ego [160 45] :face :right)
(actions/transition-music entities nil)
(bloodclot-appear entities))
(bloodclot-appear entities)
(actions/transition-music entities nil :duration 0.15))
(defn pull-sword [entities]
(actions/play-animation entities :ego :reach)