comparison clojure/com/aurellem/gb/items.clj @ 191:893c753f8088

added function to set ROM
author Robert McIntyre <rlm@mit.edu>
date Thu, 22 Mar 2012 20:10:09 -0500
parents 531e1342ff56
children 7ceaac84be57
comparison
equal deleted inserted replaced
190:9a7a46c4aa1b 191:893c753f8088
1 (ns com.aurellem.gb.items 1 (ns com.aurellem.gb.items
2 (:use (com.aurellem.gb gb-driver util)) 2 (:use (com.aurellem.gb gb-driver util))
3 ;; this is bullshit 3 ;; this is bullshit
4 (:import [com.aurellem.gb.gb_driver SaveState])) 4 (:import [com.aurellem.gb.gb_driver SaveState]))
5 5
6 (defn game-name [] 6 (defn game-name
7 "return pokemon-yellow header information"
8 []
7 (map char (subvec (vec (memory)) 0x134 0x142))) 9 (map char (subvec (vec (memory)) 0x134 0x142)))
8 10
9 (def item-list-start 0xD31C) 11 (def item-list-start 0xD31C)
10 12
11 (defn item-list 13 (defn item-list