Mercurial > vba-clojure
annotate clojure/com/aurellem/gb/saves.clj @ 316:d263df762c59
greatly speed up scroll-text by using binary-search.
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Mon, 02 Apr 2012 21:20:54 -0500 |
parents | 073600cba28a |
children | 9a4d3f801c89 |
rev | line source |
---|---|
rlm@179 | 1 (ns com.aurellem.gb.saves |
rlm@179 | 2 (:use (com.aurellem.gb gb-driver)) |
rlm@179 | 3 (:import [com.aurellem.gb.gb_driver SaveState])) |
rlm@179 | 4 |
rlm@235 | 5 (defn pre-wild-battle [] |
rlm@235 | 6 (read-state "prepare-for-battle")) |
rlm@179 | 7 |
rlm@179 | 8 (defn pre-trainer-battle [] |
rlm@235 | 9 (read-state "pre-trainer-battle")) |
rlm@235 | 10 |
rlm@235 | 11 (defn rlm-pallet-town [] |
rlm@235 | 12 (read-state "rlm-pallet-town")) |
rlm@235 | 13 |
rlm@314 | 14 (defn talk-to-oak [] |
rlm@314 | 15 (read-state "talk-to-oak")) |
rlm@235 | 16 |
rlm@314 | 17 (defn normal-conv [] |
rlm@316 | 18 (read-state "normal-conversation")) |
rlm@316 | 19 |
rlm@316 | 20 (defn oak-battle [] |
rlm@316 | 21 (read-state "oak-battle")) |