view clojure/com/aurellem/test_vbm.clj @ 83:95cb2152d7cd

fleshing out functional gb interface
author Robert McIntyre <rlm@mit.edu>
date Fri, 09 Mar 2012 19:18:00 -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))))