Mercurial > vba-clojure

annotate clojure/com/aurellem/gb/transit.clj @ 230:fe26776e1a58

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
working on map memory, modified view-memory to output hex and decimal as well as binary
author Robert McIntyre <rlm@mit.edu>
date Sat, 24 Mar 2012 14:42:34 -0500
parents 30f4fc9b1747
children ecdbfa1fc51f
rev   line source
rlm@229 1 (ns com.aurellem.gb.transit
rlm@229 2 (:use (com.aurellem.gb gb-driver util constants))
rlm@229 3 (:import [com.aurellem.gb.gb_driver SaveState]))
rlm@229 4
rlm@229 5
rlm@229 6 ;; conducted experiments with this variable in the
rlm@229 7 ;; following places.
rlm@229 8
rlm@229 9 0xD367 = 00000110 ;; inside-building
rlm@229 10
rlm@230 11 0xD367 = 00001001 ;; wilderness outside Celadon
rlm@229 12
rlm@229 13 0xD367 = 00010010 ;; inside cave
rlm@229 14
rlm@229 15 0xD367 = 00001001 ;; inside pokeon-tower
rlm@229 16
rlm@229 17 0xD367 = 00110110 ;; fishing peer not by water
rlm@229 18
rlm@229 19 0xD367 = 00110110 ;; fishing peer waters edge
rlm@229 20
rlm@230 21 0xD367 = 00110110 ;; in battle at fishing peer
rlm@230 22
rlm@230 23 0xD367 = 00010010 ;; at Cerulean
rlm@230 24
rlm@230 25 ;; setting it to zero does not affect teleport
rlm@230 26 ;; setting it to 0xFF does not affect teleport
rlm@230 27 ;; conclusion -- 0xD367 is position related but does not control
rlm@230 28 ;; transit moves/items
rlm@230 29
rlm@230 30
rlm@230 31 ;; try the same with 0xD366
rlm@230 32
rlm@230 33 0xD366 = 00000000 ;; at Cerulean
rlm@230 34 0xD366 = 00010001 ;; in Rock Tunnel
rlm@230 35 0xD366 = 00001111 ;; in poke tower floor 1
rlm@230 36 0xD366 = 00000110 ;; in poke center
rlm@230 37
rlm@230 38 ;; 0xFF disables fly, dig, teleport, rope
rlm@230 39 ;; 0x00 enables fly, teleport, disables dig, rope
rlm@230 40
rlm@230 41 ;; in cereluan
rlm@230 42 ;; set to 00000100 disables doors, ledges, fly, teleport
rlm@230 43 ;; set to 00000010 disables doors, ledges, fly, teleport
rlm@230 44
rlm@230 45 ;; in poke-center
rlm@230 46 ;; set to 00000010 disables fly, teleport, dig, rope
rlm@230 47 ;; set to 00000100 disables fly, teleport, dig, rope
rlm@230 48 ;; set to 00000000 enables fly, teleport
rlm@230 49 ;; set to 00010001 changes colormap to brown,
rlm@230 50 ;; enables rope, dig
rlm@230 51 ;; disables fly, teleport
rlm@230 52