view clojure/com/aurellem/exp/warp.clj @ 438:067ea3f0d951

can now play midi files with two tracks.
author Robert McIntyre <rlm@mit.edu>
date Wed, 25 Apr 2012 13:46:31 -0500
parents 3b3cd62b6106
children
line wrap: on
line source
1 (ns com.aurellem.exp.warp
2 (:use (com.aurellem.gb gb-driver vbm items util saves))
3 (:use (com.aurellem.run util))
4 (:import [com.aurellem.gb.gb_driver SaveState]))
7 ;; special thanks to http://tasvideos.org/2913S.html for revealing
8 ;; 0xD364 as the floor-map warp location
11 (def mat-warp-address 0xD364)
13 (defn view-warp-id [warp-id]
14 (->>
15 [[] (set-memory (at-mat) mat-warp-address warp-id)]
16 (do-nothing 20)
17 (play-moves [↓])
18 (do-nothing 100)))
20 (defn iterate-locations [start]
21 (dorun
22 (map
23 #(do
24 (printf "0x%02X\n" %)
25 (view-warp-id %)
26 (Thread/sleep 10000))
27 (range start (inc 0xFF)))))
30 (comment
31 0x00 pallet-town-home
32 0x01 viridian-poke-center
33 0x02 pewter-science-meuseum
34 0x03 cereluan-dig-house
35 0x04 lavender-town-poke-center
36 0x05 vermillion-poke-center
37 0x06 celedon-department-store !!!!!!!!!!!
38 0x07 fuchia-mart
39 0x08 cinnibar-mansion
40 0x09 elite-four-HQ
41 0x0A saffron-mimic-house
42 0x0B CRASHING GLITCH
43 0x0C route-1-inside-junk
44 0x0D diglett-cave-vermillion-side
45 0x0E GLITCH
46 0x0F poke-center-outside-mt-moon
47 0x10 cereullean->saffron
48 0x11 GLITCH
49 0x12 saffron->celadon
50 0x13 saffron->lavendar
51 0x14 GLITCH
52 0x15 poke-center-by-rock-tunnel
53 0x16 vermillion->lavender
54 0x17 lavender->fuchia
55 0x18 GLITCH
56 0x19 GLITCH
57 0x1A unknown
58 0x1B cycling-road->celadon
59 0x1C GLITCH
60 0x1D cycling-road->fuschia
61 0x1E surfing-house
62 0x1F seafom-island-cinnabar-side
63 0x20 GLITCH
64 0x21 indigo-plateu-gate
65 0x22 plateau-path-start
66 0x23 GLITCH
67 0x24 bills-house
68 0x25 house-again
69 0x26 stairs-to-house
70 0x27 gary's-house
71 0x28 oak's-lab
72 0x29 poke-center-unknown
73 0x2A inside-viridian-mart
74 0x2B viridian-school-house
75 0x2C unknown
76 0x2D viridian-gym
77 0x2E diglett's-cave-unknown-side
78 0x2F glitched-viridian-forest-entrance
79 0x30 unknown
80 0x31 unknown
81 0x32 unknown
82 0x33 viridian-forest-pewter-side
83 0x34 pewter-meuseum-first-floor
84 0x35 pweter-meuseum-second-floor
85 0x36 pewter-gym
86 0x37 unknown-house
87 0x38 unknown-mart
88 0x39 unknown-house
89 0x3A inside-pewter-poke-center
90 0x3B inside-mt-moon-entrance
91 0x3C mt-moon-unknown
92 0x3D mt-moon-unknown
93 0x3E inside-dig-house-cereulan?
94 0x3F inside-bulbasaur-house-cerulean
95 0x40 unknown-poke-center
96 0x41 cereulan-gym
97 0x42 inside-bike-shop
98 0x43 unknown-mart
99 0x44 unknown-poke-center
100 0x45 inside-dig-house-cereulan?
101 0x46 unknown-guard-path
102 0x47 unknown-undeground-path-entrance
103 0x48 unknown-house
104 0x49 unknown-undeground-path-entrance
105 0x4A unknown-undeground-path-entrance
106 0x4B unknown-undeground-path-entrance
107 0x4C unknown-guard-path
108 0x4D unknown-undeground-path-entrance
109 0x4E unknown-undeground-path-entrance
110 0x4F unknown-guard-path
111 0x50 unknown-undeground-path-entrance
112 0x51 unknown-poke-center
113 0x52 mt-moon-unknown
114 0x53 inside-power-plant-start
115 0x54 unknown-guard-path
116 0x55 diglet's-cave-vermillion-entrange
117 0x56 unknown-2nd-floor-guard-path
118 0x57 unknown-guard-path
119 0x58 inside-bill's-house
120 0x59 unknown-poke-center
121 0x5A inside-pokemon-fan-club
122 0x5B unknown-mart
123 0x5C unknown-gym?
124 0x5D unknown-house
125 0x5E s.s.anne-catwalk
126 0x5F s.s.anne-entrance
127 0x60 unknown-ss-anne-door
128 0x61 unknown-ss-anne
129 0x62 unknown-ss-anne
130 0x63 ss-anne-bow
131 0x64 ss-anne-cafeteria
132 0x65 ss-anne-inside-captian's-room
133 0x66 ss-anne-inside-room
134 0x67 ss-anne-inside-room
135 0x68 ss-anne-inside-room
136 0x69 CRASHING GLITCH
137 0x6A CRASHING GLITCH
138 0x6B CRASHING GLITCH
139 0x6C moltres-cave-entrance
140 0x6D CRASHING GLITCH
141 0x6E CRASHING GLITCH
142 0x6F CRASHING GLITCH
143 0x70 CRASHING GLITCH
144 0x71 unknown-ss-anne
145 0x72 CRASHING GLITCH
146 0x73 CRASHING GLITCH
147 0x74 CRASHING GLITCH
148 0x75 CRASHING GLITCH
149 0x76 elite-four-hall-of-fame
150 0x77 unknown-inside-underground-tunnel
151 0x78 unknown
152 0x79 unknown-inside-underground-tunnel
153 0x7A unknown
154 0x7B unknown-celadon-dept-store-floor !
155 0x7C unknown-celadon-dept-store-floor !
156 0x7D unknown-celadon-dept-store-floor !
157 0x7E celedon-dept-roof !
158 0x7F celadon-dept-elevator
159 0x80 celadon-pokemon-mansion-first-floor
160 0x81 celadon-pokemon-mansion-second-floor
161 0x82 celadon-pokemon-mansion-third-floor(computers)
162 0x83 celadon-pokemon-mansion-boring-roof
163 0x84 celadon-pokemon-mansion-eevee-room
164 0x85 unknown-poke-center
165 0x86 inside-celadon-gym
166 0x87 inside-celadon-game-corner
167 0x88 unknown-celadon-dept-store-floor !
168 0x89 celadon-game-corner-prize-claim
169 0x8A celadon-cafeteria
170 0x8B celadon-rocket-house
171 0x8C unknown-poke-center (maybe celadon?)
172 0x8D unknown-poke-venter (maybe celadon hotel?)
173 0x8E unknown-pokemon-tower
174 0x8F unknown-pokemon-tower
175 0x90 unknown-pokemon-tower
176 0x91 unknown-pokemon-tower
177 0x92 unknown-pokemon-tower
178 0x93 unknown-pokemon-tower
179 0x94 unknown-pokemon-tower
180 0x95 inside-fiji's-house
181 0x96 unknown-mart
182 0x97 unknown-house
183 0x98 unknown-mart
184 0x99 unknown-house
185 0x9A unknown-poke-center
186 0x9B inside-game-warden's-house
187 0x9C inside-safari-zone-gate
188 0x9D vermillion-gym
189 0x9E unknown-fuscia
190 0x9F unknown-cave
191 0xA0 unknown-cave
192 0xA1 unknown-moltres-cave
193 0xA2 unknown-seafoam-cave
194 0xA3 unknown-fishing-guru-house
195 0xA4 cereulan-house
196 0xA5 cinibar-mansion-first-floor
197 0xA6 saffron-gym
198 0xA7 cinibar-fossil-regen-lab-entrance
199 0xA8 unknown-house
200 0xA9 cinibar-fossil-regen-room
201 0xAA cinibar-fossil-regen-regen-room
202 0xAB unknown-poke-center
203 0xAC unknown-mart
204 0xAD unknown-mart
205 0xAE eilte-four-poke-center
206 0xAF glitched-house
207 0xB0 mimic's-room
208 0xB1 inside-fighting-dojo
209 0xB2 saffron-gym
210 0xB3 unknown-house (lavender?)
211 0xB4 unknown-mart
212 0xB5 sliph-co-first-floor
213 0xB6 unknown-poke-center
214 0xB7 unknown-house
215 0xB8 unknown-guard-path
216 0xB9 unknown-guard-path-2nd-floor
217 0xBA unknown-guard-path
218 0xBB unknown-guard-path-2nd-floor
219 0xBC unknown-house
220 0xBD unknown-house (fishing guru?)
221 0xBE unknown-guard-path
222 0xBF unknown-guard-path-2nd-floor
223 0xC0 unknown-cave
224 0xC1 elite-four-gate-entrance
225 0xC2 unknown-moltres-cave
226 0xC3 unknown-guard-path-2nd-floor
227 0xC4 unknown-house
228 0xC5 unknown-cave
229 0xC6 unknown-moltres-cave
230 0xC7 unknown-game-corner
231 0xC8 unknown-game-corner
232 0xC9 unknown-game-corner
233 0xCA unknown-game-corner
234 0xCB game-corner-elevator
235 0xCC GLITCH
236 0xCD GLITCH
237 0xCE GLITCH
238 0xCF unknown-silph-co
239 0xD0 unknown-silph-co
240 0xD1 unknown-silph-co
241 0xD2 unknown-silph-co
242 0xD3 unknown-silph-co
243 0xD4 unknown-silph-co
244 0xD5 unknown-silph-co
245 0xD6 unknown-cinnibar-mansion
246 0xD7 unknown-cinnibar-mansion
247 0xD8 unknown-cinnibar-mansion
248 0xD9 unknown-safari-zone
249 0xDA unknown-safari-zone
250 0xDB unknown-safari-zone
251 0xDC unknown-safari-zone
252 0xDD unknown-safari-zone-rest-room
253 0xDE safari-zone-surf-room
254 0xDF unknown-safari-zone-rest-room
255 0xE0 unknown-safari-zone-rest-room
256 0xE1 unknown-safari-zone-rest-room
257 0xE2 unknown-mewtwo-cave
258 0xE3 unknown-mewtwo-cave
259 0xE4 mewtwo-cave-entrance
260 0xE5 unknown-house
261 0xE6 cereulan-badge-description-room
262 0xE7 CRASHING GLITCH
263 0xE8 unknown-cave
264 0xE9 unknown-silph-co
265 0xEA unknown-silph-co
266 0xEB silph-co-boring-top-floor
267 0xEC silph-co-elevator
268 0xED GLITCH
269 0xEE GLITCH
270 0xEF GLITCH
271 0xF0 GLITCH
272 0xF1 GLITCH
273 0xF2 GLITCH
274 0xF3 GLITCH
275 0xF4 GLITCH
276 0xF5 loreli-room
277 0xF6 bruno-room
278 0xF7 agatha-room
279 0xF8 inside-surfing-room
280 0xF9 GLITCH (dark)
281 0xFA GLITCH (dark)
282 0xFB CRASHING GLITCH
283 0xFC GLITCH (dark)
284 0xFD CRASHING GLITCH
285 0xFE CRASHING GLITCH
286 0xFF CRASHING GLITCH