Mercurial > vba-clojure
comparison clojure/com/aurellem/gb/hxc.clj @ 312:2060219691fa
Added more to the rom map.
author | Dylan Holmes <ocsenave@gmail.com> |
---|---|
date | Sun, 01 Apr 2012 21:47:04 -0500 |
parents | 3d4f60b4a4af |
children | 5639312a393f |
comparison
equal
deleted
inserted
replaced
311:8fa0f36140b4 | 312:2060219691fa |
---|---|
438 (take (* move-size move-count) | 438 (take (* move-size move-count) |
439 (drop 0x38000 rom)))))))) | 439 (drop 0x38000 rom)))))))) |
440 | 440 |
441 | 441 |
442 (defn hxc-machines | 442 (defn hxc-machines |
443 "The hardcoded moves taught by TMs and HMs. List begins at ROM@0x1232D." | 443 "The hardcoded moves taught by TMs and HMs. List begins at ROM@1232D." |
444 ([] (hxc-machines | 444 ([] (hxc-machines |
445 com.aurellem.gb.gb-driver/original-rom)) | 445 com.aurellem.gb.gb-driver/original-rom)) |
446 ([rom] | 446 ([rom] |
447 (let [moves (hxc-move-names rom)] | 447 (let [moves (hxc-move-names rom)] |
448 (zipmap | 448 (zipmap |