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

effects!!

Browse Source
This commit is contained in:
Bryce Covert
2015-03-03 10:59:22 -08:00
parent 76db582221
commit 81c3d702aa
3 changed files with 174 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -298,6 +298,30 @@
:y 40
:baseline 240
:pull-sword pull-sword-anim)
:hotspots [{:box [0 74 77 109]
:fn (fn [screen entities]
(let [magic (get-in entities [:room :entities :magic])]
(cond (nil? magic)
(assoc-in entities [:room :entities :magic] (assoc (doto (particle-effect "inside-castle/magic")
(particle-effect! :reset)
)
:x 25
:y 112
:baseline 240))
(particle-effect! magic :is-complete)
(do
(doto magic
(particle-effect! :start))
entities)
:else
entities)))}
{:box [78 66 90 86]
:fn (fn [screen entities]
(if-let [magic (get-in entities [:room :entities :magic])]
(do
(particle-effect! magic :allow-completion)
entities)
entities))}]
:entities {:bird-1 (utils/make-bird screen (as-> [[185 235]
[220 225] [210 230] [250 235]] p
(concat p (reverse p))))
@@ -307,6 +331,7 @@
:x 22
:y 110
:baseline 95)
:trophy (assoc (animation->texture screen trophy)
:x 253 :y 69 :baseline 191
:anim trophy