view clojure/com/aurellem/test_vbm.clj @ 75:eb7d4efe0f34

added play command
author Robert McIntyre <rlm@mit.edu>
date Thu, 08 Mar 2012 06:01:09 -0600
parents 39928bf4622d
children
line wrap: on
line source
1 (ns com.aurellem.test-vbm
2 (:import java.io.File)
3 (:use (com.aurellem vbm gb-driver)))
5 (def test-file (File."/home/r/proj/pokemon-escape/speedruns/rlm.vbm"))
7 (def speedrun-2942
8 (File. "/home/r/proj/pokemon-escape/speedruns/yellow-2942.vbm"))
10 (def speedrun-2913
11 (File. "/home/r/proj/pokemon-escape/speedruns/yellow-2913.vbm"))
13 (def speedrun-2771
14 (File. "/home/r/proj/pokemon-escape/speedruns/yellow-2771.vbm"))
16 (defn test-speedrun []
17 (dorun
18 (map step (vbm-masks speedrun-2942))))