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

Add back the calls to move

Browse Source
This commit is contained in:
oakes
2014-08-27 15:36:33 -04:00
parent 479f028f88
commit 7c2e3cb0b8
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
TUTORIAL.md
View File

@@ -163,13 +163,13 @@ Now we can update our `:on-key-down` and `:on-touch-down` functions to move the
(fn [screen entities] (fn [screen entities]
(cond (cond
(> (game :point-y) (* (game :height) (/ 2 3))) (> (game :point-y) (* (game :height) (/ 2 3)))
(println "up") (move (first entities) :up)
(< (game :point-y) (/ (game :height) 3)) (< (game :point-y) (/ (game :height) 3))
(println "down") (move (first entities) :down)
(> (game :point-x) (* (game :width) (/ 2 3))) (> (game :point-x) (* (game :width) (/ 2 3)))
(println "right") (move (first entities) :right)
(< (game :point-x) (/ (game :width) 3)) (< (game :point-x) (/ (game :width) 3))
(println "left"))) (move (first entities) :left)))
``` ```
## Camera ## Camera