view clojure/com/aurellem/gb/transit.clj @ 573:40f62391db9d

implemented row and column increment logic.
author Robert McIntyre <rlm@mit.edu>
date Sat, 01 Sep 2012 03:56:30 -0500
parents ecdbfa1fc51f
children
line wrap: on
line source
1 (ns com.aurellem.gb.transit
2 (:use (com.aurellem.gb gb-driver util constants))
3 (:import [com.aurellem.gb.gb_driver SaveState]))
6 ;; conducted experiments with this variable in the
7 ;; following places.
9 0xD367 = 00000110 ;; inside-building
11 0xD367 = 00001001 ;; wilderness outside Celadon
13 0xD367 = 00010010 ;; inside cave
15 0xD367 = 00001001 ;; inside pokeon-tower
17 0xD367 = 00110110 ;; fishing peer not by water
19 0xD367 = 00110110 ;; fishing peer waters edge
21 0xD367 = 00110110 ;; in battle at fishing peer
23 0xD367 = 00010010 ;; at Cerulean
25 ;; setting it to zero does not affect teleport
26 ;; setting it to 0xFF does not affect teleport
27 ;; conclusion -- 0xD367 is position related but does not control
28 ;; transit moves/items
31 ;; try the same with 0xD366
33 0xD366 = 00000000 ;; at Cerulean
34 0xD366 = 00010001 ;; in Rock Tunnel
35 0xD366 = 00001111 ;; in poke tower floor 1
36 0xD366 = 00000110 ;; in poke center
38 ;; 0xFF disables fly, dig, teleport, rope
39 ;; 0x00 enables fly, teleport, disables dig, rope
41 ;; in cereluan
42 ;; set to 00000100 disables doors, ledges, fly, teleport
43 ;; set to 00000010 disables doors, ledges, fly, teleport
45 ;; in poke-center
46 ;; set to 00000010 disables fly, teleport, dig, rope
47 ;; set to 00000100 disables fly, teleport, dig, rope
48 ;; set to 00000000 enables fly, teleport
49 ;; set to 00010001 changes colormap to brown,
50 ;; enables rope, dig
51 ;; disables fly, teleport
55 ;; teleport, fly, rope, and dig seem to not be independent of the
56 ;; current map.