camera option

This commit is contained in:
Bryce Covert
2016-05-20 00:22:12 -07:00
parent d298e495bd
commit 1a230ee934
3 changed files with 18 additions and 9 deletions

View File

@@ -1221,7 +1221,8 @@ void main ()
[id ((:update-fn entity) screen entities entity)]
[id entity])))))
entities (if (and (not (get-in entities [:cam :paused?]))
entities (if (and (@utils/settings :camera-man? true)
(not (get-in entities [:cam :paused?]))
(nil? (get-in entities [:tweens :cam-x]))
(= 1 (rand-int 20)))
(if (= (rand-int 2) 1)