1.1 --- a/org/rom.org	Fri Apr 13 11:33:56 2012 -0500
     1.2 +++ b/org/rom.org	Fri Apr 13 02:38:10 2012 -0500
     1.3 @@ -1068,48 +1068,54 @@
     1.4  
     1.5  ** Mapping the ROM
     1.6  
     1.7 -| ROM address (hex) | Description     | Format          | Example         |
     1.8 -|-------------------+-----------------+-----------------+-----------------|
     1.9 -|                   | <15>            | <15>            | <15>            |
    1.10 -| 0233C-            | Shop inventories. |                 |                 |
    1.11 -| 04495-            | Prices of items. | Each price is two bytes of binary-coded decimal. Prices are separated by zeroes. Priceless items[fn::Like the Pok\eacute{}dex and other unsellable items.] are given a price of zero. | The cost of lemonade is 0x03 0x50, which translates to a price of ₱350. |
    1.12 -| 045B7-0491E       | Names of the items in memory. | Variable-length item names (strings of character codes). Names are separated by a single 0x50 character. | MASTER BALL#ULTRA BALL#... |
    1.13 -| 04D89-            | Lists of wild Pok\eacute{}mon to encounter in each region. | Each list contains ten Pokemon (ids) and their levels; twenty bytes in total. First, the level of the first Pokemon. Then the internal id of the first Pokemon. Next, the level of the second Pokemon, and so on. Since Pokemon cannot have level 0, the lists are separated by a pair 0 /X/, where /X/ is an apparently random Pokemon id. | The first list is (3 36 4 36 2 165 3 165 2 36 3 36 5 36 4 165 6 36 7 36 0 25), i.e. level 3 pidgey, level 4 pidgey, level 2 rattata, level 3 rattata, level 2 pidgey, level 3 pidgey, level 5 pidgey, level 4 rattata, level 6 pidgey, level 7 pidgey, \ldquo{}level 0 gastly\rdquo{} (i.e., end-of-list). |
    1.14 -| 05EDB.            | Which Pok\eacute{}mon to show during Prof. Oak's introduction. | A single byte, the Pok\eacute{}mon's internal id. | In Pok\eacute{}mon Yellow, it shows Pikachu during the introduction; Pikachu's internal id is 0x54. |
    1.15 -| 06698-            | ? Background music. |                 |                 |
    1.16 -| 0822E-082F?       | Pointers to background music, part I. |                 |                 |
    1.17 -| 0CB95-            | Pointers to lists of wild pokemon to encounter in each region. These lists begin at 04D89, see above. | Each pointer is a low-byte, high-byte pair. | The first entry is 0x89 0x4D, corresponding to the address 0x4D89, the location of the first list of wild Pok\eacute{}mon (see 04D89, above). |
    1.18 -|-------------------+-----------------+-----------------+-----------------|
    1.19 -| 0DADB.            | Amount of HP restored by Hyper Potion. | The HP consists of a single byte. TODO: Discover what the surrounding data does, and find the data for the amount of HP restored by other items: Fresh Water (50HP), Soda (60HP), Lemonade(80HP). | 200             |
    1.20 -| 0DAE0.            | Amount of HP restored by Super Potion. | "               | 50              |
    1.21 -| 0DAE3.            | Amount of HP restored by Potion. | "               | 20              |
    1.22 -|-------------------+-----------------+-----------------+-----------------|
    1.23 -| 0DD4D-DD72        | Names of permanent stats. | Variable-length strings separated by 0x50. | #HEALTH#ATTACK#DEFENSE#SPEED#SPECIAL# |
    1.24 -| 1195C-1196A       | The two terms for being able/unable to learn a TM/HM. | Variable-length strings separated by 0x50. | ABLE#NOT ABLE#  |
    1.25 -| 119C0-119CE       | The two terms for being able/unable to evolve using the current stone. | Variable-length strings separated by 0x50. | ABLE#NOT ABLE#  |
    1.26 -| 1232D-12364       | Which moves are taught by the TMs and HMs | A list of 55 move ids (50 TMs, plus 5 HMs). First, the move that will be taught by TM01; second, the move that will be taught by TM02; and so on. The last five entries are the moves taught by HMs 1-5. (See also, BC000 below) | The first few entries are (5 13 14 18 ...) corresponding to Mega Punch (TM01), Razor Wind (TM02), Swords Dance (TM03), Whirlwind (TM04), ... |
    1.27 -|-------------------+-----------------+-----------------+-----------------|
    1.28 -| 27D56 & 27D57.    | Pointer to the list of type pointers. |                 |                 |
    1.29 -| 27D63-27D99       | Pointers to type names. | Each point is a low-byte, high-byte pair. The names of types follows immediately after this section; see below. | The first pointer is [0x99 0x7D], corresponding to the location 0x2.7D.99, the NORMAL type. |
    1.30 -| 27D99-27DFF       | Names of the Pok\eacute{}mon types. | Variable-length type names (strings of character codes). Names are separated by a single 0x50 character. | NORMAL#FIGHTING#... |
    1.31 -| 27E77-            | Trainer title names. | Variable-length names separated by 0x50. | YOUNGSTER#BUG CATCHER#LASS#... |
    1.32 -| 34000-            |                 |                 |                 |
    1.33 -| 38000-383DE       | The basic properties and effects of moves. (165 moves total) | Fixed-length (6 byte) continguous descriptions (no separating character): move-index, move-effect, power, move-type, accuracy, pp. | The entry for Pound, the first attack in the list, is (1 0 40 0 255 35). See below for more explanation. |
    1.34 -| 383DE-            | Species data for the Pokemon, listed in Pokedex order: Pokedex number; base moves; types; learnable TMs and HMs; base HP, attack, defense, speed, special; sprite data. |                 |                 |
    1.35 -| 39462-            | The Pok\eacute{}mon cry data. | Fixed-length (3 byte) descriptions of cries. |                 |
    1.36 -| 3B1E5-            | Pointers to evolution/learnset data. |                 |                 |
    1.37 -| 3B361-            | Evolution and learnset data. [fn::Evolution data consists of how to make Pok\eacute{}mon evolve, and what they evolve into. Learnset data consists of the moves that Pok\eacute{}mon learn as they level up.] | Variable-length evolution information (see below), followed by a list of level/move-id learnset pairs. |                 |
    1.38 -| 40687-            | Species data from the Pok\eacute{}dex: species name, height, weight, etc. | Fixed-length sequences of bytes. See below for specifics. |                 |
    1.39 -| 410B1-            | A conversion table between internal order and Pokedex order. |                 |                 |
    1.40 -| 5DE10-5DE30       | Abbreviations for status ailments. | Fixed-length strings, probably[fn::Here's something strange: all of the status messages start with 0x7F and end with 0x4F \mdash{}except PAR, which ends with 0x50.]. The last entry is QUIT##. | [0x7F] *SLP* [0x4E][0x7F] *PSN* [0x4E][0x7F] *PAR* [0x50][0x7F]... |
    1.41 -| 71500-            | Names of places. |                 |                 |
    1.42 -| 7C249-7C2??       | Pointers to background music, pt II. |                 |                 |
    1.43 -| 98000-            | Dialogue        |                 |                 |
    1.44 -| B8000-            | The text of each Pokemon's Pok\eacute{}dex entry. |                 |                 |
    1.45 -| BC000-BC60E       | Move names.     | Variable-length move names, separated by 0x50. The moves are in internal order. | POUND#KARATE CHOP#DOUBLESLAP#COMET PUNCH#... |
    1.46 -| E8000-E876C       | Names of the \ldquo{}190\rdquo{} species of Pok\eacute{}mon in memory. | Fixed length (10-letter) Pok\eacute{}mon names. Any extra space is padded with the character 0x80. The names are in \ldquo{}internal order\rdquo{}. | RHYDON####KANGASKHANNIDORAN♂#... |
    1.47 -|                   |                 |                 |                 |
    1.48 -|                   |                 |                 |                 |
    1.49 +| ROM address (hex)    | Description     | Format          | Example         |
    1.50 +|----------------------+-----------------+-----------------+-----------------|
    1.51 +|                      | <15>            | <15>            | <15>            |
    1.52 +| 01823-0184A          | Important prefix strings. | Variable-length strings, separated by 0x50. | TM#TRAINER#PC#ROCKET#POK\eacute{}#... |
    1.53 +| 0233C-               | Shop inventories. |                 |                 |
    1.54 +| 04495-               | Prices of items. | Each price is two bytes of binary-coded decimal. Prices are separated by zeroes. Priceless items[fn::Like the Pok\eacute{}dex and other unsellable items.] are given a price of zero. | The cost of lemonade is 0x03 0x50, which translates to a price of ₱350. |
    1.55 +| 045B7-0491E          | Names of the items in memory. | Variable-length item names (strings of character codes). Names are separated by a single 0x50 character. | MASTER BALL#ULTRA BALL#... |
    1.56 +| 04D89-               | Lists of wild Pok\eacute{}mon to encounter in each region. | Each list contains ten Pokemon (ids) and their levels; twenty bytes in total. First, the level of the first Pokemon. Then the internal id of the first Pokemon. Next, the level of the second Pokemon, and so on. Since Pokemon cannot have level 0, the lists are separated by a pair 0 /X/, where /X/ is an apparently random Pokemon id. | The first list is (3 36 4 36 2 165 3 165 2 36 3 36 5 36 4 165 6 36 7 36 0 25), i.e. level 3 pidgey, level 4 pidgey, level 2 rattata, level 3 rattata, level 2 pidgey, level 3 pidgey, level 5 pidgey, level 4 rattata, level 6 pidgey, level 7 pidgey, \ldquo{}level 0 gastly\rdquo{} (i.e., end-of-list). |
    1.57 +| 05EDB.               | Which Pok\eacute{}mon to show during Prof. Oak's introduction. | A single byte, the Pok\eacute{}mon's internal id. | In Pok\eacute{}mon Yellow, it shows Pikachu during the introduction; Pikachu's internal id is 0x54. |
    1.58 +| 06698-               | ? Background music. |                 |                 |
    1.59 +| 0822E-082F?          | Pointers to background music, part I. |                 |                 |
    1.60 +| 0CB95-               | Pointers to lists of wild pokemon to encounter in each region. These lists begin at 04D89, see above. | Each pointer is a low-byte, high-byte pair. | The first entry is 0x89 0x4D, corresponding to the address 0x4D89, the location of the first list of wild Pok\eacute{}mon (see 04D89, above). |
    1.61 +|----------------------+-----------------+-----------------+-----------------|
    1.62 +| 0DADB.               | Amount of HP restored by Hyper Potion. | The HP consists of a single byte. TODO: Discover what the surrounding data does, and find the data for the amount of HP restored by other items: Fresh Water (50HP), Soda (60HP), Lemonade(80HP). | 200             |
    1.63 +| 0DAE0.               | Amount of HP restored by Super Potion. | "               | 50              |
    1.64 +| 0DAE3.               | Amount of HP restored by Potion. | "               | 20              |
    1.65 +|----------------------+-----------------+-----------------+-----------------|
    1.66 +| 0DD4D-DD72           | Names of permanent stats. | Variable-length strings separated by 0x50. | #HEALTH#ATTACK#DEFENSE#SPEED#SPECIAL# |
    1.67 +| 1195C-1196A          | The two terms for being able/unable to learn a TM/HM. | Variable-length strings separated by 0x50. | ABLE#NOT ABLE#  |
    1.68 +| 119C0-119CE          | The two terms for being able/unable to evolve using the current stone. | Variable-length strings separated by 0x50. | ABLE#NOT ABLE#  |
    1.69 +| 1232D-12364          | Which moves are taught by the TMs and HMs | A list of 55 move ids (50 TMs, plus 5 HMs). First, the move that will be taught by TM01; second, the move that will be taught by TM02; and so on. The last five entries are the moves taught by HMs 1-5. (See also, BC000 below) | The first few entries are (5 13 14 18 ...) corresponding to Mega Punch (TM01), Razor Wind (TM02), Swords Dance (TM03), Whirlwind (TM04), ... |
    1.70 +|----------------------+-----------------+-----------------+-----------------|
    1.71 +| 27D56 & 27D57.       | Pointer to the pointers to type names. | A single low-byte, high-byte pair. | 0x63 0x7D, corresponding to location 0x27D63; see next entry. |
    1.72 +| 27D63-27D99          | Pointers to type names. | Each point is a low-byte, high-byte pair. The names of types follows immediately after this section; see below. | The first pointer is [0x99 0x7D], corresponding to the location 0x2.7D.99, the NORMAL type. |
    1.73 +| 27D99-27DFF          | Names of the Pok\eacute{}mon types. | Variable-length type names (strings of character codes). Names are separated by a single 0x50 character. | NORMAL#FIGHTING#... |
    1.74 +| 27E77-               | Trainer title names. | Variable-length names separated by 0x50. | YOUNGSTER#BUG CATCHER#LASS#... |
    1.75 +| 34000-               |                 |                 |                 |
    1.76 +| 38000-383DE          | The basic properties and effects of moves. (165 moves total) | Fixed-length (6 byte) continguous descriptions (no separating character): move-index, move-effect, power, move-type, accuracy, pp. | The entry for Pound, the first attack in the list, is (1 0 40 0 255 35). See below for more explanation. |
    1.77 +| 383DE-               | Species data for the Pokemon, listed in Pokedex order: Pokedex number; base moves; types; learnable TMs and HMs; base HP, attack, defense, speed, special; sprite data. |                 |                 |
    1.78 +| 39462-               | The Pok\eacute{}mon cry data. | Fixed-length (3 byte) descriptions of cries. |                 |
    1.79 +| 3997D-39B05          | Trainer titles (extended; see 27E77). This list includes strictly more trainers, seemingly at random inserted into the list from 27E77.[fn::The names added are in bold: YOUNGSTER, BUG CATCHER, LASS, *SAILOR*, JR TRAINER(m), JR TRAINER(f), POK\eacute{}MANIAC, SUPER NERD, *HIKER*, *BIKER*, BURGLAR, ENGINEER, JUGGLER, *FISHERMAN*, SWIMMER, *CUE BALL*, *GAMBLER*, BEAUTY,  *PSYCHIC*, ROCKER, JUGGLER (again), *TAMER*, *BIRDKEEPER*, BLACKBELT, *RIVAL1*, PROF OAK, CHIEF, SCIENTIST, *GIOVANNI*, ROCKET, COOLTRAINER(m), COOLTRAINER(f), *BRUNO*, *BROCK*, *MISTY*, *LT. SURGE*, *ERIKA*, *KOGA*, *BLAINE*, *SABRINA*, *GENTLEMAN*, *RIVAL2*, *RIVAL3*, *LORELEI*, *CHANNELER*, *AGATHA*, *LANCE*.] |                 |                 |
    1.80 +| 3A289-3A540 (approx) | Trainer Pok\eacute{}mon | Consecutive level/internal-id pairs (as with wild Pok\eacute{}mon; see 04D89) with irregular spacing \mdash{} the separators seem to have some metadata purpose. | The first entry is 0x05 0x66, representing level 5 Eevee (from your first battle in the game[fn::Incidentally, to change your rival's starter Pok\eacute{}mon, it's enough just to change its species in all of your battles with him.].) |
    1.81 +| 3B1E5-               | Pointers to evolution/learnset data. |                 |                 |
    1.82 +| 3B361-               | Evolution and learnset data. [fn::Evolution data consists of how to make Pok\eacute{}mon evolve, and what they evolve into. Learnset data consists of the moves that Pok\eacute{}mon learn as they level up.] | Variable-length evolution information (see below), followed by a list of level/move-id learnset pairs. |                 |
    1.83 +| 40687-               | Species data from the Pok\eacute{}dex: species name, height, weight, etc. | Fixed-length sequences of bytes. See below for specifics. |                 |
    1.84 +| 410B1-               | A conversion table between internal order and Pokedex order. |                 |                 |
    1.85 +| 527BA-527DB          | The costs and species of prizes from Celadon Game Corner. | The following pattern repeats three times, once per window[fn::For the first two groups, ids are interpreted as Pok\eacute{}mon ids. For the last group, ids are (somehow) interpreted as item ids.]: Internal ids / 0x50 / Prices (two bytes of BCD)/ 0x50. | (0x94 0x52 0x65 0x50) Abra Vulpix Wigglytuff (0x02 0x30 0x10 0x00 0x26 0x80) 230C, 1000C, 2680C |
    1.86 +| 5DE10-5DE30          | Abbreviations for status ailments. | Fixed-length strings, probably[fn::Here's something strange: all of the status messages start with 0x7F and end with 0x4F \mdash{}except PAR, which ends with 0x50.]. The last entry is QUIT##. | [0x7F] *SLP* [0x4E][0x7F] *PSN* [0x4E][0x7F] *PAR* [0x50][0x7F]... |
    1.87 +| 71500-               | Names of places. |                 |                 |
    1.88 +| 71C1?-               | NPC Pok\eacute{}mon. | Internal ID, followed by nickname (11 chars; extra space padded by 0x50). |                 |
    1.89 +| 7C249-7C2??          | Pointers to background music, pt II. |                 |                 |
    1.90 +| 98000-B8000          | Dialogue and other messsages. | Variable-length strings. |                 |
    1.91 +| B8000-BC000          | The text of each Pok\eacute{}mon's Pok\eacute{}dex entry. | Variable-length descriptions (strings) in Pok\eacute{}dex order, separated by 0x50. These entries use the special characters *0x49* (new page), *0x4E* (new line), and *0x5F* (end entry). | The first entry (Bulbasaur's) is: "It can go for days [0x4E] without eating a [0x4E] single morsel. [0x49] In the bulb on [0x4E] its back,  it [0x4E] stores energy [0x5F] [0x50]." |
    1.92 +| BC000-BC60E          | Move names.     | Variable-length move names, separated by 0x50. The moves are in internal order. | POUND#KARATE CHOP#DOUBLESLAP#COMET PUNCH#... |
    1.93 +| E8000-E876C          | Names of the \ldquo{}190\rdquo{} species of Pok\eacute{}mon in memory. | Fixed length (10-letter) Pok\eacute{}mon names. Any extra space is padded with the character 0x50. The names are in \ldquo{}internal order\rdquo{}. | RHYDON####KANGASKHANNIDORAN♂#... |
    1.94 +|                      |                 |                 |                 |
    1.95 +|                      |                 |                 |                 |
    1.96 +   #+TBLFM: 
    1.97  
    1.98  
    1.99  
   1.100 @@ -1574,6 +1580,16 @@
   1.101  ;; note: 1195C-6A says ABLE#NOT ABLE#, but so does 119C0-119CE.
   1.102  ;; The first instance is for Machines; the second, for stones.
   1.103  
   1.104 +;; note: according to
   1.105 +;; http://www.upokecenter.com/games/rby/guides/rgbtrainers.php
   1.106 +;; the amount of money given by a trainer is equal to the 
   1.107 +;; base money times the level of the last Pokemon on that trainer's
   1.108 +;; list. Other sources say it's the the level of the last pokemon 
   1.109 +;; /defeated/.
   1.110 +
   1.111 +;; todo: find base money.
   1.112 +
   1.113 +
   1.114  ;; 0x251A (in indexable mem): image decompression routine seems to begin here.
   1.115  
   1.116  
   1.117 @@ -1609,8 +1625,36 @@
   1.118  
   1.119  
   1.120  
   1.121 +(defn test-3 
   1.122 +  "Explore trainer data"
   1.123 +  []
   1.124 +  (let [pokenames (vec(hxc-pokenames-raw))]
   1.125 +    (println 
   1.126 +     (reduce
   1.127 +      str
   1.128 +      (map
   1.129 +       (fn [[lvl pkmn]]
   1.130 +         (str (format "%-11s %4d       %02X %02X"
   1.131 +                      (cond
   1.132 +                        (zero? lvl) "+"
   1.133 +                        (nil? (get pokenames (dec pkmn)))
   1.134 +                        "-"
   1.135 +                        :else
   1.136 +                        (get pokenames (dec pkmn)))
   1.137 +                      lvl
   1.138 +                      pkmn
   1.139 +                      lvl
   1.140 +                      ) "\n"))
   1.141 +       
   1.142 +       (partition 2
   1.143 +                  (take 100;;703
   1.144 +                        (drop 0x3A281 (rom)))))))))
   1.145 +  
   1.146  
   1.147  
   1.148 +;; look for the rainbow badge in memory
   1.149 +(println (reduce str (map #(str (first %) "\t" (vec(second %)) "\n") (search-memory (rom) [221] 10))))
   1.150 +
   1.151  
   1.152  (comment 
   1.153