changeset 278:7ecea582ec9d

script: bought initial 5 items.
author Robert McIntyre <rlm@mit.edu>
date Tue, 27 Mar 2012 13:10:48 -0500
parents 710bfbb1e048
children aa9b8d9d5b76
files clojure/com/aurellem/run/bootstrap_0.clj
diffstat 1 files changed, 4 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
     1.1 --- a/clojure/com/aurellem/run/bootstrap_0.clj	Tue Mar 27 12:57:58 2012 -0500
     1.2 +++ b/clojure/com/aurellem/run/bootstrap_0.clj	Tue Mar 27 13:10:48 2012 -0500
     1.3 @@ -254,7 +254,10 @@
     1.4            result (search-string (memory future-state)
     1.5                                  "Wild")]
     1.6        (if (nil? result)
     1.7 -        new-script
     1.8 +        (do
     1.9 +          (if (< 0 blanks)
    1.10 +            (do(println "avoided pokemon with" blanks "blank frames")))
    1.11 +             new-script)
    1.12          (recur (inc blanks))))))
    1.13  
    1.14  (defn walk-thru-grass