Mercurial > vba-clojure
diff clojure/com/aurellem/gb/characters.clj @ 213:57258c269bcb
Added spelling bee.
author | Dylan Holmes <ocsenave@gmail.com> |
---|---|
date | Fri, 23 Mar 2012 19:05:08 -0500 |
parents | a67f1df5d096 |
children | 0587f266a735 |
line wrap: on
line diff
1.1 --- a/clojure/com/aurellem/gb/characters.clj Fri Mar 23 18:06:37 2012 -0500 1.2 +++ b/clojure/com/aurellem/gb/characters.clj Fri Mar 23 19:05:08 2012 -0500 1.3 @@ -2,17 +2,40 @@ 1.4 (:use (com.aurellem.gb gb-driver constants)) 1.5 (:import [com.aurellem.gb.gb_driver SaveState])) 1.6 1.7 + 1.8 +(def pronouns 1.9 + ;; Note: 0x0 seems to be the end-of-name sentinel 1.10 + { 1.11 + ;; what is 0x57? what is 0x0? 1.12 + :RED [0x52] 1.13 + :BLUE [0x53] 1.14 + :opponent [0x01 0x49 0xD0 0x0] 1.15 + :turn-pokemon [0x5A] 1.16 + :off-turn-pokemon [0x59] 1.17 + :your-pokemon [0x01 0x08 0xD0 0x0] 1.18 + :opponent-pokemon [0x50 0x01 0xD9 0xCF 0x0] 1.19 + 1.20 + :n-times [0x50 0x09 0x05 0xCD 0x11 0x0] 1.21 + 1.22 + 1.23 + }) 1.24 + 1.25 + 1.26 (def character-code->character 1.27 { 1.28 - 0x00 "<";;"end-of-name-sentinel" ;; begin messsage 1.29 - 0x4E "[...]" ; ocsenave: scroll pokedex page 1.30 + 0x0 "" ;; separator character? 1.31 + 0x58 "\n" 1.32 + ;0x00 "<";;"end-of-name-sentinel" ;; begin messsage 1.33 + ;;0x49 "\n //" ;; ocsenave: pagebreak pokedex 1.34 + ;;0x4E "\n..." ; ocsenave: clearscroll pokedex page 1.35 0x4F "\n" ; newline 1.36 - 0x50 "#";;"end-of-pokemon-name-sentinel" 1.37 + ;;0x50 "#";;"end-of-pokemon-name-sentinel" 1.38 0x51 "\n\n" ;; ocsenave: clear screen 1.39 + 0x52 "[RED]" ;;ocsenave: placeholder for your name? 1.40 0x54 "[POKE]" 1.41 0x55 "_" ;; ocsenave: breaking space? 1.42 - 0x57 ">" ;; ocsenave: end message 1.43 - 0x5F ">" ;; ocsenave: end pokedex entry?? 1.44 + ;0x57 ">" ;; ocsenave: end message 1.45 + ;0x5F ">" ;; ocsenave: end pokedex entry?? 1.46 0x60 "A-bold" 1.47 0x61 "B-bold" 1.48 0x62 "C-bold"