IOS tweaks.

This commit is contained in:
Bryce Covert
2015-09-14 19:07:06 -07:00
parent c593e3999d
commit 0d978988fd
8 changed files with 16 additions and 12 deletions

View File

@@ -171,7 +171,9 @@
(particle-effect! (get-in @entities [:room :entities :magic-frog-particle]) :reset)
(particle-effect! (get-in @entities [:room :entities :magic-frog-particle]) :start)
(Thread/sleep 1500)
(actions/transition-background entities :outside-house [257 90] :face :left))
(actions/transition-background entities :outside-house [257 90] :face :left)
(dotimes [_ 160]
(particle-effect! (get-in @entities [:rooms :inside-house :entities :magic-frog-particle]) :update 0.2)))
(defn do-prophecy [entities]
{:run #(do (actions/respond entities %

View File

@@ -1114,7 +1114,7 @@ void main()
(set! (. camera zoom) (:zoom (:cam entities)))
(set! (.. camera position x) (:x (:cam entities) 160.0))
(set! (.. camera position y) (:y (:cam entities) 120.0)))
(let [entities (utils/update-override screen entities)]
(let [entities entities (utils/update-override screen entities)]
(when (= (get-in entities [:fade :opacity])
@@ -1262,8 +1262,8 @@ void main()
(fn [{:keys [^FitViewport viewport] :as screen} [entities]]
(.apply viewport)
(let [entities (utils/apply-tweens screen entities (:tweens entities))]
#_(label! (:fps entities) :set-text (str (game :fps)))
(render! screen [ (:inventory entities) (:close entities)])
(label! (:fps entities) :set-text (str (game :fps)))
(render! screen [ (:fps entities) (:inventory entities) (:close entities)])
entities))
:on-resize