Mercurial > vba-clojure

diff clojure/com/aurellem/gb/characters.clj @ 225:0587f266a735

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
added functions for setting rival's name and text speed
author Robert McIntyre <rlm@mit.edu>
date Sat, 24 Mar 2012 05:26:33 -0500
parents 57258c269bcb
children d5dddf33543c
line wrap: on
line diff
     1.1 --- a/clojure/com/aurellem/gb/characters.clj	Sat Mar 24 04:29:37 2012 -0500
     1.2 +++ b/clojure/com/aurellem/gb/characters.clj	Sat Mar 24 05:26:33 2012 -0500
     1.3 @@ -20,12 +20,13 @@
     1.4     
     1.5     })
     1.6  
     1.7 +(def end-of-name-sentinel 0x00)
     1.8  
     1.9  (def character-code->character
    1.10    {
    1.11     0x0 "" ;; separator character?
    1.12     0x58 "\n"
    1.13 -   ;0x00   "<";;"end-of-name-sentinel" ;; begin messsage
    1.14 +   ;;0x00   "<";;"end-of-name-sentinel" ;; begin messsage
    1.15     ;;0x49   "\n //" ;; ocsenave: pagebreak pokedex
    1.16     ;;0x4E   "\n..." ; ocsenave: clearscroll pokedex page
    1.17     0x4F   "\n" ; newline
    1.18 @@ -155,8 +156,6 @@
    1.19                  (format "[0x%02X]" %))
    1.20                codes)))
    1.21  
    1.22 -
    1.23 -
    1.24  (defn print-text
    1.25    ([^SaveState state begin end]
    1.26       (dorun