parallax scrolling used elsewhere.

This commit is contained in:
2015-03-02 12:32:33 -08:00
parent 2c2507febf
commit d15b0983f4
21 changed files with 37 additions and 23 deletions

View File

@@ -97,11 +97,11 @@
0.07)
current-zoom
target-zoom)
target-x (min (- 320 (* 160.0 target-zoom))
(max (* 160.0 target-zoom)
target-x (min (- 320 (* 160.0 target-zoom ))
(max (* 160.0 target-zoom )
x))
target-y (min (- 240 (* 120.0 target-zoom))
(max (* 120.0 target-zoom)
target-y (min (- 240 (* 120.0 target-zoom ))
(max (* 120.0 target-zoom )
y))]
(if (or (not= target-x (get-in entities [:cam :x]))
(not= target-y (get-in entities [:cam :y]))