Mercurial > vba-clojure
comparison clojure/com/aurellem/exp/warp.clj @ 345:3b3cd62b6106
script: made it to cereulean with TM55s worth 2 million.
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Sun, 08 Apr 2012 20:58:14 -0500 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
344:9366539d29b6 | 345:3b3cd62b6106 |
---|---|
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])) | |
5 | |
6 | |
7 ;; special thanks to http://tasvideos.org/2913S.html for revealing | |
8 ;; 0xD364 as the floor-map warp location | |
9 | |
10 | |
11 (def mat-warp-address 0xD364) | |
12 | |
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))) | |
19 | |
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))))) | |
28 | |
29 | |
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 | |
287 | |
288 | |
289 ) |