Mercurial > vba-clojure
comparison clojure/com/aurellem/gb/characters.clj @ 207:a67f1df5d096
More hardcode expeditions.
author | Dylan Holmes <ocsenave@gmail.com> |
---|---|
date | Fri, 23 Mar 2012 04:43:44 -0500 |
parents | 67c42608ef9d |
children | 57258c269bcb |
comparison
equal
deleted
inserted
replaced
206:32ac21c9a30d | 207:a67f1df5d096 |
---|---|
3 (:import [com.aurellem.gb.gb_driver SaveState])) | 3 (:import [com.aurellem.gb.gb_driver SaveState])) |
4 | 4 |
5 (def character-code->character | 5 (def character-code->character |
6 { | 6 { |
7 0x00 "<";;"end-of-name-sentinel" ;; begin messsage | 7 0x00 "<";;"end-of-name-sentinel" ;; begin messsage |
8 0x4E "[...]" ; ocsenave: scroll pokedex page | |
8 0x4F "\n" ; newline | 9 0x4F "\n" ; newline |
9 0x50 "#";;"end-of-pokemon-name-sentinel" | 10 0x50 "#";;"end-of-pokemon-name-sentinel" |
10 0x51 "\n\n" ;; ocsenave: clear screen | 11 0x51 "\n\n" ;; ocsenave: clear screen |
11 0x54 "[POKE]" | 12 0x54 "[POKE]" |
12 0x55 "_" ;; ocsenave: breaking space? | 13 0x55 "_" ;; ocsenave: breaking space? |
13 0x57 ">" ;; ocsenave: end message | 14 0x57 ">" ;; ocsenave: end message |
15 0x5F ">" ;; ocsenave: end pokedex entry?? | |
14 0x60 "A-bold" | 16 0x60 "A-bold" |
15 0x61 "B-bold" | 17 0x61 "B-bold" |
16 0x62 "C-bold" | 18 0x62 "C-bold" |
17 0x63 "D-bold" | 19 0x63 "D-bold" |
18 0x64 "E-bold" | 20 0x64 "E-bold" |