Mercurial > vba-clojure
comparison clojure/com/aurellem/gb/gb_driver.clj @ 326:8484e6f6db2c
saving progress before trip to Liberal.
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Wed, 04 Apr 2012 14:55:43 -0500 |
parents | d263df762c59 |
children | 09b3bc0b71b5 |
comparison
equal
deleted
inserted
replaced
325:a5cdb2f76307 | 326:8484e6f6db2c |
---|---|
140 ([state] | 140 ([state] |
141 (play state Integer/MAX_VALUE)) | 141 (play state Integer/MAX_VALUE)) |
142 ([] | 142 ([] |
143 (continue! @current-state))) | 143 (continue! @current-state))) |
144 | 144 |
145 (defn run-moves [moves state] | 145 (defn run-moves [state moves] |
146 (set-state! state) | 146 (set-state! state) |
147 (dorun (map #(Gb/step (button-mask %)) | 147 (dorun (map #(Gb/step (button-mask %)) |
148 moves)) | 148 moves)) |
149 (update-state)) | 149 (update-state)) |
150 | 150 |