diff clojure/com/aurellem/exp/pokemon.clj @ 161:cd7979aa544e

emabled setting pokemon moves and PP
author Robert McIntyre <rlm@mit.edu>
date Tue, 20 Mar 2012 17:13:12 -0500
parents 9ca350a476f0
children 76b031d2f586
line wrap: on
line diff
     1.1 --- a/clojure/com/aurellem/exp/pokemon.clj	Tue Mar 20 05:18:31 2012 -0500
     1.2 +++ b/clojure/com/aurellem/exp/pokemon.clj	Tue Mar 20 17:13:12 2012 -0500
     1.3 @@ -2,6 +2,7 @@
     1.4    "Here I find out how pokemon are stored in memory."
     1.5    (:use (com.aurellem.gb gb-driver items assembly util
     1.6                           characters))
     1.7 +  (:import java.io.File)
     1.8    (:import [com.aurellem.gb.gb_driver SaveState]))
     1.9  
    1.10  
    1.11 @@ -536,8 +537,6 @@
    1.12     (with-out-str (print-listing state 0xD162 0xD197))
    1.13     baseline))
    1.14  
    1.15 -
    1.16 -
    1.17  (defn compare-pokemon
    1.18    ([state]
    1.19       (let [target (File. "/home/r/temp-poke")]
    1.20 @@ -548,7 +547,7 @@
    1.21                   (clojure.java.shell/sh "diff"
    1.22                                          (.getCanonicalPath baseline)
    1.23                                          (.getCanonicalPath target))))))
    1.24 -  ([] (compare-pokemon-1 @current-state)))
    1.25 +  ([] (compare-pokemon @current-state)))
    1.26                                    
    1.27  
    1.28  (defn crazy-pid []