rlm@345: (ns com.aurellem.exp.warp rlm@345: (:use (com.aurellem.gb gb-driver vbm items util saves)) rlm@345: (:use (com.aurellem.run util)) rlm@345: (:import [com.aurellem.gb.gb_driver SaveState])) rlm@345: rlm@345: rlm@345: ;; special thanks to http://tasvideos.org/2913S.html for revealing rlm@345: ;; 0xD364 as the floor-map warp location rlm@345: rlm@345: rlm@345: (def mat-warp-address 0xD364) rlm@345: rlm@345: (defn view-warp-id [warp-id] rlm@345: (->> rlm@345: [[] (set-memory (at-mat) mat-warp-address warp-id)] rlm@345: (do-nothing 20) rlm@345: (play-moves [↓]) rlm@345: (do-nothing 100))) rlm@345: rlm@345: (defn iterate-locations [start] rlm@345: (dorun rlm@345: (map rlm@345: #(do rlm@345: (printf "0x%02X\n" %) rlm@345: (view-warp-id %) rlm@345: (Thread/sleep 10000)) rlm@345: (range start (inc 0xFF))))) rlm@345: rlm@345: rlm@345: (comment rlm@345: 0x00 pallet-town-home rlm@345: 0x01 viridian-poke-center rlm@345: 0x02 pewter-science-meuseum rlm@345: 0x03 cereluan-dig-house rlm@345: 0x04 lavender-town-poke-center rlm@345: 0x05 vermillion-poke-center rlm@345: 0x06 celedon-department-store !!!!!!!!!!! rlm@345: 0x07 fuchia-mart rlm@345: 0x08 cinnibar-mansion rlm@345: 0x09 elite-four-HQ rlm@345: 0x0A saffron-mimic-house rlm@345: 0x0B CRASHING GLITCH rlm@345: 0x0C route-1-inside-junk rlm@345: 0x0D diglett-cave-vermillion-side rlm@345: 0x0E GLITCH rlm@345: 0x0F poke-center-outside-mt-moon rlm@345: 0x10 cereullean->saffron rlm@345: 0x11 GLITCH rlm@345: 0x12 saffron->celadon rlm@345: 0x13 saffron->lavendar rlm@345: 0x14 GLITCH rlm@345: 0x15 poke-center-by-rock-tunnel rlm@345: 0x16 vermillion->lavender rlm@345: 0x17 lavender->fuchia rlm@345: 0x18 GLITCH rlm@345: 0x19 GLITCH rlm@345: 0x1A unknown rlm@345: 0x1B cycling-road->celadon rlm@345: 0x1C GLITCH rlm@345: 0x1D cycling-road->fuschia rlm@345: 0x1E surfing-house rlm@345: 0x1F seafom-island-cinnabar-side rlm@345: 0x20 GLITCH rlm@345: 0x21 indigo-plateu-gate rlm@345: 0x22 plateau-path-start rlm@345: 0x23 GLITCH rlm@345: 0x24 bills-house rlm@345: 0x25 house-again rlm@345: 0x26 stairs-to-house rlm@345: 0x27 gary's-house rlm@345: 0x28 oak's-lab rlm@345: 0x29 poke-center-unknown rlm@345: 0x2A inside-viridian-mart rlm@345: 0x2B viridian-school-house rlm@345: 0x2C unknown rlm@345: 0x2D viridian-gym rlm@345: 0x2E diglett's-cave-unknown-side rlm@345: 0x2F glitched-viridian-forest-entrance rlm@345: 0x30 unknown rlm@345: 0x31 unknown rlm@345: 0x32 unknown rlm@345: 0x33 viridian-forest-pewter-side rlm@345: 0x34 pewter-meuseum-first-floor rlm@345: 0x35 pweter-meuseum-second-floor rlm@345: 0x36 pewter-gym rlm@345: 0x37 unknown-house rlm@345: 0x38 unknown-mart rlm@345: 0x39 unknown-house rlm@345: 0x3A inside-pewter-poke-center rlm@345: 0x3B inside-mt-moon-entrance rlm@345: 0x3C mt-moon-unknown rlm@345: 0x3D mt-moon-unknown rlm@345: 0x3E inside-dig-house-cereulan? rlm@345: 0x3F inside-bulbasaur-house-cerulean rlm@345: 0x40 unknown-poke-center rlm@345: 0x41 cereulan-gym rlm@345: 0x42 inside-bike-shop rlm@345: 0x43 unknown-mart rlm@345: 0x44 unknown-poke-center rlm@345: 0x45 inside-dig-house-cereulan? rlm@345: 0x46 unknown-guard-path rlm@345: 0x47 unknown-undeground-path-entrance rlm@345: 0x48 unknown-house rlm@345: 0x49 unknown-undeground-path-entrance rlm@345: 0x4A unknown-undeground-path-entrance rlm@345: 0x4B unknown-undeground-path-entrance rlm@345: 0x4C unknown-guard-path rlm@345: 0x4D unknown-undeground-path-entrance rlm@345: 0x4E unknown-undeground-path-entrance rlm@345: 0x4F unknown-guard-path rlm@345: 0x50 unknown-undeground-path-entrance rlm@345: 0x51 unknown-poke-center rlm@345: 0x52 mt-moon-unknown rlm@345: 0x53 inside-power-plant-start rlm@345: 0x54 unknown-guard-path rlm@345: 0x55 diglet's-cave-vermillion-entrange rlm@345: 0x56 unknown-2nd-floor-guard-path rlm@345: 0x57 unknown-guard-path rlm@345: 0x58 inside-bill's-house rlm@345: 0x59 unknown-poke-center rlm@345: 0x5A inside-pokemon-fan-club rlm@345: 0x5B unknown-mart rlm@345: 0x5C unknown-gym? rlm@345: 0x5D unknown-house rlm@345: 0x5E s.s.anne-catwalk rlm@345: 0x5F s.s.anne-entrance rlm@345: 0x60 unknown-ss-anne-door rlm@345: 0x61 unknown-ss-anne rlm@345: 0x62 unknown-ss-anne rlm@345: 0x63 ss-anne-bow rlm@345: 0x64 ss-anne-cafeteria rlm@345: 0x65 ss-anne-inside-captian's-room rlm@345: 0x66 ss-anne-inside-room rlm@345: 0x67 ss-anne-inside-room rlm@345: 0x68 ss-anne-inside-room rlm@345: 0x69 CRASHING GLITCH rlm@345: 0x6A CRASHING GLITCH rlm@345: 0x6B CRASHING GLITCH rlm@345: 0x6C moltres-cave-entrance rlm@345: 0x6D CRASHING GLITCH rlm@345: 0x6E CRASHING GLITCH rlm@345: 0x6F CRASHING GLITCH rlm@345: 0x70 CRASHING GLITCH rlm@345: 0x71 unknown-ss-anne rlm@345: 0x72 CRASHING GLITCH rlm@345: 0x73 CRASHING GLITCH rlm@345: 0x74 CRASHING GLITCH rlm@345: 0x75 CRASHING GLITCH rlm@345: 0x76 elite-four-hall-of-fame rlm@345: 0x77 unknown-inside-underground-tunnel rlm@345: 0x78 unknown rlm@345: 0x79 unknown-inside-underground-tunnel rlm@345: 0x7A unknown rlm@345: 0x7B unknown-celadon-dept-store-floor ! rlm@345: 0x7C unknown-celadon-dept-store-floor ! rlm@345: 0x7D unknown-celadon-dept-store-floor ! rlm@345: 0x7E celedon-dept-roof ! rlm@345: 0x7F celadon-dept-elevator rlm@345: 0x80 celadon-pokemon-mansion-first-floor rlm@345: 0x81 celadon-pokemon-mansion-second-floor rlm@345: 0x82 celadon-pokemon-mansion-third-floor(computers) rlm@345: 0x83 celadon-pokemon-mansion-boring-roof rlm@345: 0x84 celadon-pokemon-mansion-eevee-room rlm@345: 0x85 unknown-poke-center rlm@345: 0x86 inside-celadon-gym rlm@345: 0x87 inside-celadon-game-corner rlm@345: 0x88 unknown-celadon-dept-store-floor ! rlm@345: 0x89 celadon-game-corner-prize-claim rlm@345: 0x8A celadon-cafeteria rlm@345: 0x8B celadon-rocket-house rlm@345: 0x8C unknown-poke-center (maybe celadon?) rlm@345: 0x8D unknown-poke-venter (maybe celadon hotel?) rlm@345: 0x8E unknown-pokemon-tower rlm@345: 0x8F unknown-pokemon-tower rlm@345: 0x90 unknown-pokemon-tower rlm@345: 0x91 unknown-pokemon-tower rlm@345: 0x92 unknown-pokemon-tower rlm@345: 0x93 unknown-pokemon-tower rlm@345: 0x94 unknown-pokemon-tower rlm@345: 0x95 inside-fiji's-house rlm@345: 0x96 unknown-mart rlm@345: 0x97 unknown-house rlm@345: 0x98 unknown-mart rlm@345: 0x99 unknown-house rlm@345: 0x9A unknown-poke-center rlm@345: 0x9B inside-game-warden's-house rlm@345: 0x9C inside-safari-zone-gate rlm@345: 0x9D vermillion-gym rlm@345: 0x9E unknown-fuscia rlm@345: 0x9F unknown-cave rlm@345: 0xA0 unknown-cave rlm@345: 0xA1 unknown-moltres-cave rlm@345: 0xA2 unknown-seafoam-cave rlm@345: 0xA3 unknown-fishing-guru-house rlm@345: 0xA4 cereulan-house rlm@345: 0xA5 cinibar-mansion-first-floor rlm@345: 0xA6 saffron-gym rlm@345: 0xA7 cinibar-fossil-regen-lab-entrance rlm@345: 0xA8 unknown-house rlm@345: 0xA9 cinibar-fossil-regen-room rlm@345: 0xAA cinibar-fossil-regen-regen-room rlm@345: 0xAB unknown-poke-center rlm@345: 0xAC unknown-mart rlm@345: 0xAD unknown-mart rlm@345: 0xAE eilte-four-poke-center rlm@345: 0xAF glitched-house rlm@345: 0xB0 mimic's-room rlm@345: 0xB1 inside-fighting-dojo rlm@345: 0xB2 saffron-gym rlm@345: 0xB3 unknown-house (lavender?) rlm@345: 0xB4 unknown-mart rlm@345: 0xB5 sliph-co-first-floor rlm@345: 0xB6 unknown-poke-center rlm@345: 0xB7 unknown-house rlm@345: 0xB8 unknown-guard-path rlm@345: 0xB9 unknown-guard-path-2nd-floor rlm@345: 0xBA unknown-guard-path rlm@345: 0xBB unknown-guard-path-2nd-floor rlm@345: 0xBC unknown-house rlm@345: 0xBD unknown-house (fishing guru?) rlm@345: 0xBE unknown-guard-path rlm@345: 0xBF unknown-guard-path-2nd-floor rlm@345: 0xC0 unknown-cave rlm@345: 0xC1 elite-four-gate-entrance rlm@345: 0xC2 unknown-moltres-cave rlm@345: 0xC3 unknown-guard-path-2nd-floor rlm@345: 0xC4 unknown-house rlm@345: 0xC5 unknown-cave rlm@345: 0xC6 unknown-moltres-cave rlm@345: 0xC7 unknown-game-corner rlm@345: 0xC8 unknown-game-corner rlm@345: 0xC9 unknown-game-corner rlm@345: 0xCA unknown-game-corner rlm@345: 0xCB game-corner-elevator rlm@345: 0xCC GLITCH rlm@345: 0xCD GLITCH rlm@345: 0xCE GLITCH rlm@345: 0xCF unknown-silph-co rlm@345: 0xD0 unknown-silph-co rlm@345: 0xD1 unknown-silph-co rlm@345: 0xD2 unknown-silph-co rlm@345: 0xD3 unknown-silph-co rlm@345: 0xD4 unknown-silph-co rlm@345: 0xD5 unknown-silph-co rlm@345: 0xD6 unknown-cinnibar-mansion rlm@345: 0xD7 unknown-cinnibar-mansion rlm@345: 0xD8 unknown-cinnibar-mansion rlm@345: 0xD9 unknown-safari-zone rlm@345: 0xDA unknown-safari-zone rlm@345: 0xDB unknown-safari-zone rlm@345: 0xDC unknown-safari-zone rlm@345: 0xDD unknown-safari-zone-rest-room rlm@345: 0xDE safari-zone-surf-room rlm@345: 0xDF unknown-safari-zone-rest-room rlm@345: 0xE0 unknown-safari-zone-rest-room rlm@345: 0xE1 unknown-safari-zone-rest-room rlm@345: 0xE2 unknown-mewtwo-cave rlm@345: 0xE3 unknown-mewtwo-cave rlm@345: 0xE4 mewtwo-cave-entrance rlm@345: 0xE5 unknown-house rlm@345: 0xE6 cereulan-badge-description-room rlm@345: 0xE7 CRASHING GLITCH rlm@345: 0xE8 unknown-cave rlm@345: 0xE9 unknown-silph-co rlm@345: 0xEA unknown-silph-co rlm@345: 0xEB silph-co-boring-top-floor rlm@345: 0xEC silph-co-elevator rlm@345: 0xED GLITCH rlm@345: 0xEE GLITCH rlm@345: 0xEF GLITCH rlm@345: 0xF0 GLITCH rlm@345: 0xF1 GLITCH rlm@345: 0xF2 GLITCH rlm@345: 0xF3 GLITCH rlm@345: 0xF4 GLITCH rlm@345: 0xF5 loreli-room rlm@345: 0xF6 bruno-room rlm@345: 0xF7 agatha-room rlm@345: 0xF8 inside-surfing-room rlm@345: 0xF9 GLITCH (dark) rlm@345: 0xFA GLITCH (dark) rlm@345: 0xFB CRASHING GLITCH rlm@345: 0xFC GLITCH (dark) rlm@345: 0xFD CRASHING GLITCH rlm@345: 0xFE CRASHING GLITCH rlm@345: 0xFF CRASHING GLITCH rlm@345: rlm@345: rlm@345: )