Welcome to Data Crystal's new home! Data Crystal is now part of the TCRF family (sort of).
The wiki has recently moved; please report any issues in Discord. Pardon the dust.
The wiki has recently moved; please report any issues in Discord. Pardon the dust.
Dragon Warrior II (NES)/ROM map/ASM bank 0F
< Dragon Warrior II (NES) | ROM map(Redirected from Dragon Warrior II::ROM map/ASM bank 0F)
Jump to navigation
Jump to search
This is a sub-page of Dragon Warrior II (NES)/ROM map.
- bank 0x0F of 16 starts at file address 0x03C010
; code bytes: $3C56 (94.27% of bytes in this ROM bank) ; data bytes: $035F (5.27% of bytes in this ROM bank) ; pcm bytes: $0000 (0.00% of bytes in this ROM bank) ; chr bytes: $0000 (0.00% of bytes in this ROM bank) ; free bytes: $0023 (0.21% of bytes in this ROM bank) ; unknown bytes: $002A (0.26% of bytes in this ROM bank) ; $003B bytes last seen in RAM bank $8000 - $BFFF (0.36% of bytes seen in this ROM bank, 0.36% of bytes in this ROM bank): ; $002E code bytes (77.97% of bytes seen in this RAM bank, 0.28% of bytes in this ROM bank) ; $000D data bytes (22.03% of bytes seen in this RAM bank, 0.08% of bytes in this ROM bank) ; $3F78 bytes last seen in RAM bank $C000 - $FFFF (99.64% of bytes seen in this ROM bank, 99.17% of bytes in this ROM bank): ; $3C28 code bytes (94.78% of bytes seen in this RAM bank, 93.99% of bytes in this ROM bank) ; $0352 data bytes (5.23% of bytes seen in this RAM bank, 5.19% of bytes in this ROM bank) ; PRG Bank 0x0F: the fixed bank, contains a little bit of everything ; [bank start] -> code ; NMI vector ; indirect control flow target (via $FFFA) 0x03C010|$0F:$C000:78 SEI 0x03C011|$0F:$C001:48 PHA 0x03C012|$0F:$C002:98 TYA 0x03C013|$0F:$C003:48 PHA 0x03C014|$0F:$C004:8A TXA 0x03C015|$0F:$C005:48 PHA 0x03C016|$0F:$C006:AD 07 60 LDA $6007 0x03C019|$0F:$C009:D0 0A BNE $C015 0x03C01B|$0F:$C00B:A5 93 LDA $93 ; NMI counter, decremented once per NMI until it reaches 0 0x03C01D|$0F:$C00D:F0 02 BEQ $C011 0x03C01F|$0F:$C00F:C6 93 DEC $93 ; NMI counter, decremented once per NMI until it reaches 0 ; control flow target (from $C00D) 0x03C021|$0F:$C011:A4 00 LDY $00 0x03C023|$0F:$C013:10 03 BPL $C018 ; control flow target (from $C009) 0x03C025|$0F:$C015:4C C3 C0 JMP $C0C3 ; control flow target (from $C013) 0x03C028|$0F:$C018:AD 45 61 LDA $6145 0x03C02B|$0F:$C01B:10 03 BPL $C020 0x03C02D|$0F:$C01D:4C 48 C1 JMP $C148 ; control flow target (from $C01B) 0x03C030|$0F:$C020:A4 00 LDY $00 0x03C032|$0F:$C022:F0 5C BEQ $C080 0x03C034|$0F:$C024:88 DEY 0x03C035|$0F:$C025:F0 59 BEQ $C080 0x03C037|$0F:$C027:88 DEY ; control flow target (from $C07C) 0x03C038|$0F:$C028:B9 38 C1 LDA $C138,Y 0x03C03B|$0F:$C02B:8D 06 20 STA $2006 ; VRAM Address Register #2 (write twice; $2007 address) 0x03C03E|$0F:$C02E:C8 INY 0x03C03F|$0F:$C02F:B9 38 C1 LDA $C138,Y 0x03C042|$0F:$C032:8D 06 20 STA $2006 ; VRAM Address Register #2 (write twice; $2007 address) 0x03C045|$0F:$C035:C8 INY 0x03C046|$0F:$C036:A9 5F LDA #$5F 0x03C048|$0F:$C038:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C04B|$0F:$C03B:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C04E|$0F:$C03E:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C051|$0F:$C041:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C054|$0F:$C044:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C057|$0F:$C047:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C05A|$0F:$C04A:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C05D|$0F:$C04D:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C060|$0F:$C050:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C063|$0F:$C053:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C066|$0F:$C056:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C069|$0F:$C059:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C06C|$0F:$C05C:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C06F|$0F:$C05F:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C072|$0F:$C062:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C075|$0F:$C065:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C078|$0F:$C068:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C07B|$0F:$C06B:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C07E|$0F:$C06E:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C081|$0F:$C071:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C084|$0F:$C074:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C087|$0F:$C077:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C08A|$0F:$C07A:C0 10 CPY #$10 0x03C08C|$0F:$C07C:D0 AA BNE $C028 0x03C08E|$0F:$C07E:F0 31 BEQ $C0B1 ; control flow target (from $C022, $C025) 0x03C090|$0F:$C080:AD 83 01 LDA $0183 0x03C093|$0F:$C083:F0 03 BEQ $C088 0x03C095|$0F:$C085:4C A0 C1 JMP $C1A0 ; control flow target (from $C083) 0x03C098|$0F:$C088:A5 02 LDA $02 0x03C09A|$0F:$C08A:C9 18 CMP #$18 0x03C09C|$0F:$C08C:B0 05 BCS $C093 0x03C09E|$0F:$C08E:A9 02 LDA #$02 0x03C0A0|$0F:$C090:8D 14 40 STA $4014 ; Sprite DMA Register (copy $100 bytes from $100 * N) ; control flow target (from $C08C) 0x03C0A3|$0F:$C093:A2 00 LDX #$00 ; control flow target (from $C0AE) 0x03C0A5|$0F:$C095:E4 02 CPX $02 0x03C0A7|$0F:$C097:F0 18 BEQ $C0B1 0x03C0A9|$0F:$C099:BD 00 03 LDA $0300,X ; PPU write buffer start 0x03C0AC|$0F:$C09C:8D 06 20 STA $2006 ; VRAM Address Register #2 (write twice; $2007 address) 0x03C0AF|$0F:$C09F:E8 INX 0x03C0B0|$0F:$C0A0:BD 00 03 LDA $0300,X ; PPU write buffer start 0x03C0B3|$0F:$C0A3:8D 06 20 STA $2006 ; VRAM Address Register #2 (write twice; $2007 address) 0x03C0B6|$0F:$C0A6:E8 INX 0x03C0B7|$0F:$C0A7:BD 00 03 LDA $0300,X ; PPU write buffer start 0x03C0BA|$0F:$C0AA:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C0BD|$0F:$C0AD:E8 INX 0x03C0BE|$0F:$C0AE:4C 95 C0 JMP $C095 ; control flow target (from $C07E, $C097, $C19D, $C1D9) 0x03C0C1|$0F:$C0B1:A9 00 LDA #$00 0x03C0C3|$0F:$C0B3:85 01 STA $01 0x03C0C5|$0F:$C0B5:85 02 STA $02 0x03C0C7|$0F:$C0B7:8D 83 01 STA $0183 0x03C0CA|$0F:$C0BA:20 03 C1 JSR $C103 0x03C0CD|$0F:$C0BD:A9 00 LDA #$00 0x03C0CF|$0F:$C0BF:85 00 STA $00 0x03C0D1|$0F:$C0C1:E6 03 INC $03 ; game clock? ; control flow target (from $C015) 0x03C0D3|$0F:$C0C3:20 0B C6 JSR $C60B ; initialize MMC control mode and CHR banks 0x03C0D6|$0F:$C0C6:A9 03 LDA #$03 0x03C0D8|$0F:$C0C8:20 D8 C3 JSR $C3D8 ; CLI and load bank specified by A ; call to code in a different bank ($03:$8000) 0x03C0DB|$0F:$C0CB:20 00 80 JSR $8000 0x03C0DE|$0F:$C0CE:AD F6 05 LDA $05F6 ; current bank 0x03C0E1|$0F:$C0D1:20 D8 C3 JSR $C3D8 ; CLI and load bank specified by A 0x03C0E4|$0F:$C0D4:BA TSX ; ummm... skipping X/Y/A on stack, if second caller is $FFC0 - $FFD4 inclusive, mess around with stack, pull X/Y/A, clobber A with current bank, and RTI ; else pull X/Y/A and RTI 0x03C0E5|$0F:$C0D5:BD 06 01 LDA $0106,X 0x03C0E8|$0F:$C0D8:C9 FF CMP #$FF 0x03C0EA|$0F:$C0DA:D0 21 BNE $C0FD 0x03C0EC|$0F:$C0DC:BD 05 01 LDA $0105,X 0x03C0EF|$0F:$C0DF:C9 C0 CMP #$C0 0x03C0F1|$0F:$C0E1:90 1A BCC $C0FD 0x03C0F3|$0F:$C0E3:C9 D5 CMP #$D5 0x03C0F5|$0F:$C0E5:B0 16 BCS $C0FD 0x03C0F7|$0F:$C0E7:A9 04 LDA #$04 0x03C0F9|$0F:$C0E9:1D 04 01 ORA $0104,X 0x03C0FC|$0F:$C0EC:9D 04 01 STA $0104,X 0x03C0FF|$0F:$C0EF:A9 C0 LDA #$C0 0x03C101|$0F:$C0F1:9D 05 01 STA $0105,X 0x03C104|$0F:$C0F4:68 PLA 0x03C105|$0F:$C0F5:AA TAX 0x03C106|$0F:$C0F6:68 PLA 0x03C107|$0F:$C0F7:A8 TAY 0x03C108|$0F:$C0F8:68 PLA 0x03C109|$0F:$C0F9:AD F6 05 LDA $05F6 ; current bank 0x03C10C|$0F:$C0FC:40 RTI ; control flow target (from $C0DA, $C0E1, $C0E5) 0x03C10D|$0F:$C0FD:68 PLA 0x03C10E|$0F:$C0FE:AA TAX 0x03C10F|$0F:$C0FF:68 PLA 0x03C110|$0F:$C100:A8 TAY 0x03C111|$0F:$C101:68 PLA 0x03C112|$0F:$C102:40 RTI ; control flow target (from $C0BA) 0x03C113|$0F:$C103:A9 3F LDA #$3F 0x03C115|$0F:$C105:8D 06 20 STA $2006 ; VRAM Address Register #2 (write twice; $2007 address) 0x03C118|$0F:$C108:A9 00 LDA #$00 0x03C11A|$0F:$C10A:8D 06 20 STA $2006 ; VRAM Address Register #2 (write twice; $2007 address) 0x03C11D|$0F:$C10D:A5 30 LDA $30 0x03C11F|$0F:$C10F:29 0F AND #$0F 0x03C121|$0F:$C111:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C124|$0F:$C114:A9 00 LDA #$00 0x03C126|$0F:$C116:8D 06 20 STA $2006 ; VRAM Address Register #2 (write twice; $2007 address) 0x03C129|$0F:$C119:8D 06 20 STA $2006 ; VRAM Address Register #2 (write twice; $2007 address) 0x03C12C|$0F:$C11C:A5 04 LDA $04 0x03C12E|$0F:$C11E:D0 05 BNE $C125 0x03C130|$0F:$C120:AD AE 61 LDA $61AE 0x03C133|$0F:$C123:D0 03 BNE $C128 ; control flow target (from $C11E) 0x03C135|$0F:$C125:AD AF 61 LDA $61AF ; control flow target (from $C123) 0x03C138|$0F:$C128:09 80 ORA #$80 0x03C13A|$0F:$C12A:8D 00 20 STA $2000 ; PPU Control Register #1 (#$80: Execute NMI on VBlank, #$40: unused, #$20: Sprite Size [8x8/8x16], #$10: Background Pattern Table Address [$0000/$1000], #$08: Sprite Pattern Table Address [$0000/$1000], #$04: PPU Address Increment [1/32], #$03: Name Table Address [$2000/$2400/$2800/$2C00]) 0x03C13D|$0F:$C12D:A5 05 LDA $05 0x03C13F|$0F:$C12F:8D 05 20 STA $2005 ; VRAM Address Register #1 (write twice; BG scroll) 0x03C142|$0F:$C132:A5 06 LDA $06 0x03C144|$0F:$C134:8D 05 20 STA $2005 ; VRAM Address Register #1 (write twice; BG scroll) 0x03C147|$0F:$C137:60 RTS ; code -> data ; PPU addresses ; indexed data load target (from $C028, $C02F) 0x03C148|$0F:$C138:22 65 0x03C14A|$0F:$C13A:22 85 0x03C14C|$0F:$C13C:22 A5 0x03C14E|$0F:$C13E:22 C5 0x03C150|$0F:$C140:22 E5 0x03C152|$0F:$C142:23 05 0x03C154|$0F:$C144:23 25 0x03C156|$0F:$C146:23 45 ; data -> code ; control flow target (from $C01D) 0x03C158|$0F:$C148:A2 00 LDX #$00 0x03C15A|$0F:$C14A:A4 01 LDY $01 0x03C15C|$0F:$C14C:F0 4C BEQ $C19A ; control flow target (from $C198) 0x03C15E|$0F:$C14E:BD 00 03 LDA $0300,X ; PPU write buffer start 0x03C161|$0F:$C151:8D 06 20 STA $2006 ; VRAM Address Register #2 (write twice; $2007 address) 0x03C164|$0F:$C154:BD 01 03 LDA $0301,X 0x03C167|$0F:$C157:8D 06 20 STA $2006 ; VRAM Address Register #2 (write twice; $2007 address) 0x03C16A|$0F:$C15A:BD 02 03 LDA $0302,X 0x03C16D|$0F:$C15D:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C170|$0F:$C160:BD 03 03 LDA $0303,X 0x03C173|$0F:$C163:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C176|$0F:$C166:BD 00 03 LDA $0300,X ; PPU write buffer start 0x03C179|$0F:$C169:8D 06 20 STA $2006 ; VRAM Address Register #2 (write twice; $2007 address) 0x03C17C|$0F:$C16C:BD 01 03 LDA $0301,X 0x03C17F|$0F:$C16F:09 20 ORA #$20 0x03C181|$0F:$C171:8D 06 20 STA $2006 ; VRAM Address Register #2 (write twice; $2007 address) 0x03C184|$0F:$C174:BD 04 03 LDA $0304,X 0x03C187|$0F:$C177:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C18A|$0F:$C17A:BD 05 03 LDA $0305,X 0x03C18D|$0F:$C17D:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C190|$0F:$C180:BD 06 03 LDA $0306,X 0x03C193|$0F:$C183:8D 06 20 STA $2006 ; VRAM Address Register #2 (write twice; $2007 address) 0x03C196|$0F:$C186:BD 07 03 LDA $0307,X 0x03C199|$0F:$C189:8D 06 20 STA $2006 ; VRAM Address Register #2 (write twice; $2007 address) 0x03C19C|$0F:$C18C:BD 08 03 LDA $0308,X 0x03C19F|$0F:$C18F:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C1A2|$0F:$C192:8A TXA 0x03C1A3|$0F:$C193:18 CLC 0x03C1A4|$0F:$C194:69 09 ADC #$09 0x03C1A6|$0F:$C196:AA TAX 0x03C1A7|$0F:$C197:88 DEY 0x03C1A8|$0F:$C198:D0 B4 BNE $C14E ; control flow target (from $C14C) 0x03C1AA|$0F:$C19A:8C 45 61 STY $6145 0x03C1AD|$0F:$C19D:4C B1 C0 JMP $C0B1 ; control flow target (from $C085) 0x03C1B0|$0F:$C1A0:A2 00 LDX #$00 0x03C1B2|$0F:$C1A2:AD 02 20 LDA $2002 ; PPU Status Register (#$80: In VBlank, #$40: Sprite #0 Hit, #$20: Scanline Sprite Count > 8, #$10: Ignore VRAM Writes); after read, #$80 and $2005-$2006 are reset 0x03C1B5|$0F:$C1A5:A5 02 LDA $02 0x03C1B7|$0F:$C1A7:F0 26 BEQ $C1CF ; control flow target (from $C1CD) 0x03C1B9|$0F:$C1A9:A0 01 LDY #$01 0x03C1BB|$0F:$C1AB:BD 00 03 LDA $0300,X ; PPU write buffer start 0x03C1BE|$0F:$C1AE:10 04 BPL $C1B4 0x03C1C0|$0F:$C1B0:E8 INX 0x03C1C1|$0F:$C1B1:BC 00 03 LDY $0300,X ; PPU write buffer start ; control flow target (from $C1AE) 0x03C1C4|$0F:$C1B4:E8 INX 0x03C1C5|$0F:$C1B5:29 3F AND #$3F 0x03C1C7|$0F:$C1B7:8D 06 20 STA $2006 ; VRAM Address Register #2 (write twice; $2007 address) 0x03C1CA|$0F:$C1BA:BD 00 03 LDA $0300,X ; PPU write buffer start 0x03C1CD|$0F:$C1BD:E8 INX 0x03C1CE|$0F:$C1BE:8D 06 20 STA $2006 ; VRAM Address Register #2 (write twice; $2007 address) ; control flow target (from $C1C9) 0x03C1D1|$0F:$C1C1:BD 00 03 LDA $0300,X ; PPU write buffer start 0x03C1D4|$0F:$C1C4:E8 INX 0x03C1D5|$0F:$C1C5:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C1D8|$0F:$C1C8:88 DEY 0x03C1D9|$0F:$C1C9:D0 F6 BNE $C1C1 0x03C1DB|$0F:$C1CB:C6 01 DEC $01 0x03C1DD|$0F:$C1CD:D0 DA BNE $C1A9 ; control flow target (from $C1A7) 0x03C1DF|$0F:$C1CF:AD 08 60 LDA $6008 0x03C1E2|$0F:$C1D2:D0 05 BNE $C1D9 0x03C1E4|$0F:$C1D4:A9 02 LDA #$02 0x03C1E6|$0F:$C1D6:8D 14 40 STA $4014 ; Sprite DMA Register (copy $100 bytes from $100 * N) ; control flow target (from $C1D2) 0x03C1E9|$0F:$C1D9:4C B1 C0 JMP $C0B1 ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF ; control flow target (from $C1EE, $C22C, $C23F, $C30A, $C3E8, $C421, $C465, $C595, $C67D, $C747, $C7EC, $C975, $C9A8, $CCD9, $CFA5, $D0E2, $D13D, $D317, $D48C, $D65B, $D6EE, $D72B, $D73F, $E2B8, $E2CE, $E5EC, $E609, $E660, $E69D, $E6D6, $E6EC, $E719, $E743, $E764, $E7B7, $E7EA, $E817, $E841, $E862, $E972, $E980, $E9F9, $EB6D, $F476, $F862, $F868, $FB05, $FD08, $FD9C) ; external control flow target (from $00:$803C, $00:$807B, $00:$8328, $00:$83A4, $00:$B783, $00:$B80A, $00:$B822, $00:$B95C, $02:$AB9B, $02:$B1FA, $02:$B717, $04:$8CE9, $04:$8D9B, $04:$8DE1, $04:$8E02, $04:$8E05, $04:$8E3F, $04:$8E9A, $04:$8EAE, $04:$8EB1, $04:$8FE7, $04:$902C, $04:$909B, $04:$90B7, $04:$99F9, $04:$9A39, $06:$8048, $06:$8905, $06:$8929, $06:$895F, $06:$8988, $06:$A262, $06:$A270, $06:$A273, $06:$A617, $06:$A620, $06:$A984, $06:$AF9B, $06:$B21B, $07:$81C3, $07:$8654, $07:$86E5, $07:$8715, $07:$8908, $07:$89BD, $07:$89CF, $08:$804F, $08:$8296, $08:$832E, $09:$802D, $09:$8070, $09:$8098, $09:$80CC, $09:$80DD, $09:$82A0, $09:$82EA, $09:$82ED, $09:$8310, $09:$8313, $09:$9E19, $09:$9EFB, $09:$9F59, $09:$9F95, $09:$9FFC, $09:$A02E, $09:$A03F, $09:$A07D, $09:$A0F3, $0A:$8049, $0A:$81DF) 0x03C1EC|$0F:$C1DC:A9 00 LDA #$00 0x03C1EE|$0F:$C1DE:8D 07 60 STA $6007 0x03C1F1|$0F:$C1E1:A9 01 LDA #$01 0x03C1F3|$0F:$C1E3:85 00 STA $00 ; control flow target (from $C1E7) 0x03C1F5|$0F:$C1E5:A5 00 LDA $00 0x03C1F7|$0F:$C1E7:D0 FC BNE $C1E5 0x03C1F9|$0F:$C1E9:A9 FF LDA #$FF 0x03C1FB|$0F:$C1EB:85 00 STA $00 0x03C1FD|$0F:$C1ED:60 RTS ; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF ; control flow target (from $C1F2, $C329, $C520, $C592, $C5A5, $C6A5, $C82C, $C83B, $CAE6, $CC4A, $CD74, $CD83, $D0F9, $D5D7, $FC3A) ; external control flow target (from $00:$B7B5, $00:$B8BF, $04:$9019, $06:$824C, $06:$8A57, $06:$8B01, $06:$96AD, $06:$96C0, $06:$970E, $06:$97CB, $06:$98F5, $06:$9941, $06:$A2EB, $06:$A316, $06:$BBEC, $06:$BC3A, $06:$BC88, $06:$BD1E, $06:$BD76, $06:$BD86, $06:$BD93, $07:$81CB, $07:$81F0, $07:$81F9, $07:$85C8, $07:$863F, $07:$866D, $07:$8672, $07:$867A, $07:$867F, $07:$898F, $09:$8002, $09:$80A4, $09:$80D7, $09:$9E13, $09:$9E4C, $09:$9E5B, $09:$9E62, $09:$9F44, $09:$9FDC, $0A:$801C, $0A:$8024, $0A:$8038) 0x03C1FE|$0F:$C1EE:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03C201|$0F:$C1F1:CA DEX 0x03C202|$0F:$C1F2:D0 FA BNE $C1EE ; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF 0x03C204|$0F:$C1F4:60 RTS ; wait for battle message delay to expire ; control flow target (from $C1F7) ; external control flow target (from $04:$9A13) 0x03C205|$0F:$C1F5:A5 93 LDA $93 ; NMI counter, decremented once per NMI until it reaches 0 0x03C207|$0F:$C1F7:D0 FC BNE $C1F5 ; wait for battle message delay to expire 0x03C209|$0F:$C1F9:60 RTS ; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00 ; control flow target (from $C1FE, $C2C9, $D65E, $D661, $D66F, $D672, $DEBA, $DED7, $DEE7, $DF03, $DF14, $DF3D, $FD26, $FD99) ; external control flow target (from $00:$83AC, $00:$B95F, $02:$B74F, $04:$8D92, $04:$8DD8, $04:$8E91, $04:$909E, $04:$9A36, $06:$8996, $06:$AF73, $06:$B0A9, $07:$897A, $07:$8A90, $09:$8089, $09:$81ED) 0x03C20A|$0F:$C1FA:A6 02 LDX $02 0x03C20C|$0F:$C1FC:E0 C0 CPX #$C0 0x03C20E|$0F:$C1FE:F0 FA BEQ $C1FA ; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00; wait for $02 to not be #$C0 0x03C210|$0F:$C200:A5 08 LDA $08 ; PPU address, high byte 0x03C212|$0F:$C202:9D 00 03 STA $0300,X ; PPU write buffer start 0x03C215|$0F:$C205:E8 INX 0x03C216|$0F:$C206:A5 07 LDA $07 ; PPU address, low byte 0x03C218|$0F:$C208:9D 00 03 STA $0300,X ; PPU write buffer start 0x03C21B|$0F:$C20B:E8 INX 0x03C21C|$0F:$C20C:A5 09 LDA $09 ; PPU tile ID 0x03C21E|$0F:$C20E:9D 00 03 STA $0300,X ; PPU write buffer start 0x03C221|$0F:$C211:E8 INX 0x03C222|$0F:$C212:E6 01 INC $01 0x03C224|$0F:$C214:86 02 STX $02 0x03C226|$0F:$C216:E6 07 INC $07 ; INC 16-bit PPU address $07-$08 0x03C228|$0F:$C218:D0 02 BNE $C21C 0x03C22A|$0F:$C21A:E6 08 INC $08 ; control flow target (from $C218) 0x03C22C|$0F:$C21C:48 PHA 0x03C22D|$0F:$C21D:A9 00 LDA #$00 0x03C22F|$0F:$C21F:8D 83 01 STA $0183 0x03C232|$0F:$C222:68 PLA 0x03C233|$0F:$C223:60 RTS ; control flow target (from $C315) 0x03C234|$0F:$C224:A9 10 LDA #$10 0x03C236|$0F:$C226:D0 24 BNE $C24C ; control flow target (from $C324) ; external control flow target (from $06:$A284, $07:$8668) 0x03C238|$0F:$C228:A9 00 LDA #$00 0x03C23A|$0F:$C22A:F0 20 BEQ $C24C ; external control flow target (from $00:$B92E, $04:$8738, $04:$90D1, $04:$90D7, $04:$A0F5, $06:$866C, $06:$8BF0, $06:$8CC5, $06:$9431, $06:$951F, $06:$95F6, $06:$A1ED, $06:$AEB4, $06:$BD53) 0x03C23C|$0F:$C22C:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03C23F|$0F:$C22F:A9 00 LDA #$00 0x03C241|$0F:$C231:85 0C STA $0C 0x03C243|$0F:$C233:A2 02 LDX #$02 0x03C245|$0F:$C235:20 42 C2 JSR $C242 0x03C248|$0F:$C238:A2 00 LDX #$00 0x03C24A|$0F:$C23A:A9 10 LDA #$10 0x03C24C|$0F:$C23C:20 42 C2 JSR $C242 0x03C24F|$0F:$C23F:4C DC C1 JMP $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF ; control flow target (from $C235, $C23C) 0x03C252|$0F:$C242:BC E7 C2 LDY $C2E7,X 0x03C255|$0F:$C245:84 0A STY $0A 0x03C257|$0F:$C247:BC E8 C2 LDY $C2E8,X 0x03C25A|$0F:$C24A:84 0B STY $0B ; control flow target (from $C226, $C22A) 0x03C25C|$0F:$C24C:85 07 STA $07 0x03C25E|$0F:$C24E:A9 3F LDA #$3F 0x03C260|$0F:$C250:85 08 STA $08 0x03C262|$0F:$C252:A0 01 LDY #$01 ; control flow target (from $C266) 0x03C264|$0F:$C254:A5 30 LDA $30 0x03C266|$0F:$C256:29 0F AND #$0F 0x03C268|$0F:$C258:20 BE C2 JSR $C2BE 0x03C26B|$0F:$C25B:20 69 C2 JSR $C269 0x03C26E|$0F:$C25E:20 BB C2 JSR $C2BB 0x03C271|$0F:$C261:20 BB C2 JSR $C2BB 0x03C274|$0F:$C264:C0 0D CPY #$0D 0x03C276|$0F:$C266:D0 EC BNE $C254 0x03C278|$0F:$C268:60 RTS ; control flow target (from $C25B) 0x03C279|$0F:$C269:A5 30 LDA $30 0x03C27B|$0F:$C26B:30 4E BMI $C2BB 0x03C27D|$0F:$C26D:A5 07 LDA $07 0x03C27F|$0F:$C26F:C9 01 CMP #$01 0x03C281|$0F:$C271:D0 48 BNE $C2BB 0x03C283|$0F:$C273:18 CLC 0x03C284|$0F:$C274:08 PHP 0x03C285|$0F:$C275:A2 00 LDX #$00 ; control flow target (from $C2B1) 0x03C287|$0F:$C277:BD 2D 06 LDA $062D,X ; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03C28A|$0F:$C27A:0A ASL 0x03C28B|$0F:$C27B:29 08 AND #$08 0x03C28D|$0F:$C27D:F0 2B BEQ $C2AA 0x03C28F|$0F:$C27F:B0 06 BCS $C287 0x03C291|$0F:$C281:28 PLP 0x03C292|$0F:$C282:A9 26 LDA #$26 0x03C294|$0F:$C284:4C BD C2 JMP $C2BD ; control flow target (from $C27F) 0x03C297|$0F:$C287:BD 30 06 LDA $0630,X ; Midenhall Max HP low byte 0x03C29A|$0F:$C28A:48 PHA 0x03C29B|$0F:$C28B:BD 31 06 LDA $0631,X ; Midenhall Max HP high byte 0x03C29E|$0F:$C28E:4A LSR 0x03C29F|$0F:$C28F:7E 30 06 ROR $0630,X ; Midenhall Max HP low byte 0x03C2A2|$0F:$C292:4A LSR 0x03C2A3|$0F:$C293:7E 30 06 ROR $0630,X ; Midenhall Max HP low byte 0x03C2A6|$0F:$C296:DD 3C 06 CMP $063C,X ; Midenhall Current HP, high byte 0x03C2A9|$0F:$C299:D0 06 BNE $C2A1 0x03C2AB|$0F:$C29B:BD 30 06 LDA $0630,X ; Midenhall Max HP low byte 0x03C2AE|$0F:$C29E:DD 3B 06 CMP $063B,X ; Midenhall Current HP, low byte ; control flow target (from $C299) 0x03C2B1|$0F:$C2A1:68 PLA 0x03C2B2|$0F:$C2A2:9D 30 06 STA $0630,X ; Midenhall Max HP low byte 0x03C2B5|$0F:$C2A5:90 03 BCC $C2AA 0x03C2B7|$0F:$C2A7:28 PLP 0x03C2B8|$0F:$C2A8:38 SEC 0x03C2B9|$0F:$C2A9:08 PHP ; control flow target (from $C27D, $C2A5) 0x03C2BA|$0F:$C2AA:8A TXA 0x03C2BB|$0F:$C2AB:18 CLC 0x03C2BC|$0F:$C2AC:69 12 ADC #$12 0x03C2BE|$0F:$C2AE:AA TAX 0x03C2BF|$0F:$C2AF:C9 36 CMP #$36 0x03C2C1|$0F:$C2B1:90 C4 BCC $C277 0x03C2C3|$0F:$C2B3:28 PLP 0x03C2C4|$0F:$C2B4:90 05 BCC $C2BB 0x03C2C6|$0F:$C2B6:A9 37 LDA #$37 0x03C2C8|$0F:$C2B8:4C BD C2 JMP $C2BD ; control flow target (from $C25E, $C261, $C26B, $C271, $C2B4) 0x03C2CB|$0F:$C2BB:B1 0A LDA ($0A),Y ; control flow target (from $C284, $C2B8) 0x03C2CD|$0F:$C2BD:C8 INY ; control flow target (from $C258) 0x03C2CE|$0F:$C2BE:38 SEC 0x03C2CF|$0F:$C2BF:E5 0C SBC $0C 0x03C2D1|$0F:$C2C1:B0 04 BCS $C2C7 0x03C2D3|$0F:$C2C3:A5 30 LDA $30 0x03C2D5|$0F:$C2C5:29 0F AND #$0F ; control flow target (from $C2C1) 0x03C2D7|$0F:$C2C7:85 09 STA $09 0x03C2D9|$0F:$C2C9:20 FA C1 JSR $C1FA ; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00 0x03C2DC|$0F:$C2CC:60 RTS ; control flow target (from $E32C) ; external control flow target (from $07:$8A76, $09:$815D, $0A:$8134, $0B:$8084) 0x03C2DD|$0F:$C2CD:A0 00 LDY #$00 ; control flow target (from $C2DC) 0x03C2DF|$0F:$C2CF:B1 0E LDA ($0E),Y 0x03C2E1|$0F:$C2D1:99 00 05 STA $0500,Y 0x03C2E4|$0F:$C2D4:B1 10 LDA ($10),Y 0x03C2E6|$0F:$C2D6:99 0D 05 STA $050D,Y 0x03C2E9|$0F:$C2D9:C8 INY 0x03C2EA|$0F:$C2DA:C0 0D CPY #$0D 0x03C2EC|$0F:$C2DC:D0 F1 BNE $C2CF ; external control flow target (from $06:$828A) 0x03C2EE|$0F:$C2DE:A9 30 LDA #$30 0x03C2F0|$0F:$C2E0:85 0C STA $0C 0x03C2F2|$0F:$C2E2:A9 F0 LDA #$F0 0x03C2F4|$0F:$C2E4:4C 09 ; external indexed data load target (from $06:$827F) 0x03C2F6|$0F:$C2E6: C3 JMP $C309 ; code -> data ; indexed data load target (from $C242, $C2FB) 0x03C2F7|$0F:$C2E7:00 ; indexed data load target (from $C247) 0x03C2F8|$0F:$C2E8: 05 ; $0500 ; external data load target (from $06:$A276) 0x03C2F9|$0F:$C2E9:0D ; external data load target (from $06:$A27B) 0x03C2FA|$0F:$C2EA: 05 ; $050D ; data -> code ; control flow target (from $C42E) ; external control flow target (from $06:$8253, $0A:$8114) 0x03C2FB|$0F:$C2EB:A5 3C LDA $3C 0x03C2FD|$0F:$C2ED:C9 30 CMP #$30 0x03C2FF|$0F:$C2EF:D0 08 BNE $C2F9 0x03C301|$0F:$C2F1:A9 00 LDA #$00 0x03C303|$0F:$C2F3:20 D5 C3 JSR $C3D5 ; save A to $05F6, X to $43, and load bank specified by A ; call to code in a different bank ($00:$800F) 0x03C306|$0F:$C2F6:20 0F 80 JSR $800F ; control flow target (from $C2EF) 0x03C309|$0F:$C2F9:A2 03 LDX #$03 ; control flow target (from $C301) 0x03C30B|$0F:$C2FB:BD E7 C2 LDA $C2E7,X 0x03C30E|$0F:$C2FE:95 0E STA $0E,X 0x03C310|$0F:$C300:CA DEX 0x03C311|$0F:$C301:10 F8 BPL $C2FB 0x03C313|$0F:$C303:A9 00 LDA #$00 0x03C315|$0F:$C305:85 0C STA $0C 0x03C317|$0F:$C307:A9 10 LDA #$10 ; control flow target (from $C2E4) 0x03C319|$0F:$C309:48 PHA 0x03C31A|$0F:$C30A:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF ; control flow target (from $C335) 0x03C31D|$0F:$C30D:A5 0E LDA $0E 0x03C31F|$0F:$C30F:85 0A STA $0A 0x03C321|$0F:$C311:A5 0F LDA $0F 0x03C323|$0F:$C313:85 0B STA $0B 0x03C325|$0F:$C315:20 24 C2 JSR $C224 0x03C328|$0F:$C318:A5 0D LDA $0D 0x03C32A|$0F:$C31A:F0 0B BEQ $C327 0x03C32C|$0F:$C31C:A5 10 LDA $10 0x03C32E|$0F:$C31E:85 0A STA $0A 0x03C330|$0F:$C320:A5 11 LDA $11 0x03C332|$0F:$C322:85 0B STA $0B 0x03C334|$0F:$C324:20 28 C2 JSR $C228 ; control flow target (from $C31A) 0x03C337|$0F:$C327:A2 04 LDX #$04 0x03C339|$0F:$C329:20 EE C1 JSR $C1EE ; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF 0x03C33C|$0F:$C32C:68 PLA 0x03C33D|$0F:$C32D:48 PHA 0x03C33E|$0F:$C32E:18 CLC 0x03C33F|$0F:$C32F:65 0C ADC $0C 0x03C341|$0F:$C331:85 0C STA $0C 0x03C343|$0F:$C333:C9 50 CMP #$50 0x03C345|$0F:$C335:90 D6 BCC $C30D 0x03C347|$0F:$C337:68 PLA 0x03C348|$0F:$C338:60 RTS ; 16-bit multiplication: ($10-$11) = ($0C-$0D) * ($0E-$0F); consumes $0C-$0F ; control flow target (from $D692, $E19F, $E472) ; external control flow target (from $02:$B03E, $06:$86B4, $0A:$8171) 0x03C349|$0F:$C339:A9 00 LDA #$00 0x03C34B|$0F:$C33B:85 10 STA $10 0x03C34D|$0F:$C33D:85 11 STA $11 ; control flow target (from $C35C) 0x03C34F|$0F:$C33F:A5 0C LDA $0C 0x03C351|$0F:$C341:05 0D ORA $0D 0x03C353|$0F:$C343:F0 1A BEQ $C35F 0x03C355|$0F:$C345:46 0D LSR $0D 0x03C357|$0F:$C347:66 0C ROR $0C 0x03C359|$0F:$C349:90 0D BCC $C358 0x03C35B|$0F:$C34B:A5 0E LDA $0E 0x03C35D|$0F:$C34D:18 CLC 0x03C35E|$0F:$C34E:65 10 ADC $10 0x03C360|$0F:$C350:85 10 STA $10 0x03C362|$0F:$C352:A5 0F LDA $0F 0x03C364|$0F:$C354:65 11 ADC $11 0x03C366|$0F:$C356:85 11 STA $11 ; control flow target (from $C349) 0x03C368|$0F:$C358:06 0E ASL $0E 0x03C36A|$0F:$C35A:26 0F ROL $0F 0x03C36C|$0F:$C35C:4C 3F C3 JMP $C33F ; control flow target (from $C343) 0x03C36F|$0F:$C35F:60 RTS ; 16-bit division: ($0C-$0D) / ($0E-$0F) = quotient in ($0C-$0D), remainder in ($10-$11) ; external control flow target (from $02:$B063) 0x03C370|$0F:$C360:A0 10 LDY #$10 ; 16 bit logic 0x03C372|$0F:$C362:A9 00 LDA #$00 ; initialize remainder 0x03C374|$0F:$C364:85 10 STA $10 0x03C376|$0F:$C366:85 11 STA $11 ; control flow target (from $C390) 0x03C378|$0F:$C368:06 0C ASL $0C ; 16-bit ASL $0C-$0D into 16-bit $10-$11 0x03C37A|$0F:$C36A:26 0D ROL $0D 0x03C37C|$0F:$C36C:26 10 ROL $10 0x03C37E|$0F:$C36E:26 11 ROL $11 0x03C380|$0F:$C370:E6 0C INC $0C ; assume ($10-$11) >= ($0E-$0F), INC quotient and MOD remainder 0x03C382|$0F:$C372:A5 10 LDA $10 0x03C384|$0F:$C374:38 SEC 0x03C385|$0F:$C375:E5 0E SBC $0E 0x03C387|$0F:$C377:85 10 STA $10 0x03C389|$0F:$C379:A5 11 LDA $11 0x03C38B|$0F:$C37B:E5 0F SBC $0F 0x03C38D|$0F:$C37D:85 11 STA $11 0x03C38F|$0F:$C37F:B0 0E BCS $C38F ; branch if assumption was correct; otherwise undo INC/MOD 0x03C391|$0F:$C381:A5 10 LDA $10 0x03C393|$0F:$C383:65 0E ADC $0E 0x03C395|$0F:$C385:85 10 STA $10 0x03C397|$0F:$C387:A5 11 LDA $11 0x03C399|$0F:$C389:65 0F ADC $0F 0x03C39B|$0F:$C38B:85 11 STA $11 0x03C39D|$0F:$C38D:C6 0C DEC $0C ; control flow target (from $C37F) 0x03C39F|$0F:$C38F:88 DEY 0x03C3A0|$0F:$C390:D0 D6 BNE $C368 ; if more bits to divide, divide them 0x03C3A2|$0F:$C392:60 RTS ; control flow target (from $DF71) 0x03C3A3|$0F:$C393:A0 08 LDY #$08 0x03C3A5|$0F:$C395:A9 00 LDA #$00 ; control flow target (from $C3A6) 0x03C3A7|$0F:$C397:06 0C ASL $0C 0x03C3A9|$0F:$C399:2A ROL 0x03C3AA|$0F:$C39A:E6 0C INC $0C 0x03C3AC|$0F:$C39C:38 SEC 0x03C3AD|$0F:$C39D:E5 0E SBC $0E 0x03C3AF|$0F:$C39F:B0 04 BCS $C3A5 0x03C3B1|$0F:$C3A1:65 0E ADC $0E 0x03C3B3|$0F:$C3A3:C6 0C DEC $0C ; control flow target (from $C39F) 0x03C3B5|$0F:$C3A5:88 DEY 0x03C3B6|$0F:$C3A6:D0 EF BNE $C397 0x03C3B8|$0F:$C3A8:85 10 STA $10 0x03C3BA|$0F:$C3AA:60 RTS ; generate a random number and store it in $32-$33 (two passes) ; control flow target (from $C490, $D685, $D99C) ; external control flow target (from $04:$802D, $04:$80DC, $04:$824F, $04:$97CC, $04:$9880, $04:$A005, $04:$A044, $04:$AEDF, $04:$B078, $04:$B6C1, $04:$B793, $06:$846C, $06:$8744, $06:$8847, $06:$921E, $06:$9B5D, $06:$9BBE, $06:$9C41, $06:$BC6B, $06:$BCE8, $06:$BCF4, $06:$BD0E, $09:$9E5E) 0x03C3BB|$0F:$C3AB:A9 FF LDA #$FF 0x03C3BD|$0F:$C3AD:85 0C STA $0C 0x03C3BF|$0F:$C3AF:20 B6 C3 JSR $C3B6 ; generate a random number and store it in $32-$33 (one pass) 0x03C3C2|$0F:$C3B2:A9 FF LDA #$FF 0x03C3C4|$0F:$C3B4:85 0C STA $0C ; generate a random number and store it in $32-$33 (one pass) ; control flow target (from $C3AF) ; external control flow target (from $06:$ACC6) 0x03C3C6|$0F:$C3B6:A0 08 LDY #$08 ; control flow target (from $C3D2) 0x03C3C8|$0F:$C3B8:A5 33 LDA $33 ; RNG byte 1 0x03C3CA|$0F:$C3BA:45 0C EOR $0C 0x03C3CC|$0F:$C3BC:06 32 ASL $32 ; RNG byte 0 0x03C3CE|$0F:$C3BE:26 33 ROL $33 ; RNG byte 1 0x03C3D0|$0F:$C3C0:06 0C ASL $0C 0x03C3D2|$0F:$C3C2:0A ASL 0x03C3D3|$0F:$C3C3:90 0C BCC $C3D1 0x03C3D5|$0F:$C3C5:A5 32 LDA $32 ; RNG byte 0 0x03C3D7|$0F:$C3C7:49 21 EOR #$21 0x03C3D9|$0F:$C3C9:85 32 STA $32 ; RNG byte 0 0x03C3DB|$0F:$C3CB:A5 33 LDA $33 ; RNG byte 1 0x03C3DD|$0F:$C3CD:49 10 EOR #$10 0x03C3DF|$0F:$C3CF:85 33 STA $33 ; RNG byte 1 ; control flow target (from $C3C3) 0x03C3E1|$0F:$C3D1:88 DEY 0x03C3E2|$0F:$C3D2:D0 E4 BNE $C3B8 0x03C3E4|$0F:$C3D4:60 RTS ; save A to $05F6, X to $43, and load bank specified by A ; control flow target (from $C2F3, $C3DC, $C4E8, $C4FA, $C506, $C50E, $C544, $C55E, $C569, $C574, $C57F, $C58A, $C688, $C690, $CCEE, $CFA2, $D09B, $D0E7, $D2FF, $D31C, $D34A, $F782, $F86D, $FCFA) ; external control flow target (from $02:$B205, $06:$BC85) 0x03C3E5|$0F:$C3D5:4C BB FF JMP $FFBB ; save A to $05F6, X to $43, and load bank specified by A ; CLI and load bank specified by A ; control flow target (from $C0C8, $C0D1) 0x03C3E8|$0F:$C3D8:58 CLI 0x03C3E9|$0F:$C3D9:4C C0 FF JMP $FFC0 ; load bank specified by A ; load bank specified by A, wait for interrupt, set $6007 to #$FF, turn screen off, copy ($0C) inclusive - ($0E) exclusive to PPU at ($10), wait for interrupt, turn screen sprites and backround on ; external control flow target (from $00:$8039, $00:$80FF) 0x03C3EC|$0F:$C3DC:20 D5 C3 JSR $C3D5 ; save A to $05F6, X to $43, and load bank specified by A 0x03C3EF|$0F:$C3DF:20 E8 C3 JSR $C3E8 ; wait for interrupt, set $6007 to #$FF, turn screen off 0x03C3F2|$0F:$C3E2:20 F6 C3 JSR $C3F6 ; copy ($0C) inclusive - ($0E) exclusive to PPU at ($10) 0x03C3F5|$0F:$C3E5:4C 1C C4 JMP $C41C ; wait for interrupt, turn screen sprites and backround on ; wait for interrupt, set $6007 to #$FF, turn screen off ; control flow target (from $C3DF, $C446) ; external control flow target (from $00:$803F, $00:$807E, $00:$823A, $04:$8715, $08:$801B, $0A:$8010, $0A:$80BC, $0A:$81E2, $0B:$8087) 0x03C3F8|$0F:$C3E8:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03C3FB|$0F:$C3EB:A9 FF LDA #$FF 0x03C3FD|$0F:$C3ED:8D 07 60 STA $6007 0x03C400|$0F:$C3F0:A9 00 LDA #$00 ; screen off 0x03C402|$0F:$C3F2:8D 01 20 STA $2001 ; PPU Control Register #2 (#$E0: Full Background Colour, #$01 set [None, Green, Blue, Red], #$E0: Colour Intensity, #$01 not set [None, Green, Blue, Red], #$10: Sprite Visibility, #$80: Background Visibility, #$40: No Sprite Clipping, #$20: No Background Clipping, #$01: Monochrome Display) 0x03C405|$0F:$C3F5:60 RTS ; copy ($0C) inclusive - ($0E) exclusive to PPU at ($10) ; control flow target (from $C3E2) ; external control flow target (from $00:$8081, $00:$80C0, $00:$8396, $04:$8A84, $0A:$81E5, $0B:$808A) 0x03C406|$0F:$C3F6:A5 11 LDA $11 ; PPU address high byte; PPU address low byte 0x03C408|$0F:$C3F8:8D 06 20 STA $2006 ; VRAM Address Register #2 (write twice; $2007 address) 0x03C40B|$0F:$C3FB:A5 10 LDA $10 0x03C40D|$0F:$C3FD:8D 06 20 STA $2006 ; VRAM Address Register #2 (write twice; $2007 address) 0x03C410|$0F:$C400:A0 00 LDY #$00 ; control flow target (from $C416, $C41A) 0x03C412|$0F:$C402:B1 0C LDA ($0C),Y ; CHR data 0x03C414|$0F:$C404:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C417|$0F:$C407:A5 0C LDA $0C 0x03C419|$0F:$C409:C5 0E CMP $0E ; CHR end address low byte (exclusive) 0x03C41B|$0F:$C40B:D0 07 BNE $C414 ; update $0C-$0D 0x03C41D|$0F:$C40D:A5 0D LDA $0D 0x03C41F|$0F:$C40F:C5 0F CMP $0F ; CHR end address high byte (exclusive) 0x03C421|$0F:$C411:D0 01 BNE $C414 ; update $0C-$0D 0x03C423|$0F:$C413:60 RTS ; update $0C-$0D ; control flow target (from $C40B, $C411) 0x03C424|$0F:$C414:E6 0C INC $0C 0x03C426|$0F:$C416:D0 EA BNE $C402 0x03C428|$0F:$C418:E6 0D INC $0D 0x03C42A|$0F:$C41A:D0 E6 BNE $C402 ; wait for interrupt, turn screen sprites and backround on ; control flow target (from $C3E5, $C462) ; external control flow target (from $00:$8078, $00:$80E2, $00:$8325, $04:$8730, $06:$A98C) 0x03C42C|$0F:$C41C:A9 00 LDA #$00 ; useless op 0x03C42E|$0F:$C41E:8D 07 60 STA $6007 ; useless op 0x03C431|$0F:$C421:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03C434|$0F:$C424:A9 18 LDA #$18 ; turn sprites and backround on 0x03C436|$0F:$C426:8D 01 20 STA $2001 ; PPU Control Register #2 (#$E0: Full Background Colour, #$01 set [None, Green, Blue, Red], #$E0: Colour Intensity, #$01 not set [None, Green, Blue, Red], #$10: Sprite Visibility, #$80: Background Visibility, #$40: No Sprite Clipping, #$20: No Background Clipping, #$01: Monochrome Display) 0x03C439|$0F:$C429:60 RTS ; control flow target (from $C52D, $C6F3, $C97B, $D2B6, $D2DE, $E27E, $E287) ; external control flow target (from $04:$870F, $06:$A97E, $07:$81BD, $07:$81D6, $07:$84DD, $07:$851F, $07:$853B, $07:$85F6, $07:$88FF, $08:$8018, $09:$8005, $0A:$800D) 0x03C43A|$0F:$C42A:A9 FF LDA #$FF 0x03C43C|$0F:$C42C:85 0D STA $0D 0x03C43E|$0F:$C42E:20 EB C2 JSR $C2EB 0x03C441|$0F:$C431:A2 00 LDX #$00 0x03C443|$0F:$C433:8A TXA ; control flow target (from $C438) 0x03C444|$0F:$C434:9D 00 04 STA $0400,X ; menu-based palette overrides start 0x03C447|$0F:$C437:E8 INX 0x03C448|$0F:$C438:D0 FA BNE $C434 0x03C44A|$0F:$C43A:A2 C0 LDX #$C0 ; control flow target (from $C443) 0x03C44C|$0F:$C43C:9D 00 03 STA $0300,X ; PPU write buffer start 0x03C44F|$0F:$C43F:9D 00 07 STA $0700,X 0x03C452|$0F:$C442:E8 INX 0x03C453|$0F:$C443:D0 F7 BNE $C43C 0x03C455|$0F:$C445:60 RTS ; turn screen off, write $800 [space] tiles to PPU $2000, turn screen on ; control flow target (from $C533, $D2E1) ; external control flow target (from $04:$870C, $06:$A981, $07:$81C0, $07:$8902, $08:$801E, $09:$8008) 0x03C456|$0F:$C446:20 E8 C3 JSR $C3E8 ; wait for interrupt, set $6007 to #$FF, turn screen off 0x03C459|$0F:$C449:A9 20 LDA #$20 0x03C45B|$0F:$C44B:8D 06 20 STA $2006 ; VRAM Address Register #2 (write twice; $2007 address) 0x03C45E|$0F:$C44E:A9 00 LDA #$00 0x03C460|$0F:$C450:8D 06 20 STA $2006 ; VRAM Address Register #2 (write twice; $2007 address) 0x03C463|$0F:$C453:A9 5F LDA #$5F 0x03C465|$0F:$C455:A2 08 LDX #$08 ; control flow target (from $C460) 0x03C467|$0F:$C457:A0 00 LDY #$00 ; control flow target (from $C45D) 0x03C469|$0F:$C459:8D 07 20 STA $2007 ; VRAM I/O Register 0x03C46C|$0F:$C45C:88 DEY 0x03C46D|$0F:$C45D:D0 FA BNE $C459 0x03C46F|$0F:$C45F:CA DEX 0x03C470|$0F:$C460:D0 F5 BNE $C457 0x03C472|$0F:$C462:4C 1C C4 JMP $C41C ; wait for interrupt, turn screen sprites and backround on ; wait for interrupt and then set every 4th byte of $0200 - $02FC to #$F0 ; control flow target (from $C530, $D2E4, $E281, $E28A) ; external control flow target (from $04:$86FE, $07:$8905, $09:$800B, $0A:$805C) 0x03C475|$0F:$C465:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF ; set every 4th byte of $0200 - $02FC to #$F0 ; control flow target (from $C67A, $D8E0) ; external control flow target (from $07:$81BA, $08:$8021, $0A:$8013) 0x03C478|$0F:$C468:A2 00 LDX #$00 0x03C47A|$0F:$C46A:A9 F0 LDA #$F0 ; control flow target (from $C473) 0x03C47C|$0F:$C46C:9D 00 02 STA $0200,X ; sprite buffer start 0x03C47F|$0F:$C46F:E8 INX 0x03C480|$0F:$C470:E8 INX 0x03C481|$0F:$C471:E8 INX 0x03C482|$0F:$C472:E8 INX 0x03C483|$0F:$C473:D0 F7 BNE $C46C 0x03C485|$0F:$C475:60 RTS ; read joypad 1 data into $2F ; control flow target (from $C704, $D140) ; external control flow target (from $02:$B71A, $04:$9A4D, $06:$8930, $06:$A976, $06:$AFAE, $06:$BC5D, $06:$BC74, $06:$BC7B, $08:$8299, $08:$8335, $0A:$804C) 0x03C486|$0F:$C476:A9 01 LDA #$01 0x03C488|$0F:$C478:8D 16 40 STA $4016 ; Joypad #1 (READ: #$10: Zapper Trigger Not Pulled, #$08: Zapper Sprite Detection, #$01: Joypad Data; WRITE: #$01: Reset Joypad Strobe, set Expansion Port Method to Read) 0x03C48B|$0F:$C47B:A9 00 LDA #$00 0x03C48D|$0F:$C47D:8D 16 40 STA $4016 ; Joypad #1 (READ: #$10: Zapper Trigger Not Pulled, #$08: Zapper Sprite Detection, #$01: Joypad Data; WRITE: #$01: Reset Joypad Strobe, set Expansion Port Method to Read) 0x03C490|$0F:$C480:A0 08 LDY #$08 ; 8 bits of data to read ; control flow target (from $C48C) 0x03C492|$0F:$C482:AD 16 40 LDA $4016 ; Joypad #1 (READ: #$10: Zapper Trigger Not Pulled, #$08: Zapper Sprite Detection, #$01: Joypad Data; WRITE: #$01: Reset Joypad Strobe, set Expansion Port Method to Read) 0x03C495|$0F:$C485:29 03 AND #$03 ; mask off the non-joypad data (should be AND #$01?) 0x03C497|$0F:$C487:C9 01 CMP #$01 ; set C to low bit of joypad data 0x03C499|$0F:$C489:66 2F ROR $2F ; joypad 1 data 0x03C49B|$0F:$C48B:88 DEY 0x03C49C|$0F:$C48C:D0 F4 BNE $C482 ; loop until all 8 bits read 0x03C49E|$0F:$C48E:A6 0C LDX $0C ; save value of $0C in X 0x03C4A0|$0F:$C490:20 AB C3 JSR $C3AB ; generate a random number and store it in $32-$33 (two passes) 0x03C4A3|$0F:$C493:86 0C STX $0C ; restore value of $0C from X 0x03C4A5|$0F:$C495:60 RTS ; given a hero ID in $9C and an item ID in A, SEC if hero has that item, CLC otherwise ; control flow target (from $C4B0, $C4B6) 0x03C4A6|$0F:$C496:86 CB STX $CB ; save X for later 0x03C4A8|$0F:$C498:85 9B STA $9B ; item ID 0x03C4AA|$0F:$C49A:A5 9C LDA $9C ; hero ID 0x03C4AC|$0F:$C49C:0A ASL ; 8 inventory slots per hero 0x03C4AD|$0F:$C49D:0A ASL 0x03C4AE|$0F:$C49E:0A ASL 0x03C4AF|$0F:$C49F:AA TAX 0x03C4B0|$0F:$C4A0:A0 08 LDY #$08 ; 8 inventory slots per hero ; control flow target (from $C4AC) 0x03C4B2|$0F:$C4A2:BD 00 06 LDA $0600,X ; Midenhall inventory item 1 (| #$40 if equipped) 0x03C4B5|$0F:$C4A5:C5 9B CMP $9B ; item ID 0x03C4B7|$0F:$C4A7:38 SEC 0x03C4B8|$0F:$C4A8:F0 05 BEQ $C4AF ; if found, RTS 0x03C4BA|$0F:$C4AA:E8 INX 0x03C4BB|$0F:$C4AB:88 DEY 0x03C4BC|$0F:$C4AC:D0 F4 BNE $C4A2 ; if more inventory to check, check it 0x03C4BE|$0F:$C4AE:18 CLC ; if we get here, then hero does not posses item $9B ; control flow target (from $C4A8) 0x03C4BF|$0F:$C4AF:60 RTS ; given a hero ID in $9C and an item ID in A, SEC if hero has that item, CLC otherwise ; external control flow target (from $04:$A4ED, $04:$A9E4, $04:$AFCF, $04:$AFE3, $04:$AFEC, $04:$B3D1, $06:$8DC0, $06:$A1C1) 0x03C4C0|$0F:$C4B0:20 96 C4 JSR $C496 ; given a hero ID in $9C and an item ID in A, SEC if hero has that item, CLC otherwise 0x03C4C3|$0F:$C4B3:A6 CB LDX $CB ; restore the original value of X 0x03C4C5|$0F:$C4B5:60 RTS ; given a hero ID in $9C and an item ID in A, remove that item from hero's inventory if present and SEC, CLC otherwise ; external control flow target (from $06:$8DC9, $06:$92CF, $06:$92DE, $06:$97A7) 0x03C4C6|$0F:$C4B6:20 96 C4 JSR $C496 ; given a hero ID in $9C and an item ID in A, SEC if hero has that item, CLC otherwise 0x03C4C9|$0F:$C4B9:B0 03 BCS $C4BE ; given a party inventory offset in X and a number of items to be moved up in Y, move that many inventory items up 0x03C4CB|$0F:$C4BB:A6 CB LDX $CB ; restore the original value of X 0x03C4CD|$0F:$C4BD:60 RTS ; given a party inventory offset in X and a number of items to be moved up in Y, move that many inventory items up ; control flow target (from $C4B9, $C4C8, $C4E3) 0x03C4CE|$0F:$C4BE:88 DEY ; number of items to move up 0x03C4CF|$0F:$C4BF:F0 0A BEQ $C4CB ; if zero, then done moving items up ; copy item N+1 to item N 0x03C4D1|$0F:$C4C1:BD 01 06 LDA $0601,X ; Midenhall inventory item 2 (| #$40 if equipped) 0x03C4D4|$0F:$C4C4:9D 00 06 STA $0600,X ; Midenhall inventory item 1 (| #$40 if equipped) 0x03C4D7|$0F:$C4C7:E8 INX 0x03C4D8|$0F:$C4C8:4C BE C4 JMP $C4BE ; given a party inventory offset in X and a number of items to be moved up in Y, move that many inventory items up ; control flow target (from $C4BF) 0x03C4DB|$0F:$C4CB:A9 00 LDA #$00 ; set the final inventory slot to #$00 (no item) 0x03C4DD|$0F:$C4CD:9D 00 06 STA $0600,X ; Midenhall inventory item 1 (| #$40 if equipped) 0x03C4E0|$0F:$C4D0:A6 CB LDX $CB ; restore the original value of X 0x03C4E2|$0F:$C4D2:38 SEC 0x03C4E3|$0F:$C4D3:60 RTS ; given hero ID in A and hero inventory offset in X, remove that item from hero's inventory and move all lower items up 1 slot ; external control flow target (from $04:$A4F6, $06:$853D, $06:$95FC, $06:$9621, $06:$9706, $06:$9A1C, $06:$9AB7) 0x03C4E4|$0F:$C4D4:86 CB STX $CB 0x03C4E6|$0F:$C4D6:0A ASL 0x03C4E7|$0F:$C4D7:0A ASL 0x03C4E8|$0F:$C4D8:0A ASL 0x03C4E9|$0F:$C4D9:18 CLC 0x03C4EA|$0F:$C4DA:65 CB ADC $CB 0x03C4EC|$0F:$C4DC:AA TAX ; X = A * 8 + X, i.e. convert hero inventory offset to party inventory offset 0x03C4ED|$0F:$C4DD:A9 08 LDA #$08 0x03C4EF|$0F:$C4DF:38 SEC 0x03C4F0|$0F:$C4E0:E5 CB SBC $CB 0x03C4F2|$0F:$C4E2:A8 TAY ; Y = number of items to bubble up 0x03C4F3|$0F:$C4E3:4C BE C4 JMP $C4BE ; given a party inventory offset in X and a number of items to be moved up in Y, move that many inventory items up ; return 1 byte from bank 1's ($00,Y) in A, INC 16-bit $00,Y-$01,Y ; external control flow target (from $04:$8F9F) 0x03C4F6|$0F:$C4E6:A9 01 LDA #$01 0x03C4F8|$0F:$C4E8:20 D5 C3 JSR $C3D5 ; save A to $05F6, X to $43, and load bank specified by A 0x03C4FB|$0F:$C4EB:98 TYA 0x03C4FC|$0F:$C4EC:AA TAX 0x03C4FD|$0F:$C4ED:A1 00 LDA ($00,X) 0x03C4FF|$0F:$C4EF:F6 00 INC $00,X 0x03C501|$0F:$C4F1:D0 02 BNE $C4F5 0x03C503|$0F:$C4F3:F6 01 INC $01,X ; control flow target (from $C4F1) 0x03C505|$0F:$C4F5:48 PHA 0x03C506|$0F:$C4F6:A6 43 LDX $43 0x03C508|$0F:$C4F8:A9 04 LDA #$04 0x03C50A|$0F:$C4FA:20 D5 C3 JSR $C3D5 ; save A to $05F6, X to $43, and load bank specified by A 0x03C50D|$0F:$C4FD:68 PLA 0x03C50E|$0F:$C4FE:60 RTS ; external control flow target (from $00:$B798, $00:$B7B0) 0x03C50F|$0F:$C4FF:90 03 BCC $C504 0x03C511|$0F:$C501:20 11 C5 JSR $C511 ; flash screen 5 times ; control flow target (from $C4FF, $D328, $FF66) 0x03C514|$0F:$C504:A9 04 LDA #$04 0x03C516|$0F:$C506:20 D5 C3 JSR $C3D5 ; save A to $05F6, X to $43, and load bank specified by A ; call to code in a different bank ($04:$8015) 0x03C519|$0F:$C509:20 15 80 JSR $8015 0x03C51C|$0F:$C50C:A9 00 LDA #$00 0x03C51E|$0F:$C50E:4C D5 C3 JMP $C3D5 ; save A to $05F6, X to $43, and load bank specified by A ; flash screen 5 times ; control flow target (from $C501) ; external control flow target (from $06:$BD17, $06:$BD81, $06:$BD8E, $07:$84F9, $07:$8687) 0x03C521|$0F:$C511:A2 05 LDX #$05 0x03C523|$0F:$C513:D0 02 BNE $C517 ; flash screen 10 times ; external control flow target (from $04:$86ED, $04:$9CA0, $06:$85AF, $06:$8606, $06:$8BC6, $06:$9172, $06:$940B, $06:$9519, $06:$96C3, $06:$9944, $06:$9947, $06:$BD3B, $06:$BD3E, $07:$8625) 0x03C525|$0F:$C515:A2 0A LDX #$0A ; control flow target (from $C513, $C52A) 0x03C527|$0F:$C517:8A TXA ; save X on the stack 0x03C528|$0F:$C518:48 PHA 0x03C529|$0F:$C519:29 01 AND #$01 ; pick out the even/odd bit 0x03C52B|$0F:$C51B:49 19 EOR #$19 ; enable sprites and background, toggle monochrome 0x03C52D|$0F:$C51D:48 PHA ; new PPU setting 0x03C52E|$0F:$C51E:A2 03 LDX #$03 0x03C530|$0F:$C520:20 EE C1 JSR $C1EE ; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF 0x03C533|$0F:$C523:68 PLA ; new PPU setting 0x03C534|$0F:$C524:8D 01 20 STA $2001 ; PPU Control Register #2 (#$E0: Full Background Colour, #$01 set [None, Green, Blue, Red], #$E0: Colour Intensity, #$01 not set [None, Green, Blue, Red], #$10: Sprite Visibility, #$80: Background Visibility, #$40: No Sprite Clipping, #$20: No Background Clipping, #$01: Monochrome Display) 0x03C537|$0F:$C527:68 PLA ; restore X from the stack 0x03C538|$0F:$C528:AA TAX 0x03C539|$0F:$C529:CA DEX 0x03C53A|$0F:$C52A:D0 EB BNE $C517 ; loop until no more flashes left 0x03C53C|$0F:$C52C:60 RTS ; external control flow target (from $09:$8027) 0x03C53D|$0F:$C52D:20 2A C4 JSR $C42A 0x03C540|$0F:$C530:20 65 C4 JSR $C465 ; wait for interrupt and then set every 4th byte of $0200 - $02FC to #$F0 0x03C543|$0F:$C533:20 46 C4 JSR $C446 ; turn screen off, write $800 [space] tiles to PPU $2000, turn screen on 0x03C546|$0F:$C536:A9 8F LDA #$8F 0x03C548|$0F:$C538:85 30 STA $30 0x03C54A|$0F:$C53A:A9 00 LDA #$00 0x03C54C|$0F:$C53C:85 05 STA $05 0x03C54E|$0F:$C53E:85 06 STA $06 0x03C550|$0F:$C540:85 04 STA $04 0x03C552|$0F:$C542:A9 00 LDA #$00 0x03C554|$0F:$C544:20 D5 C3 JSR $C3D5 ; save A to $05F6, X to $43, and load bank specified by A 0x03C557|$0F:$C547:A9 06 LDA #$06 0x03C559|$0F:$C549:85 0C STA $0C ; call to code in a different bank ($00:$8000) 0x03C55B|$0F:$C54B:20 00 80 JSR $8000 0x03C55E|$0F:$C54E:A9 0E LDA #$0E 0x03C560|$0F:$C550:85 0C STA $0C ; call to code in a different bank ($00:$8000) 0x03C562|$0F:$C552:20 00 80 JSR $8000 0x03C565|$0F:$C555:A9 0F LDA #$0F 0x03C567|$0F:$C557:85 0C STA $0C ; call to code in a different bank ($00:$8000) 0x03C569|$0F:$C559:20 00 80 JSR $8000 0x03C56C|$0F:$C55C:A9 09 LDA #$09 0x03C56E|$0F:$C55E:4C D5 C3 JMP $C3D5 ; save A to $05F6, X to $43, and load bank specified by A ; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM]) ; control flow target (from $C58D, $C5A0, $CAD2, $CFF6, $D03D, $D0D2, $D21A, $D22E, $D4E8, $D4FE, $D53E, $D6E3, $E383, $F693, $F69C, $FD82) ; external control flow target (from $00:$B793, $00:$B7AB, $00:$B8ED, $02:$B728, $04:$86FB, $04:$8AD5, $04:$8AEA, $04:$8FE4, $04:$959A, $04:$969E, $04:$973F, $04:$980B, $04:$98FA, $04:$9B61, $04:$9B71, $04:$9C84, $04:$9C9D, $04:$9CB4, $06:$81AC, $06:$882F, $06:$89F7, $06:$8BC3, $06:$8C5A, $06:$97C6, $06:$A18C, $06:$A254, $06:$A298, $06:$A2BC, $06:$B0D3, $06:$BC17, $06:$BD08, $06:$BD27, $06:$BD6E, $06:$BD7E, $06:$BD8B, $07:$8207, $07:$8218, $07:$83F1, $07:$84DA, $07:$8512, $07:$8538, $07:$85F3, $07:$8605, $07:$8613, $07:$8618, $07:$861D, $07:$8622, $07:$862B, $07:$8635, $07:$8684, $07:$868F, $08:$81E7, $08:$81F6, $08:$820E) 0x03C571|$0F:$C561:78 SEI 0x03C572|$0F:$C562:AA TAX 0x03C573|$0F:$C563:AD F6 05 LDA $05F6 ; current bank 0x03C576|$0F:$C566:48 PHA ; save current bank on the stack 0x03C577|$0F:$C567:A9 03 LDA #$03 0x03C579|$0F:$C569:20 D5 C3 JSR $C3D5 ; save A to $05F6, X to $43, and load bank specified by A 0x03C57C|$0F:$C56C:8A TXA ; call to code in a different bank ($03:$8003) 0x03C57D|$0F:$C56D:20 03 80 JSR $8003 ; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM]) 0x03C580|$0F:$C570:68 PLA ; restore current bank from stack 0x03C581|$0F:$C571:8D F6 05 STA $05F6 ; current bank 0x03C584|$0F:$C574:4C D5 C3 JMP $C3D5 ; save A to $05F6, X to $43, and load bank specified by A ; set $6144 to #$05 ; external control flow target (from $06:$AA60, $07:$81C6, $07:$81FF, $07:$83E9, $07:$84E0, $08:$8015) 0x03C587|$0F:$C577:78 SEI 0x03C588|$0F:$C578:AA TAX 0x03C589|$0F:$C579:AD F6 05 LDA $05F6 ; current bank 0x03C58C|$0F:$C57C:48 PHA 0x03C58D|$0F:$C57D:A9 03 LDA #$03 0x03C58F|$0F:$C57F:20 D5 C3 JSR $C3D5 ; save A to $05F6, X to $43, and load bank specified by A 0x03C592|$0F:$C582:8A TXA ; call to code in a different bank ($03:$8009) 0x03C593|$0F:$C583:20 09 80 JSR $8009 0x03C596|$0F:$C586:68 PLA 0x03C597|$0F:$C587:8D F6 05 STA $05F6 ; current bank 0x03C59A|$0F:$C58A:4C D5 C3 JMP $C3D5 ; save A to $05F6, X to $43, and load bank specified by A ; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM]), wait for it to finish, then play previous BGM ; external control flow target (from $06:$8111, $06:$8258, $06:$8656, $06:$8735, $06:$8A4F, $06:$9742, $06:$998A, $06:$A956) 0x03C59D|$0F:$C58D:20 61 C5 JSR $C561 ; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM]) 0x03C5A0|$0F:$C590:A2 03 LDX #$03 0x03C5A2|$0F:$C592:20 EE C1 JSR $C1EE ; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF ; control flow target (from $C59B) ; external control flow target (from $04:$975B, $04:$9902) 0x03C5A5|$0F:$C595:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03C5A8|$0F:$C598:AD 56 01 LDA $0156 ; probably music playing flag? set to #$00 when music finishes 0x03C5AB|$0F:$C59B:D0 F8 BNE $C595 ; control flow target (from $C5A8) ; external control flow target (from $06:$A2F5) 0x03C5AD|$0F:$C59D:AD F7 05 LDA $05F7 ; probably BGM for current area 0x03C5B0|$0F:$C5A0:4C 61 C5 JMP $C561 ; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM]) ; external control flow target (from $04:$968F, $04:$9731) 0x03C5B3|$0F:$C5A3:A2 3C LDX #$3C 0x03C5B5|$0F:$C5A5:20 EE C1 JSR $C1EE ; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF 0x03C5B8|$0F:$C5A8:4C 9D C5 JMP $C59D ; IRQ/BRK vector handler ; indirect control flow target (via $FFFE) 0x03C5BB|$0F:$C5AB:2C 15 40 BIT $4015 ; READ: pAPU Sound/Vertical Clock Signal Register (#$40: Vertical Clock Signal IRQ Availability, #$10: Delta Modulation, #$08: Noise, #$04: Triangle, #$02: Pulse #2, #$01: Pulse #1), WRITE: pAPU Channel Control (#$10: Delta Modulation, #$08: Noise, #$04: Triangle, #$02: Pulse #2, #$01: Pulse #1) 0x03C5BE|$0F:$C5AE:40 RTI ; reset vector handler ; control flow target (from $FFDB) 0x03C5BF|$0F:$C5AF:D8 CLD ; control flow target (from $C5B3) 0x03C5C0|$0F:$C5B0:AD 02 20 LDA $2002 ; PPU Status Register (#$80: In VBlank, #$40: Sprite #0 Hit, #$20: Scanline Sprite Count > 8, #$10: Ignore VRAM Writes); after read, #$80 and $2005-$2006 are reset 0x03C5C3|$0F:$C5B3:10 FB BPL $C5B0 ; wait for VBlank ; control flow target (from $C5B8) 0x03C5C5|$0F:$C5B5:AD 02 20 LDA $2002 ; PPU Status Register (#$80: In VBlank, #$40: Sprite #0 Hit, #$20: Scanline Sprite Count > 8, #$10: Ignore VRAM Writes); after read, #$80 and $2005-$2006 are reset 0x03C5C8|$0F:$C5B8:10 FB BPL $C5B5 ; wait for VBlank again 0x03C5CA|$0F:$C5BA:A9 08 LDA #$08 0x03C5CC|$0F:$C5BC:8D 00 20 STA $2000 ; PPU Control Register #1 (#$80: Execute NMI on VBlank, #$40: unused, #$20: Sprite Size [8x8/8x16], #$10: Background Pattern Table Address [$0000/$1000], #$08: Sprite Pattern Table Address [$0000/$1000], #$04: PPU Address Increment [1/32], #$03: Name Table Address [$2000/$2400/$2800/$2C00]) 0x03C5CF|$0F:$C5BF:A9 00 LDA #$00 0x03C5D1|$0F:$C5C1:8D 01 20 STA $2001 ; PPU Control Register #2 (#$E0: Full Background Colour, #$01 set [None, Green, Blue, Red], #$E0: Colour Intensity, #$01 not set [None, Green, Blue, Red], #$10: Sprite Visibility, #$80: Background Visibility, #$40: No Sprite Clipping, #$20: No Background Clipping, #$01: Monochrome Display) 0x03C5D4|$0F:$C5C4:8D FF FF STA $FFFF ; swap in bank 0 0x03C5D7|$0F:$C5C7:8D FF FF STA $FFFF 0x03C5DA|$0F:$C5CA:8D FF FF STA $FFFF 0x03C5DD|$0F:$C5CD:8D FF FF STA $FFFF 0x03C5E0|$0F:$C5D0:8D FF FF STA $FFFF 0x03C5E3|$0F:$C5D3:8D 45 61 STA $6145 0x03C5E6|$0F:$C5D6:8D 46 61 STA $6146 0x03C5E9|$0F:$C5D9:A9 88 LDA #$88 0x03C5EB|$0F:$C5DB:8D AE 61 STA $61AE 0x03C5EE|$0F:$C5DE:A9 89 LDA #$89 0x03C5F0|$0F:$C5E0:8D AF 61 STA $61AF 0x03C5F3|$0F:$C5E3:A2 FF LDX #$FF ; reset stack pointer 0x03C5F5|$0F:$C5E5:9A TXS 0x03C5F6|$0F:$C5E6:A0 00 LDY #$00 0x03C5F8|$0F:$C5E8:84 00 STY $00 0x03C5FA|$0F:$C5EA:84 01 STY $01 0x03C5FC|$0F:$C5EC:98 TYA ; control flow target (from $C5F9) 0x03C5FD|$0F:$C5ED:91 00 STA ($00),Y ; reset all $800 of system RAM to #$00 0x03C5FF|$0F:$C5EF:E6 00 INC $00 0x03C601|$0F:$C5F1:D0 02 BNE $C5F5 0x03C603|$0F:$C5F3:E6 01 INC $01 ; control flow target (from $C5F1) 0x03C605|$0F:$C5F5:A6 01 LDX $01 0x03C607|$0F:$C5F7:E0 08 CPX #$08 0x03C609|$0F:$C5F9:D0 F2 BNE $C5ED 0x03C60B|$0F:$C5FB:A9 0E LDA #$0E ; 8kb CHR, 16kb+fixed-last PRG, vertical mirroring 0x03C60D|$0F:$C5FD:8D 92 01 STA $0192 ; MMC1 control mode (#$10 = CHR mode [1 8k block/2 4k blocks], #$0C = PRG mode [32kb/32kb/fixed-first+16kb/16kb+fixed-last], #$03 = Mirroring [1 low/1 high/vertical/horizontal]) 0x03C610|$0F:$C600:A9 00 LDA #$00 ; CHR bank 0 0x03C612|$0F:$C602:8D 93 01 STA $0193 ; CHR bank 0 0x03C615|$0F:$C605:20 0B C6 JSR $C60B ; initialize MMC control mode and CHR banks 0x03C618|$0F:$C608:4C 61 C6 JMP $C661 ; initialize MMC control mode and CHR banks ; control flow target (from $C0C3, $C605) 0x03C61B|$0F:$C60B:EE DE FF INC $FFDE ; #$80; used to reset MMC1 shift register and switch to last-fixed-bank mode 0x03C61E|$0F:$C60E:AD 92 01 LDA $0192 ; MMC1 control mode (#$10 = CHR mode [1 8k block/2 4k blocks], #$0C = PRG mode [32kb/32kb/fixed-first+16kb/16kb+fixed-last], #$03 = Mirroring [1 low/1 high/vertical/horizontal]) 0x03C621|$0F:$C611:20 1F C6 JSR $C61F ; set MMC control mode based on A 0x03C624|$0F:$C614:AD 93 01 LDA $0193 ; CHR bank 0 0x03C627|$0F:$C617:20 36 C6 JSR $C636 ; set CHR bank 0 based on A 0x03C62A|$0F:$C61A:A9 00 LDA #$00 0x03C62C|$0F:$C61C:4C 4D C6 JMP $C64D ; set CHR bank 1 based on A ; set MMC control mode based on A ; control flow target (from $C611) ; external control flow target (from $07:$8917, $07:$89C2, $09:$801A) 0x03C62F|$0F:$C61F:8D 92 01 STA $0192 ; MMC1 control mode (#$10 = CHR mode [1 8k block/2 4k blocks], #$0C = PRG mode [32kb/32kb/fixed-first+16kb/16kb+fixed-last], #$03 = Mirroring [1 low/1 high/vertical/horizontal]) 0x03C632|$0F:$C622:8D FF 9F STA $9FFF 0x03C635|$0F:$C625:4A LSR 0x03C636|$0F:$C626:8D FF 9F STA $9FFF 0x03C639|$0F:$C629:4A LSR 0x03C63A|$0F:$C62A:8D FF 9F STA $9FFF 0x03C63D|$0F:$C62D:4A LSR 0x03C63E|$0F:$C62E:8D FF 9F STA $9FFF 0x03C641|$0F:$C631:4A LSR 0x03C642|$0F:$C632:8D FF 9F STA $9FFF 0x03C645|$0F:$C635:60 RTS ; set CHR bank 0 based on A ; control flow target (from $C617, $D19B) 0x03C646|$0F:$C636:8D 93 01 STA $0193 ; CHR bank 0 0x03C649|$0F:$C639:8D FF BF STA $BFFF 0x03C64C|$0F:$C63C:4A LSR 0x03C64D|$0F:$C63D:8D FF BF STA $BFFF 0x03C650|$0F:$C640:4A LSR 0x03C651|$0F:$C641:8D FF BF STA $BFFF 0x03C654|$0F:$C644:4A LSR 0x03C655|$0F:$C645:8D FF BF STA $BFFF 0x03C658|$0F:$C648:4A LSR 0x03C659|$0F:$C649:8D FF BF STA $BFFF 0x03C65C|$0F:$C64C:60 RTS ; set CHR bank 1 based on A ; control flow target (from $C61C) 0x03C65D|$0F:$C64D:8D FF DF STA $DFFF 0x03C660|$0F:$C650:4A LSR 0x03C661|$0F:$C651:8D FF DF STA $DFFF 0x03C664|$0F:$C654:4A LSR 0x03C665|$0F:$C655:8D FF DF STA $DFFF 0x03C668|$0F:$C658:4A LSR 0x03C669|$0F:$C659:8D FF DF STA $DFFF 0x03C66C|$0F:$C65C:4A LSR 0x03C66D|$0F:$C65D:8D FF DF STA $DFFF 0x03C670|$0F:$C660:60 RTS ; control flow target (from $C608) 0x03C671|$0F:$C661:A9 FF LDA #$FF 0x03C673|$0F:$C663:85 00 STA $00 0x03C675|$0F:$C665:84 01 STY $01 ; Y is still #$00 0x03C677|$0F:$C667:A9 8F LDA #$8F 0x03C679|$0F:$C669:85 30 STA $30 0x03C67B|$0F:$C66B:A9 00 LDA #$00 0x03C67D|$0F:$C66D:8D 07 60 STA $6007 0x03C680|$0F:$C670:A9 88 LDA #$88 0x03C682|$0F:$C672:8D 00 20 STA $2000 ; PPU Control Register #1 (#$80: Execute NMI on VBlank, #$40: unused, #$20: Sprite Size [8x8/8x16], #$10: Background Pattern Table Address [$0000/$1000], #$08: Sprite Pattern Table Address [$0000/$1000], #$04: PPU Address Increment [1/32], #$03: Name Table Address [$2000/$2400/$2800/$2C00]) 0x03C685|$0F:$C675:A9 00 LDA #$00 0x03C687|$0F:$C677:8D 01 20 STA $2001 ; PPU Control Register #2 (#$E0: Full Background Colour, #$01 set [None, Green, Blue, Red], #$E0: Colour Intensity, #$01 not set [None, Green, Blue, Red], #$10: Sprite Visibility, #$80: Background Visibility, #$40: No Sprite Clipping, #$20: No Background Clipping, #$01: Monochrome Display) 0x03C68A|$0F:$C67A:20 68 C4 JSR $C468 ; set every 4th byte of $0200 - $02FC to #$F0 0x03C68D|$0F:$C67D:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03C690|$0F:$C680:20 75 F7 JSR $F775 ; load ROM bank #$03 ; call to code in a different bank ($03:$8006) 0x03C693|$0F:$C683:20 06 80 JSR $8006 0x03C696|$0F:$C686:A9 0A LDA #$0A 0x03C698|$0F:$C688:20 D5 C3 JSR $C3D5 ; save A to $05F6, X to $43, and load bank specified by A ; call to code in a different bank ($0A:$8000) 0x03C69B|$0F:$C68B:20 00 80 JSR $8000 0x03C69E|$0F:$C68E:A9 0B LDA #$0B 0x03C6A0|$0F:$C690:20 D5 C3 JSR $C3D5 ; save A to $05F6, X to $43, and load bank specified by A ; call to code in a different bank ($0B:$8000) 0x03C6A3|$0F:$C693:20 00 80 JSR $8000 0x03C6A6|$0F:$C696:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03C6A9|$0F:$C699:00 ; $08:$8000 ; data -> code 0x03C6AA|$0F:$C69A:A9 FF LDA #$FF 0x03C6AC|$0F:$C69C:8D 08 60 STA $6008 0x03C6AF|$0F:$C69F:A9 8F LDA #$8F 0x03C6B1|$0F:$C6A1:85 30 STA $30 0x03C6B3|$0F:$C6A3:A2 1E LDX #$1E 0x03C6B5|$0F:$C6A5:20 EE C1 JSR $C1EE ; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF 0x03C6B8|$0F:$C6A8:20 5C F7 JSR $F75C ; load ROM bank #$00 0x03C6BB|$0F:$C6AB:A9 05 LDA #$05 0x03C6BD|$0F:$C6AD:85 0C STA $0C ; call to code in a different bank ($00:$8000) 0x03C6BF|$0F:$C6AF:20 00 80 JSR $8000 0x03C6C2|$0F:$C6B2:20 5E C7 JSR $C75E ; copy $C7A7-$C7AE to $053A-$0541, set $1F to #$FF 0x03C6C5|$0F:$C6B5:A2 17 LDX #$17 ; control flow target (from $C6BE) 0x03C6C7|$0F:$C6B7:BD 8F C7 LDA $C78F,X ; hero starting equipment 0x03C6CA|$0F:$C6BA:9D 00 06 STA $0600,X ; Midenhall inventory item 1 (| #$40 if equipped) 0x03C6CD|$0F:$C6BD:CA DEX 0x03C6CE|$0F:$C6BE:10 F7 BPL $C6B7 0x03C6D0|$0F:$C6C0:A9 FF LDA #$FF 0x03C6D2|$0F:$C6C2:85 8E STA $8E ; flag for in battle or not (#$FF)? 0x03C6D4|$0F:$C6C4:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03C6D7|$0F:$C6C7:C2 ; $06:$8004; -> $06:$A843: display and handle main game menu ; data -> code 0x03C6D8|$0F:$C6C8:A9 00 LDA #$00 0x03C6DA|$0F:$C6CA:85 8E STA $8E ; flag for in battle or not (#$FF)? 0x03C6DC|$0F:$C6CC:8D AD 61 STA $61AD 0x03C6DF|$0F:$C6CF:AD 70 70 LDA $7070 ; ????, SRAM buffer 0x03C6E2|$0F:$C6D2:D0 19 BNE $C6ED 0x03C6E4|$0F:$C6D4:20 6C C7 JSR $C76C 0x03C6E7|$0F:$C6D7:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03C6EA|$0F:$C6DA:CF ; $06:$801E; -> $06:$A885: copy save data from system RAM to per-game save data ; data -> code 0x03C6EB|$0F:$C6DB:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03C6EE|$0F:$C6DE:E0 ; $07:$8000 ; data -> code 0x03C6EF|$0F:$C6DF:A9 07 LDA #$07 0x03C6F1|$0F:$C6E1:85 48 STA $48 ; last save point ID 0x03C6F3|$0F:$C6E3:20 1F C8 JSR $C81F 0x03C6F6|$0F:$C6E6:A9 00 LDA #$00 ; Save Point ID #$00: Midenhall 2F 0x03C6F8|$0F:$C6E8:85 48 STA $48 ; last save point ID 0x03C6FA|$0F:$C6EA:4C 00 C7 JMP $C700 ; control flow target (from $C6D2) 0x03C6FD|$0F:$C6ED:20 61 F7 JSR $F761 ; load ROM bank #$06 0x03C700|$0F:$C6F0:20 6C C7 JSR $C76C 0x03C703|$0F:$C6F3:20 2A C4 JSR $C42A 0x03C706|$0F:$C6F6:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03C709|$0F:$C6F9:C3 ; $06:$8006; -> $06:$ABC7: copy save data from save data buffer at $7000 to system RAM; update Don Mahone quest status if applicable ; data -> code 0x03C70A|$0F:$C6FA:20 B9 D2 JSR $D2B9 ; call to code in a different bank ($06:$8F4E) 0x03C70D|$0F:$C6FD:20 4E 8F JSR $8F4E ; control flow target (from $C6EA, $C716, $C898, $C91E, $C928, $C9BD, $CA4A, $CA91, $CAB0, $CAB7, $CB39, $CB5F, $CBA2, $CBDC, $CC07, $CC5D, $CC9F, $D292) 0x03C710|$0F:$C700:A9 00 LDA #$00 0x03C712|$0F:$C702:85 03 STA $03 ; game clock? ; control flow target (from $C75B) 0x03C714|$0F:$C704:20 76 C4 JSR $C476 ; read joypad 1 data into $2F 0x03C717|$0F:$C707:A5 2F LDA $2F ; joypad 1 data 0x03C719|$0F:$C709:4A LSR 0x03C71A|$0F:$C70A:90 0D BCC $C719 0x03C71C|$0F:$C70C:20 61 F7 JSR $F761 ; load ROM bank #$06 ; call to code in a different bank ($06:$8048) 0x03C71F|$0F:$C70F:20 48 80 JSR $8048 0x03C722|$0F:$C712:A9 00 LDA #$00 0x03C724|$0F:$C714:85 35 STA $35 ; flag indicating whether any menu is currently open 0x03C726|$0F:$C716:4C 00 C7 JMP $C700 ; control flow target (from $C70A) 0x03C729|$0F:$C719:A5 2F LDA $2F ; joypad 1 data 0x03C72B|$0F:$C71B:29 10 AND #$10 0x03C72D|$0F:$C71D:F0 06 BEQ $C725 0x03C72F|$0F:$C71F:20 97 E7 JSR $E797 0x03C732|$0F:$C722:4C 7F C8 JMP $C87F ; control flow target (from $C71D) 0x03C735|$0F:$C725:A5 2F LDA $2F ; joypad 1 data 0x03C737|$0F:$C727:29 20 AND #$20 0x03C739|$0F:$C729:F0 06 BEQ $C731 0x03C73B|$0F:$C72B:20 B4 E6 JSR $E6B4 0x03C73E|$0F:$C72E:4C 7F C8 JMP $C87F ; control flow target (from $C729) 0x03C741|$0F:$C731:A5 2F LDA $2F ; joypad 1 data 0x03C743|$0F:$C733:29 40 AND #$40 0x03C745|$0F:$C735:F0 06 BEQ $C73D 0x03C747|$0F:$C737:20 36 E6 JSR $E636 0x03C74A|$0F:$C73A:4C 7F C8 JMP $C87F ; control flow target (from $C735) 0x03C74D|$0F:$C73D:A5 2F LDA $2F ; joypad 1 data 0x03C74F|$0F:$C73F:10 06 BPL $C747 0x03C751|$0F:$C741:20 C2 E5 JSR $E5C2 0x03C754|$0F:$C744:4C 7F C8 JMP $C87F ; control flow target (from $C73F, $D426, $E5CD, $E641, $E6BF, $E7A2) 0x03C757|$0F:$C747:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03C75A|$0F:$C74A:A5 03 LDA $03 ; game clock? 0x03C75C|$0F:$C74C:C9 51 CMP #$51 0x03C75E|$0F:$C74E:D0 08 BNE $C758 0x03C760|$0F:$C750:20 76 EB JSR $EB76 ; open menu specified by next byte ; code -> data ; indirect data load target 0x03C763|$0F:$C753:00 ; Menu ID #$00: Mini status window, bottom ; data -> code 0x03C764|$0F:$C754:A9 51 LDA #$51 0x03C766|$0F:$C756:85 03 STA $03 ; game clock? ; control flow target (from $C74E) 0x03C768|$0F:$C758:20 CB D8 JSR $D8CB 0x03C76B|$0F:$C75B:4C 04 C7 JMP $C704 ; copy $C7A7-$C7AE to $053A-$0541, set $1F to #$FF ; control flow target (from $C6B2) 0x03C76E|$0F:$C75E:A0 07 LDY #$07 ; control flow target (from $C767) 0x03C770|$0F:$C760:B9 A7 C7 LDA $C7A7,Y 0x03C773|$0F:$C763:99 3A 05 STA $053A,Y 0x03C776|$0F:$C766:88 DEY 0x03C777|$0F:$C767:10 F7 BPL $C760 0x03C779|$0F:$C769:84 1F STY $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu); $1F = #$FF 0x03C77B|$0F:$C76B:60 RTS ; control flow target (from $C6D4, $C6F0) 0x03C77C|$0F:$C76C:A9 84 LDA #$84 0x03C77E|$0F:$C76E:8D 2D 06 STA $062D ; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03C781|$0F:$C771:20 66 F7 JSR $F766 ; load ROM bank #$04 ; call to code in a different bank ($04:$8009) 0x03C784|$0F:$C774:20 09 80 JSR $8009 ; update each hero's stats based on their current EXP 0x03C787|$0F:$C777:A9 0F LDA #$0F 0x03C789|$0F:$C779:85 30 STA $30 ; restore full HP/MP to all living party members ; control flow target (from $D2D5) ; external control flow target (from $06:$9419, $06:$BD4C) 0x03C78B|$0F:$C77B:A9 01 LDA #$01 ; make sure each hero has at least 1 HP so that $06:$8DCC will fully heal them 0x03C78D|$0F:$C77D:8D 3B 06 STA $063B ; Midenhall Current HP, low byte 0x03C790|$0F:$C780:8D 4D 06 STA $064D ; Cannock Current HP, low byte 0x03C793|$0F:$C783:8D 5F 06 STA $065F ; Moonbrooke Current HP, low byte 0x03C796|$0F:$C786:20 61 F7 JSR $F761 ; load ROM bank #$06 ; call to code in a different bank ($06:$8DCC) 0x03C799|$0F:$C789:20 CC 8D JSR $8DCC ; restore full HP to all living party members ; call to code in a different bank ($06:$8DEC) 0x03C79C|$0F:$C78C:4C EC 8D JMP $8DEC ; restore full MP to all living party members ; code -> data ; hero starting equipment ; Midenhall ; indexed data load target (from $C6B7) 0x03C79F|$0F:$C78F:55 ; Item ID #$55: Leather Armor (equipped) 0x03C7A0|$0F:$C790:00 ; Item ID #$00: (no item) 0x03C7A1|$0F:$C791:00 ; Item ID #$00: (no item) 0x03C7A2|$0F:$C792:00 ; Item ID #$00: (no item) 0x03C7A3|$0F:$C793:00 ; Item ID #$00: (no item) 0x03C7A4|$0F:$C794:00 ; Item ID #$00: (no item) 0x03C7A5|$0F:$C795:00 ; Item ID #$00: (no item) 0x03C7A6|$0F:$C796:00 ; Item ID #$00: (no item) ; Cannock 0x03C7A7|$0F:$C797:45 ; Item ID #$45: Club (equipped) 0x03C7A8|$0F:$C798:55 ; Item ID #$55: Leather Armor (equipped) 0x03C7A9|$0F:$C799:00 ; Item ID #$00: (no item) 0x03C7AA|$0F:$C79A:00 ; Item ID #$00: (no item) 0x03C7AB|$0F:$C79B:00 ; Item ID #$00: (no item) 0x03C7AC|$0F:$C79C:00 ; Item ID #$00: (no item) 0x03C7AD|$0F:$C79D:00 ; Item ID #$00: (no item) 0x03C7AE|$0F:$C79E:00 ; Item ID #$00: (no item) ; Moonbrooke 0x03C7AF|$0F:$C79F:41 ; Item ID #$41: Bamboo Stick (equipped) 0x03C7B0|$0F:$C7A0:51 ; Item ID #$51: Clothes (equipped) 0x03C7B1|$0F:$C7A1:00 ; Item ID #$00: (no item) 0x03C7B2|$0F:$C7A2:00 ; Item ID #$00: (no item) 0x03C7B3|$0F:$C7A3:00 ; Item ID #$00: (no item) 0x03C7B4|$0F:$C7A4:00 ; Item ID #$00: (no item) 0x03C7B5|$0F:$C7A5:00 ; Item ID #$00: (no item) 0x03C7B6|$0F:$C7A6:00 ; Item ID #$00: (no item) ; indexed data load target (from $C760) 0x03C7B7|$0F:$C7A7:80 0x03C7B8|$0F:$C7A8:6F 0x03C7B9|$0F:$C7A9:00 0x03C7BA|$0F:$C7AA:00 0x03C7BB|$0F:$C7AB:00 0x03C7BC|$0F:$C7AC:00 0x03C7BD|$0F:$C7AD:02 0x03C7BE|$0F:$C7AE:00 ; data -> code ; control flow target (from $C81F, $D2D8, $FF5A) 0x03C7BF|$0F:$C7AF:A9 FF LDA #$FF 0x03C7C1|$0F:$C7B1:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03C7C3|$0F:$C7B3:A5 48 LDA $48 ; last save point ID 0x03C7C5|$0F:$C7B5:0A ASL 0x03C7C6|$0F:$C7B6:0A ASL 0x03C7C7|$0F:$C7B7:A8 TAY 0x03C7C8|$0F:$C7B8:B9 EF C7 LDA $C7EF,Y ; save point map ID 0x03C7CB|$0F:$C7BB:85 31 STA $31 ; current map ID 0x03C7CD|$0F:$C7BD:B9 F0 C7 LDA $C7F0,Y ; save point X-pos 0x03C7D0|$0F:$C7C0:85 16 STA $16 ; current map X-pos (1) 0x03C7D2|$0F:$C7C2:85 28 STA $28 ; current map X-pos (2) 0x03C7D4|$0F:$C7C4:85 2A STA $2A ; current map X-pos pixel, low byte 0x03C7D6|$0F:$C7C6:B9 F1 C7 LDA $C7F1,Y ; save point Y-pos 0x03C7D9|$0F:$C7C9:85 17 STA $17 ; current map Y-pos (1) 0x03C7DB|$0F:$C7CB:85 29 STA $29 ; current map Y-pos (2) 0x03C7DD|$0F:$C7CD:85 2C STA $2C ; current map Y-pos pixel, low byte 0x03C7DF|$0F:$C7CF:B9 F2 C7 LDA $C7F2,Y ; save point ??? 0x03C7E2|$0F:$C7D2:85 45 STA $45 0x03C7E4|$0F:$C7D4:A9 00 LDA #$00 0x03C7E6|$0F:$C7D6:85 38 STA $38 0x03C7E8|$0F:$C7D8:85 2B STA $2B ; current map X-pos pixel, high byte 0x03C7EA|$0F:$C7DA:85 2D STA $2D ; current map Y-pos pixel, high byte 0x03C7EC|$0F:$C7DC:A2 04 LDX #$04 ; convert 16x16 map positions to pixels ; control flow target (from $C7E7) 0x03C7EE|$0F:$C7DE:06 2A ASL $2A ; current map X-pos pixel, low byte 0x03C7F0|$0F:$C7E0:26 2B ROL $2B ; current map X-pos pixel, high byte 0x03C7F2|$0F:$C7E2:06 2C ASL $2C ; current map Y-pos pixel, low byte 0x03C7F4|$0F:$C7E4:26 2D ROL $2D ; current map Y-pos pixel, high byte 0x03C7F6|$0F:$C7E6:CA DEX 0x03C7F7|$0F:$C7E7:D0 F5 BNE $C7DE 0x03C7F9|$0F:$C7E9:20 8A E2 JSR $E28A 0x03C7FC|$0F:$C7EC:4C DC C1 JMP $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF ; code -> data ; save point map ID ; indexed data load target (from $C7B8) 0x03C7FF|$0F:$C7EF:02 ; save point X-pos ; indexed data load target (from $C7BD) 0x03C800|$0F:$C7F0: 03 ; save point Y-pos ; indexed data load target (from $C7C6) 0x03C801|$0F:$C7F1: 04 ; save point ??? ; indexed data load target (from $C7CF) 0x03C802|$0F:$C7F2: 05 ; Save Point ID #$00: Midenhall 2F ; indirect data load target 0x03C803|$0F:$C7F3:06 03 05 05 ; Save Point ID #$01: Cannock 0x03C807|$0F:$C7F7:0C 1B 07 05 ; Save Point ID #$02: Tantegel 0x03C80B|$0F:$C7FB:0F 0E 06 05 ; Save Point ID #$03: Osterfair 0x03C80F|$0F:$C7FF:15 02 02 05 ; Save Point ID #$04: Beran 0x03C813|$0F:$C803:1F 04 03 05 ; Save Point ID #$05: Rhone Shrine 0x03C817|$0F:$C807:07 0F 02 05 ; Save Point ID #$06: Hamlin 0x03C81B|$0F:$C80B:02 06 03 00 ; Map ID #$02: Midenhall 2F 0x03C81F|$0F:$C80F:09 07 0A FF ; Map ID #$09: Moonbrooke 0x03C823|$0F:$C813:03 0F 11 FF ; Map ID #$03: Midenhall 1F 0x03C827|$0F:$C817:01 63 6F FF ; Map ID #$01: World Map 0x03C82B|$0F:$C81B:01 CF 38 FF ; Map ID #$01: World Map ; data -> code ; control flow target (from $C6E3) 0x03C82F|$0F:$C81F:20 AF C7 JSR $C7AF 0x03C832|$0F:$C822:A9 0A LDA #$0A 0x03C834|$0F:$C824:8D 71 05 STA $0571 ; NPC #$06 sprite ID 0x03C837|$0F:$C827:20 CB D8 JSR $D8CB 0x03C83A|$0F:$C82A:A2 3C LDX #$3C 0x03C83C|$0F:$C82C:20 EE C1 JSR $C1EE ; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF 0x03C83F|$0F:$C82F:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03C842|$0F:$C832:83 ; indirect data load target 0x03C843|$0F:$C833:20 ; indirect data load target 0x03C844|$0F:$C834:C1 80 ; $07:$80C1; motion script for guard #2 part 9, prologue ; data -> code 0x03C846|$0F:$C836:20 D2 CC JSR $CCD2 ; execute scripted motion 0x03C849|$0F:$C839:A2 3C LDX #$3C 0x03C84B|$0F:$C83B:20 EE C1 JSR $C1EE ; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF 0x03C84E|$0F:$C83E:20 EA F6 JSR $F6EA ; open main dialogue window and display string ID specified by byte following JSR ; code -> data ; indirect data load target 0x03C851|$0F:$C841:73 ; String ID #$0073: ‘Hear me, oh King[.’][wait][line]‘The army of Hargon the Sorcerer has sacked Moonbrooke Castle from whence I came[.’][wait][line]‘The evil of his magic is great and I fear he will soon rule all the world[..][..][wait][line]unless a monarch as great as thyself stands against him[.’][end-FC] ; data -> code 0x03C852|$0F:$C842:A9 FF LDA #$FF 0x03C854|$0F:$C844:8D 71 05 STA $0571 ; NPC #$06 sprite ID 0x03C857|$0F:$C847:20 CB D8 JSR $D8CB 0x03C85A|$0F:$C84A:20 F5 D0 JSR $D0F5 ; wait for a while and then wipe menu regions #$03, #$00, and #$01 0x03C85D|$0F:$C84D:20 76 EB JSR $EB76 ; open menu specified by next byte ; code -> data ; indirect data load target 0x03C860|$0F:$C850:04 ; Menu ID #$04: Dialogue window ; data -> code 0x03C861|$0F:$C851:A9 00 LDA #$00 0x03C863|$0F:$C853:20 50 FC JSR $FC50 ; print name of hero given by low 2 bits of A to $6119, terminated by #$FA 0x03C866|$0F:$C856:20 2A FA JSR $FA2A ; display string ID specified by next byte ; code -> data ; indirect data load target 0x03C869|$0F:$C859:74 ; String ID #$0074: ‘[name], my heir. Thou hast heard the tale of this man[.’][wait][line]‘I am old and this task must fall to younger hands[.’][wait][line]‘Thy destiny lies on that difficult road, just as it did for Erdrick the Great,[wait][line]for thou art of the line of Erdrick, and his doom is thine[.’][wait][line]‘Come with me now if thou art ready[.’][end-FC] ; data -> code 0x03C86A|$0F:$C85A:20 F5 D0 JSR $D0F5 ; wait for a while and then wipe menu regions #$03, #$00, and #$01 0x03C86D|$0F:$C85D:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03C870|$0F:$C860:81 ; indirect data load target 0x03C871|$0F:$C861:22 ; indirect data load target 0x03C872|$0F:$C862:4A 80 ; $07:$804A; motion script for King Midenhall, Lighthouse Wizard part 1 ; data -> code 0x03C874|$0F:$C864:20 D2 CC JSR $CCD2 ; execute scripted motion 0x03C877|$0F:$C867:A9 03 LDA #$03 0x03C879|$0F:$C869:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03C87B|$0F:$C86B:A9 00 LDA #$00 0x03C87D|$0F:$C86D:85 35 STA $35 ; flag indicating whether any menu is currently open 0x03C87F|$0F:$C86F:60 RTS ; code -> data ; Hargon's minion map ID ; indexed data load target (from $C8AF) 0x03C880|$0F:$C870:46 ; Hargon's minion X-pos ; indexed data load target (from $C8B7) ; indirect data load target 0x03C881|$0F:$C871: 06 ; Hargon's minion Y-pos ; indexed data load target (from $C8BF) 0x03C882|$0F:$C872: 05 ; Hargon's minion $05FD value ; indexed data load target (from $C8C4) 0x03C883|$0F:$C873: 04 ; Hargon's minion fixed encounter ID ; indexed data load target (from $C8CE) 0x03C884|$0F:$C874: 08 ; Map ID #$46: Hargon's Castle 4F 0x03C885|$0F:$C875:47 01 01 08 09 ; Map ID #$47: Hargon's Castle 5F 0x03C88A|$0F:$C87A:48 0B 03 10 0A ; Map ID #$48: Hargon's Castle 6F ; data -> code ; control flow target (from $C722, $C72E, $C73A, $C744) 0x03C88F|$0F:$C87F:20 6B D4 JSR $D46B 0x03C892|$0F:$C882:A5 D0 LDA $D0 ; Malroth status flag (#$FF = defeated, #$00 = alive, others = countdown to battle) 0x03C894|$0F:$C884:10 15 BPL $C89B 0x03C896|$0F:$C886:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03C899|$0F:$C889:DD ; $06:$803A ; data -> code 0x03C89A|$0F:$C88A:A5 31 LDA $31 ; current map ID 0x03C89C|$0F:$C88C:C9 03 CMP #$03 ; Map ID #$03: Midenhall 1F 0x03C89E|$0F:$C88E:D0 08 BNE $C898 0x03C8A0|$0F:$C890:A9 06 LDA #$06 0x03C8A2|$0F:$C892:85 94 STA $94 ; return bank for various function calls, doubles as index of selected option for multiple-choice menus 0x03C8A4|$0F:$C894:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03C8A7|$0F:$C897:DC ; $06:$8038 ; data -> code ; control flow target (from $C88E) 0x03C8A8|$0F:$C898:4C 00 C7 JMP $C700 ; control flow target (from $C884) 0x03C8AB|$0F:$C89B:20 61 F7 JSR $F761 ; load ROM bank #$06 ; call to code in a different bank ($06:$A09E) 0x03C8AE|$0F:$C89E:20 9E A0 JSR $A09E 0x03C8B1|$0F:$C8A1:EA NOP 0x03C8B2|$0F:$C8A2:EA NOP 0x03C8B3|$0F:$C8A3:EA NOP 0x03C8B4|$0F:$C8A4:EA NOP 0x03C8B5|$0F:$C8A5:EA NOP 0x03C8B6|$0F:$C8A6:EA NOP 0x03C8B7|$0F:$C8A7:A5 31 LDA $31 ; current map ID 0x03C8B9|$0F:$C8A9:C9 0F CMP #$0F ; Map ID #$0F: Osterfair 0x03C8BB|$0F:$C8AB:F0 5E BEQ $C90B 0x03C8BD|$0F:$C8AD:A0 00 LDY #$00 ; control flow target (from $C8EA) 0x03C8BF|$0F:$C8AF:D9 70 C8 CMP $C870,Y ; Hargon's minion map ID 0x03C8C2|$0F:$C8B2:D0 2F BNE $C8E3 0x03C8C4|$0F:$C8B4:A5 16 LDA $16 ; current map X-pos (1) 0x03C8C6|$0F:$C8B6:4A LSR 0x03C8C7|$0F:$C8B7:D9 71 C8 CMP $C871,Y ; Hargon's minion X-pos 0x03C8CA|$0F:$C8BA:D0 30 BNE $C8EC 0x03C8CC|$0F:$C8BC:A5 17 LDA $17 ; current map Y-pos (1) 0x03C8CE|$0F:$C8BE:4A LSR 0x03C8CF|$0F:$C8BF:D9 72 C8 CMP $C872,Y ; Hargon's minion Y-pos 0x03C8D2|$0F:$C8C2:D0 28 BNE $C8EC 0x03C8D4|$0F:$C8C4:B9 73 C8 LDA $C873,Y ; Hargon's minion $05FD value 0x03C8D7|$0F:$C8C7:8D FD 05 STA $05FD 0x03C8DA|$0F:$C8CA:25 D1 AND $D1 ; fixed battle status bits (#$10 = Zarlox, #$08 = Bazuzu, #$04 = Atlas, #$02 = Hamlin Waterway Gremlins, #$01 = Evil Clown) 0x03C8DC|$0F:$C8CC:D0 1E BNE $C8EC ; branch if minion already dead 0x03C8DE|$0F:$C8CE:B9 74 C8 LDA $C874,Y ; Hargon's minion fixed encounter ID 0x03C8E1|$0F:$C8D1:20 5C D2 JSR $D25C ; trigger fixed battle A 0x03C8E4|$0F:$C8D4:A5 98 LDA $98 ; outcome of last fight? 0x03C8E6|$0F:$C8D6:C9 FC CMP #$FC 0x03C8E8|$0F:$C8D8:F0 12 BEQ $C8EC 0x03C8EA|$0F:$C8DA:A5 D1 LDA $D1 ; fixed battle status bits (#$10 = Zarlox, #$08 = Bazuzu, #$04 = Atlas, #$02 = Hamlin Waterway Gremlins, #$01 = Evil Clown) 0x03C8EC|$0F:$C8DC:0D FD 05 ORA $05FD 0x03C8EF|$0F:$C8DF:85 D1 STA $D1 ; fixed battle status bits (#$10 = Zarlox, #$08 = Bazuzu, #$04 = Atlas, #$02 = Hamlin Waterway Gremlins, #$01 = Evil Clown) 0x03C8F1|$0F:$C8E1:D0 09 BNE $C8EC ; control flow target (from $C8B2) 0x03C8F3|$0F:$C8E3:C8 INY 0x03C8F4|$0F:$C8E4:C8 INY 0x03C8F5|$0F:$C8E5:C8 INY 0x03C8F6|$0F:$C8E6:C8 INY 0x03C8F7|$0F:$C8E7:C8 INY 0x03C8F8|$0F:$C8E8:C0 0F CPY #$0F 0x03C8FA|$0F:$C8EA:D0 C3 BNE $C8AF ; control flow target (from $C8BA, $C8C2, $C8CC, $C8D8, $C8E1) 0x03C8FC|$0F:$C8EC:20 66 F7 JSR $F766 ; load ROM bank #$04 0x03C8FF|$0F:$C8EF:A5 1D LDA $1D 0x03C901|$0F:$C8F1:F0 12 BEQ $C905 0x03C903|$0F:$C8F3:A9 00 LDA #$00 0x03C905|$0F:$C8F5:AE FD 05 LDX $05FD 0x03C908|$0F:$C8F8:8D FD 05 STA $05FD 0x03C90B|$0F:$C8FB:E0 00 CPX #$00 0x03C90D|$0F:$C8FD:F0 06 BEQ $C905 ; call to code in a different bank ($04:$8018) 0x03C90F|$0F:$C8FF:20 18 80 JSR $8018 0x03C912|$0F:$C902:4C 08 C9 JMP $C908 ; control flow target (from $C8F1, $C8FD) ; call to code in a different bank ($04:$8000) 0x03C915|$0F:$C905:20 00 80 JSR $8000 ; control flow target (from $C902) 0x03C918|$0F:$C908:20 62 D2 JSR $D262 ; control flow target (from $C8AB) 0x03C91B|$0F:$C90B:A5 31 LDA $31 ; current map ID 0x03C91D|$0F:$C90D:C9 29 CMP #$29 ; Map ID #$29: Rubiss' Shrine B7 0x03C91F|$0F:$C90F:D0 10 BNE $C921 0x03C921|$0F:$C911:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03C924|$0F:$C914:03 ; indirect data load target 0x03C925|$0F:$C915:03 ; data -> code 0x03C926|$0F:$C916:D0 09 BNE $C921 0x03C928|$0F:$C918:20 FB D2 JSR $D2FB ; load ROM bank 6 ; call to code in a different bank ($06:$A2A7) 0x03C92B|$0F:$C91B:20 A7 A2 JSR $A2A7 0x03C92E|$0F:$C91E:4C 00 C7 JMP $C700 ; control flow target (from $C90F, $C916) 0x03C931|$0F:$C921:A5 44 LDA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03C933|$0F:$C923:F0 06 BEQ $C92B 0x03C935|$0F:$C925:4C C0 C9 JMP $C9C0 ; control flow target (from $C930) 0x03C938|$0F:$C928:4C 00 C7 JMP $C700 ; control flow target (from $C923) 0x03C93B|$0F:$C92B:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03C93E|$0F:$C92E:05 ; indirect data load target 0x03C93F|$0F:$C92F:08 ; data -> code 0x03C940|$0F:$C930:D0 F6 BNE $C928 0x03C942|$0F:$C932:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03C945|$0F:$C935:88 ; indirect data load target 0x03C946|$0F:$C936:22 ; indirect data load target 0x03C947|$0F:$C937:10 80 ; $07:$8010; motion script for granddaughter in Lianport, part 1 ; data -> code 0x03C949|$0F:$C939:A9 00 LDA #$00 0x03C94B|$0F:$C93B:85 98 STA $98 ; outcome of last fight? 0x03C94D|$0F:$C93D:20 D2 CC JSR $CCD2 ; execute scripted motion ; control flow target (from $C978) 0x03C950|$0F:$C940:20 F6 F6 JSR $F6F6 ; open main dialogue window and display string ID specified by byte following JSR + #$0200 ; code -> data ; indirect data load target 0x03C953|$0F:$C943:B3 ; String ID #$02B3: ‘Help! Help! Evil has come!’[end-FC] ; data -> code 0x03C954|$0F:$C944:20 F5 D0 JSR $D0F5 ; wait for a while and then wipe menu regions #$03, #$00, and #$01 0x03C957|$0F:$C947:A5 98 LDA $98 ; outcome of last fight? 0x03C959|$0F:$C949:D0 11 BNE $C95C 0x03C95B|$0F:$C94B:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03C95E|$0F:$C94E:87 ; indirect data load target 0x03C95F|$0F:$C94F:20 ; indirect data load target 0x03C960|$0F:$C950:1D 80 ; $07:$801D; motion script for Lianport Gremlin #1 ; data -> code 0x03C962|$0F:$C952:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03C965|$0F:$C955:86 ; indirect data load target 0x03C966|$0F:$C956:23 ; indirect data load target 0x03C967|$0F:$C957:18 80 ; $07:$8018; motion script for Lianport Gremlin #2 ; data -> code 0x03C969|$0F:$C959:20 D2 CC JSR $CCD2 ; execute scripted motion ; control flow target (from $C949) 0x03C96C|$0F:$C95C:20 66 F7 JSR $F766 ; load ROM bank #$04 0x03C96F|$0F:$C95F:A9 00 LDA #$00 ; Fixed Battle #$00: 2 Gremlins (Map ID #$0B: Lianport) ; call to code in a different bank ($04:$800F) 0x03C971|$0F:$C961:20 0F 80 JSR $800F 0x03C974|$0F:$C964:A9 00 LDA #$00 0x03C976|$0F:$C966:85 8E STA $8E ; flag for in battle or not (#$FF)? 0x03C978|$0F:$C968:A5 98 LDA $98 ; outcome of last fight? 0x03C97A|$0F:$C96A:C9 FC CMP #$FC 0x03C97C|$0F:$C96C:F0 04 BEQ $C972 0x03C97E|$0F:$C96E:C9 FF CMP #$FF 0x03C980|$0F:$C970:D0 09 BNE $C97B ; control flow target (from $C96C) 0x03C982|$0F:$C972:20 62 D2 JSR $D262 0x03C985|$0F:$C975:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03C988|$0F:$C978:4C 40 C9 JMP $C940 ; control flow target (from $C970) 0x03C98B|$0F:$C97B:20 2A C4 JSR $C42A 0x03C98E|$0F:$C97E:A9 FF LDA #$FF 0x03C990|$0F:$C980:8D 89 05 STA $0589 ; NPC #$09 sprite ID 0x03C993|$0F:$C983:8D 91 05 STA $0591 ; NPC #$0A sprite ID 0x03C996|$0F:$C986:A9 05 LDA #$05 0x03C998|$0F:$C988:8D 94 05 STA $0594 ; NPC #$0B X-pos 0x03C99B|$0F:$C98B:A9 08 LDA #$08 0x03C99D|$0F:$C98D:8D 95 05 STA $0595 ; NPC #$0B Y-pos 0x03C9A0|$0F:$C990:A9 03 LDA #$03 0x03C9A2|$0F:$C992:8D 98 05 STA $0598 ; NPC #$0B motion nybble + direction nybble 0x03C9A5|$0F:$C995:A9 04 LDA #$04 0x03C9A7|$0F:$C997:85 16 STA $16 ; current map X-pos (1) 0x03C9A9|$0F:$C999:85 28 STA $28 ; current map X-pos (2) 0x03C9AB|$0F:$C99B:A9 40 LDA #$40 0x03C9AD|$0F:$C99D:85 2A STA $2A ; current map X-pos pixel, low byte 0x03C9AF|$0F:$C99F:A9 01 LDA #$01 ; update ship status: you beat the Gremlins 0x03C9B1|$0F:$C9A1:85 CF STA $CF ; ship status (#$04 = on ship, #$02 = own ship, #$01 = beat Lianport Gremlins) 0x03C9B3|$0F:$C9A3:A9 06 LDA #$06 0x03C9B5|$0F:$C9A5:20 9A D2 JSR $D29A 0x03C9B8|$0F:$C9A8:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03C9BB|$0F:$C9AB:20 F6 F6 JSR $F6F6 ; open main dialogue window and display string ID specified by byte following JSR + #$0200 ; code -> data ; indirect data load target 0x03C9BE|$0F:$C9AE:B4 ; String ID #$02B4: ‘Thou hast saved me from the fiends[.’][wait][line]‘Please follow me and meet my grandfather[.’][end-FC] ; data -> code 0x03C9BF|$0F:$C9AF:20 F5 D0 JSR $D0F5 ; wait for a while and then wipe menu regions #$03, #$00, and #$01 0x03C9C2|$0F:$C9B2:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03C9C5|$0F:$C9B5:88 ; indirect data load target 0x03C9C6|$0F:$C9B6:21 ; indirect data load target 0x03C9C7|$0F:$C9B7:22 80 ; $07:$8022; motion script for granddaughter in Lianport, part 2 ; data -> code 0x03C9C9|$0F:$C9B9:A9 01 LDA #$01 0x03C9CB|$0F:$C9BB:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03C9CD|$0F:$C9BD:4C 00 C7 JMP $C700 ; control flow target (from $C925) 0x03C9D0|$0F:$C9C0:C9 01 CMP #$01 0x03C9D2|$0F:$C9C2:F0 03 BEQ $C9C7 0x03C9D4|$0F:$C9C4:4C 4D CA JMP $CA4D ; control flow target (from $C9C2) 0x03C9D7|$0F:$C9C7:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03C9DA|$0F:$C9CA:0F ; indirect data load target 0x03C9DB|$0F:$C9CB:08 ; data -> code 0x03C9DC|$0F:$C9CC:D0 04 BNE $C9D2 0x03C9DE|$0F:$C9CE:A9 01 LDA #$01 0x03C9E0|$0F:$C9D0:D0 1B BNE $C9ED ; control flow target (from $C9CC) 0x03C9E2|$0F:$C9D2:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03C9E5|$0F:$C9D5:11 ; indirect data load target 0x03C9E6|$0F:$C9D6:08 ; data -> code 0x03C9E7|$0F:$C9D7:D0 04 BNE $C9DD 0x03C9E9|$0F:$C9D9:A9 03 LDA #$03 0x03C9EB|$0F:$C9DB:D0 10 BNE $C9ED ; control flow target (from $C9D7) 0x03C9ED|$0F:$C9DD:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03C9F0|$0F:$C9E0:10 ; indirect data load target 0x03C9F1|$0F:$C9E1:09 ; data -> code 0x03C9F2|$0F:$C9E2:D0 66 BNE $CA4A 0x03C9F4|$0F:$C9E4:A9 00 LDA #$00 0x03C9F6|$0F:$C9E6:8D 40 05 STA $0540 ; NPC #$00 ? + direction nybble 0x03C9F9|$0F:$C9E9:A9 02 LDA #$02 0x03C9FB|$0F:$C9EB:D0 03 BNE $C9F0 ; control flow target (from $C9D0, $C9DB) 0x03C9FD|$0F:$C9ED:8D 40 05 STA $0540 ; NPC #$00 ? + direction nybble ; control flow target (from $C9EB) 0x03CA00|$0F:$C9F0:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CA02|$0F:$C9F2:20 F6 F6 JSR $F6F6 ; open main dialogue window and display string ID specified by byte following JSR + #$0200 ; code -> data ; indirect data load target 0x03CA05|$0F:$C9F5:B5 ; String ID #$02B5: ‘These good people aided me in my time of need, Grandfather[.’][FD][FD][end-FC] ; data -> code 0x03CA06|$0F:$C9F6:A5 44 LDA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CA08|$0F:$C9F8:C9 01 CMP #$01 0x03CA0A|$0F:$C9FA:D0 09 BNE $CA05 0x03CA0C|$0F:$C9FC:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03CA0F|$0F:$C9FF:88 ; indirect data load target 0x03CA10|$0F:$CA00:20 ; indirect data load target 0x03CA11|$0F:$CA01:2F 80 ; $07:$802F; motion script for granddaughter in Lianport, part 3 (from left) ; data -> code 0x03CA13|$0F:$CA03:90 07 BCC $CA0C ; control flow target (from $C9FA) 0x03CA15|$0F:$CA05:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03CA18|$0F:$CA08:88 ; indirect data load target 0x03CA19|$0F:$CA09:20 ; indirect data load target 0x03CA1A|$0F:$CA0A:33 80 ; $07:$8033; motion script for granddaughter in Lianport, part 3 (from right) ; data -> code ; control flow target (from $CA03) 0x03CA1C|$0F:$CA0C:20 D2 CC JSR $CCD2 ; execute scripted motion 0x03CA1F|$0F:$CA0F:A5 44 LDA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CA21|$0F:$CA11:C9 01 CMP #$01 0x03CA23|$0F:$CA13:D0 09 BNE $CA1E 0x03CA25|$0F:$CA15:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03CA28|$0F:$CA18:89 ; indirect data load target 0x03CA29|$0F:$CA19:22 ; indirect data load target 0x03CA2A|$0F:$CA1A:36 80 ; $07:$8036; motion script for grandfather in Lianport, part 1 (from left or bottom) ; data -> code 0x03CA2C|$0F:$CA1C:90 14 BCC $CA32 ; control flow target (from $CA13) 0x03CA2E|$0F:$CA1E:C9 02 CMP #$02 0x03CA30|$0F:$CA20:D0 09 BNE $CA2B 0x03CA32|$0F:$CA22:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03CA35|$0F:$CA25:89 ; indirect data load target 0x03CA36|$0F:$CA26:22 ; indirect data load target 0x03CA37|$0F:$CA27:39 80 ; $07:$8039; motion script for grandfather in Lianport, part 1 (from bottom) ; data -> code 0x03CA39|$0F:$CA29:90 07 BCC $CA32 ; control flow target (from $CA20) 0x03CA3B|$0F:$CA2B:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03CA3E|$0F:$CA2E:89 ; indirect data load target 0x03CA3F|$0F:$CA2F:22 ; indirect data load target 0x03CA40|$0F:$CA30:3C 80 ; $07:$803C; motion script for grandfather in Lianport, part 1 (from right) ; data -> code ; control flow target (from $CA1C, $CA29) 0x03CA42|$0F:$CA32:20 D2 CC JSR $CCD2 ; execute scripted motion 0x03CA45|$0F:$CA35:20 32 FA JSR $FA32 ; display string ID specified by next byte + #$0200 ; code -> data ; indirect data load target 0x03CA48|$0F:$CA38:B6 ; String ID #$02B6: ‘Having gallantly aided my granddaughter,[wait][line]I shall gladly lend thee my swiftest ship[.’][end-FC] ; data -> code 0x03CA49|$0F:$CA39:20 F5 D0 JSR $D0F5 ; wait for a while and then wipe menu regions #$03, #$00, and #$01 0x03CA4C|$0F:$CA3C:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03CA4F|$0F:$CA3F:89 ; indirect data load target 0x03CA50|$0F:$CA40:20 ; indirect data load target 0x03CA51|$0F:$CA41:3F 80 ; $07:$803F; motion script for grandfather in Lianport, part 2 ; data -> code ; control flow target (from $CA6D) 0x03CA53|$0F:$CA43:20 D2 CC JSR $CCD2 ; execute scripted motion 0x03CA56|$0F:$CA46:A9 FF LDA #$FF 0x03CA58|$0F:$CA48:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) ; control flow target (from $C9E2, $CA5D) 0x03CA5A|$0F:$CA4A:4C 00 C7 JMP $C700 ; control flow target (from $C9C4) 0x03CA5D|$0F:$CA4D:C9 02 CMP #$02 0x03CA5F|$0F:$CA4F:D0 1E BNE $CA6F 0x03CA61|$0F:$CA51:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03CA64|$0F:$CA54:03 ; indirect data load target 0x03CA65|$0F:$CA55:03 ; data -> code 0x03CA66|$0F:$CA56:F0 07 BEQ $CA5F 0x03CA68|$0F:$CA58:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03CA6B|$0F:$CA5B:04 ; indirect data load target 0x03CA6C|$0F:$CA5C:03 ; data -> code 0x03CA6D|$0F:$CA5D:D0 EB BNE $CA4A ; control flow target (from $CA56) 0x03CA6F|$0F:$CA5F:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03CA72|$0F:$CA62:82 ; indirect data load target 0x03CA73|$0F:$CA63:23 ; indirect data load target 0x03CA74|$0F:$CA64:47 80 ; $07:$8047; motion script for guard #1, Shrine SW of Cannock ; data -> code 0x03CA76|$0F:$CA66:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03CA79|$0F:$CA69:81 ; indirect data load target 0x03CA7A|$0F:$CA6A:21 ; indirect data load target 0x03CA7B|$0F:$CA6B:44 80 ; $07:$8044; motion script for guard #1, Shrine SW of Cannock ; data -> code 0x03CA7D|$0F:$CA6D:90 D4 BCC $CA43 ; control flow target (from $CA4F) 0x03CA7F|$0F:$CA6F:C9 03 CMP #$03 0x03CA81|$0F:$CA71:D0 21 BNE $CA94 0x03CA83|$0F:$CA73:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03CA86|$0F:$CA76:03 ; indirect data load target 0x03CA87|$0F:$CA77:06 ; data -> code 0x03CA88|$0F:$CA78:F0 0E BEQ $CA88 0x03CA8A|$0F:$CA7A:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03CA8D|$0F:$CA7D:03 ; indirect data load target 0x03CA8E|$0F:$CA7E:08 ; data -> code 0x03CA8F|$0F:$CA7F:F0 07 BEQ $CA88 0x03CA91|$0F:$CA81:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03CA94|$0F:$CA84:02 ; indirect data load target 0x03CA95|$0F:$CA85:07 ; data -> code 0x03CA96|$0F:$CA86:D0 09 BNE $CA91 ; control flow target (from $CA78, $CA7F) 0x03CA98|$0F:$CA88:A9 FF LDA #$FF 0x03CA9A|$0F:$CA8A:8D 61 05 STA $0561 ; NPC #$04 sprite ID 0x03CA9D|$0F:$CA8D:A9 04 LDA #$04 0x03CA9F|$0F:$CA8F:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) ; control flow target (from $CA86, $CA9C, $CAA3) 0x03CAA1|$0F:$CA91:4C 00 C7 JMP $C700 ; control flow target (from $CA71) 0x03CAA4|$0F:$CA94:C9 04 CMP #$04 0x03CAA6|$0F:$CA96:D0 1B BNE $CAB3 0x03CAA8|$0F:$CA98:A5 31 LDA $31 ; current map ID 0x03CAAA|$0F:$CA9A:C9 03 CMP #$03 ; Map ID #$03: Midenhall 1F 0x03CAAC|$0F:$CA9C:D0 F3 BNE $CA91 0x03CAAE|$0F:$CA9E:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03CAB1|$0F:$CAA1:0F ; indirect data load target 0x03CAB2|$0F:$CAA2:02 ; data -> code 0x03CAB3|$0F:$CAA3:D0 EC BNE $CA91 0x03CAB5|$0F:$CAA5:20 EA F6 JSR $F6EA ; open main dialogue window and display string ID specified by byte following JSR ; code -> data ; indirect data load target 0x03CAB8|$0F:$CAA8:75 ; String ID #$0075: ‘Open the treasure chest and prepare for thy journey[.’][wait][line]‘Now listen closely, [name][.’][wait][line]‘Seek out worthy companions along thy road[.’][wait][line]‘In Cannock and Moonbrooke there are those who are also of Erdrick's line[.’][wait][line]‘They will surely help thee to defeat Hargon's dark plot[.’][end-FC] ; data -> code 0x03CAB9|$0F:$CAA9:20 F5 D0 JSR $D0F5 ; wait for a while and then wipe menu regions #$03, #$00, and #$01 0x03CABC|$0F:$CAAC:A9 05 LDA #$05 0x03CABE|$0F:$CAAE:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CAC0|$0F:$CAB0:4C 00 C7 JMP $C700 ; control flow target (from $CA96) 0x03CAC3|$0F:$CAB3:C9 05 CMP #$05 0x03CAC5|$0F:$CAB5:D0 4B BNE $CB02 0x03CAC7|$0F:$CAB7:4C 00 C7 JMP $C700 ; external control flow target (from $06:$91C0) 0x03CACA|$0F:$CABA:20 B4 E6 JSR $E6B4 0x03CACD|$0F:$CABD:20 B4 E6 JSR $E6B4 0x03CAD0|$0F:$CAC0:20 B4 E6 JSR $E6B4 0x03CAD3|$0F:$CAC3:20 58 D0 JSR $D058 0x03CAD6|$0F:$CAC6:A9 0A LDA #$0A 0x03CAD8|$0F:$CAC8:99 2A 05 STA $052A,Y 0x03CADB|$0F:$CACB:A9 09 LDA #$09 0x03CADD|$0F:$CACD:99 2B 05 STA $052B,Y 0x03CAE0|$0F:$CAD0:A9 87 LDA #$87 ; Music ID #$87: hit 2 SFX 0x03CAE2|$0F:$CAD2:20 61 C5 JSR $C561 ; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM]) 0x03CAE5|$0F:$CAD5:A9 F8 LDA #$F8 0x03CAE7|$0F:$CAD7:85 18 STA $18 0x03CAE9|$0F:$CAD9:A9 00 LDA #$00 0x03CAEB|$0F:$CADB:85 19 STA $19 0x03CAED|$0F:$CADD:85 1E STA $1E 0x03CAEF|$0F:$CADF:85 1C STA $1C 0x03CAF1|$0F:$CAE1:20 C5 DE JSR $DEC5 0x03CAF4|$0F:$CAE4:A2 0A LDX #$0A 0x03CAF6|$0F:$CAE6:20 EE C1 JSR $C1EE ; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF 0x03CAF9|$0F:$CAE9:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03CAFC|$0F:$CAEC:85 ; indirect data load target 0x03CAFD|$0F:$CAED:21 ; indirect data load target 0x03CAFE|$0F:$CAEE:4F 80 ; $07:$804F; motion script for Saber Lion, Osterfair ; data -> code 0x03CB00|$0F:$CAF0:20 D2 CC JSR $CCD2 ; execute scripted motion 0x03CB03|$0F:$CAF3:A9 FF LDA #$FF 0x03CB05|$0F:$CAF5:8D 81 05 STA $0581 ; NPC #$08 sprite ID 0x03CB08|$0F:$CAF8:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CB0A|$0F:$CAFA:A9 02 LDA #$02 ; Fixed Battle #$02: 1 Saber Lion (Map ID #$0F: Osterfair) 0x03CB0C|$0F:$CAFC:20 5C D2 JSR $D25C ; trigger fixed battle A 0x03CB0F|$0F:$CAFF:4C FB D2 JMP $D2FB ; load ROM bank 6 ; control flow target (from $CAB5) 0x03CB12|$0F:$CB02:C9 09 CMP #$09 0x03CB14|$0F:$CB04:D0 36 BNE $CB3C 0x03CB16|$0F:$CB06:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03CB19|$0F:$CB09:13 ; indirect data load target 0x03CB1A|$0F:$CB0A:08 ; data -> code 0x03CB1B|$0F:$CB0B:D0 09 BNE $CB16 0x03CB1D|$0F:$CB0D:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03CB20|$0F:$CB10:85 ; indirect data load target 0x03CB21|$0F:$CB11:20 ; indirect data load target 0x03CB22|$0F:$CB12:55 80 ; $07:$8055; motion script for Cannock and Moonbrooke, ending part 3, dog in Zahan, triggered from right ; data -> code 0x03CB24|$0F:$CB14:90 15 BCC $CB2B ; control flow target (from $CB0B) 0x03CB26|$0F:$CB16:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03CB29|$0F:$CB19:12 ; indirect data load target 0x03CB2A|$0F:$CB1A:07 ; data -> code 0x03CB2B|$0F:$CB1B:F0 07 BEQ $CB24 0x03CB2D|$0F:$CB1D:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03CB30|$0F:$CB20:11 ; indirect data load target 0x03CB31|$0F:$CB21:08 ; data -> code 0x03CB32|$0F:$CB22:D0 15 BNE $CB39 ; control flow target (from $CB1B) 0x03CB34|$0F:$CB24:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03CB37|$0F:$CB27:85 ; indirect data load target 0x03CB38|$0F:$CB28:21 ; indirect data load target 0x03CB39|$0F:$CB29:51 80 ; $07:$8051; motion script for dog in Zahan, triggered from left/top ; data -> code ; control flow target (from $CB14) 0x03CB3B|$0F:$CB2B:20 D2 CC JSR $CCD2 ; execute scripted motion 0x03CB3E|$0F:$CB2E:20 F6 F6 JSR $F6F6 ; open main dialogue window and display string ID specified by byte following JSR + #$0200 ; code -> data ; indirect data load target 0x03CB41|$0F:$CB31:D0 ; String ID #$02D0: ‘Bow-wow-wow!’[end-FC] ; data -> code 0x03CB42|$0F:$CB32:A9 FF LDA #$FF 0x03CB44|$0F:$CB34:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CB46|$0F:$CB36:20 F5 D0 JSR $D0F5 ; wait for a while and then wipe menu regions #$03, #$00, and #$01 ; control flow target (from $CB22, $CB52) 0x03CB49|$0F:$CB39:4C 00 C7 JMP $C700 ; control flow target (from $CB04) 0x03CB4C|$0F:$CB3C:C9 0A CMP #$0A 0x03CB4E|$0F:$CB3E:D0 22 BNE $CB62 0x03CB50|$0F:$CB40:A5 31 LDA $31 ; current map ID 0x03CB52|$0F:$CB42:C9 56 CMP #$56 ; Map ID #$56: Lighthouse 7F 0x03CB54|$0F:$CB44:D0 19 BNE $CB5F 0x03CB56|$0F:$CB46:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03CB59|$0F:$CB49:0A ; indirect data load target 0x03CB5A|$0F:$CB4A:04 ; data -> code 0x03CB5B|$0F:$CB4B:F0 07 BEQ $CB54 0x03CB5D|$0F:$CB4D:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03CB60|$0F:$CB50:0B ; indirect data load target 0x03CB61|$0F:$CB51:04 ; data -> code 0x03CB62|$0F:$CB52:D0 E5 BNE $CB39 ; control flow target (from $CB4B) 0x03CB64|$0F:$CB54:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03CB67|$0F:$CB57:81 ; indirect data load target 0x03CB68|$0F:$CB58:22 ; indirect data load target 0x03CB69|$0F:$CB59:4A 80 ; $07:$804A; motion script for King Midenhall, Lighthouse Wizard part 1 ; data -> code 0x03CB6B|$0F:$CB5B:A9 0B LDA #$0B 0x03CB6D|$0F:$CB5D:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) ; control flow target (from $CB44, $CB6B, $CB76, $CB80, $CB8E) 0x03CB6F|$0F:$CB5F:4C 00 C7 JMP $C700 ; control flow target (from $CB3E) 0x03CB72|$0F:$CB62:C9 0B CMP #$0B 0x03CB74|$0F:$CB64:D0 12 BNE $CB78 0x03CB76|$0F:$CB66:AD 60 05 LDA $0560 ; NPC #$04 motion nybble + direction nybble 0x03CB79|$0F:$CB69:29 F0 AND #$F0 0x03CB7B|$0F:$CB6B:D0 F2 BNE $CB5F 0x03CB7D|$0F:$CB6D:A9 FF LDA #$FF 0x03CB7F|$0F:$CB6F:8D 61 05 STA $0561 ; NPC #$04 sprite ID 0x03CB82|$0F:$CB72:A9 0C LDA #$0C 0x03CB84|$0F:$CB74:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CB86|$0F:$CB76:D0 E7 BNE $CB5F ; control flow target (from $CB64) 0x03CB88|$0F:$CB78:C9 0C CMP #$0C 0x03CB8A|$0F:$CB7A:D0 29 BNE $CBA5 0x03CB8C|$0F:$CB7C:A5 31 LDA $31 ; current map ID 0x03CB8E|$0F:$CB7E:C9 56 CMP #$56 ; Map ID #$56: Lighthouse 7F 0x03CB90|$0F:$CB80:D0 DD BNE $CB5F 0x03CB92|$0F:$CB82:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03CB95|$0F:$CB85:0E ; indirect data load target 0x03CB96|$0F:$CB86:09 ; data -> code 0x03CB97|$0F:$CB87:F0 07 BEQ $CB90 0x03CB99|$0F:$CB89:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03CB9C|$0F:$CB8C:0F ; indirect data load target 0x03CB9D|$0F:$CB8D:09 ; data -> code 0x03CB9E|$0F:$CB8E:D0 CF BNE $CB5F ; control flow target (from $CB87) 0x03CBA0|$0F:$CB90:20 EA F6 JSR $F6EA ; open main dialogue window and display string ID specified by byte following JSR ; code -> data ; indirect data load target 0x03CBA3|$0F:$CB93:66 ; String ID #$0066: ‘Thou need not speak for I know thy mind well[.’][wait][line]‘Come, follow me[.’][wait][line]‘I will guide thee to the place where thou shall find the Crest[.’][end-FC] ; data -> code 0x03CBA4|$0F:$CB94:20 F5 D0 JSR $D0F5 ; wait for a while and then wipe menu regions #$03, #$00, and #$01 0x03CBA7|$0F:$CB97:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03CBAA|$0F:$CB9A:80 ; indirect data load target 0x03CBAB|$0F:$CB9B:22 ; indirect data load target 0x03CBAC|$0F:$CB9C:59 80 ; $07:$8059; motion script for Lighthouse Wizard part 2 ; data -> code 0x03CBAE|$0F:$CB9E:A9 0D LDA #$0D 0x03CBB0|$0F:$CBA0:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CBB2|$0F:$CBA2:4C 00 C7 JMP $C700 ; control flow target (from $CB7A) 0x03CBB5|$0F:$CBA5:A0 00 LDY #$00 ; control flow target (from $CBE2) 0x03CBB7|$0F:$CBA7:D9 AF CC CMP $CCAF,Y 0x03CBBA|$0F:$CBAA:D0 33 BNE $CBDF 0x03CBBC|$0F:$CBAC:A5 31 LDA $31 ; current map ID 0x03CBBE|$0F:$CBAE:D9 B4 CC CMP $CCB4,Y 0x03CBC1|$0F:$CBB1:D0 29 BNE $CBDC 0x03CBC3|$0F:$CBB3:A5 16 LDA $16 ; current map X-pos (1) 0x03CBC5|$0F:$CBB5:D9 B9 CC CMP $CCB9,Y 0x03CBC8|$0F:$CBB8:90 22 BCC $CBDC 0x03CBCA|$0F:$CBBA:D9 BE CC CMP $CCBE,Y 0x03CBCD|$0F:$CBBD:B0 1D BCS $CBDC 0x03CBCF|$0F:$CBBF:A5 17 LDA $17 ; current map Y-pos (1) 0x03CBD1|$0F:$CBC1:D9 C3 CC CMP $CCC3,Y 0x03CBD4|$0F:$CBC4:90 16 BCC $CBDC 0x03CBD6|$0F:$CBC6:D9 C8 CC CMP $CCC8,Y 0x03CBD9|$0F:$CBC9:B0 11 BCS $CBDC 0x03CBDB|$0F:$CBCB:AD 58 05 LDA $0558 ; NPC #$03 motion nybble + direction nybble 0x03CBDE|$0F:$CBCE:29 F0 AND #$F0 0x03CBE0|$0F:$CBD0:D0 0A BNE $CBDC 0x03CBE2|$0F:$CBD2:A9 FF LDA #$FF 0x03CBE4|$0F:$CBD4:8D 59 05 STA $0559 ; NPC #$03 sprite ID 0x03CBE7|$0F:$CBD7:B9 CD CC LDA $CCCD,Y 0x03CBEA|$0F:$CBDA:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) ; control flow target (from $CBB1, $CBB8, $CBBD, $CBC4, $CBC9, $CBD0, $CBEC, $CBFA) 0x03CBEC|$0F:$CBDC:4C 00 C7 JMP $C700 ; control flow target (from $CBAA) 0x03CBEF|$0F:$CBDF:C8 INY 0x03CBF0|$0F:$CBE0:C0 05 CPY #$05 0x03CBF2|$0F:$CBE2:D0 C3 BNE $CBA7 0x03CBF4|$0F:$CBE4:C9 17 CMP #$17 0x03CBF6|$0F:$CBE6:D0 78 BNE $CC60 0x03CBF8|$0F:$CBE8:A5 31 LDA $31 ; current map ID 0x03CBFA|$0F:$CBEA:C9 51 CMP #$51 ; Map ID #$51: Lighthouse 2F 0x03CBFC|$0F:$CBEC:D0 EE BNE $CBDC 0x03CBFE|$0F:$CBEE:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03CC01|$0F:$CBF1:1C ; indirect data load target 0x03CC02|$0F:$CBF2:1F ; data -> code 0x03CC03|$0F:$CBF3:F0 07 BEQ $CBFC 0x03CC05|$0F:$CBF5:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03CC08|$0F:$CBF8:1D ; indirect data load target 0x03CC09|$0F:$CBF9:1F ; data -> code 0x03CC0A|$0F:$CBFA:D0 E0 BNE $CBDC ; control flow target (from $CBF3) 0x03CC0C|$0F:$CBFC:20 EA F6 JSR $F6EA ; open main dialogue window and display string ID specified by byte following JSR ; code -> data ; indirect data load target 0x03CC0F|$0F:$CBFF:67 ; String ID #$0067: ‘Open now the treasure chest[.’][end-FC] ; data -> code 0x03CC10|$0F:$CC00:20 F5 D0 JSR $D0F5 ; wait for a while and then wipe menu regions #$03, #$00, and #$01 0x03CC13|$0F:$CC03:A9 1B LDA #$1B 0x03CC15|$0F:$CC05:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CC17|$0F:$CC07:4C 00 C7 JMP $C700 ; trigger Stars Crest battle ; external control flow target (from $06:$9BA0) 0x03CC1A|$0F:$CC0A:20 2A FA JSR $FA2A ; display string ID specified by next byte ; code -> data ; indirect data load target 0x03CC1D|$0F:$CC0D:69 ; String ID #$0069: [wait]‘Haha! Into my trap thou hast stepped! It shall be thy last[.’][end-FC] ; data -> code 0x03CC1E|$0F:$CC0E:20 F5 D0 JSR $D0F5 ; wait for a while and then wipe menu regions #$03, #$00, and #$01 0x03CC21|$0F:$CC11:A9 05 LDA #$05 0x03CC23|$0F:$CC13:A0 2F LDY #$2F 0x03CC25|$0F:$CC15:20 5C CD JSR $CD5C 0x03CC28|$0F:$CC18:A9 05 LDA #$05 0x03CC2A|$0F:$CC1A:A0 27 LDY #$27 0x03CC2C|$0F:$CC1C:20 5C CD JSR $CD5C 0x03CC2F|$0F:$CC1F:A9 05 LDA #$05 0x03CC31|$0F:$CC21:A0 37 LDY #$37 0x03CC33|$0F:$CC23:20 5C CD JSR $CD5C 0x03CC36|$0F:$CC26:A9 FF LDA #$FF 0x03CC38|$0F:$CC28:8D 59 05 STA $0559 ; NPC #$03 sprite ID 0x03CC3B|$0F:$CC2B:8D 61 05 STA $0561 ; NPC #$04 sprite ID 0x03CC3E|$0F:$CC2E:8D 69 05 STA $0569 ; NPC #$05 sprite ID 0x03CC41|$0F:$CC31:8D 71 05 STA $0571 ; NPC #$06 sprite ID 0x03CC44|$0F:$CC34:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CC46|$0F:$CC36:A9 05 LDA #$05 ; Fixed Battle #$05: 4 Gremlins (Map ID #$51: Lighthouse 2F) 0x03CC48|$0F:$CC38:20 5C D2 JSR $D25C ; trigger fixed battle A 0x03CC4B|$0F:$CC3B:A5 98 LDA $98 ; outcome of last fight? 0x03CC4D|$0F:$CC3D:C9 FC CMP #$FC 0x03CC4F|$0F:$CC3F:F0 1B BEQ $CC5C 0x03CC51|$0F:$CC41:AD 12 01 LDA $0112 ; Crests found bit field (#$10 = Life, #$80 = Water, #$04 = Moon, #$02 = Stars, #$01 = Sun) 0x03CC54|$0F:$CC44:29 02 AND #$02 0x03CC56|$0F:$CC46:D0 14 BNE $CC5C 0x03CC58|$0F:$CC48:A2 46 LDX #$46 0x03CC5A|$0F:$CC4A:20 EE C1 JSR $C1EE ; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF 0x03CC5D|$0F:$CC4D:20 F6 F6 JSR $F6F6 ; open main dialogue window and display string ID specified by byte following JSR + #$0200 ; code -> data ; indirect data load target 0x03CC60|$0F:$CC50:32 ; String ID #$0232: Thou hast found the Stars Crest.[end-FC] ; data -> code 0x03CC61|$0F:$CC51:AD 12 01 LDA $0112 ; Crests found bit field (#$10 = Life, #$80 = Water, #$04 = Moon, #$02 = Stars, #$01 = Sun) 0x03CC64|$0F:$CC54:09 02 ORA #$02 0x03CC66|$0F:$CC56:8D 12 01 STA $0112 ; Crests found bit field (#$10 = Life, #$80 = Water, #$04 = Moon, #$02 = Stars, #$01 = Sun) 0x03CC69|$0F:$CC59:20 F5 D0 JSR $D0F5 ; wait for a while and then wipe menu regions #$03, #$00, and #$01 ; control flow target (from $CC3F, $CC46) 0x03CC6C|$0F:$CC5C:60 RTS ; control flow target (from $CC70, $CC99) 0x03CC6D|$0F:$CC5D:4C 00 C7 JMP $C700 ; control flow target (from $CBE6) 0x03CC70|$0F:$CC60:C9 18 CMP #$18 0x03CC72|$0F:$CC62:D0 33 BNE $CC97 0x03CC74|$0F:$CC64:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03CC77|$0F:$CC67:10 ; indirect data load target 0x03CC78|$0F:$CC68:0C ; data -> code 0x03CC79|$0F:$CC69:F0 07 BEQ $CC72 0x03CC7B|$0F:$CC6B:20 26 CD JSR $CD26 ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; code -> data ; indirect data load target 0x03CC7E|$0F:$CC6E:10 ; indirect data load target 0x03CC7F|$0F:$CC6F:0D ; data -> code 0x03CC80|$0F:$CC70:D0 EB BNE $CC5D ; control flow target (from $CC69) 0x03CC82|$0F:$CC72:20 EA F6 JSR $F6EA ; open main dialogue window and display string ID specified by byte following JSR ; code -> data ; indirect data load target 0x03CC85|$0F:$CC75:6C ; String ID #$006C: ‘Such rudeness in a Wizard's Home is not acceptable[.’][wait][line]‘Perhaps I should turn thee into a frog!’[end-FC] ; data -> code 0x03CC86|$0F:$CC76:20 F5 D0 JSR $D0F5 ; wait for a while and then wipe menu regions #$03, #$00, and #$01 0x03CC89|$0F:$CC79:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03CC8C|$0F:$CC7C:81 ; indirect data load target 0x03CC8D|$0F:$CC7D:23 ; indirect data load target 0x03CC8E|$0F:$CC7E:CB 80 ; $07:$80CB; motion script for Evil Clown #1, Sea Cave B5 ; data -> code 0x03CC90|$0F:$CC80:A9 05 LDA #$05 0x03CC92|$0F:$CC82:8D 61 05 STA $0561 ; NPC #$04 sprite ID 0x03CC95|$0F:$CC85:20 D2 CC JSR $CCD2 ; execute scripted motion 0x03CC98|$0F:$CC88:A9 FF LDA #$FF 0x03CC9A|$0F:$CC8A:8D 59 05 STA $0559 ; NPC #$03 sprite ID 0x03CC9D|$0F:$CC8D:8D 61 05 STA $0561 ; NPC #$04 sprite ID 0x03CCA0|$0F:$CC90:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CCA2|$0F:$CC92:A9 06 LDA #$06 ; Fixed Battle #$06: 2 Evil Clown (Map ID #$33: Sea Cave B5) 0x03CCA4|$0F:$CC94:20 5C D2 JSR $D25C ; trigger fixed battle A ; control flow target (from $CC62) 0x03CCA7|$0F:$CC97:C9 64 CMP #$64 0x03CCA9|$0F:$CC99:D0 C2 BNE $CC5D 0x03CCAB|$0F:$CC9B:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03CCAE|$0F:$CC9E:A0 ; $06:$8040 ; data -> code 0x03CCAF|$0F:$CC9F:4C 00 C7 JMP $C700 ; external control flow target (from $06:$90C6) 0x03CCB2|$0F:$CCA2:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03CCB5|$0F:$CCA5:89 ; indirect data load target 0x03CCB6|$0F:$CCA6:20 ; indirect data load target 0x03CCB7|$0F:$CCA7:40 80 ; $07:$8040; motion script for grandfather in Lianport, part 3 ; data -> code 0x03CCB9|$0F:$CCA9:20 D2 CC JSR $CCD2 ; execute scripted motion 0x03CCBC|$0F:$CCAC:4C 61 F7 JMP $F761 ; load ROM bank #$06 ; code -> data ; indexed data load target (from $CBA7) 0x03CCBF|$0F:$CCAF:0D 0x03CCC0|$0F:$CCB0:0F 0x03CCC1|$0F:$CCB1:11 0x03CCC2|$0F:$CCB2:13 0x03CCC3|$0F:$CCB3:15 ; indexed data load target (from $CBAE) ; indirect data load target 0x03CCC4|$0F:$CCB4:56 ; Map ID #$56: Lighthouse 7F ; indirect data load target 0x03CCC5|$0F:$CCB5:55 ; Map ID #$55: Lighthouse 6F ; indirect data load target 0x03CCC6|$0F:$CCB6:54 ; Map ID #$54: Lighthouse 5F ; indirect data load target 0x03CCC7|$0F:$CCB7:53 ; Map ID #$53: Lighthouse 4F ; indirect data load target 0x03CCC8|$0F:$CCB8:52 ; Map ID #$52: Lighthouse 3F ; indexed data load target (from $CBB5) ; indirect data load target 0x03CCC9|$0F:$CCB9:00 ; indirect data load target 0x03CCCA|$0F:$CCBA:10 ; indirect data load target 0x03CCCB|$0F:$CCBB:1A ; indirect data load target 0x03CCCC|$0F:$CCBC:16 ; indirect data load target 0x03CCCD|$0F:$CCBD:1E ; indexed data load target (from $CBBA) ; indirect data load target 0x03CCCE|$0F:$CCBE:03 ; indirect data load target 0x03CCCF|$0F:$CCBF:14 ; indirect data load target 0x03CCD0|$0F:$CCC0:1C ; indirect data load target 0x03CCD1|$0F:$CCC1:19 ; indirect data load target 0x03CCD2|$0F:$CCC2:20 ; indexed data load target (from $CBC1) ; indirect data load target 0x03CCD3|$0F:$CCC3:11 ; indirect data load target 0x03CCD4|$0F:$CCC4:1A ; indirect data load target 0x03CCD5|$0F:$CCC5:0E ; indirect data load target 0x03CCD6|$0F:$CCC6:19 ; indirect data load target 0x03CCD7|$0F:$CCC7:16 ; indexed data load target (from $CBC6) ; indirect data load target 0x03CCD8|$0F:$CCC8:14 ; indirect data load target 0x03CCD9|$0F:$CCC9:1C ; indirect data load target 0x03CCDA|$0F:$CCCA:12 ; indirect data load target 0x03CCDB|$0F:$CCCB:1C ; indirect data load target 0x03CCDC|$0F:$CCCC:1A ; indexed data load target (from $CBD7) ; indirect data load target 0x03CCDD|$0F:$CCCD:0E ; indirect data load target 0x03CCDE|$0F:$CCCE:10 ; indirect data load target 0x03CCDF|$0F:$CCCF:12 ; indirect data load target 0x03CCE0|$0F:$CCD0:14 ; indirect data load target 0x03CCE1|$0F:$CCD1:16 ; data -> code ; execute scripted motion ; control flow target (from $C836, $C864, $C93D, $C959, $CA0C, $CA32, $CA43, $CAF0, $CB2B, $CC85, $CCA9, $CCE7, $FF84) ; external control flow target (from $06:$BB3A) 0x03CCE2|$0F:$CCD2:A5 35 LDA $35 ; flag indicating whether any menu is currently open 0x03CCE4|$0F:$CCD4:48 PHA 0x03CCE5|$0F:$CCD5:A9 00 LDA #$00 0x03CCE7|$0F:$CCD7:85 35 STA $35 ; flag indicating whether any menu is currently open ; control flow target (from $CCE1) 0x03CCE9|$0F:$CCD9:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03CCEC|$0F:$CCDC:20 CB D8 JSR $D8CB 0x03CCEF|$0F:$CCDF:A5 38 LDA $38 0x03CCF1|$0F:$CCE1:30 F6 BMI $CCD9 0x03CCF3|$0F:$CCE3:68 PLA 0x03CCF4|$0F:$CCE4:85 35 STA $35 ; flag indicating whether any menu is currently open 0x03CCF6|$0F:$CCE6:60 RTS ; external control flow target (from $06:$BB91, $06:$BBA5) 0x03CCF7|$0F:$CCE7:20 D2 CC JSR $CCD2 ; execute scripted motion 0x03CCFA|$0F:$CCEA:A9 06 LDA #$06 0x03CCFC|$0F:$CCEC:85 94 STA $94 ; return bank for various function calls, doubles as index of selected option for multiple-choice menus 0x03CCFE|$0F:$CCEE:4C D5 C3 JMP $C3D5 ; save A to $05F6, X to $43, and load bank specified by A ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; control flow target (from $C82F, $C85D, $C932, $C94B, $C952, $C9B2, $C9FC, $CA05, $CA15, $CA22, $CA2B, $CA3C, $CA5F, $CA66, $CAE9, $CB0D, $CB24, $CB54, $CB97, $CC79, $CCA2, $CEC2) ; external control flow target (from $06:$BACC, $06:$BAD5, $06:$BADF, $06:$BB83, $06:$BB8A, $06:$BB97, $06:$BB9E, $07:$822A, $07:$823B, $07:$8271, $07:$82CB, $07:$82EE, $07:$8329, $07:$8358, $07:$836D, $07:$837E, $07:$83F4, $07:$845C, $07:$8495, $07:$84CE, $07:$84EF, $07:$84FC, $07:$8515, $07:$852C, $07:$8559, $07:$8571, $07:$8578, $07:$85B3, $07:$85BA, $07:$85E7) 0x03CD01|$0F:$CCF1:68 PLA ; return address low byte 0x03CD02|$0F:$CCF2:85 0C STA $0C ; return address low byte 0x03CD04|$0F:$CCF4:68 PLA ; return address high byte 0x03CD05|$0F:$CCF5:85 0D STA $0D ; return address high byte 0x03CD07|$0F:$CCF7:A0 01 LDY #$01 0x03CD09|$0F:$CCF9:B1 0C LDA ($0C),Y ; data byte 0 0x03CD0B|$0F:$CCFB:85 38 STA $38 0x03CD0D|$0F:$CCFD:29 7F AND #$7F ; useless op 0x03CD0F|$0F:$CCFF:0A ASL 0x03CD10|$0F:$CD00:0A ASL 0x03CD11|$0F:$CD01:0A ASL 0x03CD12|$0F:$CD02:AA TAX 0x03CD13|$0F:$CD03:C8 INY 0x03CD14|$0F:$CD04:B1 0C LDA ($0C),Y ; data byte 1 0x03CD16|$0F:$CD06:9D 58 05 STA $0558,X ; NPC #$03 motion nybble + direction nybble 0x03CD19|$0F:$CD09:C8 INY 0x03CD1A|$0F:$CD0A:B1 0C LDA ($0C),Y ; data byte 2 0x03CD1C|$0F:$CD0C:9D 52 05 STA $0552,X ; NPC #$02 scripted motion low byte 0x03CD1F|$0F:$CD0F:C8 INY 0x03CD20|$0F:$CD10:B1 0C LDA ($0C),Y ; data byte 3 0x03CD22|$0F:$CD12:9D 53 05 STA $0553,X ; NPC #$02 scripted motion high byte 0x03CD25|$0F:$CD15:A5 0C LDA $0C ; return address low byte 0x03CD27|$0F:$CD17:18 CLC 0x03CD28|$0F:$CD18:69 04 ADC #$04 ; 4 data bytes 0x03CD2A|$0F:$CD1A:85 0C STA $0C ; return address low byte 0x03CD2C|$0F:$CD1C:A5 0D LDA $0D ; return address high byte 0x03CD2E|$0F:$CD1E:69 00 ADC #$00 ; add carry from low byte 0x03CD30|$0F:$CD20:48 PHA ; return address high byte 0x03CD31|$0F:$CD21:A5 0C LDA $0C ; return address low byte 0x03CD33|$0F:$CD23:48 PHA ; return address low byte 0x03CD34|$0F:$CD24:18 CLC 0x03CD35|$0F:$CD25:60 RTS ; set Z if your current map position is the (X, Y) co-ordinates given by the next 2 bytes ; control flow target (from $C911, $C92B, $C9C7, $C9D2, $C9DD, $CA51, $CA58, $CA73, $CA7A, $CA81, $CA9E, $CB06, $CB16, $CB1D, $CB46, $CB4D, $CB82, $CB89, $CBEE, $CBF5, $CC64, $CC6B) ; external control flow target (from $06:$96B7, $06:$9793, $06:$BB3D) 0x03CD36|$0F:$CD26:68 PLA ; original return address, low byte 0x03CD37|$0F:$CD27:85 0C STA $0C ; original return address, low byte 0x03CD39|$0F:$CD29:18 CLC 0x03CD3A|$0F:$CD2A:69 02 ADC #$02 ; calls to this routine are followed by 2 bytes of data 0x03CD3C|$0F:$CD2C:85 0E STA $0E ; new return address, low byte 0x03CD3E|$0F:$CD2E:68 PLA ; original return address, high byte 0x03CD3F|$0F:$CD2F:85 0D STA $0D ; original return address, high byte 0x03CD41|$0F:$CD31:69 00 ADC #$00 ; add carry from low address 0x03CD43|$0F:$CD33:48 PHA ; new return address, high byte 0x03CD44|$0F:$CD34:A5 0E LDA $0E ; new return address, low byte 0x03CD46|$0F:$CD36:48 PHA ; new return address, low byte 0x03CD47|$0F:$CD37:A0 01 LDY #$01 ; 1 byte after the original return address 0x03CD49|$0F:$CD39:A5 16 LDA $16 ; current map X-pos (1) 0x03CD4B|$0F:$CD3B:D1 0C CMP ($0C),Y 0x03CD4D|$0F:$CD3D:D0 05 BNE $CD44 ; not the same X-pos => Z not set 0x03CD4F|$0F:$CD3F:A5 17 LDA $17 ; current map Y-pos (1) 0x03CD51|$0F:$CD41:C8 INY ; 2 bytes after the original return address 0x03CD52|$0F:$CD42:D1 0C CMP ($0C),Y ; set or clear Z based on whether your Y-pos matches ; control flow target (from $CD3D) 0x03CD54|$0F:$CD44:60 RTS ; external control flow target (from $06:$971D) 0x03CD55|$0F:$CD45:20 51 CD JSR $CD51 ; control flow target (from $CD4E) 0x03CD58|$0F:$CD48:4C 61 F7 JMP $F761 ; load ROM bank #$06 ; external control flow target (from $06:$9724) 0x03CD5B|$0F:$CD4B:20 5C CD JSR $CD5C 0x03CD5E|$0F:$CD4E:4C 48 CD JMP $CD48 ; control flow target (from $CD45) 0x03CD61|$0F:$CD51:85 C9 STA $C9 0x03CD63|$0F:$CD53:84 97 STY $97 ; subject hero ID $97 0x03CD65|$0F:$CD55:A9 FF LDA #$FF 0x03CD67|$0F:$CD57:85 96 STA $96 ; temp storage for item/spell/type/etc. IDs 0x03CD69|$0F:$CD59:4C 64 CD JMP $CD64 ; control flow target (from $CC15, $CC1C, $CC23, $CD4B) 0x03CD6C|$0F:$CD5C:85 96 STA $96 ; temp storage for item/spell/type/etc. IDs 0x03CD6E|$0F:$CD5E:84 97 STY $97 ; subject hero ID $97 0x03CD70|$0F:$CD60:A9 FF LDA #$FF 0x03CD72|$0F:$CD62:85 C9 STA $C9 ; control flow target (from $CD59) 0x03CD74|$0F:$CD64:A9 01 LDA #$01 0x03CD76|$0F:$CD66:85 49 STA $49 ; object hero/target/item/string ID $49 ; control flow target (from $CD8C) 0x03CD78|$0F:$CD68:A5 C9 LDA $C9 0x03CD7A|$0F:$CD6A:A4 97 LDY $97 ; subject hero ID $97 0x03CD7C|$0F:$CD6C:99 3A 05 STA $053A,Y 0x03CD7F|$0F:$CD6F:20 CB D8 JSR $D8CB 0x03CD82|$0F:$CD72:A2 04 LDX #$04 0x03CD84|$0F:$CD74:20 EE C1 JSR $C1EE ; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF 0x03CD87|$0F:$CD77:A5 96 LDA $96 ; temp storage for item/spell/type/etc. IDs 0x03CD89|$0F:$CD79:A4 97 LDY $97 ; subject hero ID $97 0x03CD8B|$0F:$CD7B:99 3A 05 STA $053A,Y 0x03CD8E|$0F:$CD7E:20 CB D8 JSR $D8CB 0x03CD91|$0F:$CD81:A6 49 LDX $49 ; object hero/target/item/string ID $49 0x03CD93|$0F:$CD83:20 EE C1 JSR $C1EE ; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF 0x03CD96|$0F:$CD86:E6 49 INC $49 ; object hero/target/item/string ID $49 0x03CD98|$0F:$CD88:A5 49 LDA $49 ; object hero/target/item/string ID $49 0x03CD9A|$0F:$CD8A:C9 08 CMP #$08 0x03CD9C|$0F:$CD8C:90 DA BCC $CD68 0x03CD9E|$0F:$CD8E:60 RTS ; control flow target (from $E56C) 0x03CD9F|$0F:$CD8F:A5 31 LDA $31 ; current map ID 0x03CDA1|$0F:$CD91:C9 01 CMP #$01 ; Map ID #$01: World Map 0x03CDA3|$0F:$CD93:D0 05 BNE $CD9A ; control flow target (from $CDAA, $CDB8) 0x03CDA5|$0F:$CD95:A9 FF LDA #$FF 0x03CDA7|$0F:$CD97:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CDA9|$0F:$CD99:60 RTS ; control flow target (from $CD93) 0x03CDAA|$0F:$CD9A:C9 0B CMP #$0B ; Map ID #$0B: Lianport 0x03CDAC|$0F:$CD9C:D0 13 BNE $CDB1 0x03CDAE|$0F:$CD9E:A5 CF LDA $CF ; ship status (#$04 = on ship, #$02 = own ship, #$01 = beat Lianport Gremlins) 0x03CDB0|$0F:$CDA0:F0 0A BEQ $CDAC 0x03CDB2|$0F:$CDA2:A9 FF LDA #$FF 0x03CDB4|$0F:$CDA4:8D 89 05 STA $0589 ; NPC #$09 sprite ID 0x03CDB7|$0F:$CDA7:8D 91 05 STA $0591 ; NPC #$0A sprite ID 0x03CDBA|$0F:$CDAA:D0 E9 BNE $CD95 ; control flow target (from $CDA0) 0x03CDBC|$0F:$CDAC:A9 00 LDA #$00 0x03CDBE|$0F:$CDAE:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CDC0|$0F:$CDB0:60 RTS ; control flow target (from $CD9C) 0x03CDC1|$0F:$CDB1:C9 1A CMP #$1A ; Map ID #$1A: Shrine SW of Cannock 0x03CDC3|$0F:$CDB3:D0 0A BNE $CDBF 0x03CDC5|$0F:$CDB5:20 CE F6 JSR $F6CE ; return number of party members - 1 in A/X 0x03CDC8|$0F:$CDB8:D0 DB BNE $CD95 0x03CDCA|$0F:$CDBA:A9 02 LDA #$02 0x03CDCC|$0F:$CDBC:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CDCE|$0F:$CDBE:60 RTS ; control flow target (from $CDB3) 0x03CDCF|$0F:$CDBF:C9 02 CMP #$02 ; Map ID #$02: Midenhall 2F 0x03CDD1|$0F:$CDC1:D0 10 BNE $CDD3 0x03CDD3|$0F:$CDC3:A5 44 LDA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CDD5|$0F:$CDC5:C9 04 CMP #$04 0x03CDD7|$0F:$CDC7:F0 04 BEQ $CDCD 0x03CDD9|$0F:$CDC9:C9 05 CMP #$05 0x03CDDB|$0F:$CDCB:D0 29 BNE $CDF6 ; control flow target (from $CDC7) 0x03CDDD|$0F:$CDCD:A9 FF LDA #$FF 0x03CDDF|$0F:$CDCF:8D 61 05 STA $0561 ; NPC #$04 sprite ID 0x03CDE2|$0F:$CDD2:60 RTS ; control flow target (from $CDC1) 0x03CDE3|$0F:$CDD3:C9 03 CMP #$03 ; Map ID #$03: Midenhall 1F 0x03CDE5|$0F:$CDD5:D0 24 BNE $CDFB 0x03CDE7|$0F:$CDD7:A5 44 LDA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CDE9|$0F:$CDD9:C9 04 CMP #$04 0x03CDEB|$0F:$CDDB:F0 18 BEQ $CDF5 0x03CDED|$0F:$CDDD:C9 05 CMP #$05 0x03CDEF|$0F:$CDDF:F0 14 BEQ $CDF5 0x03CDF1|$0F:$CDE1:A9 FF LDA #$FF 0x03CDF3|$0F:$CDE3:8D C1 05 STA $05C1 ; NPC #$10 sprite ID 0x03CDF6|$0F:$CDE6:AD AD 61 LDA $61AD 0x03CDF9|$0F:$CDE9:D0 0A BNE $CDF5 0x03CDFB|$0F:$CDEB:A9 0E LDA #$0E 0x03CDFD|$0F:$CDED:8D 1A 05 STA $051A ; something to do with whether you've opened the chest containing the Shield of Erdrick 0x03CE00|$0F:$CDF0:A9 02 LDA #$02 0x03CE02|$0F:$CDF2:8D 1B 05 STA $051B ; control flow target (from $CDDB, $CDDF, $CDE9) 0x03CE05|$0F:$CDF5:60 RTS ; control flow target (from $CDCB, $CE0A) 0x03CE06|$0F:$CDF6:A9 FF LDA #$FF 0x03CE08|$0F:$CDF8:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CE0A|$0F:$CDFA:60 RTS ; control flow target (from $CDD5) 0x03CE0B|$0F:$CDFB:C9 05 CMP #$05 ; Map ID #$05: Leftwyne 0x03CE0D|$0F:$CDFD:D0 13 BNE $CE12 0x03CE0F|$0F:$CDFF:AD 3F 06 LDA $063F ; Cannock status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03CE12|$0F:$CE02:29 04 AND #$04 0x03CE14|$0F:$CE04:D0 06 BNE $CE0C 0x03CE16|$0F:$CE06:A5 CA LDA $CA ; Cannock runaround quest status (0 = start of game, 0 -> 1 = talked to King Cannock, 1 -> 2 = said YES to seeking Cannock in Spring of Bravery, 2 -> 3 = talked to King Midenhall; adding Cannock sets this to 3; some code checks for 4) 0x03CE18|$0F:$CE08:C9 02 CMP #$02 0x03CE1A|$0F:$CE0A:B0 EA BCS $CDF6 ; control flow target (from $CE04) 0x03CE1C|$0F:$CE0C:A9 FF LDA #$FF 0x03CE1E|$0F:$CE0E:8D C1 05 STA $05C1 ; NPC #$10 sprite ID 0x03CE21|$0F:$CE11:60 RTS ; control flow target (from $CDFD) 0x03CE22|$0F:$CE12:C9 0F CMP #$0F ; Map ID #$0F: Osterfair 0x03CE24|$0F:$CE14:D0 05 BNE $CE1B 0x03CE26|$0F:$CE16:A9 00 LDA #$00 0x03CE28|$0F:$CE18:85 98 STA $98 ; outcome of last fight? 0x03CE2A|$0F:$CE1A:60 RTS ; control flow target (from $CE14) 0x03CE2B|$0F:$CE1B:C9 10 CMP #$10 ; Map ID #$10: Zahan 0x03CE2D|$0F:$CE1D:D0 05 BNE $CE24 0x03CE2F|$0F:$CE1F:A9 09 LDA #$09 0x03CE31|$0F:$CE21:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CE33|$0F:$CE23:60 RTS ; control flow target (from $CE1D) 0x03CE34|$0F:$CE24:C9 20 CMP #$20 ; Map ID #$20: Shrine SW of Moonbrooke 0x03CE36|$0F:$CE26:D0 18 BNE $CE40 0x03CE38|$0F:$CE28:A0 00 LDY #$00 ; control flow target (from $CE38) 0x03CE3A|$0F:$CE2A:B9 2D 06 LDA $062D,Y ; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03CE3D|$0F:$CE2D:29 04 AND #$04 0x03CE3F|$0F:$CE2F:F0 0E BEQ $CE3F 0x03CE41|$0F:$CE31:98 TYA 0x03CE42|$0F:$CE32:18 CLC 0x03CE43|$0F:$CE33:69 12 ADC #$12 0x03CE45|$0F:$CE35:A8 TAY 0x03CE46|$0F:$CE36:C9 36 CMP #$36 0x03CE48|$0F:$CE38:D0 F0 BNE $CE2A 0x03CE4A|$0F:$CE3A:A9 06 LDA #$06 0x03CE4C|$0F:$CE3C:8D 54 05 STA $0554 ; NPC #$03 X-pos ; control flow target (from $CE2F) 0x03CE4F|$0F:$CE3F:60 RTS ; control flow target (from $CE26) 0x03CE50|$0F:$CE40:C9 57 CMP #$57 ; Map ID #$57: Lighthouse 8F 0x03CE52|$0F:$CE42:D0 01 BNE $CE45 0x03CE54|$0F:$CE44:60 RTS ; control flow target (from $CE42) 0x03CE55|$0F:$CE45:C9 56 CMP #$56 ; Map ID #$56: Lighthouse 7F 0x03CE57|$0F:$CE47:D0 3E BNE $CE87 0x03CE59|$0F:$CE49:AD 12 01 LDA $0112 ; Crests found bit field (#$10 = Life, #$80 = Water, #$04 = Moon, #$02 = Stars, #$01 = Sun) 0x03CE5C|$0F:$CE4C:29 02 AND #$02 0x03CE5E|$0F:$CE4E:D0 2C BNE $CE7C 0x03CE60|$0F:$CE50:A5 44 LDA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CE62|$0F:$CE52:C9 FF CMP #$FF 0x03CE64|$0F:$CE54:F0 04 BEQ $CE5A 0x03CE66|$0F:$CE56:C9 0A CMP #$0A 0x03CE68|$0F:$CE58:D0 05 BNE $CE5F ; control flow target (from $CE54) 0x03CE6A|$0F:$CE5A:A9 0A LDA #$0A 0x03CE6C|$0F:$CE5C:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CE6E|$0F:$CE5E:60 RTS ; control flow target (from $CE58) 0x03CE6F|$0F:$CE5F:C9 0B CMP #$0B 0x03CE71|$0F:$CE61:F0 1E BEQ $CE81 0x03CE73|$0F:$CE63:C9 0C CMP #$0C 0x03CE75|$0F:$CE65:F0 1A BEQ $CE81 0x03CE77|$0F:$CE67:C9 0D CMP #$0D 0x03CE79|$0F:$CE69:D0 11 BNE $CE7C 0x03CE7B|$0F:$CE6B:A9 00 LDA #$00 0x03CE7D|$0F:$CE6D:8D 54 05 STA $0554 ; NPC #$03 X-pos 0x03CE80|$0F:$CE70:A9 13 LDA #$13 0x03CE82|$0F:$CE72:8D 55 05 STA $0555 ; NPC #$03 Y-pos 0x03CE85|$0F:$CE75:A9 01 LDA #$01 0x03CE87|$0F:$CE77:8D 58 05 STA $0558 ; NPC #$03 motion nybble + direction nybble 0x03CE8A|$0F:$CE7A:D0 05 BNE $CE81 ; control flow target (from $CE4E, $CE69) 0x03CE8C|$0F:$CE7C:A9 FF LDA #$FF 0x03CE8E|$0F:$CE7E:8D 59 05 STA $0559 ; NPC #$03 sprite ID ; control flow target (from $CE61, $CE65, $CE7A) 0x03CE91|$0F:$CE81:A9 FF LDA #$FF 0x03CE93|$0F:$CE83:8D 61 05 STA $0561 ; NPC #$04 sprite ID 0x03CE96|$0F:$CE86:60 RTS ; control flow target (from $CE47) 0x03CE97|$0F:$CE87:A0 00 LDY #$00 ; control flow target (from $CEE2) 0x03CE99|$0F:$CE89:D9 2C CF CMP $CF2C,Y 0x03CE9C|$0F:$CE8C:D0 51 BNE $CEDF 0x03CE9E|$0F:$CE8E:A5 44 LDA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CEA0|$0F:$CE90:D9 31 CF CMP $CF31,Y 0x03CEA3|$0F:$CE93:D0 13 BNE $CEA8 0x03CEA5|$0F:$CE95:B9 36 CF LDA $CF36,Y 0x03CEA8|$0F:$CE98:8D 54 05 STA $0554 ; NPC #$03 X-pos 0x03CEAB|$0F:$CE9B:B9 3B CF LDA $CF3B,Y 0x03CEAE|$0F:$CE9E:8D 55 05 STA $0555 ; NPC #$03 Y-pos 0x03CEB1|$0F:$CEA1:B9 40 CF LDA $CF40,Y 0x03CEB4|$0F:$CEA4:8D 58 05 STA $0558 ; NPC #$03 motion nybble + direction nybble 0x03CEB7|$0F:$CEA7:60 RTS ; control flow target (from $CE93) 0x03CEB8|$0F:$CEA8:D9 45 CF CMP $CF45,Y 0x03CEBB|$0F:$CEAB:D0 2C BNE $CED9 0x03CEBD|$0F:$CEAD:A5 16 LDA $16 ; current map X-pos (1) 0x03CEBF|$0F:$CEAF:D9 4A CF CMP $CF4A,Y 0x03CEC2|$0F:$CEB2:D0 25 BNE $CED9 0x03CEC4|$0F:$CEB4:A5 17 LDA $17 ; current map Y-pos (1) 0x03CEC6|$0F:$CEB6:D9 4F CF CMP $CF4F,Y 0x03CEC9|$0F:$CEB9:D0 1E BNE $CED9 0x03CECB|$0F:$CEBB:B9 31 CF LDA $CF31,Y 0x03CECE|$0F:$CEBE:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CED0|$0F:$CEC0:98 TYA 0x03CED1|$0F:$CEC1:48 PHA 0x03CED2|$0F:$CEC2:20 F1 CC JSR $CCF1 ; set up scripted motion variables based on next 4 bytes (low 5 bits = NPC index, NPC index + 1's motion + direction byte?, 2-byte pointer to motion script) ; code -> data ; indirect data load target 0x03CED5|$0F:$CEC5:80 ; indirect data load target 0x03CED6|$0F:$CEC6:22 ; indirect data load target 0x03CED7|$0F:$CEC7:72 80 ; $07:$8072; motion script for Lighthouse Wizard part 3 ; data -> code 0x03CED9|$0F:$CEC9:68 PLA 0x03CEDA|$0F:$CECA:0A ASL 0x03CEDB|$0F:$CECB:A8 TAY 0x03CEDC|$0F:$CECC:B9 54 CF LDA $CF54,Y ; motion script pointers for Lighthouse Wizard 0x03CEDF|$0F:$CECF:8D 52 05 STA $0552 ; NPC #$02 scripted motion low byte 0x03CEE2|$0F:$CED2:B9 55 CF LDA $CF55,Y 0x03CEE5|$0F:$CED5:8D 53 05 STA $0553 ; NPC #$02 scripted motion high byte 0x03CEE8|$0F:$CED8:60 RTS ; control flow target (from $CEAB, $CEB2, $CEB9) 0x03CEE9|$0F:$CED9:A9 FF LDA #$FF 0x03CEEB|$0F:$CEDB:8D 59 05 STA $0559 ; NPC #$03 sprite ID ; control flow target (from $CEE6) 0x03CEEE|$0F:$CEDE:60 RTS ; control flow target (from $CE8C) 0x03CEEF|$0F:$CEDF:C8 INY 0x03CEF0|$0F:$CEE0:C0 05 CPY #$05 0x03CEF2|$0F:$CEE2:D0 A5 BNE $CE89 0x03CEF4|$0F:$CEE4:C9 50 CMP #$50 ; Map ID #$50: Lighthouse 1F 0x03CEF6|$0F:$CEE6:F0 F6 BEQ $CEDE 0x03CEF8|$0F:$CEE8:C9 33 CMP #$33 ; Map ID #$33: Sea Cave B5 0x03CEFA|$0F:$CEEA:D0 05 BNE $CEF1 0x03CEFC|$0F:$CEEC:A9 18 LDA #$18 0x03CEFE|$0F:$CEEE:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CF00|$0F:$CEF0:60 RTS ; control flow target (from $CEEA) 0x03CF01|$0F:$CEF1:C9 04 CMP #$04 ; Map ID #$04: Midenhall B1 0x03CF03|$0F:$CEF3:D0 0C BNE $CF01 0x03CF05|$0F:$CEF5:A5 D1 LDA $D1 ; fixed battle status bits (#$10 = Zarlox, #$08 = Bazuzu, #$04 = Atlas, #$02 = Hamlin Waterway Gremlins, #$01 = Evil Clown) 0x03CF07|$0F:$CEF7:4A LSR 0x03CF08|$0F:$CEF8:90 2D BCC $CF27 0x03CF0A|$0F:$CEFA:A9 FF LDA #$FF 0x03CF0C|$0F:$CEFC:8D 69 05 STA $0569 ; NPC #$05 sprite ID 0x03CF0F|$0F:$CEFF:D0 26 BNE $CF27 ; control flow target (from $CEF3) 0x03CF11|$0F:$CF01:C9 07 CMP #$07 ; Map ID #$07: Hamlin 0x03CF13|$0F:$CF03:D0 0E BNE $CF13 0x03CF15|$0F:$CF05:AD 51 06 LDA $0651 ; Moonbrooke status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03CF18|$0F:$CF08:29 04 AND #$04 ; In Party 0x03CF1A|$0F:$CF0A:F0 07 BEQ $CF13 0x03CF1C|$0F:$CF0C:A9 FF LDA #$FF 0x03CF1E|$0F:$CF0E:8D 59 05 STA $0559 ; NPC #$03 sprite ID 0x03CF21|$0F:$CF11:D0 14 BNE $CF27 ; control flow target (from $CF03, $CF0A) 0x03CF23|$0F:$CF13:C9 08 CMP #$08 ; Map ID #$08: Hamlin Waterway 0x03CF25|$0F:$CF15:D0 10 BNE $CF27 0x03CF27|$0F:$CF17:A5 D1 LDA $D1 ; fixed battle status bits (#$10 = Zarlox, #$08 = Bazuzu, #$04 = Atlas, #$02 = Hamlin Waterway Gremlins, #$01 = Evil Clown) 0x03CF29|$0F:$CF19:29 02 AND #$02 0x03CF2B|$0F:$CF1B:F0 0A BEQ $CF27 0x03CF2D|$0F:$CF1D:A9 FF LDA #$FF 0x03CF2F|$0F:$CF1F:8D 59 05 STA $0559 ; NPC #$03 sprite ID 0x03CF32|$0F:$CF22:8D 61 05 STA $0561 ; NPC #$04 sprite ID 0x03CF35|$0F:$CF25:D0 00 BNE $CF27 ; control flow target (from $CEF8, $CEFF, $CF11, $CF15, $CF1B, $CF25) 0x03CF37|$0F:$CF27:A9 FF LDA #$FF 0x03CF39|$0F:$CF29:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03CF3B|$0F:$CF2B:60 RTS ; code -> data ; indexed data load target (from $CE89) 0x03CF3C|$0F:$CF2C:55 ; Map ID #$55: Lighthouse 6F 0x03CF3D|$0F:$CF2D:54 ; Map ID #$54: Lighthouse 5F 0x03CF3E|$0F:$CF2E:53 ; Map ID #$53: Lighthouse 4F 0x03CF3F|$0F:$CF2F:52 ; Map ID #$52: Lighthouse 3F 0x03CF40|$0F:$CF30:51 ; Map ID #$51: Lighthouse 2F ; indexed data load target (from $CE90, $CEBB) ; indirect data load target 0x03CF41|$0F:$CF31:0F ; indirect data load target 0x03CF42|$0F:$CF32:11 ; indirect data load target 0x03CF43|$0F:$CF33:13 ; indirect data load target 0x03CF44|$0F:$CF34:15 ; indirect data load target 0x03CF45|$0F:$CF35:17 ; indexed data load target (from $CE95) ; indirect data load target 0x03CF46|$0F:$CF36:12 ; indirect data load target 0x03CF47|$0F:$CF37:1A ; indirect data load target 0x03CF48|$0F:$CF38:16 ; indirect data load target 0x03CF49|$0F:$CF39:1E ; indirect data load target 0x03CF4A|$0F:$CF3A:1D ; indexed data load target (from $CE9B) ; indirect data load target 0x03CF4B|$0F:$CF3B:1B ; indirect data load target 0x03CF4C|$0F:$CF3C:0F ; indirect data load target 0x03CF4D|$0F:$CF3D:1B ; indirect data load target 0x03CF4E|$0F:$CF3E:17 ; indirect data load target 0x03CF4F|$0F:$CF3F:1E ; indexed data load target (from $CEA1) ; indirect data load target 0x03CF50|$0F:$CF40:03 ; indirect data load target 0x03CF51|$0F:$CF41:02 ; indirect data load target 0x03CF52|$0F:$CF42:01 ; indirect data load target 0x03CF53|$0F:$CF43:02 ; indirect data load target 0x03CF54|$0F:$CF44:02 ; indexed data load target (from $CEA8) ; indirect data load target 0x03CF55|$0F:$CF45:0E ; indirect data load target 0x03CF56|$0F:$CF46:10 ; indirect data load target 0x03CF57|$0F:$CF47:12 ; indirect data load target 0x03CF58|$0F:$CF48:14 ; indirect data load target 0x03CF59|$0F:$CF49:16 ; indexed data load target (from $CEAF) ; indirect data load target 0x03CF5A|$0F:$CF4A:01 ; indirect data load target 0x03CF5B|$0F:$CF4B:19 ; indirect data load target 0x03CF5C|$0F:$CF4C:1B ; indirect data load target 0x03CF5D|$0F:$CF4D:13 ; indirect data load target 0x03CF5E|$0F:$CF4E:23 ; indexed data load target (from $CEB6) ; indirect data load target 0x03CF5F|$0F:$CF4F:18 ; indirect data load target 0x03CF60|$0F:$CF50:18 ; indirect data load target 0x03CF61|$0F:$CF51:12 ; indirect data load target 0x03CF62|$0F:$CF52:1E ; indirect data load target 0x03CF63|$0F:$CF53:1E ; motion script pointers for Lighthouse Wizard ; indexed data load target (from $CECC) ; indirect data load target 0x03CF64|$0F:$CF54:72 ; indexed data load target (from $CED2) 0x03CF65|$0F:$CF55: 80 ; $07:$8072; motion script for Lighthouse Wizard part 3 0x03CF66|$0F:$CF56:87 80 ; $07:$8087; motion script for Lighthouse Wizard part 4 0x03CF68|$0F:$CF58:92 80 ; $07:$8092; motion script for Lighthouse Wizard part 5 0x03CF6A|$0F:$CF5A:A0 80 ; $07:$80A0; motion script for Lighthouse Wizard part 6 0x03CF6C|$0F:$CF5C:B3 80 ; $07:$80B3; motion script for Lighthouse Wizard part 7 ; data -> code ; external control flow target (from $02:$B1FD) 0x03CF6E|$0F:$CF5E:20 CB D8 JSR $D8CB 0x03CF71|$0F:$CF61:4C 70 F7 JMP $F770 ; load ROM bank #$02 ; external control flow target (from $06:$8053, $06:$827A, $06:$9371, $06:$A311, $06:$BBC4, $06:$BC2D) 0x03CF74|$0F:$CF64:20 CB D8 JSR $D8CB ; load ROM bank #$06 ; control flow target (from $CF6D, $CF73, $CF79) 0x03CF77|$0F:$CF67:4C 61 F7 JMP $F761 ; load ROM bank #$06 ; wipe selected menu region ; external control flow target (from $06:$806F, $06:$8097, $06:$84C9, $06:$8A16, $06:$8A5C, $06:$8B09, $06:$9555, $06:$9CE0) 0x03CF7A|$0F:$CF6A:20 8C F7 JSR $F78C ; wipe selected menu region 0x03CF7D|$0F:$CF6D:4C 67 CF JMP $CF67 ; load ROM bank #$06 ; external control flow target (from $06:$80AD, $06:$96E1) 0x03CF80|$0F:$CF70:20 87 F7 JSR $F787 0x03CF83|$0F:$CF73:4C 67 CF JMP $CF67 ; load ROM bank #$06 ; external control flow target (from $06:$826D) 0x03CF86|$0F:$CF76:20 F7 D2 JSR $D2F7 0x03CF89|$0F:$CF79:4C 67 CF JMP $CF67 ; load ROM bank #$06 ; external control flow target (from $06:$8C6A, $06:$8C77, $06:$8C84, $06:$9775) 0x03CF8C|$0F:$CF7C:A9 00 LDA #$00 0x03CF8E|$0F:$CF7E:85 49 STA $49 ; object hero/target/item/string ID $49 0x03CF90|$0F:$CF80:20 6B D0 JSR $D06B ; copy $16 to $0C, $17 to $0E 0x03CF93|$0F:$CF83:C6 0E DEC $0E ; check up 0x03CF95|$0F:$CF85:20 A5 CF JSR $CFA5 0x03CF98|$0F:$CF88:20 6B D0 JSR $D06B ; copy $16 to $0C, $17 to $0E 0x03CF9B|$0F:$CF8B:E6 0C INC $0C ; check right 0x03CF9D|$0F:$CF8D:20 A5 CF JSR $CFA5 0x03CFA0|$0F:$CF90:20 6B D0 JSR $D06B ; copy $16 to $0C, $17 to $0E 0x03CFA3|$0F:$CF93:E6 0E INC $0E ; check down 0x03CFA5|$0F:$CF95:20 A5 CF JSR $CFA5 0x03CFA8|$0F:$CF98:20 6B D0 JSR $D06B ; copy $16 to $0C, $17 to $0E 0x03CFAB|$0F:$CF9B:C6 0C DEC $0C ; check left 0x03CFAD|$0F:$CF9D:20 A5 CF JSR $CFA5 0x03CFB0|$0F:$CFA0:A5 94 LDA $94 ; return bank for various function calls, doubles as index of selected option for multiple-choice menus 0x03CFB2|$0F:$CFA2:4C D5 C3 JMP $C3D5 ; save A to $05F6, X to $43, and load bank specified by A ; control flow target (from $CF85, $CF8D, $CF95, $CF9D) 0x03CFB5|$0F:$CFA5:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03CFB8|$0F:$CFA8:20 89 DF JSR $DF89 0x03CFBB|$0F:$CFAB:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03CFBD|$0F:$CFAD:D0 01 BNE $CFB0 ; control flow target (from $CFB8, $CFBC, $CFCB, $D000, $D006, $D00A) 0x03CFBF|$0F:$CFAF:60 RTS ; control flow target (from $CFAD) 0x03CFC0|$0F:$CFB0:C9 01 CMP #$01 0x03CFC2|$0F:$CFB2:D0 48 BNE $CFFC 0x03CFC4|$0F:$CFB4:A5 0C LDA $0C 0x03CFC6|$0F:$CFB6:C9 18 CMP #$18 0x03CFC8|$0F:$CFB8:90 F5 BCC $CFAF 0x03CFCA|$0F:$CFBA:C9 1B CMP #$1B 0x03CFCC|$0F:$CFBC:B0 F1 BCS $CFAF 0x03CFCE|$0F:$CFBE:A9 01 LDA #$01 0x03CFD0|$0F:$CFC0:05 49 ORA $49 ; object hero/target/item/string ID $49 0x03CFD2|$0F:$CFC2:85 49 STA $49 ; object hero/target/item/string ID $49 0x03CFD4|$0F:$CFC4:A5 C9 LDA $C9 0x03CFD6|$0F:$CFC6:18 CLC 0x03CFD7|$0F:$CFC7:69 18 ADC #$18 0x03CFD9|$0F:$CFC9:C5 0C CMP $0C 0x03CFDB|$0F:$CFCB:D0 E2 BNE $CFAF 0x03CFDD|$0F:$CFCD:20 58 D0 JSR $D058 0x03CFE0|$0F:$CFD0:A9 FF LDA #$FF 0x03CFE2|$0F:$CFD2:85 49 STA $49 ; object hero/target/item/string ID $49 0x03CFE4|$0F:$CFD4:A5 12 LDA $12 0x03CFE6|$0F:$CFD6:99 2A 05 STA $052A,Y 0x03CFE9|$0F:$CFD9:A5 13 LDA $13 0x03CFEB|$0F:$CFDB:99 2B 05 STA $052B,Y 0x03CFEE|$0F:$CFDE:A5 12 LDA $12 0x03CFF0|$0F:$CFE0:38 SEC 0x03CFF1|$0F:$CFE1:E5 16 SBC $16 ; current map X-pos (1) 0x03CFF3|$0F:$CFE3:0A ASL 0x03CFF4|$0F:$CFE4:85 18 STA $18 0x03CFF6|$0F:$CFE6:A5 13 LDA $13 0x03CFF8|$0F:$CFE8:38 SEC 0x03CFF9|$0F:$CFE9:E5 17 SBC $17 ; current map Y-pos (1) 0x03CFFB|$0F:$CFEB:0A ASL 0x03CFFC|$0F:$CFEC:85 19 STA $19 0x03CFFE|$0F:$CFEE:A9 00 LDA #$00 0x03D000|$0F:$CFF0:85 1C STA $1C 0x03D002|$0F:$CFF2:85 1E STA $1E 0x03D004|$0F:$CFF4:A9 93 LDA #$93 ; Music ID #$93: door open SFX 0x03D006|$0F:$CFF6:20 61 C5 JSR $C561 ; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM]) 0x03D009|$0F:$CFF9:4C 74 D0 JMP $D074 ; control flow target (from $CFB2) 0x03D00C|$0F:$CFFC:A5 C9 LDA $C9 0x03D00E|$0F:$CFFE:C9 02 CMP #$02 0x03D010|$0F:$D000:B0 AD BCS $CFAF 0x03D012|$0F:$D002:A5 0C LDA $0C 0x03D014|$0F:$D004:C9 18 CMP #$18 0x03D016|$0F:$D006:90 A7 BCC $CFAF 0x03D018|$0F:$D008:C9 1C CMP #$1C 0x03D01A|$0F:$D00A:B0 A3 BCS $CFAF 0x03D01C|$0F:$D00C:A9 01 LDA #$01 0x03D01E|$0F:$D00E:05 49 ORA $49 ; object hero/target/item/string ID $49 0x03D020|$0F:$D010:85 49 STA $49 ; object hero/target/item/string ID $49 0x03D022|$0F:$D012:20 58 D0 JSR $D058 0x03D025|$0F:$D015:A9 FF LDA #$FF 0x03D027|$0F:$D017:85 49 STA $49 ; object hero/target/item/string ID $49 0x03D029|$0F:$D019:A5 12 LDA $12 0x03D02B|$0F:$D01B:99 2A 05 STA $052A,Y 0x03D02E|$0F:$D01E:A5 13 LDA $13 0x03D030|$0F:$D020:99 2B 05 STA $052B,Y 0x03D033|$0F:$D023:A5 12 LDA $12 0x03D035|$0F:$D025:0A ASL 0x03D036|$0F:$D026:38 SEC 0x03D037|$0F:$D027:E5 16 SBC $16 ; current map X-pos (1) 0x03D039|$0F:$D029:0A ASL 0x03D03A|$0F:$D02A:85 18 STA $18 0x03D03C|$0F:$D02C:A5 13 LDA $13 0x03D03E|$0F:$D02E:0A ASL 0x03D03F|$0F:$D02F:38 SEC 0x03D040|$0F:$D030:E5 17 SBC $17 ; current map Y-pos (1) 0x03D042|$0F:$D032:0A ASL 0x03D043|$0F:$D033:85 19 STA $19 0x03D045|$0F:$D035:A9 00 LDA #$00 0x03D047|$0F:$D037:85 1C STA $1C 0x03D049|$0F:$D039:85 1E STA $1E 0x03D04B|$0F:$D03B:A9 93 LDA #$93 ; Music ID #$93: door open SFX 0x03D04D|$0F:$D03D:20 61 C5 JSR $C561 ; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM]) 0x03D050|$0F:$D040:20 74 D0 JSR $D074 0x03D053|$0F:$D043:E6 18 INC $18 0x03D055|$0F:$D045:E6 18 INC $18 0x03D057|$0F:$D047:20 74 D0 JSR $D074 0x03D05A|$0F:$D04A:E6 19 INC $19 0x03D05C|$0F:$D04C:E6 19 INC $19 0x03D05E|$0F:$D04E:20 74 D0 JSR $D074 0x03D061|$0F:$D051:C6 18 DEC $18 0x03D063|$0F:$D053:C6 18 DEC $18 0x03D065|$0F:$D055:4C 74 D0 JMP $D074 ; control flow target (from $CAC3, $CFCD, $D012) 0x03D068|$0F:$D058:A0 00 LDY #$00 ; control flow target (from $D066) 0x03D06A|$0F:$D05A:B9 2A 05 LDA $052A,Y 0x03D06D|$0F:$D05D:19 2B 05 ORA $052B,Y 0x03D070|$0F:$D060:F0 08 BEQ $D06A 0x03D072|$0F:$D062:C8 INY 0x03D073|$0F:$D063:C8 INY 0x03D074|$0F:$D064:C0 10 CPY #$10 0x03D076|$0F:$D066:D0 F2 BNE $D05A 0x03D078|$0F:$D068:68 PLA 0x03D079|$0F:$D069:68 PLA ; control flow target (from $D060) 0x03D07A|$0F:$D06A:60 RTS ; copy $16 to $0C, $17 to $0E ; control flow target (from $CF80, $CF88, $CF90, $CF98, $D0A0) 0x03D07B|$0F:$D06B:A5 16 LDA $16 ; current map X-pos (1) 0x03D07D|$0F:$D06D:85 0C STA $0C 0x03D07F|$0F:$D06F:A5 17 LDA $17 ; current map Y-pos (1) 0x03D081|$0F:$D071:85 0E STA $0E 0x03D083|$0F:$D073:60 RTS ; control flow target (from $CFF9, $D040, $D047, $D04E, $D055) 0x03D084|$0F:$D074:A5 18 LDA $18 0x03D086|$0F:$D076:18 CLC 0x03D087|$0F:$D077:69 10 ADC #$10 0x03D089|$0F:$D079:85 0C STA $0C 0x03D08B|$0F:$D07B:A5 19 LDA $19 0x03D08D|$0F:$D07D:18 CLC 0x03D08E|$0F:$D07E:69 0E ADC #$0E 0x03D090|$0F:$D080:85 0E STA $0E 0x03D092|$0F:$D082:20 2D DE JSR $DE2D 0x03D095|$0F:$D085:A0 00 LDY #$00 0x03D097|$0F:$D087:B1 07 LDA ($07),Y 0x03D099|$0F:$D089:F0 01 BEQ $D08C 0x03D09B|$0F:$D08B:60 RTS ; control flow target (from $D089) 0x03D09C|$0F:$D08C:A9 00 LDA #$00 0x03D09E|$0F:$D08E:85 1C STA $1C 0x03D0A0|$0F:$D090:85 1E STA $1E 0x03D0A2|$0F:$D092:4C C5 DE JMP $DEC5 ; external control flow target (from $06:$9B30) 0x03D0A5|$0F:$D095:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03D0A7|$0F:$D097:D0 07 BNE $D0A0 ; control flow target (from $D0AA, $D0BC) 0x03D0A9|$0F:$D099:A5 94 LDA $94 ; return bank for various function calls, doubles as index of selected option for multiple-choice menus 0x03D0AB|$0F:$D09B:20 D5 C3 JSR $C3D5 ; save A to $05F6, X to $43, and load bank specified by A 0x03D0AE|$0F:$D09E:18 CLC 0x03D0AF|$0F:$D09F:60 RTS ; control flow target (from $D097) 0x03D0B0|$0F:$D0A0:20 6B D0 JSR $D06B ; copy $16 to $0C, $17 to $0E 0x03D0B3|$0F:$D0A3:20 89 DF JSR $DF89 0x03D0B6|$0F:$D0A6:A5 0C LDA $0C 0x03D0B8|$0F:$D0A8:C9 14 CMP #$14 0x03D0BA|$0F:$D0AA:D0 ED BNE $D099 0x03D0BC|$0F:$D0AC:A0 00 LDY #$00 ; control flow target (from $D0BA) 0x03D0BE|$0F:$D0AE:B9 1A 05 LDA $051A,Y ; something to do with whether you've opened the chest containing the Shield of Erdrick 0x03D0C1|$0F:$D0B1:19 1B 05 ORA $051B,Y 0x03D0C4|$0F:$D0B4:F0 08 BEQ $D0BE 0x03D0C6|$0F:$D0B6:C8 INY 0x03D0C7|$0F:$D0B7:C8 INY 0x03D0C8|$0F:$D0B8:C0 10 CPY #$10 0x03D0CA|$0F:$D0BA:D0 F2 BNE $D0AE 0x03D0CC|$0F:$D0BC:F0 DB BEQ $D099 ; control flow target (from $D0B4) 0x03D0CE|$0F:$D0BE:A5 12 LDA $12 0x03D0D0|$0F:$D0C0:99 1A 05 STA $051A,Y ; something to do with whether you've opened the chest containing the Shield of Erdrick 0x03D0D3|$0F:$D0C3:A5 13 LDA $13 0x03D0D5|$0F:$D0C5:99 1B 05 STA $051B,Y 0x03D0D8|$0F:$D0C8:A0 00 LDY #$00 0x03D0DA|$0F:$D0CA:B1 10 LDA ($10),Y 0x03D0DC|$0F:$D0CC:29 E0 AND #$E0 0x03D0DE|$0F:$D0CE:91 10 STA ($10),Y 0x03D0E0|$0F:$D0D0:A9 92 LDA #$92 ; Music ID #$92: open chest SFX 0x03D0E2|$0F:$D0D2:20 61 C5 JSR $C561 ; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM]) 0x03D0E5|$0F:$D0D5:A9 00 LDA #$00 0x03D0E7|$0F:$D0D7:85 18 STA $18 0x03D0E9|$0F:$D0D9:85 19 STA $19 0x03D0EB|$0F:$D0DB:85 1C STA $1C 0x03D0ED|$0F:$D0DD:85 1E STA $1E 0x03D0EF|$0F:$D0DF:20 C5 DE JSR $DEC5 0x03D0F2|$0F:$D0E2:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03D0F5|$0F:$D0E5:A5 94 LDA $94 ; return bank for various function calls, doubles as index of selected option for multiple-choice menus 0x03D0F7|$0F:$D0E7:20 D5 C3 JSR $C3D5 ; save A to $05F6, X to $43, and load bank specified by A 0x03D0FA|$0F:$D0EA:38 SEC 0x03D0FB|$0F:$D0EB:60 RTS ; update each hero's stats based on their current EXP ; control flow target (from $F5AE) ; external control flow target (from $06:$8B04) 0x03D0FC|$0F:$D0EC:20 66 F7 JSR $F766 ; load ROM bank #$04 ; call to code in a different bank ($04:$8009) 0x03D0FF|$0F:$D0EF:20 09 80 JSR $8009 ; update each hero's stats based on their current EXP 0x03D102|$0F:$D0F2:4C 61 F7 JMP $F761 ; load ROM bank #$06 ; wait for a while and then wipe menu regions #$03, #$00, and #$01 ; control flow target (from $C84A, $C85A, $C944, $C9AF, $CA39, $CAA9, $CB36, $CB94, $CC00, $CC0E, $CC59, $CC76, $D1A1, $D1C6) ; external control flow target (from $06:$90C3, $06:$91B7, $06:$935C, $06:$9374, $06:$96A8, $06:$9709, $06:$979E, $06:$98F0, $06:$A1B1, $06:$A2F8, $06:$BB80, $06:$BBB3, $06:$BBD7, $07:$81FC, $07:$8227, $07:$8238, $07:$827F, $07:$82EB, $07:$8355, $07:$8366, $07:$837B, $07:$8402, $07:$84CB, $07:$8595) 0x03D105|$0F:$D0F5:8A TXA ; save X on the stack; pointless since X gets overwritten before next use 0x03D106|$0F:$D0F6:48 PHA 0x03D107|$0F:$D0F7:A2 1E LDX #$1E 0x03D109|$0F:$D0F9:20 EE C1 JSR $C1EE ; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF 0x03D10C|$0F:$D0FC:68 PLA ; restore X from the stack 0x03D10D|$0F:$D0FD:AA TAX 0x03D10E|$0F:$D0FE:AD 2C 06 LDA $062C ; current battle message delay 0x03D111|$0F:$D101:C9 28 CMP #$28 ; FAST uses #$82 0x03D113|$0F:$D103:F0 0C BEQ $D111 0x03D115|$0F:$D105:C9 46 CMP #$46 ; NORMAL uses #$AA 0x03D117|$0F:$D107:F0 04 BEQ $D10D 0x03D119|$0F:$D109:A9 E6 LDA #$E6 ; ergo SLOW uses #$E6 0x03D11B|$0F:$D10B:D0 06 BNE $D113 ; control flow target (from $D107) 0x03D11D|$0F:$D10D:A9 AA LDA #$AA ; from NORMAL 0x03D11F|$0F:$D10F:D0 02 BNE $D113 ; control flow target (from $D103) 0x03D121|$0F:$D111:A9 82 LDA #$82 ; from FAST ; control flow target (from $D10B, $D10F) 0x03D123|$0F:$D113:85 93 STA $93 ; NMI counter, decremented once per NMI until it reaches 0 ; wait until battle message delay reaches zero or no buttons pressed ; control flow target (from $D11E) 0x03D125|$0F:$D115:20 3D D1 JSR $D13D ; wait for interrupt, read joypad data into $2F and A 0x03D128|$0F:$D118:A6 93 LDX $93 ; NMI counter, decremented once per NMI until it reaches 0 0x03D12A|$0F:$D11A:F0 0F BEQ $D12B 0x03D12C|$0F:$D11C:C9 00 CMP #$00 0x03D12E|$0F:$D11E:D0 F5 BNE $D115 ; wait until battle message delay reaches is zero or some button pressed ; control flow target (from $D129) 0x03D130|$0F:$D120:20 3D D1 JSR $D13D ; wait for interrupt, read joypad data into $2F and A 0x03D133|$0F:$D123:A6 93 LDX $93 ; NMI counter, decremented once per NMI until it reaches 0 0x03D135|$0F:$D125:F0 04 BEQ $D12B 0x03D137|$0F:$D127:C9 00 CMP #$00 0x03D139|$0F:$D129:F0 F5 BEQ $D120 ; control flow target (from $D11A, $D125) 0x03D13B|$0F:$D12B:20 89 FA JSR $FA89 ; useless JSR to RTS?! 0x03D13E|$0F:$D12E:A9 03 LDA #$03 0x03D140|$0F:$D130:20 8C F7 JSR $F78C ; wipe selected menu region 0x03D143|$0F:$D133:A9 00 LDA #$00 0x03D145|$0F:$D135:20 8C F7 JSR $F78C ; wipe selected menu region 0x03D148|$0F:$D138:A9 01 LDA #$01 0x03D14A|$0F:$D13A:4C 8C F7 JMP $F78C ; wipe selected menu region ; wait for interrupt, read joypad data into $2F and A ; control flow target (from $D115, $D120) ; external control flow target (from $06:$809D, $06:$80A2) 0x03D14D|$0F:$D13D:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03D150|$0F:$D140:20 76 C4 JSR $C476 ; read joypad 1 data into $2F 0x03D153|$0F:$D143:A5 2F LDA $2F ; joypad 1 data 0x03D155|$0F:$D145:60 RTS ; heal hero ID in A by random amount based on healing power in X ; external control flow target (from $06:$8BED) 0x03D156|$0F:$D146:20 66 F7 JSR $F766 ; load ROM bank #$04 ; call to code in a different bank ($04:$8006) 0x03D159|$0F:$D149:20 06 80 JSR $8006 0x03D15C|$0F:$D14C:4C 61 F7 JMP $F761 ; load ROM bank #$06 ; control flow target (from $FF60) ; external control flow target (from $06:$A848, $06:$A98F) 0x03D15F|$0F:$D14F:A9 00 LDA #$00 0x03D161|$0F:$D151:85 27 STA $27 ; map palette; offset from ($E27C) 0x03D163|$0F:$D153:20 F9 E2 JSR $E2F9 0x03D166|$0F:$D156:4C 61 F7 JMP $F761 ; load ROM bank #$06 ; external control flow target (from $06:$A35D) 0x03D169|$0F:$D159:A5 94 LDA $94 ; return bank for various function calls, doubles as index of selected option for multiple-choice menus 0x03D16B|$0F:$D15B:48 PHA 0x03D16C|$0F:$D15C:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03D16F|$0F:$D15F:C4 ; $06:$8008 ; data -> code 0x03D170|$0F:$D160:20 2A FA JSR $FA2A ; display string ID specified by next byte ; code -> data ; indirect data load target 0x03D173|$0F:$D163:7A ; String ID #$007A: ‘Then farewell and good luck!’[end-FC] ; data -> code ; control flow target (from $D172) 0x03D174|$0F:$D164:20 61 F7 JSR $F761 ; load ROM bank #$06 0x03D177|$0F:$D167:68 PLA 0x03D178|$0F:$D168:85 94 STA $94 ; return bank for various function calls, doubles as index of selected option for multiple-choice menus 0x03D17A|$0F:$D16A:60 RTS ; external control flow target (from $06:$8F20) 0x03D17B|$0F:$D16B:A5 94 LDA $94 ; return bank for various function calls, doubles as index of selected option for multiple-choice menus 0x03D17D|$0F:$D16D:48 PHA 0x03D17E|$0F:$D16E:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03D181|$0F:$D171:C4 ; $06:$8008 ; data -> code 0x03D182|$0F:$D172:4C 64 D1 JMP $D164 ; external control flow target (from $06:$A882) 0x03D185|$0F:$D175:A9 8F LDA #$8F 0x03D187|$0F:$D177:85 30 STA $30 0x03D189|$0F:$D179:20 DE D2 JSR $D2DE 0x03D18C|$0F:$D17C:20 75 F7 JSR $F775 ; load ROM bank #$03 ; call to code in a different bank ($03:$8006) 0x03D18F|$0F:$D17F:20 06 80 JSR $8006 0x03D192|$0F:$D182:A9 FF LDA #$FF 0x03D194|$0F:$D184:85 8E STA $8E ; flag for in battle or not (#$FF)? 0x03D196|$0F:$D186:A9 04 LDA #$04 ; Menu ID #$04: Dialogue window 0x03D198|$0F:$D188:20 89 EB JSR $EB89 ; open menu specified by A 0x03D19B|$0F:$D18B:A9 00 LDA #$00 0x03D19D|$0F:$D18D:85 27 STA $27 ; map palette; offset from ($E27C) 0x03D19F|$0F:$D18F:20 F9 E2 JSR $E2F9 0x03D1A2|$0F:$D192:E6 8E INC $8E ; flag for in battle or not (#$FF)? 0x03D1A4|$0F:$D194:A9 7B LDA #$7B ; String ID #$007B: In that case, return when thou can, for Hargon does not sleep.[wait][line]In order to preserve the Imperial Scrolls of honor, please hold the REST button in while pushing the POWER button off.[wait][line]If you turn off the POWER first, you may lose the record of your great deeds, and that would be a shame.[line][FD][FD] [line][end-FC] 0x03D1A6|$0F:$D196:20 4A FA JSR $FA4A ; display string ID specified by A 0x03D1A9|$0F:$D199:A9 10 LDA #$10 0x03D1AB|$0F:$D19B:20 36 C6 JSR $C636 ; set CHR bank 0 based on A ; infinite loop ; control flow target (from $D19E) 0x03D1AE|$0F:$D19E:4C 9E D1 JMP $D19E ; infinite loop ; handle Hamlin Waterway Gremlins fight ; external control flow target (from $06:$906E) 0x03D1B1|$0F:$D1A1:20 F5 D0 JSR $D0F5 ; wait for a while and then wipe menu regions #$03, #$00, and #$01 0x03D1B4|$0F:$D1A4:20 66 F7 JSR $F766 ; load ROM bank #$04 0x03D1B7|$0F:$D1A7:A9 03 LDA #$03 ; Fixed Battle #$03: 2 Ozwargs (Map ID #$08: Hamlin Waterway) ; call to code in a different bank ($04:$800F) 0x03D1B9|$0F:$D1A9:20 0F 80 JSR $800F 0x03D1BC|$0F:$D1AC:A5 98 LDA $98 ; outcome of last fight? 0x03D1BE|$0F:$D1AE:C9 FC CMP #$FC 0x03D1C0|$0F:$D1B0:F0 0E BEQ $D1C0 0x03D1C2|$0F:$D1B2:A9 02 LDA #$02 0x03D1C4|$0F:$D1B4:05 D1 ORA $D1 ; fixed battle status bits (#$10 = Zarlox, #$08 = Bazuzu, #$04 = Atlas, #$02 = Hamlin Waterway Gremlins, #$01 = Evil Clown) 0x03D1C6|$0F:$D1B6:85 D1 STA $D1 ; fixed battle status bits (#$10 = Zarlox, #$08 = Bazuzu, #$04 = Atlas, #$02 = Hamlin Waterway Gremlins, #$01 = Evil Clown) 0x03D1C8|$0F:$D1B8:A9 FF LDA #$FF 0x03D1CA|$0F:$D1BA:8D 59 05 STA $0559 ; NPC #$03 sprite ID 0x03D1CD|$0F:$D1BD:8D 61 05 STA $0561 ; NPC #$04 sprite ID ; control flow target (from $D1B0) 0x03D1D0|$0F:$D1C0:20 62 D2 JSR $D262 0x03D1D3|$0F:$D1C3:4C FB D2 JMP $D2FB ; load ROM bank 6 ; external control flow target (from $06:$9342) 0x03D1D6|$0F:$D1C6:20 F5 D0 JSR $D0F5 ; wait for a while and then wipe menu regions #$03, #$00, and #$01 0x03D1D9|$0F:$D1C9:20 66 F7 JSR $F766 ; load ROM bank #$04 0x03D1DC|$0F:$D1CC:A9 04 LDA #$04 ; Fixed Battle #$04: 2 Gold Batboons (Map ID #$16: Hargon's Castle 1F) ; call to code in a different bank ($04:$800F) 0x03D1DE|$0F:$D1CE:20 0F 80 JSR $800F 0x03D1E1|$0F:$D1D1:A5 98 LDA $98 ; outcome of last fight? 0x03D1E3|$0F:$D1D3:C9 FC CMP #$FC 0x03D1E5|$0F:$D1D5:F0 08 BEQ $D1DF 0x03D1E7|$0F:$D1D7:A9 FF LDA #$FF 0x03D1E9|$0F:$D1D9:8D 81 05 STA $0581 ; NPC #$08 sprite ID 0x03D1EC|$0F:$D1DC:8D 89 05 STA $0589 ; NPC #$09 sprite ID ; control flow target (from $D1D5) 0x03D1EF|$0F:$D1DF:20 62 D2 JSR $D262 0x03D1F2|$0F:$D1E2:4C FB D2 JMP $D2FB ; load ROM bank 6 ; trigger Fixed Battle #$01: 1 Evil Clown (Map ID #$04: Midenhall B1) ; external control flow target (from $06:$80E5) 0x03D1F5|$0F:$D1E5:A9 FF LDA #$FF 0x03D1F7|$0F:$D1E7:8D 69 05 STA $0569 ; NPC #$05 sprite ID 0x03D1FA|$0F:$D1EA:A9 01 LDA #$01 ; Fixed Battle #$01: 1 Evil Clown (Map ID #$04: Midenhall B1) 0x03D1FC|$0F:$D1EC:20 5C D2 JSR $D25C ; trigger fixed battle A 0x03D1FF|$0F:$D1EF:A9 01 LDA #$01 0x03D201|$0F:$D1F1:05 D1 ORA $D1 ; fixed battle status bits (#$10 = Zarlox, #$08 = Bazuzu, #$04 = Atlas, #$02 = Hamlin Waterway Gremlins, #$01 = Evil Clown) 0x03D203|$0F:$D1F3:85 D1 STA $D1 ; fixed battle status bits (#$10 = Zarlox, #$08 = Bazuzu, #$04 = Atlas, #$02 = Hamlin Waterway Gremlins, #$01 = Evil Clown) 0x03D205|$0F:$D1F5:4C FB D2 JMP $D2FB ; load ROM bank 6 ; trigger Fixed Battle #$0B: 1 Hargon (Map ID #$17: Hargon's Castle 7F) ; external control flow target (from $06:$935F) 0x03D208|$0F:$D1F8:A9 0B LDA #$0B ; Fixed Battle #$0B: 1 Hargon (Map ID #$17: Hargon's Castle 7F) 0x03D20A|$0F:$D1FA:20 5C D2 JSR $D25C ; trigger fixed battle A 0x03D20D|$0F:$D1FD:4C FB D2 JMP $D2FB ; load ROM bank 6 ; external control flow target (from $06:$BD2A) 0x03D210|$0F:$D200:20 66 F7 JSR $F766 ; load ROM bank #$04 0x03D213|$0F:$D203:A9 0C LDA #$0C ; Fixed Battle #$0C: 1 Malroth (Map ID #$17: Hargon's Castle 7F) ; call to code in a different bank ($04:$800F) 0x03D215|$0F:$D205:20 0F 80 JSR $800F 0x03D218|$0F:$D208:A9 FF LDA #$FF 0x03D21A|$0F:$D20A:85 44 STA $44 ; non-saved event status (#$00 = event start, #$01 = Lianport Gremlins defeated, #$02 = met with Lianport grandfather/have no friends at Shrine SW of Cannock, #$03 = King Midenhall moved to stairs, #$04 = King Midenhall moved down stairs, #$05 = King Midenhall spoke on Midenhall 1F, #$0B = Lighthouse Wizard 7F, #$1B Lighthouse Wizard 2F spoke, #$64 = Hargon dead, #$FF = event end) 0x03D21C|$0F:$D20C:A5 98 LDA $98 ; outcome of last fight? 0x03D21E|$0F:$D20E:C9 FF CMP #$FF 0x03D220|$0F:$D210:D0 03 BNE $D215 0x03D222|$0F:$D212:4C 67 D2 JMP $D267 ; control flow target (from $D210) 0x03D225|$0F:$D215:4C 61 F7 JMP $F761 ; load ROM bank #$06 ; open path to Sea Cave ; external control flow target (from $06:$98FD) 0x03D228|$0F:$D218:A9 97 LDA #$97 ; Music ID #$97: shoals submerging SFX 0x03D22A|$0F:$D21A:20 61 C5 JSR $C561 ; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM]) 0x03D22D|$0F:$D21D:20 5C F7 JSR $F75C ; load ROM bank #$00 0x03D230|$0F:$D220:A9 00 LDA #$00 ; call to code in a different bank ($00:$8006) 0x03D232|$0F:$D222:20 06 80 JSR $8006 0x03D235|$0F:$D225:A9 32 LDA #$32 0x03D237|$0F:$D227:85 41 STA $41 0x03D239|$0F:$D229:20 38 E9 JSR $E938 0x03D23C|$0F:$D22C:A9 97 LDA #$97 ; Music ID #$97: shoals submerging SFX 0x03D23E|$0F:$D22E:20 61 C5 JSR $C561 ; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM]) 0x03D241|$0F:$D231:20 5C F7 JSR $F75C ; load ROM bank #$00 0x03D244|$0F:$D234:A9 FF LDA #$FF ; call to code in a different bank ($00:$8006) 0x03D246|$0F:$D236:20 06 80 JSR $8006 0x03D249|$0F:$D239:68 PLA 0x03D24A|$0F:$D23A:68 PLA 0x03D24B|$0F:$D23B:4C 61 F7 JMP $F761 ; load ROM bank #$06 ; external control flow target (from $06:$96B0) 0x03D24E|$0F:$D23E:20 5C F7 JSR $F75C ; load ROM bank #$00 ; call to code in a different bank ($00:$8009) 0x03D251|$0F:$D241:20 09 80 JSR $8009 0x03D254|$0F:$D244:A9 01 LDA #$01 0x03D256|$0F:$D246:8D F9 05 STA $05F9 ; flag for Cave to Rhone open 0x03D259|$0F:$D249:A9 32 LDA #$32 0x03D25B|$0F:$D24B:85 41 STA $41 0x03D25D|$0F:$D24D:20 38 E9 JSR $E938 0x03D260|$0F:$D250:20 5C F7 JSR $F75C ; load ROM bank #$00 ; call to code in a different bank ($00:$800C) 0x03D263|$0F:$D253:4C 0C 80 JMP $800C ; external control flow target (from $06:$97BA, $06:$97C1) 0x03D266|$0F:$D256:20 C5 DE JSR $DEC5 0x03D269|$0F:$D259:4C 61 F7 JMP $F761 ; load ROM bank #$06 ; trigger fixed battle A ; control flow target (from $C8D1, $CAFC, $CC38, $CC94, $D1EC, $D1FA) 0x03D26C|$0F:$D25C:20 66 F7 JSR $F766 ; load ROM bank #$04 ; call to code in a different bank ($04:$800F) 0x03D26F|$0F:$D25F:20 0F 80 JSR $800F ; control flow target (from $C908, $C972, $D1C0, $D1DF) 0x03D272|$0F:$D262:A5 98 LDA $98 ; outcome of last fight? 0x03D274|$0F:$D264:D0 01 BNE $D267 0x03D276|$0F:$D266:60 RTS ; control flow target (from $D212, $D264) 0x03D277|$0F:$D267:A9 00 LDA #$00 0x03D279|$0F:$D269:85 8E STA $8E ; flag for in battle or not (#$FF)? 0x03D27B|$0F:$D26B:A5 98 LDA $98 ; outcome of last fight? 0x03D27D|$0F:$D26D:C9 FF CMP #$FF 0x03D27F|$0F:$D26F:D0 24 BNE $D295 ; external control flow target (from $06:$A25A) 0x03D281|$0F:$D271:A9 26 LDA #$26 0x03D283|$0F:$D273:8D 0E 05 STA $050E 0x03D286|$0F:$D276:20 DE D2 JSR $D2DE 0x03D289|$0F:$D279:A9 84 LDA #$84 0x03D28B|$0F:$D27B:8D 2D 06 STA $062D ; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03D28E|$0F:$D27E:A2 FF LDX #$FF 0x03D290|$0F:$D280:9A TXS 0x03D291|$0F:$D281:A9 01 LDA #$01 0x03D293|$0F:$D283:8D 3B 06 STA $063B ; Midenhall Current HP, low byte 0x03D296|$0F:$D286:20 FB D2 JSR $D2FB ; load ROM bank 6 ; call to code in a different bank ($06:$8DCC) 0x03D299|$0F:$D289:20 CC 8D JSR $8DCC ; restore full HP to all living party members 0x03D29C|$0F:$D28C:20 B9 D2 JSR $D2B9 ; call to code in a different bank ($06:$8F39) 0x03D29F|$0F:$D28F:20 39 8F JSR $8F39 0x03D2A2|$0F:$D292:4C 00 C7 JMP $C700 ; control flow target (from $D26F) 0x03D2A5|$0F:$D295:20 DE D2 JSR $D2DE 0x03D2A8|$0F:$D298:A9 FF LDA #$FF ; control flow target (from $C9A5) 0x03D2AA|$0F:$D29A:85 45 STA $45 0x03D2AC|$0F:$D29C:20 5C F7 JSR $F75C ; load ROM bank #$00 0x03D2AF|$0F:$D29F:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03D2B1|$0F:$D2A1:85 0C STA $0C ; call to code in a different bank ($00:$8000) 0x03D2B3|$0F:$D2A3:20 00 80 JSR $8000 0x03D2B6|$0F:$D2A6:20 F7 D2 JSR $D2F7 0x03D2B9|$0F:$D2A9:20 5C F7 JSR $F75C ; load ROM bank #$00 0x03D2BC|$0F:$D2AC:A9 04 LDA #$04 0x03D2BE|$0F:$D2AE:85 0C STA $0C ; call to code in a different bank ($00:$8000) 0x03D2C0|$0F:$D2B0:20 00 80 JSR $8000 0x03D2C3|$0F:$D2B3:4C 81 E2 JMP $E281 0x03D2C6|$0F:$D2B6:20 2A C4 JSR $C42A ; control flow target (from $C6FA, $D28C) 0x03D2C9|$0F:$D2B9:20 FB D2 JSR $D2FB ; load ROM bank 6 0x03D2CC|$0F:$D2BC:20 A2 E5 JSR $E5A2 0x03D2CF|$0F:$D2BF:A2 03 LDX #$03 0x03D2D1|$0F:$D2C1:20 E7 D2 JSR $D2E7 ; X = 1 => CLC and update $0C-$0D to warp point data to use if Outside allowed from current map, SEC otherwise, X = 2 => CLC and update $0C-$0D to warp point data to use if Return allowed from current map, SEC otherwise, X = 3 => disembark from ship and update ship position based on last save point ID $48 0x03D2D4|$0F:$D2C4:A5 48 LDA $48 ; last save point ID 0x03D2D6|$0F:$D2C6:C9 05 CMP #$05 ; Save Point ID #$05: Rhone Shrine 0x03D2D8|$0F:$D2C8:D0 0E BNE $D2D8 0x03D2DA|$0F:$D2CA:A9 84 LDA #$84 0x03D2DC|$0F:$D2CC:8D 2D 06 STA $062D ; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03D2DF|$0F:$D2CF:8D 3F 06 STA $063F ; Cannock status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03D2E2|$0F:$D2D2:8D 51 06 STA $0651 ; Moonbrooke status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03D2E5|$0F:$D2D5:20 7B C7 JSR $C77B ; restore full HP/MP to all living party members ; control flow target (from $D2C8) 0x03D2E8|$0F:$D2D8:20 AF C7 JSR $C7AF 0x03D2EB|$0F:$D2DB:4C FB D2 JMP $D2FB ; load ROM bank 6 ; control flow target (from $D179, $D276, $D295) 0x03D2EE|$0F:$D2DE:20 2A C4 JSR $C42A 0x03D2F1|$0F:$D2E1:20 46 C4 JSR $C446 ; turn screen off, write $800 [space] tiles to PPU $2000, turn screen on 0x03D2F4|$0F:$D2E4:4C 65 C4 JMP $C465 ; wait for interrupt and then set every 4th byte of $0200 - $02FC to #$F0 ; X = 1 => CLC and update $0C-$0D to warp point data to use if Outside allowed from current map, SEC otherwise, X = 2 => CLC and update $0C-$0D to warp point data to use if Return allowed from current map, SEC otherwise, X = 3 => disembark from ship and update ship position based on last save point ID $48 ; control flow target (from $D2C1, $D2F1) ; external control flow target (from $06:$8C53, $06:$8CD6) 0x03D2F7|$0F:$D2E7:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03D2FA|$0F:$D2EA:A3 ; $06:$8046; -> $06:$BEED: X = 1 => CLC and update $0C-$0D to warp point data to use if Outside allowed from current map, SEC otherwise, X = 2 => CLC and update $0C-$0D to warp point data to use if Return allowed from current map, SEC otherwise, X = 3 => disembark from ship and update ship position based on last save point ID $48 ; data -> code 0x03D2FB|$0F:$D2EB:08 PHP 0x03D2FC|$0F:$D2EC:20 61 F7 JSR $F761 ; load ROM bank #$06 0x03D2FF|$0F:$D2EF:28 PLP 0x03D300|$0F:$D2F0:60 RTS ; external control flow target (from $06:$BD62) 0x03D301|$0F:$D2F1:20 E7 D2 JSR $D2E7 ; X = 1 => CLC and update $0C-$0D to warp point data to use if Outside allowed from current map, SEC otherwise, X = 2 => CLC and update $0C-$0D to warp point data to use if Return allowed from current map, SEC otherwise, X = 3 => disembark from ship and update ship position based on last save point ID $48 0x03D304|$0F:$D2F4:4C 61 F7 JMP $F761 ; load ROM bank #$06 ; control flow target (from $CF76, $D2A6, $D311, $D3C2, $D4A6, $E4BE, $E9B7) 0x03D307|$0F:$D2F7:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03D30A|$0F:$D2FA:A2 ; $06:$8044 ; data -> code ; load ROM bank 6 ; control flow target (from $C918, $CAFF, $D1C3, $D1E2, $D1F5, $D1FD, $D286, $D2B9, $D2DB, $D340) 0x03D30B|$0F:$D2FB:A9 06 LDA #$06 0x03D30D|$0F:$D2FD:85 94 STA $94 ; return bank for various function calls, doubles as index of selected option for multiple-choice menus 0x03D30F|$0F:$D2FF:4C D5 C3 JMP $C3D5 ; save A to $05F6, X to $43, and load bank specified by A ; external control flow target (from $06:$8669, $06:$8CC2, $06:$9420, $06:$9427, $06:$942E, $06:$A225) 0x03D312|$0F:$D302:20 5C F7 JSR $F75C ; load ROM bank #$00 0x03D315|$0F:$D305:A4 97 LDY $97 ; subject hero ID $97 0x03D317|$0F:$D307:B9 1F D3 LDA $D31F,Y ; call to code in a different bank ($00:$8003) 0x03D31A|$0F:$D30A:20 03 80 JSR $8003 0x03D31D|$0F:$D30D:A9 FF LDA #$FF 0x03D31F|$0F:$D30F:85 45 STA $45 0x03D321|$0F:$D311:20 F7 D2 JSR $D2F7 0x03D324|$0F:$D314:20 CB D8 JSR $D8CB 0x03D327|$0F:$D317:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03D32A|$0F:$D31A:A5 94 LDA $94 ; return bank for various function calls, doubles as index of selected option for multiple-choice menus 0x03D32C|$0F:$D31C:4C D5 C3 JMP $C3D5 ; save A to $05F6, X to $43, and load bank specified by A ; code -> data ; indexed data load target (from $D307) ; indirect data load target 0x03D32F|$0F:$D31F:5C ; indirect data load target 0x03D330|$0F:$D320:61 ; indirect data load target 0x03D331|$0F:$D321:66 ; indirect data load target 0x03D332|$0F:$D322:58 0x03D333|$0F:$D323:59 ; indirect data load target 0x03D334|$0F:$D324:5A ; data -> code ; external control flow target (from $06:$BD0B) 0x03D335|$0F:$D325:20 C5 DE JSR $DEC5 0x03D338|$0F:$D328:20 04 C5 JSR $C504 ; control flow target (from $D331) 0x03D33B|$0F:$D32B:4C 61 F7 JMP $F761 ; load ROM bank #$06 ; external control flow target (from $06:$BD71) 0x03D33E|$0F:$D32E:20 CB D8 JSR $D8CB 0x03D341|$0F:$D331:4C 2B D3 JMP $D32B ; post-Malroth dialogue ; external control flow target (from $06:$80B9) 0x03D344|$0F:$D334:20 5C F7 JSR $F75C ; load ROM bank #$00 ; call to code in a different bank ($00:$8012) 0x03D347|$0F:$D337:20 12 80 JSR $8012 ; return value for $0D for post-Malroth dialogue 0x03D34A|$0F:$D33A:85 0D STA $0D 0x03D34C|$0F:$D33C:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03D34F|$0F:$D33F:43 ; $02:$8006; -> $02:$B292: looks like this determines NPC's post-Malroth text ; data -> code 0x03D350|$0F:$D340:4C FB D2 JMP $D2FB ; load ROM bank 6 ; external control flow target (from $06:$BC2A) 0x03D353|$0F:$D343:EA NOP 0x03D354|$0F:$D344:EA NOP 0x03D355|$0F:$D345:EA NOP 0x03D356|$0F:$D346:A9 09 LDA #$09 0x03D358|$0F:$D348:85 94 STA $94 ; return bank for various function calls, doubles as index of selected option for multiple-choice menus 0x03D35A|$0F:$D34A:20 D5 C3 JSR $C3D5 ; save A to $05F6, X to $43, and load bank specified by A ; call to code in a different bank ($09:$8000) 0x03D35D|$0F:$D34D:20 00 80 JSR $8000 ; control flow target (from $D353) 0x03D360|$0F:$D350:AD 56 01 LDA $0156 ; probably music playing flag? set to #$00 when music finishes 0x03D363|$0F:$D353:D0 FB BNE $D350 0x03D365|$0F:$D355:78 SEI 0x03D366|$0F:$D356:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03D369|$0F:$D359:DF ; $06:$803E ; data -> code 0x03D36A|$0F:$D35A:60 RTS ; control flow target (from $E5E1, $E655, $E6D3, $E7B4) 0x03D36B|$0F:$D35B:A5 28 LDA $28 ; current map X-pos (2) 0x03D36D|$0F:$D35D:85 0C STA $0C 0x03D36F|$0F:$D35F:A5 29 LDA $29 ; current map Y-pos (2) 0x03D371|$0F:$D361:85 0E STA $0E 0x03D373|$0F:$D363:20 89 DF JSR $DF89 0x03D376|$0F:$D366:20 4A DF JSR $DF4A 0x03D379|$0F:$D369:20 70 F7 JSR $F770 ; load ROM bank #$02 0x03D37C|$0F:$D36C:A0 04 LDY #$04 0x03D37E|$0F:$D36E:B1 10 LDA ($10),Y 0x03D380|$0F:$D370:29 FC AND #$FC 0x03D382|$0F:$D372:85 3B STA $3B ; high nybble = terrain ID 0x03D384|$0F:$D374:AD AD 61 LDA $61AD 0x03D387|$0F:$D377:F0 01 BEQ $D37A 0x03D389|$0F:$D379:60 RTS ; control flow target (from $D377) 0x03D38A|$0F:$D37A:AD BA FF LDA $FFBA 0x03D38D|$0F:$D37D:D0 09 BNE $D388 0x03D38F|$0F:$D37F:A5 2F LDA $2F ; joypad 1 data 0x03D391|$0F:$D381:29 02 AND #$02 0x03D393|$0F:$D383:F0 03 BEQ $D388 0x03D395|$0F:$D385:4C 29 D4 JMP $D429 ; control flow target (from $D37D, $D383) 0x03D398|$0F:$D388:A5 CF LDA $CF ; ship status (#$04 = on ship, #$02 = own ship, #$01 = beat Lianport Gremlins) 0x03D39A|$0F:$D38A:29 04 AND #$04 0x03D39C|$0F:$D38C:F0 41 BEQ $D3CF 0x03D39E|$0F:$D38E:A5 3B LDA $3B ; high nybble = terrain ID 0x03D3A0|$0F:$D390:29 F0 AND #$F0 0x03D3A2|$0F:$D392:C9 40 CMP #$40 0x03D3A4|$0F:$D394:D0 03 BNE $D399 0x03D3A6|$0F:$D396:4C 29 D4 JMP $D429 ; control flow target (from $D394) 0x03D3A9|$0F:$D399:C9 A0 CMP #$A0 0x03D3AB|$0F:$D39B:B0 77 BCS $D414 0x03D3AD|$0F:$D39D:A5 CF LDA $CF ; ship status (#$04 = on ship, #$02 = own ship, #$01 = beat Lianport Gremlins) 0x03D3AF|$0F:$D39F:29 FB AND #$FB 0x03D3B1|$0F:$D3A1:85 CF STA $CF ; ship status (#$04 = on ship, #$02 = own ship, #$01 = beat Lianport Gremlins) 0x03D3B3|$0F:$D3A3:A5 16 LDA $16 ; current map X-pos (1) 0x03D3B5|$0F:$D3A5:85 D2 STA $D2 ; ship X-pos (when you aren't on it) 0x03D3B7|$0F:$D3A7:8D D4 05 STA $05D4 ; NPC #$13 X-pos 0x03D3BA|$0F:$D3AA:A5 17 LDA $17 ; current map Y-pos (1) 0x03D3BC|$0F:$D3AC:85 D3 STA $D3 ; ship Y-pos (when you aren't on it) 0x03D3BE|$0F:$D3AE:8D D5 05 STA $05D5 ; NPC #$13 Y-pos 0x03D3C1|$0F:$D3B1:A9 05 LDA #$05 0x03D3C3|$0F:$D3B3:8D D9 05 STA $05D9 ; NPC #$13 sprite ID 0x03D3C6|$0F:$D3B6:AD 40 05 LDA $0540 ; NPC #$00 ? + direction nybble 0x03D3C9|$0F:$D3B9:29 03 AND #$03 0x03D3CB|$0F:$D3BB:8D D8 05 STA $05D8 ; NPC #$13 motion nybble + direction nybble 0x03D3CE|$0F:$D3BE:A9 01 LDA #$01 0x03D3D0|$0F:$D3C0:85 45 STA $45 0x03D3D2|$0F:$D3C2:20 F7 D2 JSR $D2F7 0x03D3D5|$0F:$D3C5:20 2F E3 JSR $E32F 0x03D3D8|$0F:$D3C8:A9 00 LDA #$00 0x03D3DA|$0F:$D3CA:85 38 STA $38 0x03D3DC|$0F:$D3CC:4C 29 D4 JMP $D429 ; control flow target (from $D38C) 0x03D3DF|$0F:$D3CF:A5 3B LDA $3B ; high nybble = terrain ID 0x03D3E1|$0F:$D3D1:29 F0 AND #$F0 0x03D3E3|$0F:$D3D3:C9 40 CMP #$40 0x03D3E5|$0F:$D3D5:D0 21 BNE $D3F8 0x03D3E7|$0F:$D3D7:A5 31 LDA $31 ; current map ID 0x03D3E9|$0F:$D3D9:C9 01 CMP #$01 ; Map ID #$01: World Map 0x03D3EB|$0F:$D3DB:F0 04 BEQ $D3E1 0x03D3ED|$0F:$D3DD:C9 0B CMP #$0B ; Map ID #$0B: Lianport 0x03D3EF|$0F:$D3DF:D0 33 BNE $D414 ; control flow target (from $D3DB) 0x03D3F1|$0F:$D3E1:AD D4 05 LDA $05D4 ; NPC #$13 X-pos 0x03D3F4|$0F:$D3E4:C5 28 CMP $28 ; current map X-pos (2) 0x03D3F6|$0F:$D3E6:D0 2C BNE $D414 0x03D3F8|$0F:$D3E8:AD D5 05 LDA $05D5 ; NPC #$13 Y-pos 0x03D3FB|$0F:$D3EB:C5 29 CMP $29 ; current map Y-pos (2) 0x03D3FD|$0F:$D3ED:D0 25 BNE $D414 0x03D3FF|$0F:$D3EF:AD D9 05 LDA $05D9 ; NPC #$13 sprite ID 0x03D402|$0F:$D3F2:C9 FF CMP #$FF 0x03D404|$0F:$D3F4:F0 1E BEQ $D414 0x03D406|$0F:$D3F6:D0 51 BNE $D449 ; control flow target (from $D3D5) 0x03D408|$0F:$D3F8:A5 3B LDA $3B ; high nybble = terrain ID 0x03D40A|$0F:$D3FA:29 F0 AND #$F0 0x03D40C|$0F:$D3FC:C9 A0 CMP #$A0 0x03D40E|$0F:$D3FE:D0 10 BNE $D410 0x03D410|$0F:$D400:A5 31 LDA $31 ; current map ID 0x03D412|$0F:$D402:C9 2C CMP #$2C ; Map ID #$2C: Lake Cave B1 0x03D414|$0F:$D404:F0 0E BEQ $D414 0x03D416|$0F:$D406:C9 2D CMP #$2D ; Map ID #$2D: Lake Cave B2 0x03D418|$0F:$D408:F0 0A BEQ $D414 0x03D41A|$0F:$D40A:C9 40 CMP #$40 0x03D41C|$0F:$D40C:F0 06 BEQ $D414 0x03D41E|$0F:$D40E:D0 19 BNE $D429 ; control flow target (from $D3FE) 0x03D420|$0F:$D410:C9 B0 CMP #$B0 0x03D422|$0F:$D412:90 15 BCC $D429 ; control flow target (from $D39B, $D3DF, $D3E6, $D3ED, $D3F4, $D404, $D408, $D40C, $D43E) 0x03D424|$0F:$D414:A5 16 LDA $16 ; current map X-pos (1) 0x03D426|$0F:$D416:85 28 STA $28 ; current map X-pos (2) 0x03D428|$0F:$D418:A5 17 LDA $17 ; current map Y-pos (1) 0x03D42A|$0F:$D41A:85 29 STA $29 ; current map Y-pos (2) 0x03D42C|$0F:$D41C:68 PLA 0x03D42D|$0F:$D41D:68 PLA 0x03D42E|$0F:$D41E:68 PLA 0x03D42F|$0F:$D41F:68 PLA 0x03D430|$0F:$D420:A9 00 LDA #$00 0x03D432|$0F:$D422:85 03 STA $03 ; game clock? 0x03D434|$0F:$D424:85 3B STA $3B ; high nybble = terrain ID 0x03D436|$0F:$D426:4C 47 C7 JMP $C747 ; control flow target (from $D385, $D396, $D3CC, $D40E, $D412) 0x03D439|$0F:$D429:A0 18 LDY #$18 ; control flow target (from $D447) 0x03D43B|$0F:$D42B:B9 41 05 LDA $0541,Y ; NPC #$00 sprite ID 0x03D43E|$0F:$D42E:C9 FF CMP #$FF 0x03D440|$0F:$D430:F0 0E BEQ $D440 0x03D442|$0F:$D432:B9 3C 05 LDA $053C,Y ; NPC #$00 ? 0x03D445|$0F:$D435:C5 28 CMP $28 ; current map X-pos (2) 0x03D447|$0F:$D437:D0 07 BNE $D440 0x03D449|$0F:$D439:B9 3D 05 LDA $053D,Y ; NPC #$00 ? 0x03D44C|$0F:$D43C:C5 29 CMP $29 ; current map Y-pos (2) 0x03D44E|$0F:$D43E:F0 D4 BEQ $D414 ; control flow target (from $D430, $D437) 0x03D450|$0F:$D440:98 TYA 0x03D451|$0F:$D441:18 CLC 0x03D452|$0F:$D442:69 08 ADC #$08 0x03D454|$0F:$D444:A8 TAY 0x03D455|$0F:$D445:C9 B8 CMP #$B8 0x03D457|$0F:$D447:D0 E2 BNE $D42B ; control flow target (from $D3F6) 0x03D459|$0F:$D449:A0 00 LDY #$00 0x03D45B|$0F:$D44B:20 50 D4 JSR $D450 0x03D45E|$0F:$D44E:A0 08 LDY #$08 ; control flow target (from $D44B) 0x03D460|$0F:$D450:B9 42 05 LDA $0542,Y ; NPC #$00 ? 0x03D463|$0F:$D453:19 43 05 ORA $0543,Y ; NPC #$00 ? 0x03D466|$0F:$D456:D0 01 BNE $D459 0x03D468|$0F:$D458:60 RTS ; control flow target (from $D456) 0x03D469|$0F:$D459:AD 3C 05 LDA $053C ; NPC #$00 ? 0x03D46C|$0F:$D45C:20 63 D4 JSR $D463 0x03D46F|$0F:$D45F:C8 INY 0x03D470|$0F:$D460:AD 3D 05 LDA $053D ; NPC #$00 ? ; control flow target (from $D45C) 0x03D473|$0F:$D463:38 SEC 0x03D474|$0F:$D464:F9 44 05 SBC $0544,Y ; NPC #$01 ? 0x03D477|$0F:$D467:99 46 05 STA $0546,Y ; NPC #$01 ? 0x03D47A|$0F:$D46A:60 RTS ; control flow target (from $C87F) 0x03D47B|$0F:$D46B:A5 CF LDA $CF ; ship status (#$04 = on ship, #$02 = own ship, #$01 = beat Lianport Gremlins) 0x03D47D|$0F:$D46D:29 04 AND #$04 0x03D47F|$0F:$D46F:D0 40 BNE $D4B1 0x03D481|$0F:$D471:A5 31 LDA $31 ; current map ID 0x03D483|$0F:$D473:C9 01 CMP #$01 ; Map ID #$01: World Map 0x03D485|$0F:$D475:F0 04 BEQ $D47B 0x03D487|$0F:$D477:C9 0B CMP #$0B ; Map ID #$0B: Lianport 0x03D489|$0F:$D479:D0 36 BNE $D4B1 ; control flow target (from $D475) 0x03D48B|$0F:$D47B:AD D4 05 LDA $05D4 ; NPC #$13 X-pos 0x03D48E|$0F:$D47E:C5 16 CMP $16 ; current map X-pos (1) 0x03D490|$0F:$D480:D0 2F BNE $D4B1 0x03D492|$0F:$D482:AD D5 05 LDA $05D5 ; NPC #$13 Y-pos 0x03D495|$0F:$D485:C5 17 CMP $17 ; current map Y-pos (1) 0x03D497|$0F:$D487:D0 28 BNE $D4B1 0x03D499|$0F:$D489:20 DA D6 JSR $D6DA 0x03D49C|$0F:$D48C:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03D49F|$0F:$D48F:A9 FF LDA #$FF 0x03D4A1|$0F:$D491:8D D9 05 STA $05D9 ; NPC #$13 sprite ID 0x03D4A4|$0F:$D494:20 5C F7 JSR $F75C ; load ROM bank #$00 0x03D4A7|$0F:$D497:A9 6B LDA #$6B ; call to code in a different bank ($00:$8003) 0x03D4A9|$0F:$D499:20 03 80 JSR $8003 0x03D4AC|$0F:$D49C:A9 06 LDA #$06 0x03D4AE|$0F:$D49E:05 CF ORA $CF ; ship status (#$04 = on ship, #$02 = own ship, #$01 = beat Lianport Gremlins) 0x03D4B0|$0F:$D4A0:85 CF STA $CF ; ship status (#$04 = on ship, #$02 = own ship, #$01 = beat Lianport Gremlins) 0x03D4B2|$0F:$D4A2:A9 FF LDA #$FF 0x03D4B4|$0F:$D4A4:85 45 STA $45 0x03D4B6|$0F:$D4A6:20 F7 D2 JSR $D2F7 0x03D4B9|$0F:$D4A9:20 2F E3 JSR $E32F 0x03D4BC|$0F:$D4AC:A9 00 LDA #$00 0x03D4BE|$0F:$D4AE:85 35 STA $35 ; flag indicating whether any menu is currently open 0x03D4C0|$0F:$D4B0:60 RTS ; control flow target (from $D46F, $D479, $D480, $D487) 0x03D4C1|$0F:$D4B1:A5 31 LDA $31 ; current map ID 0x03D4C3|$0F:$D4B3:C9 0B CMP #$0B ; Map ID #$0B: Lianport 0x03D4C5|$0F:$D4B5:D0 1B BNE $D4D2 0x03D4C7|$0F:$D4B7:A5 16 LDA $16 ; current map X-pos (1) 0x03D4C9|$0F:$D4B9:C9 19 CMP #$19 0x03D4CB|$0F:$D4BB:D0 15 BNE $D4D2 0x03D4CD|$0F:$D4BD:A5 17 LDA $17 ; current map Y-pos (1) 0x03D4CF|$0F:$D4BF:C9 01 CMP #$01 0x03D4D1|$0F:$D4C1:D0 0F BNE $D4D2 0x03D4D3|$0F:$D4C3:AD B0 D6 LDA $D6B0 0x03D4D6|$0F:$D4C6:85 0C STA $0C 0x03D4D8|$0F:$D4C8:AD B1 D6 LDA $D6B1 0x03D4DB|$0F:$D4CB:85 0D STA $0D 0x03D4DD|$0F:$D4CD:A9 FF LDA #$FF 0x03D4DF|$0F:$D4CF:4C 8F D8 JMP $D88F ; warp to warp point given by ($0C) ; control flow target (from $D4B5, $D4BB, $D4C1) 0x03D4E2|$0F:$D4D2:A6 3C LDX $3C 0x03D4E4|$0F:$D4D4:A5 3B LDA $3B ; high nybble = terrain ID 0x03D4E6|$0F:$D4D6:29 F0 AND #$F0 0x03D4E8|$0F:$D4D8:85 3C STA $3C 0x03D4EA|$0F:$D4DA:A4 31 LDY $31 ; current map ID 0x03D4EC|$0F:$D4DC:F0 26 BEQ $D504 ; Map ID #$00: Fake Midenhall 0x03D4EE|$0F:$D4DE:E0 10 CPX #$10 0x03D4F0|$0F:$D4E0:F0 0C BEQ $D4EE 0x03D4F2|$0F:$D4E2:C9 10 CMP #$10 0x03D4F4|$0F:$D4E4:D0 08 BNE $D4EE 0x03D4F6|$0F:$D4E6:A9 82 LDA #$82 ; Music ID #$82: Stairs SFX 0x03D4F8|$0F:$D4E8:20 61 C5 JSR $C561 ; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM]) 0x03D4FB|$0F:$D4EB:4C EE D7 JMP $D7EE ; control flow target (from $D4E0, $D4E4) 0x03D4FE|$0F:$D4EE:C9 20 CMP #$20 0x03D500|$0F:$D4F0:F0 0A BEQ $D4FC 0x03D502|$0F:$D4F2:C9 30 CMP #$30 0x03D504|$0F:$D4F4:D0 0E BNE $D504 0x03D506|$0F:$D4F6:20 A2 E5 JSR $E5A2 0x03D509|$0F:$D4F9:4C A6 D7 JMP $D7A6 ; control flow target (from $D4F0) 0x03D50C|$0F:$D4FC:A9 82 LDA #$82 ; Music ID #$82: Stairs SFX 0x03D50E|$0F:$D4FE:20 61 C5 JSR $C561 ; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM]) 0x03D511|$0F:$D501:4C A6 D7 JMP $D7A6 ; control flow target (from $D4DC, $D4F4) 0x03D514|$0F:$D504:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03D516|$0F:$D506:C9 02 CMP #$02 0x03D518|$0F:$D508:B0 3A BCS $D544 0x03D51A|$0F:$D50A:A5 21 LDA $21 ; map width 0x03D51C|$0F:$D50C:C5 16 CMP $16 ; current map X-pos (1) 0x03D51E|$0F:$D50E:90 07 BCC $D517 0x03D520|$0F:$D510:A5 22 LDA $22 ; map height 0x03D522|$0F:$D512:C5 17 CMP $17 ; current map Y-pos (1) 0x03D524|$0F:$D514:90 01 BCC $D517 0x03D526|$0F:$D516:60 RTS ; control flow target (from $D50E, $D514, $D55E) 0x03D527|$0F:$D517:20 75 F7 JSR $F775 ; load ROM bank #$03 0x03D52A|$0F:$D51A:AD EC D7 LDA $D7EC ; -> $03:$BD13: warp points (map ID, X-pos, Y-pos); other end is same index in $02:$A27E 0x03D52D|$0F:$D51D:85 0C STA $0C 0x03D52F|$0F:$D51F:AD ED D7 LDA $D7ED 0x03D532|$0F:$D522:85 0D STA $0D 0x03D534|$0F:$D524:A0 00 LDY #$00 ; control flow target (from $D535, $D539) 0x03D536|$0F:$D526:B1 0C LDA ($0C),Y 0x03D538|$0F:$D528:29 7F AND #$7F 0x03D53A|$0F:$D52A:C5 31 CMP $31 ; current map ID 0x03D53C|$0F:$D52C:F0 0E BEQ $D53C 0x03D53E|$0F:$D52E:A5 0C LDA $0C 0x03D540|$0F:$D530:18 CLC 0x03D541|$0F:$D531:69 03 ADC #$03 0x03D543|$0F:$D533:85 0C STA $0C 0x03D545|$0F:$D535:90 EF BCC $D526 0x03D547|$0F:$D537:E6 0D INC $0D 0x03D549|$0F:$D539:D0 EB BNE $D526 0x03D54B|$0F:$D53B:60 RTS ; control flow target (from $D52C) 0x03D54C|$0F:$D53C:A9 82 LDA #$82 ; Music ID #$82: Stairs SFX 0x03D54E|$0F:$D53E:20 61 C5 JSR $C561 ; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM]) 0x03D551|$0F:$D541:4C B6 D7 JMP $D7B6 ; control flow target (from $D508) 0x03D554|$0F:$D544:A5 16 LDA $16 ; current map X-pos (1) 0x03D556|$0F:$D546:4A LSR 0x03D557|$0F:$D547:18 CLC 0x03D558|$0F:$D548:E5 21 SBC $21 ; map width 0x03D55A|$0F:$D54A:B0 0B BCS $D557 0x03D55C|$0F:$D54C:A5 17 LDA $17 ; current map Y-pos (1) 0x03D55E|$0F:$D54E:4A LSR 0x03D55F|$0F:$D54F:18 CLC 0x03D560|$0F:$D550:E5 22 SBC $22 ; map height 0x03D562|$0F:$D552:B0 03 BCS $D557 0x03D564|$0F:$D554:4C E9 D5 JMP $D5E9 ; control flow target (from $D54A, $D552) 0x03D567|$0F:$D557:A5 31 LDA $31 ; current map ID 0x03D569|$0F:$D559:A0 05 LDY #$05 ; control flow target (from $D561) 0x03D56B|$0F:$D55B:D9 9B D6 CMP $D69B,Y 0x03D56E|$0F:$D55E:F0 B7 BEQ $D517 0x03D570|$0F:$D560:88 DEY 0x03D571|$0F:$D561:10 F8 BPL $D55B 0x03D573|$0F:$D563:AD 40 05 LDA $0540 ; NPC #$00 ? + direction nybble 0x03D576|$0F:$D566:29 03 AND #$03 0x03D578|$0F:$D568:AA TAX 0x03D579|$0F:$D569:0A ASL 0x03D57A|$0F:$D56A:A8 TAY 0x03D57B|$0F:$D56B:BD A9 D6 LDA $D6A9,X 0x03D57E|$0F:$D56E:85 0F STA $0F 0x03D580|$0F:$D570:B9 A1 D6 LDA $D6A1,Y 0x03D583|$0F:$D573:85 12 STA $12 0x03D585|$0F:$D575:85 10 STA $10 0x03D587|$0F:$D577:B9 A2 D6 LDA $D6A2,Y 0x03D58A|$0F:$D57A:85 13 STA $13 0x03D58C|$0F:$D57C:85 11 STA $11 0x03D58E|$0F:$D57E:20 61 F7 JSR $F761 ; load ROM bank #$06 0x03D591|$0F:$D581:A5 0F LDA $0F 0x03D593|$0F:$D583:48 PHA 0x03D594|$0F:$D584:A5 10 LDA $10 0x03D596|$0F:$D586:48 PHA 0x03D597|$0F:$D587:A9 6E LDA #$6E ; call to code in a different bank ($06:$A369) 0x03D599|$0F:$D589:20 69 A3 JSR $A369 ; check for item A in party inventory, returning inventory index of item in A/X if found, #$FF if not 0x03D59C|$0F:$D58C:AA TAX 0x03D59D|$0F:$D58D:68 PLA 0x03D59E|$0F:$D58E:85 10 STA $10 0x03D5A0|$0F:$D590:68 PLA 0x03D5A1|$0F:$D591:85 0F STA $0F 0x03D5A3|$0F:$D593:E0 FF CPX #$FF 0x03D5A5|$0F:$D595:D0 06 BNE $D59D ; call to code in a different bank ($06:$8CD4) 0x03D5A7|$0F:$D597:20 D4 8C JSR $8CD4 ; handler for Outside spell effect 0x03D5AA|$0F:$D59A:4C B6 D5 JMP $D5B6 ; control flow target (from $D595) ; call to code in a different bank ($06:$8CD4) 0x03D5AD|$0F:$D59D:20 D4 8C JSR $8CD4 ; handler for Outside spell effect 0x03D5B0|$0F:$D5A0:46 0E LSR $0E 0x03D5B2|$0F:$D5A2:F0 12 BEQ $D5B6 ; control flow target (from $D5B4) 0x03D5B4|$0F:$D5A4:A5 10 LDA $10 0x03D5B6|$0F:$D5A6:18 CLC 0x03D5B7|$0F:$D5A7:65 12 ADC $12 0x03D5B9|$0F:$D5A9:85 12 STA $12 0x03D5BB|$0F:$D5AB:A5 11 LDA $11 0x03D5BD|$0F:$D5AD:18 CLC 0x03D5BE|$0F:$D5AE:65 13 ADC $13 0x03D5C0|$0F:$D5B0:85 13 STA $13 0x03D5C2|$0F:$D5B2:C6 0E DEC $0E 0x03D5C4|$0F:$D5B4:D0 EE BNE $D5A4 ; control flow target (from $D59A, $D5A2) 0x03D5C6|$0F:$D5B6:20 70 F7 JSR $F770 ; load ROM bank #$02 0x03D5C9|$0F:$D5B9:A0 00 LDY #$00 0x03D5CB|$0F:$D5BB:B1 0C LDA ($0C),Y 0x03D5CD|$0F:$D5BD:85 5A STA $5A ; Crest/direction name write buffer start 0x03D5CF|$0F:$D5BF:C8 INY 0x03D5D0|$0F:$D5C0:B1 0C LDA ($0C),Y 0x03D5D2|$0F:$D5C2:18 CLC 0x03D5D3|$0F:$D5C3:65 12 ADC $12 0x03D5D5|$0F:$D5C5:85 5B STA $5B 0x03D5D7|$0F:$D5C7:C8 INY 0x03D5D8|$0F:$D5C8:B1 0C LDA ($0C),Y 0x03D5DA|$0F:$D5CA:18 CLC 0x03D5DB|$0F:$D5CB:65 13 ADC $13 0x03D5DD|$0F:$D5CD:85 5C STA $5C ; control flow target (from $D617) 0x03D5DF|$0F:$D5CF:A5 0F LDA $0F 0x03D5E1|$0F:$D5D1:48 PHA 0x03D5E2|$0F:$D5D2:20 E1 D6 JSR $D6E1 0x03D5E5|$0F:$D5D5:A2 28 LDX #$28 0x03D5E7|$0F:$D5D7:20 EE C1 JSR $C1EE ; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF 0x03D5EA|$0F:$D5DA:AD 99 D6 LDA $D699 0x03D5ED|$0F:$D5DD:85 0C STA $0C 0x03D5EF|$0F:$D5DF:AD 9A D6 LDA $D69A 0x03D5F2|$0F:$D5E2:85 0D STA $0D 0x03D5F4|$0F:$D5E4:68 PLA 0x03D5F5|$0F:$D5E5:4C 8F D8 JMP $D88F ; warp to warp point given by ($0C) ; control flow target (from $D5ED, $D5FA, $D5FE, $D61C, $D620, $D629) 0x03D5F8|$0F:$D5E8:60 RTS ; control flow target (from $D554) 0x03D5F9|$0F:$D5E9:A5 31 LDA $31 ; current map ID 0x03D5FB|$0F:$D5EB:C9 65 CMP #$65 ; Map ID #$65: Dragon Horn South 6F 0x03D5FD|$0F:$D5ED:B0 F9 BCS $D5E8 0x03D5FF|$0F:$D5EF:C9 61 CMP #$61 ; Map ID #$61: Dragon Horn South 2F 0x03D601|$0F:$D5F1:90 27 BCC $D61A 0x03D603|$0F:$D5F3:20 78 D6 JSR $D678 0x03D606|$0F:$D5F6:A5 0C LDA $0C 0x03D608|$0F:$D5F8:C9 08 CMP #$08 0x03D60A|$0F:$D5FA:B0 EC BCS $D5E8 0x03D60C|$0F:$D5FC:C9 04 CMP #$04 0x03D60E|$0F:$D5FE:90 E8 BCC $D5E8 0x03D610|$0F:$D600:A9 60 LDA #$60 0x03D612|$0F:$D602:85 5A STA $5A ; Crest/direction name write buffer start 0x03D614|$0F:$D604:A5 16 LDA $16 ; current map X-pos (1) 0x03D616|$0F:$D606:85 5B STA $5B 0x03D618|$0F:$D608:A5 17 LDA $17 ; current map Y-pos (1) 0x03D61A|$0F:$D60A:85 5C STA $5C ; control flow target (from $D675) 0x03D61C|$0F:$D60C:AD 40 05 LDA $0540 ; NPC #$00 ? + direction nybble 0x03D61F|$0F:$D60F:29 03 AND #$03 0x03D621|$0F:$D611:A8 TAY 0x03D622|$0F:$D612:B9 A9 D6 LDA $D6A9,Y 0x03D625|$0F:$D615:85 0F STA $0F 0x03D627|$0F:$D617:4C CF D5 JMP $D5CF ; control flow target (from $D5F1) 0x03D62A|$0F:$D61A:C9 40 CMP #$40 ; Map ID #$40: Spring of Bravery 0x03D62C|$0F:$D61C:B0 CA BCS $D5E8 0x03D62E|$0F:$D61E:C9 38 CMP #$38 ; Map ID #$38: Cave to Rhone 1F 0x03D630|$0F:$D620:90 C6 BCC $D5E8 0x03D632|$0F:$D622:20 78 D6 JSR $D678 0x03D635|$0F:$D625:A5 0C LDA $0C 0x03D637|$0F:$D627:C9 05 CMP #$05 0x03D639|$0F:$D629:D0 BD BNE $D5E8 0x03D63B|$0F:$D62B:A5 31 LDA $31 ; current map ID 0x03D63D|$0F:$D62D:38 SEC 0x03D63E|$0F:$D62E:E9 38 SBC #$38 ; Map ID #$38: Cave to Rhone 1F 0x03D640|$0F:$D630:AA TAX 0x03D641|$0F:$D631:BD B2 D6 LDA $D6B2,X 0x03D644|$0F:$D634:85 5A STA $5A ; Crest/direction name write buffer start 0x03D646|$0F:$D636:BD BA D6 LDA $D6BA,X 0x03D649|$0F:$D639:20 83 D6 JSR $D683 0x03D64C|$0F:$D63C:7D CA D6 ADC $D6CA,X 0x03D64F|$0F:$D63F:85 5B STA $5B 0x03D651|$0F:$D641:BD C2 D6 LDA $D6C2,X 0x03D654|$0F:$D644:20 83 D6 JSR $D683 0x03D657|$0F:$D647:7D D2 D6 ADC $D6D2,X 0x03D65A|$0F:$D64A:85 5C STA $5C 0x03D65C|$0F:$D64C:A5 14 LDA $14 0x03D65E|$0F:$D64E:85 0C STA $0C 0x03D660|$0F:$D650:A5 15 LDA $15 0x03D662|$0F:$D652:85 0E STA $0E 0x03D664|$0F:$D654:20 FC DD JSR $DDFC 0x03D667|$0F:$D657:A9 5F LDA #$5F 0x03D669|$0F:$D659:85 09 STA $09 0x03D66B|$0F:$D65B:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03D66E|$0F:$D65E:20 FA C1 JSR $C1FA ; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00 0x03D671|$0F:$D661:20 FA C1 JSR $C1FA ; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00 0x03D674|$0F:$D664:A5 07 LDA $07 0x03D676|$0F:$D666:18 CLC 0x03D677|$0F:$D667:69 1E ADC #$1E 0x03D679|$0F:$D669:85 07 STA $07 0x03D67B|$0F:$D66B:90 02 BCC $D66F 0x03D67D|$0F:$D66D:E6 08 INC $08 ; control flow target (from $D66B) 0x03D67F|$0F:$D66F:20 FA C1 JSR $C1FA ; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00 0x03D682|$0F:$D672:20 FA C1 JSR $C1FA ; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00 0x03D685|$0F:$D675:4C 0C D6 JMP $D60C ; control flow target (from $D5F3, $D622) 0x03D688|$0F:$D678:A5 16 LDA $16 ; current map X-pos (1) 0x03D68A|$0F:$D67A:85 0C STA $0C 0x03D68C|$0F:$D67C:A5 17 LDA $17 ; current map Y-pos (1) 0x03D68E|$0F:$D67E:85 0E STA $0E 0x03D690|$0F:$D680:4C 89 DF JMP $DF89 ; control flow target (from $D639, $D644) 0x03D693|$0F:$D683:85 0E STA $0E 0x03D695|$0F:$D685:20 AB C3 JSR $C3AB ; generate a random number and store it in $32-$33 (two passes) 0x03D698|$0F:$D688:A5 32 LDA $32 ; RNG byte 0 0x03D69A|$0F:$D68A:85 0C STA $0C 0x03D69C|$0F:$D68C:A9 00 LDA #$00 0x03D69E|$0F:$D68E:85 0D STA $0D 0x03D6A0|$0F:$D690:85 0F STA $0F 0x03D6A2|$0F:$D692:20 39 C3 JSR $C339 ; 16-bit multiplication: ($10-$11) = ($0C-$0D) * ($0E-$0F); consumes $0C-$0F 0x03D6A5|$0F:$D695:A5 11 LDA $11 0x03D6A7|$0F:$D697:0A ASL 0x03D6A8|$0F:$D698:60 RTS ; code -> data ; data load target (from $D5DA) ; indirect data load target 0x03D6A9|$0F:$D699:5A ; data load target (from $D5DF) ; indirect data load target 0x03D6AA|$0F:$D69A:00 ; indexed data load target (from $D55B) ; indirect data load target 0x03D6AB|$0F:$D69B:38 ; Map ID #$38: Cave to Rhone 1F ; indirect data load target 0x03D6AC|$0F:$D69C:49 ; Map ID #$49: Moon Tower 1F ; indirect data load target 0x03D6AD|$0F:$D69D:50 ; Map ID #$50: Lighthouse 1F ; indirect data load target 0x03D6AE|$0F:$D69E:58 ; Map ID #$58: Wind Tower 1F ; indirect data load target 0x03D6AF|$0F:$D69F:60 ; Map ID #$60: Dragon Horn South 1F ; indirect data load target 0x03D6B0|$0F:$D6A0:66 ; Map ID #$66: Dragon Horn North 1F ; indexed data load target (from $D570) ; indirect data load target 0x03D6B1|$0F:$D6A1:00 ; indexed data load target (from $D577) ; indirect data load target 0x03D6B2|$0F:$D6A2:FF ; indirect data load target 0x03D6B3|$0F:$D6A3:01 ; indirect data load target 0x03D6B4|$0F:$D6A4:00 ; indirect data load target 0x03D6B5|$0F:$D6A5:00 ; indirect data load target 0x03D6B6|$0F:$D6A6:01 ; indirect data load target 0x03D6B7|$0F:$D6A7:FF ; indirect data load target 0x03D6B8|$0F:$D6A8:00 ; indexed data load target (from $D56B, $D612) ; indirect data load target 0x03D6B9|$0F:$D6A9:09 ; indirect data load target 0x03D6BA|$0F:$D6AA:04 ; indirect data load target 0x03D6BB|$0F:$D6AB:0A ; indirect data load target 0x03D6BC|$0F:$D6AC:03 ; indirect data load target 0x03D6BD|$0F:$D6AD:01 ; indirect data load target 0x03D6BE|$0F:$D6AE:1E ; indirect data load target 0x03D6BF|$0F:$D6AF:38 ; data load target (from $D4C3) ; indirect data load target 0x03D6C0|$0F:$D6B0:AD ; data load target (from $D4C8) ; indirect data load target 0x03D6C1|$0F:$D6B1:D6 ; indexed data load target (from $D631) ; indirect data load target 0x03D6C2|$0F:$D6B2:37 ; indirect data load target 0x03D6C3|$0F:$D6B3:38 ; indirect data load target 0x03D6C4|$0F:$D6B4:38 ; indirect data load target 0x03D6C5|$0F:$D6B5:38 ; indirect data load target 0x03D6C6|$0F:$D6B6:3B ; indirect data load target 0x03D6C7|$0F:$D6B7:3C ; indirect data load target 0x03D6C8|$0F:$D6B8:3D ; indirect data load target 0x03D6C9|$0F:$D6B9:3E ; indexed data load target (from $D636) ; indirect data load target 0x03D6CA|$0F:$D6BA:08 ; indirect data load target 0x03D6CB|$0F:$D6BB:02 ; indirect data load target 0x03D6CC|$0F:$D6BC:02 ; indirect data load target 0x03D6CD|$0F:$D6BD:02 ; indirect data load target 0x03D6CE|$0F:$D6BE:02 ; indirect data load target 0x03D6CF|$0F:$D6BF:02 ; indirect data load target 0x03D6D0|$0F:$D6C0:08 ; indirect data load target 0x03D6D1|$0F:$D6C1:08 ; indexed data load target (from $D641) ; indirect data load target 0x03D6D2|$0F:$D6C2:07 ; indirect data load target 0x03D6D3|$0F:$D6C3:02 ; indirect data load target 0x03D6D4|$0F:$D6C4:02 ; indirect data load target 0x03D6D5|$0F:$D6C5:02 ; indirect data load target 0x03D6D6|$0F:$D6C6:04 ; indirect data load target 0x03D6D7|$0F:$D6C7:03 ; indirect data load target 0x03D6D8|$0F:$D6C8:08 ; indirect data load target 0x03D6D9|$0F:$D6C9:03 ; indexed data load target (from $D63C) ; indirect data load target 0x03D6DA|$0F:$D6CA:02 ; indirect data load target 0x03D6DB|$0F:$D6CB:06 ; indirect data load target 0x03D6DC|$0F:$D6CC:06 ; indirect data load target 0x03D6DD|$0F:$D6CD:06 ; indirect data load target 0x03D6DE|$0F:$D6CE:0E ; indirect data load target 0x03D6DF|$0F:$D6CF:0C ; indirect data load target 0x03D6E0|$0F:$D6D0:08 ; indirect data load target 0x03D6E1|$0F:$D6D1:12 ; indexed data load target (from $D647) ; indirect data load target 0x03D6E2|$0F:$D6D2:02 ; indirect data load target 0x03D6E3|$0F:$D6D3:0E ; indirect data load target 0x03D6E4|$0F:$D6D4:0E ; indirect data load target 0x03D6E5|$0F:$D6D5:0E ; indirect data load target 0x03D6E6|$0F:$D6D6:0A ; indirect data load target 0x03D6E7|$0F:$D6D7:30 ; indirect data load target 0x03D6E8|$0F:$D6D8:08 ; indirect data load target 0x03D6E9|$0F:$D6D9:02 ; data -> code ; control flow target (from $D489) 0x03D6EA|$0F:$D6DA:20 CC E3 JSR $E3CC 0x03D6ED|$0F:$D6DD:A9 10 LDA #$10 0x03D6EF|$0F:$D6DF:D0 07 BNE $D6E8 ; control flow target (from $D5D2) 0x03D6F1|$0F:$D6E1:A9 98 LDA #$98 ; Music ID #$98: more Watergate? SFX 0x03D6F3|$0F:$D6E3:20 61 C5 JSR $C561 ; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM]) 0x03D6F6|$0F:$D6E6:A9 08 LDA #$08 ; control flow target (from $D6DF) 0x03D6F8|$0F:$D6E8:85 97 STA $97 ; subject hero ID $97 0x03D6FA|$0F:$D6EA:A9 FF LDA #$FF 0x03D6FC|$0F:$D6EC:85 35 STA $35 ; flag indicating whether any menu is currently open 0x03D6FE|$0F:$D6EE:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03D701|$0F:$D6F1:A9 00 LDA #$00 0x03D703|$0F:$D6F3:8D 3A 05 STA $053A 0x03D706|$0F:$D6F6:8D 3B 05 STA $053B 0x03D709|$0F:$D6F9:20 CB D8 JSR $D8CB 0x03D70C|$0F:$D6FC:AD 49 05 LDA $0549 ; NPC #$01 sprite ID 0x03D70F|$0F:$D6FF:48 PHA 0x03D710|$0F:$D700:AD 51 05 LDA $0551 ; NPC #$02 sprite ID 0x03D713|$0F:$D703:48 PHA 0x03D714|$0F:$D704:20 1D D7 JSR $D71D 0x03D717|$0F:$D707:20 1D D7 JSR $D71D 0x03D71A|$0F:$D70A:A9 80 LDA #$80 0x03D71C|$0F:$D70C:8D 3A 05 STA $053A 0x03D71F|$0F:$D70F:A9 6F LDA #$6F 0x03D721|$0F:$D711:8D 3B 05 STA $053B 0x03D724|$0F:$D714:68 PLA 0x03D725|$0F:$D715:8D 51 05 STA $0551 ; NPC #$02 sprite ID 0x03D728|$0F:$D718:68 PLA 0x03D729|$0F:$D719:8D 49 05 STA $0549 ; NPC #$01 sprite ID 0x03D72C|$0F:$D71C:60 RTS ; control flow target (from $D704, $D707) 0x03D72D|$0F:$D71D:A5 97 LDA $97 ; subject hero ID $97 0x03D72F|$0F:$D71F:85 49 STA $49 ; object hero/target/item/string ID $49 ; control flow target (from $D733) 0x03D731|$0F:$D721:A0 08 LDY #$08 0x03D733|$0F:$D723:20 69 D7 JSR $D769 0x03D736|$0F:$D726:A0 10 LDY #$10 0x03D738|$0F:$D728:20 69 D7 JSR $D769 0x03D73B|$0F:$D72B:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03D73E|$0F:$D72E:20 CB D8 JSR $D8CB 0x03D741|$0F:$D731:C6 49 DEC $49 ; object hero/target/item/string ID $49 0x03D743|$0F:$D733:D0 EC BNE $D721 0x03D745|$0F:$D735:A0 10 LDY #$10 0x03D747|$0F:$D737:20 77 D7 JSR $D777 0x03D74A|$0F:$D73A:A0 08 LDY #$08 0x03D74C|$0F:$D73C:20 77 D7 JSR $D777 0x03D74F|$0F:$D73F:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03D752|$0F:$D742:4C CB D8 JMP $D8CB ; control flow target (from $D770, $D773) 0x03D755|$0F:$D745:B9 3A 05 LDA $053A,Y 0x03D758|$0F:$D748:38 SEC 0x03D759|$0F:$D749:F9 3C 05 SBC $053C,Y ; NPC #$00 ? 0x03D75C|$0F:$D74C:99 3A 05 STA $053A,Y 0x03D75F|$0F:$D74F:A5 97 LDA $97 ; subject hero ID $97 0x03D761|$0F:$D751:C9 10 CMP #$10 0x03D763|$0F:$D753:F0 0A BEQ $D75F 0x03D765|$0F:$D755:B9 3A 05 LDA $053A,Y 0x03D768|$0F:$D758:38 SEC 0x03D769|$0F:$D759:F9 3C 05 SBC $053C,Y ; NPC #$00 ? 0x03D76C|$0F:$D75C:99 3A 05 STA $053A,Y ; control flow target (from $D753) 0x03D76F|$0F:$D75F:C8 INY 0x03D770|$0F:$D760:60 RTS ; control flow target (from $D7A0, $D7A3) 0x03D771|$0F:$D761:B9 34 05 LDA $0534,Y 0x03D774|$0F:$D764:99 3C 05 STA $053C,Y ; NPC #$00 ? 0x03D777|$0F:$D767:C8 INY 0x03D778|$0F:$D768:60 RTS ; control flow target (from $D723, $D728) 0x03D779|$0F:$D769:B9 41 05 LDA $0541,Y ; NPC #$00 sprite ID 0x03D77C|$0F:$D76C:C9 FF CMP #$FF 0x03D77E|$0F:$D76E:F0 06 BEQ $D776 0x03D780|$0F:$D770:20 45 D7 JSR $D745 0x03D783|$0F:$D773:20 45 D7 JSR $D745 ; control flow target (from $D76E, $D77C) 0x03D786|$0F:$D776:60 RTS ; control flow target (from $D737, $D73C) 0x03D787|$0F:$D777:B9 41 05 LDA $0541,Y ; NPC #$00 sprite ID 0x03D78A|$0F:$D77A:C9 FF CMP #$FF 0x03D78C|$0F:$D77C:F0 F8 BEQ $D776 0x03D78E|$0F:$D77E:B9 3A 05 LDA $053A,Y 0x03D791|$0F:$D781:C9 80 CMP #$80 0x03D793|$0F:$D783:D0 15 BNE $D79A 0x03D795|$0F:$D785:B9 3B 05 LDA $053B,Y 0x03D798|$0F:$D788:C9 6F CMP #$6F 0x03D79A|$0F:$D78A:D0 0E BNE $D79A 0x03D79C|$0F:$D78C:A9 FF LDA #$FF 0x03D79E|$0F:$D78E:99 41 05 STA $0541,Y ; NPC #$00 sprite ID 0x03D7A1|$0F:$D791:A9 00 LDA #$00 0x03D7A3|$0F:$D793:99 3A 05 STA $053A,Y 0x03D7A6|$0F:$D796:99 3B 05 STA $053B,Y 0x03D7A9|$0F:$D799:60 RTS ; control flow target (from $D783, $D78A) 0x03D7AA|$0F:$D79A:B9 38 05 LDA $0538,Y 0x03D7AD|$0F:$D79D:99 40 05 STA $0540,Y ; NPC #$00 ? + direction nybble 0x03D7B0|$0F:$D7A0:20 61 D7 JSR $D761 0x03D7B3|$0F:$D7A3:4C 61 D7 JMP $D761 ; control flow target (from $D4F9, $D501) ; external control flow target (from $06:$96C6) 0x03D7B6|$0F:$D7A6:20 75 F7 JSR $F775 ; load ROM bank #$03 0x03D7B9|$0F:$D7A9:AD EC D7 LDA $D7EC ; -> $03:$BD13: warp points (map ID, X-pos, Y-pos); other end is same index in $02:$A27E 0x03D7BC|$0F:$D7AC:85 0C STA $0C 0x03D7BE|$0F:$D7AE:AD ED D7 LDA $D7ED 0x03D7C1|$0F:$D7B1:85 0D STA $0D 0x03D7C3|$0F:$D7B3:20 69 D8 JSR $D869 ; scan through warp point list (not sure what stops this from scanning through entire ROM...), updating $0C-$0D to address of the relevant warp point ; control flow target (from $D541) 0x03D7C6|$0F:$D7B6:A5 0C LDA $0C 0x03D7C8|$0F:$D7B8:38 SEC 0x03D7C9|$0F:$D7B9:ED EC D7 SBC $D7EC ; -> $03:$BD13: warp points (map ID, X-pos, Y-pos); other end is same index in $02:$A27E 0x03D7CC|$0F:$D7BC:85 0C STA $0C 0x03D7CE|$0F:$D7BE:A5 0D LDA $0D 0x03D7D0|$0F:$D7C0:ED ED D7 SBC $D7ED 0x03D7D3|$0F:$D7C3:85 0D STA $0D 0x03D7D5|$0F:$D7C5:A5 0C LDA $0C 0x03D7D7|$0F:$D7C7:18 CLC 0x03D7D8|$0F:$D7C8:6D EA D7 ADC $D7EA ; -> $02:$A27E: warp points (map ID, X-pos, Y-pos); other end is same index in $03:$BD13 0x03D7DB|$0F:$D7CB:85 0C STA $0C 0x03D7DD|$0F:$D7CD:A5 0D LDA $0D 0x03D7DF|$0F:$D7CF:6D EB D7 ADC $D7EB 0x03D7E2|$0F:$D7D2:85 0D STA $0D 0x03D7E4|$0F:$D7D4:20 70 F7 JSR $F770 ; load ROM bank #$02 0x03D7E7|$0F:$D7D7:A0 00 LDY #$00 0x03D7E9|$0F:$D7D9:B1 0C LDA ($0C),Y 0x03D7EB|$0F:$D7DB:10 03 BPL $D7E0 0x03D7ED|$0F:$D7DD:98 TYA 0x03D7EE|$0F:$D7DE:F0 57 BEQ $D837 ; control flow target (from $D7DB) 0x03D7F0|$0F:$D7E0:B1 0C LDA ($0C),Y 0x03D7F2|$0F:$D7E2:29 7F AND #$7F 0x03D7F4|$0F:$D7E4:C9 2B CMP #$2B 0x03D7F6|$0F:$D7E6:B0 49 BCS $D831 0x03D7F8|$0F:$D7E8:90 4B BCC $D835 ; code -> data ; -> $02:$A27E: warp points (map ID, X-pos, Y-pos); other end is same index in $03:$BD13 ; data load target (from $D7C8, $D7F1, $D801) 0x03D7FA|$0F:$D7EA:7E ; data load target (from $D7CF, $D7F6, $D808) 0x03D7FB|$0F:$D7EB: A2 ; $02:$A27E; warp points (map ID, X-pos, Y-pos); other end is same index in $03:$BD13 ; -> $03:$BD13: warp points (map ID, X-pos, Y-pos); other end is same index in $02:$A27E ; data load target (from $D51A, $D7A9, $D7B9, $D810) 0x03D7FC|$0F:$D7EC:13 ; data load target (from $D51F, $D7AE, $D7C0, $D817) 0x03D7FD|$0F:$D7ED: BD ; $03:$BD13; warp points (map ID, X-pos, Y-pos); other end is same index in $02:$A27E ; data -> code ; control flow target (from $D4EB) 0x03D7FE|$0F:$D7EE:20 70 F7 JSR $F770 ; load ROM bank #$02 0x03D801|$0F:$D7F1:AD EA D7 LDA $D7EA ; -> $02:$A27E: warp points (map ID, X-pos, Y-pos); other end is same index in $03:$BD13; set $0C-$0D to the bank 2 end of the warp point data 0x03D804|$0F:$D7F4:85 0C STA $0C 0x03D806|$0F:$D7F6:AD EB D7 LDA $D7EB 0x03D809|$0F:$D7F9:85 0D STA $0D 0x03D80B|$0F:$D7FB:20 69 D8 JSR $D869 ; scan through warp point list (not sure what stops this from scanning through entire ROM...), updating $0C-$0D to address of the relevant warp point 0x03D80E|$0F:$D7FE:A5 0C LDA $0C ; now that we have the warp point address in $0C-$0D, subtract the original pointer to get the relative offset 0x03D810|$0F:$D800:38 SEC 0x03D811|$0F:$D801:ED EA D7 SBC $D7EA ; -> $02:$A27E: warp points (map ID, X-pos, Y-pos); other end is same index in $03:$BD13 0x03D814|$0F:$D804:85 0C STA $0C 0x03D816|$0F:$D806:A5 0D LDA $0D 0x03D818|$0F:$D808:ED EB D7 SBC $D7EB 0x03D81B|$0F:$D80B:85 0D STA $0D 0x03D81D|$0F:$D80D:A5 0C LDA $0C ; and then add the bank 3 pointer to get the corresponding bank 3 end of the warp point data 0x03D81F|$0F:$D80F:18 CLC 0x03D820|$0F:$D810:6D EC D7 ADC $D7EC ; -> $03:$BD13: warp points (map ID, X-pos, Y-pos); other end is same index in $02:$A27E 0x03D823|$0F:$D813:85 0C STA $0C 0x03D825|$0F:$D815:A5 0D LDA $0D 0x03D827|$0F:$D817:6D ED D7 ADC $D7ED 0x03D82A|$0F:$D81A:85 0D STA $0D ; external control flow target (from $06:$9956) 0x03D82C|$0F:$D81C:20 75 F7 JSR $F775 ; load ROM bank #$03 0x03D82F|$0F:$D81F:A0 00 LDY #$00 0x03D831|$0F:$D821:B1 0C LDA ($0C),Y ; map ID 0x03D833|$0F:$D823:10 04 BPL $D829 0x03D835|$0F:$D825:A9 02 LDA #$02 0x03D837|$0F:$D827:D0 0E BNE $D837 ; control flow target (from $D823) 0x03D839|$0F:$D829:B1 0C LDA ($0C),Y ; useless op; A hasn't changed since the last LDA 0x03D83B|$0F:$D82B:29 7F AND #$7F ; useless op; we got here from BPL 0x03D83D|$0F:$D82D:C9 2B CMP #$2B 0x03D83F|$0F:$D82F:B0 04 BCS $D835 ; control flow target (from $D7E6) 0x03D841|$0F:$D831:A9 04 LDA #$04 0x03D843|$0F:$D833:D0 02 BNE $D837 ; control flow target (from $D7E8, $D82F) 0x03D845|$0F:$D835:A9 03 LDA #$03 ; control flow target (from $D7DE, $D827, $D833, $D894) 0x03D847|$0F:$D837:85 45 STA $45 0x03D849|$0F:$D839:A0 00 LDY #$00 0x03D84B|$0F:$D83B:B1 0C LDA ($0C),Y ; warp destination map ID 0x03D84D|$0F:$D83D:29 7F AND #$7F 0x03D84F|$0F:$D83F:85 31 STA $31 ; current map ID 0x03D851|$0F:$D841:C8 INY 0x03D852|$0F:$D842:B1 0C LDA ($0C),Y ; warp destination X-pos 0x03D854|$0F:$D844:85 16 STA $16 ; current map X-pos (1) 0x03D856|$0F:$D846:85 28 STA $28 ; current map X-pos (2) 0x03D858|$0F:$D848:85 2A STA $2A ; current map X-pos pixel, low byte 0x03D85A|$0F:$D84A:C8 INY 0x03D85B|$0F:$D84B:B1 0C LDA ($0C),Y ; warp destination Y-pos 0x03D85D|$0F:$D84D:85 17 STA $17 ; current map Y-pos (1) 0x03D85F|$0F:$D84F:85 29 STA $29 ; current map Y-pos (2) 0x03D861|$0F:$D851:85 2C STA $2C ; current map Y-pos pixel, low byte 0x03D863|$0F:$D853:A9 00 LDA #$00 0x03D865|$0F:$D855:85 2B STA $2B ; current map X-pos pixel, high byte 0x03D867|$0F:$D857:85 2D STA $2D ; current map Y-pos pixel, high byte 0x03D869|$0F:$D859:A2 04 LDX #$04 ; convert 16x16 map positions to pixels ; control flow target (from $D864) 0x03D86B|$0F:$D85B:06 2A ASL $2A ; current map X-pos pixel, low byte 0x03D86D|$0F:$D85D:26 2B ROL $2B ; current map X-pos pixel, high byte 0x03D86F|$0F:$D85F:06 2C ASL $2C ; current map Y-pos pixel, low byte 0x03D871|$0F:$D861:26 2D ROL $2D ; current map Y-pos pixel, high byte 0x03D873|$0F:$D863:CA DEX 0x03D874|$0F:$D864:D0 F5 BNE $D85B 0x03D876|$0F:$D866:4C 87 E2 JMP $E287 ; scan through warp point list (not sure what stops this from scanning through entire ROM...), updating $0C-$0D to address of the relevant warp point ; control flow target (from $D7B3, $D7FB, $D889, $D88D) 0x03D879|$0F:$D869:A0 00 LDY #$00 0x03D87B|$0F:$D86B:B1 0C LDA ($0C),Y ; Map ID 0x03D87D|$0F:$D86D:29 7F AND #$7F 0x03D87F|$0F:$D86F:C5 31 CMP $31 ; current map ID 0x03D881|$0F:$D871:D0 0F BNE $D882 ; if different map/pos, update $0C-$0D to next index 0x03D883|$0F:$D873:C8 INY 0x03D884|$0F:$D874:A5 16 LDA $16 ; current map X-pos (1) 0x03D886|$0F:$D876:D1 0C CMP ($0C),Y 0x03D888|$0F:$D878:D0 08 BNE $D882 ; if different map/pos, update $0C-$0D to next index 0x03D88A|$0F:$D87A:C8 INY 0x03D88B|$0F:$D87B:A5 17 LDA $17 ; current map Y-pos (1) 0x03D88D|$0F:$D87D:D1 0C CMP ($0C),Y 0x03D88F|$0F:$D87F:D0 01 BNE $D882 ; if different map/pos, update $0C-$0D to next index 0x03D891|$0F:$D881:60 RTS ; if different map/pos, update $0C-$0D to next index ; control flow target (from $D871, $D878, $D87F) 0x03D892|$0F:$D882:A5 0C LDA $0C 0x03D894|$0F:$D884:18 CLC 0x03D895|$0F:$D885:69 03 ADC #$03 ; warp data is 3 bytes each 0x03D897|$0F:$D887:85 0C STA $0C 0x03D899|$0F:$D889:90 DE BCC $D869 ; scan through warp point list (not sure what stops this from scanning through entire ROM...), updating $0C-$0D to address of the relevant warp point 0x03D89B|$0F:$D88B:E6 0D INC $0D 0x03D89D|$0F:$D88D:D0 DA BNE $D869 ; scan through warp point list (not sure what stops this from scanning through entire ROM...), updating $0C-$0D to address of the relevant warp point ; warp to warp point given by ($0C) ; control flow target (from $D4CF, $D5E5) ; external control flow target (from $06:$8C39, $06:$8C5F, $06:$BD69) 0x03D89F|$0F:$D88F:48 PHA 0x03D8A0|$0F:$D890:20 70 F7 JSR $F770 ; load ROM bank #$02 0x03D8A3|$0F:$D893:68 PLA 0x03D8A4|$0F:$D894:4C 37 D8 JMP $D837 ; control flow target (from $E600, $E630, $E694, $E6AE, $E6DD, $E704, $E72E, $E75B, $E791, $E7DB, $E802, $E82C, $E859, $E877) 0x03D8A7|$0F:$D897:A0 08 LDY #$08 0x03D8A9|$0F:$D899:20 D1 DB JSR $DBD1 0x03D8AC|$0F:$D89C:A0 10 LDY #$10 0x03D8AE|$0F:$D89E:20 D1 DB JSR $DBD1 0x03D8B1|$0F:$D8A1:A5 03 LDA $03 ; game clock? 0x03D8B3|$0F:$D8A3:29 0F AND #$0F 0x03D8B5|$0F:$D8A5:D0 24 BNE $D8CB 0x03D8B7|$0F:$D8A7:A0 00 LDY #$00 0x03D8B9|$0F:$D8A9:B9 49 05 LDA $0549,Y ; NPC #$01 sprite ID 0x03D8BC|$0F:$D8AC:C9 FF CMP #$FF 0x03D8BE|$0F:$D8AE:F0 03 BEQ $D8B3 0x03D8C0|$0F:$D8B0:20 E0 DB JSR $DBE0 ; control flow target (from $D8AE) 0x03D8C3|$0F:$D8B3:A0 08 LDY #$08 0x03D8C5|$0F:$D8B5:B9 49 05 LDA $0549,Y ; NPC #$01 sprite ID 0x03D8C8|$0F:$D8B8:C9 FF CMP #$FF 0x03D8CA|$0F:$D8BA:F0 03 BEQ $D8BF 0x03D8CC|$0F:$D8BC:20 E0 DB JSR $DBE0 ; control flow target (from $D8BA) 0x03D8CF|$0F:$D8BF:AD 48 05 LDA $0548 ; NPC #$01 ? + direction nybble 0x03D8D2|$0F:$D8C2:8D 50 05 STA $0550 ; NPC #$02 ? + direction nybble 0x03D8D5|$0F:$D8C5:AD 40 05 LDA $0540 ; NPC #$00 ? + direction nybble 0x03D8D8|$0F:$D8C8:8D 48 05 STA $0548 ; NPC #$01 ? + direction nybble ; control flow target (from $C758, $C827, $C847, $CCDC, $CD6F, $CD7E, $CF5E, $CF64, $D314, $D32E, $D6F9, $D72E, $D742, $D8A5, $E2F2, $E979, $F470, $F865, $FF8A) 0x03D8DB|$0F:$D8CB:A5 8E LDA $8E ; flag for in battle or not (#$FF)? 0x03D8DD|$0F:$D8CD:F0 01 BEQ $D8D0 0x03D8DF|$0F:$D8CF:60 RTS ; control flow target (from $D8CD) 0x03D8E0|$0F:$D8D0:20 75 F7 JSR $F775 ; load ROM bank #$03 0x03D8E3|$0F:$D8D3:A5 03 LDA $03 ; game clock? 0x03D8E5|$0F:$D8D5:29 0F AND #$0F 0x03D8E7|$0F:$D8D7:D0 07 BNE $D8E0 0x03D8E9|$0F:$D8D9:A5 36 LDA $36 0x03D8EB|$0F:$D8DB:18 CLC 0x03D8EC|$0F:$D8DC:69 08 ADC #$08 0x03D8EE|$0F:$D8DE:85 36 STA $36 ; control flow target (from $D8D7) 0x03D8F0|$0F:$D8E0:20 68 C4 JSR $C468 ; set every 4th byte of $0200 - $02FC to #$F0 0x03D8F3|$0F:$D8E3:A2 00 LDX #$00 0x03D8F5|$0F:$D8E5:A0 00 LDY #$00 0x03D8F7|$0F:$D8E7:84 37 STY $37 0x03D8F9|$0F:$D8E9:20 9A DC JSR $DC9A 0x03D8FC|$0F:$D8EC:A0 08 LDY #$08 0x03D8FE|$0F:$D8EE:A2 50 LDX #$50 0x03D900|$0F:$D8F0:20 9A DC JSR $DC9A 0x03D903|$0F:$D8F3:A0 10 LDY #$10 0x03D905|$0F:$D8F5:A2 B0 LDX #$B0 0x03D907|$0F:$D8F7:20 9A DC JSR $DC9A 0x03D90A|$0F:$D8FA:A5 38 LDA $38 0x03D90C|$0F:$D8FC:C9 FF CMP #$FF 0x03D90E|$0F:$D8FE:D0 03 BNE $D903 0x03D910|$0F:$D900:4C B6 DB JMP $DBB6 ; control flow target (from $D8FE) 0x03D913|$0F:$D903:A5 35 LDA $35 ; flag indicating whether any menu is currently open 0x03D915|$0F:$D905:F0 03 BEQ $D90A 0x03D917|$0F:$D907:4C 35 DB JMP $DB35 ; control flow target (from $D905) 0x03D91A|$0F:$D90A:A5 38 LDA $38 0x03D91C|$0F:$D90C:10 02 BPL $D910 0x03D91E|$0F:$D90E:29 7F AND #$7F ; control flow target (from $D90C) 0x03D920|$0F:$D910:0A ASL 0x03D921|$0F:$D911:0A ASL 0x03D922|$0F:$D912:0A ASL 0x03D923|$0F:$D913:69 18 ADC #$18 0x03D925|$0F:$D915:AA TAX 0x03D926|$0F:$D916:A9 02 LDA #$02 0x03D928|$0F:$D918:85 34 STA $34 ; control flow target (from $DB32) 0x03D92A|$0F:$D91A:BD 41 05 LDA $0541,X ; NPC #$00 sprite ID 0x03D92D|$0F:$D91D:C9 FF CMP #$FF 0x03D92F|$0F:$D91F:D0 03 BNE $D924 0x03D931|$0F:$D921:4C 29 DB JMP $DB29 ; control flow target (from $D91F) 0x03D934|$0F:$D924:A5 03 LDA $03 ; game clock? 0x03D936|$0F:$D926:29 0F AND #$0F 0x03D938|$0F:$D928:C9 01 CMP #$01 0x03D93A|$0F:$D92A:F0 03 BEQ $D92F 0x03D93C|$0F:$D92C:4C C4 DA JMP $DAC4 ; control flow target (from $D92A) 0x03D93F|$0F:$D92F:A5 35 LDA $35 ; flag indicating whether any menu is currently open 0x03D941|$0F:$D931:F0 1C BEQ $D94F ; control flow target (from $D95C, $D9F9) 0x03D943|$0F:$D933:A5 38 LDA $38 0x03D945|$0F:$D935:10 0D BPL $D944 0x03D947|$0F:$D937:DE 3A 05 DEC $053A,X 0x03D94A|$0F:$D93A:BD 3A 05 LDA $053A,X 0x03D94D|$0F:$D93D:C9 FF CMP #$FF 0x03D94F|$0F:$D93F:D0 03 BNE $D944 0x03D951|$0F:$D941:DE 3B 05 DEC $053B,X ; control flow target (from $D935, $D93F, $D997) 0x03D954|$0F:$D944:BD 40 05 LDA $0540,X ; NPC #$00 ? + direction nybble 0x03D957|$0F:$D947:29 F3 AND #$F3 0x03D959|$0F:$D949:9D 40 05 STA $0540,X ; NPC #$00 ? + direction nybble 0x03D95C|$0F:$D94C:4C 29 DB JMP $DB29 ; control flow target (from $D931) 0x03D95F|$0F:$D94F:BD 40 05 LDA $0540,X ; NPC #$00 ? + direction nybble 0x03D962|$0F:$D952:29 F0 AND #$F0 0x03D964|$0F:$D954:C9 10 CMP #$10 0x03D966|$0F:$D956:F0 44 BEQ $D99C 0x03D968|$0F:$D958:C9 20 CMP #$20 0x03D96A|$0F:$D95A:F0 03 BEQ $D95F 0x03D96C|$0F:$D95C:4C 33 D9 JMP $D933 ; control flow target (from $D95A) 0x03D96F|$0F:$D95F:BD 3A 05 LDA $053A,X 0x03D972|$0F:$D962:85 0C STA $0C 0x03D974|$0F:$D964:BD 3B 05 LDA $053B,X 0x03D977|$0F:$D967:85 0D STA $0D 0x03D979|$0F:$D969:20 7A F7 JSR $F77A ; load ROM bank #$07 0x03D97C|$0F:$D96C:A0 00 LDY #$00 0x03D97E|$0F:$D96E:B1 0C LDA ($0C),Y 0x03D980|$0F:$D970:10 11 BPL $D983 0x03D982|$0F:$D972:BD 40 05 LDA $0540,X ; NPC #$00 ? + direction nybble 0x03D985|$0F:$D975:29 03 AND #$03 0x03D987|$0F:$D977:9D 40 05 STA $0540,X ; NPC #$00 ? + direction nybble 0x03D98A|$0F:$D97A:A5 38 LDA $38 0x03D98C|$0F:$D97C:29 7F AND #$7F 0x03D98E|$0F:$D97E:85 38 STA $38 0x03D990|$0F:$D980:4C 29 DB JMP $DB29 ; control flow target (from $D970) 0x03D993|$0F:$D983:FE 3A 05 INC $053A,X 0x03D996|$0F:$D986:D0 03 BNE $D98B 0x03D998|$0F:$D988:FE 3B 05 INC $053B,X ; control flow target (from $D986) 0x03D99B|$0F:$D98B:BD 40 05 LDA $0540,X ; NPC #$00 ? + direction nybble 0x03D99E|$0F:$D98E:29 F0 AND #$F0 0x03D9A0|$0F:$D990:11 0C ORA ($0C),Y 0x03D9A2|$0F:$D992:9D 40 05 STA $0540,X ; NPC #$00 ? + direction nybble 0x03D9A5|$0F:$D995:29 08 AND #$08 0x03D9A7|$0F:$D997:D0 AB BNE $D944 0x03D9A9|$0F:$D999:4C BC DA JMP $DABC ; control flow target (from $D956) 0x03D9AC|$0F:$D99C:20 AB C3 JSR $C3AB ; generate a random number and store it in $32-$33 (two passes) 0x03D9AF|$0F:$D99F:A5 32 LDA $32 ; RNG byte 0 0x03D9B1|$0F:$D9A1:29 03 AND #$03 0x03D9B3|$0F:$D9A3:85 0C STA $0C 0x03D9B5|$0F:$D9A5:BD 40 05 LDA $0540,X ; NPC #$00 ? + direction nybble 0x03D9B8|$0F:$D9A8:29 F0 AND #$F0 0x03D9BA|$0F:$D9AA:05 0C ORA $0C 0x03D9BC|$0F:$D9AC:9D 40 05 STA $0540,X ; NPC #$00 ? + direction nybble 0x03D9BF|$0F:$D9AF:20 F8 DB JSR $DBF8 0x03D9C2|$0F:$D9B2:20 03 DC JSR $DC03 0x03D9C5|$0F:$D9B5:A5 11 LDA $11 0x03D9C7|$0F:$D9B7:F0 04 BEQ $D9BD 0x03D9C9|$0F:$D9B9:A5 10 LDA $10 0x03D9CB|$0F:$D9BB:D0 3C BNE $D9F9 ; control flow target (from $D9B7) 0x03D9CD|$0F:$D9BD:20 18 E2 JSR $E218 0x03D9D0|$0F:$D9C0:BD 40 05 LDA $0540,X ; NPC #$00 ? + direction nybble 0x03D9D3|$0F:$D9C3:29 03 AND #$03 0x03D9D5|$0F:$D9C5:D0 05 BNE $D9CC 0x03D9D7|$0F:$D9C7:C6 13 DEC $13 0x03D9D9|$0F:$D9C9:4C E0 D9 JMP $D9E0 ; control flow target (from $D9C5) 0x03D9DC|$0F:$D9CC:C9 01 CMP #$01 0x03D9DE|$0F:$D9CE:D0 05 BNE $D9D5 0x03D9E0|$0F:$D9D0:E6 12 INC $12 0x03D9E2|$0F:$D9D2:4C E0 D9 JMP $D9E0 ; control flow target (from $D9CE) 0x03D9E5|$0F:$D9D5:C9 02 CMP #$02 0x03D9E7|$0F:$D9D7:D0 05 BNE $D9DE 0x03D9E9|$0F:$D9D9:E6 13 INC $13 0x03D9EB|$0F:$D9DB:4C E0 D9 JMP $D9E0 ; control flow target (from $D9D7) 0x03D9EE|$0F:$D9DE:C6 12 DEC $12 ; control flow target (from $D9C9, $D9D2, $D9DB) 0x03D9F0|$0F:$D9E0:A5 38 LDA $38 0x03D9F2|$0F:$D9E2:30 32 BMI $DA16 0x03D9F4|$0F:$D9E4:A0 0C LDY #$0C ; control flow target (from $D9EE) 0x03D9F6|$0F:$D9E6:A5 31 LDA $31 ; current map ID 0x03D9F8|$0F:$D9E8:D9 FC D9 CMP $D9FC,Y 0x03D9FB|$0F:$D9EB:F0 05 BEQ $D9F2 ; control flow target (from $D9F7) 0x03D9FD|$0F:$D9ED:88 DEY 0x03D9FE|$0F:$D9EE:10 F6 BPL $D9E6 0x03DA00|$0F:$D9F0:30 24 BMI $DA16 ; control flow target (from $D9EB) 0x03DA02|$0F:$D9F2:A5 13 LDA $13 0x03DA04|$0F:$D9F4:D9 09 DA CMP $DA09,Y 0x03DA07|$0F:$D9F7:D0 F4 BNE $D9ED ; control flow target (from $D9BB, $DA1A, $DA20, $DA2B, $DA37) 0x03DA09|$0F:$D9F9:4C 33 D9 JMP $D933 ; code -> data ; indexed data load target (from $D9E8) 0x03DA0C|$0F:$D9FC:15 ; Map ID #$15: Beran 0x03DA0D|$0F:$D9FD:0B ; Map ID #$0B: Lianport 0x03DA0E|$0F:$D9FE:0F ; Map ID #$0F: Osterfair 0x03DA0F|$0F:$D9FF:1A ; Map ID #$1A: Shrine SW of Cannock 0x03DA10|$0F:$DA00:10 ; Map ID #$10: Zahan 0x03DA11|$0F:$DA01:03 ; Map ID #$03: Midenhall 1F 0x03DA12|$0F:$DA02:05 ; Map ID #$05: Leftwyne 0x03DA13|$0F:$DA03:06 ; Map ID #$06: Cannock 0x03DA14|$0F:$DA04:07 ; Map ID #$07: Hamlin 0x03DA15|$0F:$DA05:0B ; Map ID #$0B: Lianport 0x03DA16|$0F:$DA06:0C ; Map ID #$0C: Tantegel 0x03DA17|$0F:$DA07:11 ; Map ID #$11: Tuhn 0x03DA18|$0F:$DA08:14 ; Map ID #$14: Wellgarth Underground ; indexed data load target (from $D9F4) ; indirect data load target 0x03DA19|$0F:$DA09:10 ; indirect data load target 0x03DA1A|$0F:$DA0A:08 ; indirect data load target 0x03DA1B|$0F:$DA0B:0D 0x03DA1C|$0F:$DA0C:04 ; indirect data load target 0x03DA1D|$0F:$DA0D:08 0x03DA1E|$0F:$DA0E:13 0x03DA1F|$0F:$DA0F:0D 0x03DA20|$0F:$DA10:0F 0x03DA21|$0F:$DA11:0F ; indirect data load target 0x03DA22|$0F:$DA12:14 ; indirect data load target 0x03DA23|$0F:$DA13:0C ; indirect data load target 0x03DA24|$0F:$DA14:0E ; indirect data load target 0x03DA25|$0F:$DA15:12 ; data -> code ; control flow target (from $D9E2, $D9F0) 0x03DA26|$0F:$DA16:A5 22 LDA $22 ; map height 0x03DA28|$0F:$DA18:C5 13 CMP $13 0x03DA2A|$0F:$DA1A:90 DD BCC $D9F9 0x03DA2C|$0F:$DA1C:A5 21 LDA $21 ; map width 0x03DA2E|$0F:$DA1E:C5 12 CMP $12 0x03DA30|$0F:$DA20:90 D7 BCC $D9F9 0x03DA32|$0F:$DA22:20 03 DC JSR $DC03 0x03DA35|$0F:$DA25:A5 11 LDA $11 0x03DA37|$0F:$DA27:F0 04 BEQ $DA2D 0x03DA39|$0F:$DA29:A5 10 LDA $10 ; control flow target (from $DAA7) 0x03DA3B|$0F:$DA2B:D0 CC BNE $D9F9 ; control flow target (from $DA27) 0x03DA3D|$0F:$DA2D:A5 12 LDA $12 0x03DA3F|$0F:$DA2F:C5 16 CMP $16 ; current map X-pos (1) 0x03DA41|$0F:$DA31:D0 06 BNE $DA39 0x03DA43|$0F:$DA33:A5 13 LDA $13 0x03DA45|$0F:$DA35:C5 17 CMP $17 ; current map Y-pos (1) ; control flow target (from $DA43, $DA5D, $DA71, $DA88) 0x03DA47|$0F:$DA37:F0 C0 BEQ $D9F9 ; control flow target (from $DA31) 0x03DA49|$0F:$DA39:A5 12 LDA $12 0x03DA4B|$0F:$DA3B:C5 28 CMP $28 ; current map X-pos (2) 0x03DA4D|$0F:$DA3D:D0 06 BNE $DA45 0x03DA4F|$0F:$DA3F:A5 13 LDA $13 0x03DA51|$0F:$DA41:C5 29 CMP $29 ; current map Y-pos (2) 0x03DA53|$0F:$DA43:F0 F2 BEQ $DA37 ; control flow target (from $DA3D) 0x03DA55|$0F:$DA45:A5 17 LDA $17 ; current map Y-pos (1) 0x03DA57|$0F:$DA47:18 CLC 0x03DA58|$0F:$DA48:6D 45 05 ADC $0545 ; NPC #$01 ? 0x03DA5B|$0F:$DA4B:85 0F STA $0F 0x03DA5D|$0F:$DA4D:A5 16 LDA $16 ; current map X-pos (1) 0x03DA5F|$0F:$DA4F:18 CLC 0x03DA60|$0F:$DA50:6D 44 05 ADC $0544 ; NPC #$01 ? 0x03DA63|$0F:$DA53:85 0E STA $0E 0x03DA65|$0F:$DA55:C5 12 CMP $12 0x03DA67|$0F:$DA57:D0 06 BNE $DA5F 0x03DA69|$0F:$DA59:A5 0F LDA $0F 0x03DA6B|$0F:$DA5B:C5 13 CMP $13 0x03DA6D|$0F:$DA5D:F0 D8 BEQ $DA37 ; control flow target (from $DA57) 0x03DA6F|$0F:$DA5F:A5 0E LDA $0E 0x03DA71|$0F:$DA61:18 CLC 0x03DA72|$0F:$DA62:6D 4C 05 ADC $054C ; NPC #$02 ? 0x03DA75|$0F:$DA65:C5 12 CMP $12 0x03DA77|$0F:$DA67:D0 0A BNE $DA73 0x03DA79|$0F:$DA69:A5 0F LDA $0F 0x03DA7B|$0F:$DA6B:18 CLC 0x03DA7C|$0F:$DA6C:6D 4D 05 ADC $054D ; NPC #$02 ? 0x03DA7F|$0F:$DA6F:C5 13 CMP $13 0x03DA81|$0F:$DA71:F0 C4 BEQ $DA37 ; control flow target (from $DA67) 0x03DA83|$0F:$DA73:A0 18 LDY #$18 ; control flow target (from $DA91) 0x03DA85|$0F:$DA75:B9 41 05 LDA $0541,Y ; NPC #$00 sprite ID 0x03DA88|$0F:$DA78:C9 FF CMP #$FF 0x03DA8A|$0F:$DA7A:F0 0E BEQ $DA8A 0x03DA8C|$0F:$DA7C:B9 3C 05 LDA $053C,Y ; NPC #$00 ? 0x03DA8F|$0F:$DA7F:C5 12 CMP $12 0x03DA91|$0F:$DA81:D0 07 BNE $DA8A 0x03DA93|$0F:$DA83:B9 3D 05 LDA $053D,Y ; NPC #$00 ? 0x03DA96|$0F:$DA86:C5 13 CMP $13 0x03DA98|$0F:$DA88:F0 AD BEQ $DA37 ; control flow target (from $DA7A, $DA81) 0x03DA9A|$0F:$DA8A:98 TYA 0x03DA9B|$0F:$DA8B:18 CLC 0x03DA9C|$0F:$DA8C:69 08 ADC #$08 0x03DA9E|$0F:$DA8E:A8 TAY 0x03DA9F|$0F:$DA8F:C9 B8 CMP #$B8 0x03DAA1|$0F:$DA91:D0 E2 BNE $DA75 0x03DAA3|$0F:$DA93:A5 0D LDA $0D 0x03DAA5|$0F:$DA95:48 PHA 0x03DAA6|$0F:$DA96:A5 12 LDA $12 0x03DAA8|$0F:$DA98:85 0C STA $0C 0x03DAAA|$0F:$DA9A:A5 13 LDA $13 0x03DAAC|$0F:$DA9C:85 0E STA $0E 0x03DAAE|$0F:$DA9E:20 89 DF JSR $DF89 0x03DAB1|$0F:$DAA1:20 22 E2 JSR $E222 0x03DAB4|$0F:$DAA4:68 PLA 0x03DAB5|$0F:$DAA5:C5 0D CMP $0D ; control flow target (from $DABA) 0x03DAB7|$0F:$DAA7:D0 82 BNE $DA2B 0x03DAB9|$0F:$DAA9:20 4A DF JSR $DF4A 0x03DABC|$0F:$DAAC:A0 04 LDY #$04 0x03DABE|$0F:$DAAE:B1 10 LDA ($10),Y 0x03DAC0|$0F:$DAB0:29 F0 AND #$F0 0x03DAC2|$0F:$DAB2:F0 08 BEQ $DABC 0x03DAC4|$0F:$DAB4:C9 10 CMP #$10 0x03DAC6|$0F:$DAB6:F0 04 BEQ $DABC 0x03DAC8|$0F:$DAB8:C9 20 CMP #$20 0x03DACA|$0F:$DABA:D0 EB BNE $DAA7 ; control flow target (from $D999, $DAB2, $DAB6) 0x03DACC|$0F:$DABC:BD 40 05 LDA $0540,X ; NPC #$00 ? + direction nybble 0x03DACF|$0F:$DABF:09 08 ORA #$08 0x03DAD1|$0F:$DAC1:9D 40 05 STA $0540,X ; NPC #$00 ? + direction nybble ; control flow target (from $D92C) 0x03DAD4|$0F:$DAC4:BD 40 05 LDA $0540,X ; NPC #$00 ? + direction nybble 0x03DAD7|$0F:$DAC7:29 08 AND #$08 0x03DAD9|$0F:$DAC9:F0 5E BEQ $DB29 0x03DADB|$0F:$DACB:A5 35 LDA $35 ; flag indicating whether any menu is currently open 0x03DADD|$0F:$DACD:D0 5A BNE $DB29 0x03DADF|$0F:$DACF:BD 40 05 LDA $0540,X ; NPC #$00 ? + direction nybble 0x03DAE2|$0F:$DAD2:29 03 AND #$03 0x03DAE4|$0F:$DAD4:D0 15 BNE $DAEB 0x03DAE6|$0F:$DAD6:BD 3F 05 LDA $053F,X ; NPC #$00 ? 0x03DAE9|$0F:$DAD9:38 SEC 0x03DAEA|$0F:$DADA:E9 01 SBC #$01 0x03DAEC|$0F:$DADC:29 0F AND #$0F 0x03DAEE|$0F:$DADE:9D 3F 05 STA $053F,X ; NPC #$00 ? 0x03DAF1|$0F:$DAE1:C9 0F CMP #$0F 0x03DAF3|$0F:$DAE3:D0 44 BNE $DB29 0x03DAF5|$0F:$DAE5:DE 3D 05 DEC $053D,X ; NPC #$00 ? 0x03DAF8|$0F:$DAE8:4C 29 DB JMP $DB29 ; control flow target (from $DAD4) 0x03DAFB|$0F:$DAEB:C9 01 CMP #$01 0x03DAFD|$0F:$DAED:D0 12 BNE $DB01 0x03DAFF|$0F:$DAEF:BD 3E 05 LDA $053E,X ; NPC #$00 ? 0x03DB02|$0F:$DAF2:18 CLC 0x03DB03|$0F:$DAF3:69 01 ADC #$01 0x03DB05|$0F:$DAF5:29 0F AND #$0F 0x03DB07|$0F:$DAF7:9D 3E 05 STA $053E,X ; NPC #$00 ? 0x03DB0A|$0F:$DAFA:D0 2D BNE $DB29 0x03DB0C|$0F:$DAFC:FE 3C 05 INC $053C,X ; NPC #$00 ? 0x03DB0F|$0F:$DAFF:D0 28 BNE $DB29 ; control flow target (from $DAED) 0x03DB11|$0F:$DB01:C9 02 CMP #$02 0x03DB13|$0F:$DB03:D0 12 BNE $DB17 0x03DB15|$0F:$DB05:BD 3F 05 LDA $053F,X ; NPC #$00 ? 0x03DB18|$0F:$DB08:18 CLC 0x03DB19|$0F:$DB09:69 01 ADC #$01 0x03DB1B|$0F:$DB0B:29 0F AND #$0F 0x03DB1D|$0F:$DB0D:9D 3F 05 STA $053F,X ; NPC #$00 ? 0x03DB20|$0F:$DB10:D0 17 BNE $DB29 0x03DB22|$0F:$DB12:FE 3D 05 INC $053D,X ; NPC #$00 ? 0x03DB25|$0F:$DB15:D0 12 BNE $DB29 ; control flow target (from $DB03) 0x03DB27|$0F:$DB17:BD 3E 05 LDA $053E,X ; NPC #$00 ? 0x03DB2A|$0F:$DB1A:38 SEC 0x03DB2B|$0F:$DB1B:E9 01 SBC #$01 0x03DB2D|$0F:$DB1D:29 0F AND #$0F 0x03DB2F|$0F:$DB1F:9D 3E 05 STA $053E,X ; NPC #$00 ? 0x03DB32|$0F:$DB22:C9 0F CMP #$0F 0x03DB34|$0F:$DB24:D0 03 BNE $DB29 0x03DB36|$0F:$DB26:DE 3C 05 DEC $053C,X ; NPC #$00 ? ; control flow target (from $D921, $D94C, $D980, $DAC9, $DACD, $DAE3, $DAE8, $DAFA, $DAFF, $DB10, $DB15, $DB24) 0x03DB39|$0F:$DB29:8A TXA 0x03DB3A|$0F:$DB2A:18 CLC 0x03DB3B|$0F:$DB2B:69 08 ADC #$08 0x03DB3D|$0F:$DB2D:AA TAX 0x03DB3E|$0F:$DB2E:C6 34 DEC $34 0x03DB40|$0F:$DB30:F0 03 BEQ $DB35 0x03DB42|$0F:$DB32:4C 1A D9 JMP $D91A ; control flow target (from $D907, $DB30) 0x03DB45|$0F:$DB35:A6 3A LDX $3A ; control flow target (from $DBB3) 0x03DB47|$0F:$DB37:BD 41 05 LDA $0541,X ; NPC #$00 sprite ID 0x03DB4A|$0F:$DB3A:C9 FF CMP #$FF 0x03DB4C|$0F:$DB3C:F0 60 BEQ $DB9E 0x03DB4E|$0F:$DB3E:20 33 DC JSR $DC33 0x03DB51|$0F:$DB41:A5 0E LDA $0E 0x03DB53|$0F:$DB43:18 CLC 0x03DB54|$0F:$DB44:69 07 ADC #$07 0x03DB56|$0F:$DB46:85 0E STA $0E 0x03DB58|$0F:$DB48:A5 0F LDA $0F 0x03DB5A|$0F:$DB4A:69 00 ADC #$00 0x03DB5C|$0F:$DB4C:F0 0A BEQ $DB58 0x03DB5E|$0F:$DB4E:C9 01 CMP #$01 0x03DB60|$0F:$DB50:D0 4C BNE $DB9E 0x03DB62|$0F:$DB52:A5 0E LDA $0E 0x03DB64|$0F:$DB54:C9 07 CMP #$07 0x03DB66|$0F:$DB56:B0 46 BCS $DB9E ; control flow target (from $DB4C) 0x03DB68|$0F:$DB58:20 65 DC JSR $DC65 0x03DB6B|$0F:$DB5B:A5 10 LDA $10 0x03DB6D|$0F:$DB5D:18 CLC 0x03DB6E|$0F:$DB5E:69 0D ADC #$0D 0x03DB70|$0F:$DB60:A5 11 LDA $11 0x03DB72|$0F:$DB62:69 00 ADC #$00 0x03DB74|$0F:$DB64:D0 38 BNE $DB9E 0x03DB76|$0F:$DB66:20 F8 DB JSR $DBF8 0x03DB79|$0F:$DB69:20 03 DC JSR $DC03 0x03DB7C|$0F:$DB6C:A5 11 LDA $11 0x03DB7E|$0F:$DB6E:F0 04 BEQ $DB74 0x03DB80|$0F:$DB70:A5 10 LDA $10 0x03DB82|$0F:$DB72:D0 2A BNE $DB9E ; control flow target (from $DB6E) 0x03DB84|$0F:$DB74:20 18 E2 JSR $E218 0x03DB87|$0F:$DB77:A5 0D LDA $0D 0x03DB89|$0F:$DB79:C5 1D CMP $1D 0x03DB8B|$0F:$DB7B:D0 21 BNE $DB9E 0x03DB8D|$0F:$DB7D:AD 48 61 LDA $6148 0x03DB90|$0F:$DB80:85 0E STA $0E 0x03DB92|$0F:$DB82:AD 49 61 LDA $6149 0x03DB95|$0F:$DB85:85 0F STA $0F 0x03DB97|$0F:$DB87:AD 4A 61 LDA $614A 0x03DB9A|$0F:$DB8A:85 10 STA $10 0x03DB9C|$0F:$DB8C:AD 4B 61 LDA $614B 0x03DB9F|$0F:$DB8F:85 11 STA $11 0x03DBA1|$0F:$DB91:8A TXA 0x03DBA2|$0F:$DB92:A8 TAY 0x03DBA3|$0F:$DB93:20 CB DD JSR $DDCB 0x03DBA6|$0F:$DB96:20 75 F7 JSR $F775 ; load ROM bank #$03 0x03DBA9|$0F:$DB99:20 DD DC JSR $DCDD 0x03DBAC|$0F:$DB9C:98 TYA 0x03DBAD|$0F:$DB9D:AA TAX ; control flow target (from $DB3C, $DB50, $DB56, $DB64, $DB72, $DB7B) 0x03DBAE|$0F:$DB9E:8A TXA 0x03DBAF|$0F:$DB9F:18 CLC 0x03DBB0|$0F:$DBA0:69 08 ADC #$08 0x03DBB2|$0F:$DBA2:AA TAX 0x03DBB3|$0F:$DBA3:E0 B8 CPX #$B8 0x03DBB5|$0F:$DBA5:D0 02 BNE $DBA9 0x03DBB7|$0F:$DBA7:A2 18 LDX #$18 ; control flow target (from $DBA5) 0x03DBB9|$0F:$DBA9:E4 3A CPX $3A 0x03DBBB|$0F:$DBAB:F0 09 BEQ $DBB6 0x03DBBD|$0F:$DBAD:A5 37 LDA $37 0x03DBBF|$0F:$DBAF:C9 0D CMP #$0D 0x03DBC1|$0F:$DBB1:F0 03 BEQ $DBB6 0x03DBC3|$0F:$DBB3:4C 37 DB JMP $DB37 ; control flow target (from $D900, $DBAB, $DBB1) 0x03DBC6|$0F:$DBB6:86 3A STX $3A 0x03DBC8|$0F:$DBB8:A5 03 LDA $03 ; game clock? 0x03DBCA|$0F:$DBBA:29 0F AND #$0F 0x03DBCC|$0F:$DBBC:D0 12 BNE $DBD0 0x03DBCE|$0F:$DBBE:A5 38 LDA $38 0x03DBD0|$0F:$DBC0:30 0E BMI $DBD0 0x03DBD2|$0F:$DBC2:E6 38 INC $38 0x03DBD4|$0F:$DBC4:E6 38 INC $38 0x03DBD6|$0F:$DBC6:A5 38 LDA $38 0x03DBD8|$0F:$DBC8:C9 0A CMP #$0A 0x03DBDA|$0F:$DBCA:90 04 BCC $DBD0 0x03DBDC|$0F:$DBCC:A9 00 LDA #$00 0x03DBDE|$0F:$DBCE:85 38 STA $38 ; control flow target (from $DBBC, $DBC0, $DBCA) 0x03DBE0|$0F:$DBD0:60 RTS ; control flow target (from $D899, $D89E) 0x03DBE1|$0F:$DBD1:20 D4 DB JSR $DBD4 ; control flow target (from $DBD1) 0x03DBE4|$0F:$DBD4:B9 3A 05 LDA $053A,Y 0x03DBE7|$0F:$DBD7:18 CLC 0x03DBE8|$0F:$DBD8:79 3E 05 ADC $053E,Y ; NPC #$00 ? 0x03DBEB|$0F:$DBDB:99 3A 05 STA $053A,Y 0x03DBEE|$0F:$DBDE:C8 INY 0x03DBEF|$0F:$DBDF:60 RTS ; control flow target (from $D8B0, $D8BC) 0x03DBF0|$0F:$DBE0:20 E3 DB JSR $DBE3 ; control flow target (from $DBE0) 0x03DBF3|$0F:$DBE3:B9 46 05 LDA $0546,Y ; NPC #$01 ? 0x03DBF6|$0F:$DBE6:38 SEC 0x03DBF7|$0F:$DBE7:F9 3E 05 SBC $053E,Y ; NPC #$00 ? 0x03DBFA|$0F:$DBEA:18 CLC 0x03DBFB|$0F:$DBEB:79 44 05 ADC $0544,Y ; NPC #$01 ? 0x03DBFE|$0F:$DBEE:99 44 05 STA $0544,Y ; NPC #$01 ? 0x03DC01|$0F:$DBF1:A9 00 LDA #$00 0x03DC03|$0F:$DBF3:99 3E 05 STA $053E,Y ; NPC #$00 ? 0x03DC06|$0F:$DBF6:C8 INY 0x03DC07|$0F:$DBF7:60 RTS ; control flow target (from $D9AF, $DB66) 0x03DC08|$0F:$DBF8:BD 3C 05 LDA $053C,X ; NPC #$00 ? 0x03DC0B|$0F:$DBFB:85 12 STA $12 0x03DC0D|$0F:$DBFD:BD 3D 05 LDA $053D,X ; NPC #$00 ? 0x03DC10|$0F:$DC00:85 13 STA $13 0x03DC12|$0F:$DC02:60 RTS ; control flow target (from $D9B2, $DA22, $DB69) 0x03DC13|$0F:$DC03:A9 00 LDA #$00 0x03DC15|$0F:$DC05:85 11 STA $11 0x03DC17|$0F:$DC07:A5 12 LDA $12 0x03DC19|$0F:$DC09:38 SEC 0x03DC1A|$0F:$DC0A:E5 16 SBC $16 ; current map X-pos (1) 0x03DC1C|$0F:$DC0C:18 CLC 0x03DC1D|$0F:$DC0D:69 08 ADC #$08 0x03DC1F|$0F:$DC0F:85 0C STA $0C 0x03DC21|$0F:$DC11:C9 10 CMP #$10 0x03DC23|$0F:$DC13:90 01 BCC $DC16 0x03DC25|$0F:$DC15:60 RTS ; control flow target (from $DC13) 0x03DC26|$0F:$DC16:A5 13 LDA $13 0x03DC28|$0F:$DC18:38 SEC 0x03DC29|$0F:$DC19:E5 17 SBC $17 ; current map Y-pos (1) 0x03DC2B|$0F:$DC1B:18 CLC 0x03DC2C|$0F:$DC1C:69 07 ADC #$07 0x03DC2E|$0F:$DC1E:85 0E STA $0E 0x03DC30|$0F:$DC20:C9 0F CMP #$0F 0x03DC32|$0F:$DC22:90 01 BCC $DC25 0x03DC34|$0F:$DC24:60 RTS ; control flow target (from $DC22) 0x03DC35|$0F:$DC25:20 31 DE JSR $DE31 0x03DC38|$0F:$DC28:A0 00 LDY #$00 0x03DC3A|$0F:$DC2A:B1 07 LDA ($07),Y 0x03DC3C|$0F:$DC2C:85 10 STA $10 0x03DC3E|$0F:$DC2E:A9 FF LDA #$FF 0x03DC40|$0F:$DC30:85 11 STA $11 0x03DC42|$0F:$DC32:60 RTS ; control flow target (from $DB3E) 0x03DC43|$0F:$DC33:BD 3C 05 LDA $053C,X ; NPC #$00 ? 0x03DC46|$0F:$DC36:85 0F STA $0F 0x03DC48|$0F:$DC38:A9 00 LDA #$00 0x03DC4A|$0F:$DC3A:46 0F LSR $0F 0x03DC4C|$0F:$DC3C:6A ROR 0x03DC4D|$0F:$DC3D:46 0F LSR $0F 0x03DC4F|$0F:$DC3F:6A ROR 0x03DC50|$0F:$DC40:46 0F LSR $0F 0x03DC52|$0F:$DC42:6A ROR 0x03DC53|$0F:$DC43:46 0F LSR $0F 0x03DC55|$0F:$DC45:6A ROR 0x03DC56|$0F:$DC46:1D 3E 05 ORA $053E,X ; NPC #$00 ? 0x03DC59|$0F:$DC49:38 SEC 0x03DC5A|$0F:$DC4A:E5 2A SBC $2A ; current map X-pos pixel, low byte 0x03DC5C|$0F:$DC4C:49 80 EOR #$80 0x03DC5E|$0F:$DC4E:85 0E STA $0E 0x03DC60|$0F:$DC50:A5 0F LDA $0F 0x03DC62|$0F:$DC52:E5 2B SBC $2B ; current map X-pos pixel, high byte 0x03DC64|$0F:$DC54:85 0F STA $0F 0x03DC66|$0F:$DC56:A5 0E LDA $0E 0x03DC68|$0F:$DC58:8D 48 61 STA $6148 0x03DC6B|$0F:$DC5B:30 02 BMI $DC5F 0x03DC6D|$0F:$DC5D:E6 0F INC $0F ; control flow target (from $DC5B) 0x03DC6F|$0F:$DC5F:A5 0F LDA $0F 0x03DC71|$0F:$DC61:8D 49 61 STA $6149 0x03DC74|$0F:$DC64:60 RTS ; control flow target (from $DB58) 0x03DC75|$0F:$DC65:BD 3D 05 LDA $053D,X ; NPC #$00 ? 0x03DC78|$0F:$DC68:85 11 STA $11 0x03DC7A|$0F:$DC6A:A9 00 LDA #$00 0x03DC7C|$0F:$DC6C:46 11 LSR $11 0x03DC7E|$0F:$DC6E:6A ROR 0x03DC7F|$0F:$DC6F:46 11 LSR $11 0x03DC81|$0F:$DC71:6A ROR 0x03DC82|$0F:$DC72:46 11 LSR $11 0x03DC84|$0F:$DC74:6A ROR 0x03DC85|$0F:$DC75:46 11 LSR $11 0x03DC87|$0F:$DC77:6A ROR 0x03DC88|$0F:$DC78:1D 3F 05 ORA $053F,X ; NPC #$00 ? 0x03DC8B|$0F:$DC7B:38 SEC 0x03DC8C|$0F:$DC7C:E5 2C SBC $2C ; current map Y-pos pixel, low byte 0x03DC8E|$0F:$DC7E:85 10 STA $10 0x03DC90|$0F:$DC80:A5 11 LDA $11 0x03DC92|$0F:$DC82:E5 2D SBC $2D ; current map Y-pos pixel, high byte 0x03DC94|$0F:$DC84:85 11 STA $11 0x03DC96|$0F:$DC86:A5 10 LDA $10 0x03DC98|$0F:$DC88:18 CLC 0x03DC99|$0F:$DC89:69 6F ADC #$6F 0x03DC9B|$0F:$DC8B:85 10 STA $10 0x03DC9D|$0F:$DC8D:8D 4A 61 STA $614A 0x03DCA0|$0F:$DC90:90 02 BCC $DC94 0x03DCA2|$0F:$DC92:E6 11 INC $11 ; control flow target (from $DC90) 0x03DCA4|$0F:$DC94:A5 11 LDA $11 0x03DCA6|$0F:$DC96:8D 4B 61 STA $614B 0x03DCA9|$0F:$DC99:60 RTS ; control flow target (from $D8E9, $D8F0, $D8F7) 0x03DCAA|$0F:$DC9A:8A TXA 0x03DCAB|$0F:$DC9B:48 PHA 0x03DCAC|$0F:$DC9C:20 75 F7 JSR $F775 ; load ROM bank #$03 0x03DCAF|$0F:$DC9F:68 PLA 0x03DCB0|$0F:$DCA0:AA TAX 0x03DCB1|$0F:$DCA1:B9 3A 05 LDA $053A,Y 0x03DCB4|$0F:$DCA4:19 3B 05 ORA $053B,Y 0x03DCB7|$0F:$DCA7:F0 23 BEQ $DCCC 0x03DCB9|$0F:$DCA9:B9 3A 05 LDA $053A,Y 0x03DCBC|$0F:$DCAC:4A LSR 0x03DCBD|$0F:$DCAD:4A LSR 0x03DCBE|$0F:$DCAE:4A LSR 0x03DCBF|$0F:$DCAF:4A LSR 0x03DCC0|$0F:$DCB0:85 0C STA $0C 0x03DCC2|$0F:$DCB2:B9 3B 05 LDA $053B,Y 0x03DCC5|$0F:$DCB5:4A LSR 0x03DCC6|$0F:$DCB6:4A LSR 0x03DCC7|$0F:$DCB7:4A LSR 0x03DCC8|$0F:$DCB8:4A LSR 0x03DCC9|$0F:$DCB9:85 0E STA $0E 0x03DCCB|$0F:$DCBB:E6 0E INC $0E 0x03DCCD|$0F:$DCBD:20 31 DE JSR $DE31 0x03DCD0|$0F:$DCC0:84 0C STY $0C 0x03DCD2|$0F:$DCC2:A0 00 LDY #$00 0x03DCD4|$0F:$DCC4:B1 07 LDA ($07),Y 0x03DCD6|$0F:$DCC6:A4 0C LDY $0C 0x03DCD8|$0F:$DCC8:C9 00 CMP #$00 0x03DCDA|$0F:$DCCA:F0 01 BEQ $DCCD ; control flow target (from $DCA7) 0x03DCDC|$0F:$DCCC:60 RTS ; control flow target (from $DCCA) 0x03DCDD|$0F:$DCCD:B9 3A 05 LDA $053A,Y 0x03DCE0|$0F:$DCD0:85 0E STA $0E 0x03DCE2|$0F:$DCD2:B9 3B 05 LDA $053B,Y 0x03DCE5|$0F:$DCD5:85 10 STA $10 0x03DCE7|$0F:$DCD7:A9 00 LDA #$00 0x03DCE9|$0F:$DCD9:85 0F STA $0F 0x03DCEB|$0F:$DCDB:85 11 STA $11 ; control flow target (from $DB99) 0x03DCED|$0F:$DCDD:20 3F DD JSR $DD3F 0x03DCF0|$0F:$DCE0:98 TYA 0x03DCF1|$0F:$DCE1:48 PHA 0x03DCF2|$0F:$DCE2:A9 00 LDA #$00 0x03DCF4|$0F:$DCE4:A8 TAY 0x03DCF5|$0F:$DCE5:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03DCF7|$0F:$DCE7:F0 02 BEQ $DCEB 0x03DCF9|$0F:$DCE9:A9 FC LDA #$FC ; control flow target (from $DCE7) 0x03DCFB|$0F:$DCEB:85 0C STA $0C ; control flow target (from $DD38) 0x03DCFD|$0F:$DCED:A9 00 LDA #$00 0x03DCFF|$0F:$DCEF:85 0D STA $0D ; control flow target (from $DD2D) 0x03DD01|$0F:$DCF1:A5 0E LDA $0E 0x03DD03|$0F:$DCF3:18 CLC 0x03DD04|$0F:$DCF4:65 0D ADC $0D 0x03DD06|$0F:$DCF6:9D 03 02 STA $0203,X 0x03DD09|$0F:$DCF9:A5 0F LDA $0F 0x03DD0B|$0F:$DCFB:69 00 ADC #$00 0x03DD0D|$0F:$DCFD:D0 23 BNE $DD22 0x03DD0F|$0F:$DCFF:A5 10 LDA $10 0x03DD11|$0F:$DD01:18 CLC 0x03DD12|$0F:$DD02:65 0C ADC $0C 0x03DD14|$0F:$DD04:9D 00 02 STA $0200,X ; sprite buffer start 0x03DD17|$0F:$DD07:B1 12 LDA ($12),Y 0x03DD19|$0F:$DD09:9D 01 02 STA $0201,X 0x03DD1C|$0F:$DD0C:C8 INY 0x03DD1D|$0F:$DD0D:A5 6D LDA $6D 0x03DD1F|$0F:$DD0F:C9 03 CMP #$03 0x03DD21|$0F:$DD11:B0 05 BCS $DD18 0x03DD23|$0F:$DD13:20 75 DD JSR $DD75 0x03DD26|$0F:$DD16:B0 02 BCS $DD1A ; control flow target (from $DD11) 0x03DD28|$0F:$DD18:B1 12 LDA ($12),Y ; control flow target (from $DD16) 0x03DD2A|$0F:$DD1A:88 DEY 0x03DD2B|$0F:$DD1B:9D 02 02 STA $0202,X 0x03DD2E|$0F:$DD1E:E8 INX 0x03DD2F|$0F:$DD1F:E8 INX 0x03DD30|$0F:$DD20:E8 INX 0x03DD31|$0F:$DD21:E8 INX ; control flow target (from $DCFD) 0x03DD32|$0F:$DD22:C8 INY 0x03DD33|$0F:$DD23:C8 INY 0x03DD34|$0F:$DD24:A5 0D LDA $0D 0x03DD36|$0F:$DD26:18 CLC 0x03DD37|$0F:$DD27:69 08 ADC #$08 0x03DD39|$0F:$DD29:85 0D STA $0D 0x03DD3B|$0F:$DD2B:C9 10 CMP #$10 0x03DD3D|$0F:$DD2D:D0 C2 BNE $DCF1 0x03DD3F|$0F:$DD2F:A5 0C LDA $0C 0x03DD41|$0F:$DD31:18 CLC 0x03DD42|$0F:$DD32:69 08 ADC #$08 0x03DD44|$0F:$DD34:85 0C STA $0C 0x03DD46|$0F:$DD36:C9 0C CMP #$0C 0x03DD48|$0F:$DD38:90 B3 BCC $DCED 0x03DD4A|$0F:$DD3A:68 PLA 0x03DD4B|$0F:$DD3B:A8 TAY 0x03DD4C|$0F:$DD3C:60 RTS ; code -> data ; data load target (from $DD65) 0x03DD4D|$0F:$DD3D:F7 ; data load target (from $DD6D) 0x03DD4E|$0F:$DD3E: B8 ; $03:$B8F7 ; data -> code ; control flow target (from $DCDD) 0x03DD4F|$0F:$DD3F:A9 00 LDA #$00 0x03DD51|$0F:$DD41:85 13 STA $13 0x03DD53|$0F:$DD43:B9 40 05 LDA $0540,Y ; NPC #$00 ? + direction nybble 0x03DD56|$0F:$DD46:29 03 AND #$03 0x03DD58|$0F:$DD48:85 12 STA $12 0x03DD5A|$0F:$DD4A:B9 41 05 LDA $0541,Y ; NPC #$00 sprite ID 0x03DD5D|$0F:$DD4D:85 6D STA $6D 0x03DD5F|$0F:$DD4F:0A ASL 0x03DD60|$0F:$DD50:0A ASL 0x03DD61|$0F:$DD51:05 12 ORA $12 0x03DD63|$0F:$DD53:0A ASL 0x03DD64|$0F:$DD54:0A ASL 0x03DD65|$0F:$DD55:0A ASL 0x03DD66|$0F:$DD56:26 13 ROL $13 0x03DD68|$0F:$DD58:0A ASL 0x03DD69|$0F:$DD59:26 13 ROL $13 0x03DD6B|$0F:$DD5B:85 12 STA $12 0x03DD6D|$0F:$DD5D:A5 36 LDA $36 0x03DD6F|$0F:$DD5F:29 08 AND #$08 0x03DD71|$0F:$DD61:05 12 ORA $12 0x03DD73|$0F:$DD63:85 12 STA $12 0x03DD75|$0F:$DD65:AD 3D DD LDA $DD3D 0x03DD78|$0F:$DD68:18 CLC 0x03DD79|$0F:$DD69:65 12 ADC $12 0x03DD7B|$0F:$DD6B:85 12 STA $12 0x03DD7D|$0F:$DD6D:AD 3E DD LDA $DD3E 0x03DD80|$0F:$DD70:65 13 ADC $13 0x03DD82|$0F:$DD72:85 13 STA $13 0x03DD84|$0F:$DD74:60 RTS ; control flow target (from $DD13) 0x03DD85|$0F:$DD75:48 PHA 0x03DD86|$0F:$DD76:AD AD 61 LDA $61AD 0x03DD89|$0F:$DD79:D0 45 BNE $DDC0 0x03DD8B|$0F:$DD7B:68 PLA 0x03DD8C|$0F:$DD7C:D0 0E BNE $DD8C 0x03DD8E|$0F:$DD7E:AD 2D 06 LDA $062D ; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03DD91|$0F:$DD81:29 04 AND #$04 0x03DD93|$0F:$DD83:F0 25 BEQ $DDAA 0x03DD95|$0F:$DD85:AD 2D 06 LDA $062D ; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03DD98|$0F:$DD88:10 22 BPL $DDAC 0x03DD9A|$0F:$DD8A:18 CLC 0x03DD9B|$0F:$DD8B:60 RTS ; control flow target (from $DD7C) 0x03DD9C|$0F:$DD8C:C9 02 CMP #$02 0x03DD9E|$0F:$DD8E:F0 0E BEQ $DD9E 0x03DDA0|$0F:$DD90:AD 3F 06 LDA $063F ; Cannock status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03DDA3|$0F:$DD93:29 04 AND #$04 0x03DDA5|$0F:$DD95:F0 13 BEQ $DDAA 0x03DDA7|$0F:$DD97:AD 3F 06 LDA $063F ; Cannock status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03DDAA|$0F:$DD9A:10 10 BPL $DDAC 0x03DDAC|$0F:$DD9C:18 CLC 0x03DDAD|$0F:$DD9D:60 RTS ; control flow target (from $DD8E) 0x03DDAE|$0F:$DD9E:AD 51 06 LDA $0651 ; Moonbrooke status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03DDB1|$0F:$DDA1:29 04 AND #$04 0x03DDB3|$0F:$DDA3:F0 05 BEQ $DDAA 0x03DDB5|$0F:$DDA5:AD 51 06 LDA $0651 ; Moonbrooke status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03DDB8|$0F:$DDA8:10 02 BPL $DDAC ; control flow target (from $DD83, $DD95, $DDA3, $DDC5) 0x03DDBA|$0F:$DDAA:18 CLC 0x03DDBB|$0F:$DDAB:60 RTS ; control flow target (from $DD88, $DD9A, $DDA8) 0x03DDBC|$0F:$DDAC:A5 27 LDA $27 ; map palette; offset from ($E27C) 0x03DDBE|$0F:$DDAE:C9 68 CMP #$68 0x03DDC0|$0F:$DDB0:F0 06 BEQ $DDB8 0x03DDC2|$0F:$DDB2:B1 12 LDA ($12),Y 0x03DDC4|$0F:$DDB4:29 FC AND #$FC 0x03DDC6|$0F:$DDB6:38 SEC 0x03DDC7|$0F:$DDB7:60 RTS ; control flow target (from $DDB0) 0x03DDC8|$0F:$DDB8:B1 12 LDA ($12),Y 0x03DDCA|$0F:$DDBA:29 FC AND #$FC 0x03DDCC|$0F:$DDBC:09 03 ORA #$03 0x03DDCE|$0F:$DDBE:38 SEC 0x03DDCF|$0F:$DDBF:60 RTS ; control flow target (from $DD79) 0x03DDD0|$0F:$DDC0:68 PLA 0x03DDD1|$0F:$DDC1:F0 04 BEQ $DDC7 0x03DDD3|$0F:$DDC3:C9 01 CMP #$01 0x03DDD5|$0F:$DDC5:D0 E3 BNE $DDAA ; control flow target (from $DDC1) 0x03DDD7|$0F:$DDC7:A9 03 LDA #$03 0x03DDD9|$0F:$DDC9:38 SEC 0x03DDDA|$0F:$DDCA:60 RTS ; control flow target (from $DB93) 0x03DDDB|$0F:$DDCB:E6 39 INC $39 0x03DDDD|$0F:$DDCD:A5 39 LDA $39 0x03DDDF|$0F:$DDCF:C9 0D CMP #$0D 0x03DDE1|$0F:$DDD1:90 04 BCC $DDD7 0x03DDE3|$0F:$DDD3:A9 00 LDA #$00 0x03DDE5|$0F:$DDD5:85 39 STA $39 ; control flow target (from $DDD1) 0x03DDE7|$0F:$DDD7:18 CLC 0x03DDE8|$0F:$DDD8:65 37 ADC $37 0x03DDEA|$0F:$DDDA:AA TAX 0x03DDEB|$0F:$DDDB:BD E2 DD LDA $DDE2,X 0x03DDEE|$0F:$DDDE:AA TAX 0x03DDEF|$0F:$DDDF:E6 37 INC $37 0x03DDF1|$0F:$DDE1:60 RTS ; code -> data ; indexed data load target (from $DDDB) 0x03DDF2|$0F:$DDE2:90 0x03DDF3|$0F:$DDE3:40 0x03DDF4|$0F:$DDE4:E0 0x03DDF5|$0F:$DDE5:30 0x03DDF6|$0F:$DDE6:80 0x03DDF7|$0F:$DDE7:D0 0x03DDF8|$0F:$DDE8:10 0x03DDF9|$0F:$DDE9:C0 0x03DDFA|$0F:$DDEA:70 0x03DDFB|$0F:$DDEB:20 0x03DDFC|$0F:$DDEC:F0 0x03DDFD|$0F:$DDED:60 0x03DDFE|$0F:$DDEE:A0 0x03DDFF|$0F:$DDEF:90 0x03DE00|$0F:$DDF0:40 0x03DE01|$0F:$DDF1:E0 0x03DE02|$0F:$DDF2:30 0x03DE03|$0F:$DDF3:80 0x03DE04|$0F:$DDF4:D0 0x03DE05|$0F:$DDF5:10 0x03DE06|$0F:$DDF6:C0 0x03DE07|$0F:$DDF7:70 0x03DE08|$0F:$DDF8:20 0x03DE09|$0F:$DDF9:F0 ; indirect data load target 0x03DE0A|$0F:$DDFA:60 ; indirect data load target 0x03DE0B|$0F:$DDFB:A0 ; data -> code ; control flow target (from $D654) 0x03DE0C|$0F:$DDFC:06 0C ASL $0C 0x03DE0E|$0F:$DDFE:06 0E ASL $0E ; control flow target (from $EB07) ; external control flow target (from $02:$B119) 0x03DE10|$0F:$DE00:A5 0E LDA $0E 0x03DE12|$0F:$DE02:85 08 STA $08 0x03DE14|$0F:$DE04:A9 00 LDA #$00 0x03DE16|$0F:$DE06:46 08 LSR $08 0x03DE18|$0F:$DE08:6A ROR 0x03DE19|$0F:$DE09:46 08 LSR $08 0x03DE1B|$0F:$DE0B:6A ROR 0x03DE1C|$0F:$DE0C:46 08 LSR $08 0x03DE1E|$0F:$DE0E:6A ROR 0x03DE1F|$0F:$DE0F:85 07 STA $07 0x03DE21|$0F:$DE11:A5 0C LDA $0C 0x03DE23|$0F:$DE13:29 1F AND #$1F 0x03DE25|$0F:$DE15:18 CLC 0x03DE26|$0F:$DE16:65 07 ADC $07 0x03DE28|$0F:$DE18:85 07 STA $07 0x03DE2A|$0F:$DE1A:08 PHP 0x03DE2B|$0F:$DE1B:A5 0C LDA $0C 0x03DE2D|$0F:$DE1D:29 20 AND #$20 0x03DE2F|$0F:$DE1F:D0 04 BNE $DE25 0x03DE31|$0F:$DE21:A9 20 LDA #$20 0x03DE33|$0F:$DE23:D0 02 BNE $DE27 ; control flow target (from $DE1F) 0x03DE35|$0F:$DE25:A9 24 LDA #$24 ; control flow target (from $DE23) 0x03DE37|$0F:$DE27:28 PLP 0x03DE38|$0F:$DE28:65 08 ADC $08 0x03DE3A|$0F:$DE2A:85 08 STA $08 0x03DE3C|$0F:$DE2C:60 RTS ; control flow target (from $D082, $F441) 0x03DE3D|$0F:$DE2D:46 0C LSR $0C 0x03DE3F|$0F:$DE2F:46 0E LSR $0E ; control flow target (from $DC25, $DCBD, $F7E3) 0x03DE41|$0F:$DE31:A5 0E LDA $0E 0x03DE43|$0F:$DE33:0A ASL 0x03DE44|$0F:$DE34:0A ASL 0x03DE45|$0F:$DE35:0A ASL 0x03DE46|$0F:$DE36:0A ASL 0x03DE47|$0F:$DE37:65 0C ADC $0C 0x03DE49|$0F:$DE39:85 07 STA $07 0x03DE4B|$0F:$DE3B:A9 04 LDA #$04 0x03DE4D|$0F:$DE3D:85 08 STA $08 0x03DE4F|$0F:$DE3F:60 RTS ; control flow target (from $DE68, $DEA0) 0x03DE50|$0F:$DE40:06 0C ASL $0C 0x03DE52|$0F:$DE42:06 0E ASL $0E ; control flow target (from $DE6E, $DEA6) 0x03DE54|$0F:$DE44:A5 0E LDA $0E 0x03DE56|$0F:$DE46:29 FC AND #$FC 0x03DE58|$0F:$DE48:0A ASL 0x03DE59|$0F:$DE49:85 07 STA $07 0x03DE5B|$0F:$DE4B:A5 0C LDA $0C 0x03DE5D|$0F:$DE4D:29 1F AND #$1F 0x03DE5F|$0F:$DE4F:4A LSR 0x03DE60|$0F:$DE50:4A LSR 0x03DE61|$0F:$DE51:18 CLC 0x03DE62|$0F:$DE52:65 07 ADC $07 0x03DE64|$0F:$DE54:18 CLC 0x03DE65|$0F:$DE55:69 C0 ADC #$C0 0x03DE67|$0F:$DE57:85 07 STA $07 0x03DE69|$0F:$DE59:A5 0C LDA $0C 0x03DE6B|$0F:$DE5B:29 20 AND #$20 0x03DE6D|$0F:$DE5D:D0 04 BNE $DE63 0x03DE6F|$0F:$DE5F:A9 03 LDA #$03 0x03DE71|$0F:$DE61:D0 02 BNE $DE65 ; control flow target (from $DE5D) 0x03DE73|$0F:$DE63:A9 07 LDA #$07 ; control flow target (from $DE61) 0x03DE75|$0F:$DE65:85 08 STA $08 0x03DE77|$0F:$DE67:60 RTS 0x03DE78|$0F:$DE68:20 40 DE JSR $DE40 0x03DE7B|$0F:$DE6B:4C 71 DE JMP $DE71 ; control flow target (from $DF2F, $EADF) ; external control flow target (from $04:$8D88) 0x03DE7E|$0F:$DE6E:20 44 DE JSR $DE44 ; control flow target (from $DE6B) 0x03DE81|$0F:$DE71:98 TYA 0x03DE82|$0F:$DE72:48 PHA 0x03DE83|$0F:$DE73:A5 0E LDA $0E 0x03DE85|$0F:$DE75:29 02 AND #$02 0x03DE87|$0F:$DE77:0A ASL 0x03DE88|$0F:$DE78:85 0D STA $0D 0x03DE8A|$0F:$DE7A:A5 0C LDA $0C 0x03DE8C|$0F:$DE7C:29 02 AND #$02 0x03DE8E|$0F:$DE7E:18 CLC 0x03DE8F|$0F:$DE7F:65 0D ADC $0D 0x03DE91|$0F:$DE81:A8 TAY 0x03DE92|$0F:$DE82:A9 FC LDA #$FC 0x03DE94|$0F:$DE84:C0 00 CPY #$00 0x03DE96|$0F:$DE86:F0 07 BEQ $DE8F ; control flow target (from $DE8D) 0x03DE98|$0F:$DE88:38 SEC 0x03DE99|$0F:$DE89:2A ROL 0x03DE9A|$0F:$DE8A:06 09 ASL $09 0x03DE9C|$0F:$DE8C:88 DEY 0x03DE9D|$0F:$DE8D:D0 F9 BNE $DE88 ; control flow target (from $DE86) 0x03DE9F|$0F:$DE8F:31 07 AND ($07),Y 0x03DEA1|$0F:$DE91:05 09 ORA $09 0x03DEA3|$0F:$DE93:91 07 STA ($07),Y 0x03DEA5|$0F:$DE95:85 09 STA $09 0x03DEA7|$0F:$DE97:68 PLA 0x03DEA8|$0F:$DE98:A8 TAY 0x03DEA9|$0F:$DE99:60 RTS ; control flow target (from $E71C, $E81A) 0x03DEAA|$0F:$DE9A:20 62 DF JSR $DF62 0x03DEAD|$0F:$DE9D:4C A6 DE JMP $DEA6 0x03DEB0|$0F:$DEA0:20 40 DE JSR $DE40 0x03DEB3|$0F:$DEA3:4C A9 DE JMP $DEA9 ; control flow target (from $DE9D) 0x03DEB6|$0F:$DEA6:20 44 DE JSR $DE44 ; control flow target (from $DEA3) 0x03DEB9|$0F:$DEA9:98 TYA 0x03DEBA|$0F:$DEAA:48 PHA 0x03DEBB|$0F:$DEAB:A0 00 LDY #$00 0x03DEBD|$0F:$DEAD:B1 07 LDA ($07),Y 0x03DEBF|$0F:$DEAF:85 09 STA $09 0x03DEC1|$0F:$DEB1:68 PLA 0x03DEC2|$0F:$DEB2:A8 TAY 0x03DEC3|$0F:$DEB3:A5 08 LDA $08 0x03DEC5|$0F:$DEB5:18 CLC 0x03DEC6|$0F:$DEB6:69 20 ADC #$20 0x03DEC8|$0F:$DEB8:85 08 STA $08 0x03DECA|$0F:$DEBA:4C FA C1 JMP $C1FA ; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00 ; code -> data ; indexed data load target (from $DF54, $DF5A, $E951, $E957) 0x03DECD|$0F:$DEBD:CB 83 ; $02:$83CB 0x03DECF|$0F:$DEBF:6B 84 ; $02:$846B 0x03DED1|$0F:$DEC1:33 85 ; $02:$8533 ; indirect data load target 0x03DED3|$0F:$DEC3:FB 85 ; $02:$85FB ; data -> code ; control flow target (from $CAE1, $D092, $D0DF, $D256, $D325, $E2C5, $E2D7, $E5F5, $E669, $E6F5, $E74C, $E7F3, $E84A) 0x03DED5|$0F:$DEC5:20 FC EA JSR $EAFC 0x03DED8|$0F:$DEC8:90 01 BCC $DECB 0x03DEDA|$0F:$DECA:60 RTS ; control flow target (from $DEC8) 0x03DEDB|$0F:$DECB:20 4A DF JSR $DF4A 0x03DEDE|$0F:$DECE:20 70 F7 JSR $F770 ; load ROM bank #$02 0x03DEE1|$0F:$DED1:A0 00 LDY #$00 0x03DEE3|$0F:$DED3:B1 10 LDA ($10),Y 0x03DEE5|$0F:$DED5:85 09 STA $09 0x03DEE7|$0F:$DED7:20 FA C1 JSR $C1FA ; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00 0x03DEEA|$0F:$DEDA:A5 1C LDA $1C 0x03DEEC|$0F:$DEDC:4A LSR 0x03DEED|$0F:$DEDD:90 03 BCC $DEE2 0x03DEEF|$0F:$DEDF:20 41 DF JSR $DF41 ; control flow target (from $DEDD) 0x03DEF2|$0F:$DEE2:C8 INY 0x03DEF3|$0F:$DEE3:B1 10 LDA ($10),Y 0x03DEF5|$0F:$DEE5:85 09 STA $09 0x03DEF7|$0F:$DEE7:20 FA C1 JSR $C1FA ; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00 0x03DEFA|$0F:$DEEA:A5 1C LDA $1C 0x03DEFC|$0F:$DEEC:29 02 AND #$02 0x03DEFE|$0F:$DEEE:F0 03 BEQ $DEF3 0x03DF00|$0F:$DEF0:20 41 DF JSR $DF41 ; control flow target (from $DEEE) 0x03DF03|$0F:$DEF3:C8 INY 0x03DF04|$0F:$DEF4:A5 07 LDA $07 0x03DF06|$0F:$DEF6:18 CLC 0x03DF07|$0F:$DEF7:69 1E ADC #$1E 0x03DF09|$0F:$DEF9:85 07 STA $07 0x03DF0B|$0F:$DEFB:90 02 BCC $DEFF 0x03DF0D|$0F:$DEFD:E6 08 INC $08 ; control flow target (from $DEFB) 0x03DF0F|$0F:$DEFF:B1 10 LDA ($10),Y 0x03DF11|$0F:$DF01:85 09 STA $09 0x03DF13|$0F:$DF03:20 FA C1 JSR $C1FA ; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00 0x03DF16|$0F:$DF06:A5 1C LDA $1C 0x03DF18|$0F:$DF08:29 04 AND #$04 0x03DF1A|$0F:$DF0A:F0 03 BEQ $DF0F 0x03DF1C|$0F:$DF0C:20 41 DF JSR $DF41 ; control flow target (from $DF0A) 0x03DF1F|$0F:$DF0F:C8 INY 0x03DF20|$0F:$DF10:B1 10 LDA ($10),Y 0x03DF22|$0F:$DF12:85 09 STA $09 0x03DF24|$0F:$DF14:20 FA C1 JSR $C1FA ; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00 0x03DF27|$0F:$DF17:A5 1C LDA $1C 0x03DF29|$0F:$DF19:29 08 AND #$08 0x03DF2B|$0F:$DF1B:F0 03 BEQ $DF20 0x03DF2D|$0F:$DF1D:20 41 DF JSR $DF41 ; control flow target (from $DF1B) 0x03DF30|$0F:$DF20:C8 INY 0x03DF31|$0F:$DF21:B1 10 LDA ($10),Y 0x03DF33|$0F:$DF23:29 03 AND #$03 0x03DF35|$0F:$DF25:85 09 STA $09 0x03DF37|$0F:$DF27:A5 1A LDA $1A 0x03DF39|$0F:$DF29:85 0C STA $0C 0x03DF3B|$0F:$DF2B:A5 1B LDA $1B 0x03DF3D|$0F:$DF2D:85 0E STA $0E 0x03DF3F|$0F:$DF2F:20 6E DE JSR $DE6E 0x03DF42|$0F:$DF32:A5 1E LDA $1E 0x03DF44|$0F:$DF34:D0 0A BNE $DF40 0x03DF46|$0F:$DF36:A5 08 LDA $08 0x03DF48|$0F:$DF38:18 CLC 0x03DF49|$0F:$DF39:69 20 ADC #$20 0x03DF4B|$0F:$DF3B:85 08 STA $08 0x03DF4D|$0F:$DF3D:20 FA C1 JSR $C1FA ; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00 ; control flow target (from $DF34) 0x03DF50|$0F:$DF40:60 RTS ; control flow target (from $DEDF, $DEF0, $DF0C, $DF1D) 0x03DF51|$0F:$DF41:C6 02 DEC $02 0x03DF53|$0F:$DF43:C6 02 DEC $02 0x03DF55|$0F:$DF45:C6 02 DEC $02 0x03DF57|$0F:$DF47:C6 01 DEC $01 0x03DF59|$0F:$DF49:60 RTS ; control flow target (from $D366, $DAA9, $DECB, $E3E5) 0x03DF5A|$0F:$DF4A:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03DF5C|$0F:$DF4C:0A ASL 0x03DF5D|$0F:$DF4D:A8 TAY 0x03DF5E|$0F:$DF4E:A5 0C LDA $0C 0x03DF60|$0F:$DF50:0A ASL 0x03DF61|$0F:$DF51:0A ASL 0x03DF62|$0F:$DF52:65 0C ADC $0C 0x03DF64|$0F:$DF54:79 BD DE ADC $DEBD,Y 0x03DF67|$0F:$DF57:85 10 STA $10 0x03DF69|$0F:$DF59:C8 INY 0x03DF6A|$0F:$DF5A:B9 BD DE LDA $DEBD,Y 0x03DF6D|$0F:$DF5D:69 00 ADC #$00 0x03DF6F|$0F:$DF5F:85 11 STA $11 0x03DF71|$0F:$DF61:60 RTS ; control flow target (from $DE9A, $EAFC) ; external control flow target (from $02:$B116) 0x03DF72|$0F:$DF62:A5 15 LDA $15 0x03DF74|$0F:$DF64:0A ASL 0x03DF75|$0F:$DF65:18 CLC 0x03DF76|$0F:$DF66:65 19 ADC $19 0x03DF78|$0F:$DF68:18 CLC 0x03DF79|$0F:$DF69:69 1E ADC #$1E 0x03DF7B|$0F:$DF6B:85 0C STA $0C 0x03DF7D|$0F:$DF6D:A9 1E LDA #$1E 0x03DF7F|$0F:$DF6F:85 0E STA $0E 0x03DF81|$0F:$DF71:20 93 C3 JSR $C393 0x03DF84|$0F:$DF74:85 0E STA $0E 0x03DF86|$0F:$DF76:A5 14 LDA $14 0x03DF88|$0F:$DF78:0A ASL 0x03DF89|$0F:$DF79:18 CLC 0x03DF8A|$0F:$DF7A:65 18 ADC $18 0x03DF8C|$0F:$DF7C:29 3F AND #$3F 0x03DF8E|$0F:$DF7E:85 0C STA $0C 0x03DF90|$0F:$DF80:60 RTS ; code -> data ; data load target (from $E0CB) 0x03DF91|$0F:$DF81:95 ; data load target (from $E0D2) 0x03DF92|$0F:$DF82: 9D ; $03:$9D95 ; data -> code ; external control flow target (from $02:$B266) 0x03DF93|$0F:$DF83:20 89 DF JSR $DF89 0x03DF96|$0F:$DF86:4C 70 F7 JMP $F770 ; load ROM bank #$02 ; control flow target (from $CFA8, $D0A3, $D363, $D680, $DA9E, $DF83, $E3E2, $EB20, $F95D) 0x03DF99|$0F:$DF89:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03DF9B|$0F:$DF8B:C9 02 CMP #$02 0x03DF9D|$0F:$DF8D:90 18 BCC $DFA7 0x03DF9F|$0F:$DF8F:A5 0E LDA $0E 0x03DFA1|$0F:$DF91:48 PHA 0x03DFA2|$0F:$DF92:A5 0C LDA $0C 0x03DFA4|$0F:$DF94:48 PHA 0x03DFA5|$0F:$DF95:46 0C LSR $0C 0x03DFA7|$0F:$DF97:46 0E LSR $0E 0x03DFA9|$0F:$DF99:20 A7 DF JSR $DFA7 0x03DFAC|$0F:$DF9C:68 PLA 0x03DFAD|$0F:$DF9D:4A LSR 0x03DFAE|$0F:$DF9E:68 PLA 0x03DFAF|$0F:$DF9F:2A ROL 0x03DFB0|$0F:$DFA0:29 03 AND #$03 0x03DFB2|$0F:$DFA2:05 0C ORA $0C 0x03DFB4|$0F:$DFA4:85 0C STA $0C 0x03DFB6|$0F:$DFA6:60 RTS ; control flow target (from $DF8D, $DF99) 0x03DFB7|$0F:$DFA7:A5 0C LDA $0C 0x03DFB9|$0F:$DFA9:85 12 STA $12 0x03DFBB|$0F:$DFAB:A5 0E LDA $0E 0x03DFBD|$0F:$DFAD:85 13 STA $13 0x03DFBF|$0F:$DFAF:A5 21 LDA $21 ; map width 0x03DFC1|$0F:$DFB1:C5 0C CMP $0C 0x03DFC3|$0F:$DFB3:B0 05 BCS $DFBA ; control flow target (from $DFBE) 0x03DFC5|$0F:$DFB5:A5 20 LDA $20 ; map exterior border tile ID (#$00 = Road, #$01 = Grass, #$02 = Sand, #$03 = Tree, #$04 = Water, #$05 = Vertical Wall, #$06 = Shrub, #$07 = Horizontal Wall, #$08 = Swamp, ..., #$20 = Ceiling Alternating?, #$21 = Ceiling Down?, #$24 = Black?, #$28 = Blue?) 0x03DFC7|$0F:$DFB7:85 0C STA $0C 0x03DFC9|$0F:$DFB9:60 RTS ; control flow target (from $DFB3) 0x03DFCA|$0F:$DFBA:A5 22 LDA $22 ; map height 0x03DFCC|$0F:$DFBC:C5 0E CMP $0E 0x03DFCE|$0F:$DFBE:90 F5 BCC $DFB5 0x03DFD0|$0F:$DFC0:98 TYA 0x03DFD1|$0F:$DFC1:48 PHA 0x03DFD2|$0F:$DFC2:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03DFD4|$0F:$DFC4:F0 03 BEQ $DFC9 0x03DFD6|$0F:$DFC6:4C 69 E1 JMP $E169 ; control flow target (from $DFC4) 0x03DFD9|$0F:$DFC9:20 75 F7 JSR $F775 ; load ROM bank #$03 0x03DFDC|$0F:$DFCC:A5 D0 LDA $D0 ; Malroth status flag (#$FF = defeated, #$00 = alive, others = countdown to battle) 0x03DFDE|$0F:$DFCE:F0 19 BEQ $DFE9 0x03DFE0|$0F:$DFD0:A5 12 LDA $12 0x03DFE2|$0F:$DFD2:C9 5E CMP #$5E 0x03DFE4|$0F:$DFD4:90 13 BCC $DFE9 0x03DFE6|$0F:$DFD6:C9 60 CMP #$60 0x03DFE8|$0F:$DFD8:B0 0F BCS $DFE9 0x03DFEA|$0F:$DFDA:A5 13 LDA $13 0x03DFEC|$0F:$DFDC:C9 A4 CMP #$A4 0x03DFEE|$0F:$DFDE:90 09 BCC $DFE9 0x03DFF0|$0F:$DFE0:C9 A6 CMP #$A6 0x03DFF2|$0F:$DFE2:B0 05 BCS $DFE9 0x03DFF4|$0F:$DFE4:A9 02 LDA #$02 0x03DFF6|$0F:$DFE6:4C 87 E0 JMP $E087 ; control flow target (from $DFCE, $DFD4, $DFD8, $DFDE, $DFE2) 0x03DFF9|$0F:$DFE9:A5 CE LDA $CE ; Tuhn Watergate open flag (#$00 = closed, #$01 = open) 0x03DFFB|$0F:$DFEB:F0 13 BEQ $E000 0x03DFFD|$0F:$DFED:A5 12 LDA $12 0x03DFFF|$0F:$DFEF:C9 44 CMP #$44 0x03E001|$0F:$DFF1:D0 0D BNE $E000 0x03E003|$0F:$DFF3:A5 13 LDA $13 0x03E005|$0F:$DFF5:C9 86 CMP #$86 0x03E007|$0F:$DFF7:90 07 BCC $E000 0x03E009|$0F:$DFF9:C9 89 CMP #$89 0x03E00B|$0F:$DFFB:B0 03 BCS $E000 0x03E00D|$0F:$DFFD:4C 85 E0 JMP $E085 ; control flow target (from $DFEB, $DFF1, $DFF7, $DFFB) 0x03E010|$0F:$E000:AD F9 05 LDA $05F9 ; flag for Cave to Rhone open 0x03E013|$0F:$E003:D0 10 BNE $E015 0x03E015|$0F:$E005:A5 12 LDA $12 0x03E017|$0F:$E007:C9 73 CMP #$73 0x03E019|$0F:$E009:D0 0A BNE $E015 0x03E01B|$0F:$E00B:A5 13 LDA $13 0x03E01D|$0F:$E00D:C9 C5 CMP #$C5 0x03E01F|$0F:$E00F:D0 04 BNE $E015 0x03E021|$0F:$E011:A9 05 LDA #$05 0x03E023|$0F:$E013:D0 72 BNE $E087 ; control flow target (from $E003, $E009, $E00F) 0x03E025|$0F:$E015:20 C0 E0 JSR $E0C0 0x03E028|$0F:$E018:C9 04 CMP #$04 0x03E02A|$0F:$E01A:F0 03 BEQ $E01F 0x03E02C|$0F:$E01C:68 PLA 0x03E02D|$0F:$E01D:A8 TAY 0x03E02E|$0F:$E01E:60 RTS ; control flow target (from $E01A) 0x03E02F|$0F:$E01F:A0 00 LDY #$00 0x03E031|$0F:$E021:84 D4 STY $D4 0x03E033|$0F:$E023:8C F4 05 STY $05F4 ; control flow target (from $E057) 0x03E036|$0F:$E026:B9 B4 E0 LDA $E0B4,Y 0x03E039|$0F:$E029:18 CLC 0x03E03A|$0F:$E02A:65 12 ADC $12 0x03E03C|$0F:$E02C:85 0C STA $0C 0x03E03E|$0F:$E02E:B9 B8 E0 LDA $E0B8,Y 0x03E041|$0F:$E031:18 CLC 0x03E042|$0F:$E032:65 13 ADC $13 0x03E044|$0F:$E034:85 0E STA $0E 0x03E046|$0F:$E036:20 C0 E0 JSR $E0C0 0x03E049|$0F:$E039:C9 04 CMP #$04 0x03E04B|$0F:$E03B:F0 12 BEQ $E04F 0x03E04D|$0F:$E03D:C9 09 CMP #$09 0x03E04F|$0F:$E03F:F0 0E BEQ $E04F 0x03E051|$0F:$E041:C9 0D CMP #$0D 0x03E053|$0F:$E043:F0 0A BEQ $E04F 0x03E055|$0F:$E045:AC F4 05 LDY $05F4 0x03E058|$0F:$E048:B9 BC E0 LDA $E0BC,Y 0x03E05B|$0F:$E04B:05 D4 ORA $D4 0x03E05D|$0F:$E04D:85 D4 STA $D4 ; control flow target (from $E03B, $E03F, $E043) 0x03E05F|$0F:$E04F:EE F4 05 INC $05F4 0x03E062|$0F:$E052:AC F4 05 LDY $05F4 0x03E065|$0F:$E055:C0 04 CPY #$04 0x03E067|$0F:$E057:D0 CD BNE $E026 0x03E069|$0F:$E059:A4 D4 LDY $D4 0x03E06B|$0F:$E05B:B9 8C E0 LDA $E08C,Y 0x03E06E|$0F:$E05E:85 D4 STA $D4 0x03E070|$0F:$E060:30 23 BMI $E085 0x03E072|$0F:$E062:C9 15 CMP #$15 0x03E074|$0F:$E064:B0 21 BCS $E087 0x03E076|$0F:$E066:A8 TAY 0x03E077|$0F:$E067:B9 9C E0 LDA $E09C,Y 0x03E07A|$0F:$E06A:18 CLC 0x03E07B|$0F:$E06B:65 12 ADC $12 0x03E07D|$0F:$E06D:85 0C STA $0C 0x03E07F|$0F:$E06F:B9 A4 E0 LDA $E0A4,Y 0x03E082|$0F:$E072:18 CLC 0x03E083|$0F:$E073:65 13 ADC $13 0x03E085|$0F:$E075:85 0E STA $0E 0x03E087|$0F:$E077:20 C0 E0 JSR $E0C0 0x03E08A|$0F:$E07A:C9 04 CMP #$04 0x03E08C|$0F:$E07C:D0 07 BNE $E085 0x03E08E|$0F:$E07E:A4 D4 LDY $D4 0x03E090|$0F:$E080:B9 AC E0 LDA $E0AC,Y 0x03E093|$0F:$E083:D0 02 BNE $E087 ; control flow target (from $DFFD, $E060, $E07C, $E191) 0x03E095|$0F:$E085:A9 04 LDA #$04 ; control flow target (from $DFE6, $E013, $E064, $E083, $E174) 0x03E097|$0F:$E087:85 0C STA $0C 0x03E099|$0F:$E089:68 PLA 0x03E09A|$0F:$E08A:A8 TAY 0x03E09B|$0F:$E08B:60 RTS ; code -> data ; indexed data load target (from $E05B) 0x03E09C|$0F:$E08C:FF 0x03E09D|$0F:$E08D:04 0x03E09E|$0F:$E08E:05 0x03E09F|$0F:$E08F:00 0x03E0A0|$0F:$E090:06 0x03E0A1|$0F:$E091:FF 0x03E0A2|$0F:$E092:01 0x03E0A3|$0F:$E093:FF 0x03E0A4|$0F:$E094:07 0x03E0A5|$0F:$E095:02 0x03E0A6|$0F:$E096:FF ; indirect data load target 0x03E0A7|$0F:$E097:FF 0x03E0A8|$0F:$E098:03 0x03E0A9|$0F:$E099:FF 0x03E0AA|$0F:$E09A:FF ; indirect data load target 0x03E0AB|$0F:$E09B:FF ; indexed data load target (from $E067) 0x03E0AC|$0F:$E09C:FF 0x03E0AD|$0F:$E09D:FF 0x03E0AE|$0F:$E09E:01 0x03E0AF|$0F:$E09F:01 0x03E0B0|$0F:$E0A0:01 0x03E0B1|$0F:$E0A1:FF 0x03E0B2|$0F:$E0A2:FF 0x03E0B3|$0F:$E0A3:01 ; indexed data load target (from $E06F) 0x03E0B4|$0F:$E0A4:01 0x03E0B5|$0F:$E0A5:FF 0x03E0B6|$0F:$E0A6:01 0x03E0B7|$0F:$E0A7:FF 0x03E0B8|$0F:$E0A8:01 0x03E0B9|$0F:$E0A9:01 0x03E0BA|$0F:$E0AA:FF 0x03E0BB|$0F:$E0AB:FF ; indexed data load target (from $E080) 0x03E0BC|$0F:$E0AC:16 0x03E0BD|$0F:$E0AD:1B 0x03E0BE|$0F:$E0AE:14 0x03E0BF|$0F:$E0AF:19 0x03E0C0|$0F:$E0B0:15 0x03E0C1|$0F:$E0B1:18 0x03E0C2|$0F:$E0B2:1A 0x03E0C3|$0F:$E0B3:17 ; indexed data load target (from $E026) 0x03E0C4|$0F:$E0B4:00 0x03E0C5|$0F:$E0B5:01 0x03E0C6|$0F:$E0B6:00 0x03E0C7|$0F:$E0B7:FF ; indexed data load target (from $E02E) 0x03E0C8|$0F:$E0B8:FF 0x03E0C9|$0F:$E0B9:00 0x03E0CA|$0F:$E0BA:01 0x03E0CB|$0F:$E0BB:00 ; indexed data load target (from $E048) 0x03E0CC|$0F:$E0BC:01 0x03E0CD|$0F:$E0BD:02 0x03E0CE|$0F:$E0BE:04 0x03E0CF|$0F:$E0BF:08 ; data -> code ; control flow target (from $E015, $E036, $E077) ; indirect data load target ; WARNING! $E0C0 was also seen as data 0x03E0D0|$0F:$E0C0:A9 ; WARNING! $E0C1 was also seen as data 0x03E0D1|$0F:$E0C1: 00 LDA #$00 0x03E0D2|$0F:$E0C2:85 0F STA $0F 0x03E0D4|$0F:$E0C4:06 0E ASL $0E 0x03E0D6|$0F:$E0C6:26 0F ROL $0F 0x03E0D8|$0F:$E0C8:A5 0E LDA $0E 0x03E0DA|$0F:$E0CA:18 CLC 0x03E0DB|$0F:$E0CB:6D 81 DF ADC $DF81 0x03E0DE|$0F:$E0CE:85 0E STA $0E 0x03E0E0|$0F:$E0D0:A5 0F LDA $0F 0x03E0E2|$0F:$E0D2:6D 82 DF ADC $DF82 0x03E0E5|$0F:$E0D5:85 0F STA $0F 0x03E0E7|$0F:$E0D7:A0 00 LDY #$00 0x03E0E9|$0F:$E0D9:B1 0E LDA ($0E),Y 0x03E0EB|$0F:$E0DB:85 10 STA $10 0x03E0ED|$0F:$E0DD:C8 INY 0x03E0EE|$0F:$E0DE:B1 0E LDA ($0E),Y 0x03E0F0|$0F:$E0E0:85 11 STA $11 0x03E0F2|$0F:$E0E2:A5 0C LDA $0C 0x03E0F4|$0F:$E0E4:C9 80 CMP #$80 0x03E0F6|$0F:$E0E6:90 2A BCC $E112 0x03E0F8|$0F:$E0E8:49 FF EOR #$FF 0x03E0FA|$0F:$E0EA:85 0C STA $0C 0x03E0FC|$0F:$E0EC:C8 INY 0x03E0FD|$0F:$E0ED:B1 0E LDA ($0E),Y 0x03E0FF|$0F:$E0EF:18 CLC 0x03E100|$0F:$E0F0:E5 10 SBC $10 0x03E102|$0F:$E0F2:A8 TAY 0x03E103|$0F:$E0F3:A9 00 LDA #$00 0x03E105|$0F:$E0F5:85 0D STA $0D ; control flow target (from $E10F) 0x03E107|$0F:$E0F7:B1 10 LDA ($10),Y 0x03E109|$0F:$E0F9:E6 0D INC $0D 0x03E10B|$0F:$E0FB:29 E0 AND #$E0 0x03E10D|$0F:$E0FD:F0 09 BEQ $E108 0x03E10F|$0F:$E0FF:B1 10 LDA ($10),Y 0x03E111|$0F:$E101:29 1F AND #$1F 0x03E113|$0F:$E103:18 CLC 0x03E114|$0F:$E104:65 0D ADC $0D 0x03E116|$0F:$E106:85 0D STA $0D ; control flow target (from $E0FD) 0x03E118|$0F:$E108:A5 0C LDA $0C 0x03E11A|$0F:$E10A:C5 0D CMP $0D 0x03E11C|$0F:$E10C:90 22 BCC $E130 0x03E11E|$0F:$E10E:88 DEY 0x03E11F|$0F:$E10F:4C F7 E0 JMP $E0F7 ; control flow target (from $E0E6) 0x03E122|$0F:$E112:88 DEY 0x03E123|$0F:$E113:84 0D STY $0D ; control flow target (from $E12D) 0x03E125|$0F:$E115:B1 10 LDA ($10),Y 0x03E127|$0F:$E117:E6 0D INC $0D 0x03E129|$0F:$E119:29 E0 AND #$E0 0x03E12B|$0F:$E11B:F0 09 BEQ $E126 0x03E12D|$0F:$E11D:B1 10 LDA ($10),Y 0x03E12F|$0F:$E11F:29 1F AND #$1F 0x03E131|$0F:$E121:18 CLC 0x03E132|$0F:$E122:65 0D ADC $0D 0x03E134|$0F:$E124:85 0D STA $0D ; control flow target (from $E11B) 0x03E136|$0F:$E126:A5 0C LDA $0C 0x03E138|$0F:$E128:C5 0D CMP $0D 0x03E13A|$0F:$E12A:90 04 BCC $E130 0x03E13C|$0F:$E12C:C8 INY 0x03E13D|$0F:$E12D:4C 15 E1 JMP $E115 ; control flow target (from $E10C, $E12A) 0x03E140|$0F:$E130:B1 10 LDA ($10),Y 0x03E142|$0F:$E132:29 E0 AND #$E0 0x03E144|$0F:$E134:D0 2C BNE $E162 0x03E146|$0F:$E136:B1 10 LDA ($10),Y 0x03E148|$0F:$E138:29 1F AND #$1F ; control flow target (from $E167) 0x03E14A|$0F:$E13A:85 0C STA $0C 0x03E14C|$0F:$E13C:AD F8 05 LDA $05F8 ; Sea Cave shoal status (#$00 = shoals up, others = shoals down) 0x03E14F|$0F:$E13F:F0 1E BEQ $E15F 0x03E151|$0F:$E141:A5 12 LDA $12 0x03E153|$0F:$E143:C9 B2 CMP #$B2 0x03E155|$0F:$E145:90 18 BCC $E15F 0x03E157|$0F:$E147:C9 B9 CMP #$B9 0x03E159|$0F:$E149:B0 14 BCS $E15F 0x03E15B|$0F:$E14B:A5 13 LDA $13 0x03E15D|$0F:$E14D:C9 A3 CMP #$A3 0x03E15F|$0F:$E14F:90 0E BCC $E15F 0x03E161|$0F:$E151:C9 AC CMP #$AC 0x03E163|$0F:$E153:B0 0A BCS $E15F 0x03E165|$0F:$E155:A5 0C LDA $0C 0x03E167|$0F:$E157:C9 13 CMP #$13 0x03E169|$0F:$E159:90 04 BCC $E15F 0x03E16B|$0F:$E15B:A9 04 LDA #$04 0x03E16D|$0F:$E15D:85 0C STA $0C ; control flow target (from $E13F, $E145, $E149, $E14F, $E153, $E159) 0x03E16F|$0F:$E15F:A5 0C LDA $0C 0x03E171|$0F:$E161:60 RTS ; control flow target (from $E134) 0x03E172|$0F:$E162:4A LSR 0x03E173|$0F:$E163:4A LSR 0x03E174|$0F:$E164:4A LSR 0x03E175|$0F:$E165:4A LSR 0x03E176|$0F:$E166:4A LSR 0x03E177|$0F:$E167:90 D1 BCC $E13A ; control flow target (from $DFC6) 0x03E179|$0F:$E169:20 70 F7 JSR $F770 ; load ROM bank #$02 0x03E17C|$0F:$E16C:A5 D0 LDA $D0 ; Malroth status flag (#$FF = defeated, #$00 = alive, others = countdown to battle) 0x03E17E|$0F:$E16E:30 07 BMI $E177 0x03E180|$0F:$E170:F0 05 BEQ $E177 0x03E182|$0F:$E172:A9 17 LDA #$17 0x03E184|$0F:$E174:4C 87 E0 JMP $E087 ; control flow target (from $E16E, $E170) 0x03E187|$0F:$E177:A5 31 LDA $31 ; current map ID 0x03E189|$0F:$E179:C9 12 CMP #$12 ; Map ID #$12: Tuhn Watergate 0x03E18B|$0F:$E17B:D0 17 BNE $E194 0x03E18D|$0F:$E17D:A5 CE LDA $CE ; Tuhn Watergate open flag (#$00 = closed, #$01 = open) 0x03E18F|$0F:$E17F:F0 13 BEQ $E194 0x03E191|$0F:$E181:A5 13 LDA $13 0x03E193|$0F:$E183:C9 05 CMP #$05 0x03E195|$0F:$E185:D0 0D BNE $E194 0x03E197|$0F:$E187:A5 12 LDA $12 0x03E199|$0F:$E189:C9 02 CMP #$02 0x03E19B|$0F:$E18B:F0 04 BEQ $E191 0x03E19D|$0F:$E18D:C9 03 CMP #$03 0x03E19F|$0F:$E18F:D0 03 BNE $E194 ; control flow target (from $E18B) 0x03E1A1|$0F:$E191:4C 85 E0 JMP $E085 ; control flow target (from $E17B, $E17F, $E185, $E18F) 0x03E1A4|$0F:$E194:A9 00 LDA #$00 0x03E1A6|$0F:$E196:85 0D STA $0D 0x03E1A8|$0F:$E198:85 0F STA $0F 0x03E1AA|$0F:$E19A:A4 21 LDY $21 ; map width 0x03E1AC|$0F:$E19C:C8 INY 0x03E1AD|$0F:$E19D:84 0C STY $0C 0x03E1AF|$0F:$E19F:20 39 C3 JSR $C339 ; 16-bit multiplication: ($10-$11) = ($0C-$0D) * ($0E-$0F); consumes $0C-$0F 0x03E1B2|$0F:$E1A2:A5 12 LDA $12 0x03E1B4|$0F:$E1A4:18 CLC 0x03E1B5|$0F:$E1A5:65 10 ADC $10 0x03E1B7|$0F:$E1A7:85 10 STA $10 0x03E1B9|$0F:$E1A9:85 0E STA $0E 0x03E1BB|$0F:$E1AB:A5 11 LDA $11 0x03E1BD|$0F:$E1AD:69 00 ADC #$00 0x03E1BF|$0F:$E1AF:85 0F STA $0F 0x03E1C1|$0F:$E1B1:18 CLC 0x03E1C2|$0F:$E1B2:69 78 ADC #$78 0x03E1C4|$0F:$E1B4:85 11 STA $11 0x03E1C6|$0F:$E1B6:A0 00 LDY #$00 0x03E1C8|$0F:$E1B8:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03E1CA|$0F:$E1BA:C9 02 CMP #$02 0x03E1CC|$0F:$E1BC:B0 07 BCS $E1C5 0x03E1CE|$0F:$E1BE:B1 10 LDA ($10),Y 0x03E1D0|$0F:$E1C0:29 1F AND #$1F 0x03E1D2|$0F:$E1C2:4C CB E1 JMP $E1CB ; control flow target (from $E1BC) 0x03E1D5|$0F:$E1C5:B1 10 LDA ($10),Y 0x03E1D7|$0F:$E1C7:29 1F AND #$1F 0x03E1D9|$0F:$E1C9:0A ASL 0x03E1DA|$0F:$E1CA:0A ASL ; control flow target (from $E1C2) 0x03E1DB|$0F:$E1CB:85 0C STA $0C 0x03E1DD|$0F:$E1CD:C9 14 CMP #$14 0x03E1DF|$0F:$E1CF:D0 1E BNE $E1EF 0x03E1E1|$0F:$E1D1:A0 00 LDY #$00 ; control flow target (from $E1ED) 0x03E1E3|$0F:$E1D3:A5 12 LDA $12 0x03E1E5|$0F:$E1D5:D9 1A 05 CMP $051A,Y ; something to do with whether you've opened the chest containing the Shield of Erdrick 0x03E1E8|$0F:$E1D8:D0 0F BNE $E1E9 0x03E1EA|$0F:$E1DA:C8 INY 0x03E1EB|$0F:$E1DB:A5 13 LDA $13 0x03E1ED|$0F:$E1DD:D9 1A 05 CMP $051A,Y ; something to do with whether you've opened the chest containing the Shield of Erdrick 0x03E1F0|$0F:$E1E0:D0 08 BNE $E1EA ; control flow target (from $E20E) 0x03E1F2|$0F:$E1E2:A9 00 LDA #$00 0x03E1F4|$0F:$E1E4:85 0C STA $0C ; control flow target (from $E1FB, $E216) 0x03E1F6|$0F:$E1E6:68 PLA 0x03E1F7|$0F:$E1E7:A8 TAY 0x03E1F8|$0F:$E1E8:60 RTS ; control flow target (from $E1D8) 0x03E1F9|$0F:$E1E9:C8 INY ; control flow target (from $E1E0) 0x03E1FA|$0F:$E1EA:C8 INY 0x03E1FB|$0F:$E1EB:C0 10 CPY #$10 0x03E1FD|$0F:$E1ED:D0 E4 BNE $E1D3 ; control flow target (from $E1CF) 0x03E1FF|$0F:$E1EF:A5 0C LDA $0C 0x03E201|$0F:$E1F1:C9 18 CMP #$18 0x03E203|$0F:$E1F3:F0 08 BEQ $E1FD 0x03E205|$0F:$E1F5:C9 19 CMP #$19 0x03E207|$0F:$E1F7:F0 04 BEQ $E1FD 0x03E209|$0F:$E1F9:C9 1A CMP #$1A 0x03E20B|$0F:$E1FB:D0 E9 BNE $E1E6 ; control flow target (from $E1F3, $E1F7) 0x03E20D|$0F:$E1FD:A0 00 LDY #$00 ; control flow target (from $E214) 0x03E20F|$0F:$E1FF:A5 12 LDA $12 0x03E211|$0F:$E201:D9 2A 05 CMP $052A,Y 0x03E214|$0F:$E204:D0 0A BNE $E210 0x03E216|$0F:$E206:C8 INY 0x03E217|$0F:$E207:A5 13 LDA $13 0x03E219|$0F:$E209:D9 2A 05 CMP $052A,Y 0x03E21C|$0F:$E20C:D0 03 BNE $E211 0x03E21E|$0F:$E20E:F0 D2 BEQ $E1E2 ; control flow target (from $E204) 0x03E220|$0F:$E210:C8 INY ; control flow target (from $E20C) 0x03E221|$0F:$E211:C8 INY 0x03E222|$0F:$E212:C0 10 CPY #$10 0x03E224|$0F:$E214:D0 E9 BNE $E1FF 0x03E226|$0F:$E216:F0 CE BEQ $E1E6 ; control flow target (from $D9BD, $DB74, $E882, $E92D) 0x03E228|$0F:$E218:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03E22A|$0F:$E21A:C9 02 CMP #$02 0x03E22C|$0F:$E21C:90 04 BCC $E222 0x03E22E|$0F:$E21E:46 12 LSR $12 0x03E230|$0F:$E220:46 13 LSR $13 ; control flow target (from $DAA1, $E21C, $E3F3, $EB23, $F960) 0x03E232|$0F:$E222:A5 25 LDA $25 ; map header byte 5 0x03E234|$0F:$E224:05 26 ORA $26 ; map header byte 6, always #$00 0x03E236|$0F:$E226:D0 05 BNE $E22D ; control flow target (from $E231, $E237) 0x03E238|$0F:$E228:A9 00 LDA #$00 0x03E23A|$0F:$E22A:85 0D STA $0D 0x03E23C|$0F:$E22C:60 RTS ; control flow target (from $E226) 0x03E23D|$0F:$E22D:A5 21 LDA $21 ; map width 0x03E23F|$0F:$E22F:C5 12 CMP $12 0x03E241|$0F:$E231:90 F5 BCC $E228 0x03E243|$0F:$E233:A5 22 LDA $22 ; map height 0x03E245|$0F:$E235:C5 13 CMP $13 0x03E247|$0F:$E237:90 EF BCC $E228 0x03E249|$0F:$E239:98 TYA 0x03E24A|$0F:$E23A:48 PHA 0x03E24B|$0F:$E23B:8A TXA 0x03E24C|$0F:$E23C:48 PHA 0x03E24D|$0F:$E23D:A6 21 LDX $21 ; map width 0x03E24F|$0F:$E23F:E8 INX 0x03E250|$0F:$E240:86 74 STX $74 0x03E252|$0F:$E242:A9 00 LDA #$00 0x03E254|$0F:$E244:85 72 STA $72 0x03E256|$0F:$E246:A2 78 LDX #$78 0x03E258|$0F:$E248:A4 13 LDY $13 0x03E25A|$0F:$E24A:F0 0D BEQ $E259 ; control flow target (from $E257) 0x03E25C|$0F:$E24C:A5 72 LDA $72 0x03E25E|$0F:$E24E:18 CLC 0x03E25F|$0F:$E24F:65 74 ADC $74 0x03E261|$0F:$E251:85 72 STA $72 0x03E263|$0F:$E253:90 01 BCC $E256 0x03E265|$0F:$E255:E8 INX ; control flow target (from $E253) 0x03E266|$0F:$E256:88 DEY 0x03E267|$0F:$E257:D0 F3 BNE $E24C ; control flow target (from $E24A) 0x03E269|$0F:$E259:86 73 STX $73 0x03E26B|$0F:$E25B:A4 12 LDY $12 0x03E26D|$0F:$E25D:B1 72 LDA ($72),Y 0x03E26F|$0F:$E25F:4A LSR 0x03E270|$0F:$E260:4A LSR 0x03E271|$0F:$E261:4A LSR 0x03E272|$0F:$E262:4A LSR 0x03E273|$0F:$E263:4A LSR 0x03E274|$0F:$E264:85 0D STA $0D 0x03E276|$0F:$E266:68 PLA 0x03E277|$0F:$E267:AA TAX 0x03E278|$0F:$E268:68 PLA 0x03E279|$0F:$E269:A8 TAY 0x03E27A|$0F:$E26A:60 RTS ; code -> data ; indirect data load target (via $E278) 0x03E27B|$0F:$E26B:0F ; indirect data load target 0x03E27C|$0F:$E26C:36 ; indirect data load target 0x03E27D|$0F:$E26D:30 ; indirect data load target 0x03E27E|$0F:$E26E:11 ; indirect data load target 0x03E27F|$0F:$E26F:36 ; indirect data load target 0x03E280|$0F:$E270:19 ; indirect data load target 0x03E281|$0F:$E271:16 ; indirect data load target 0x03E282|$0F:$E272:36 ; indirect data load target 0x03E283|$0F:$E273:30 ; indirect data load target 0x03E284|$0F:$E274:13 ; indirect data load target 0x03E285|$0F:$E275:01 ; indirect data load target 0x03E286|$0F:$E276:01 ; indirect data load target 0x03E287|$0F:$E277:01 ; data load target (from $E30D) 0x03E288|$0F:$E278:6B ; data load target (from $E312) 0x03E289|$0F:$E279: E2 ; $0F:$E26B ; data load target (from $E302) 0x03E28A|$0F:$E27A:84 ; data load target (from $E307) 0x03E28B|$0F:$E27B: BC ; $03:$BC84 ; data load target (from $E319) 0x03E28C|$0F:$E27C:91 ; data load target (from $E321) 0x03E28D|$0F:$E27D: BC ; $03:$BC91 ; data -> code 0x03E28E|$0F:$E27E:20 2A C4 JSR $C42A ; control flow target (from $D2B3) 0x03E291|$0F:$E281:20 65 C4 JSR $C465 ; wait for interrupt and then set every 4th byte of $0200 - $02FC to #$F0 0x03E294|$0F:$E284:4C 90 E2 JMP $E290 ; control flow target (from $D866) 0x03E297|$0F:$E287:20 2A C4 JSR $C42A ; control flow target (from $C7E9) 0x03E29A|$0F:$E28A:20 65 C4 JSR $C465 ; wait for interrupt and then set every 4th byte of $0200 - $02FC to #$F0 0x03E29D|$0F:$E28D:20 FD E3 JSR $E3FD ; control flow target (from $E284) 0x03E2A0|$0F:$E290:20 CC E3 JSR $E3CC 0x03E2A3|$0F:$E293:A5 31 LDA $31 ; current map ID 0x03E2A5|$0F:$E295:C9 01 CMP #$01 ; Map ID #$01: World Map 0x03E2A7|$0F:$E297:D0 18 BNE $E2B1 0x03E2A9|$0F:$E299:A5 16 LDA $16 ; current map X-pos (1) 0x03E2AB|$0F:$E29B:C9 54 CMP #$54 ; Rhone region is from #$54 <= X-pos < #$90 0x03E2AD|$0F:$E29D:90 12 BCC $E2B1 0x03E2AF|$0F:$E29F:C9 90 CMP #$90 0x03E2B1|$0F:$E2A1:B0 0E BCS $E2B1 0x03E2B3|$0F:$E2A3:A5 17 LDA $17 ; current map Y-pos (1) 0x03E2B5|$0F:$E2A5:C9 91 CMP #$91 ; Rhone region is from #$91 <= Y-pos < #$BA 0x03E2B7|$0F:$E2A7:90 08 BCC $E2B1 0x03E2B9|$0F:$E2A9:C9 BA CMP #$BA 0x03E2BB|$0F:$E2AB:B0 04 BCS $E2B1 0x03E2BD|$0F:$E2AD:A9 68 LDA #$68 ; palette for Rhone region of Wolrd Map 0x03E2BF|$0F:$E2AF:85 27 STA $27 ; map palette; offset from ($E27C) ; control flow target (from $E297, $E29D, $E2A1, $E2A7, $E2AB) 0x03E2C1|$0F:$E2B1:20 DA E3 JSR $E3DA 0x03E2C4|$0F:$E2B4:A9 F2 LDA #$F2 0x03E2C6|$0F:$E2B6:85 19 STA $19 ; control flow target (from $E2EC) 0x03E2C8|$0F:$E2B8:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03E2CB|$0F:$E2BB:A9 EE LDA #$EE 0x03E2CD|$0F:$E2BD:85 18 STA $18 ; control flow target (from $E2CC) 0x03E2CF|$0F:$E2BF:A9 00 LDA #$00 0x03E2D1|$0F:$E2C1:85 1C STA $1C 0x03E2D3|$0F:$E2C3:85 1E STA $1E 0x03E2D5|$0F:$E2C5:20 C5 DE JSR $DEC5 0x03E2D8|$0F:$E2C8:E6 18 INC $18 0x03E2DA|$0F:$E2CA:E6 18 INC $18 0x03E2DC|$0F:$E2CC:D0 F1 BNE $E2BF 0x03E2DE|$0F:$E2CE:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF ; control flow target (from $E2E2) 0x03E2E1|$0F:$E2D1:A9 00 LDA #$00 0x03E2E3|$0F:$E2D3:85 1C STA $1C 0x03E2E5|$0F:$E2D5:85 1E STA $1E 0x03E2E7|$0F:$E2D7:20 C5 DE JSR $DEC5 0x03E2EA|$0F:$E2DA:E6 18 INC $18 0x03E2EC|$0F:$E2DC:E6 18 INC $18 0x03E2EE|$0F:$E2DE:A5 18 LDA $18 0x03E2F0|$0F:$E2E0:C9 12 CMP #$12 0x03E2F2|$0F:$E2E2:D0 ED BNE $E2D1 0x03E2F4|$0F:$E2E4:E6 19 INC $19 0x03E2F6|$0F:$E2E6:E6 19 INC $19 0x03E2F8|$0F:$E2E8:A5 19 LDA $19 0x03E2FA|$0F:$E2EA:C9 10 CMP #$10 0x03E2FC|$0F:$E2EC:D0 CA BNE $E2B8 0x03E2FE|$0F:$E2EE:A9 FF LDA #$FF 0x03E300|$0F:$E2F0:85 35 STA $35 ; flag indicating whether any menu is currently open 0x03E302|$0F:$E2F2:20 CB D8 JSR $D8CB 0x03E305|$0F:$E2F5:A9 00 LDA #$00 0x03E307|$0F:$E2F7:85 35 STA $35 ; flag indicating whether any menu is currently open ; control flow target (from $D153, $D18F) 0x03E309|$0F:$E2F9:20 75 F7 JSR $F775 ; load ROM bank #$03 0x03E30C|$0F:$E2FC:A5 27 LDA $27 ; map palette; offset from ($E27C) 0x03E30E|$0F:$E2FE:C9 68 CMP #$68 0x03E310|$0F:$E300:F0 0B BEQ $E30D 0x03E312|$0F:$E302:AD 7A E2 LDA $E27A 0x03E315|$0F:$E305:85 0E STA $0E 0x03E317|$0F:$E307:AD 7B E2 LDA $E27B 0x03E31A|$0F:$E30A:4C 17 E3 JMP $E317 ; control flow target (from $E300) 0x03E31D|$0F:$E30D:AD 78 E2 LDA $E278 0x03E320|$0F:$E310:85 0E STA $0E 0x03E322|$0F:$E312:AD 79 E2 LDA $E279 0x03E325|$0F:$E315:85 0F STA $0F ; useless op ; control flow target (from $E30A) 0x03E327|$0F:$E317:85 0F STA $0F 0x03E329|$0F:$E319:AD 7C E2 LDA $E27C 0x03E32C|$0F:$E31C:18 CLC 0x03E32D|$0F:$E31D:65 27 ADC $27 ; map palette; offset from ($E27C) 0x03E32F|$0F:$E31F:85 10 STA $10 0x03E331|$0F:$E321:AD 7D E2 LDA $E27D 0x03E334|$0F:$E324:69 00 ADC #$00 0x03E336|$0F:$E326:85 11 STA $11 0x03E338|$0F:$E328:A9 FF LDA #$FF 0x03E33A|$0F:$E32A:85 0D STA $0D 0x03E33C|$0F:$E32C:20 CD C2 JSR $C2CD ; control flow target (from $D3C5, $D4A9) 0x03E33F|$0F:$E32F:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03E341|$0F:$E331:10 04 BPL $E337 0x03E343|$0F:$E333:A9 0C LDA #$0C ; Music ID #$0C: game menu / Wellgarth singer BGM 0x03E345|$0F:$E335:D0 44 BNE $E37B ; control flow target (from $E331) 0x03E347|$0F:$E337:D0 4E BNE $E387 0x03E349|$0F:$E339:A5 CF LDA $CF ; ship status (#$04 = on ship, #$02 = own ship, #$01 = beat Lianport Gremlins) 0x03E34B|$0F:$E33B:29 04 AND #$04 0x03E34D|$0F:$E33D:F0 04 BEQ $E343 0x03E34F|$0F:$E33F:A9 16 LDA #$16 ; Music ID #$16: sea BGM 0x03E351|$0F:$E341:D0 38 BNE $E37B ; control flow target (from $E33D) 0x03E353|$0F:$E343:A5 16 LDA $16 ; current map X-pos (1) 0x03E355|$0F:$E345:C9 20 CMP #$20 0x03E357|$0F:$E347:90 12 BCC $E35B 0x03E359|$0F:$E349:C9 57 CMP #$57 0x03E35B|$0F:$E34B:B0 0E BCS $E35B 0x03E35D|$0F:$E34D:A5 17 LDA $17 ; current map Y-pos (1) 0x03E35F|$0F:$E34F:C9 17 CMP #$17 0x03E361|$0F:$E351:90 08 BCC $E35B 0x03E363|$0F:$E353:C9 56 CMP #$56 0x03E365|$0F:$E355:B0 04 BCS $E35B 0x03E367|$0F:$E357:A9 0D LDA #$0D ; Music ID #$0D: Tantegel BGM 0x03E369|$0F:$E359:D0 20 BNE $E37B ; control flow target (from $E347, $E34B, $E351, $E355) 0x03E36B|$0F:$E35B:A0 00 LDY #$00 0x03E36D|$0F:$E35D:84 0C STY $0C ; control flow target (from $E36D) 0x03E36F|$0F:$E35F:B9 2D 06 LDA $062D,Y ; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03E372|$0F:$E362:10 02 BPL $E366 0x03E374|$0F:$E364:E6 0C INC $0C ; control flow target (from $E362) 0x03E376|$0F:$E366:98 TYA 0x03E377|$0F:$E367:18 CLC 0x03E378|$0F:$E368:69 12 ADC #$12 0x03E37A|$0F:$E36A:A8 TAY 0x03E37B|$0F:$E36B:C9 36 CMP #$36 0x03E37D|$0F:$E36D:90 F0 BCC $E35F 0x03E37F|$0F:$E36F:A5 0C LDA $0C 0x03E381|$0F:$E371:C9 03 CMP #$03 0x03E383|$0F:$E373:F0 04 BEQ $E379 0x03E385|$0F:$E375:A9 15 LDA #$15 ; Music ID #$15: small party BGM 0x03E387|$0F:$E377:D0 02 BNE $E37B ; control flow target (from $E373) 0x03E389|$0F:$E379:A9 14 LDA #$14 ; Music ID #$14: full party BGM ; control flow target (from $E335, $E341, $E359, $E377, $E38D, $E395, $E3A4, $E3AC, $E3B1) 0x03E38B|$0F:$E37B:CD F7 05 CMP $05F7 ; probably BGM for current area 0x03E38E|$0F:$E37E:F0 06 BEQ $E386 0x03E390|$0F:$E380:8D F7 05 STA $05F7 ; probably BGM for current area 0x03E393|$0F:$E383:20 61 C5 JSR $C561 ; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM]) ; control flow target (from $E37E) 0x03E396|$0F:$E386:60 RTS ; control flow target (from $E337) 0x03E397|$0F:$E387:C9 03 CMP #$03 0x03E399|$0F:$E389:D0 04 BNE $E38F 0x03E39B|$0F:$E38B:A9 11 LDA #$11 ; Music ID #$11: tower BGM 0x03E39D|$0F:$E38D:D0 EC BNE $E37B ; control flow target (from $E389) 0x03E39F|$0F:$E38F:C9 02 CMP #$02 0x03E3A1|$0F:$E391:D0 04 BNE $E397 0x03E3A3|$0F:$E393:A9 10 LDA #$10 ; Music ID #$10: cave BGM 0x03E3A5|$0F:$E395:D0 E4 BNE $E37B ; control flow target (from $E391) 0x03E3A7|$0F:$E397:A6 31 LDX $31 ; current map ID 0x03E3A9|$0F:$E399:E0 09 CPX #$09 ; Map ID #$09: Moonbrooke 0x03E3AB|$0F:$E39B:D0 09 BNE $E3A6 0x03E3AD|$0F:$E39D:AD AD 61 LDA $61AD 0x03E3B0|$0F:$E3A0:F0 04 BEQ $E3A6 0x03E3B2|$0F:$E3A2:A9 0E LDA #$0E ; Music ID #$0E: town music 1 BGM 0x03E3B4|$0F:$E3A4:D0 D5 BNE $E37B ; control flow target (from $E39B, $E3A0) 0x03E3B6|$0F:$E3A6:E0 19 CPX #$19 ; Map ID #$19: Shrine NW of Midenhall 0x03E3B8|$0F:$E3A8:90 04 BCC $E3AE 0x03E3BA|$0F:$E3AA:A9 13 LDA #$13 ; Music ID #$13: shrine BGM 0x03E3BC|$0F:$E3AC:D0 CD BNE $E37B ; control flow target (from $E3A8) 0x03E3BE|$0F:$E3AE:BD B3 E3 LDA $E3B3,X ; map BGM 0x03E3C1|$0F:$E3B1:D0 C8 BNE $E37B ; code -> data ; map BGM ; indexed data load target (from $E3AE) 0x03E3C3|$0F:$E3B3:0E ; Map ID #$00: Fake Midenhall; Music ID #$0E: town music 1 BGM 0x03E3C4|$0F:$E3B4:0E ; Map ID #$01: World Map; Music ID #$0E: town music 1 BGM 0x03E3C5|$0F:$E3B5:0E ; Map ID #$02: Midenhall 2F; Music ID #$0E: town music 1 BGM 0x03E3C6|$0F:$E3B6:0E ; Map ID #$03: Midenhall 1F; Music ID #$0E: town music 1 BGM 0x03E3C7|$0F:$E3B7:0E ; Map ID #$04: Midenhall B1; Music ID #$0E: town music 1 BGM 0x03E3C8|$0F:$E3B8:0F ; Map ID #$05: Leftwyne; Music ID #$0F: town music 2 BGM 0x03E3C9|$0F:$E3B9:0E ; Map ID #$06: Cannock; Music ID #$0E: town music 1 BGM 0x03E3CA|$0F:$E3BA:0F ; Map ID #$07: Hamlin; Music ID #$0F: town music 2 BGM 0x03E3CB|$0F:$E3BB:0F ; Map ID #$08: Hamlin Waterway; Music ID #$0F: town music 2 BGM 0x03E3CC|$0F:$E3BC:10 ; Map ID #$09: Moonbrooke; Music ID #$10: cave BGM 0x03E3CD|$0F:$E3BD:10 ; Map ID #$0A: Moonbrooke B1; Music ID #$10: cave BGM 0x03E3CE|$0F:$E3BE:0F ; Map ID #$0B: Lianport; Music ID #$0F: town music 2 BGM 0x03E3CF|$0F:$E3BF:0E ; Map ID #$0C: Tantegel; Music ID #$0E: town music 1 BGM 0x03E3D0|$0F:$E3C0:0E ; Map ID #$0D: Tantegel Town 2F; Music ID #$0E: town music 1 BGM 0x03E3D1|$0F:$E3C1:0E ; Map ID #$0E: Tantegel Castle 2F; Music ID #$0E: town music 1 BGM 0x03E3D2|$0F:$E3C2:0E ; Map ID #$0F: Osterfair; Music ID #$0E: town music 1 BGM 0x03E3D3|$0F:$E3C3:0F ; Map ID #$10: Zahan; Music ID #$0F: town music 2 BGM 0x03E3D4|$0F:$E3C4:0F ; Map ID #$11: Tuhn; Music ID #$0F: town music 2 BGM 0x03E3D5|$0F:$E3C5:0F ; Map ID #$12: Tuhn Watergate; Music ID #$0F: town music 2 BGM 0x03E3D6|$0F:$E3C6:0F ; Map ID #$13: Wellgarth; Music ID #$0F: town music 2 BGM 0x03E3D7|$0F:$E3C7:0F ; Map ID #$14: Wellgarth Underground; Music ID #$0F: town music 2 BGM 0x03E3D8|$0F:$E3C8:0F ; Map ID #$15: Beran; Music ID #$0F: town music 2 BGM 0x03E3D9|$0F:$E3C9:10 ; Map ID #$16: Hargon's Castle 1F; Music ID #$10: cave BGM 0x03E3DA|$0F:$E3CA:11 ; Map ID #$17: Hargon's Castle 7F; Music ID #$11: tower BGM 0x03E3DB|$0F:$E3CB:10 ; Map ID #$18: Charlock Castle B8; Music ID #$10: cave BGM ; data -> code ; control flow target (from $D6DA, $E290) 0x03E3DC|$0F:$E3CC:A9 00 LDA #$00 0x03E3DE|$0F:$E3CE:85 3B STA $3B ; high nybble = terrain ID 0x03E3E0|$0F:$E3D0:8D 59 01 STA $0159 0x03E3E3|$0F:$E3D3:8D 5A 01 STA $015A 0x03E3E6|$0F:$E3D6:8D 5B 01 STA $015B 0x03E3E9|$0F:$E3D9:60 RTS ; control flow target (from $E2B1) 0x03E3EA|$0F:$E3DA:A5 16 LDA $16 ; current map X-pos (1) 0x03E3EC|$0F:$E3DC:85 0C STA $0C 0x03E3EE|$0F:$E3DE:A5 17 LDA $17 ; current map Y-pos (1) 0x03E3F0|$0F:$E3E0:85 0E STA $0E 0x03E3F2|$0F:$E3E2:20 89 DF JSR $DF89 0x03E3F5|$0F:$E3E5:20 4A DF JSR $DF4A 0x03E3F8|$0F:$E3E8:20 70 F7 JSR $F770 ; load ROM bank #$02 0x03E3FB|$0F:$E3EB:A0 04 LDY #$04 0x03E3FD|$0F:$E3ED:B1 10 LDA ($10),Y 0x03E3FF|$0F:$E3EF:29 F0 AND #$F0 0x03E401|$0F:$E3F1:85 3C STA $3C 0x03E403|$0F:$E3F3:20 22 E2 JSR $E222 0x03E406|$0F:$E3F6:A5 0D LDA $0D 0x03E408|$0F:$E3F8:85 1D STA $1D 0x03E40A|$0F:$E3FA:60 RTS ; code -> data ; -> $02:$8018: map header info (exterior border tile ID, width, height, pointer low byte, pointer high byte, ?, ?, palette) ; data load target (from $E475) 0x03E40B|$0F:$E3FB:18 ; data load target (from $E47D) 0x03E40C|$0F:$E3FC: 80 ; $02:$8018; map header info (exterior border tile ID, width, height, pointer low byte, pointer high byte, ?, ?, palette) ; data -> code ; control flow target (from $E28D) 0x03E40D|$0F:$E3FD:A5 31 LDA $31 ; current map ID 0x03E40F|$0F:$E3FF:C9 01 CMP #$01 ; Map ID #$01: World Map 0x03E411|$0F:$E401:D0 04 BNE $E407 0x03E413|$0F:$E403:A9 00 LDA #$00 ; World Map uses #$00 0x03E415|$0F:$E405:F0 12 BEQ $E419 ; control flow target (from $E401) 0x03E417|$0F:$E407:C9 2B CMP #$2B ; Map ID #$2B: Cave to Hamlin 0x03E419|$0F:$E409:B0 04 BCS $E40F 0x03E41B|$0F:$E40B:A9 01 LDA #$01 ; other non-dungeon maps use #$01 0x03E41D|$0F:$E40D:D0 0A BNE $E419 ; control flow target (from $E409) 0x03E41F|$0F:$E40F:C9 44 CMP #$44 ; Map ID #$44: Hargon's Castle 2F 0x03E421|$0F:$E411:B0 04 BCS $E417 0x03E423|$0F:$E413:A9 02 LDA #$02 ; other maps up to #$44 use #$02 0x03E425|$0F:$E415:D0 02 BNE $E419 ; control flow target (from $E411) 0x03E427|$0F:$E417:A9 03 LDA #$03 ; maps >= #$44 use #$03 ; control flow target (from $E405, $E40D, $E415) 0x03E429|$0F:$E419:85 1F STA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03E42B|$0F:$E41B:85 0C STA $0C 0x03E42D|$0F:$E41D:20 5C F7 JSR $F75C ; load ROM bank #$00 ; call to code in a different bank ($00:$8000) 0x03E430|$0F:$E420:20 00 80 JSR $8000 0x03E433|$0F:$E423:A5 31 LDA $31 ; current map ID 0x03E435|$0F:$E425:D0 04 BNE $E42B ; Map ID #$00: Fake Midenhall 0x03E437|$0F:$E427:A9 FF LDA #$FF 0x03E439|$0F:$E429:D0 07 BNE $E432 ; control flow target (from $E425) 0x03E43B|$0F:$E42B:AD FC 05 LDA $05FC 0x03E43E|$0F:$E42E:F0 0B BEQ $E43B 0x03E440|$0F:$E430:A9 00 LDA #$00 ; control flow target (from $E429) 0x03E442|$0F:$E432:8D FC 05 STA $05FC 0x03E445|$0F:$E435:20 61 F7 JSR $F761 ; load ROM bank #$06 ; call to code in a different bank ($06:$A319) 0x03E448|$0F:$E438:20 19 A3 JSR $A319 ; if $05FC is #$00, copy battle stats at $015D,Y to field stats at $0600,X, otherwise copy field stats at $0600,X to battle stats at $015D,Y ; control flow target (from $E42E) 0x03E44B|$0F:$E43B:A9 04 LDA #$04 0x03E44D|$0F:$E43D:85 0C STA $0C 0x03E44F|$0F:$E43F:20 5C F7 JSR $F75C ; load ROM bank #$00 ; call to code in a different bank ($00:$8000) 0x03E452|$0F:$E442:20 00 80 JSR $8000 0x03E455|$0F:$E445:20 70 F7 JSR $F770 ; load ROM bank #$02 0x03E458|$0F:$E448:A5 31 LDA $31 ; current map ID 0x03E45A|$0F:$E44A:C9 01 CMP #$01 ; Map ID #$01: World Map 0x03E45C|$0F:$E44C:D0 03 BNE $E451 0x03E45E|$0F:$E44E:20 A2 E5 JSR $E5A2 ; control flow target (from $E44C) 0x03E461|$0F:$E451:A9 08 LDA #$08 0x03E463|$0F:$E453:85 14 STA $14 0x03E465|$0F:$E455:A9 07 LDA #$07 0x03E467|$0F:$E457:85 15 STA $15 0x03E469|$0F:$E459:A9 00 LDA #$00 0x03E46B|$0F:$E45B:85 05 STA $05 0x03E46D|$0F:$E45D:85 06 STA $06 0x03E46F|$0F:$E45F:85 04 STA $04 ; control flow target (from $E92A) 0x03E471|$0F:$E461:20 70 F7 JSR $F770 ; load ROM bank #$02 0x03E474|$0F:$E464:A9 00 LDA #$00 0x03E476|$0F:$E466:85 0D STA $0D ; multiplication high byte 0x03E478|$0F:$E468:85 0F STA $0F ; multiplication high byte 0x03E47A|$0F:$E46A:A5 31 LDA $31 ; current map ID 0x03E47C|$0F:$E46C:85 0C STA $0C ; multiplication low byte 0x03E47E|$0F:$E46E:A9 08 LDA #$08 0x03E480|$0F:$E470:85 0E STA $0E ; multiplication low byte 0x03E482|$0F:$E472:20 39 C3 JSR $C339 ; 16-bit multiplication: ($10-$11) = ($0C-$0D) * ($0E-$0F); consumes $0C-$0F 0x03E485|$0F:$E475:AD FB E3 LDA $E3FB ; -> $02:$8018: map header info (exterior border tile ID, width, height, pointer low byte, pointer high byte, ?, ?, palette) 0x03E488|$0F:$E478:18 CLC 0x03E489|$0F:$E479:65 10 ADC $10 ; add low byte of map ID * 8 0x03E48B|$0F:$E47B:85 10 STA $10 0x03E48D|$0F:$E47D:AD FC E3 LDA $E3FC 0x03E490|$0F:$E480:65 11 ADC $11 ; add high byte of map ID * 8 0x03E492|$0F:$E482:85 11 STA $11 0x03E494|$0F:$E484:A0 00 LDY #$00 ; control flow target (from $E48E) 0x03E496|$0F:$E486:B1 10 LDA ($10),Y 0x03E498|$0F:$E488:99 20 00 STA $0020,Y ; map exterior border tile ID (#$00 = Road, #$01 = Grass, #$02 = Sand, #$03 = Tree, #$04 = Water, #$05 = Vertical Wall, #$06 = Shrub, #$07 = Horizontal Wall, #$08 = Swamp, ..., #$20 = Ceiling Alternating?, #$21 = Ceiling Down?, #$24 = Black?, #$28 = Blue?) 0x03E49B|$0F:$E48B:C8 INY 0x03E49C|$0F:$E48C:C0 08 CPY #$08 ; copy 8 byte map header to $20 0x03E49E|$0F:$E48E:D0 F6 BNE $E486 0x03E4A0|$0F:$E490:AD AD 61 LDA $61AD 0x03E4A3|$0F:$E493:F0 14 BEQ $E4A9 0x03E4A5|$0F:$E495:A5 31 LDA $31 ; current map ID 0x03E4A7|$0F:$E497:C9 09 CMP #$09 ; Map ID #$09: Moonbrooke 0x03E4A9|$0F:$E499:D0 0E BNE $E4A9 0x03E4AB|$0F:$E49B:AD D7 86 LDA $86D7 ; -> $02:$A201: Map ID #$6D: Moonbrooke (prologue) 0x03E4AE|$0F:$E49E:85 23 STA $23 ; map pointer, low byte 0x03E4B0|$0F:$E4A0:AD D8 86 LDA $86D8 0x03E4B3|$0F:$E4A3:85 24 STA $24 ; map pointer, high byte 0x03E4B5|$0F:$E4A5:A9 02 LDA #$02 0x03E4B7|$0F:$E4A7:85 20 STA $20 ; map exterior border tile ID (#$00 = Road, #$01 = Grass, #$02 = Sand, #$03 = Tree, #$04 = Water, #$05 = Vertical Wall, #$06 = Shrub, #$07 = Horizontal Wall, #$08 = Swamp, ..., #$20 = Ceiling Alternating?, #$21 = Ceiling Down?, #$24 = Black?, #$28 = Blue?) ; control flow target (from $E493, $E499) 0x03E4B9|$0F:$E4A9:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03E4BB|$0F:$E4AB:F0 03 BEQ $E4B0 ; call to code in a different bank ($02:$AB89) 0x03E4BD|$0F:$E4AD:20 89 AB JSR $AB89 ; control flow target (from $E4AB) 0x03E4C0|$0F:$E4B0:A5 31 LDA $31 ; current map ID 0x03E4C2|$0F:$E4B2:C9 12 CMP #$12 ; Map ID #$12: Tuhn Watergate 0x03E4C4|$0F:$E4B4:D0 08 BNE $E4BE 0x03E4C6|$0F:$E4B6:A5 CE LDA $CE ; Tuhn Watergate open flag (#$00 = closed, #$01 = open) 0x03E4C8|$0F:$E4B8:F0 04 BEQ $E4BE 0x03E4CA|$0F:$E4BA:A9 04 LDA #$04 0x03E4CC|$0F:$E4BC:85 20 STA $20 ; map exterior border tile ID (#$00 = Road, #$01 = Grass, #$02 = Sand, #$03 = Tree, #$04 = Water, #$05 = Vertical Wall, #$06 = Shrub, #$07 = Horizontal Wall, #$08 = Swamp, ..., #$20 = Ceiling Alternating?, #$21 = Ceiling Down?, #$24 = Black?, #$28 = Blue?) ; control flow target (from $E4B4, $E4B8) 0x03E4CE|$0F:$E4BE:20 F7 D2 JSR $D2F7 0x03E4D1|$0F:$E4C1:A9 00 LDA #$00 0x03E4D3|$0F:$E4C3:85 39 STA $39 0x03E4D5|$0F:$E4C5:85 35 STA $35 ; flag indicating whether any menu is currently open 0x03E4D7|$0F:$E4C7:85 36 STA $36 0x03E4D9|$0F:$E4C9:85 03 STA $03 ; game clock? 0x03E4DB|$0F:$E4CB:A9 18 LDA #$18 0x03E4DD|$0F:$E4CD:85 3A STA $3A 0x03E4DF|$0F:$E4CF:A0 18 LDY #$18 ; control flow target (from $E4DD) 0x03E4E1|$0F:$E4D1:A9 FF LDA #$FF 0x03E4E3|$0F:$E4D3:99 41 05 STA $0541,Y ; NPC #$00 sprite ID 0x03E4E6|$0F:$E4D6:98 TYA 0x03E4E7|$0F:$E4D7:18 CLC 0x03E4E8|$0F:$E4D8:69 08 ADC #$08 0x03E4EA|$0F:$E4DA:A8 TAY 0x03E4EB|$0F:$E4DB:C9 B8 CMP #$B8 0x03E4ED|$0F:$E4DD:D0 F2 BNE $E4D1 0x03E4EF|$0F:$E4DF:20 70 F7 JSR $F770 ; load ROM bank #$02 0x03E4F2|$0F:$E4E2:A5 D0 LDA $D0 ; Malroth status flag (#$FF = defeated, #$00 = alive, others = countdown to battle) 0x03E4F4|$0F:$E4E4:10 19 BPL $E4FF 0x03E4F6|$0F:$E4E6:A5 31 LDA $31 ; current map ID 0x03E4F8|$0F:$E4E8:C9 03 CMP #$03 ; Map ID #$03: Midenhall 1F 0x03E4FA|$0F:$E4EA:D0 13 BNE $E4FF 0x03E4FC|$0F:$E4EC:20 DA FE JSR $FEDA ; parse byte following JSR for bank and pointer index, set $D6-$D7 to $8000,X-$8001,X in selected bank ; code -> data ; indirect data load target 0x03E4FF|$0F:$E4EF:49 ; $02:$8012; -> $02:$B351: looks like more NPC data? ; data -> code 0x03E500|$0F:$E4F0:A5 D6 LDA $D6 0x03E502|$0F:$E4F2:85 0C STA $0C 0x03E504|$0F:$E4F4:A5 D7 LDA $D7 0x03E506|$0F:$E4F6:85 0D STA $0D 0x03E508|$0F:$E4F8:20 FA FE JSR $FEFA ; increment JSR's return address, read byte following JSR, parse it for bank and pointer index, set $D6-$D7 to $8000,X-$8001,X in selected bank ; code -> data ; indirect data load target 0x03E50B|$0F:$E4FB:49 ; $02:$8012; -> $02:$B351: looks like more NPC data? ; data -> code 0x03E50C|$0F:$E4FC:4C 70 E5 JMP $E570 ; control flow target (from $E4E4, $E4EA) 0x03E50F|$0F:$E4FF:AD AD 61 LDA $61AD 0x03E512|$0F:$E502:F0 1F BEQ $E523 0x03E514|$0F:$E504:A5 31 LDA $31 ; current map ID 0x03E516|$0F:$E506:C9 09 CMP #$09 ; Map ID #$09: Moonbrooke 0x03E518|$0F:$E508:F0 08 BEQ $E512 0x03E51A|$0F:$E50A:C9 01 CMP #$01 ; Map ID #$01: World Map 0x03E51C|$0F:$E50C:F0 08 BEQ $E516 0x03E51E|$0F:$E50E:A9 6E LDA #$6E 0x03E520|$0F:$E510:D0 13 BNE $E525 ; control flow target (from $E508) 0x03E522|$0F:$E512:A9 6D LDA #$6D 0x03E524|$0F:$E514:D0 0F BNE $E525 ; control flow target (from $E50C) 0x03E526|$0F:$E516:A0 6F LDY #$6F 0x03E528|$0F:$E518:AD AD 61 LDA $61AD 0x03E52B|$0F:$E51B:C9 FE CMP #$FE 0x03E52D|$0F:$E51D:D0 01 BNE $E520 0x03E52F|$0F:$E51F:C8 INY ; control flow target (from $E51D) 0x03E530|$0F:$E520:98 TYA 0x03E531|$0F:$E521:D0 02 BNE $E525 ; control flow target (from $E502) 0x03E533|$0F:$E523:A5 31 LDA $31 ; current map ID ; control flow target (from $E510, $E514, $E521) 0x03E535|$0F:$E525:0A ASL 0x03E536|$0F:$E526:A8 TAY 0x03E537|$0F:$E527:B9 39 A5 LDA $A539,Y ; pointers to per-map NPC setup (X-pos, Y-pos, ???, sprite ID, dialogue [not string] ID) 0x03E53A|$0F:$E52A:85 0C STA $0C 0x03E53C|$0F:$E52C:B9 3A A5 LDA $A53A,Y 0x03E53F|$0F:$E52F:85 0D STA $0D 0x03E541|$0F:$E531:05 0C ORA $0C 0x03E543|$0F:$E533:D0 3B BNE $E570 ; zero pointer => no NPCs 0x03E545|$0F:$E535:A5 31 LDA $31 ; current map ID 0x03E547|$0F:$E537:C9 01 CMP #$01 ; Map ID #$01: World Map 0x03E549|$0F:$E539:D0 2D BNE $E568 ; if we're on the world map, check to see if we need to add the ship sprite 0x03E54B|$0F:$E53B:AD AD 61 LDA $61AD 0x03E54E|$0F:$E53E:D0 12 BNE $E552 0x03E550|$0F:$E540:A5 CF LDA $CF ; ship status (#$04 = on ship, #$02 = own ship, #$01 = beat Lianport Gremlins) 0x03E552|$0F:$E542:29 06 AND #$06 0x03E554|$0F:$E544:C9 02 CMP #$02 0x03E556|$0F:$E546:D0 20 BNE $E568 0x03E558|$0F:$E548:A5 D2 LDA $D2 ; ship X-pos (when you aren't on it) 0x03E55A|$0F:$E54A:8D D4 05 STA $05D4 ; NPC #$13 X-pos 0x03E55D|$0F:$E54D:A5 D3 LDA $D3 ; ship Y-pos (when you aren't on it) 0x03E55F|$0F:$E54F:8D D5 05 STA $05D5 ; NPC #$13 Y-pos ; control flow target (from $E53E) 0x03E562|$0F:$E552:A9 00 LDA #$00 0x03E564|$0F:$E554:8D D6 05 STA $05D6 ; NPC #$13 ? 0x03E567|$0F:$E557:8D D7 05 STA $05D7 ; NPC #$13 ? 0x03E56A|$0F:$E55A:85 38 STA $38 0x03E56C|$0F:$E55C:A9 01 LDA #$01 0x03E56E|$0F:$E55E:8D D8 05 STA $05D8 ; NPC #$13 motion nybble + direction nybble 0x03E571|$0F:$E561:A9 05 LDA #$05 0x03E573|$0F:$E563:8D D9 05 STA $05D9 ; NPC #$13 sprite ID 0x03E576|$0F:$E566:D0 04 BNE $E56C ; control flow target (from $E539, $E546) 0x03E578|$0F:$E568:A9 FF LDA #$FF 0x03E57A|$0F:$E56A:85 38 STA $38 ; control flow target (from $E566, $E57A) 0x03E57C|$0F:$E56C:20 8F CD JSR $CD8F 0x03E57F|$0F:$E56F:60 RTS ; control flow target (from $E4FC, $E533) 0x03E580|$0F:$E570:A0 00 LDY #$00 0x03E582|$0F:$E572:84 38 STY $38 0x03E584|$0F:$E574:A2 18 LDX #$18 ; control flow target (from $E5A0) 0x03E586|$0F:$E576:B1 0C LDA ($0C),Y 0x03E588|$0F:$E578:C9 FF CMP #$FF 0x03E58A|$0F:$E57A:F0 F0 BEQ $E56C 0x03E58C|$0F:$E57C:9D 3C 05 STA $053C,X ; NPC #$00 ? 0x03E58F|$0F:$E57F:C8 INY 0x03E590|$0F:$E580:B1 0C LDA ($0C),Y 0x03E592|$0F:$E582:9D 3D 05 STA $053D,X ; NPC #$00 ? 0x03E595|$0F:$E585:C8 INY 0x03E596|$0F:$E586:A9 00 LDA #$00 0x03E598|$0F:$E588:9D 3E 05 STA $053E,X ; NPC #$00 ? 0x03E59B|$0F:$E58B:9D 3F 05 STA $053F,X ; NPC #$00 ? 0x03E59E|$0F:$E58E:B1 0C LDA ($0C),Y 0x03E5A0|$0F:$E590:9D 40 05 STA $0540,X ; NPC #$00 ? + direction nybble 0x03E5A3|$0F:$E593:C8 INY 0x03E5A4|$0F:$E594:B1 0C LDA ($0C),Y 0x03E5A6|$0F:$E596:9D 41 05 STA $0541,X ; NPC #$00 sprite ID 0x03E5A9|$0F:$E599:C8 INY 0x03E5AA|$0F:$E59A:C8 INY 0x03E5AB|$0F:$E59B:8A TXA 0x03E5AC|$0F:$E59C:18 CLC 0x03E5AD|$0F:$E59D:69 08 ADC #$08 0x03E5AF|$0F:$E59F:AA TAX 0x03E5B0|$0F:$E5A0:D0 D4 BNE $E576 ; control flow target (from $D2BC, $D4F6, $E44E) 0x03E5B2|$0F:$E5A2:A2 00 LDX #$00 0x03E5B4|$0F:$E5A4:8A TXA ; control flow target (from $E5AB) 0x03E5B5|$0F:$E5A5:9D 1A 05 STA $051A,X ; something to do with whether you've opened the chest containing the Shield of Erdrick 0x03E5B8|$0F:$E5A8:E8 INX 0x03E5B9|$0F:$E5A9:E0 20 CPX #$20 0x03E5BB|$0F:$E5AB:D0 F8 BNE $E5A5 0x03E5BD|$0F:$E5AD:60 RTS ; control flow target (from $E5C2, $E636, $E6B4, $E797) 0x03E5BE|$0F:$E5AE:AD C5 04 LDA $04C5 0x03E5C1|$0F:$E5B1:D0 01 BNE $E5B4 0x03E5C3|$0F:$E5B3:60 RTS ; control flow target (from $E5B1) 0x03E5C4|$0F:$E5B4:A5 03 LDA $03 ; game clock? 0x03E5C6|$0F:$E5B6:48 PHA 0x03E5C7|$0F:$E5B7:A9 00 LDA #$00 0x03E5C9|$0F:$E5B9:85 0C STA $0C 0x03E5CB|$0F:$E5BB:20 8C F7 JSR $F78C ; wipe selected menu region 0x03E5CE|$0F:$E5BE:68 PLA 0x03E5CF|$0F:$E5BF:85 03 STA $03 ; game clock? 0x03E5D1|$0F:$E5C1:60 RTS ; control flow target (from $C741, $FF6C) 0x03E5D2|$0F:$E5C2:20 AE E5 JSR $E5AE 0x03E5D5|$0F:$E5C5:A5 03 LDA $03 ; game clock? 0x03E5D7|$0F:$E5C7:29 0F AND #$0F 0x03E5D9|$0F:$E5C9:F0 05 BEQ $E5D0 0x03E5DB|$0F:$E5CB:68 PLA 0x03E5DC|$0F:$E5CC:68 PLA 0x03E5DD|$0F:$E5CD:4C 47 C7 JMP $C747 ; control flow target (from $E5C9) 0x03E5E0|$0F:$E5D0:E6 28 INC $28 ; current map X-pos (2) 0x03E5E2|$0F:$E5D2:A9 FF LDA #$FF 0x03E5E4|$0F:$E5D4:8D 3C 05 STA $053C ; NPC #$00 ? 0x03E5E7|$0F:$E5D7:A9 00 LDA #$00 0x03E5E9|$0F:$E5D9:8D 3D 05 STA $053D ; NPC #$00 ? 0x03E5EC|$0F:$E5DC:A9 01 LDA #$01 0x03E5EE|$0F:$E5DE:8D 40 05 STA $0540 ; NPC #$00 ? + direction nybble 0x03E5F1|$0F:$E5E1:20 5B D3 JSR $D35B 0x03E5F4|$0F:$E5E4:A9 12 LDA #$12 0x03E5F6|$0F:$E5E6:85 18 STA $18 0x03E5F8|$0F:$E5E8:A9 F2 LDA #$F2 0x03E5FA|$0F:$E5EA:85 19 STA $19 ; control flow target (from $E607) 0x03E5FC|$0F:$E5EC:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03E5FF|$0F:$E5EF:A9 00 LDA #$00 0x03E601|$0F:$E5F1:85 1C STA $1C 0x03E603|$0F:$E5F3:85 1E STA $1E 0x03E605|$0F:$E5F5:20 C5 DE JSR $DEC5 0x03E608|$0F:$E5F8:E6 19 INC $19 0x03E60A|$0F:$E5FA:E6 19 INC $19 0x03E60C|$0F:$E5FC:E6 05 INC $05 0x03E60E|$0F:$E5FE:E6 2A INC $2A ; current map X-pos pixel, low byte 0x03E610|$0F:$E600:20 97 D8 JSR $D897 0x03E613|$0F:$E603:A5 19 LDA $19 0x03E615|$0F:$E605:C9 10 CMP #$10 0x03E617|$0F:$E607:D0 E3 BNE $E5EC 0x03E619|$0F:$E609:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03E61C|$0F:$E60C:E6 05 INC $05 0x03E61E|$0F:$E60E:D0 06 BNE $E616 0x03E620|$0F:$E610:A5 04 LDA $04 0x03E622|$0F:$E612:49 01 EOR #$01 0x03E624|$0F:$E614:85 04 STA $04 ; control flow target (from $E60E) 0x03E626|$0F:$E616:E6 14 INC $14 0x03E628|$0F:$E618:A9 1F LDA #$1F 0x03E62A|$0F:$E61A:25 14 AND $14 0x03E62C|$0F:$E61C:85 14 STA $14 0x03E62E|$0F:$E61E:E6 16 INC $16 ; current map X-pos (1) 0x03E630|$0F:$E620:E6 2A INC $2A ; current map X-pos pixel, low byte 0x03E632|$0F:$E622:D0 0C BNE $E630 0x03E634|$0F:$E624:E6 2B INC $2B ; current map X-pos pixel, high byte 0x03E636|$0F:$E626:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03E638|$0F:$E628:D0 06 BNE $E630 0x03E63A|$0F:$E62A:A5 2B LDA $2B ; current map X-pos pixel, high byte 0x03E63C|$0F:$E62C:29 0F AND #$0F 0x03E63E|$0F:$E62E:85 2B STA $2B ; current map X-pos pixel, high byte ; control flow target (from $E622, $E628) 0x03E640|$0F:$E630:20 97 D8 JSR $D897 0x03E643|$0F:$E633:4C 7A E8 JMP $E87A ; control flow target (from $C737, $FF72) 0x03E646|$0F:$E636:20 AE E5 JSR $E5AE 0x03E649|$0F:$E639:A5 03 LDA $03 ; game clock? 0x03E64B|$0F:$E63B:29 0F AND #$0F 0x03E64D|$0F:$E63D:F0 05 BEQ $E644 0x03E64F|$0F:$E63F:68 PLA 0x03E650|$0F:$E640:68 PLA 0x03E651|$0F:$E641:4C 47 C7 JMP $C747 ; control flow target (from $E63D) 0x03E654|$0F:$E644:C6 28 DEC $28 ; current map X-pos (2) 0x03E656|$0F:$E646:A9 01 LDA #$01 0x03E658|$0F:$E648:8D 3C 05 STA $053C ; NPC #$00 ? 0x03E65B|$0F:$E64B:A9 00 LDA #$00 0x03E65D|$0F:$E64D:8D 3D 05 STA $053D ; NPC #$00 ? 0x03E660|$0F:$E650:A9 03 LDA #$03 0x03E662|$0F:$E652:8D 40 05 STA $0540 ; NPC #$00 ? + direction nybble 0x03E665|$0F:$E655:20 5B D3 JSR $D35B 0x03E668|$0F:$E658:A9 EC LDA #$EC 0x03E66A|$0F:$E65A:85 18 STA $18 0x03E66C|$0F:$E65C:A9 F2 LDA #$F2 0x03E66E|$0F:$E65E:85 19 STA $19 ; control flow target (from $E69B) 0x03E670|$0F:$E660:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03E673|$0F:$E663:A9 00 LDA #$00 0x03E675|$0F:$E665:85 1C STA $1C 0x03E677|$0F:$E667:85 1E STA $1E 0x03E679|$0F:$E669:20 C5 DE JSR $DEC5 0x03E67C|$0F:$E66C:E6 19 INC $19 0x03E67E|$0F:$E66E:E6 19 INC $19 0x03E680|$0F:$E670:A5 05 LDA $05 0x03E682|$0F:$E672:38 SEC 0x03E683|$0F:$E673:E9 01 SBC #$01 0x03E685|$0F:$E675:85 05 STA $05 0x03E687|$0F:$E677:B0 06 BCS $E67F 0x03E689|$0F:$E679:A5 04 LDA $04 0x03E68B|$0F:$E67B:49 01 EOR #$01 0x03E68D|$0F:$E67D:85 04 STA $04 ; control flow target (from $E677) 0x03E68F|$0F:$E67F:A5 2A LDA $2A ; current map X-pos pixel, low byte 0x03E691|$0F:$E681:38 SEC 0x03E692|$0F:$E682:E9 01 SBC #$01 0x03E694|$0F:$E684:85 2A STA $2A ; current map X-pos pixel, low byte 0x03E696|$0F:$E686:B0 0C BCS $E694 0x03E698|$0F:$E688:C6 2B DEC $2B ; current map X-pos pixel, high byte 0x03E69A|$0F:$E68A:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03E69C|$0F:$E68C:D0 06 BNE $E694 0x03E69E|$0F:$E68E:A5 2B LDA $2B ; current map X-pos pixel, high byte 0x03E6A0|$0F:$E690:29 0F AND #$0F 0x03E6A2|$0F:$E692:85 2B STA $2B ; current map X-pos pixel, high byte ; control flow target (from $E686, $E68C) 0x03E6A4|$0F:$E694:20 97 D8 JSR $D897 0x03E6A7|$0F:$E697:A5 19 LDA $19 0x03E6A9|$0F:$E699:C9 10 CMP #$10 0x03E6AB|$0F:$E69B:D0 C3 BNE $E660 0x03E6AD|$0F:$E69D:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03E6B0|$0F:$E6A0:C6 05 DEC $05 0x03E6B2|$0F:$E6A2:C6 14 DEC $14 0x03E6B4|$0F:$E6A4:A9 1F LDA #$1F 0x03E6B6|$0F:$E6A6:25 14 AND $14 0x03E6B8|$0F:$E6A8:85 14 STA $14 0x03E6BA|$0F:$E6AA:C6 16 DEC $16 ; current map X-pos (1) 0x03E6BC|$0F:$E6AC:C6 2A DEC $2A ; current map X-pos pixel, low byte 0x03E6BE|$0F:$E6AE:20 97 D8 JSR $D897 0x03E6C1|$0F:$E6B1:4C 7A E8 JMP $E87A ; control flow target (from $C72B, $CABA, $CABD, $CAC0, $FF7E) 0x03E6C4|$0F:$E6B4:20 AE E5 JSR $E5AE 0x03E6C7|$0F:$E6B7:A5 03 LDA $03 ; game clock? 0x03E6C9|$0F:$E6B9:29 0F AND #$0F 0x03E6CB|$0F:$E6BB:F0 05 BEQ $E6C2 0x03E6CD|$0F:$E6BD:68 PLA 0x03E6CE|$0F:$E6BE:68 PLA 0x03E6CF|$0F:$E6BF:4C 47 C7 JMP $C747 ; control flow target (from $E6BB) 0x03E6D2|$0F:$E6C2:E6 29 INC $29 ; current map Y-pos (2) 0x03E6D4|$0F:$E6C4:A9 00 LDA #$00 0x03E6D6|$0F:$E6C6:8D 3C 05 STA $053C ; NPC #$00 ? 0x03E6D9|$0F:$E6C9:A9 FF LDA #$FF 0x03E6DB|$0F:$E6CB:8D 3D 05 STA $053D ; NPC #$00 ? 0x03E6DE|$0F:$E6CE:A9 02 LDA #$02 0x03E6E0|$0F:$E6D0:8D 40 05 STA $0540 ; NPC #$00 ? + direction nybble 0x03E6E3|$0F:$E6D3:20 5B D3 JSR $D35B 0x03E6E6|$0F:$E6D6:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03E6E9|$0F:$E6D9:E6 06 INC $06 0x03E6EB|$0F:$E6DB:E6 2C INC $2C ; current map Y-pos pixel, low byte 0x03E6ED|$0F:$E6DD:20 97 D8 JSR $D897 0x03E6F0|$0F:$E6E0:A9 10 LDA #$10 0x03E6F2|$0F:$E6E2:85 19 STA $19 0x03E6F4|$0F:$E6E4:A9 EE LDA #$EE 0x03E6F6|$0F:$E6E6:85 18 STA $18 ; control flow target (from $E70B) 0x03E6F8|$0F:$E6E8:A9 03 LDA #$03 0x03E6FA|$0F:$E6EA:85 2E STA $2E 0x03E6FC|$0F:$E6EC:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF ; control flow target (from $E6FE) 0x03E6FF|$0F:$E6EF:A9 0C LDA #$0C 0x03E701|$0F:$E6F1:85 1C STA $1C 0x03E703|$0F:$E6F3:85 1E STA $1E 0x03E705|$0F:$E6F5:20 C5 DE JSR $DEC5 0x03E708|$0F:$E6F8:E6 18 INC $18 0x03E70A|$0F:$E6FA:E6 18 INC $18 0x03E70C|$0F:$E6FC:C6 2E DEC $2E 0x03E70E|$0F:$E6FE:D0 EF BNE $E6EF 0x03E710|$0F:$E700:E6 06 INC $06 0x03E712|$0F:$E702:E6 2C INC $2C ; current map Y-pos pixel, low byte 0x03E714|$0F:$E704:20 97 D8 JSR $D897 0x03E717|$0F:$E707:A5 18 LDA $18 0x03E719|$0F:$E709:C9 12 CMP #$12 0x03E71B|$0F:$E70B:D0 DB BNE $E6E8 0x03E71D|$0F:$E70D:A9 10 LDA #$10 0x03E71F|$0F:$E70F:85 19 STA $19 0x03E721|$0F:$E711:A9 EC LDA #$EC 0x03E723|$0F:$E713:85 18 STA $18 ; control flow target (from $E735) 0x03E725|$0F:$E715:A9 05 LDA #$05 0x03E727|$0F:$E717:85 2E STA $2E 0x03E729|$0F:$E719:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF ; control flow target (from $E728) 0x03E72C|$0F:$E71C:20 9A DE JSR $DE9A 0x03E72F|$0F:$E71F:A5 18 LDA $18 0x03E731|$0F:$E721:18 CLC 0x03E732|$0F:$E722:69 04 ADC #$04 0x03E734|$0F:$E724:85 18 STA $18 0x03E736|$0F:$E726:C6 2E DEC $2E 0x03E738|$0F:$E728:D0 F2 BNE $E71C 0x03E73A|$0F:$E72A:E6 06 INC $06 0x03E73C|$0F:$E72C:E6 2C INC $2C ; current map Y-pos pixel, low byte 0x03E73E|$0F:$E72E:20 97 D8 JSR $D897 0x03E741|$0F:$E731:A5 18 LDA $18 0x03E743|$0F:$E733:C9 14 CMP #$14 0x03E745|$0F:$E735:D0 DE BNE $E715 0x03E747|$0F:$E737:A9 10 LDA #$10 0x03E749|$0F:$E739:85 19 STA $19 0x03E74B|$0F:$E73B:A9 EE LDA #$EE 0x03E74D|$0F:$E73D:85 18 STA $18 ; control flow target (from $E762) 0x03E74F|$0F:$E73F:A9 03 LDA #$03 0x03E751|$0F:$E741:85 2E STA $2E 0x03E753|$0F:$E743:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF ; control flow target (from $E755) 0x03E756|$0F:$E746:A9 03 LDA #$03 0x03E758|$0F:$E748:85 1C STA $1C 0x03E75A|$0F:$E74A:85 1E STA $1E 0x03E75C|$0F:$E74C:20 C5 DE JSR $DEC5 0x03E75F|$0F:$E74F:E6 18 INC $18 0x03E761|$0F:$E751:E6 18 INC $18 0x03E763|$0F:$E753:C6 2E DEC $2E 0x03E765|$0F:$E755:D0 EF BNE $E746 0x03E767|$0F:$E757:E6 06 INC $06 0x03E769|$0F:$E759:E6 2C INC $2C ; current map Y-pos pixel, low byte 0x03E76B|$0F:$E75B:20 97 D8 JSR $D897 0x03E76E|$0F:$E75E:A5 18 LDA $18 0x03E770|$0F:$E760:C9 12 CMP #$12 0x03E772|$0F:$E762:D0 DB BNE $E73F 0x03E774|$0F:$E764:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03E777|$0F:$E767:E6 06 INC $06 0x03E779|$0F:$E769:A5 06 LDA $06 0x03E77B|$0F:$E76B:C9 F0 CMP #$F0 0x03E77D|$0F:$E76D:D0 04 BNE $E773 0x03E77F|$0F:$E76F:A9 00 LDA #$00 0x03E781|$0F:$E771:85 06 STA $06 ; control flow target (from $E76D) 0x03E783|$0F:$E773:E6 15 INC $15 0x03E785|$0F:$E775:A5 15 LDA $15 0x03E787|$0F:$E777:C9 0F CMP #$0F 0x03E789|$0F:$E779:D0 04 BNE $E77F 0x03E78B|$0F:$E77B:A9 00 LDA #$00 0x03E78D|$0F:$E77D:85 15 STA $15 ; control flow target (from $E779) 0x03E78F|$0F:$E77F:E6 17 INC $17 ; current map Y-pos (1) 0x03E791|$0F:$E781:E6 2C INC $2C ; current map Y-pos pixel, low byte 0x03E793|$0F:$E783:D0 0C BNE $E791 0x03E795|$0F:$E785:E6 2D INC $2D ; current map Y-pos pixel, high byte 0x03E797|$0F:$E787:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03E799|$0F:$E789:D0 06 BNE $E791 0x03E79B|$0F:$E78B:A5 2D LDA $2D ; current map Y-pos pixel, high byte 0x03E79D|$0F:$E78D:29 0F AND #$0F 0x03E79F|$0F:$E78F:85 2D STA $2D ; current map Y-pos pixel, high byte ; control flow target (from $E783, $E789) 0x03E7A1|$0F:$E791:20 97 D8 JSR $D897 0x03E7A4|$0F:$E794:4C 7A E8 JMP $E87A ; control flow target (from $C71F, $FF78) 0x03E7A7|$0F:$E797:20 AE E5 JSR $E5AE 0x03E7AA|$0F:$E79A:A5 03 LDA $03 ; game clock? 0x03E7AC|$0F:$E79C:29 0F AND #$0F 0x03E7AE|$0F:$E79E:F0 05 BEQ $E7A5 0x03E7B0|$0F:$E7A0:68 PLA 0x03E7B1|$0F:$E7A1:68 PLA 0x03E7B2|$0F:$E7A2:4C 47 C7 JMP $C747 ; control flow target (from $E79E) 0x03E7B5|$0F:$E7A5:C6 29 DEC $29 ; current map Y-pos (2) 0x03E7B7|$0F:$E7A7:A9 00 LDA #$00 0x03E7B9|$0F:$E7A9:8D 3C 05 STA $053C ; NPC #$00 ? 0x03E7BC|$0F:$E7AC:8D 40 05 STA $0540 ; NPC #$00 ? + direction nybble 0x03E7BF|$0F:$E7AF:A9 01 LDA #$01 0x03E7C1|$0F:$E7B1:8D 3D 05 STA $053D ; NPC #$00 ? 0x03E7C4|$0F:$E7B4:20 5B D3 JSR $D35B 0x03E7C7|$0F:$E7B7:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03E7CA|$0F:$E7BA:C6 06 DEC $06 0x03E7CC|$0F:$E7BC:A5 06 LDA $06 0x03E7CE|$0F:$E7BE:C9 FF CMP #$FF 0x03E7D0|$0F:$E7C0:D0 04 BNE $E7C6 0x03E7D2|$0F:$E7C2:A9 EF LDA #$EF 0x03E7D4|$0F:$E7C4:85 06 STA $06 ; control flow target (from $E7C0) 0x03E7D6|$0F:$E7C6:A5 2C LDA $2C ; current map Y-pos pixel, low byte 0x03E7D8|$0F:$E7C8:38 SEC 0x03E7D9|$0F:$E7C9:E9 01 SBC #$01 0x03E7DB|$0F:$E7CB:85 2C STA $2C ; current map Y-pos pixel, low byte 0x03E7DD|$0F:$E7CD:B0 0C BCS $E7DB 0x03E7DF|$0F:$E7CF:C6 2D DEC $2D ; current map Y-pos pixel, high byte 0x03E7E1|$0F:$E7D1:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03E7E3|$0F:$E7D3:D0 06 BNE $E7DB 0x03E7E5|$0F:$E7D5:A5 2D LDA $2D ; current map Y-pos pixel, high byte 0x03E7E7|$0F:$E7D7:29 0F AND #$0F 0x03E7E9|$0F:$E7D9:85 2D STA $2D ; current map Y-pos pixel, high byte ; control flow target (from $E7CD, $E7D3) 0x03E7EB|$0F:$E7DB:20 97 D8 JSR $D897 0x03E7EE|$0F:$E7DE:A9 F0 LDA #$F0 0x03E7F0|$0F:$E7E0:85 19 STA $19 0x03E7F2|$0F:$E7E2:A9 EE LDA #$EE 0x03E7F4|$0F:$E7E4:85 18 STA $18 ; control flow target (from $E809) 0x03E7F6|$0F:$E7E6:A9 03 LDA #$03 0x03E7F8|$0F:$E7E8:85 2E STA $2E 0x03E7FA|$0F:$E7EA:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF ; control flow target (from $E7FC) 0x03E7FD|$0F:$E7ED:A9 03 LDA #$03 0x03E7FF|$0F:$E7EF:85 1C STA $1C 0x03E801|$0F:$E7F1:85 1E STA $1E 0x03E803|$0F:$E7F3:20 C5 DE JSR $DEC5 0x03E806|$0F:$E7F6:E6 18 INC $18 0x03E808|$0F:$E7F8:E6 18 INC $18 0x03E80A|$0F:$E7FA:C6 2E DEC $2E 0x03E80C|$0F:$E7FC:D0 EF BNE $E7ED 0x03E80E|$0F:$E7FE:C6 06 DEC $06 0x03E810|$0F:$E800:C6 2C DEC $2C ; current map Y-pos pixel, low byte 0x03E812|$0F:$E802:20 97 D8 JSR $D897 0x03E815|$0F:$E805:A5 18 LDA $18 0x03E817|$0F:$E807:C9 12 CMP #$12 0x03E819|$0F:$E809:D0 DB BNE $E7E6 0x03E81B|$0F:$E80B:A9 F0 LDA #$F0 0x03E81D|$0F:$E80D:85 19 STA $19 0x03E81F|$0F:$E80F:A9 EC LDA #$EC 0x03E821|$0F:$E811:85 18 STA $18 ; control flow target (from $E833) 0x03E823|$0F:$E813:A9 05 LDA #$05 0x03E825|$0F:$E815:85 2E STA $2E 0x03E827|$0F:$E817:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF ; control flow target (from $E826) 0x03E82A|$0F:$E81A:20 9A DE JSR $DE9A 0x03E82D|$0F:$E81D:A5 18 LDA $18 0x03E82F|$0F:$E81F:18 CLC 0x03E830|$0F:$E820:69 04 ADC #$04 0x03E832|$0F:$E822:85 18 STA $18 0x03E834|$0F:$E824:C6 2E DEC $2E 0x03E836|$0F:$E826:D0 F2 BNE $E81A 0x03E838|$0F:$E828:C6 06 DEC $06 0x03E83A|$0F:$E82A:C6 2C DEC $2C ; current map Y-pos pixel, low byte 0x03E83C|$0F:$E82C:20 97 D8 JSR $D897 0x03E83F|$0F:$E82F:A5 18 LDA $18 0x03E841|$0F:$E831:C9 14 CMP #$14 0x03E843|$0F:$E833:D0 DE BNE $E813 0x03E845|$0F:$E835:A9 F0 LDA #$F0 0x03E847|$0F:$E837:85 19 STA $19 0x03E849|$0F:$E839:A9 EE LDA #$EE 0x03E84B|$0F:$E83B:85 18 STA $18 ; control flow target (from $E860) 0x03E84D|$0F:$E83D:A9 03 LDA #$03 0x03E84F|$0F:$E83F:85 2E STA $2E 0x03E851|$0F:$E841:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF ; control flow target (from $E853) 0x03E854|$0F:$E844:A9 0C LDA #$0C 0x03E856|$0F:$E846:85 1C STA $1C 0x03E858|$0F:$E848:85 1E STA $1E 0x03E85A|$0F:$E84A:20 C5 DE JSR $DEC5 0x03E85D|$0F:$E84D:E6 18 INC $18 0x03E85F|$0F:$E84F:E6 18 INC $18 0x03E861|$0F:$E851:C6 2E DEC $2E 0x03E863|$0F:$E853:D0 EF BNE $E844 0x03E865|$0F:$E855:C6 06 DEC $06 0x03E867|$0F:$E857:C6 2C DEC $2C ; current map Y-pos pixel, low byte 0x03E869|$0F:$E859:20 97 D8 JSR $D897 0x03E86C|$0F:$E85C:A5 18 LDA $18 0x03E86E|$0F:$E85E:C9 12 CMP #$12 0x03E870|$0F:$E860:D0 DB BNE $E83D 0x03E872|$0F:$E862:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03E875|$0F:$E865:C6 06 DEC $06 0x03E877|$0F:$E867:C6 15 DEC $15 0x03E879|$0F:$E869:A5 15 LDA $15 0x03E87B|$0F:$E86B:C9 FF CMP #$FF 0x03E87D|$0F:$E86D:D0 04 BNE $E873 0x03E87F|$0F:$E86F:A9 0E LDA #$0E 0x03E881|$0F:$E871:85 15 STA $15 ; control flow target (from $E86D) 0x03E883|$0F:$E873:C6 17 DEC $17 ; current map Y-pos (1) 0x03E885|$0F:$E875:C6 2C DEC $2C ; current map Y-pos pixel, low byte 0x03E887|$0F:$E877:20 97 D8 JSR $D897 ; control flow target (from $E633, $E6B1, $E794) 0x03E88A|$0F:$E87A:A5 16 LDA $16 ; current map X-pos (1) 0x03E88C|$0F:$E87C:85 12 STA $12 0x03E88E|$0F:$E87E:A5 17 LDA $17 ; current map Y-pos (1) 0x03E890|$0F:$E880:85 13 STA $13 0x03E892|$0F:$E882:20 18 E2 JSR $E218 0x03E895|$0F:$E885:A5 0D LDA $0D 0x03E897|$0F:$E887:C5 1D CMP $1D 0x03E899|$0F:$E889:D0 17 BNE $E8A2 0x03E89B|$0F:$E88B:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03E89D|$0F:$E88D:C9 02 CMP #$02 0x03E89F|$0F:$E88F:D0 10 BNE $E8A1 0x03E8A1|$0F:$E891:A5 16 LDA $16 ; current map X-pos (1) 0x03E8A3|$0F:$E893:4A LSR 0x03E8A4|$0F:$E894:18 CLC 0x03E8A5|$0F:$E895:E5 21 SBC $21 ; map width 0x03E8A7|$0F:$E897:B0 10 BCS $E8A9 0x03E8A9|$0F:$E899:A5 17 LDA $17 ; current map Y-pos (1) 0x03E8AB|$0F:$E89B:4A LSR 0x03E8AC|$0F:$E89C:18 CLC 0x03E8AD|$0F:$E89D:E5 22 SBC $22 ; map height 0x03E8AF|$0F:$E89F:B0 08 BCS $E8A9 ; control flow target (from $E88F) 0x03E8B1|$0F:$E8A1:60 RTS ; control flow target (from $E889) 0x03E8B2|$0F:$E8A2:85 1D STA $1D 0x03E8B4|$0F:$E8A4:A9 FF LDA #$FF 0x03E8B6|$0F:$E8A6:8D FD 05 STA $05FD ; control flow target (from $E897, $E89F) 0x03E8B9|$0F:$E8A9:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03E8BB|$0F:$E8AB:C9 02 CMP #$02 0x03E8BD|$0F:$E8AD:F0 03 BEQ $E8B2 0x03E8BF|$0F:$E8AF:4C 34 E9 JMP $E934 ; control flow target (from $E8AD) 0x03E8C2|$0F:$E8B2:20 61 F7 JSR $F761 ; load ROM bank #$06 0x03E8C5|$0F:$E8B5:A5 31 LDA $31 ; current map ID 0x03E8C7|$0F:$E8B7:38 SEC 0x03E8C8|$0F:$E8B8:E9 2B SBC #$2B ; only maps between #$2B and #$47 inclusive are checked for irregularities 0x03E8CA|$0F:$E8BA:0A ASL 0x03E8CB|$0F:$E8BB:A8 TAY 0x03E8CC|$0F:$E8BC:B9 E1 A3 LDA $A3E1,Y ; pointers to warp spaces for irregularly-shaped maps 0x03E8CF|$0F:$E8BF:85 10 STA $10 0x03E8D1|$0F:$E8C1:B9 E2 A3 LDA $A3E2,Y 0x03E8D4|$0F:$E8C4:85 11 STA $11 0x03E8D6|$0F:$E8C6:05 10 ORA $10 0x03E8D8|$0F:$E8C8:F0 6A BEQ $E934 ; no irregularity => skip over handling irregularities 0x03E8DA|$0F:$E8CA:A5 16 LDA $16 ; current map X-pos (1) 0x03E8DC|$0F:$E8CC:29 FE AND #$FE ; maps are designed with 2-tile wide transitions between visible segments, so ignore the low bit of map position to cover a 2-tile-wide space 0x03E8DE|$0F:$E8CE:85 0C STA $0C ; current X-pos, 2-tile granularity 0x03E8E0|$0F:$E8D0:A5 17 LDA $17 ; current map Y-pos (1) 0x03E8E2|$0F:$E8D2:29 FE AND #$FE ; maps are designed with 2-tile high transitions between visible segments, so ignore the low bit of map position to cover a 2-tile-high space 0x03E8E4|$0F:$E8D4:85 0E STA $0E ; current Y-pos, 2-tile granularity 0x03E8E6|$0F:$E8D6:A0 FF LDY #$FF ; initialize index to -1 so that when we INY we'll be at #$00 ; control flow target (from $E8E7, $E8ED) 0x03E8E8|$0F:$E8D8:C8 INY ; offset for destination map ID 0x03E8E9|$0F:$E8D9:B1 10 LDA ($10),Y ; destination map ID 0x03E8EB|$0F:$E8DB:C9 FF CMP #$FF ; #$FF => end of list 0x03E8ED|$0F:$E8DD:F0 55 BEQ $E934 0x03E8EF|$0F:$E8DF:C8 INY ; offset for destination X-pos 0x03E8F0|$0F:$E8E0:C8 INY ; offset for destination Y-pos 0x03E8F1|$0F:$E8E1:C8 INY ; offset for transition X-pos 0x03E8F2|$0F:$E8E2:B1 10 LDA ($10),Y ; transition X-pos 0x03E8F4|$0F:$E8E4:C8 INY 0x03E8F5|$0F:$E8E5:C5 0C CMP $0C ; current X-pos, 2-tile granularity 0x03E8F7|$0F:$E8E7:D0 EF BNE $E8D8 ; not the right X-pos space => loop to next irregularity 0x03E8F9|$0F:$E8E9:B1 10 LDA ($10),Y ; transition Y-pos 0x03E8FB|$0F:$E8EB:C5 0E CMP $0E ; current Y-pos, 2-tile granularity 0x03E8FD|$0F:$E8ED:D0 E9 BNE $E8D8 ; not the right X-pos space => loop to next irregularity 0x03E8FF|$0F:$E8EF:88 DEY ; offset for transition X-pos 0x03E900|$0F:$E8F0:88 DEY ; offset for destination Y-pos 0x03E901|$0F:$E8F1:A5 17 LDA $17 ; current map Y-pos (1) 0x03E903|$0F:$E8F3:29 01 AND #$01 ; pick out difference between real position and 2-tile granularity 0x03E905|$0F:$E8F5:11 10 ORA ($10),Y ; set low bit of destination Y-pos 0x03E907|$0F:$E8F7:85 17 STA $17 ; current map Y-pos (1) 0x03E909|$0F:$E8F9:85 29 STA $29 ; current map Y-pos (2) 0x03E90B|$0F:$E8FB:85 13 STA $13 0x03E90D|$0F:$E8FD:85 2C STA $2C ; current map Y-pos pixel, low byte 0x03E90F|$0F:$E8FF:88 DEY ; offset for destination X-pos 0x03E910|$0F:$E900:A5 16 LDA $16 ; current map X-pos (1) 0x03E912|$0F:$E902:29 01 AND #$01 ; pick out difference between real position and 2-tile granularity 0x03E914|$0F:$E904:11 10 ORA ($10),Y ; set low bit of destination X-pos 0x03E916|$0F:$E906:85 16 STA $16 ; current map X-pos (1) 0x03E918|$0F:$E908:85 28 STA $28 ; current map X-pos (2) 0x03E91A|$0F:$E90A:85 12 STA $12 0x03E91C|$0F:$E90C:85 2A STA $2A ; current map X-pos pixel, low byte 0x03E91E|$0F:$E90E:88 DEY ; offset for destination map ID 0x03E91F|$0F:$E90F:B1 10 LDA ($10),Y 0x03E921|$0F:$E911:85 31 STA $31 ; current map ID 0x03E923|$0F:$E913:A9 00 LDA #$00 0x03E925|$0F:$E915:85 2B STA $2B ; current map X-pos pixel, high byte 0x03E927|$0F:$E917:85 2D STA $2D ; current map Y-pos pixel, high byte 0x03E929|$0F:$E919:A2 04 LDX #$04 ; shift 16x16 map position into pixel position variables ; control flow target (from $E924) 0x03E92B|$0F:$E91B:06 2A ASL $2A ; current map X-pos pixel, low byte 0x03E92D|$0F:$E91D:26 2B ROL $2B ; current map X-pos pixel, high byte 0x03E92F|$0F:$E91F:06 2C ASL $2C ; current map Y-pos pixel, low byte 0x03E931|$0F:$E921:26 2D ROL $2D ; current map Y-pos pixel, high byte 0x03E933|$0F:$E923:CA DEX 0x03E934|$0F:$E924:D0 F5 BNE $E91B 0x03E936|$0F:$E926:A9 FF LDA #$FF 0x03E938|$0F:$E928:85 45 STA $45 0x03E93A|$0F:$E92A:20 61 E4 JSR $E461 0x03E93D|$0F:$E92D:20 18 E2 JSR $E218 0x03E940|$0F:$E930:A5 0D LDA $0D 0x03E942|$0F:$E932:85 1D STA $1D ; control flow target (from $E8AF, $E8C8, $E8DD) 0x03E944|$0F:$E934:A9 FF LDA #$FF 0x03E946|$0F:$E936:85 41 STA $41 ; control flow target (from $D229, $D24D) ; external control flow target (from $06:$97D2) 0x03E948|$0F:$E938:A9 00 LDA #$00 0x03E94A|$0F:$E93A:85 18 STA $18 0x03E94C|$0F:$E93C:85 19 STA $19 0x03E94E|$0F:$E93E:85 42 STA $42 0x03E950|$0F:$E940:A9 FE LDA #$FE 0x03E952|$0F:$E942:85 3D STA $3D 0x03E954|$0F:$E944:85 3F STA $3F 0x03E956|$0F:$E946:85 3E STA $3E 0x03E958|$0F:$E948:85 40 STA $40 0x03E95A|$0F:$E94A:20 70 F7 JSR $F770 ; load ROM bank #$02 0x03E95D|$0F:$E94D:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03E95F|$0F:$E94F:0A ASL 0x03E960|$0F:$E950:A8 TAY 0x03E961|$0F:$E951:B9 BD DE LDA $DEBD,Y 0x03E964|$0F:$E954:85 6F STA $6F 0x03E966|$0F:$E956:C8 INY 0x03E967|$0F:$E957:B9 BD DE LDA $DEBD,Y 0x03E96A|$0F:$E95A:85 70 STA $70 0x03E96C|$0F:$E95C:A0 00 LDY #$00 ; control flow target (from $E964) 0x03E96E|$0F:$E95E:B1 6F LDA ($6F),Y 0x03E970|$0F:$E960:99 00 6E STA $6E00,Y 0x03E973|$0F:$E963:88 DEY 0x03E974|$0F:$E964:D0 F8 BNE $E95E 0x03E976|$0F:$E966:20 6D EB JSR $EB6D 0x03E979|$0F:$E969:20 FC E9 JSR $E9FC 0x03E97C|$0F:$E96C:A5 41 LDA $41 0x03E97E|$0F:$E96E:C9 32 CMP #$32 0x03E980|$0F:$E970:F0 48 BEQ $E9BA 0x03E982|$0F:$E972:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03E985|$0F:$E975:A9 FF LDA #$FF 0x03E987|$0F:$E977:85 35 STA $35 ; flag indicating whether any menu is currently open 0x03E989|$0F:$E979:20 CB D8 JSR $D8CB 0x03E98C|$0F:$E97C:A9 00 LDA #$00 0x03E98E|$0F:$E97E:85 35 STA $35 ; flag indicating whether any menu is currently open 0x03E990|$0F:$E980:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03E993|$0F:$E983:A9 F2 LDA #$F2 0x03E995|$0F:$E985:85 19 STA $19 0x03E997|$0F:$E987:A9 F0 LDA #$F0 0x03E999|$0F:$E989:85 18 STA $18 0x03E99B|$0F:$E98B:A9 02 LDA #$02 0x03E99D|$0F:$E98D:85 3D STA $3D 0x03E99F|$0F:$E98F:85 3E STA $3E 0x03E9A1|$0F:$E991:A9 0E LDA #$0E 0x03E9A3|$0F:$E993:85 3F STA $3F 0x03E9A5|$0F:$E995:85 40 STA $40 0x03E9A7|$0F:$E997:A9 00 LDA #$00 0x03E9A9|$0F:$E999:85 41 STA $41 0x03E9AB|$0F:$E99B:A2 FF LDX #$FF 0x03E9AD|$0F:$E99D:8E 45 61 STX $6145 0x03E9B0|$0F:$E9A0:20 38 EA JSR $EA38 0x03E9B3|$0F:$E9A3:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03E9B5|$0F:$E9A5:C9 03 CMP #$03 0x03E9B7|$0F:$E9A7:F0 0A BEQ $E9B3 0x03E9B9|$0F:$E9A9:A5 1D LDA $1D 0x03E9BB|$0F:$E9AB:D0 0D BNE $E9BA 0x03E9BD|$0F:$E9AD:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03E9BF|$0F:$E9AF:C9 02 CMP #$02 0x03E9C1|$0F:$E9B1:F0 07 BEQ $E9BA ; control flow target (from $E9A7) 0x03E9C3|$0F:$E9B3:A9 01 LDA #$01 0x03E9C5|$0F:$E9B5:85 45 STA $45 0x03E9C7|$0F:$E9B7:20 F7 D2 JSR $D2F7 ; control flow target (from $E970, $E9AB, $E9B1) 0x03E9CA|$0F:$E9BA:A9 EE LDA #$EE 0x03E9CC|$0F:$E9BC:85 18 STA $18 ; control flow target (from $E9F7) 0x03E9CE|$0F:$E9BE:20 6D EB JSR $EB6D 0x03E9D1|$0F:$E9C1:A9 F2 LDA #$F2 0x03E9D3|$0F:$E9C3:85 19 STA $19 ; control flow target (from $E9D6) 0x03E9D5|$0F:$E9C5:A9 00 LDA #$00 0x03E9D7|$0F:$E9C7:85 1C STA $1C 0x03E9D9|$0F:$E9C9:85 1E STA $1E 0x03E9DB|$0F:$E9CB:20 9F EA JSR $EA9F 0x03E9DE|$0F:$E9CE:E6 19 INC $19 0x03E9E0|$0F:$E9D0:E6 19 INC $19 0x03E9E2|$0F:$E9D2:A5 19 LDA $19 0x03E9E4|$0F:$E9D4:C9 02 CMP #$02 0x03E9E6|$0F:$E9D6:D0 ED BNE $E9C5 0x03E9E8|$0F:$E9D8:20 6D EB JSR $EB6D ; control flow target (from $E9EC) 0x03E9EB|$0F:$E9DB:A9 00 LDA #$00 0x03E9ED|$0F:$E9DD:85 1C STA $1C 0x03E9EF|$0F:$E9DF:85 1E STA $1E 0x03E9F1|$0F:$E9E1:20 9F EA JSR $EA9F 0x03E9F4|$0F:$E9E4:E6 19 INC $19 0x03E9F6|$0F:$E9E6:E6 19 INC $19 0x03E9F8|$0F:$E9E8:A5 19 LDA $19 0x03E9FA|$0F:$E9EA:C9 10 CMP #$10 0x03E9FC|$0F:$E9EC:D0 ED BNE $E9DB 0x03E9FE|$0F:$E9EE:A5 18 LDA $18 0x03EA00|$0F:$E9F0:18 CLC 0x03EA01|$0F:$E9F1:69 22 ADC #$22 0x03EA03|$0F:$E9F3:85 18 STA $18 0x03EA05|$0F:$E9F5:C9 32 CMP #$32 0x03EA07|$0F:$E9F7:D0 C5 BNE $E9BE 0x03EA09|$0F:$E9F9:4C DC C1 JMP $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF ; control flow target (from $E969, $EA08, $EA6D, $EA73) 0x03EA0C|$0F:$E9FC:20 76 EA JSR $EA76 0x03EA0F|$0F:$E9FF:A5 18 LDA $18 0x03EA11|$0F:$EA01:18 CLC 0x03EA12|$0F:$EA02:65 3D ADC $3D 0x03EA14|$0F:$EA04:85 18 STA $18 0x03EA16|$0F:$EA06:C5 3F CMP $3F 0x03EA18|$0F:$EA08:D0 F2 BNE $E9FC 0x03EA1A|$0F:$EA0A:A5 3D LDA $3D 0x03EA1C|$0F:$EA0C:49 FF EOR #$FF 0x03EA1E|$0F:$EA0E:85 3D STA $3D 0x03EA20|$0F:$EA10:E6 3D INC $3D 0x03EA22|$0F:$EA12:A5 3F LDA $3F 0x03EA24|$0F:$EA14:49 FF EOR #$FF 0x03EA26|$0F:$EA16:85 3F STA $3F 0x03EA28|$0F:$EA18:E6 3F INC $3F 0x03EA2A|$0F:$EA1A:10 0B BPL $EA27 0x03EA2C|$0F:$EA1C:A5 41 LDA $41 0x03EA2E|$0F:$EA1E:F0 0F BEQ $EA2F 0x03EA30|$0F:$EA20:C6 3F DEC $3F 0x03EA32|$0F:$EA22:C6 3F DEC $3F 0x03EA34|$0F:$EA24:4C 2F EA JMP $EA2F ; control flow target (from $EA1A) 0x03EA37|$0F:$EA27:A5 41 LDA $41 0x03EA39|$0F:$EA29:D0 04 BNE $EA2F 0x03EA3B|$0F:$EA2B:C6 3F DEC $3F 0x03EA3D|$0F:$EA2D:C6 3F DEC $3F ; control flow target (from $EA1E, $EA24, $EA29) 0x03EA3F|$0F:$EA2F:A5 41 LDA $41 0x03EA41|$0F:$EA31:D0 05 BNE $EA38 0x03EA43|$0F:$EA33:A5 19 LDA $19 0x03EA45|$0F:$EA35:D0 01 BNE $EA38 0x03EA47|$0F:$EA37:60 RTS ; control flow target (from $E9A0, $EA31, $EA35, $EA44) 0x03EA48|$0F:$EA38:20 76 EA JSR $EA76 0x03EA4B|$0F:$EA3B:A5 19 LDA $19 0x03EA4D|$0F:$EA3D:18 CLC 0x03EA4E|$0F:$EA3E:65 3E ADC $3E 0x03EA50|$0F:$EA40:85 19 STA $19 0x03EA52|$0F:$EA42:C5 40 CMP $40 0x03EA54|$0F:$EA44:D0 F2 BNE $EA38 0x03EA56|$0F:$EA46:A5 3E LDA $3E 0x03EA58|$0F:$EA48:49 FF EOR #$FF 0x03EA5A|$0F:$EA4A:85 3E STA $3E 0x03EA5C|$0F:$EA4C:E6 3E INC $3E 0x03EA5E|$0F:$EA4E:A5 40 LDA $40 0x03EA60|$0F:$EA50:49 FF EOR #$FF 0x03EA62|$0F:$EA52:85 40 STA $40 0x03EA64|$0F:$EA54:E6 40 INC $40 0x03EA66|$0F:$EA56:10 0B BPL $EA63 0x03EA68|$0F:$EA58:A5 41 LDA $41 0x03EA6A|$0F:$EA5A:F0 0F BEQ $EA6B 0x03EA6C|$0F:$EA5C:C6 40 DEC $40 0x03EA6E|$0F:$EA5E:C6 40 DEC $40 0x03EA70|$0F:$EA60:4C 6B EA JMP $EA6B ; control flow target (from $EA56) 0x03EA73|$0F:$EA63:A5 41 LDA $41 0x03EA75|$0F:$EA65:D0 04 BNE $EA6B 0x03EA77|$0F:$EA67:C6 40 DEC $40 0x03EA79|$0F:$EA69:C6 40 DEC $40 ; control flow target (from $EA5A, $EA60, $EA65) 0x03EA7B|$0F:$EA6B:A5 41 LDA $41 0x03EA7D|$0F:$EA6D:F0 8D BEQ $E9FC 0x03EA7F|$0F:$EA6F:A5 40 LDA $40 0x03EA81|$0F:$EA71:C9 10 CMP #$10 0x03EA83|$0F:$EA73:D0 87 BNE $E9FC 0x03EA85|$0F:$EA75:60 RTS ; control flow target (from $E9FC, $EA38) 0x03EA86|$0F:$EA76:A9 00 LDA #$00 0x03EA88|$0F:$EA78:85 1E STA $1E 0x03EA8A|$0F:$EA7A:A5 41 LDA $41 0x03EA8C|$0F:$EA7C:F0 04 BEQ $EA82 0x03EA8E|$0F:$EA7E:A9 FF LDA #$FF 0x03EA90|$0F:$EA80:D0 02 BNE $EA84 ; control flow target (from $EA7C) 0x03EA92|$0F:$EA82:A9 FE LDA #$FE ; control flow target (from $EA80) 0x03EA94|$0F:$EA84:85 1C STA $1C 0x03EA96|$0F:$EA86:20 9F EA JSR $EA9F 0x03EA99|$0F:$EA89:E6 42 INC $42 0x03EA9B|$0F:$EA8B:A5 42 LDA $42 0x03EA9D|$0F:$EA8D:C9 1E CMP #$1E 0x03EA9F|$0F:$EA8F:F0 06 BEQ $EA97 0x03EAA1|$0F:$EA91:A5 01 LDA $01 0x03EAA3|$0F:$EA93:C9 12 CMP #$12 0x03EAA5|$0F:$EA95:90 07 BCC $EA9E ; control flow target (from $EA8F) 0x03EAA7|$0F:$EA97:20 6D EB JSR $EB6D 0x03EAAA|$0F:$EA9A:A9 00 LDA #$00 0x03EAAC|$0F:$EA9C:85 42 STA $42 ; control flow target (from $EA95) 0x03EAAE|$0F:$EA9E:60 RTS ; control flow target (from $E9CB, $E9E1, $EA86) 0x03EAAF|$0F:$EA9F:20 FC EA JSR $EAFC 0x03EAB2|$0F:$EAA2:90 01 BCC $EAA5 0x03EAB4|$0F:$EAA4:60 RTS ; control flow target (from $EAA2) 0x03EAB5|$0F:$EAA5:A5 0C LDA $0C 0x03EAB7|$0F:$EAA7:0A ASL 0x03EAB8|$0F:$EAA8:0A ASL 0x03EAB9|$0F:$EAA9:65 0C ADC $0C 0x03EABB|$0F:$EAAB:A8 TAY 0x03EABC|$0F:$EAAC:A6 02 LDX $02 0x03EABE|$0F:$EAAE:A5 08 LDA $08 0x03EAC0|$0F:$EAB0:9D 00 03 STA $0300,X ; PPU write buffer start 0x03EAC3|$0F:$EAB3:A5 07 LDA $07 0x03EAC5|$0F:$EAB5:9D 01 03 STA $0301,X 0x03EAC8|$0F:$EAB8:B9 00 6E LDA $6E00,Y 0x03EACB|$0F:$EABB:9D 02 03 STA $0302,X 0x03EACE|$0F:$EABE:B9 01 6E LDA $6E01,Y 0x03EAD1|$0F:$EAC1:9D 03 03 STA $0303,X 0x03EAD4|$0F:$EAC4:B9 02 6E LDA $6E02,Y 0x03EAD7|$0F:$EAC7:9D 04 03 STA $0304,X 0x03EADA|$0F:$EACA:B9 03 6E LDA $6E03,Y 0x03EADD|$0F:$EACD:9D 05 03 STA $0305,X 0x03EAE0|$0F:$EAD0:B9 04 6E LDA $6E04,Y 0x03EAE3|$0F:$EAD3:29 03 AND #$03 0x03EAE5|$0F:$EAD5:85 09 STA $09 0x03EAE7|$0F:$EAD7:A5 1A LDA $1A 0x03EAE9|$0F:$EAD9:85 0C STA $0C 0x03EAEB|$0F:$EADB:A5 1B LDA $1B 0x03EAED|$0F:$EADD:85 0E STA $0E 0x03EAEF|$0F:$EADF:20 6E DE JSR $DE6E 0x03EAF2|$0F:$EAE2:A5 08 LDA $08 0x03EAF4|$0F:$EAE4:09 20 ORA #$20 0x03EAF6|$0F:$EAE6:9D 06 03 STA $0306,X 0x03EAF9|$0F:$EAE9:A5 07 LDA $07 0x03EAFB|$0F:$EAEB:9D 07 03 STA $0307,X 0x03EAFE|$0F:$EAEE:A5 09 LDA $09 0x03EB00|$0F:$EAF0:9D 08 03 STA $0308,X 0x03EB03|$0F:$EAF3:8A TXA 0x03EB04|$0F:$EAF4:18 CLC 0x03EB05|$0F:$EAF5:69 09 ADC #$09 0x03EB07|$0F:$EAF7:85 02 STA $02 0x03EB09|$0F:$EAF9:E6 01 INC $01 0x03EB0B|$0F:$EAFB:60 RTS ; control flow target (from $DEC5, $EA9F) 0x03EB0C|$0F:$EAFC:20 62 DF JSR $DF62 0x03EB0F|$0F:$EAFF:A5 0C LDA $0C 0x03EB11|$0F:$EB01:85 1A STA $1A 0x03EB13|$0F:$EB03:A5 0E LDA $0E 0x03EB15|$0F:$EB05:85 1B STA $1B 0x03EB17|$0F:$EB07:20 00 DE JSR $DE00 0x03EB1A|$0F:$EB0A:A5 18 LDA $18 0x03EB1C|$0F:$EB0C:0A ASL 0x03EB1D|$0F:$EB0D:A5 18 LDA $18 0x03EB1F|$0F:$EB0F:6A ROR 0x03EB20|$0F:$EB10:18 CLC 0x03EB21|$0F:$EB11:65 16 ADC $16 ; current map X-pos (1) 0x03EB23|$0F:$EB13:85 0C STA $0C 0x03EB25|$0F:$EB15:A5 19 LDA $19 0x03EB27|$0F:$EB17:0A ASL 0x03EB28|$0F:$EB18:A5 19 LDA $19 0x03EB2A|$0F:$EB1A:6A ROR 0x03EB2B|$0F:$EB1B:18 CLC 0x03EB2C|$0F:$EB1C:65 17 ADC $17 ; current map Y-pos (1) 0x03EB2E|$0F:$EB1E:85 0E STA $0E 0x03EB30|$0F:$EB20:20 89 DF JSR $DF89 0x03EB33|$0F:$EB23:20 22 E2 JSR $E222 0x03EB36|$0F:$EB26:A5 1D LDA $1D 0x03EB38|$0F:$EB28:C5 0D CMP $0D 0x03EB3A|$0F:$EB2A:F0 22 BEQ $EB4E 0x03EB3C|$0F:$EB2C:A5 0C LDA $0C 0x03EB3E|$0F:$EB2E:C9 28 CMP #$28 0x03EB40|$0F:$EB30:B0 1C BCS $EB4E 0x03EB42|$0F:$EB32:A5 1D LDA $1D 0x03EB44|$0F:$EB34:D0 14 BNE $EB4A 0x03EB46|$0F:$EB36:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03EB48|$0F:$EB38:C9 01 CMP #$01 0x03EB4A|$0F:$EB3A:F0 0A BEQ $EB46 0x03EB4C|$0F:$EB3C:A5 0C LDA $0C 0x03EB4E|$0F:$EB3E:C9 08 CMP #$08 0x03EB50|$0F:$EB40:90 04 BCC $EB46 0x03EB52|$0F:$EB42:C9 0C CMP #$0C 0x03EB54|$0F:$EB44:90 08 BCC $EB4E ; control flow target (from $EB3A, $EB40) 0x03EB56|$0F:$EB46:A9 20 LDA #$20 0x03EB58|$0F:$EB48:D0 02 BNE $EB4C ; control flow target (from $EB34) 0x03EB5A|$0F:$EB4A:A9 24 LDA #$24 ; control flow target (from $EB48) 0x03EB5C|$0F:$EB4C:85 0C STA $0C ; control flow target (from $EB2A, $EB30, $EB44) 0x03EB5E|$0F:$EB4E:A5 1C LDA $1C 0x03EB60|$0F:$EB50:C9 FF CMP #$FF 0x03EB62|$0F:$EB52:D0 07 BNE $EB5B 0x03EB64|$0F:$EB54:A5 0C LDA $0C 0x03EB66|$0F:$EB56:C9 20 CMP #$20 0x03EB68|$0F:$EB58:90 0D BCC $EB67 0x03EB6A|$0F:$EB5A:60 RTS ; control flow target (from $EB52) 0x03EB6B|$0F:$EB5B:C9 FE CMP #$FE 0x03EB6D|$0F:$EB5D:D0 0C BNE $EB6B 0x03EB6F|$0F:$EB5F:A5 0C LDA $0C 0x03EB71|$0F:$EB61:C9 20 CMP #$20 0x03EB73|$0F:$EB63:B0 02 BCS $EB67 0x03EB75|$0F:$EB65:38 SEC 0x03EB76|$0F:$EB66:60 RTS ; control flow target (from $EB58, $EB63) 0x03EB77|$0F:$EB67:A9 00 LDA #$00 0x03EB79|$0F:$EB69:85 1C STA $1C ; control flow target (from $EB5D) 0x03EB7B|$0F:$EB6B:18 CLC 0x03EB7C|$0F:$EB6C:60 RTS ; control flow target (from $E966, $E9BE, $E9D8, $EA97) 0x03EB7D|$0F:$EB6D:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03EB80|$0F:$EB70:A9 FF LDA #$FF 0x03EB82|$0F:$EB72:8D 45 61 STA $6145 0x03EB85|$0F:$EB75:60 RTS ; open menu specified by next byte ; control flow target (from $C750, $C84D, $F6FC) ; external control flow target (from $02:$B29D, $06:$8061, $06:$8065, $06:$8232, $06:$8242, $06:$8374, $06:$83A3, $06:$8455, $06:$84BB, $06:$8540, $06:$855B, $06:$867D, $06:$868D, $06:$8BFC, $06:$8C29, $06:$9584, $06:$95FF, $06:$9ACB, $06:$9AD0, $06:$9B17, $06:$A0CA, $06:$A204, $06:$BB4E, $06:$BB5F, $06:$BBAB, $06:$BBCA, $06:$BC22, $06:$BD4F) 0x03EB86|$0F:$EB76:68 PLA ; low byte of return address 0x03EB87|$0F:$EB77:18 CLC 0x03EB88|$0F:$EB78:69 01 ADC #$01 ; increment it (byte following the JSR is data) 0x03EB8A|$0F:$EB7A:85 0E STA $0E ; store to $0E 0x03EB8C|$0F:$EB7C:68 PLA ; high byte of return address 0x03EB8D|$0F:$EB7D:69 00 ADC #$00 ; add carry from incrementing low byte 0x03EB8F|$0F:$EB7F:85 0F STA $0F ; store to $0F 0x03EB91|$0F:$EB81:48 PHA ; push the new return address's high byte 0x03EB92|$0F:$EB82:A5 0E LDA $0E 0x03EB94|$0F:$EB84:48 PHA ; push the new return address's low byte 0x03EB95|$0F:$EB85:A0 00 LDY #$00 0x03EB97|$0F:$EB87:B1 0E LDA ($0E),Y ; read the byte following the original JSR ; open menu specified by A ; control flow target (from $D188, $F494, $F49B, $F4A2, $F4BE, $F514, $F521, $F526, $F531, $F53F, $F54F, $F565, $F573, $F581, $F58F, $F59D, $F5CF, $F5D8, $F5DC, $F5F0, $F60C, $F620, $F625, $F63F, $F648, $F652, $F657) ; external control flow target (from $04:$9AB1, $04:$9AC4, $06:$A997, $06:$AEAC, $06:$AEB1) 0x03EB99|$0F:$EB89:20 6E F6 JSR $F66E ; do special effects for certain menus; sets A to menu ID 0x03EB9C|$0F:$EB8C:90 03 BCC $EB91 ; all $F66E code paths end with SEC, so this branch is never taken 0x03EB9E|$0F:$EB8E:20 98 EB JSR $EB98 ; control flow target (from $EB8C) 0x03EBA1|$0F:$EB91:48 PHA 0x03EBA2|$0F:$EB92:AD 94 00 LDA $0094 ; return bank for various function calls, doubles as index of selected option for multiple-choice menus 0x03EBA5|$0F:$EB95:4C 82 F7 JMP $F782 ; load bank specified by A then PLA ; control flow target (from $EB8E) 0x03EBA8|$0F:$EB98:85 59 STA $59 ; menu ID 0x03EBAA|$0F:$EB9A:A9 01 LDA #$01 0x03EBAC|$0F:$EB9C:8D B4 60 STA $60B4 ; menu phase (1 = first, 0 = second) 0x03EBAF|$0F:$EB9F:20 A8 EB JSR $EBA8 0x03EBB2|$0F:$EBA2:20 35 F4 JSR $F435 0x03EBB5|$0F:$EBA5:CE B4 60 DEC $60B4 ; menu phase (1 = first, 0 = second) ; control flow target (from $EB9F) 0x03EBB8|$0F:$EBA8:20 B2 EB JSR $EBB2 ; given menu ID in $59, set $55-$56 to start of menu data 0x03EBBB|$0F:$EBAB:20 C5 EB JSR $EBC5 ; parse menu setup header 0x03EBBE|$0F:$EBAE:20 11 EC JSR $EC11 0x03EBC1|$0F:$EBB1:60 RTS ; given menu ID in $59, set $55-$56 to start of menu data ; control flow target (from $EBA8) 0x03EBC2|$0F:$EBB2:A9 20 LDA #$20 ; menu pointer table 0x03EBC4|$0F:$EBB4:20 E2 F3 JSR $F3E2 ; parse bank/pointer indices from A, load desired bank, set $57-$58 to desired pointer value 0x03EBC7|$0F:$EBB7:A5 59 LDA $59 ; menu ID 0x03EBC9|$0F:$EBB9:0A ASL ; 2 bytes per pointer 0x03EBCA|$0F:$EBBA:A8 TAY 0x03EBCB|$0F:$EBBB:B1 57 LDA ($57),Y ; pointer to start of main pointer table, low byte; copy menu pointer to $55-$56 0x03EBCD|$0F:$EBBD:85 55 STA $55 ; pointer to start of sub pointer data, low byte 0x03EBCF|$0F:$EBBF:C8 INY 0x03EBD0|$0F:$EBC0:B1 57 LDA ($57),Y ; pointer to start of main pointer table, low byte 0x03EBD2|$0F:$EBC2:85 56 STA $56 ; pointer to start of sub pointer data, high byte 0x03EBD4|$0F:$EBC4:60 RTS ; parse menu setup header ; control flow target (from $EBAB) 0x03EBD5|$0F:$EBC5:A0 00 LDY #$00 ; start at the start 0x03EBD7|$0F:$EBC7:B1 55 LDA ($55),Y ; pointer to start of sub pointer data, low byte 0x03EBD9|$0F:$EBC9:8D AA 60 STA $60AA ; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped) 0x03EBDC|$0F:$EBCC:C8 INY 0x03EBDD|$0F:$EBCD:B1 55 LDA ($55),Y ; pointer to start of sub pointer data, low byte 0x03EBDF|$0F:$EBCF:8D A2 60 STA $60A2 ; menu window height (from ROM) 0x03EBE2|$0F:$EBD2:0A ASL 0x03EBE3|$0F:$EBD3:8D A3 60 STA $60A3 ; menu window height (ROM value * 2) 0x03EBE6|$0F:$EBD6:C8 INY 0x03EBE7|$0F:$EBD7:B1 55 LDA ($55),Y ; pointer to start of sub pointer data, low byte 0x03EBE9|$0F:$EBD9:8D A1 60 STA $60A1 ; menu window width 0x03EBEC|$0F:$EBDC:C8 INY 0x03EBED|$0F:$EBDD:B1 55 LDA ($55),Y ; pointer to start of sub pointer data, low byte 0x03EBEF|$0F:$EBDF:8D A4 60 STA $60A4 ; menu window position (from ROM; X-pos = low nybble * 2, Y-pos = high nybble * 2) 0x03EBF2|$0F:$EBE2:48 PHA 0x03EBF3|$0F:$EBE3:29 0F AND #$0F 0x03EBF5|$0F:$EBE5:0A ASL 0x03EBF6|$0F:$EBE6:85 4D STA $4D ; menu window X-pos 0x03EBF8|$0F:$EBE8:68 PLA 0x03EBF9|$0F:$EBE9:29 F0 AND #$F0 0x03EBFB|$0F:$EBEB:4A LSR 0x03EBFC|$0F:$EBEC:4A LSR 0x03EBFD|$0F:$EBED:4A LSR 0x03EBFE|$0F:$EBEE:85 4E STA $4E ; menu window Y-pos 0x03EC00|$0F:$EBF0:C8 INY 0x03EC01|$0F:$EBF1:AD AA 60 LDA $60AA ; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped) 0x03EC04|$0F:$EBF4:10 0C BPL $EC02 ; if no cursor, skip ahead 0x03EC06|$0F:$EBF6:B1 55 LDA ($55),Y ; pointer to start of sub pointer data, low byte 0x03EC08|$0F:$EBF8:8D A5 60 STA $60A5 ; menu cursor second column X-offset (from left edge of menu) 0x03EC0B|$0F:$EBFB:C8 INY 0x03EC0C|$0F:$EBFC:B1 55 LDA ($55),Y ; pointer to start of sub pointer data, low byte 0x03EC0E|$0F:$EBFE:8D A9 60 STA $60A9 ; menu cursor initial position (from ROM; X-pos = low nybble, Y-pos = high nybble) 0x03EC11|$0F:$EC01:C8 INY ; control flow target (from $EBF4) 0x03EC12|$0F:$EC02:2C AA 60 BIT $60AA ; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped) 0x03EC15|$0F:$EC05:50 06 BVC $EC0D ; if menu is not linked, skip ahead 0x03EC17|$0F:$EC07:B1 55 LDA ($55),Y ; pointer to start of sub pointer data, low byte 0x03EC19|$0F:$EC09:8D AE 60 STA $60AE ; menu link ID 0x03EC1C|$0F:$EC0C:C8 INY ; control flow target (from $EC05) 0x03EC1D|$0F:$EC0D:8C A6 60 STY $60A6 ; current menu read index 0x03EC20|$0F:$EC10:60 RTS ; control flow target (from $EBAE) 0x03EC21|$0F:$EC11:20 29 EC JSR $EC29 ; initialize menu vars, remove battle item menu link if not enough items ; control flow target (from $EC23, $ECEE) 0x03EC24|$0F:$EC14:20 78 EC JSR $EC78 ; set menu text $609B to [space] or the appropriate border tile 0x03EC27|$0F:$EC17:20 C5 EC JSR $ECC5 ; tweak dynamic list height if necessary, otherwise set menu function index and parameter 0x03EC2A|$0F:$EC1A:20 1C ED JSR $ED1C ; given menu function index in $609C, set $57-$58 to corresponding function address and execute it 0x03EC2D|$0F:$EC1D:20 2B F0 JSR $F02B 0x03EC30|$0F:$EC20:20 57 F0 JSR $F057 ; CLC if more menu rows to display, SEC otherwise 0x03EC33|$0F:$EC23:90 EF BCC $EC14 0x03EC35|$0F:$EC25:20 B7 F0 JSR $F0B7 0x03EC38|$0F:$EC28:60 RTS ; initialize menu vars, remove battle item menu link if not enough items ; control flow target (from $EC11) 0x03EC39|$0F:$EC29:20 C1 F0 JSR $F0C1 ; write [space] to $600B-$6046 0x03EC3C|$0F:$EC2C:A9 FF LDA #$FF 0x03EC3E|$0F:$EC2E:8D B9 60 STA $60B9 0x03EC41|$0F:$EC31:A9 00 LDA #$00 0x03EC43|$0F:$EC33:8D 9E 60 STA $609E ; menu current column 0x03EC46|$0F:$EC36:8D 9F 60 STA $609F ; menu current row 0x03EC49|$0F:$EC39:8D AC 60 STA $60AC ; menu list index 0x03EC4C|$0F:$EC3C:8D AB 60 STA $60AB ; which list segment we're dealing with 0x03EC4F|$0F:$EC3F:8D A8 60 STA $60A8 ; remaining number of rows for dynamic menu lists 0x03EC52|$0F:$EC42:85 10 STA $10 0x03EC54|$0F:$EC44:85 11 STA $11 0x03EC56|$0F:$EC46:85 12 STA $12 0x03EC58|$0F:$EC48:A5 59 LDA $59 ; menu ID 0x03EC5A|$0F:$EC4A:C9 22 CMP #$22 ; Menu ID #$22: Battle menu: item list window 2 0x03EC5C|$0F:$EC4C:D0 05 BNE $EC53 0x03EC5E|$0F:$EC4E:A9 04 LDA #$04 0x03EC60|$0F:$EC50:8D AC 60 STA $60AC ; menu list index ; control flow target (from $EC4C) 0x03EC63|$0F:$EC53:A5 59 LDA $59 ; menu ID 0x03EC65|$0F:$EC55:C9 08 CMP #$08 ; Menu ID #$08: Battle menu: item list window 1 0x03EC67|$0F:$EC57:D0 14 BNE $EC6D 0x03EC69|$0F:$EC59:A9 04 LDA #$04 ; count all items 0x03EC6B|$0F:$EC5B:8D 9D 60 STA $609D ; menu function parameter 0x03EC6E|$0F:$EC5E:20 B7 F1 JSR $F1B7 ; given hero ID in $4A and item type in $609D, set A = number of items of desired type in hero's inventory 0x03EC71|$0F:$EC61:C9 05 CMP #$05 ; max 4 items per screen 0x03EC73|$0F:$EC63:B0 08 BCS $EC6D ; if < 5 items, disable menu link 0x03EC75|$0F:$EC65:AD AA 60 LDA $60AA ; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped) 0x03EC78|$0F:$EC68:29 BF AND #$BF ; clear bit 6 0x03EC7A|$0F:$EC6A:8D AA 60 STA $60AA ; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped) ; control flow target (from $EC57, $EC63) 0x03EC7D|$0F:$EC6D:A9 00 LDA #$00 ; write #$00 to $606B-$607A 0x03EC7F|$0F:$EC6F:A2 0F LDX #$0F ; control flow target (from $EC75) 0x03EC81|$0F:$EC71:9D 6B 60 STA $606B,X 0x03EC84|$0F:$EC74:CA DEX 0x03EC85|$0F:$EC75:10 FA BPL $EC71 0x03EC87|$0F:$EC77:60 RTS ; set menu text $609B to [space] or the appropriate border tile ; control flow target (from $EC14) 0x03EC88|$0F:$EC78:A9 5F LDA #$5F ; [space] 0x03EC8A|$0F:$EC7A:8D 9B 60 STA $609B ; menu text 0x03EC8D|$0F:$EC7D:AE 9E 60 LDX $609E ; menu current column 0x03EC90|$0F:$EC80:F0 1D BEQ $EC9F ; if we're at column 0, branch to figure out what kind of left border to draw 0x03EC92|$0F:$EC82:E8 INX 0x03EC93|$0F:$EC83:EC A1 60 CPX $60A1 ; menu window width 0x03EC96|$0F:$EC86:D0 2E BNE $ECB6 ; if we're not at width - 1, branch over figuring out what kind of right border to draw 0x03EC98|$0F:$EC88:AE 9F 60 LDX $609F ; menu current row 0x03EC9B|$0F:$EC8B:F0 0A BEQ $EC97 ; if we're on row 0, use a [top-right border] 0x03EC9D|$0F:$EC8D:E8 INX 0x03EC9E|$0F:$EC8E:EC A3 60 CPX $60A3 ; menu window height (ROM value * 2) 0x03ECA1|$0F:$EC91:F0 08 BEQ $EC9B ; if we're on the last row, use a [bottom-right border], otherwise we're in between, so use a plain [right border] 0x03ECA3|$0F:$EC93:A9 7B LDA #$7B ; [right border] 0x03ECA5|$0F:$EC95:D0 2A BNE $ECC1 ; control flow target (from $EC8B) 0x03ECA7|$0F:$EC97:A9 7C LDA #$7C ; [top-right border] 0x03ECA9|$0F:$EC99:D0 26 BNE $ECC1 ; control flow target (from $EC91) 0x03ECAB|$0F:$EC9B:A9 7E LDA #$7E ; [bottom-right border] 0x03ECAD|$0F:$EC9D:D0 22 BNE $ECC1 ; control flow target (from $EC80) 0x03ECAF|$0F:$EC9F:AE 9F 60 LDX $609F ; menu current row 0x03ECB2|$0F:$ECA2:F0 0A BEQ $ECAE ; if we're on row 0, use a [top-left border] 0x03ECB4|$0F:$ECA4:E8 INX 0x03ECB5|$0F:$ECA5:EC A3 60 CPX $60A3 ; menu window height (ROM value * 2) 0x03ECB8|$0F:$ECA8:F0 08 BEQ $ECB2 ; if we're on the last row, use a [bottom-left border], otherwise we're in between, so use a plain [left border] 0x03ECBA|$0F:$ECAA:A9 76 LDA #$76 ; [left border] 0x03ECBC|$0F:$ECAC:D0 13 BNE $ECC1 ; control flow target (from $ECA2) 0x03ECBE|$0F:$ECAE:A9 79 LDA #$79 ; [top-left border] 0x03ECC0|$0F:$ECB0:D0 0F BNE $ECC1 ; control flow target (from $ECA8) 0x03ECC2|$0F:$ECB2:A9 7A LDA #$7A ; [bottom-left border] 0x03ECC4|$0F:$ECB4:D0 0B BNE $ECC1 ; control flow target (from $EC86) 0x03ECC6|$0F:$ECB6:AE 9F 60 LDX $609F ; menu current row 0x03ECC9|$0F:$ECB9:E8 INX 0x03ECCA|$0F:$ECBA:EC A3 60 CPX $60A3 ; menu window height (ROM value * 2) 0x03ECCD|$0F:$ECBD:D0 05 BNE $ECC4 ; if we're on the last row, use a [bottom border], otherwise keep that [space] we started with 0x03ECCF|$0F:$ECBF:A9 7D LDA #$7D ; [bottom border] ; control flow target (from $EC95, $EC99, $EC9D, $ECAC, $ECB0, $ECB4) 0x03ECD1|$0F:$ECC1:8D 9B 60 STA $609B ; menu text ; control flow target (from $ECBD) 0x03ECD4|$0F:$ECC4:60 RTS ; tweak dynamic list height if necessary, otherwise set menu function index and parameter ; control flow target (from $EC17) 0x03ECD5|$0F:$ECC5:AD 9B 60 LDA $609B ; menu text 0x03ECD8|$0F:$ECC8:C9 5F CMP #$5F ; [space] 0x03ECDA|$0F:$ECCA:D0 4A BNE $ED16 ; if menu text is not a [space], set menu function index to #$10 (print one byte of menu text) and RTS 0x03ECDC|$0F:$ECCC:AD AA 60 LDA $60AA ; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped) 0x03ECDF|$0F:$ECCF:29 20 AND #$20 ; pick out the single-spaced bit 0x03ECE1|$0F:$ECD1:D0 22 BNE $ECF5 ; read current menu byte and set menu function index and parameter; branch if single-spaced 0x03ECE3|$0F:$ECD3:AD 9F 60 LDA $609F ; menu current row 0x03ECE6|$0F:$ECD6:4A LSR 0x03ECE7|$0F:$ECD7:90 1C BCC $ECF5 ; read current menu byte and set menu function index and parameter; branch if even row 0x03ECE9|$0F:$ECD9:AD A8 60 LDA $60A8 ; remaining number of rows for dynamic menu lists 0x03ECEC|$0F:$ECDC:C9 01 CMP #$01 0x03ECEE|$0F:$ECDE:D0 11 BNE $ECF1 ; set menu function index and parameter to #$00 (i.e. setup for newline function) 0x03ECF0|$0F:$ECE0:A9 00 LDA #$00 ; reset menu current column 0x03ECF2|$0F:$ECE2:8D 9E 60 STA $609E ; menu current column 0x03ECF5|$0F:$ECE5:AE 9F 60 LDX $609F ; menu current row 0x03ECF8|$0F:$ECE8:E8 INX 0x03ECF9|$0F:$ECE9:8E A3 60 STX $60A3 ; menu window height (ROM value * 2) 0x03ECFC|$0F:$ECEC:68 PLA ; skip over the next few menu processing functions 0x03ECFD|$0F:$ECED:68 PLA 0x03ECFE|$0F:$ECEE:4C 14 EC JMP $EC14 ; set menu function index and parameter to #$00 (i.e. setup for newline function) ; control flow target (from $ECDE) 0x03ED01|$0F:$ECF1:A9 00 LDA #$00 0x03ED03|$0F:$ECF3:F0 0E BEQ $ED03 ; split A into menu function index and parameter and save them ; read current menu byte and set menu function index and parameter ; control flow target (from $ECD1, $ECD7) 0x03ED05|$0F:$ECF5:AC A6 60 LDY $60A6 ; current menu read index 0x03ED08|$0F:$ECF8:EE A6 60 INC $60A6 ; current menu read index 0x03ED0B|$0F:$ECFB:20 FA FE JSR $FEFA ; increment JSR's return address, read byte following JSR, parse it for bank and pointer index, set $D6-$D7 to $8000,X-$8001,X in selected bank ; code -> data ; indirect data load target 0x03ED0E|$0F:$ECFE:20 ; $01:$8000; -> $01:$B642: menu pointer table ; data -> code 0x03ED0F|$0F:$ECFF:B1 55 LDA ($55),Y ; pointer to start of sub pointer data, low byte 0x03ED11|$0F:$ED01:10 10 BPL $ED13 ; high bit determines whether byte is function (set) or text (clear) ; split A into menu function index and parameter and save them ; control flow target (from $ECF3) 0x03ED13|$0F:$ED03:29 7F AND #$7F ; clear function bit 0x03ED15|$0F:$ED05:48 PHA 0x03ED16|$0F:$ED06:29 07 AND #$07 ; menu function parameter is 3 bits wide 0x03ED18|$0F:$ED08:8D 9D 60 STA $609D ; menu function parameter 0x03ED1B|$0F:$ED0B:68 PLA 0x03ED1C|$0F:$ED0C:4A LSR ; menu function index is 4 bits wide 0x03ED1D|$0F:$ED0D:4A LSR 0x03ED1E|$0F:$ED0E:4A LSR 0x03ED1F|$0F:$ED0F:8D 9C 60 STA $609C ; menu function index 0x03ED22|$0F:$ED12:60 RTS ; control flow target (from $ED01) 0x03ED23|$0F:$ED13:8D 9B 60 STA $609B ; menu text ; control flow target (from $ECCA) 0x03ED26|$0F:$ED16:A9 10 LDA #$10 0x03ED28|$0F:$ED18:8D 9C 60 STA $609C ; menu function index 0x03ED2B|$0F:$ED1B:60 RTS ; given menu function index in $609C, set $57-$58 to corresponding function address and execute it ; control flow target (from $EC1A) 0x03ED2C|$0F:$ED1C:AD 9C 60 LDA $609C ; menu function index 0x03ED2F|$0F:$ED1F:0A ASL 0x03ED30|$0F:$ED20:AA TAX 0x03ED31|$0F:$ED21:BD CC F0 LDA $F0CC,X ; menu control code jump table low byte 0x03ED34|$0F:$ED24:85 57 STA $57 ; pointer to start of main pointer table, low byte 0x03ED36|$0F:$ED26:BD CD F0 LDA $F0CD,X ; menu control code jump table high byte 0x03ED39|$0F:$ED29:85 58 STA $58 ; pointer to start of main pointer table, high byte 0x03ED3B|$0F:$ED2B:6C 57 00 JMP ($0057) ; pointer to start of main pointer table, low byte ; menu control code #$80-#$87 handler: print number of spaces specified by $609D (or rest of line if $609D is #$00) to current menu position ; control flow target (from $EF8A) ; indirect control flow target (via $F0CC) 0x03ED3E|$0F:$ED2E:A9 5F LDA #$5F ; Tile ID #$5F: [space] 0x03ED40|$0F:$ED30:8D 9B 60 STA $609B ; menu text 0x03ED43|$0F:$ED33:20 5E F0 JSR $F05E ; set $60A0 based on menu function parameter $609D and number of remaining tiles in the current line ; control flow target (from $ED3C) 0x03ED46|$0F:$ED36:20 13 F0 JSR $F013 ; update menu current column and row 0x03ED49|$0F:$ED39:CE A0 60 DEC $60A0 ; maximum string length 0x03ED4C|$0F:$ED3C:D0 F8 BNE $ED36 ; if more tiles to print, print them 0x03ED4E|$0F:$ED3E:60 RTS ; menu control code #$88-#$8F handler: print number of top border tiles specified by $609D (or rest of line if $609D is #$00) to current menu position, accounting for possible linked menu ; indirect control flow target (via $F0CE) 0x03ED4F|$0F:$ED3F:2C AA 60 BIT $60AA ; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped) 0x03ED52|$0F:$ED42:50 10 BVC $ED54 ; if not linked, skip ahead 0x03ED54|$0F:$ED44:A9 5F LDA #$5F ; Tile ID #$5F: [space] 0x03ED56|$0F:$ED46:8D 9B 60 STA $609B ; menu text 0x03ED59|$0F:$ED49:20 E4 EF JSR $EFE4 ; print one byte of menu text 0x03ED5C|$0F:$ED4C:A9 63 LDA #$63 ; Tile ID #$63: [right arrow] 0x03ED5E|$0F:$ED4E:8D 9B 60 STA $609B ; menu text 0x03ED61|$0F:$ED51:20 E4 EF JSR $EFE4 ; print one byte of menu text ; control flow target (from $ED42) 0x03ED64|$0F:$ED54:A9 77 LDA #$77 ; Tile ID #$77: [top border] 0x03ED66|$0F:$ED56:8D 9B 60 STA $609B ; menu text 0x03ED69|$0F:$ED59:20 5E F0 JSR $F05E ; set $60A0 based on menu function parameter $609D and number of remaining tiles in the current line ; control flow target (from $ED62) 0x03ED6C|$0F:$ED5C:20 E4 EF JSR $EFE4 ; print one byte of menu text 0x03ED6F|$0F:$ED5F:CE A0 60 DEC $60A0 ; maximum string length 0x03ED72|$0F:$ED62:D0 F8 BNE $ED5C ; if more tiles to print, print them 0x03ED74|$0F:$ED64:60 RTS ; menu control code #$90-#$97 handler: print selected hero's current HP or MP ; indirect control flow target (via $F0D0) 0x03ED75|$0F:$ED65:A9 03 LDA #$03 0x03ED77|$0F:$ED67:20 7A F0 JSR $F07A ; set maximum string length $60A0 to A and update menu function parameter $609D: if its bits 0-1 are both set, use $4A | bit 2 of $609D, else use the low 3 bits of $609D 0x03ED7A|$0F:$ED6A:A2 0E LDX #$0E ; offset for current HP 0x03ED7C|$0F:$ED6C:AD 9D 60 LDA $609D ; menu function parameter 0x03ED7F|$0F:$ED6F:29 04 AND #$04 ; MP control codes set bit 2 0x03ED81|$0F:$ED71:F0 02 BEQ $ED75 0x03ED83|$0F:$ED73:A2 10 LDX #$10 ; offset for current MP ; control flow target (from $ED71) 0x03ED85|$0F:$ED75:A0 01 LDY #$01 ; print one byte (ignores 2nd byte of current HP) 0x03ED87|$0F:$ED77:4C 96 F0 JMP $F096 ; given hero ID in ID $609D, stat offset in X, and stat byte size in Y (max of #$03), print that stat in base 10 to current menu position, replacing leading zeroes with spaces ; menu control code #$98-#$9F handler: print party gold or crests or "ADVENTURE LOG" ; indirect control flow target (via $F0D2) 0x03ED8A|$0F:$ED7A:A9 05 LDA #$05 ; start by assuming crests 0x03ED8C|$0F:$ED7C:8D A0 60 STA $60A0 ; maximum string length 0x03ED8F|$0F:$ED7F:AD 9D 60 LDA $609D ; menu function parameter 0x03ED92|$0F:$ED82:F0 23 BEQ $EDA7 ; menu control code #$98 handler: print party gold 0x03ED94|$0F:$ED84:C9 01 CMP #$01 0x03ED96|$0F:$ED86:D0 25 BNE $EDAD ; menu control code #$9A-#$9F handler: print "ADVENTURE LOG" ; menu control code #$99 handler: print obtained crests 0x03ED98|$0F:$ED88:20 9F F1 JSR $F19F ; initialize string buffer $0100-$010C with [space]s 0x03ED9B|$0F:$ED8B:AD 12 01 LDA $0112 ; Crests found bit field (#$10 = Life, #$80 = Water, #$04 = Moon, #$02 = Stars, #$01 = Sun) 0x03ED9E|$0F:$ED8E:29 1F AND #$1F ; pretty sure nothing writes to the high 3 bits, but better safe than sorry 0x03EDA0|$0F:$ED90:85 10 STA $10 ; crests found 0x03EDA2|$0F:$ED92:A2 04 LDX #$04 ; maximum of 5 crests 0x03EDA4|$0F:$ED94:A0 5A LDY #$5A ; Tile ID #$5A: [sun] ; control flow target (from $EDA2) 0x03EDA6|$0F:$ED96:46 10 LSR $10 ; shift crest bit into C 0x03EDA8|$0F:$ED98:90 05 BCC $ED9F ; branch if crest not found 0x03EDAA|$0F:$ED9A:98 TYA 0x03EDAB|$0F:$ED9B:9D 00 01 STA $0100,X ; string copy buffer start (often referenced as $00FF,X) 0x03EDAE|$0F:$ED9E:CA DEX ; control flow target (from $ED98) 0x03EDAF|$0F:$ED9F:C8 INY ; crest tile ID 0x03EDB0|$0F:$EDA0:A5 10 LDA $10 ; remaining crests 0x03EDB2|$0F:$EDA2:D0 F2 BNE $ED96 ; if more crests to copy, copy them 0x03EDB4|$0F:$EDA4:4C A5 F0 JMP $F0A5 ; print string at $0100 in reverse to current menu position ; menu control code #$98 handler: print party gold ; control flow target (from $ED82) 0x03EDB7|$0F:$EDA7:20 79 F4 JSR $F479 ; print party gold to $0100 in decimal in reverse, replacing leading (now trailing) zeroes with spaces, leaving X at most significant digit 0x03EDBA|$0F:$EDAA:4C A5 F0 JMP $F0A5 ; print string at $0100 in reverse to current menu position ; menu control code #$9A-#$9F handler: print "ADVENTURE LOG" ; 9B-9F are unused ; control flow target (from $ED86) 0x03EDBD|$0F:$EDAD:A9 0D LDA #$0D ; length of "ADVENTRUE LOG" 0x03EDBF|$0F:$EDAF:8D A0 60 STA $60A0 ; maximum string length 0x03EDC2|$0F:$EDB2:AA TAX ; control flow target (from $EDBA) 0x03EDC3|$0F:$EDB3:BD BE ED LDA $EDBE,X ; built-in offset from $EDBF: "GOL ERUTNEVDA", i.e. "ADVENTRUE LOG" backwards 0x03EDC6|$0F:$EDB6:9D FF 00 STA $00FF,X ; built-in offset from string copy buffer start at $0100 0x03EDC9|$0F:$EDB9:CA DEX 0x03EDCA|$0F:$EDBA:D0 F7 BNE $EDB3 0x03EDCC|$0F:$EDBC:4C A5 ; built-in offset from $EDBF: "GOL ERUTNEVDA", i.e. "ADVENTRUE LOG" backwards ; indexed data load target (from $EDB3) 0x03EDCE|$0F:$EDBE: F0 JMP $F0A5 ; print string at $0100 in reverse to current menu position ; code -> data ; "GOL ERUTNEVDA", i.e. "ADVENTRUE LOG" backwards 0x03EDCF|$0F:$EDBF:2A 32 2F 5F 28 35 38 37 31 28 39 27 24 ; data -> code ; menu control code #$A0-#$A7 handler: print level of selected hero or Midenhall's level in current save file ; indirect control flow target (via $F0D4) 0x03EDDC|$0F:$EDCC:AD 9D 60 LDA $609D ; menu function parameter 0x03EDDF|$0F:$EDCF:C9 04 CMP #$04 0x03EDE1|$0F:$EDD1:F0 2E BEQ $EE01 ; menu control code #$A4 handler: print Midenhall's level in current save file 0x03EDE3|$0F:$EDD3:A9 02 LDA #$02 0x03EDE5|$0F:$EDD5:20 7A F0 JSR $F07A ; set maximum string length $60A0 to A and update menu function parameter $609D: if its bits 0-1 are both set, use $4A | bit 2 of $609D, else use the low 3 bits of $609D 0x03EDE8|$0F:$EDD8:A2 00 LDX #$00 ; offset for hero status 0x03EDEA|$0F:$EDDA:A0 01 LDY #$01 ; which is one byte long 0x03EDEC|$0F:$EDDC:20 4A F1 JSR $F14A ; given stat offset in X and stat byte size in Y (max of #$03), copy that many bytes of hero ID $609D's stats to $10-$12 0x03EDEF|$0F:$EDDF:A5 10 LDA $10 ; hero status 0x03EDF1|$0F:$EDE1:10 0B BPL $EDEE ; dead hero 0x03EDF3|$0F:$EDE3:29 20 AND #$20 ; pick out the poison bit 0x03EDF5|$0F:$EDE5:D0 0D BNE $EDF4 ; poisoned hero 0x03EDF7|$0F:$EDE7:A2 11 LDX #$11 ; offset for level 0x03EDF9|$0F:$EDE9:A0 01 LDY #$01 ; which is one byte long 0x03EDFB|$0F:$EDEB:4C 96 F0 JMP $F096 ; given hero ID in ID $609D, stat offset in X, and stat byte size in Y (max of #$03), print that stat in base 10 to current menu position, replacing leading zeroes with spaces ; dead hero ; control flow target (from $EDE1) 0x03EDFE|$0F:$EDEE:A9 27 LDA #$27 ; Tile ID #$27: D 0x03EE00|$0F:$EDF0:A2 28 LDX #$28 ; Tile ID #$28: E 0x03EE02|$0F:$EDF2:D0 04 BNE $EDF8 ; poisoned hero ; control flow target (from $EDE5) 0x03EE04|$0F:$EDF4:A9 33 LDA #$33 ; Tile ID #$33: P 0x03EE06|$0F:$EDF6:A2 32 LDX #$32 ; Tile ID #$32: O ; control flow target (from $EDF2) 0x03EE08|$0F:$EDF8:8D 01 01 STA $0101 0x03EE0B|$0F:$EDFB:8E 00 01 STX $0100 ; string copy buffer start (often referenced as $00FF,X) 0x03EE0E|$0F:$EDFE:4C A5 F0 JMP $F0A5 ; print string at $0100 in reverse to current menu position ; menu control code #$A4 handler: print Midenhall's level in current save file ; control flow target (from $EDD1) 0x03EE11|$0F:$EE01:A9 02 LDA #$02 0x03EE13|$0F:$EE03:8D A0 60 STA $60A0 ; maximum string length 0x03EE16|$0F:$EE06:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03EE19|$0F:$EE09:C6 ; $06:$800C; -> $06:$A8AA: given current game save slot in $75DB, return Midenhall's level in that save game in A/$0E ; data -> code 0x03EE1A|$0F:$EE0A:A5 0E LDA $0E ; useless op 0x03EE1C|$0F:$EE0C:85 10 STA $10 0x03EE1E|$0F:$EE0E:A9 00 LDA #$00 0x03EE20|$0F:$EE10:85 11 STA $11 ; this is either useless if we're relying on $11 still being #$00 from the earlier call to $EC29 or a bug since we aren't setting $12 0x03EE22|$0F:$EE12:20 9F F0 JSR $F09F ; given a 24-bit number N in $10-$12, print its base 10 digits in reverse to $0100 up to maximum string length $60A0, replacing leading (trailing in reverse) zeroes with spaces 0x03EE25|$0F:$EE15:4C A5 F0 JMP $F0A5 ; print string at $0100 in reverse to current menu position ; menu control code #$A8-#$AF handler: print selected hero's current EXP ; indirect control flow target (via $F0D6) 0x03EE28|$0F:$EE18:A9 07 LDA #$07 0x03EE2A|$0F:$EE1A:20 7A F0 JSR $F07A ; set maximum string length $60A0 to A and update menu function parameter $609D: if its bits 0-1 are both set, use $4A | bit 2 of $609D, else use the low 3 bits of $609D 0x03EE2D|$0F:$EE1D:A2 06 LDX #$06 ; offset for current EXP 0x03EE2F|$0F:$EE1F:A0 03 LDY #$03 ; which is 3 bytes long 0x03EE31|$0F:$EE21:4C 96 F0 JMP $F096 ; given hero ID in ID $609D, stat offset in X, and stat byte size in Y (max of #$03), print that stat in base 10 to current menu position, replacing leading zeroes with spaces ; menu control code #$B0-#$B7 handler: print selected hero's short name, current hero's full name, or Midenhall's short name from selected save game ; indirect control flow target (via $F0D8) 0x03EE34|$0F:$EE24:AD 9D 60 LDA $609D ; menu function parameter 0x03EE37|$0F:$EE27:C9 04 CMP #$04 0x03EE39|$0F:$EE29:F0 22 BEQ $EE4D ; menu control code #$B4 handler: print current hero's full name 0x03EE3B|$0F:$EE2B:C9 05 CMP #$05 0x03EE3D|$0F:$EE2D:B0 41 BCS $EE70 ; menu control code #$B5-#$B7 handler: print short save name ; menu control code #$B0-#$B3 handler: print short name of hero ID in $609D ; control flow target (from $EE52) 0x03EE3F|$0F:$EE2F:A9 04 LDA #$04 0x03EE41|$0F:$EE31:20 7A F0 JSR $F07A ; set maximum string length $60A0 to A and update menu function parameter $609D: if its bits 0-1 are both set, use $4A | bit 2 of $609D, else use the low 3 bits of $609D; for #$B3, set hero ID = $4A 0x03EE44|$0F:$EE34:AD 9D 60 LDA $609D ; menu function parameter 0x03EE47|$0F:$EE37:0A ASL 0x03EE48|$0F:$EE38:0A ASL 0x03EE49|$0F:$EE39:6D 9D 60 ADC $609D ; menu function parameter; A = hero ID * 5 0x03EE4C|$0F:$EE3C:AA TAX 0x03EE4D|$0F:$EE3D:AC A0 60 LDY $60A0 ; maximum string length ; control flow target (from $EE48) 0x03EE50|$0F:$EE40:BD 13 01 LDA $0113,X ; Midenhall name bytes 0-3 + terminator 0x03EE53|$0F:$EE43:99 FF 00 STA $00FF,Y ; built-in offset from string copy buffer start at $0100 0x03EE56|$0F:$EE46:E8 INX ; read index 0x03EE57|$0F:$EE47:88 DEY ; write index 0x03EE58|$0F:$EE48:D0 F6 BNE $EE40 ; if more tiles to print, print them 0x03EE5A|$0F:$EE4A:4C A5 F0 JMP $F0A5 ; print string at $0100 in reverse to current menu position ; menu control code #$B4 handler: print current hero's full name ; control flow target (from $EE29) 0x03EE5D|$0F:$EE4D:A9 03 LDA #$03 ; start by printing selected hero's short name 0x03EE5F|$0F:$EE4F:8D 9D 60 STA $609D ; menu function parameter 0x03EE62|$0F:$EE52:20 2F EE JSR $EE2F ; menu control code #$B0-#$B3 handler: print short name of hero ID in $609D 0x03EE65|$0F:$EE55:A9 04 LDA #$04 0x03EE67|$0F:$EE57:8D A0 60 STA $60A0 ; maximum string length 0x03EE6A|$0F:$EE5A:AD 9D 60 LDA $609D ; menu function parameter 0x03EE6D|$0F:$EE5D:0A ASL 0x03EE6E|$0F:$EE5E:0A ASL 0x03EE6F|$0F:$EE5F:AA TAX ; A = hero ID * 4 0x03EE70|$0F:$EE60:AC A0 60 LDY $60A0 ; maximum string length ; control flow target (from $EE6B) 0x03EE73|$0F:$EE63:BD 86 01 LDA $0186,X ; Midenhall name bytes 4-7 0x03EE76|$0F:$EE66:99 FF 00 STA $00FF,Y ; built-in offset from string copy buffer start at $0100 0x03EE79|$0F:$EE69:E8 INX ; read index 0x03EE7A|$0F:$EE6A:88 DEY ; write index 0x03EE7B|$0F:$EE6B:D0 F6 BNE $EE63 ; if more tiles to print, print them 0x03EE7D|$0F:$EE6D:4C A5 F0 JMP $F0A5 ; print string at $0100 in reverse to current menu position ; menu control code #$B5-#$B7 handler: print short save name ; control flow target (from $EE2D) 0x03EE80|$0F:$EE70:A9 04 LDA #$04 0x03EE82|$0F:$EE72:8D A0 60 STA $60A0 ; maximum string length 0x03EE85|$0F:$EE75:AD 9D 60 LDA $609D ; menu function parameter 0x03EE88|$0F:$EE78:38 SEC 0x03EE89|$0F:$EE79:E9 05 SBC #$05 ; #$05-#$07 -> #$00-#$02 0x03EE8B|$0F:$EE7B:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03EE8E|$0F:$EE7E:CE ; $06:$801C; -> $06:$A88F: copy Midenhall's short name from save slot in A to $0100 in reverse ; data -> code 0x03EE8F|$0F:$EE7F:4C A5 F0 JMP $F0A5 ; print string at $0100 in reverse to current menu position ; menu control code #$B8-#$BF handler: print various item names based on menu format ; indirect control flow target (via $F0DA) 0x03EE92|$0F:$EE82:A9 0D LDA #$0D 0x03EE94|$0F:$EE84:8D A0 60 STA $60A0 ; maximum string length 0x03EE97|$0F:$EE87:AD AA 60 LDA $60AA ; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped) 0x03EE9A|$0F:$EE8A:29 02 AND #$02 0x03EE9C|$0F:$EE8C:F0 05 BEQ $EE93 ; if this menu only displays equipped items (i.e. it's Menu ID #$1C: Main menu: status screen equipped items), set menu list index $60AC = #$00 0x03EE9E|$0F:$EE8E:A9 00 LDA #$00 0x03EEA0|$0F:$EE90:8D AC 60 STA $60AC ; menu list index ; control flow target (from $EE8C) 0x03EEA3|$0F:$EE93:AD 9D 60 LDA $609D ; menu function parameter 0x03EEA6|$0F:$EE96:C9 05 CMP #$05 0x03EEA8|$0F:$EE98:B0 0C BCS $EEA6 ; menu control code #$BD-#$BF handler: given shop ID in $60AF and menu list index in $60AC, print name of the corresponding item ID or #$00 if it's the Jailor's Key to $0100; depending on settings, possibly update menu's [left border] to [left border, equipped], then toggle list segment $60AB; if list segment becomes #$01, INC menu list index $60AC 0x03EEAA|$0F:$EE9A:20 19 F2 JSR $F219 ; return the $60AC'th item of item type $609D in A and the party inventory index of that item in X, or #$00 in A and #$FF in X if no such item exists; also sets $60BA,X to #$FF if found and #$00 otherwise 0x03EEAD|$0F:$EE9D:20 9D F2 JSR $F29D ; given party inventory offset in X, print name of that item ID to $0100 in reverse; depending on settings, possibly update menu's [left border] to [left border, equipped] ; print string at $0100 in reverse to current menu position and toggle list segment $60AB; if list segment becomes #$01, INC menu list index $60AC ; control flow target (from $EEAC) 0x03EEB0|$0F:$EEA0:20 A5 F0 JSR $F0A5 ; print string at $0100 in reverse to current menu position 0x03EEB3|$0F:$EEA3:4C 21 F3 JMP $F321 ; toggle list segment $60AB; if list segment becomes #$01, INC menu list index $60AC ; menu control code #$BD-#$BF handler: given shop ID in $60AF and menu list index in $60AC, print name of the corresponding item ID or #$00 if it's the Jailor's Key to $0100; depending on settings, possibly update menu's [left border] to [left border, equipped], then toggle list segment $60AB; if list segment becomes #$01, INC menu list index $60AC ; control flow target (from $EE98) 0x03EEB6|$0F:$EEA6:20 7F F2 JSR $F27F ; given shop ID in $60AF and menu list index in $60AC, set A to the corresponding item ID or #$00 if it's the Jailor's Key 0x03EEB9|$0F:$EEA9:20 A7 F2 JSR $F2A7 ; print name of item ID in A to $0100 in reverse; depending on settings, possibly update menu's [left border] to [left border, equipped] 0x03EEBC|$0F:$EEAC:4C A0 EE JMP $EEA0 ; print string at $0100 in reverse to current menu position and toggle list segment $60AB; if list segment becomes #$01, INC menu list index $60AC ; menu control code #$C0-#$C7 handler: draw spell name stuff ; indirect control flow target (via $F0DC) 0x03EEBF|$0F:$EEAF:A9 09 LDA #$09 0x03EEC1|$0F:$EEB1:8D A0 60 STA $60A0 ; maximum string length 0x03EEC4|$0F:$EEB4:20 35 F3 JSR $F335 0x03EEC7|$0F:$EEB7:20 9F F3 JSR $F39F ; given spell name index in A, print spell name to $0100 in reverse, set Y to length of string copied, then load bank specified by $60D7 (set by last call to $F3E2) 0x03EECA|$0F:$EEBA:20 A5 F0 JSR $F0A5 ; print string at $0100 in reverse to current menu position 0x03EECD|$0F:$EEBD:EE AC 60 INC $60AC ; menu list index 0x03EED0|$0F:$EEC0:60 RTS ; menu control code #$C8-#$CF handler: draw item price stuff ; indirect control flow target (via $F0DE) 0x03EED1|$0F:$EEC1:20 9F F1 JSR $F19F ; initialize string buffer $0100-$010C with [space]s 0x03EED4|$0F:$EEC4:A9 05 LDA #$05 0x03EED6|$0F:$EEC6:8D A0 60 STA $60A0 ; maximum string length 0x03EED9|$0F:$EEC9:20 61 F7 JSR $F761 ; load ROM bank #$06 0x03EEDC|$0F:$EECC:AD AD 60 LDA $60AD ; item ID 0x03EEDF|$0F:$EECF:F0 13 BEQ $EEE4 0x03EEE1|$0F:$EED1:0A ASL 0x03EEE2|$0F:$EED2:AA TAX 0x03EEE3|$0F:$EED3:BD FC 9F LDA $9FFC,X ; Item Prices, low byte 0x03EEE6|$0F:$EED6:85 10 STA $10 0x03EEE8|$0F:$EED8:BD FD 9F LDA $9FFD,X ; Item Prices, high byte 0x03EEEB|$0F:$EEDB:85 11 STA $11 0x03EEED|$0F:$EEDD:A9 00 LDA #$00 0x03EEEF|$0F:$EEDF:85 12 STA $12 0x03EEF1|$0F:$EEE1:20 9F F0 JSR $F09F ; given a 24-bit number N in $10-$12, print its base 10 digits in reverse to $0100 up to maximum string length $60A0, replacing leading (trailing in reverse) zeroes with spaces ; control flow target (from $EECF) 0x03EEF4|$0F:$EEE4:4C A5 F0 JMP $F0A5 ; print string at $0100 in reverse to current menu position ; menu control code #$D0-#$D7 handler: start lists ; indirect control flow target (via $F0E0) 0x03EEF7|$0F:$EEE7:AD 9D 60 LDA $609D ; menu function parameter 0x03EEFA|$0F:$EEEA:C9 06 CMP #$06 0x03EEFC|$0F:$EEEC:F0 25 BEQ $EF13 ; menu control code #$D6 handler: start field spell list 0x03EEFE|$0F:$EEEE:C9 07 CMP #$07 0x03EF00|$0F:$EEF0:F0 33 BEQ $EF25 ; menu control code #$D7 handler: start monster list 0x03EF02|$0F:$EEF2:C9 05 CMP #$05 0x03EF04|$0F:$EEF4:D0 06 BNE $EEFC ; menu control code #$D0-#$D4 handler: start item lists ; menu control code #$D5 handler: start shop item list 0x03EF06|$0F:$EEF6:20 55 F2 JSR $F255 ; given shop ID in $60AF and menu list index in $60AC, set A to the corresponding item ID and X to the number of items in the shop 0x03EF09|$0F:$EEF9:8A TXA 0x03EF0A|$0F:$EEFA:D0 0D BNE $EF09 ; set remaining number of rows for dynamic menu lists to A, set menu read index for start of repeating lists to current menu read index ; menu control code #$D0-#$D4 handler: start item lists ; control flow target (from $EEF4) 0x03EF0C|$0F:$EEFC:A9 00 LDA #$00 0x03EF0E|$0F:$EEFE:8D AC 60 STA $60AC ; menu list index 0x03EF11|$0F:$EF01:A9 00 LDA #$00 0x03EF13|$0F:$EF03:8D AB 60 STA $60AB ; which list segment we're dealing with 0x03EF16|$0F:$EF06:20 B7 F1 JSR $F1B7 ; given hero ID in $4A and item type in $609D, set A = number of items of desired type in hero's inventory ; set remaining number of rows for dynamic menu lists to A, set menu read index for start of repeating lists to current menu read index ; control flow target (from $EEFA, $EF22, $EF34) 0x03EF19|$0F:$EF09:8D A8 60 STA $60A8 ; remaining number of rows for dynamic menu lists 0x03EF1C|$0F:$EF0C:AD A6 60 LDA $60A6 ; current menu read index 0x03EF1F|$0F:$EF0F:8D A7 60 STA $60A7 ; menu read index for start of repeating lists 0x03EF22|$0F:$EF12:60 RTS ; menu control code #$D6 handler: start field spell list ; control flow target (from $EEEC) 0x03EF23|$0F:$EF13:A0 00 LDY #$00 ; number of learned spells 0x03EF25|$0F:$EF15:A6 4A LDX $4A ; hero ID 0x03EF27|$0F:$EF17:BD 1A 06 LDA $061A,X ; Cannock's learned field spell list ; control flow target (from $EF1F) 0x03EF2A|$0F:$EF1A:0A ASL 0x03EF2B|$0F:$EF1B:90 02 BCC $EF1F ; branch if spell not learned 0x03EF2D|$0F:$EF1D:C8 INY ; number of learned spells 0x03EF2E|$0F:$EF1E:AA TAX ; set Z (updated by INY) back to A ; control flow target (from $EF1B) 0x03EF2F|$0F:$EF1F:D0 F9 BNE $EF1A 0x03EF31|$0F:$EF21:98 TYA ; number of learned spells 0x03EF32|$0F:$EF22:4C 09 EF JMP $EF09 ; set remaining number of rows for dynamic menu lists to A, set menu read index for start of repeating lists to current menu read index ; menu control code #$D7 handler: start monster list ; control flow target (from $EEF0) 0x03EF35|$0F:$EF25:A2 00 LDX #$00 ; number of monster groups ; control flow target (from $EF30) 0x03EF37|$0F:$EF27:BD 1C 06 LDA $061C,X ; monster group 1 monster ID 0x03EF3A|$0F:$EF2A:F0 06 BEQ $EF32 0x03EF3C|$0F:$EF2C:E8 INX ; this part of monster group data is 2 bytes each 0x03EF3D|$0F:$EF2D:E8 INX 0x03EF3E|$0F:$EF2E:E0 08 CPX #$08 ; maximum 4 groups * 2 bytes each = 8 bytes 0x03EF40|$0F:$EF30:D0 F5 BNE $EF27 ; control flow target (from $EF2A) 0x03EF42|$0F:$EF32:8A TXA 0x03EF43|$0F:$EF33:4A LSR ; 2 bytes per group, so divide by 2 0x03EF44|$0F:$EF34:4C 09 EF JMP $EF09 ; set remaining number of rows for dynamic menu lists to A, set menu read index for start of repeating lists to current menu read index ; menu control code #$E8-#$EF handler: repeat/end list and full save name handlers ; indirect control flow target (via $F0E6) 0x03EF47|$0F:$EF37:AD 9D 60 LDA $609D ; menu function parameter 0x03EF4A|$0F:$EF3A:C9 02 CMP #$02 0x03EF4C|$0F:$EF3C:F0 15 BEQ $EF53 ; menu control code #$EA handler: print Midenhall's full name from save slot in $75DB 0x03EF4E|$0F:$EF3E:29 03 AND #$03 0x03EF50|$0F:$EF40:D0 1D BNE $EF5F ; menu control code #$E9 handler: end current repeating list ; menu control code #$E8 handler: update remaining number of rows for dynamic menu lists, reset current menu read index if applicable 0x03EF52|$0F:$EF42:AD A8 60 LDA $60A8 ; remaining number of rows for dynamic menu lists 0x03EF55|$0F:$EF45:F0 0B BEQ $EF52 0x03EF57|$0F:$EF47:CE A8 60 DEC $60A8 ; remaining number of rows for dynamic menu lists 0x03EF5A|$0F:$EF4A:F0 06 BEQ $EF52 0x03EF5C|$0F:$EF4C:AD A7 60 LDA $60A7 ; menu read index for start of repeating lists 0x03EF5F|$0F:$EF4F:8D A6 60 STA $60A6 ; current menu read index ; control flow target (from $EF45, $EF4A) 0x03EF62|$0F:$EF52:60 RTS ; menu control code #$EA handler: print Midenhall's full name from save slot in $75DB ; control flow target (from $EF3C) 0x03EF63|$0F:$EF53:A9 08 LDA #$08 0x03EF65|$0F:$EF55:8D A0 60 STA $60A0 ; maximum string length 0x03EF68|$0F:$EF58:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03EF6B|$0F:$EF5B:C5 ; $06:$800A; -> $06:$A896: copy Midenhall's full name from save slot in $75DB to $0100 in reverse ; data -> code 0x03EF6C|$0F:$EF5C:4C A5 F0 JMP $F0A5 ; print string at $0100 in reverse to current menu position ; menu control code #$E9 handler: end current repeating list ; control flow target (from $EF40) 0x03EF6F|$0F:$EF5F:A9 00 LDA #$00 0x03EF71|$0F:$EF61:8D 9E 60 STA $609E ; menu current column 0x03EF74|$0F:$EF64:8D 9D 60 STA $609D ; menu function parameter 0x03EF77|$0F:$EF67:AD 9F 60 LDA $609F ; menu current row 0x03EF7A|$0F:$EF6A:29 01 AND #$01 0x03EF7C|$0F:$EF6C:49 01 EOR #$01 0x03EF7E|$0F:$EF6E:18 CLC 0x03EF7F|$0F:$EF6F:69 01 ADC #$01 0x03EF81|$0F:$EF71:6D 9F 60 ADC $609F ; menu current row 0x03EF84|$0F:$EF74:8D A3 60 STA $60A3 ; menu window height (ROM value * 2); height = number of rows + 1 if odd, + 2 if even 0x03EF87|$0F:$EF77:4A LSR 0x03EF88|$0F:$EF78:8D A2 60 STA $60A2 ; menu window height (from ROM) 0x03EF8B|$0F:$EF7B:AD 9F 60 LDA $609F ; menu current row 0x03EF8E|$0F:$EF7E:29 01 AND #$01 0x03EF90|$0F:$EF80:D0 0B BNE $EF8D 0x03EF92|$0F:$EF82:A9 76 LDA #$76 ; Tile ID #$76: [left border] 0x03EF94|$0F:$EF84:8D 9B 60 STA $609B ; menu text 0x03EF97|$0F:$EF87:20 E4 EF JSR $EFE4 ; print one byte of menu text 0x03EF9A|$0F:$EF8A:4C 2E ED JMP $ED2E ; menu control code #$80-#$87 handler: print number of spaces specified by $609D (or rest of line if $609D is #$00) to current menu position ; control flow target (from $EF80) 0x03EF9D|$0F:$EF8D:60 RTS ; menu control code #$D8-#$DF handler: print selected stat ; indirect control flow target (via $F0E2) 0x03EF9E|$0F:$EF8E:AE 9D 60 LDX $609D ; menu function parameter 0x03EFA1|$0F:$EF91:BD EE F0 LDA $F0EE,X ; stat offsets 0x03EFA4|$0F:$EF94:48 PHA ; stat offset 0x03EFA5|$0F:$EF95:A9 03 LDA #$03 0x03EFA7|$0F:$EF97:8D 9D 60 STA $609D ; menu function parameter 0x03EFAA|$0F:$EF9A:20 7A F0 JSR $F07A ; set maximum string length $60A0 to A and update menu function parameter $609D: if its bits 0-1 are both set, use $4A | bit 2 of $609D, else use the low 3 bits of $609D 0x03EFAD|$0F:$EF9D:68 PLA ; stat offset 0x03EFAE|$0F:$EF9E:AA TAX ; stat offset 0x03EFAF|$0F:$EF9F:A0 01 LDY #$01 ; number of bytes 0x03EFB1|$0F:$EFA1:4C 96 F0 JMP $F096 ; given hero ID in ID $609D, stat offset in X, and stat byte size in Y (max of #$03), print that stat in base 10 to current menu position, replacing leading zeroes with spaces ; menu control code #$E0-#$E7 handler: draw monster text stuff ; indirect control flow target (via $F0E4) 0x03EFB4|$0F:$EFA4:AD 9D 60 LDA $609D ; menu function parameter 0x03EFB7|$0F:$EFA7:D0 23 BNE $EFCC 0x03EFB9|$0F:$EFA9:A9 0B LDA #$0B 0x03EFBB|$0F:$EFAB:8D A0 60 STA $60A0 ; maximum string length 0x03EFBE|$0F:$EFAE:AD AB 60 LDA $60AB ; which list segment we're dealing with 0x03EFC1|$0F:$EFB1:4A LSR 0x03EFC2|$0F:$EFB2:90 05 BCC $EFB9 0x03EFC4|$0F:$EFB4:A9 09 LDA #$09 0x03EFC6|$0F:$EFB6:8D A0 60 STA $60A0 ; maximum string length ; control flow target (from $EFB2) 0x03EFC9|$0F:$EFB9:AD AC 60 LDA $60AC ; menu list index 0x03EFCC|$0F:$EFBC:0A ASL 0x03EFCD|$0F:$EFBD:AA TAX 0x03EFCE|$0F:$EFBE:BD 1C 06 LDA $061C,X ; monster group 1 monster ID 0x03EFD1|$0F:$EFC1:A2 00 LDX #$00 0x03EFD3|$0F:$EFC3:20 B7 F3 JSR $F3B7 ; given monster ID in A, copy monster name segment to $0100 in reverse 0x03EFD6|$0F:$EFC6:20 A5 F0 JSR $F0A5 ; print string at $0100 in reverse to current menu position 0x03EFD9|$0F:$EFC9:4C 21 F3 JMP $F321 ; toggle list segment $60AB; if list segment becomes #$01, INC menu list index $60AC ; control flow target (from $EFA7) 0x03EFDC|$0F:$EFCC:A9 01 LDA #$01 0x03EFDE|$0F:$EFCE:8D A0 60 STA $60A0 ; maximum string length 0x03EFE1|$0F:$EFD1:AD AC 60 LDA $60AC ; menu list index 0x03EFE4|$0F:$EFD4:0A ASL 0x03EFE5|$0F:$EFD5:AA TAX 0x03EFE6|$0F:$EFD6:BD 1D 06 LDA $061D,X ; monster group 1 monster count 0x03EFE9|$0F:$EFD9:85 10 STA $10 0x03EFEB|$0F:$EFDB:20 7C F1 JSR $F17C ; given a 24-bit number N in $10-$12, print its base 10 digits in reverse to $0100 up to maximum string length $60A0 0x03EFEE|$0F:$EFDE:4C A5 F0 JMP $F0A5 ; print string at $0100 in reverse to current menu position ; menu control code #$F0-#$FF + text handler: print one byte of menu text to current position ; indirect control flow target (via $F0E8, $F0EA, $F0EC) 0x03EFF1|$0F:$EFE1:4C E4 EF JMP $EFE4 ; print one byte of menu text ; print one byte of menu text ; control flow target (from $ED49, $ED51, $ED5C, $EF87, $EFE1, $F0AE, $F332) 0x03EFF4|$0F:$EFE4:AD B4 60 LDA $60B4 ; menu phase (1 = first, 0 = second) 0x03EFF7|$0F:$EFE7:D0 2A BNE $F013 ; update menu current column and row; if it's first phase, skip ahead 0x03EFF9|$0F:$EFE9:AD 9F 60 LDA $609F ; menu current row 0x03EFFC|$0F:$EFEC:29 01 AND #$01 0x03EFFE|$0F:$EFEE:F0 03 BEQ $EFF3 0x03F000|$0F:$EFF0:AD A1 60 LDA $60A1 ; menu window width ; control flow target (from $EFEE) 0x03F003|$0F:$EFF3:18 CLC 0x03F004|$0F:$EFF4:6D 9E 60 ADC $609E ; menu current column 0x03F007|$0F:$EFF7:AA TAX 0x03F008|$0F:$EFF8:AD 9B 60 LDA $609B ; menu text 0x03F00B|$0F:$EFFB:9D 0B 60 STA $600B,X 0x03F00E|$0F:$EFFE:C9 76 CMP #$76 ; [left border] 0x03F010|$0F:$F000:B0 11 BCS $F013 ; update menu current column and row 0x03F012|$0F:$F002:BD 0A 60 LDA $600A,X 0x03F015|$0F:$F005:C9 77 CMP #$77 ; [top border] 0x03F017|$0F:$F007:D0 0A BNE $F013 ; update menu current column and row 0x03F019|$0F:$F009:AD 9E 60 LDA $609E ; menu current column 0x03F01C|$0F:$F00C:F0 05 BEQ $F013 ; update menu current column and row 0x03F01E|$0F:$F00E:A9 78 LDA #$78 ; [top border short] 0x03F020|$0F:$F010:9D 0A 60 STA $600A,X ; update menu current column and row ; control flow target (from $ED36, $EFE7, $F000, $F007, $F00C) 0x03F023|$0F:$F013:EE 9E 60 INC $609E ; menu current column 0x03F026|$0F:$F016:AD 9E 60 LDA $609E ; menu current column 0x03F029|$0F:$F019:CD A1 60 CMP $60A1 ; menu window width 0x03F02C|$0F:$F01C:90 0C BCC $F02A ; if current column < window width, nothing else to do here 0x03F02E|$0F:$F01E:A2 01 LDX #$01 ; otherwise set string length to #$01 (for the left border of the next row) 0x03F030|$0F:$F020:8E A0 60 STX $60A0 ; maximum string length 0x03F033|$0F:$F023:CA DEX ; and reset the current column to #$00 0x03F034|$0F:$F024:8E 9E 60 STX $609E ; menu current column 0x03F037|$0F:$F027:EE 9F 60 INC $609F ; menu current row ; control flow target (from $F01C) 0x03F03A|$0F:$F02A:60 RTS ; control flow target (from $EC1D) 0x03F03B|$0F:$F02B:AD 9F 60 LDA $609F ; menu current row 0x03F03E|$0F:$F02E:29 01 AND #$01 0x03F040|$0F:$F030:0D 9E 60 ORA $609E ; menu current column 0x03F043|$0F:$F033:D0 21 BNE $F056 0x03F045|$0F:$F035:AD B4 60 LDA $60B4 ; menu phase (1 = first, 0 = second) 0x03F048|$0F:$F038:D0 1C BNE $F056 0x03F04A|$0F:$F03A:AD A1 60 LDA $60A1 ; menu window width 0x03F04D|$0F:$F03D:4A LSR 0x03F04E|$0F:$F03E:09 10 ORA #$10 0x03F050|$0F:$F040:8D 7B 60 STA $607B 0x03F053|$0F:$F043:AD A4 60 LDA $60A4 ; menu window position (from ROM; X-pos = low nybble * 2, Y-pos = high nybble * 2) 0x03F056|$0F:$F046:8D 7C 60 STA $607C 0x03F059|$0F:$F049:18 CLC 0x03F05A|$0F:$F04A:69 10 ADC #$10 0x03F05C|$0F:$F04C:8D A4 60 STA $60A4 ; menu window position (from ROM; X-pos = low nybble * 2, Y-pos = high nybble * 2) 0x03F05F|$0F:$F04F:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03F062|$0F:$F052:C0 ; $06:$8000 ; data -> code 0x03F063|$0F:$F053:20 C1 F0 JSR $F0C1 ; write [space] to $600B-$6046 ; control flow target (from $F033, $F038) 0x03F066|$0F:$F056:60 RTS ; CLC if more menu rows to display, SEC otherwise ; control flow target (from $EC20) 0x03F067|$0F:$F057:AD 9F 60 LDA $609F ; menu current row 0x03F06A|$0F:$F05A:CD A3 60 CMP $60A3 ; menu window height (ROM value * 2) 0x03F06D|$0F:$F05D:60 RTS ; set $60A0 based on menu function parameter $609D and number of remaining tiles in the current line ; control flow target (from $ED33, $ED59) 0x03F06E|$0F:$F05E:AD 9D 60 LDA $609D ; menu function parameter 0x03F071|$0F:$F061:D0 02 BNE $F065 ; control codes #$80 and #$88 fill out the rest of the line, so default length to #$FF 0x03F073|$0F:$F063:A9 FF LDA #$FF ; control flow target (from $F061) 0x03F075|$0F:$F065:8D A0 60 STA $60A0 ; maximum string length 0x03F078|$0F:$F068:18 CLC 0x03F079|$0F:$F069:AD A1 60 LDA $60A1 ; menu window width 0x03F07C|$0F:$F06C:ED 9E 60 SBC $609E ; menu current column 0x03F07F|$0F:$F06F:90 08 BCC $F079 ; branch if we're already done this line 0x03F081|$0F:$F071:CD A0 60 CMP $60A0 ; maximum string length 0x03F084|$0F:$F074:B0 03 BCS $F079 ; if number of tiles remaining is less than string length, update string length 0x03F086|$0F:$F076:8D A0 60 STA $60A0 ; maximum string length ; control flow target (from $F06F, $F074) 0x03F089|$0F:$F079:60 RTS ; set maximum string length $60A0 to A and update menu function parameter $609D: if its bits 0-1 are both set, use $4A | bit 2 of $609D, else use the low 3 bits of $609D ; control flow target (from $ED67, $EDD5, $EE1A, $EE31, $EF9A) 0x03F08A|$0F:$F07A:8D A0 60 STA $60A0 ; maximum string length 0x03F08D|$0F:$F07D:AD 9D 60 LDA $609D ; menu function parameter 0x03F090|$0F:$F080:48 PHA 0x03F091|$0F:$F081:29 03 AND #$03 0x03F093|$0F:$F083:C9 03 CMP #$03 0x03F095|$0F:$F085:D0 02 BNE $F089 0x03F097|$0F:$F087:A5 4A LDA $4A ; control flow target (from $F085) 0x03F099|$0F:$F089:8D 9D 60 STA $609D ; menu function parameter 0x03F09C|$0F:$F08C:68 PLA 0x03F09D|$0F:$F08D:29 04 AND #$04 0x03F09F|$0F:$F08F:0D 9D 60 ORA $609D ; menu function parameter 0x03F0A2|$0F:$F092:8D 9D 60 STA $609D ; menu function parameter 0x03F0A5|$0F:$F095:60 RTS ; given hero ID in ID $609D, stat offset in X, and stat byte size in Y (max of #$03), print that stat in base 10 to current menu position, replacing leading zeroes with spaces ; control flow target (from $ED77, $EDEB, $EE21, $EFA1) 0x03F0A6|$0F:$F096:20 9C F0 JSR $F09C ; given hero ID in ID $609D, stat offset in X, and stat byte size in Y (max of #$03), print that stat's base 10 digits in reverse to $0100 up to maximum string length $60A0, replacing leading (trailing in reverse) zeroes with spaces 0x03F0A9|$0F:$F099:4C A5 F0 JMP $F0A5 ; print string at $0100 in reverse to current menu position ; given hero ID in ID $609D, stat offset in X, and stat byte size in Y (max of #$03), print that stat's base 10 digits in reverse to $0100 up to maximum string length $60A0, replacing leading (trailing in reverse) zeroes with spaces ; control flow target (from $F096) 0x03F0AC|$0F:$F09C:20 4A F1 JSR $F14A ; given stat offset in X and stat byte size in Y (max of #$03), copy that many bytes of hero ID $609D's stats to $10-$12 ; given a 24-bit number N in $10-$12, print its base 10 digits in reverse to $0100 up to maximum string length $60A0, replacing leading (trailing in reverse) zeroes with spaces ; control flow target (from $EE12, $EEE1) 0x03F0AF|$0F:$F09F:20 7C F1 JSR $F17C ; given a 24-bit number N in $10-$12, print its base 10 digits in reverse to $0100 up to maximum string length $60A0 0x03F0B2|$0F:$F0A2:4C 8D F1 JMP $F18D ; scan through $0100 + maximum string length $60A0 in reverse, replacing zeroes with spaces until the first non-zero or $0100 is reached; leaves X at most significant digit ; print string at $0100 in reverse to current menu position ; control flow target (from $EDA4, $EDAA, $EDBC, $EDFE, $EE15, $EE4A, $EE6D, $EE7F, $EEA0, $EEBA, $EEE4, $EF5C, $EFC6, $EFDE, $F099, $F0B4) 0x03F0B5|$0F:$F0A5:AE A0 60 LDX $60A0 ; maximum string length 0x03F0B8|$0F:$F0A8:BD FF 00 LDA $00FF,X ; built-in offset from string copy buffer start at $0100 0x03F0BB|$0F:$F0AB:8D 9B 60 STA $609B ; menu text 0x03F0BE|$0F:$F0AE:20 E4 EF JSR $EFE4 ; print one byte of menu text 0x03F0C1|$0F:$F0B1:CE A0 60 DEC $60A0 ; maximum string length 0x03F0C4|$0F:$F0B4:D0 EF BNE $F0A5 ; print string at $0100 in reverse to current menu position 0x03F0C6|$0F:$F0B6:60 RTS ; control flow target (from $EC25) 0x03F0C7|$0F:$F0B7:AD AA 60 LDA $60AA ; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped) 0x03F0CA|$0F:$F0BA:10 04 BPL $F0C0 0x03F0CC|$0F:$F0BC:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03F0CF|$0F:$F0BF:CC ; $06:$8018 ; data -> code ; control flow target (from $F0BA) 0x03F0D0|$0F:$F0C0:60 RTS ; write [space] to $600B-$6046 ; control flow target (from $EC29, $F053) 0x03F0D1|$0F:$F0C1:A9 5F LDA #$5F 0x03F0D3|$0F:$F0C3:A2 3B LDX #$3B ; control flow target (from $F0C9) 0x03F0D5|$0F:$F0C5:9D 0B 60 STA $600B,X 0x03F0D8|$0F:$F0C8:CA DEX 0x03F0D9|$0F:$F0C9:10 FA BPL $F0C5 0x03F0DB|$0F:$F0CB:60 RTS ; code -> data ; menu control code jump table low byte ; indexed data load target (from $ED21) 0x03F0DC|$0F:$F0CC:2E ; menu control code jump table high byte ; indexed data load target (from $ED26) 0x03F0DD|$0F:$F0CD: ED ; $0F:$ED2E; menu control code #$80-#$87 handler: print number of spaces specified by $609D (or rest of line if $609D is #$00) to current menu position 0x03F0DE|$0F:$F0CE:3F ED ; $0F:$ED3F; menu control code #$88-#$8F handler: print number of top border tiles specified by $609D (or rest of line if $609D is #$00) to current menu position, accounting for possible linked menu 0x03F0E0|$0F:$F0D0:65 ED ; $0F:$ED65; menu control code #$90-#$97 handler: print selected hero's current HP or MP 0x03F0E2|$0F:$F0D2:7A ED ; $0F:$ED7A; menu control code #$98-#$9F handler: print party gold or crests or "ADVENTURE LOG" 0x03F0E4|$0F:$F0D4:CC ED ; $0F:$EDCC; menu control code #$A0-#$A7 handler: print level of selected hero or Midenhall's level in current save file 0x03F0E6|$0F:$F0D6:18 EE ; $0F:$EE18; menu control code #$A8-#$AF handler: print selected hero's current EXP 0x03F0E8|$0F:$F0D8:24 EE ; $0F:$EE24; menu control code #$B0-#$B7 handler: print selected hero's short name, current hero's full name, or Midenhall's short name from selected save game 0x03F0EA|$0F:$F0DA:82 EE ; $0F:$EE82; menu control code #$B8-#$BF handler: print various item names based on menu format 0x03F0EC|$0F:$F0DC:AF EE ; $0F:$EEAF; menu control code #$C0-#$C7 handler: draw spell name stuff 0x03F0EE|$0F:$F0DE:C1 EE ; $0F:$EEC1; menu control code #$C8-#$CF handler: draw item price stuff 0x03F0F0|$0F:$F0E0:E7 EE ; $0F:$EEE7; menu control code #$D0-#$D7 handler: start lists 0x03F0F2|$0F:$F0E2:8E EF ; $0F:$EF8E; menu control code #$D8-#$DF handler: print selected stat 0x03F0F4|$0F:$F0E4:A4 EF ; $0F:$EFA4; menu control code #$E0-#$E7 handler: draw monster text stuff 0x03F0F6|$0F:$F0E6:37 EF ; $0F:$EF37; menu control code #$E8-#$EF handler: repeat/end list and full save name handlers 0x03F0F8|$0F:$F0E8:E1 EF ; $0F:$EFE1; menu control code #$F0-#$FF + text handler: print one byte of menu text to current position 0x03F0FA|$0F:$F0EA:E1 EF ; $0F:$EFE1; menu control code #$F0-#$FF + text handler: print one byte of menu text to current position 0x03F0FC|$0F:$F0EC:E1 EF ; $0F:$EFE1; menu control code #$F0-#$FF + text handler: print one byte of menu text to current position ; stat offsets ; indexed data load target (from $EF91) 0x03F0FE|$0F:$F0EE:09 ; Strength 0x03F0FF|$0F:$F0EF:0A ; Agility 0x03F100|$0F:$F0F0:0B ; Attack Power 0x03F101|$0F:$F0F1:0C ; Defence Power 0x03F102|$0F:$F0F2:03 ; Max HP, low byte 0x03F103|$0F:$F0F3:05 ; Max MP ; data -> code ; 16-bit multiplication: set 16-bit ($00,X-$01,X) = ($00,X-$01,X) * A ; control flow target (from $FDAC) ; external control flow target (from $06:$B2A8) 0x03F104|$0F:$F0F4:8D 84 60 STA $6084 0x03F107|$0F:$F0F7:A9 00 LDA #$00 0x03F109|$0F:$F0F9:8D 85 60 STA $6085 0x03F10C|$0F:$F0FC:8D 86 60 STA $6086 ; control flow target (from $F11C) 0x03F10F|$0F:$F0FF:4E 84 60 LSR $6084 0x03F112|$0F:$F102:90 11 BCC $F115 0x03F114|$0F:$F104:B5 00 LDA $00,X 0x03F116|$0F:$F106:18 CLC 0x03F117|$0F:$F107:6D 85 60 ADC $6085 0x03F11A|$0F:$F10A:8D 85 60 STA $6085 0x03F11D|$0F:$F10D:B5 01 LDA $01,X 0x03F11F|$0F:$F10F:6D 86 60 ADC $6086 0x03F122|$0F:$F112:8D 86 60 STA $6086 ; control flow target (from $F102) 0x03F125|$0F:$F115:16 00 ASL $00,X 0x03F127|$0F:$F117:36 01 ROL $01,X 0x03F129|$0F:$F119:AD 84 60 LDA $6084 0x03F12C|$0F:$F11C:D0 E1 BNE $F0FF 0x03F12E|$0F:$F11E:AD 85 60 LDA $6085 0x03F131|$0F:$F121:95 00 STA $00,X 0x03F133|$0F:$F123:AD 86 60 LDA $6086 0x03F136|$0F:$F126:95 01 STA $01,X 0x03F138|$0F:$F128:60 RTS ; given a 24-bit number N in $10-$12, set $10-$12 to quotient of N / 10 and $13 to the remainder of N / 10, i.e. for base 10 N, $13 = the low digit, $10-$12 = the high digits ; control flow target (from $F17E) 0x03F139|$0F:$F129:8A TXA ; save X on the stack 0x03F13A|$0F:$F12A:48 PHA 0x03F13B|$0F:$F12B:A9 00 LDA #$00 0x03F13D|$0F:$F12D:85 13 STA $13 ; initialize remainder to #$00 0x03F13F|$0F:$F12F:A2 18 LDX #$18 ; we're wokring with 24-bit input ; control flow target (from $F145) 0x03F141|$0F:$F131:06 10 ASL $10 ; ASL 24-bit value into $13 0x03F143|$0F:$F133:26 11 ROL $11 0x03F145|$0F:$F135:26 12 ROL $12 0x03F147|$0F:$F137:26 13 ROL $13 0x03F149|$0F:$F139:38 SEC 0x03F14A|$0F:$F13A:A5 13 LDA $13 0x03F14C|$0F:$F13C:E9 0A SBC #$0A ; converting to base 10 0x03F14E|$0F:$F13E:90 04 BCC $F144 ; if remainder < 10, nothing else to do 0x03F150|$0F:$F140:85 13 STA $13 ; reduce remainder by 10 0x03F152|$0F:$F142:E6 10 INC $10 ; set quotient bit for next call to $F129 ; control flow target (from $F13E) 0x03F154|$0F:$F144:CA DEX 0x03F155|$0F:$F145:D0 EA BNE $F131 ; keep looping until we've gone through all 24 original bits 0x03F157|$0F:$F147:68 PLA ; restore X from the stack 0x03F158|$0F:$F148:AA TAX 0x03F159|$0F:$F149:60 RTS ; given stat offset in X and stat byte size in Y (max of #$03), copy that many bytes of hero ID $609D's stats to $10-$12 ; control flow target (from $EDDC, $F09C) 0x03F15A|$0F:$F14A:86 10 STX $10 0x03F15C|$0F:$F14C:8C 84 60 STY $6084 0x03F15F|$0F:$F14F:A9 00 LDA #$00 ; useless op 0x03F161|$0F:$F151:AD 9D 60 LDA $609D ; menu function parameter 0x03F164|$0F:$F154:29 03 AND #$03 ; hero ID 0x03F166|$0F:$F156:AA TAX 0x03F167|$0F:$F157:F0 08 BEQ $F161 ; if Midenhall, no need to adjust offsets 0x03F169|$0F:$F159:A9 00 LDA #$00 ; update offset into hero data based on hero ID ; control flow target (from $F15F) 0x03F16B|$0F:$F15B:18 CLC 0x03F16C|$0F:$F15C:69 12 ADC #$12 ; hero data is #$12 bytes each 0x03F16E|$0F:$F15E:CA DEX 0x03F16F|$0F:$F15F:D0 FA BNE $F15B ; control flow target (from $F157) 0x03F171|$0F:$F161:18 CLC 0x03F172|$0F:$F162:65 10 ADC $10 ; desired stat offset 0x03F174|$0F:$F164:AA TAX 0x03F175|$0F:$F165:A9 00 LDA #$00 ; initialize $10-$12 and Y to #$00 0x03F177|$0F:$F167:85 10 STA $10 0x03F179|$0F:$F169:85 11 STA $11 0x03F17B|$0F:$F16B:85 12 STA $12 0x03F17D|$0F:$F16D:A8 TAY ; control flow target (from $F179) 0x03F17E|$0F:$F16E:BD 2D 06 LDA $062D,X ; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03F181|$0F:$F171:99 10 00 STA $0010,Y 0x03F184|$0F:$F174:E8 INX 0x03F185|$0F:$F175:C8 INY 0x03F186|$0F:$F176:CC 84 60 CPY $6084 0x03F189|$0F:$F179:D0 F3 BNE $F16E 0x03F18B|$0F:$F17B:60 RTS ; given a 24-bit number N in $10-$12, print its base 10 digits in reverse to $0100 up to maximum string length $60A0 ; control flow target (from $EFDB, $F09F, $F48C) ; external control flow target (from $02:$BE4A) 0x03F18C|$0F:$F17C:A0 00 LDY #$00 ; control flow target (from $F18A) 0x03F18E|$0F:$F17E:20 29 F1 JSR $F129 ; given a 24-bit number N in $10-$12, set $10-$12 to quotient of N / 10 and $13 to the remainder of N / 10, i.e. for base 10 N, $13 = the low digit, $10-$12 = the high digits 0x03F191|$0F:$F181:A5 13 LDA $13 ; remainder 0x03F193|$0F:$F183:99 00 01 STA $0100,Y ; string copy buffer start (often referenced as $00FF,X) 0x03F196|$0F:$F186:C8 INY 0x03F197|$0F:$F187:CC A0 60 CPY $60A0 ; maximum string length 0x03F19A|$0F:$F18A:D0 F2 BNE $F17E ; if more digits to print, keep printing 0x03F19C|$0F:$F18C:60 RTS ; scan through $0100 + maximum string length $60A0 in reverse, replacing zeroes with spaces until the first non-zero or $0100 is reached; leaves X at most significant digit ; control flow target (from $F0A2, $F48F) ; external control flow target (from $02:$BE4D) 0x03F19D|$0F:$F18D:AE A0 60 LDX $60A0 ; maximum string length 0x03F1A0|$0F:$F190:CA DEX ; control flow target (from $F19C) 0x03F1A1|$0F:$F191:BD 00 01 LDA $0100,X ; string copy buffer start (often referenced as $00FF,X) 0x03F1A4|$0F:$F194:D0 08 BNE $F19E 0x03F1A6|$0F:$F196:A9 5F LDA #$5F 0x03F1A8|$0F:$F198:9D 00 01 STA $0100,X ; string copy buffer start (often referenced as $00FF,X) 0x03F1AB|$0F:$F19B:CA DEX 0x03F1AC|$0F:$F19C:D0 F3 BNE $F191 ; control flow target (from $F194) 0x03F1AE|$0F:$F19E:60 RTS ; initialize string buffer $0100-$010C with [space]s ; control flow target (from $ED88, $EEC1, $F2F0, $F3A0, $F3D7) 0x03F1AF|$0F:$F19F:48 PHA 0x03F1B0|$0F:$F1A0:8A TXA 0x03F1B1|$0F:$F1A1:48 PHA 0x03F1B2|$0F:$F1A2:A2 0C LDX #$0C 0x03F1B4|$0F:$F1A4:A9 5F LDA #$5F ; [space] ; control flow target (from $F1AA) 0x03F1B6|$0F:$F1A6:9D 00 01 STA $0100,X ; string copy buffer start (often referenced as $00FF,X) 0x03F1B9|$0F:$F1A9:CA DEX 0x03F1BA|$0F:$F1AA:10 FA BPL $F1A6 0x03F1BC|$0F:$F1AC:68 PLA 0x03F1BD|$0F:$F1AD:AA TAX 0x03F1BE|$0F:$F1AE:68 PLA 0x03F1BF|$0F:$F1AF:60 RTS ; given a hero ID in $4A, set A and X to hero ID * 8, a.k.a. offset for start of hero's inventory ; control flow target (from $F1B7, $F22D) ; external control flow target (from $06:$AE05) 0x03F1C0|$0F:$F1B0:A5 4A LDA $4A 0x03F1C2|$0F:$F1B2:0A ASL 0x03F1C3|$0F:$F1B3:0A ASL 0x03F1C4|$0F:$F1B4:0A ASL 0x03F1C5|$0F:$F1B5:AA TAX 0x03F1C6|$0F:$F1B6:60 RTS ; given hero ID in $4A and item type in $609D, set A = number of items of desired type in hero's inventory ; control flow target (from $EC5E, $EF06, $F4B7, $F5C3, $F605) 0x03F1C7|$0F:$F1B7:20 B0 F1 JSR $F1B0 ; given a hero ID in $4A, set A and X to hero ID * 8, a.k.a. offset for start of hero's inventory 0x03F1CA|$0F:$F1BA:A0 00 LDY #$00 0x03F1CC|$0F:$F1BC:84 10 STY $10 ; number of items in hero's inventory ; control flow target (from $F1D1) 0x03F1CE|$0F:$F1BE:BD 00 06 LDA $0600,X ; Midenhall inventory item 1 (| #$40 if equipped) 0x03F1D1|$0F:$F1C1:F0 0A BEQ $F1CD ; branch if no item 0x03F1D3|$0F:$F1C3:20 D6 F1 JSR $F1D6 ; determine item type (#$00 = weapon, #$01 = armour, #$02 = shield, #$03 = helmet, #$04 = menu function wants all items or item is non-equipment, #$05 = menu format wants equipped items only and item not equipped) 0x03F1D6|$0F:$F1C6:CD 9D 60 CMP $609D ; menu function parameter 0x03F1D9|$0F:$F1C9:D0 02 BNE $F1CD ; branch if wrong type of item 0x03F1DB|$0F:$F1CB:E6 10 INC $10 ; number of items of desired type in hero's inventory ; control flow target (from $F1C1, $F1C9) 0x03F1DD|$0F:$F1CD:E8 INX ; increment total inventory offset 0x03F1DE|$0F:$F1CE:C8 INY ; increment hero inventory offset 0x03F1DF|$0F:$F1CF:C0 08 CPY #$08 ; 8 inventory slots per hero 0x03F1E1|$0F:$F1D1:D0 EB BNE $F1BE ; if more inventory to check, check it 0x03F1E3|$0F:$F1D3:A5 10 LDA $10 ; number of items of desired type in hero's inventory 0x03F1E5|$0F:$F1D5:60 RTS ; determine item type (#$00 = weapon, #$01 = armour, #$02 = shield, #$03 = helmet, #$04 = menu function wants all items or item is non-equipment, #$05 = menu format wants equipped items only and item not equipped) ; control flow target (from $F1C3, $F235) ; external control flow target (from $06:$AE10) 0x03F1E6|$0F:$F1D6:48 PHA ; item ID 0x03F1E7|$0F:$F1D7:AD AA 60 LDA $60AA ; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped) 0x03F1EA|$0F:$F1DA:29 02 AND #$02 0x03F1EC|$0F:$F1DC:F0 06 BEQ $F1E4 0x03F1EE|$0F:$F1DE:68 PLA ; item ID 0x03F1EF|$0F:$F1DF:48 PHA ; item ID 0x03F1F0|$0F:$F1E0:29 40 AND #$40 ; #$40 => equipped 0x03F1F2|$0F:$F1E2:F0 21 BEQ $F205 ; item is not equipped ; control flow target (from $F1DC) 0x03F1F4|$0F:$F1E4:AD 9D 60 LDA $609D ; menu function parameter 0x03F1F7|$0F:$F1E7:C9 04 CMP #$04 ; #$04 => count all items as non-equipment 0x03F1F9|$0F:$F1E9:F0 2A BEQ $F215 ; item is non-equipment 0x03F1FB|$0F:$F1EB:68 PLA ; item ID 0x03F1FC|$0F:$F1EC:29 3F AND #$3F ; strip off equipped bit 0x03F1FE|$0F:$F1EE:C9 00 CMP #$00 ; no item 0x03F200|$0F:$F1F0:F0 24 BEQ $F216 0x03F202|$0F:$F1F2:C9 11 CMP #$11 ; first armour ID 0x03F204|$0F:$F1F4:90 13 BCC $F209 ; item is a weapon 0x03F206|$0F:$F1F6:C9 1C CMP #$1C ; first shield ID 0x03F208|$0F:$F1F8:90 12 BCC $F20C ; item is an armour 0x03F20A|$0F:$F1FA:C9 21 CMP #$21 ; first helmet ID 0x03F20C|$0F:$F1FC:90 11 BCC $F20F ; item is a shield 0x03F20E|$0F:$F1FE:C9 24 CMP #$24 ; first non-equipment item ID 0x03F210|$0F:$F200:90 10 BCC $F212 ; item is a helmet 0x03F212|$0F:$F202:A9 04 LDA #$04 ; item is non-equipment 0x03F214|$0F:$F204:60 RTS ; item is not equipped ; control flow target (from $F1E2) 0x03F215|$0F:$F205:68 PLA 0x03F216|$0F:$F206:A9 05 LDA #$05 0x03F218|$0F:$F208:60 RTS ; item is a weapon ; control flow target (from $F1F4) 0x03F219|$0F:$F209:A9 00 LDA #$00 0x03F21B|$0F:$F20B:60 RTS ; item is an armour ; control flow target (from $F1F8) 0x03F21C|$0F:$F20C:A9 01 LDA #$01 0x03F21E|$0F:$F20E:60 RTS ; item is a shield ; control flow target (from $F1FC) 0x03F21F|$0F:$F20F:A9 02 LDA #$02 0x03F221|$0F:$F211:60 RTS ; item is a helmet ; control flow target (from $F200) 0x03F222|$0F:$F212:A9 03 LDA #$03 0x03F224|$0F:$F214:60 RTS ; item is non-equipment ; control flow target (from $F1E9) 0x03F225|$0F:$F215:68 PLA ; control flow target (from $F1F0) 0x03F226|$0F:$F216:A9 04 LDA #$04 0x03F228|$0F:$F218:60 RTS ; return the $60AC'th item of item type $609D in A and the party inventory index of that item in X, or #$00 in A and #$FF in X if no such item exists; also sets $60BA,X to #$FF if found and #$00 otherwise ; control flow target (from $EE9A) 0x03F229|$0F:$F219:AD AC 60 LDA $60AC ; menu list index 0x03F22C|$0F:$F21C:29 03 AND #$03 0x03F22E|$0F:$F21E:AA TAX 0x03F22F|$0F:$F21F:A9 FF LDA #$FF 0x03F231|$0F:$F221:9D BA 60 STA $60BA,X 0x03F234|$0F:$F224:AD AC 60 LDA $60AC ; menu list index 0x03F237|$0F:$F227:29 07 AND #$07 0x03F239|$0F:$F229:85 10 STA $10 0x03F23B|$0F:$F22B:E6 10 INC $10 0x03F23D|$0F:$F22D:20 B0 F1 JSR $F1B0 ; given a hero ID in $4A, set A and X to hero ID * 8, a.k.a. offset for start of hero's inventory ; control flow target (from $F245) 0x03F240|$0F:$F230:BD 00 06 LDA $0600,X ; Midenhall inventory item 1 (| #$40 if equipped) 0x03F243|$0F:$F233:F0 12 BEQ $F247 0x03F245|$0F:$F235:20 D6 F1 JSR $F1D6 ; determine item type (#$00 = weapon, #$01 = armour, #$02 = shield, #$03 = helmet, #$04 = menu function wants all items or item is non-equipment, #$05 = menu format wants equipped items only and item not equipped) 0x03F248|$0F:$F238:CD 9D 60 CMP $609D ; menu function parameter 0x03F24B|$0F:$F23B:D0 04 BNE $F241 0x03F24D|$0F:$F23D:C6 10 DEC $10 0x03F24F|$0F:$F23F:F0 13 BEQ $F254 ; control flow target (from $F23B) 0x03F251|$0F:$F241:E8 INX 0x03F252|$0F:$F242:8A TXA 0x03F253|$0F:$F243:29 07 AND #$07 0x03F255|$0F:$F245:D0 E9 BNE $F230 ; control flow target (from $F233) 0x03F257|$0F:$F247:AD AC 60 LDA $60AC ; menu list index 0x03F25A|$0F:$F24A:29 03 AND #$03 0x03F25C|$0F:$F24C:AA TAX 0x03F25D|$0F:$F24D:A9 00 LDA #$00 0x03F25F|$0F:$F24F:9D BA 60 STA $60BA,X 0x03F262|$0F:$F252:A2 FF LDX #$FF ; control flow target (from $F23F) 0x03F264|$0F:$F254:60 RTS ; given shop ID in $60AF and menu list index in $60AC, set A to the corresponding item ID and X to the number of items in the shop ; control flow target (from $EEF6) 0x03F265|$0F:$F255:20 61 F7 JSR $F761 ; load ROM bank #$06 0x03F268|$0F:$F258:AD AF 60 LDA $60AF ; shop ID 0x03F26B|$0F:$F25B:0A ASL 0x03F26C|$0F:$F25C:85 10 STA $10 0x03F26E|$0F:$F25E:0A ASL 0x03F26F|$0F:$F25F:65 10 ADC $10 ; A = A * 6; 6 items per shop 0x03F271|$0F:$F261:A8 TAY 0x03F272|$0F:$F262:84 10 STY $10 ; start of shop's inventory list 0x03F274|$0F:$F264:A2 00 LDX #$00 ; number of items in shop ; control flow target (from $F26F) 0x03F276|$0F:$F266:B9 8A 9F LDA $9F8A,Y ; Weapon Shop inventories 0x03F279|$0F:$F269:F0 06 BEQ $F271 ; #$00 marks the end of shop's item list 0x03F27B|$0F:$F26B:E8 INX 0x03F27C|$0F:$F26C:C8 INY 0x03F27D|$0F:$F26D:E0 06 CPX #$06 ; 6 items per shop 0x03F27F|$0F:$F26F:D0 F5 BNE $F266 ; if more items to check, check them ; control flow target (from $F269) 0x03F281|$0F:$F271:AD AC 60 LDA $60AC ; menu list index 0x03F284|$0F:$F274:18 CLC 0x03F285|$0F:$F275:65 10 ADC $10 ; start of shop's inventory list 0x03F287|$0F:$F277:A8 TAY ; selected item 0x03F288|$0F:$F278:B9 8A 9F LDA $9F8A,Y ; Weapon Shop inventories 0x03F28B|$0F:$F27B:60 RTS ; given shop ID in $60AF and menu list index in $60AC, set A to the corresponding item ID ; control flow target (from $F62F) 0x03F28C|$0F:$F27C:4C 89 F2 JMP $F289 ; given shop ID in $60AF and menu list index in $60AC, set A to the corresponding item ID ; given shop ID in $60AF and menu list index in $60AC, set A to the corresponding item ID or #$00 if it's the Jailor's Key ; control flow target (from $EEA6) 0x03F28F|$0F:$F27F:20 89 F2 JSR $F289 ; given shop ID in $60AF and menu list index in $60AC, set A to the corresponding item ID 0x03F292|$0F:$F282:C9 39 CMP #$39 ; Item ID #$39: Jailor’s Key 0x03F294|$0F:$F284:D0 02 BNE $F288 ; if Jailor's Key, display [blank] instead 0x03F296|$0F:$F286:A9 00 LDA #$00 ; control flow target (from $F284) 0x03F298|$0F:$F288:60 RTS ; given shop ID in $60AF and menu list index in $60AC, set A to the corresponding item ID ; control flow target (from $F27C, $F27F) 0x03F299|$0F:$F289:20 61 F7 JSR $F761 ; load ROM bank #$06 0x03F29C|$0F:$F28C:AD AF 60 LDA $60AF ; shop ID 0x03F29F|$0F:$F28F:0A ASL 0x03F2A0|$0F:$F290:85 10 STA $10 0x03F2A2|$0F:$F292:0A ASL 0x03F2A3|$0F:$F293:65 10 ADC $10 ; A = A * 6; 6 items per shop 0x03F2A5|$0F:$F295:6D AC 60 ADC $60AC ; menu list index 0x03F2A8|$0F:$F298:AA TAX 0x03F2A9|$0F:$F299:BD 8A 9F LDA $9F8A,X ; Weapon Shop inventories 0x03F2AC|$0F:$F29C:60 RTS ; given party inventory offset in X, print name of that item ID to $0100 in reverse; depending on settings, possibly update menu's [left border] to [left border, equipped] ; control flow target (from $EE9D) 0x03F2AD|$0F:$F29D:20 F0 F2 JSR $F2F0 ; initialize string buffer $0100-$010C with [space]s, set maximum string length to #$0B if we're dealing with the second segment 0x03F2B0|$0F:$F2A0:E0 FF CPX #$FF 0x03F2B2|$0F:$F2A2:F0 4B BEQ $F2EF 0x03F2B4|$0F:$F2A4:BD 00 06 LDA $0600,X ; Midenhall inventory item 1 (| #$40 if equipped) ; print name of item ID in A to $0100 in reverse; depending on settings, possibly update menu's [left border] to [left border, equipped] ; control flow target (from $EEA9) ; external control flow target (from $02:$BE95) 0x03F2B7|$0F:$F2A7:8D AD 60 STA $60AD ; item ID 0x03F2BA|$0F:$F2AA:29 40 AND #$40 ; pick out the equipped bit 0x03F2BC|$0F:$F2AC:F0 06 BEQ $F2B4 ; skip ahead if item is not equipped 0x03F2BE|$0F:$F2AE:AD AC 60 LDA $60AC ; menu list index 0x03F2C1|$0F:$F2B1:8D B9 60 STA $60B9 ; control flow target (from $F2AC) 0x03F2C4|$0F:$F2B4:20 F0 F2 JSR $F2F0 ; initialize string buffer $0100-$010C with [space]s, set maximum string length to #$0B if we're dealing with the second segment 0x03F2C7|$0F:$F2B7:AD AB 60 LDA $60AB ; which list segment we're dealing with 0x03F2CA|$0F:$F2BA:29 01 AND #$01 ; pretty sure the only options are 0 and 1, so this seems useless 0x03F2CC|$0F:$F2BC:F0 02 BEQ $F2C0 ; if 0, use 0 0x03F2CE|$0F:$F2BE:A9 01 LDA #$01 ; else use 1 (... but it already was 1) ; control flow target (from $F2BC) 0x03F2D0|$0F:$F2C0:A8 TAY ; set item pointer list index 0x03F2D1|$0F:$F2C1:AD AD 60 LDA $60AD ; item ID 0x03F2D4|$0F:$F2C4:48 PHA ; item ID 0x03F2D5|$0F:$F2C5:29 40 AND #$40 ; pick out the equipped bit 0x03F2D7|$0F:$F2C7:F0 1B BEQ $F2E4 ; if not equipped, skip ahead 0x03F2D9|$0F:$F2C9:AD AA 60 LDA $60AA ; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped) 0x03F2DC|$0F:$F2CC:4A LSR 0x03F2DD|$0F:$F2CD:90 15 BCC $F2E4 ; if not replacing [left border] with [left border, equipped], skip ahead 0x03F2DF|$0F:$F2CF:AD AB 60 LDA $60AB ; which list segment we're dealing with 0x03F2E2|$0F:$F2D2:4A LSR 0x03F2E3|$0F:$F2D3:B0 0F BCS $F2E4 ; if not dealing with list segmetn 1, skip ahead 0x03F2E5|$0F:$F2D5:A9 00 LDA #$00 ; otherwise reset current column 0x03F2E7|$0F:$F2D7:8D 9E 60 STA $609E ; menu current column 0x03F2EA|$0F:$F2DA:A9 8B LDA #$8B ; [left border, equipped] 0x03F2EC|$0F:$F2DC:20 2F F3 JSR $F32F ; print A to menu 0x03F2EF|$0F:$F2DF:A9 5F LDA #$5F ; [space] 0x03F2F1|$0F:$F2E1:20 2F F3 JSR $F32F ; print A to menu ; control flow target (from $F2C7, $F2CD, $F2D3) 0x03F2F4|$0F:$F2E4:68 PLA ; item ID 0x03F2F5|$0F:$F2E5:29 3F AND #$3F ; strip off the equipped bit 0x03F2F7|$0F:$F2E7:8D AD 60 STA $60AD ; item ID 0x03F2FA|$0F:$F2EA:F0 03 BEQ $F2EF ; if no item, just RTS 0x03F2FC|$0F:$F2EC:20 FF F2 JSR $F2FF ; given item ID in A, print name of item to $0100 in reverse ; control flow target (from $F2A2, $F2EA) 0x03F2FF|$0F:$F2EF:60 RTS ; initialize string buffer $0100-$010C with [space]s, set maximum string length to #$0B if we're dealing with the second segment ; control flow target (from $F29D, $F2B4) 0x03F300|$0F:$F2F0:20 9F F1 JSR $F19F ; initialize string buffer $0100-$010C with [space]s 0x03F303|$0F:$F2F3:AD AB 60 LDA $60AB ; which list segment we're dealing with 0x03F306|$0F:$F2F6:4A LSR 0x03F307|$0F:$F2F7:90 05 BCC $F2FE ; if first segment, skip ahead 0x03F309|$0F:$F2F9:A9 0B LDA #$0B ; max length of second segment 0x03F30B|$0F:$F2FB:8D A0 60 STA $60A0 ; maximum string length ; control flow target (from $F2F7) 0x03F30E|$0F:$F2FE:60 RTS ; given item ID in A, print name of item to $0100 in reverse ; control flow target (from $F2EC) 0x03F30F|$0F:$F2FF:48 PHA ; item ID 0x03F310|$0F:$F300:C9 21 CMP #$21 ; split point for item list pointers 0x03F312|$0F:$F302:90 06 BCC $F30A ; if < #$21, use the first set of pointers 0x03F314|$0F:$F304:68 PLA ; item ID 0x03F315|$0F:$F305:E9 20 SBC #$20 ; adjust item ID for second set of pointers; note that C is set since we got here by not taking BCC 0x03F317|$0F:$F307:C8 INY ; pointer address += 2 0x03F318|$0F:$F308:C8 INY 0x03F319|$0F:$F309:48 PHA ; item ID within list segment ; control flow target (from $F302) 0x03F31A|$0F:$F30A:B9 16 F3 LDA $F316,Y ; item list bank/pointers 0x03F31D|$0F:$F30D:20 E2 F3 JSR $F3E2 ; parse bank/pointer indices from A, load desired bank, set $57-$58 to desired pointer value 0x03F320|$0F:$F310:68 PLA ; item ID within list segment 0x03F321|$0F:$F311:F0 07 BEQ $F31A ; load bank specified by $60D7 (set by last call to $F3E2) 0x03F323|$0F:$F313:4C F8 F3 JMP $F3F8 ; find desired list item A (one-based) in ($57), copy it to $0100 (referenced as $00FF,X) in reverse; set Y to length of string copied, then load bank specified by $60D7 (set by last call to $F3E2) ; code -> data ; item list bank/pointers ; indexed data load target (from $F30A) 0x03F326|$0F:$F316:D1 ; $06:$8022; -> $06:$B2CA: Item list part 1, line 1 0x03F327|$0F:$F317:D2 ; $06:$8024; -> $06:$B4B2: Item list part 1, line 2 0x03F328|$0F:$F318:D8 ; $06:$8030; -> $06:$B3BE: Item list part 2, line 1 0x03F329|$0F:$F319:D9 ; $06:$8032; -> $06:$B57C: Item list part 2, line 2 ; data -> code ; load bank specified by $60D7 (set by last call to $F3E2) ; control flow target (from $F311, $F3FB) 0x03F32A|$0F:$F31A:48 PHA 0x03F32B|$0F:$F31B:AD D7 60 LDA $60D7 ; backup copy of current bank set by calls to $F3E2; used by $F31A 0x03F32E|$0F:$F31E:4C 82 F7 JMP $F782 ; load bank specified by A then PLA ; toggle list segment $60AB; if list segment becomes #$01, INC menu list index $60AC ; control flow target (from $EEA3, $EFC9) 0x03F331|$0F:$F321:AD AB 60 LDA $60AB ; which list segment we're dealing with 0x03F334|$0F:$F324:49 01 EOR #$01 0x03F336|$0F:$F326:D0 03 BNE $F32B 0x03F338|$0F:$F328:EE AC 60 INC $60AC ; menu list index ; control flow target (from $F326) 0x03F33B|$0F:$F32B:8D AB 60 STA $60AB ; which list segment we're dealing with 0x03F33E|$0F:$F32E:60 RTS ; print A to menu ; control flow target (from $F2DC, $F2E1) 0x03F33F|$0F:$F32F:8D 9B 60 STA $609B ; menu text 0x03F342|$0F:$F332:4C E4 EF JMP $EFE4 ; print one byte of menu text ; control flow target (from $EEB4) 0x03F345|$0F:$F335:AE AC 60 LDX $60AC ; menu list index 0x03F348|$0F:$F338:A9 FF LDA #$FF 0x03F34A|$0F:$F33A:9D BA 60 STA $60BA,X 0x03F34D|$0F:$F33D:AD 9D 60 LDA $609D ; menu function parameter 0x03F350|$0F:$F340:0A ASL ; A is either #$00 (battle spells) or #$01 (field spells), so this is either #$00 or #$02 0x03F351|$0F:$F341:65 4A ADC $4A ; hero ID - 1 0x03F353|$0F:$F343:AA TAX 0x03F354|$0F:$F344:BD 18 06 LDA $0618,X ; Cannock's learned battle spell list 0x03F357|$0F:$F347:85 10 STA $10 ; selected hero's learned spell list 0x03F359|$0F:$F349:A9 80 LDA #$80 0x03F35B|$0F:$F34B:85 11 STA $11 0x03F35D|$0F:$F34D:AD AC 60 LDA $60AC ; menu list index 0x03F360|$0F:$F350:AE 9D 60 LDX $609D ; menu function parameter 0x03F363|$0F:$F353:D0 05 BNE $F35A ; branch if field spells 0x03F365|$0F:$F355:4A LSR 0x03F366|$0F:$F356:A2 88 LDX #$88 0x03F368|$0F:$F358:86 11 STX $11 ; control flow target (from $F353) 0x03F36A|$0F:$F35A:AA TAX ; control flow target (from $F360) 0x03F36B|$0F:$F35B:CA DEX 0x03F36C|$0F:$F35C:30 04 BMI $F362 0x03F36E|$0F:$F35E:46 11 LSR $11 0x03F370|$0F:$F360:90 F9 BCC $F35B ; control flow target (from $F35C) 0x03F372|$0F:$F362:AD 9D 60 LDA $609D ; menu function parameter 0x03F375|$0F:$F365:29 01 AND #$01 0x03F377|$0F:$F367:D0 0D BNE $F376 ; branch if field spells 0x03F379|$0F:$F369:AD AC 60 LDA $60AC ; menu list index 0x03F37C|$0F:$F36C:29 01 AND #$01 0x03F37E|$0F:$F36E:AA TAX 0x03F37F|$0F:$F36F:BD 9D F3 LDA $F39D,X 0x03F382|$0F:$F372:25 11 AND $11 0x03F384|$0F:$F374:85 11 STA $11 ; control flow target (from $F367) 0x03F386|$0F:$F376:A5 10 LDA $10 ; selected hero's learned spell list 0x03F388|$0F:$F378:25 11 AND $11 0x03F38A|$0F:$F37A:F0 16 BEQ $F392 0x03F38C|$0F:$F37C:A5 4A LDA $4A ; hero ID - 1 0x03F38E|$0F:$F37E:0A ASL 0x03F38F|$0F:$F37F:0A ASL 0x03F390|$0F:$F380:0A ASL 0x03F391|$0F:$F381:0A ASL 0x03F392|$0F:$F382:48 PHA 0x03F393|$0F:$F383:AD 9D 60 LDA $609D ; menu function parameter 0x03F396|$0F:$F386:0A ASL 0x03F397|$0F:$F387:0A ASL 0x03F398|$0F:$F388:0A ASL 0x03F399|$0F:$F389:85 12 STA $12 0x03F39B|$0F:$F38B:68 PLA 0x03F39C|$0F:$F38C:65 12 ADC $12 0x03F39E|$0F:$F38E:6D AC 60 ADC $60AC ; menu list index 0x03F3A1|$0F:$F391:60 RTS ; control flow target (from $F37A) 0x03F3A2|$0F:$F392:A9 00 LDA #$00 0x03F3A4|$0F:$F394:AE AC 60 LDX $60AC ; menu list index 0x03F3A7|$0F:$F397:9D BA 60 STA $60BA,X 0x03F3AA|$0F:$F39A:A9 FF LDA #$FF 0x03F3AC|$0F:$F39C:60 RTS ; code -> data ; indexed data load target (from $F36F) 0x03F3AD|$0F:$F39D:F0 0x03F3AE|$0F:$F39E:0F ; data -> code ; given spell name index in A, print spell name to $0100 in reverse, set Y to length of string copied, then load bank specified by $60D7 (set by last call to $F3E2) ; control flow target (from $EEB7) ; external control flow target (from $02:$BEA5) 0x03F3AF|$0F:$F39F:48 PHA ; spell name index 0x03F3B0|$0F:$F3A0:20 9F F1 JSR $F19F ; initialize string buffer $0100-$010C with [space]s 0x03F3B3|$0F:$F3A3:68 PLA ; spell name index 0x03F3B4|$0F:$F3A4:85 10 STA $10 ; spell name index 0x03F3B6|$0F:$F3A6:C9 FF CMP #$FF 0x03F3B8|$0F:$F3A8:F0 0C BEQ $F3B6 ; #$FF => not a real spell 0x03F3BA|$0F:$F3AA:A9 D3 LDA #$D3 ; spell list bank/pointer 0x03F3BC|$0F:$F3AC:20 E2 F3 JSR $F3E2 ; parse bank/pointer indices from A, load desired bank, set $57-$58 to desired pointer value 0x03F3BF|$0F:$F3AF:A6 10 LDX $10 ; spell name index 0x03F3C1|$0F:$F3B1:E8 INX ; $F3F8 is one-based, so convert from zero-based 0x03F3C2|$0F:$F3B2:8A TXA 0x03F3C3|$0F:$F3B3:20 F8 F3 JSR $F3F8 ; find desired list item A (one-based) in ($57), copy it to $0100 (referenced as $00FF,X) in reverse; set Y to length of string copied, then load bank specified by $60D7 (set by last call to $F3E2) ; control flow target (from $F3A8) 0x03F3C6|$0F:$F3B6:60 RTS ; given monster ID in A, copy monster name segment to $0100 in reverse ; control flow target (from $EFC3, $FC98, $FCB5) 0x03F3C7|$0F:$F3B7:85 10 STA $10 ; save desired monster index for later (both here and in calling code) 0x03F3C9|$0F:$F3B9:86 11 STX $11 ; pointless? 0x03F3CB|$0F:$F3BB:A0 00 LDY #$00 ; start by assuming we're dealing with Monsters 1 Line 1 (LDY $60AB would save 6 bytes?) 0x03F3CD|$0F:$F3BD:AD AB 60 LDA $60AB ; which list segment we're dealing with 0x03F3D0|$0F:$F3C0:4A LSR ; shift low bit to C 0x03F3D1|$0F:$F3C1:90 01 BCC $F3C4 ; C = 0 => first segment, so keep Y at #$00 0x03F3D3|$0F:$F3C3:C8 INY ; otherwise it's the second segment, so set Y = #$01 ; control flow target (from $F3C1) 0x03F3D4|$0F:$F3C4:A5 10 LDA $10 ; restore monster index 0x03F3D6|$0F:$F3C6:48 PHA ; save monster index 0x03F3D7|$0F:$F3C7:C9 33 CMP #$33 ; is monster index < 51? 0x03F3D9|$0F:$F3C9:90 06 BCC $F3D1 ; if monster index < 51, skip ahead 0x03F3DB|$0F:$F3CB:68 PLA ; pop old monster index 0x03F3DC|$0F:$F3CC:E9 32 SBC #$32 ; otherwise subtract 50 0x03F3DE|$0F:$F3CE:C8 INY ; and use the second half of the pointer list 0x03F3DF|$0F:$F3CF:C8 INY 0x03F3E0|$0F:$F3D0:48 PHA ; push new monster index ; control flow target (from $F3C9) 0x03F3E1|$0F:$F3D1:B9 DE F3 LDA $F3DE,Y ; monster list bank/pointers 0x03F3E4|$0F:$F3D4:20 E2 F3 JSR $F3E2 ; parse bank/pointer indices from A, load desired bank, set $57-$58 to desired pointer value 0x03F3E7|$0F:$F3D7:20 9F F1 JSR $F19F ; initialize string buffer $0100-$010C with [space]s 0x03F3EA|$0F:$F3DA:68 PLA ; monster index 0x03F3EB|$0F:$F3DB:4C F8 F3 JMP $F3F8 ; find desired list item A (one-based) in ($57), copy it to $0100 (referenced as $00FF,X) in reverse; set Y to length of string copied, then load bank specified by $60D7 (set by last call to $F3E2) ; code -> data ; monster list bank/pointers ; indexed data load target (from $F3D1) 0x03F3EE|$0F:$F3DE:D4 ; $06:$8028; -> $06:$B718: Monster list part 1, line 1 0x03F3EF|$0F:$F3DF:D5 ; $06:$802A; -> $06:$B945: Monster list part 1, line 2 0x03F3F0|$0F:$F3E0:DA ; $06:$8034; -> $06:$B85E: Monster list part 2, line 1 0x03F3F1|$0F:$F3E1:DB ; $06:$8036; -> $06:$B9D5: Monster list part 2, line 2 ; data -> code ; parse bank/pointer indices from A, load desired bank, set $57-$58 to desired pointer value ; control flow target (from $EBB4, $F30D, $F3AC, $F3D4) 0x03F3F2|$0F:$F3E2:48 PHA 0x03F3F3|$0F:$F3E3:AD F6 05 LDA $05F6 ; current bank 0x03F3F6|$0F:$F3E6:8D D7 60 STA $60D7 ; backup copy of current bank set by calls to $F3E2; used by $F31A 0x03F3F9|$0F:$F3E9:68 PLA 0x03F3FA|$0F:$F3EA:20 33 FF JSR $FF33 ; parse A into bank and pointer indices and load specified bank 0x03F3FD|$0F:$F3ED:BD 00 80 LDA $8000,X 0x03F400|$0F:$F3F0:85 57 STA $57 ; pointer to start of main pointer table, low byte 0x03F402|$0F:$F3F2:BD 01 80 LDA $8001,X 0x03F405|$0F:$F3F5:85 58 STA $58 ; pointer to start of main pointer table, high byte 0x03F407|$0F:$F3F7:60 RTS ; find desired list item A (one-based) in ($57), copy it to $0100 (referenced as $00FF,X) in reverse; set Y to length of string copied, then load bank specified by $60D7 (set by last call to $F3E2) ; control flow target (from $F313, $F3B3, $F3DB) 0x03F408|$0F:$F3F8:20 FE F3 JSR $F3FE ; find desired list item A (one-based) in ($57), copy it to $0100 (referenced as $00FF,X) in reverse; set Y to length of string copied 0x03F40B|$0F:$F3FB:4C 1A F3 JMP $F31A ; load bank specified by $60D7 (set by last call to $F3E2) ; find desired list item A (one-based) in ($57), copy it to $0100 (referenced as $00FF,X) in reverse; set Y to length of string copied ; control flow target (from $F3F8) 0x03F40E|$0F:$F3FE:AA TAX 0x03F40F|$0F:$F3FF:A0 00 LDY #$00 ; control flow target (from $F412, $F416) 0x03F411|$0F:$F401:CA DEX 0x03F412|$0F:$F402:F0 14 BEQ $F418 ; control flow target (from $F40B, $F40F) 0x03F414|$0F:$F404:B1 57 LDA ($57),Y ; pointer to start of main pointer table, low byte; scan through ($57),Y, counting #$FF bytes until we've reached the right list item 0x03F416|$0F:$F406:C9 FF CMP #$FF 0x03F418|$0F:$F408:F0 07 BEQ $F411 0x03F41A|$0F:$F40A:C8 INY 0x03F41B|$0F:$F40B:D0 F7 BNE $F404 0x03F41D|$0F:$F40D:E6 58 INC $58 ; pointer to start of main pointer table, high byte 0x03F41F|$0F:$F40F:D0 F3 BNE $F404 ; control flow target (from $F408) 0x03F421|$0F:$F411:C8 INY 0x03F422|$0F:$F412:D0 ED BNE $F401 0x03F424|$0F:$F414:E6 58 INC $58 ; pointer to start of main pointer table, high byte 0x03F426|$0F:$F416:D0 E9 BNE $F401 ; control flow target (from $F402) 0x03F428|$0F:$F418:98 TYA 0x03F429|$0F:$F419:18 CLC 0x03F42A|$0F:$F41A:65 57 ADC $57 ; pointer to start of main pointer table, low byte 0x03F42C|$0F:$F41C:85 57 STA $57 ; pointer to start of main pointer table, low byte 0x03F42E|$0F:$F41E:90 02 BCC $F422 0x03F430|$0F:$F420:E6 58 INC $58 ; pointer to start of main pointer table, high byte ; control flow target (from $F41E) 0x03F432|$0F:$F422:A0 00 LDY #$00 0x03F434|$0F:$F424:AE A0 60 LDX $60A0 ; maximum string length ; control flow target (from $F432) 0x03F437|$0F:$F427:B1 57 LDA ($57),Y ; pointer to start of main pointer table, low byte 0x03F439|$0F:$F429:C9 FF CMP #$FF 0x03F43B|$0F:$F42B:F0 07 BEQ $F434 0x03F43D|$0F:$F42D:9D FF 00 STA $00FF,X ; built-in offset from string copy buffer start at $0100 0x03F440|$0F:$F430:C8 INY 0x03F441|$0F:$F431:CA DEX 0x03F442|$0F:$F432:D0 F3 BNE $F427 ; control flow target (from $F42B, $F437) 0x03F444|$0F:$F434:60 RTS ; control flow target (from $EBA2) 0x03F445|$0F:$F435:A5 8E LDA $8E ; flag for in battle or not (#$FF)? 0x03F447|$0F:$F437:D0 FB BNE $F434 0x03F449|$0F:$F439:A5 4D LDA $4D 0x03F44B|$0F:$F43B:85 0C STA $0C 0x03F44D|$0F:$F43D:A5 4E LDA $4E 0x03F44F|$0F:$F43F:85 0E STA $0E 0x03F451|$0F:$F441:20 2D DE JSR $DE2D 0x03F454|$0F:$F444:A0 00 LDY #$00 0x03F456|$0F:$F446:84 12 STY $12 0x03F458|$0F:$F448:AD A3 60 LDA $60A3 ; menu window height (ROM value * 2) 0x03F45B|$0F:$F44B:4A LSR 0x03F45C|$0F:$F44C:85 10 STA $10 ; control flow target (from $F467) 0x03F45E|$0F:$F44E:AD A1 60 LDA $60A1 ; menu window width 0x03F461|$0F:$F451:4A LSR 0x03F462|$0F:$F452:85 11 STA $11 0x03F464|$0F:$F454:A9 01 LDA #$01 ; control flow target (from $F45B) 0x03F466|$0F:$F456:91 07 STA ($07),Y ; mark menu open 0x03F468|$0F:$F458:C8 INY 0x03F469|$0F:$F459:C6 11 DEC $11 0x03F46B|$0F:$F45B:D0 F9 BNE $F456 0x03F46D|$0F:$F45D:A5 12 LDA $12 0x03F46F|$0F:$F45F:18 CLC 0x03F470|$0F:$F460:69 10 ADC #$10 0x03F472|$0F:$F462:85 12 STA $12 0x03F474|$0F:$F464:A8 TAY 0x03F475|$0F:$F465:C6 10 DEC $10 0x03F477|$0F:$F467:D0 E5 BNE $F44E 0x03F479|$0F:$F469:A5 35 LDA $35 ; flag indicating whether any menu is currently open 0x03F47B|$0F:$F46B:48 PHA 0x03F47C|$0F:$F46C:A9 FF LDA #$FF 0x03F47E|$0F:$F46E:85 35 STA $35 ; flag indicating whether any menu is currently open 0x03F480|$0F:$F470:20 CB D8 JSR $D8CB 0x03F483|$0F:$F473:68 PLA 0x03F484|$0F:$F474:85 35 STA $35 ; flag indicating whether any menu is currently open 0x03F486|$0F:$F476:4C DC C1 JMP $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF ; print party gold to $0100 in decimal in reverse, replacing leading (now trailing) zeroes with spaces, leaving X at most significant digit ; control flow target (from $EDA7) 0x03F489|$0F:$F479:A9 05 LDA #$05 0x03F48B|$0F:$F47B:8D A0 60 STA $60A0 ; maximum string length 0x03F48E|$0F:$F47E:AD 24 06 LDA $0624 ; party gold, low byte 0x03F491|$0F:$F481:85 10 STA $10 0x03F493|$0F:$F483:AD 25 06 LDA $0625 ; party gold, high byte 0x03F496|$0F:$F486:85 11 STA $11 0x03F498|$0F:$F488:A9 00 LDA #$00 0x03F49A|$0F:$F48A:85 12 STA $12 0x03F49C|$0F:$F48C:20 7C F1 JSR $F17C ; given a 24-bit number N in $10-$12, print its base 10 digits in reverse to $0100 up to maximum string length $60A0 0x03F49F|$0F:$F48F:4C 8D F1 JMP $F18D ; scan through $0100 + maximum string length $60A0 in reverse, replacing zeroes with spaces until the first non-zero or $0100 is reached; leaves X at most significant digit ; display Menu ID #$02: Main menu: gold/crests ; external control flow target (from $06:$89DC) 0x03F4A2|$0F:$F492:A9 02 LDA #$02 ; Menu ID #$02: Main menu: gold/crests 0x03F4A4|$0F:$F494:4C 89 EB JMP $EB89 ; open menu specified by A ; display Menu ID #$03: Main menu: selected hero's status ; external control flow target (from $06:$89D6) 0x03F4A7|$0F:$F497:85 4A STA $4A 0x03F4A9|$0F:$F499:A9 03 LDA #$03 ; Menu ID #$03: Main menu: selected hero's status 0x03F4AB|$0F:$F49B:4C 89 EB JMP $EB89 ; open menu specified by A ; external control flow target (from $04:$B5D8) 0x03F4AE|$0F:$F49E:85 4A STA $4A 0x03F4B0|$0F:$F4A0:A9 07 LDA #$07 ; Menu ID #$07: Battle menu: spell list 0x03F4B2|$0F:$F4A2:20 89 EB JSR $EB89 ; open menu specified by A 0x03F4B5|$0F:$F4A5:C9 FF CMP #$FF 0x03F4B7|$0F:$F4A7:F0 04 BEQ $F4AD 0x03F4B9|$0F:$F4A9:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03F4BC|$0F:$F4AC:CA ; $06:$8014; -> $06:$AE3D: given hero ID - 1 in $4A and battle spell menu selection index in A, return spell ID in A ; data -> code ; control flow target (from $F4A7) 0x03F4BD|$0F:$F4AD:4C C2 F6 JMP $F6C2 ; load bank specified by $94 ; given hero ID in A, display that hero's battle item list window and return the selected item ID in A ; external control flow target (from $04:$B5E1) 0x03F4C0|$0F:$F4B0:85 4A STA $4A ; hero ID 0x03F4C2|$0F:$F4B2:A9 04 LDA #$04 ; count all items 0x03F4C4|$0F:$F4B4:8D 9D 60 STA $609D ; menu function parameter 0x03F4C7|$0F:$F4B7:20 B7 F1 JSR $F1B7 ; given hero ID in $4A and item type in $609D, set A = number of items of desired type in hero's inventory 0x03F4CA|$0F:$F4BA:F0 30 BEQ $F4EC ; no items => set A = #$FE and RTS 0x03F4CC|$0F:$F4BC:A9 08 LDA #$08 ; Menu ID #$08: Battle menu: item list window 1 ; control flow target (from $F4CD) 0x03F4CE|$0F:$F4BE:20 89 EB JSR $EB89 ; open menu specified by A 0x03F4D1|$0F:$F4C1:AE B1 60 LDX $60B1 0x03F4D4|$0F:$F4C4:D0 09 BNE $F4CF 0x03F4D6|$0F:$F4C6:C9 FF CMP #$FF 0x03F4D8|$0F:$F4C8:F0 1F BEQ $F4E9 0x03F4DA|$0F:$F4CA:AD AE 60 LDA $60AE ; menu link ID 0x03F4DD|$0F:$F4CD:D0 EF BNE $F4BE ; control flow target (from $F4C4) 0x03F4DF|$0F:$F4CF:AE AE 60 LDX $60AE ; menu link ID 0x03F4E2|$0F:$F4D2:E0 08 CPX #$08 ; Menu ID #$08: Battle menu: item list window 1 0x03F4E4|$0F:$F4D4:D0 07 BNE $F4DD ; menu link ID != #$08 => we're currently in Menu ID #$08: Battle menu: item list window 1, so no need to adjust A 0x03F4E6|$0F:$F4D6:C9 FF CMP #$FF ; #$FF stays #$FF 0x03F4E8|$0F:$F4D8:F0 0F BEQ $F4E9 0x03F4EA|$0F:$F4DA:18 CLC ; otherwise, we're in Menu ID #$22: Battle menu: item list window 2; menu displays 4 items per page, so add 4 to the selected item index 0x03F4EB|$0F:$F4DB:69 04 ADC #$04 ; control flow target (from $F4D4) 0x03F4ED|$0F:$F4DD:A2 04 LDX #$04 ; count all items 0x03F4EF|$0F:$F4DF:C9 FE CMP #$FE 0x03F4F1|$0F:$F4E1:B0 06 BCS $F4E9 0x03F4F3|$0F:$F4E3:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03F4F6|$0F:$F4E6:C8 ; $06:$8010; -> $06:$ADFC: given a selected list index in A, an item type in X, and a hero ID in $4A, set A to the A'th item of type X in hero $4A's inventory ; data -> code 0x03F4F7|$0F:$F4E7:29 3F AND #$3F ; strip off the equipped bit ; control flow target (from $F4C8, $F4D8, $F4E1) 0x03F4F9|$0F:$F4E9:4C C2 F6 JMP $F6C2 ; load bank specified by $94 ; control flow target (from $F4BA) 0x03F4FC|$0F:$F4EC:A9 FE LDA #$FE 0x03F4FE|$0F:$F4EE:60 RTS ; open battle command menu for hero A ; external control flow target (from $04:$B56E) 0x03F4FF|$0F:$F4EF:85 4A STA $4A 0x03F501|$0F:$F4F1:AA TAX 0x03F502|$0F:$F4F2:F0 1D BEQ $F511 ; if it's Midenhall, just display Midenhall's command menu 0x03F504|$0F:$F4F4:E0 01 CPX #$01 0x03F506|$0F:$F4F6:D0 07 BNE $F4FF ; branch if not Cannock 0x03F508|$0F:$F4F8:2C 2D 06 BIT $062D ; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03F50B|$0F:$F4FB:10 10 BPL $F50D ; Cannock: if Midenhall is dead, display alternate Cannock command menu 0x03F50D|$0F:$F4FD:70 0E BVS $F50D ; Cannock: if Midenhall is asleep, display alternate Cannock command menu ; control flow target (from $F4F6) 0x03F50F|$0F:$F4FF:2C 2D 06 BIT $062D ; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03F512|$0F:$F502:10 02 BPL $F506 ; Cannock would have taken the earlier BPL, so this is just Moonbrooke: if Midenhall is dead, check Cannock 0x03F514|$0F:$F504:50 0B BVC $F511 ; Cannock/Moonbrooke: if Midenhall is awake, display normal Cannock/Moonbrooke command menu ; control flow target (from $F502) 0x03F516|$0F:$F506:2C 3F 06 BIT $063F ; Cannock status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03F519|$0F:$F509:10 02 BPL $F50D ; Cannock must have taken one of the earlier BPL/BVS/BVC, so this is just Moonbrooke: if Cannock is dead, display alternate Moonbrooke command menu 0x03F51B|$0F:$F50B:50 04 BVC $F511 ; Cannock must have taken one of the earlier BPL/BVS/BVC, so this is just Moonbrooke: if Cannock is awake, display normal Moonbrooke command menu ; control flow target (from $F4FB, $F4FD, $F509) 0x03F51D|$0F:$F50D:A2 03 LDX #$03 ; index for alternate command menu 0x03F51F|$0F:$F50F:D0 00 BNE $F511 ; useless op ; control flow target (from $F4F2, $F504, $F50B, $F50F) 0x03F521|$0F:$F511:BD 17 F5 LDA $F517,X ; Battle command menus 0x03F524|$0F:$F514:4C 89 EB JMP $EB89 ; open menu specified by A ; code -> data ; Battle command menus ; indexed data load target (from $F511) 0x03F527|$0F:$F517:09 ; Menu ID #$09: Battle menu: Midenhall's command options 0x03F528|$0F:$F518:23 ; Menu ID #$23: Battle menu: Cannock/Moonbrooke's command options 0x03F529|$0F:$F519:23 ; Menu ID #$23: Battle menu: Cannock/Moonbrooke's command options 0x03F52A|$0F:$F51A:49 ; Menu ID #$49: Battle menu: Leader's command options when Midenhall asleep/dead ; data -> code ; display appropriate battle menu monster list ; external control flow target (from $04:$B5A9) 0x03F52B|$0F:$F51B:A5 4B LDA $4B ; flag for whether to display the selectable or non-selectable monster list 0x03F52D|$0F:$F51D:D0 05 BNE $F524 ; display Menu ID #$05: Battle menu: monster list, non-selectable 0x03F52F|$0F:$F51F:A9 0A LDA #$0A ; Menu ID #$0A: Battle menu: monster list, selectable 0x03F531|$0F:$F521:4C 89 EB JMP $EB89 ; open menu specified by A ; display Menu ID #$05: Battle menu: monster list, non-selectable ; control flow target (from $F51D) 0x03F534|$0F:$F524:A9 05 LDA #$05 ; Menu ID #$05: Battle menu: monster list, non-selectable 0x03F536|$0F:$F526:4C 89 EB JMP $EB89 ; open menu specified by A ; display appropriate battle menu item/spell target ; external control flow target (from $04:$B5E8) 0x03F539|$0F:$F529:20 5A F6 JSR $F65A ; set A and X to the current number of party members 0x03F53C|$0F:$F52C:F0 06 BEQ $F534 ; if just Midenhall, no need to display hero select menu 0x03F53E|$0F:$F52E:BD 34 F5 LDA $F534,X 0x03F541|$0F:$F531:20 89 EB JSR $EB89 ; open menu specified by A ; control flow target (from $F52C) ; indexed data load target (from $F52E) 0x03F544|$0F:$F534:60 RTS ; code -> data ; Battle item/spell target menus 0x03F545|$0F:$F535:0B ; Menu ID #$0B: Battle menu: Midenhall + Cannock item/spell target 0x03F546|$0F:$F536:24 ; Menu ID #$24: Battle menu: Midenhall + Cannock + Moonbrooke item/spell target ; data -> code ; display hero select STATUS menu if necessary ; external control flow target (from $06:$89CA) 0x03F547|$0F:$F537:20 5A F6 JSR $F65A ; set A and X to the current number of party members 0x03F54A|$0F:$F53A:F0 06 BEQ $F542 ; if just Midenhall, no need to display hero select menu 0x03F54C|$0F:$F53C:BD 42 F5 LDA $F542,X 0x03F54F|$0F:$F53F:20 89 EB JSR $EB89 ; open menu specified by A ; control flow target (from $F53A) ; indexed data load target (from $F53C) 0x03F552|$0F:$F542:60 RTS ; code -> data ; main STATUS hero select menus 0x03F553|$0F:$F543:0C ; Menu ID #$0C: Main menu: STATUS with Midenhall + Cannock 0x03F554|$0F:$F544:25 ; Menu ID #$25: Main menu: STATUS with Midenhall + Cannock + Moonbrooke ; data -> code ; depending on number of casters in party, maybe open caster select menu ; external control flow target (from $06:$8B36) 0x03F555|$0F:$F545:20 5A F6 JSR $F65A ; set A and X to the current number of party members 0x03F558|$0F:$F548:F0 10 BEQ $F55A ; if just Midenhall, no need to display hero select menu 0x03F55A|$0F:$F54A:CA DEX 0x03F55B|$0F:$F54B:F0 0A BEQ $F557 ; if only 2 party members, Midenhall can't use magic, so no need to display menu 0x03F55D|$0F:$F54D:A9 0D LDA #$0D ; Menu ID #$0D: Main menu: SPELL with Cannock + Moonbrooke 0x03F55F|$0F:$F54F:20 89 EB JSR $EB89 ; open menu specified by A 0x03F562|$0F:$F552:C9 FF CMP #$FF 0x03F564|$0F:$F554:F0 03 BEQ $F559 ; this is never true? 0x03F566|$0F:$F556:AA TAX ; control flow target (from $F54B) 0x03F567|$0F:$F557:E8 INX 0x03F568|$0F:$F558:8A TXA ; control flow target (from $F554) 0x03F569|$0F:$F559:60 RTS ; control flow target (from $F548) 0x03F56A|$0F:$F55A:A9 FE LDA #$FE 0x03F56C|$0F:$F55C:60 RTS ; display appropriate main ITEM hero select menu ; external control flow target (from $06:$955B, $06:$9CC9) 0x03F56D|$0F:$F55D:20 5A F6 JSR $F65A ; set A and X to the current number of party members 0x03F570|$0F:$F560:F0 06 BEQ $F568 ; if just Midenhall, no need to display hero select menu 0x03F572|$0F:$F562:BD 68 F5 LDA $F568,X 0x03F575|$0F:$F565:20 89 EB JSR $EB89 ; open menu specified by A ; control flow target (from $F560) ; indexed data load target (from $F562) 0x03F578|$0F:$F568:60 RTS ; code -> data ; main ITEM hero select menus 0x03F579|$0F:$F569:0E ; Menu ID #$0E: Main menu: ITEM with Midenhall + Cannock 0x03F57A|$0F:$F56A:26 ; Menu ID #$26: Main menu: ITEM with Midenhall + Cannock + Moonbrooke ; data -> code ; display appropriate main EQUIP hero select menu ; external control flow target (from $06:$8A02) 0x03F57B|$0F:$F56B:20 5A F6 JSR $F65A ; set A and X to the current number of party members 0x03F57E|$0F:$F56E:F0 06 BEQ $F576 ; if just Midenhall, no need to display hero select menu 0x03F580|$0F:$F570:BD 76 F5 LDA $F576,X 0x03F583|$0F:$F573:20 89 EB JSR $EB89 ; open menu specified by A ; control flow target (from $F56E) ; indexed data load target (from $F570) 0x03F586|$0F:$F576:60 RTS ; code -> data ; main EQUIP hero select menus 0x03F587|$0F:$F577:0F ; Menu ID #$0F: Main menu: EQUIP with Midenhall + Cannock 0x03F588|$0F:$F578:27 ; Menu ID #$27: Main menu: EQUIP with Midenhall + Cannock + Moonbrooke ; data -> code ; display appropriate main SPELL target menu ; external control flow target (from $06:$8B98) 0x03F589|$0F:$F579:20 5A F6 JSR $F65A ; set A and X to the current number of party members 0x03F58C|$0F:$F57C:F0 06 BEQ $F584 ; if just Midenhall, no need to display hero select menu 0x03F58E|$0F:$F57E:BD 84 F5 LDA $F584,X 0x03F591|$0F:$F581:20 89 EB JSR $EB89 ; open menu specified by A ; control flow target (from $F57C) ; indexed data load target (from $F57E) 0x03F594|$0F:$F584:60 RTS ; code -> data ; main COMMAND menu SPELL target menus 0x03F595|$0F:$F585:10 ; Menu ID #$10: Main menu: SPELL target, Midenhall + Cannock 0x03F596|$0F:$F586:28 ; Menu ID #$28: Main menu: SPELL target, Midenhall + Cannock + Moonbrooke ; data -> code ; display appropriate main ITEM target menu ; external control flow target (from $06:$95B1, $06:$9629, $06:$99C1) 0x03F597|$0F:$F587:20 5A F6 JSR $F65A ; set A and X to the current number of party members 0x03F59A|$0F:$F58A:F0 06 BEQ $F592 ; if just Midenhall, no need to display hero select menu 0x03F59C|$0F:$F58C:BD 92 F5 LDA $F592,X 0x03F59F|$0F:$F58F:20 89 EB JSR $EB89 ; open menu specified by A ; control flow target (from $F58A) ; indexed data load target (from $F58C) 0x03F5A2|$0F:$F592:60 RTS ; code -> data ; main COMMAND menu ITEM target menus 0x03F5A3|$0F:$F593:11 ; Menu ID #$11: Main menu: ITEM target, Midenhall + Cannock 0x03F5A4|$0F:$F594:29 ; Menu ID #$29: Main menu: ITEM target, Midenhall + Cannock + Moonbrooke ; data -> code ; display appropriate shop BUY/SELL hero select menu ; external control flow target (from $06:$830E, $06:$8427, $06:$8490, $06:$8589, $06:$85D2, $06:$862B) 0x03F5A5|$0F:$F595:20 5A F6 JSR $F65A ; set A and X to the current number of party members 0x03F5A8|$0F:$F598:F0 06 BEQ $F5A0 ; if just Midenhall, no need to display hero select menu 0x03F5AA|$0F:$F59A:BD A0 F5 LDA $F5A0,X 0x03F5AD|$0F:$F59D:20 89 EB JSR $EB89 ; open menu specified by A ; control flow target (from $F598) ; indexed data load target (from $F59A) 0x03F5B0|$0F:$F5A0:60 RTS ; code -> data ; shop menu BUY/SELL hero select menus 0x03F5B1|$0F:$F5A1:12 ; Menu ID #$12: Shop menu: buy/sell target, Midenhall + Cannock 0x03F5B2|$0F:$F5A2:2A ; Menu ID #$2A: Shop menu: buy/sell target, Midenhall + Cannock + Moonbrooke ; data -> code ; given a hero ID in A and an item type in X, display the EQUIP sub-menu for hero A and item type X, returning the selected item ID in A ; ##>hero ID ; external control flow target (from $06:$8A1D, $06:$8A2E) 0x03F5B3|$0F:$F5A3:85 4A STA $4A 0x03F5B5|$0F:$F5A5:86 96 STX $96 ; temp storage for item/spell/type/etc. IDs; item type 0x03F5B7|$0F:$F5A7:BD E8 F5 LDA $F5E8,X ; EQUIP sub-menu IDs 0x03F5BA|$0F:$F5AA:48 PHA ; EQUIP sub-menu ID 0x03F5BB|$0F:$F5AB:A5 A5 LDA $A5 0x03F5BD|$0F:$F5AD:48 PHA 0x03F5BE|$0F:$F5AE:20 EC D0 JSR $D0EC ; update each hero's stats based on their current EXP 0x03F5C1|$0F:$F5B1:68 PLA 0x03F5C2|$0F:$F5B2:85 A5 STA $A5 0x03F5C4|$0F:$F5B4:A9 07 LDA #$07 0x03F5C6|$0F:$F5B6:20 8C F7 JSR $F78C ; wipe selected menu region 0x03F5C9|$0F:$F5B9:A5 96 LDA $96 ; temp storage for item/spell/type/etc. IDs; item type 0x03F5CB|$0F:$F5BB:8D 9D 60 STA $609D ; menu function parameter 0x03F5CE|$0F:$F5BE:A9 00 LDA #$00 0x03F5D0|$0F:$F5C0:8D AA 60 STA $60AA ; menu format (#$80 = has cursor, #$40 = is linked, #$20 = is single spaced, #$02 = only display equipped items, #$01 = display [left border, equipped] if equipped) 0x03F5D3|$0F:$F5C3:20 B7 F1 JSR $F1B7 ; given hero ID in $4A and item type in $609D, set A = number of items of desired type in hero's inventory 0x03F5D6|$0F:$F5C6:D0 0E BNE $F5D6 ; if hero has items of this type, branch to display the EQUIP sub-menu 0x03F5D8|$0F:$F5C8:68 PLA ; EQUIP sub-menu ID 0x03F5D9|$0F:$F5C9:C9 2F CMP #$2F ; Menu ID #$2F: Main menu: equip helmet 0x03F5DB|$0F:$F5CB:D0 05 BNE $F5D2 ; if we're processing the final EQUIP sub-menu but hero has no helmets, leave the current Attack/Defense menu on the screen for a bit 0x03F5DD|$0F:$F5CD:A9 48 LDA #$48 ; Menu ID #$48: Main menu: Equip menu's current Attack/Defense 0x03F5DF|$0F:$F5CF:20 89 EB JSR $EB89 ; open menu specified by A ; control flow target (from $F5CB) 0x03F5E2|$0F:$F5D2:A9 FE LDA #$FE 0x03F5E4|$0F:$F5D4:D0 0F BNE $F5E5 ; load bank specified by $94 ; control flow target (from $F5C6) 0x03F5E6|$0F:$F5D6:A9 48 LDA #$48 ; Menu ID #$48: Main menu: Equip menu's current Attack/Defense 0x03F5E8|$0F:$F5D8:20 89 EB JSR $EB89 ; open menu specified by A 0x03F5EB|$0F:$F5DB:68 PLA ; EQUIP sub-menu 0x03F5EC|$0F:$F5DC:20 89 EB JSR $EB89 ; open menu specified by A 0x03F5EF|$0F:$F5DF:A6 96 LDX $96 ; temp storage for item/spell/type/etc. IDs; item type 0x03F5F1|$0F:$F5E1:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03F5F4|$0F:$F5E4:C8 ; $06:$8010; -> $06:$ADFC: given a selected list index in A, an item type in X, and a hero ID in $4A, set A to the A'th item of type X in hero $4A's inventory ; data -> code ; load bank specified by $94 ; control flow target (from $F5D4, $F5F5) 0x03F5F5|$0F:$F5E5:4C C2 F6 JMP $F6C2 ; load bank specified by $94 ; code -> data ; EQUIP sub-menu IDs ; indexed data load target (from $F5A7) 0x03F5F8|$0F:$F5E8:13 ; Menu ID #$13: Main menu: equip weapon 0x03F5F9|$0F:$F5E9:2D ; Menu ID #$2D: Main menu: equip armour 0x03F5FA|$0F:$F5EA:2E ; Menu ID #$2E: Main menu: equip shield 0x03F5FB|$0F:$F5EB:2F ; Menu ID #$2F: Main menu: equip helmet ; data -> code ; given hero ID - 1 in A, open hero's spell list and return selected spell ID in A ; external control flow target (from $06:$8B6E) 0x03F5FC|$0F:$F5EC:85 4A STA $4A ; hero ID - 1 0x03F5FE|$0F:$F5EE:A9 14 LDA #$14 ; Menu ID #$14: Main menu: spell list 0x03F600|$0F:$F5F0:20 89 EB JSR $EB89 ; open menu specified by A 0x03F603|$0F:$F5F3:C9 FF CMP #$FF 0x03F605|$0F:$F5F5:F0 EE BEQ $F5E5 ; load bank specified by $94 0x03F607|$0F:$F5F7:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03F60A|$0F:$F5FA:C9 ; $06:$8012; -> $06:$AE30: given hero ID - 1 in $4A and field spell menu selection index in A, return spell ID in A ; data -> code 0x03F60B|$0F:$F5FB:4C C2 F6 JMP $F6C2 ; load bank specified by $94 ; given a hero ID in A, open hero's item list and return selected item ID (or #$FE if they have no items) ; external control flow target (from $06:$84C1, $06:$9564, $06:$9CD8) 0x03F60E|$0F:$F5FE:85 4A STA $4A ; hero ID 0x03F610|$0F:$F600:A9 04 LDA #$04 ; count all items 0x03F612|$0F:$F602:8D 9D 60 STA $609D ; menu function parameter 0x03F615|$0F:$F605:20 B7 F1 JSR $F1B7 ; given hero ID in $4A and item type in $609D, set A = number of items of desired type in hero's inventory 0x03F618|$0F:$F608:F0 0E BEQ $F618 ; if no items, don't open the item list 0x03F61A|$0F:$F60A:A9 15 LDA #$15 ; Menu ID #$15: Main menu: item list 0x03F61C|$0F:$F60C:20 89 EB JSR $EB89 ; open menu specified by A 0x03F61F|$0F:$F60F:A2 04 LDX #$04 ; parameter for $06:$ADFC: count all items 0x03F621|$0F:$F611:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03F624|$0F:$F614:C8 ; $06:$8010; -> $06:$ADFC: given a selected list index in A, an item type in X, and a hero ID in $4A, set A to the A'th item of type X in hero $4A's inventory ; data -> code 0x03F625|$0F:$F615:4C C2 F6 JMP $F6C2 ; load bank specified by $94 ; control flow target (from $F608) 0x03F628|$0F:$F618:A9 FE LDA #$FE 0x03F62A|$0F:$F61A:60 RTS ; display shop menu item list for shop ID given in A, returning selected item (with Jailor's Key replaced by blank) in A ; external control flow target (from $06:$82DE, $06:$83CA) 0x03F62B|$0F:$F61B:8D AF 60 STA $60AF ; shop ID 0x03F62E|$0F:$F61E:A9 1B LDA #$1B ; Menu ID #$1B: Shop menu: current gold 0x03F630|$0F:$F620:20 89 EB JSR $EB89 ; open menu specified by A 0x03F633|$0F:$F623:A9 16 LDA #$16 ; Menu ID #$16: Shop menu: Item BUY list 0x03F635|$0F:$F625:20 89 EB JSR $EB89 ; open menu specified by A 0x03F638|$0F:$F628:C9 FF CMP #$FF 0x03F63A|$0F:$F62A:F0 0C BEQ $F638 0x03F63C|$0F:$F62C:8D AC 60 STA $60AC ; menu list index 0x03F63F|$0F:$F62F:20 7C F2 JSR $F27C ; given shop ID in $60AF and menu list index in $60AC, set A to the corresponding item ID 0x03F642|$0F:$F632:C9 39 CMP #$39 ; Item ID #$39: Jailor’s Key 0x03F644|$0F:$F634:D0 02 BNE $F638 0x03F646|$0F:$F636:A9 00 LDA #$00 ; control flow target (from $F62A, $F634) 0x03F648|$0F:$F638:4C C2 F6 JMP $F6C2 ; load bank specified by $94 ; display Menu ID #$1C: Main menu: status screen equipped items ; external control flow target (from $06:$89E1) 0x03F64B|$0F:$F63B:85 4A STA $4A 0x03F64D|$0F:$F63D:A9 1C LDA #$1C ; Menu ID #$1C: Main menu: status screen equipped items 0x03F64F|$0F:$F63F:4C 89 EB JMP $EB89 ; open menu specified by A ; display appropriate battle EXP + Gold menu ; external control flow target (from $04:$9940) 0x03F652|$0F:$F642:20 5A F6 JSR $F65A ; set A and X to the current number of party members 0x03F655|$0F:$F645:BD 4B F6 LDA $F64B,X ; Battle menu EXP + Gold 0x03F658|$0F:$F648:4C 89 EB JMP $EB89 ; open menu specified by A ; code -> data ; Battle menu EXP + Gold ; indexed data load target (from $F645) 0x03F65B|$0F:$F64B:1D ; Menu ID #$1D: Battle menu: Midenhall EXP + Gold 0x03F65C|$0F:$F64C:2B ; Menu ID #$2B: Battle menu: Midenhall + Cannock EXP + Gold 0x03F65D|$0F:$F64D:2C ; Menu ID #$2C: Battle menu: Midenhall + Cannock + Moonbrooke EXP + Gold ; data -> code ; display spell lists ; external control flow target (from $06:$89FC) 0x03F65E|$0F:$F64E:85 4A STA $4A 0x03F660|$0F:$F650:A9 30 LDA #$30 ; Menu ID #$30: Main menu: out-of-battle spell list 0x03F662|$0F:$F652:20 89 EB JSR $EB89 ; open menu specified by A 0x03F665|$0F:$F655:A9 31 LDA #$31 ; Menu ID #$31: Main menu: battle spell list 0x03F667|$0F:$F657:4C 89 EB JMP $EB89 ; open menu specified by A ; set A and X to the current number of party members ; control flow target (from $F529, $F537, $F545, $F55D, $F56B, $F579, $F587, $F595, $F642, $F685) 0x03F66A|$0F:$F65A:A2 00 LDX #$00 ; you always have Midenhall 0x03F66C|$0F:$F65C:AD 3F 06 LDA $063F ; Cannock status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03F66F|$0F:$F65F:29 04 AND #$04 ; pick out the In Party bit 0x03F671|$0F:$F661:F0 01 BEQ $F664 ; if Cannock not in party, don't INX; no Cannock => no Moonbrooke, so BEQ $F66C would be faster 0x03F673|$0F:$F663:E8 INX ; control flow target (from $F661) 0x03F674|$0F:$F664:AD 51 06 LDA $0651 ; Moonbrooke status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03F677|$0F:$F667:29 04 AND #$04 ; pick out the In Party bit 0x03F679|$0F:$F669:F0 01 BEQ $F66C ; if Moonbrooke not in party, don't INX 0x03F67B|$0F:$F66B:E8 INX ; control flow target (from $F669) 0x03F67C|$0F:$F66C:8A TXA 0x03F67D|$0F:$F66D:60 RTS ; do special effects for certain menus; sets A to menu ID ; control flow target (from $EB89) 0x03F67E|$0F:$F66E:C9 19 CMP #$19 ; Menu ID #$19: General menu: YES/NO 0x03F680|$0F:$F670:F0 1F BEQ $F691 ; YES/NO menu extra: play double beep SFX 0x03F682|$0F:$F672:C9 04 CMP #$04 ; Menu ID #$04: Dialogue window 0x03F684|$0F:$F674:F0 2D BEQ $F6A3 ; initialize main dialogue window 0x03F686|$0F:$F676:C9 06 CMP #$06 ; Menu ID #$06: Map menu: main COMMAND menu 0x03F688|$0F:$F678:F0 20 BEQ $F69A ; COMMAND menu extra: play single beep SFX 0x03F68A|$0F:$F67A:C9 02 CMP #$02 ; Menu ID #$02: Main menu: gold/crests 0x03F68C|$0F:$F67C:B0 11 BCS $F68F ; anything else > 1 just does SEC and RTS 0x03F68E|$0F:$F67E:85 10 STA $10 ; at this point A is either Menu ID #$00: Mini status window, bottom or Menu ID #$01: Mini status window, top and C is clear 0x03F690|$0F:$F680:0A ASL 0x03F691|$0F:$F681:65 10 ADC $10 0x03F693|$0F:$F683:85 10 STA $10 ; A = A * 3; 3 versions of each menu 0x03F695|$0F:$F685:20 5A F6 JSR $F65A ; set A and X to the current number of party members 0x03F698|$0F:$F688:18 CLC 0x03F699|$0F:$F689:65 10 ADC $10 ; add number of party members to menu type offset 0x03F69B|$0F:$F68B:AA TAX 0x03F69C|$0F:$F68C:BD C8 F6 LDA $F6C8,X ; mini status menu IDs ; control flow target (from $F67C) 0x03F69F|$0F:$F68F:38 SEC 0x03F6A0|$0F:$F690:60 RTS ; YES/NO menu extra: play double beep SFX ; control flow target (from $F670) 0x03F6A1|$0F:$F691:A9 86 LDA #$86 ; Music ID #$86: double beep SFX 0x03F6A3|$0F:$F693:20 61 C5 JSR $C561 ; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM]) 0x03F6A6|$0F:$F696:A9 19 LDA #$19 0x03F6A8|$0F:$F698:38 SEC 0x03F6A9|$0F:$F699:60 RTS ; COMMAND menu extra: play single beep SFX ; control flow target (from $F678) 0x03F6AA|$0F:$F69A:A9 85 LDA #$85 ; Music ID #$85: single beep SFX 0x03F6AC|$0F:$F69C:20 61 C5 JSR $C561 ; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM]) 0x03F6AF|$0F:$F69F:A9 06 LDA #$06 0x03F6B1|$0F:$F6A1:38 SEC 0x03F6B2|$0F:$F6A2:60 RTS ; initialize main dialogue window ; control flow target (from $F674) 0x03F6B3|$0F:$F6A3:A9 00 LDA #$00 0x03F6B5|$0F:$F6A5:8D D0 60 STA $60D0 0x03F6B8|$0F:$F6A8:8D D1 60 STA $60D1 0x03F6BB|$0F:$F6AB:A2 B0 LDX #$B0 ; write #$B0 [space] to $06F8-$07A7, a.k.a. blank out the main dialogue window 0x03F6BD|$0F:$F6AD:A9 5F LDA #$5F ; control flow target (from $F6B3) 0x03F6BF|$0F:$F6AF:9D F7 06 STA $06F7,X 0x03F6C2|$0F:$F6B2:CA DEX 0x03F6C3|$0F:$F6B3:D0 FA BNE $F6AF 0x03F6C5|$0F:$F6B5:A9 00 LDA #$00 0x03F6C7|$0F:$F6B7:85 7C STA $7C 0x03F6C9|$0F:$F6B9:85 7D STA $7D 0x03F6CB|$0F:$F6BB:8D C8 60 STA $60C8 ; speech sound effect / auto-indent flag 0x03F6CE|$0F:$F6BE:A9 04 LDA #$04 0x03F6D0|$0F:$F6C0:38 SEC 0x03F6D1|$0F:$F6C1:60 RTS ; load bank specified by $94 ; control flow target (from $F4AD, $F4E9, $F5E5, $F5FB, $F615, $F638, $FA65, $FC85, $FF94) 0x03F6D2|$0F:$F6C2:48 PHA 0x03F6D3|$0F:$F6C3:A5 94 LDA $94 ; return bank for various function calls, doubles as index of selected option for multiple-choice menus 0x03F6D5|$0F:$F6C5:4C 82 F7 JMP $F782 ; load bank specified by A then PLA ; code -> data ; mini status menu IDs ; indexed data load target (from $F68C) 0x03F6D8|$0F:$F6C8:00 ; Mini status window, bottom, Midenhall only 0x03F6D9|$0F:$F6C9:1E ; Mini status window, bottom, Midenhall + Cannock 0x03F6DA|$0F:$F6CA:1F ; Mini status window, bottom, Midenhall + Cannock + Moonbrooke 0x03F6DB|$0F:$F6CB:01 ; Mini status window, top, Midenhall only 0x03F6DC|$0F:$F6CC:20 ; Mini status window, top, Midenhall + Cannock 0x03F6DD|$0F:$F6CD:21 ; Mini status window, top, Midenhall + Cannock + Moonbrooke ; data -> code ; return number of party members - 1 in A/X ; control flow target (from $CDB5) ; external control flow target (from $06:$8223, $06:$82F1, $06:$83EE, $06:$8485, $06:$857E, $06:$85C7, $06:$8620, $06:$8FD2, $06:$9023, $06:$93A3, $06:$99AF, $06:$9C80, $06:$A241) 0x03F6DE|$0F:$F6CE:A0 00 LDY #$00 ; status index 0x03F6E0|$0F:$F6D0:A2 00 LDX #$00 ; party member counter 0x03F6E2|$0F:$F6D2:A9 03 LDA #$03 ; maximum number of party members 0x03F6E4|$0F:$F6D4:85 0C STA $0C ; remaining party members to check ; control flow target (from $F6E5) 0x03F6E6|$0F:$F6D6:B9 2D 06 LDA $062D,Y ; Midenhall status (80 = Alive, 40 = Sleep, 20 = Poison, 10 = ?, 08 = ?, 04 = In Party, 02 = Surround, 01 = Silence) 0x03F6E9|$0F:$F6D9:29 04 AND #$04 ; pick out the "In Party" bit 0x03F6EB|$0F:$F6DB:F0 01 BEQ $F6DE ; if member is in party, increment party member counter 0x03F6ED|$0F:$F6DD:E8 INX ; control flow target (from $F6DB) 0x03F6EE|$0F:$F6DE:98 TYA ; update status index for next party member 0x03F6EF|$0F:$F6DF:18 CLC 0x03F6F0|$0F:$F6E0:69 12 ADC #$12 ; hero data is #$12 bytes long 0x03F6F2|$0F:$F6E2:A8 TAY 0x03F6F3|$0F:$F6E3:C6 0C DEC $0C ; remaining party members to check 0x03F6F5|$0F:$F6E5:D0 EF BNE $F6D6 ; if more members to check, check them 0x03F6F7|$0F:$F6E7:CA DEX 0x03F6F8|$0F:$F6E8:8A TXA 0x03F6F9|$0F:$F6E9:60 RTS ; open main dialogue window and display string ID specified by byte following JSR ; control flow target (from $C83E, $CAA5, $CB90, $CBFC, $CC72) ; external control flow target (from $06:$80EF, $06:$8B83, $07:$81F3, $07:$8223, $07:$8234, $07:$827B, $07:$82E7, $07:$8351, $07:$8362, $07:$8369, $07:$83FE, $07:$84C7, $07:$8582) 0x03F6FA|$0F:$F6EA:20 FC F6 JSR $F6FC ; open main dialogue window, set A to string ID specified by byte following second JSR 0x03F6FD|$0F:$F6ED:4C 4A FA JMP $FA4A ; display string ID specified by A ; open main dialogue window and display string ID specified by byte following JSR + #$0100 ; external control flow target (from $06:$80C3, $06:$822E, $06:$82C3, $06:$839F, $06:$8553, $06:$86C0, $06:$8A49) 0x03F700|$0F:$F6F0:20 FC F6 JSR $F6FC ; open main dialogue window, set A to string ID specified by byte following second JSR 0x03F703|$0F:$F6F3:4C 4E FA JMP $FA4E ; display string ID specified by A + #$0100 ; open main dialogue window and display string ID specified by byte following JSR + #$0200 ; control flow target (from $C940, $C9AB, $C9F2, $CB2E, $CC4D) ; external control flow target (from $06:$80E1, $06:$81A6, $06:$82BC, $06:$9368, $06:$A2C6) 0x03F706|$0F:$F6F6:20 FC F6 JSR $F6FC ; open main dialogue window, set A to string ID specified by byte following second JSR 0x03F709|$0F:$F6F9:4C 52 FA JMP $FA52 ; display string ID specified by A + #$0200 ; open main dialogue window, set A to string ID specified by byte following second JSR ; control flow target (from $F6EA, $F6F0, $F6F6) 0x03F70C|$0F:$F6FC:20 76 EB JSR $EB76 ; open menu specified by next byte ; code -> data ; indirect data load target 0x03F70F|$0F:$F6FF:04 ; Menu ID #$04: Dialogue window ; data -> code 0x03F710|$0F:$F700:68 PLA ; first JSR's return address, low byte 0x03F711|$0F:$F701:85 0C STA $0C ; first JSR's return address, low byte 0x03F713|$0F:$F703:68 PLA ; first JSR's return address, high byte 0x03F714|$0F:$F704:85 0D STA $0D ; first JSR's return address, high byte 0x03F716|$0F:$F706:68 PLA ; second JSR's return address, low byte 0x03F717|$0F:$F707:18 CLC 0x03F718|$0F:$F708:69 01 ADC #$01 ; byte following second JSR is data 0x03F71A|$0F:$F70A:85 0E STA $0E ; second JSR's new return address, low byte 0x03F71C|$0F:$F70C:68 PLA ; second JSR's return address, high byte 0x03F71D|$0F:$F70D:69 00 ADC #$00 ; add carry from incrementing low byte 0x03F71F|$0F:$F70F:85 0F STA $0F 0x03F721|$0F:$F711:48 PHA ; second JSR's new return address, high byte 0x03F722|$0F:$F712:A5 0E LDA $0E ; second JSR's new return address, low byte 0x03F724|$0F:$F714:48 PHA ; second JSR's new return address, low byte 0x03F725|$0F:$F715:A0 00 LDY #$00 0x03F727|$0F:$F717:B1 0E LDA ($0E),Y ; read byte following second JSR 0x03F729|$0F:$F719:A8 TAY ; stash in Y for now 0x03F72A|$0F:$F71A:A5 0D LDA $0D ; first JSR's return address, high byte 0x03F72C|$0F:$F71C:48 PHA ; first JSR's return address, high byte 0x03F72D|$0F:$F71D:A5 0C LDA $0C ; first JSR's return address, low byte 0x03F72F|$0F:$F71F:48 PHA ; first JSR's return address, low byte 0x03F730|$0F:$F720:98 TYA ; copy desired menu ID to A 0x03F731|$0F:$F721:60 RTS ; restore the hero ID in A's MP by a random amount based on the Wizard's Ring's power; returns a random number between $03 and #$0A in A and $99 ; external control flow target (from $06:$97FE) 0x03F732|$0F:$F722:20 66 F7 JSR $F766 ; load ROM bank #$04 ; call to code in a different bank ($04:$8003) 0x03F735|$0F:$F725:20 03 80 JSR $8003 ; restore the hero ID in A's MP by a random amount based on the Wizard's Ring's power; returns a random number between $03 and #$0A in A and $99 0x03F738|$0F:$F728:4C 61 F7 JMP $F761 ; load ROM bank #$06 ; heal hero ID in A by random amount based on healing power in X ; identical to $0F:$D146 ; external control flow target (from $06:$95F3) 0x03F73B|$0F:$F72B:20 66 F7 JSR $F766 ; load ROM bank #$04 ; call to code in a different bank ($04:$8006) 0x03F73E|$0F:$F72E:20 06 80 JSR $8006 0x03F741|$0F:$F731:4C 61 F7 JMP $F761 ; load ROM bank #$06 ; set $8F-$90 to EXP required to reach next level ; external control flow target (from $06:$9473) 0x03F744|$0F:$F734:20 66 F7 JSR $F766 ; load ROM bank #$04 ; call to code in a different bank ($04:$800C) 0x03F747|$0F:$F737:20 0C 80 JSR $800C ; set $8F-$90 to EXP required to reach next level 0x03F74A|$0F:$F73A:4C 61 F7 JMP $F761 ; load ROM bank #$06 ; calls $04:$99E6 ; external control flow target (from $06:$9900, $06:$990C, $06:$995B, $06:$99A0) 0x03F74D|$0F:$F73D:20 66 F7 JSR $F766 ; load ROM bank #$04 ; call to code in a different bank ($04:$8012) 0x03F750|$0F:$F740:20 12 80 JSR $8012 0x03F753|$0F:$F743:4C 61 F7 JMP $F761 ; load ROM bank #$06 ; external control flow target (from $04:$A176) 0x03F756|$0F:$F746:20 61 F7 JSR $F761 ; load ROM bank #$06 0x03F759|$0F:$F749:A0 06 LDY #$06 0x03F75B|$0F:$F74B:84 94 STY $94 ; return bank for various function calls, doubles as index of selected option for multiple-choice menus ; call to code in a different bank ($06:$9829) 0x03F75D|$0F:$F74D:20 29 98 JSR $9829 0x03F760|$0F:$F750:A0 04 LDY #$04 0x03F762|$0F:$F752:84 94 STY $94 ; return bank for various function calls, doubles as index of selected option for multiple-choice menus 0x03F764|$0F:$F754:4C 66 F7 JMP $F766 ; load ROM bank #$04 ; code -> data ; table of first item IDs for each item type ; external indexed data load target (from $06:$8A68) 0x03F767|$0F:$F757:01 ; Weapons ; external indexed data load target (from $06:$8A6D) 0x03F768|$0F:$F758:11 ; Armour 0x03F769|$0F:$F759:1C ; Helmets 0x03F76A|$0F:$F75A:21 ; Shields 0x03F76B|$0F:$F75B:24 ; non-EQUIP items ; data -> code ; load ROM bank #$00 ; control flow target (from $C6A8, $D21D, $D231, $D23E, $D250, $D29C, $D2A9, $D302, $D334, $D494, $E41D, $E43F) 0x03F76C|$0F:$F75C:48 PHA 0x03F76D|$0F:$F75D:A9 00 LDA #$00 0x03F76F|$0F:$F75F:F0 21 BEQ $F782 ; load bank specified by A then PLA ; load ROM bank #$06 ; control flow target (from $C6ED, $C70C, $C786, $C89B, $CCAC, $CD48, $CF67, $D0F2, $D14C, $D156, $D164, $D215, $D23B, $D259, $D2EC, $D2F4, $D32B, $D57E, $E435, $E8B2, $EEC9, $F255, $F289, $F728, $F731, $F73A, $F743, $F746) 0x03F771|$0F:$F761:48 PHA 0x03F772|$0F:$F762:A9 06 LDA #$06 0x03F774|$0F:$F764:D0 1C BNE $F782 ; load bank specified by A then PLA ; load ROM bank #$04 ; control flow target (from $C771, $C8EC, $C95C, $D0EC, $D146, $D1A4, $D1C9, $D200, $D25C, $F722, $F72B, $F734, $F73D, $F754) 0x03F776|$0F:$F766:48 PHA 0x03F777|$0F:$F767:A9 04 LDA #$04 0x03F779|$0F:$F769:D0 17 BNE $F782 ; load bank specified by A then PLA ; laod ROM bank #$01 0x03F77B|$0F:$F76B:48 PHA 0x03F77C|$0F:$F76C:A9 01 LDA #$01 0x03F77E|$0F:$F76E:D0 12 BNE $F782 ; load bank specified by A then PLA ; load ROM bank #$02 ; control flow target (from $CF61, $D369, $D5B6, $D7D4, $D7EE, $D890, $DECE, $DF86, $E169, $E3E8, $E445, $E461, $E4DF, $E94A, $F9AA, $FA8A, $FE3A) 0x03F780|$0F:$F770:48 PHA 0x03F781|$0F:$F771:A9 02 LDA #$02 0x03F783|$0F:$F773:D0 0D BNE $F782 ; load bank specified by A then PLA ; load ROM bank #$03 ; control flow target (from $C680, $D17C, $D517, $D7A6, $D81C, $D8D0, $DB96, $DC9C, $DFC9, $E2F9) 0x03F785|$0F:$F775:48 PHA 0x03F786|$0F:$F776:A9 03 LDA #$03 0x03F788|$0F:$F778:D0 08 BNE $F782 ; load bank specified by A then PLA ; load ROM bank #$07 ; control flow target (from $D969) 0x03F78A|$0F:$F77A:48 PHA 0x03F78B|$0F:$F77B:A9 07 LDA #$07 0x03F78D|$0F:$F77D:D0 03 BNE $F782 ; load bank specified by A then PLA ; load ROM bank #$05 0x03F78F|$0F:$F77F:48 PHA 0x03F790|$0F:$F780:A9 05 LDA #$05 ; load bank specified by A then PLA ; control flow target (from $EB95, $F31E, $F6C5, $F75F, $F764, $F769, $F76E, $F773, $F778, $F77D) 0x03F792|$0F:$F782:20 D5 C3 JSR $C3D5 ; save A to $05F6, X to $43, and load bank specified by A 0x03F795|$0F:$F785:68 PLA 0x03F796|$0F:$F786:60 RTS ; control flow target (from $CF70) 0x03F797|$0F:$F787:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03F79A|$0F:$F78A:41 ; $02:$8002 ; data -> code 0x03F79B|$0F:$F78B:60 RTS ; wipe selected menu region ; control flow target (from $CF6A, $D130, $D135, $D13A, $E5BB, $F5B6) ; external control flow target (from $04:$9ACC) 0x03F79C|$0F:$F78C:85 0C STA $0C ; A values of #$00, #$01, #$02, and #$05 wipe all menus; #$03, #$04, #$06, and #$07 do not 0x03F79E|$0F:$F78E:C9 05 CMP #$05 0x03F7A0|$0F:$F790:F0 04 BEQ $F796 0x03F7A2|$0F:$F792:C9 03 CMP #$03 0x03F7A4|$0F:$F794:B0 02 BCS $F798 ; control flow target (from $F790) 0x03F7A6|$0F:$F796:A9 00 LDA #$00 ; control flow target (from $F794) 0x03F7A8|$0F:$F798:85 2E STA $2E ; whether to wipe all menus (#$00) or not 0x03F7AA|$0F:$F79A:A5 0C LDA $0C 0x03F7AC|$0F:$F79C:0A ASL 0x03F7AD|$0F:$F79D:0A ASL 0x03F7AE|$0F:$F79E:A8 TAY 0x03F7AF|$0F:$F79F:B9 DB F8 LDA $F8DB,Y 0x03F7B2|$0F:$F7A2:29 0F AND #$0F 0x03F7B4|$0F:$F7A4:85 0C STA $0C 0x03F7B6|$0F:$F7A6:38 SEC 0x03F7B7|$0F:$F7A7:E9 08 SBC #$08 0x03F7B9|$0F:$F7A9:0A ASL 0x03F7BA|$0F:$F7AA:85 18 STA $18 0x03F7BC|$0F:$F7AC:B9 DC F8 LDA $F8DC,Y 0x03F7BF|$0F:$F7AF:85 0E STA $0E 0x03F7C1|$0F:$F7B1:48 PHA 0x03F7C2|$0F:$F7B2:0A ASL 0x03F7C3|$0F:$F7B3:0A ASL 0x03F7C4|$0F:$F7B4:0A ASL 0x03F7C5|$0F:$F7B5:0A ASL 0x03F7C6|$0F:$F7B6:05 0C ORA $0C 0x03F7C8|$0F:$F7B8:8D 7C 60 STA $607C 0x03F7CB|$0F:$F7BB:68 PLA 0x03F7CC|$0F:$F7BC:38 SEC 0x03F7CD|$0F:$F7BD:E9 07 SBC #$07 0x03F7CF|$0F:$F7BF:0A ASL 0x03F7D0|$0F:$F7C0:85 19 STA $19 0x03F7D2|$0F:$F7C2:B9 DD F8 LDA $F8DD,Y 0x03F7D5|$0F:$F7C5:85 53 STA $53 0x03F7D7|$0F:$F7C7:85 4E STA $4E 0x03F7D9|$0F:$F7C9:B9 DE F8 LDA $F8DE,Y 0x03F7DC|$0F:$F7CC:85 54 STA $54 0x03F7DE|$0F:$F7CE:A5 53 LDA $53 0x03F7E0|$0F:$F7D0:0A ASL 0x03F7E1|$0F:$F7D1:65 18 ADC $18 0x03F7E3|$0F:$F7D3:85 18 STA $18 0x03F7E5|$0F:$F7D5:85 4D STA $4D 0x03F7E7|$0F:$F7D7:A5 4E LDA $4E 0x03F7E9|$0F:$F7D9:29 0F AND #$0F 0x03F7EB|$0F:$F7DB:18 CLC 0x03F7EC|$0F:$F7DC:69 01 ADC #$01 0x03F7EE|$0F:$F7DE:09 10 ORA #$10 0x03F7F0|$0F:$F7E0:8D 7B 60 STA $607B 0x03F7F3|$0F:$F7E3:20 31 DE JSR $DE31 0x03F7F6|$0F:$F7E6:A5 07 LDA $07 0x03F7F8|$0F:$F7E8:85 4F STA $4F 0x03F7FA|$0F:$F7EA:A5 08 LDA $08 0x03F7FC|$0F:$F7EC:85 50 STA $50 ; control flow target (from $F85C) 0x03F7FE|$0F:$F7EE:A5 4E LDA $4E 0x03F800|$0F:$F7F0:0A ASL 0x03F801|$0F:$F7F1:8D 9E 60 STA $609E ; menu current column ; control flow target (from $F838) 0x03F804|$0F:$F7F4:A4 53 LDY $53 0x03F806|$0F:$F7F6:A5 2E LDA $2E ; whether to wipe all menus (#$00) or not 0x03F808|$0F:$F7F8:F0 2B BEQ $F825 ; display background tiles 0x03F80A|$0F:$F7FA:C9 03 CMP #$03 0x03F80C|$0F:$F7FC:F0 0A BEQ $F808 0x03F80E|$0F:$F7FE:C9 07 CMP #$07 0x03F810|$0F:$F800:F0 06 BEQ $F808 0x03F812|$0F:$F802:A9 10 LDA #$10 0x03F814|$0F:$F804:85 1E STA $1E 0x03F816|$0F:$F806:D0 0E BNE $F816 ; control flow target (from $F7FC, $F800) 0x03F818|$0F:$F808:A9 00 LDA #$00 0x03F81A|$0F:$F80A:85 1E STA $1E 0x03F81C|$0F:$F80C:B1 4F LDA ($4F),Y ; screen map of background vs. menu tile 0x03F81E|$0F:$F80E:F0 15 BEQ $F825 ; display background tiles 0x03F820|$0F:$F810:C9 FF CMP #$FF 0x03F822|$0F:$F812:F0 11 BEQ $F825 ; display background tiles 0x03F824|$0F:$F814:A9 00 LDA #$00 ; control flow target (from $F806) 0x03F826|$0F:$F816:20 70 F8 JSR $F870 0x03F829|$0F:$F819:90 0A BCC $F825 ; display background tiles 0x03F82B|$0F:$F81B:A9 00 LDA #$00 0x03F82D|$0F:$F81D:85 1C STA $1C 0x03F82F|$0F:$F81F:20 AA F9 JSR $F9AA ; display menu tiles 0x03F832|$0F:$F822:4C 32 F8 JMP $F832 ; control flow target (from $F7F8, $F80E, $F812, $F819) 0x03F835|$0F:$F825:A9 00 LDA #$00 0x03F837|$0F:$F827:A4 53 LDY $53 0x03F839|$0F:$F829:91 4F STA ($4F),Y ; update screen map to show background tiles 0x03F83B|$0F:$F82B:85 1C STA $1C 0x03F83D|$0F:$F82D:85 1E STA $1E 0x03F83F|$0F:$F82F:20 47 F9 JSR $F947 ; menu and background code paths rejoin here ; control flow target (from $F822) 0x03F842|$0F:$F832:C6 18 DEC $18 0x03F844|$0F:$F834:C6 18 DEC $18 0x03F846|$0F:$F836:C6 53 DEC $53 0x03F848|$0F:$F838:10 BA BPL $F7F4 0x03F84A|$0F:$F83A:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03F84D|$0F:$F83D:C0 ; $06:$8000 ; data -> code 0x03F84E|$0F:$F83E:AD 7C 60 LDA $607C 0x03F851|$0F:$F841:38 SEC 0x03F852|$0F:$F842:E9 10 SBC #$10 0x03F854|$0F:$F844:8D 7C 60 STA $607C 0x03F857|$0F:$F847:A5 4F LDA $4F 0x03F859|$0F:$F849:38 SEC 0x03F85A|$0F:$F84A:E9 10 SBC #$10 0x03F85C|$0F:$F84C:85 4F STA $4F 0x03F85E|$0F:$F84E:A5 4D LDA $4D 0x03F860|$0F:$F850:85 18 STA $18 0x03F862|$0F:$F852:A5 4E LDA $4E 0x03F864|$0F:$F854:85 53 STA $53 0x03F866|$0F:$F856:C6 19 DEC $19 0x03F868|$0F:$F858:C6 19 DEC $19 0x03F86A|$0F:$F85A:C6 54 DEC $54 0x03F86C|$0F:$F85C:10 90 BPL $F7EE 0x03F86E|$0F:$F85E:A5 35 LDA $35 ; flag indicating whether any menu is currently open 0x03F870|$0F:$F860:F0 09 BEQ $F86B 0x03F872|$0F:$F862:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03F875|$0F:$F865:20 CB D8 JSR $D8CB 0x03F878|$0F:$F868:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF ; control flow target (from $F860) 0x03F87B|$0F:$F86B:A5 94 LDA $94 ; return bank for various function calls, doubles as index of selected option for multiple-choice menus 0x03F87D|$0F:$F86D:4C D5 C3 JMP $C3D5 ; save A to $05F6, X to $43, and load bank specified by A ; control flow target (from $F816) 0x03F880|$0F:$F870:A8 TAY 0x03F881|$0F:$F871:D0 17 BNE $F88A 0x03F883|$0F:$F873:A5 54 LDA $54 0x03F885|$0F:$F875:AE 9E 60 LDX $609E ; menu current column 0x03F888|$0F:$F878:C9 04 CMP #$04 0x03F88A|$0F:$F87A:B0 1F BCS $F89B 0x03F88C|$0F:$F87C:E0 08 CPX #$08 0x03F88E|$0F:$F87E:B0 1B BCS $F89B 0x03F890|$0F:$F880:0A ASL 0x03F891|$0F:$F881:0A ASL 0x03F892|$0F:$F882:0A ASL 0x03F893|$0F:$F883:0A ASL 0x03F894|$0F:$F884:85 10 STA $10 0x03F896|$0F:$F886:8A TXA 0x03F897|$0F:$F887:0A ASL 0x03F898|$0F:$F888:65 10 ADC $10 ; control flow target (from $F871) 0x03F89A|$0F:$F88A:18 CLC 0x03F89B|$0F:$F88B:6D FD F8 ADC $F8FD 0x03F89E|$0F:$F88E:85 10 STA $10 0x03F8A0|$0F:$F890:A9 00 LDA #$00 0x03F8A2|$0F:$F892:6D FE F8 ADC $F8FE 0x03F8A5|$0F:$F895:85 11 STA $11 0x03F8A7|$0F:$F897:85 1E STA $1E 0x03F8A9|$0F:$F899:D0 3C BNE $F8D7 ; control flow target (from $F87A, $F87E) 0x03F8AB|$0F:$F89B:C9 08 CMP #$08 0x03F8AD|$0F:$F89D:D0 3A BNE $F8D9 0x03F8AF|$0F:$F89F:AD 92 04 LDA $0492 0x03F8B2|$0F:$F8A2:F0 35 BEQ $F8D9 0x03F8B4|$0F:$F8A4:AD FB F8 LDA $F8FB 0x03F8B7|$0F:$F8A7:85 10 STA $10 0x03F8B9|$0F:$F8A9:AD FC F8 LDA $F8FC 0x03F8BC|$0F:$F8AC:85 11 STA $11 0x03F8BE|$0F:$F8AE:A9 77 LDA #$77 0x03F8C0|$0F:$F8B0:8D B5 60 STA $60B5 0x03F8C3|$0F:$F8B3:8D B6 60 STA $60B6 0x03F8C6|$0F:$F8B6:85 1E STA $1E 0x03F8C8|$0F:$F8B8:8A TXA 0x03F8C9|$0F:$F8B9:18 CLC 0x03F8CA|$0F:$F8BA:69 07 ADC #$07 0x03F8CC|$0F:$F8BC:AA TAX 0x03F8CD|$0F:$F8BD:BD F8 06 LDA $06F8,X ; start of main dialogue window 0x03F8D0|$0F:$F8C0:8D B7 60 STA $60B7 0x03F8D3|$0F:$F8C3:BD F9 06 LDA $06F9,X 0x03F8D6|$0F:$F8C6:8D B8 60 STA $60B8 0x03F8D9|$0F:$F8C9:E0 15 CPX #$15 0x03F8DB|$0F:$F8CB:D0 0A BNE $F8D7 0x03F8DD|$0F:$F8CD:A9 7C LDA #$7C 0x03F8DF|$0F:$F8CF:8D B6 60 STA $60B6 0x03F8E2|$0F:$F8D2:A9 7B LDA #$7B 0x03F8E4|$0F:$F8D4:8D B8 60 STA $60B8 ; control flow target (from $F899, $F8CB) 0x03F8E7|$0F:$F8D7:38 SEC 0x03F8E8|$0F:$F8D8:60 RTS ; control flow target (from $F89D, $F8A2) 0x03F8E9|$0F:$F8D9:18 CLC 0x03F8EA|$0F:$F8DA:60 RTS ; code -> data ; byte 1 sets $0C and ((byte 1) - #$08) << 1 sets $18 ; byte 2 sets $0E, ((byte 2) << 4) | (byte 1) sets $607C, ((byte 2) - #$07) << 1 sets $19 ; byte 3 sets $53 and $4E ; byte 4 sets $54 and stuff: $18, $4D, $607B ; maybe (X start, Y start, width, height)? ; indexed data load target (from $F79F) 0x03F8EB|$0F:$F8DB:02 ; indexed data load target (from $F7AC) 0x03F8EC|$0F:$F8DC: 0D ; indexed data load target (from $F7C2) 0x03F8ED|$0F:$F8DD: 0C ; indexed data load target (from $F7C9) 0x03F8EE|$0F:$F8DE: 03 ; anything in the dialogue window area, including the mini-status menu and bottom of the full status menu 0x03F8EF|$0F:$F8DF:02 09 0C 08 ; anything in the top area, including main COMMAND/STATUS/SPELL menu 0x03F8F3|$0F:$F8E3:0A 06 03 03 ; YES/NO menu 0x03F8F7|$0F:$F8E7:06 09 07 08 ; item list in SELL menu 0x03F8FB|$0F:$F8EB:02 0D 0B 04 ; bottom battle menu region 0x03F8FF|$0F:$F8EF:02 0D 0B 04 ; ??? 0x03F903|$0F:$F8F3:02 0D 03 04 ; ??? 0x03F907|$0F:$F8F7:06 0A 07 09 ; EQUIP sub-menu ; data load target (from $F8A4) 0x03F90B|$0F:$F8FB:B5 ; data load target (from $F8A9) 0x03F90C|$0F:$F8FC:60 ; data load target (from $F88B) 0x03F90D|$0F:$F8FD:FF ; data load target (from $F892) 0x03F90E|$0F:$F8FE:F8 ; tiles for redrawing the part of the main COMMAND menu obscured by the EQUIP sub-menu when the EQUIP sub-menu is closed; (only?) read outside of battle ; indirect data load target 0x03F90F|$0F:$F8FF:24 31 5F 5F 0x03F913|$0F:$F903:27 77 5F 5F 0x03F917|$0F:$F907:77 77 5F 5F 0x03F91B|$0F:$F90B:77 7C 5F 7B 0x03F91F|$0F:$F90F:5F 5F 5F 5F 0x03F923|$0F:$F913:36 33 5F 5F 0x03F927|$0F:$F917:28 2F 5F 5F 0x03F92B|$0F:$F91B:2F 7B 5F 7B 0x03F92F|$0F:$F91F:5F 5F 5F 5F 0x03F933|$0F:$F923:2C 37 5F 5F 0x03F937|$0F:$F927:28 30 5F 5F 0x03F93B|$0F:$F92B:5F 7B 5F 7B 0x03F93F|$0F:$F92F:5F 5F 7D 7D 0x03F943|$0F:$F933:28 34 7D 7D 0x03F947|$0F:$F937:38 2C 7D 7D 0x03F94B|$0F:$F93B:33 7B 7D 7E ; indexed data load target (from $FA00, $FA06) 0x03F94F|$0F:$F93F:CB 83 ; $02:$83CB 0x03F951|$0F:$F941:6B 84 ; $02:$846B 0x03F953|$0F:$F943:33 85 ; $02:$8533 0x03F955|$0F:$F945:FB 85 ; $02:$85FB ; data -> code ; control flow target (from $F82F) 0x03F957|$0F:$F947:A5 18 LDA $18 0x03F959|$0F:$F949:0A ASL 0x03F95A|$0F:$F94A:A5 18 LDA $18 0x03F95C|$0F:$F94C:6A ROR 0x03F95D|$0F:$F94D:18 CLC 0x03F95E|$0F:$F94E:65 16 ADC $16 ; current map X-pos (1) 0x03F960|$0F:$F950:85 0C STA $0C 0x03F962|$0F:$F952:A5 19 LDA $19 0x03F964|$0F:$F954:0A ASL 0x03F965|$0F:$F955:A5 19 LDA $19 0x03F967|$0F:$F957:6A ROR 0x03F968|$0F:$F958:18 CLC 0x03F969|$0F:$F959:65 17 ADC $17 ; current map Y-pos (1) 0x03F96B|$0F:$F95B:85 0E STA $0E 0x03F96D|$0F:$F95D:20 89 DF JSR $DF89 0x03F970|$0F:$F960:20 22 E2 JSR $E222 0x03F973|$0F:$F963:A5 1D LDA $1D 0x03F975|$0F:$F965:C5 0D CMP $0D 0x03F977|$0F:$F967:F0 22 BEQ $F98B 0x03F979|$0F:$F969:A5 0C LDA $0C 0x03F97B|$0F:$F96B:C9 28 CMP #$28 0x03F97D|$0F:$F96D:B0 1C BCS $F98B 0x03F97F|$0F:$F96F:A5 1D LDA $1D 0x03F981|$0F:$F971:D0 14 BNE $F987 0x03F983|$0F:$F973:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03F985|$0F:$F975:C9 01 CMP #$01 0x03F987|$0F:$F977:F0 0A BEQ $F983 0x03F989|$0F:$F979:A5 0C LDA $0C 0x03F98B|$0F:$F97B:C9 08 CMP #$08 0x03F98D|$0F:$F97D:90 04 BCC $F983 0x03F98F|$0F:$F97F:C9 0C CMP #$0C 0x03F991|$0F:$F981:90 08 BCC $F98B ; control flow target (from $F977, $F97D) 0x03F993|$0F:$F983:A9 20 LDA #$20 0x03F995|$0F:$F985:D0 02 BNE $F989 ; control flow target (from $F971) 0x03F997|$0F:$F987:A9 24 LDA #$24 ; control flow target (from $F985) 0x03F999|$0F:$F989:85 0C STA $0C ; control flow target (from $F967, $F96D, $F981) 0x03F99B|$0F:$F98B:A5 1C LDA $1C 0x03F99D|$0F:$F98D:C9 FF CMP #$FF 0x03F99F|$0F:$F98F:D0 07 BNE $F998 0x03F9A1|$0F:$F991:A5 0C LDA $0C 0x03F9A3|$0F:$F993:C9 20 CMP #$20 0x03F9A5|$0F:$F995:90 0C BCC $F9A3 0x03F9A7|$0F:$F997:60 RTS ; control flow target (from $F98F) 0x03F9A8|$0F:$F998:C9 FE CMP #$FE 0x03F9AA|$0F:$F99A:D0 0B BNE $F9A7 0x03F9AC|$0F:$F99C:A5 0C LDA $0C 0x03F9AE|$0F:$F99E:C9 20 CMP #$20 0x03F9B0|$0F:$F9A0:B0 01 BCS $F9A3 0x03F9B2|$0F:$F9A2:60 RTS ; control flow target (from $F995, $F9A0) 0x03F9B3|$0F:$F9A3:A9 00 LDA #$00 0x03F9B5|$0F:$F9A5:85 1C STA $1C ; control flow target (from $F99A) 0x03F9B7|$0F:$F9A7:20 F6 F9 JSR $F9F6 ; control flow target (from $F81F) 0x03F9BA|$0F:$F9AA:20 70 F7 JSR $F770 ; load ROM bank #$02 0x03F9BD|$0F:$F9AD:A0 00 LDY #$00 0x03F9BF|$0F:$F9AF:8C 9F 60 STY $609F ; menu current row 0x03F9C2|$0F:$F9B2:B1 10 LDA ($10),Y 0x03F9C4|$0F:$F9B4:20 0E FA JSR $FA0E 0x03F9C7|$0F:$F9B7:C8 INY 0x03F9C8|$0F:$F9B8:B1 10 LDA ($10),Y 0x03F9CA|$0F:$F9BA:20 0E FA JSR $FA0E 0x03F9CD|$0F:$F9BD:C8 INY 0x03F9CE|$0F:$F9BE:CE 9E 60 DEC $609E ; menu current column 0x03F9D1|$0F:$F9C1:CE 9E 60 DEC $609E ; menu current column 0x03F9D4|$0F:$F9C4:A9 01 LDA #$01 0x03F9D6|$0F:$F9C6:8D 9F 60 STA $609F ; menu current row 0x03F9D9|$0F:$F9C9:B1 10 LDA ($10),Y 0x03F9DB|$0F:$F9CB:20 0E FA JSR $FA0E 0x03F9DE|$0F:$F9CE:C8 INY 0x03F9DF|$0F:$F9CF:B1 10 LDA ($10),Y 0x03F9E1|$0F:$F9D1:20 0E FA JSR $FA0E 0x03F9E4|$0F:$F9D4:C8 INY 0x03F9E5|$0F:$F9D5:A9 00 LDA #$00 0x03F9E7|$0F:$F9D7:A6 1E LDX $1E 0x03F9E9|$0F:$F9D9:D0 04 BNE $F9DF 0x03F9EB|$0F:$F9DB:B1 10 LDA ($10),Y 0x03F9ED|$0F:$F9DD:29 03 AND #$03 ; control flow target (from $F9D9) 0x03F9EF|$0F:$F9DF:48 PHA 0x03F9F0|$0F:$F9E0:AD 9E 60 LDA $609E ; menu current column 0x03F9F3|$0F:$F9E3:38 SEC 0x03F9F4|$0F:$F9E4:E9 02 SBC #$02 0x03F9F6|$0F:$F9E6:4A LSR 0x03F9F7|$0F:$F9E7:AA TAX 0x03F9F8|$0F:$F9E8:68 PLA 0x03F9F9|$0F:$F9E9:9D 6B 60 STA $606B,X 0x03F9FC|$0F:$F9EC:AD 9E 60 LDA $609E ; menu current column 0x03F9FF|$0F:$F9EF:38 SEC 0x03FA00|$0F:$F9F0:E9 04 SBC #$04 0x03FA02|$0F:$F9F2:8D 9E 60 STA $609E ; menu current column 0x03FA05|$0F:$F9F5:60 RTS ; control flow target (from $F9A7) 0x03FA06|$0F:$F9F6:A5 1F LDA $1F ; some kind of map type (#$00: World Map, #$01: other non-dungeon maps, #$02: maps #$2B - #$43 inclusive, #$03: maps >= #$44, #$FF => game menu) 0x03FA08|$0F:$F9F8:0A ASL 0x03FA09|$0F:$F9F9:A8 TAY 0x03FA0A|$0F:$F9FA:A5 0C LDA $0C 0x03FA0C|$0F:$F9FC:0A ASL 0x03FA0D|$0F:$F9FD:0A ASL 0x03FA0E|$0F:$F9FE:65 0C ADC $0C 0x03FA10|$0F:$FA00:79 3F F9 ADC $F93F,Y 0x03FA13|$0F:$FA03:85 10 STA $10 0x03FA15|$0F:$FA05:C8 INY 0x03FA16|$0F:$FA06:B9 3F F9 LDA $F93F,Y 0x03FA19|$0F:$FA09:69 00 ADC #$00 0x03FA1B|$0F:$FA0B:85 11 STA $11 0x03FA1D|$0F:$FA0D:60 RTS ; control flow target (from $F9B4, $F9BA, $F9CB, $F9D1) 0x03FA1E|$0F:$FA0E:48 PHA 0x03FA1F|$0F:$FA0F:A2 00 LDX #$00 0x03FA21|$0F:$FA11:AD 9F 60 LDA $609F ; menu current row 0x03FA24|$0F:$FA14:F0 06 BEQ $FA1C 0x03FA26|$0F:$FA16:A5 4E LDA $4E 0x03FA28|$0F:$FA18:0A ASL 0x03FA29|$0F:$FA19:69 02 ADC #$02 0x03FA2B|$0F:$FA1B:AA TAX ; control flow target (from $FA14) 0x03FA2C|$0F:$FA1C:8A TXA 0x03FA2D|$0F:$FA1D:18 CLC 0x03FA2E|$0F:$FA1E:6D 9E 60 ADC $609E ; menu current column 0x03FA31|$0F:$FA21:AA TAX 0x03FA32|$0F:$FA22:68 PLA 0x03FA33|$0F:$FA23:9D 0B 60 STA $600B,X 0x03FA36|$0F:$FA26:EE 9E 60 INC $609E ; menu current column 0x03FA39|$0F:$FA29:60 RTS ; display string ID specified by next byte ; control flow target (from $C856, $CC0A, $D160) ; external control flow target (from $06:$80D6, $06:$8BBD, $06:$8BF8, $06:$8C18, $06:$8CCD, $06:$947F, $06:$94ED, $06:$94FB, $06:$950E, $06:$9515, $06:$9534, $06:$9538, $06:$9BEB, $06:$9C5B, $06:$A228, $07:$8377, $07:$8591) 0x03FA3A|$0F:$FA2A:A2 00 LDX #$00 0x03FA3C|$0F:$FA2C:F0 06 BEQ $FA34 ; display string ID specified by next byte + #$0100 ; external control flow target (from $02:$B2D2, $06:$8102, $06:$810B, $06:$8246, $06:$828D, $06:$8291, $06:$8298, $06:$829C, $06:$82CE, $06:$82D5, $06:$82EA, $06:$82FF, $06:$830A, $06:$8327, $06:$8341, $06:$8348, $06:$8358, $06:$835C, $06:$837C, $06:$83B2, $06:$83B9, $06:$83C4, $06:$83E7, $06:$83FF, $06:$840D, $06:$8423, $06:$843B, $06:$843F, $06:$844A, $06:$8451, $06:$8465, $06:$847E, $06:$848C, $06:$84B0, $06:$84B7, $06:$84FE, $06:$8502, $06:$8514, $06:$851F, $06:$8532, $06:$8547, $06:$8557, $06:$8563, $06:$856A, $06:$8585, $06:$859C, $06:$85AB, $06:$85CE, $06:$85F3, $06:$8602, $06:$8627, $06:$8641, $06:$8650, $06:$8672, $06:$8679, $06:$8694, $06:$869D, $06:$86CB, $06:$86DE, $06:$86EA, $06:$86F5, $06:$86FC, $06:$8707, $06:$871F, $06:$8738, $06:$8AB6, $06:$8ADC, $06:$8AF8, $06:$8B4E, $06:$8B62, $06:$8C3C, $06:$8C8D, $06:$91DC, $06:$9529, $06:$9577, $06:$95A0, $06:$95C9, $06:$963D, $06:$9647, $06:$965A, $06:$9668, $06:$9673, $06:$9685, $06:$96C9, $06:$96D7, $06:$96F2, $06:$96FE, $06:$973C, $06:$9750, $06:$979A, $06:$97ED, $06:$97F8, $06:$9805, $06:$9813, $06:$981E, $06:$988E, $06:$98CB, $06:$9903, $06:$9908, $06:$990F, $06:$992F, $06:$993B, $06:$995E, $06:$9963, $06:$999C, $06:$99A3, $06:$99BA, $06:$99E8, $06:$99F5, $06:$99F9, $06:$9A10, $06:$9A29, $06:$9A5B, $06:$9A62, $06:$9A72, $06:$9A7D, $06:$9AA2, $06:$9AAF, $06:$9ABD, $06:$9AC4, $06:$9AF4, $06:$9B7D, $06:$9B8A, $06:$9B92, $06:$9BAF, $06:$9BB3, $06:$9BBA, $06:$9BFE, $06:$9C30, $06:$9C62, $06:$9CAA, $06:$9CBA, $06:$9CC5, $06:$9CD2, $06:$9CF9, $06:$9D0E, $06:$9D30, $06:$9D3F, $06:$A24B, $06:$BB57, $06:$BB5B, $06:$BB67, $06:$BB73, $06:$BB7C, $06:$BBAF, $06:$BBD3, $06:$BC26) 0x03FA3E|$0F:$FA2E:A2 20 LDX #$20 0x03FA40|$0F:$FA30:D0 02 BNE $FA34 ; display string ID specified by next byte + #$0200 ; control flow target (from $CA35) ; external control flow target (from $02:$B2EB, $06:$8163, $06:$83D5, $06:$841A, $06:$8E39, $06:$8E3D, $06:$8ED5, $06:$8EF6, $06:$8EFA, $06:$8F05, $06:$8F11, $06:$8F1C, $06:$8F29, $06:$8F32, $06:$8F47, $06:$8F58, $06:$8F63, $06:$8F94, $06:$8FB1, $06:$8FD7, $06:$8FEF, $06:$8FFE, $06:$9002, $06:$9012, $06:$9028, $06:$9055, $06:$905E, $06:$9065, $06:$907C, $06:$908E, $06:$909A, $06:$90A1, $06:$90BF, $06:$9102, $06:$910B, $06:$9117, $06:$916E, $06:$917E, $06:$9185, $06:$9190, $06:$91A8, $06:$91B3, $06:$91D0, $06:$91E6, $06:$91ED, $06:$91FA, $06:$9201, $06:$920C, $06:$9213, $06:$928B, $06:$9292, $06:$92E7, $06:$930B, $06:$933E, $06:$9348, $06:$9384, $06:$93EB, $06:$93F2, $06:$93F9, $06:$9407, $06:$9437, $06:$9446, $06:$9458, $06:$945F, $06:$9486, $06:$9817, $06:$A2E5, $06:$BD37, $06:$BD56) 0x03FA42|$0F:$FA32:A2 40 LDX #$40 ; control flow target (from $FA2C, $FA30) 0x03FA44|$0F:$FA34:68 PLA ; low byte of return address 0x03FA45|$0F:$FA35:18 CLC 0x03FA46|$0F:$FA36:69 01 ADC #$01 ; increment it (byte following the JSR is data) 0x03FA48|$0F:$FA38:85 0E STA $0E ; store to $0E 0x03FA4A|$0F:$FA3A:68 PLA ; high byte of return address 0x03FA4B|$0F:$FA3B:69 00 ADC #$00 ; add carry from incrementing low byte 0x03FA4D|$0F:$FA3D:85 0F STA $0F ; store to $0F 0x03FA4F|$0F:$FA3F:48 PHA ; push the new return address's high byte 0x03FA50|$0F:$FA40:A5 0E LDA $0E 0x03FA52|$0F:$FA42:48 PHA ; push the new return address's low byte 0x03FA53|$0F:$FA43:A0 00 LDY #$00 0x03FA55|$0F:$FA45:B1 0E LDA ($0E),Y ; load the byte following the original JSR 0x03FA57|$0F:$FA47:4C 54 FA JMP $FA54 ; display string ID specified by A ; control flow target (from $D196, $F6ED) ; external control flow target (from $04:$97F4, $04:$98C3, $04:$9CC7, $06:$94B8, $06:$94CB, $06:$94DE, $06:$A99F) 0x03FA5A|$0F:$FA4A:A2 00 LDX #$00 0x03FA5C|$0F:$FA4C:F0 06 BEQ $FA54 ; display string ID specified by A + #$0100 ; control flow target (from $F6F3) ; external control flow target (from $02:$B334, $04:$9CC4, $06:$95D8, $06:$97E3, $06:$98AC, $06:$98C7, $06:$992B, $06:$9A41, $06:$9B2D, $06:$9D49, $06:$A0CF) 0x03FA5E|$0F:$FA4E:A2 20 LDX #$20 0x03FA60|$0F:$FA50:D0 02 BNE $FA54 ; display string ID specified by A + #$0200 ; control flow target (from $F6F9) ; external control flow target (from $06:$8E30, $06:$8E51, $06:$8E64, $06:$8F7F, $06:$8FA6, $06:$8FC6, $06:$9039, $06:$90B9, $06:$90E9, $06:$90FC, $06:$9147, $06:$9168, $06:$9248, $06:$92F8, $06:$9326, $06:$9338, $06:$9359, $06:$9395, $06:$93B8, $06:$93DB) 0x03FA62|$0F:$FA52:A2 40 LDX #$40 ; control flow target (from $FA47, $FA4C, $FA50) 0x03FA64|$0F:$FA54:20 68 FA JSR $FA68 ; figure out which bank the string is in, scan to start of string 0x03FA67|$0F:$FA57:20 A7 FA JSR $FAA7 ; initialize text engine variables ; control flow target (from $FA63) 0x03FA6A|$0F:$FA5A:20 24 FB JSR $FB24 0x03FA6D|$0F:$FA5D:20 63 FB JSR $FB63 0x03FA70|$0F:$FA60:20 C8 FA JSR $FAC8 ; CLC if we've read an end token, otherwise (probably?) print word to screen and SEC 0x03FA73|$0F:$FA63:90 F5 BCC $FA5A 0x03FA75|$0F:$FA65:4C C2 F6 JMP $F6C2 ; load bank specified by $94 ; figure out which bank the string is in, scan to start of string ; control flow target (from $FA54) 0x03FA78|$0F:$FA68:20 6E FA JSR $FA6E ; text engine: determine which ROM bank to load based on string index 0x03FA7B|$0F:$FA6B:4C 8A FA JMP $FA8A ; given a string ID in X (high, << 5) + A (low), scan to start of string ; text engine: determine which ROM bank to load based on string index ; IN: ; A = low byte of string index ; X = high byte of string index << 5 (for easy adding later) ; Y and C irrelevant ; ; OUT: no change to A or X ; Y = index of ROM bank to swap in to read the string from ; C not used, but does indicate whether we ended up choosing bank 5 (clear) or 2 (set) ; control flow target (from $FA68) 0x03FA7E|$0F:$FA6E:A0 05 LDY #$05 ; default to bank 5 0x03FA80|$0F:$FA70:48 PHA ; save the original string index in A 0x03FA81|$0F:$FA71:29 F0 AND #$F0 ; useless op 0x03FA83|$0F:$FA73:4A LSR 0x03FA84|$0F:$FA74:4A LSR 0x03FA85|$0F:$FA75:4A LSR 0x03FA86|$0F:$FA76:4A LSR 0x03FA87|$0F:$FA77:85 10 STA $10 ; 16 strings per pointer, so low byte of string index >> 4 = low nybble of pointer index 0x03FA89|$0F:$FA79:8A TXA 0x03FA8A|$0F:$FA7A:29 E0 AND #$E0 0x03FA8C|$0F:$FA7C:4A LSR ; A = high nybble of pointer index 0x03FA8D|$0F:$FA7D:05 10 ORA $10 ; glue the high and low nybbles of the pointer index together into a single byte 0x03FA8F|$0F:$FA7F:C9 2E CMP #$2E 0x03FA91|$0F:$FA81:90 02 BCC $FA85 ; if the pointer index < #$2E, keep the bank 5 default 0x03FA93|$0F:$FA83:A0 02 LDY #$02 ; if the pointer index >= #$2E, load bank 2 instead ; control flow target (from $FA81) 0x03FA95|$0F:$FA85:8C C6 60 STY $60C6 ; ROM bank containing the desired text string 0x03FA98|$0F:$FA88:68 PLA ; restore the original string index in A ; control flow target (from $D12B) ; external control flow target (from $06:$9542, $06:$9550) 0x03FA99|$0F:$FA89:60 RTS ; given a string ID in X (high, << 5) + A (low), scan to start of string ; control flow target (from $FA6B) 0x03FA9A|$0F:$FA8A:20 70 F7 JSR $F770 ; load ROM bank #$02 0x03FA9D|$0F:$FA8D:86 11 STX $11 ; save high byte of string index to $11 0x03FA9F|$0F:$FA8F:85 10 STA $10 ; save low byte of string index to $10 0x03FAA1|$0F:$FA91:4A LSR ; 16 strings per 2-byte pointer = >> 4 + << 1 a.k.a. >> 3 + & #$1E 0x03FAA2|$0F:$FA92:4A LSR 0x03FAA3|$0F:$FA93:4A LSR 0x03FAA4|$0F:$FA94:29 1E AND #$1E 0x03FAA6|$0F:$FA96:18 CLC 0x03FAA7|$0F:$FA97:65 11 ADC $11 ; add high byte of string index to get pointer index 0x03FAA9|$0F:$FA99:A8 TAY 0x03FAAA|$0F:$FA9A:B9 52 B7 LDA $B752,Y ; -> $05:$8000: main script strings, part 1 0x03FAAD|$0F:$FA9D:85 55 STA $55 ; pointer to start of sub pointer data, low byte 0x03FAAF|$0F:$FA9F:B9 53 B7 LDA $B753,Y 0x03FAB2|$0F:$FAA2:85 56 STA $56 ; pointer to start of sub pointer data, high byte 0x03FAB4|$0F:$FAA4:4C B3 FD JMP $FDB3 ; scan through group of strings until we find the start of the desired string ; initialize text engine variables ; control flow target (from $FA57) 0x03FAB7|$0F:$FAA7:A9 00 LDA #$00 0x03FAB9|$0F:$FAA9:8D C8 60 STA $60C8 ; speech sound effect / auto-indent flag 0x03FABC|$0F:$FAAC:8D CA 60 STA $60CA ; unused text engine variable 0x03FABF|$0F:$FAAF:8D CC 60 STA $60CC ; text engine end token flag 0x03FAC2|$0F:$FAB2:8D C9 60 STA $60C9 ; count (only used as flag) of interpolated variable bytes read from $60F1 0x03FAC5|$0F:$FAB5:8D D2 60 STA $60D2 ; read index within current dictionary entry 0x03FAC8|$0F:$FAB8:A9 08 LDA #$08 0x03FACA|$0F:$FABA:8D C7 60 STA $60C7 0x03FACD|$0F:$FABD:A5 7C LDA $7C 0x03FACF|$0F:$FABF:8D CE 60 STA $60CE 0x03FAD2|$0F:$FAC2:A5 7D LDA $7D 0x03FAD4|$0F:$FAC4:8D CF 60 STA $60CF 0x03FAD7|$0F:$FAC7:60 RTS ; CLC if we've read an end token, otherwise (probably?) print word to screen and SEC ; control flow target (from $FA60) 0x03FAD8|$0F:$FAC8:AD CC 60 LDA $60CC ; text engine end token flag 0x03FADB|$0F:$FACB:D0 02 BNE $FACF 0x03FADD|$0F:$FACD:18 CLC 0x03FADE|$0F:$FACE:60 RTS ; control flow target (from $FACB) 0x03FADF|$0F:$FACF:A6 7D LDX $7D 0x03FAE1|$0F:$FAD1:AD D0 60 LDA $60D0 0x03FAE4|$0F:$FAD4:D0 03 BNE $FAD9 0x03FAE6|$0F:$FAD6:8E D0 60 STX $60D0 ; control flow target (from $FAD4) 0x03FAE9|$0F:$FAD9:AD D1 60 LDA $60D1 0x03FAEC|$0F:$FADC:D0 03 BNE $FAE1 0x03FAEE|$0F:$FADE:8E D1 60 STX $60D1 ; control flow target (from $FADC) 0x03FAF1|$0F:$FAE1:A5 8E LDA $8E ; flag for in battle or not (#$FF)? 0x03FAF3|$0F:$FAE3:10 26 BPL $FB0B 0x03FAF5|$0F:$FAE5:A5 7D LDA $7D 0x03FAF7|$0F:$FAE7:C9 01 CMP #$01 0x03FAF9|$0F:$FAE9:F0 01 BEQ $FAEC 0x03FAFB|$0F:$FAEB:4A LSR ; control flow target (from $FAE9) 0x03FAFC|$0F:$FAEC:18 CLC 0x03FAFD|$0F:$FAED:69 01 ADC #$01 0x03FAFF|$0F:$FAEF:85 9C STA $9C ; control flow target (from $FB08) 0x03FB01|$0F:$FAF1:38 SEC 0x03FB02|$0F:$FAF2:A5 7D LDA $7D 0x03FB04|$0F:$FAF4:ED CF 60 SBC $60CF 0x03FB07|$0F:$FAF7:90 12 BCC $FB0B 0x03FB09|$0F:$FAF9:F0 10 BEQ $FB0B 0x03FB0B|$0F:$FAFB:C9 01 CMP #$01 0x03FB0D|$0F:$FAFD:F0 03 BEQ $FB02 0x03FB0F|$0F:$FAFF:20 0D FB JSR $FB0D ; control flow target (from $FAFD) 0x03FB12|$0F:$FB02:20 0D FB JSR $FB0D 0x03FB15|$0F:$FB05:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03FB18|$0F:$FB08:4C F1 FA JMP $FAF1 ; control flow target (from $FAE3, $FAF7, $FAF9) 0x03FB1B|$0F:$FB0B:38 SEC 0x03FB1C|$0F:$FB0C:60 RTS ; control flow target (from $FAFF, $FB02) 0x03FB1D|$0F:$FB0D:AD CF 60 LDA $60CF 0x03FB20|$0F:$FB10:48 PHA 0x03FB21|$0F:$FB11:EE CF 60 INC $60CF 0x03FB24|$0F:$FB14:20 A2 FD JSR $FDA2 ; 16-bit multiplication: set 16-bit ($10-$11) = A * #$16; returns low byte in A and clears C 0x03FB27|$0F:$FB17:8D 85 60 STA $6085 0x03FB2A|$0F:$FB1A:68 PLA 0x03FB2B|$0F:$FB1B:18 CLC 0x03FB2C|$0F:$FB1C:69 13 ADC #$13 0x03FB2E|$0F:$FB1E:8D 84 60 STA $6084 0x03FB31|$0F:$FB21:4C 0F FD JMP $FD0F ; control flow target (from $FA5A) 0x03FB34|$0F:$FB24:20 B8 FB JSR $FBB8 ; read a main script word into word buffer $60D9 0x03FB37|$0F:$FB27:2C CA 60 BIT $60CA ; unused text engine variable 0x03FB3A|$0F:$FB2A:30 36 BMI $FB62 0x03FB3C|$0F:$FB2C:A5 7C LDA $7C 0x03FB3E|$0F:$FB2E:8D 9E 60 STA $609E ; menu current column 0x03FB41|$0F:$FB31:A9 00 LDA #$00 0x03FB43|$0F:$FB33:8D 89 60 STA $6089 ; string word buffer index 2 ; control flow target (from $FB4E) 0x03FB46|$0F:$FB36:AE 89 60 LDX $6089 ; string word buffer index 2 0x03FB49|$0F:$FB39:BD D9 60 LDA $60D9,X ; start of string word buffer 0x03FB4C|$0F:$FB3C:EE 89 60 INC $6089 ; string word buffer index 2 0x03FB4F|$0F:$FB3F:C9 5F CMP #$5F ; [space] 0x03FB51|$0F:$FB41:F0 0D BEQ $FB50 0x03FB53|$0F:$FB43:C9 FA CMP #$FA ; [end-FA] 0x03FB55|$0F:$FB45:B0 09 BCS $FB50 0x03FB57|$0F:$FB47:EE 9E 60 INC $609E ; menu current column 0x03FB5A|$0F:$FB4A:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03FB5D|$0F:$FB4D:45 ; $02:$800A; -> $02:$B677: CLC if end of word, SEC otherwise ; data -> code 0x03FB5E|$0F:$FB4E:B0 E6 BCS $FB36 ; control flow target (from $FB41, $FB45) 0x03FB60|$0F:$FB50:CE 9E 60 DEC $609E ; menu current column 0x03FB63|$0F:$FB53:AD 9E 60 LDA $609E ; menu current column 0x03FB66|$0F:$FB56:10 06 BPL $FB5E 0x03FB68|$0F:$FB58:AD C8 60 LDA $60C8 ; speech sound effect / auto-indent flag 0x03FB6B|$0F:$FB5B:8D 9E 60 STA $609E ; menu current column ; control flow target (from $FB56) 0x03FB6E|$0F:$FB5E:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03FB71|$0F:$FB61:47 ; $02:$800E; -> $02:$B687: if menu current column < #$16, CLC and RTS, otherwise do stuff ; data -> code ; control flow target (from $FB2A) 0x03FB72|$0F:$FB62:60 RTS ; control flow target (from $FA5D) 0x03FB73|$0F:$FB63:A2 00 LDX #$00 0x03FB75|$0F:$FB65:8E CB 60 STX $60CB ; string word buffer index 1 ; control flow target (from $FB7E) 0x03FB78|$0F:$FB68:AE CB 60 LDX $60CB ; string word buffer index 1 0x03FB7B|$0F:$FB6B:BD D9 60 LDA $60D9,X ; start of string word buffer 0x03FB7E|$0F:$FB6E:EE CB 60 INC $60CB ; string word buffer index 1 0x03FB81|$0F:$FB71:C9 FA CMP #$FA 0x03FB83|$0F:$FB73:B0 0C BCS $FB81 0x03FB85|$0F:$FB75:48 PHA 0x03FB86|$0F:$FB76:20 37 FD JSR $FD37 0x03FB89|$0F:$FB79:68 PLA 0x03FB8A|$0F:$FB7A:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03FB8D|$0F:$FB7D:45 ; $02:$800A; -> $02:$B677: CLC if end of word, SEC otherwise ; data -> code 0x03FB8E|$0F:$FB7E:B0 E8 BCS $FB68 0x03FB90|$0F:$FB80:60 RTS ; control flow target (from $FB73) 0x03FB91|$0F:$FB81:C9 FB CMP #$FB ; [wait]; implies [line] 0x03FB93|$0F:$FB83:F0 12 BEQ $FB97 0x03FB95|$0F:$FB85:C9 FC CMP #$FC ; [end-FC] 0x03FB97|$0F:$FB87:F0 24 BEQ $FBAD 0x03FB99|$0F:$FB89:C9 FD CMP #$FD 0x03FB9B|$0F:$FB8B:F0 1B BEQ $FBA8 0x03FB9D|$0F:$FB8D:C9 FE CMP #$FE ; [line] 0x03FB9F|$0F:$FB8F:F0 12 BEQ $FBA3 ; set text engine end token flag $60CC and RTS ; FA/FF handler + end of FC handler ; control flow target (from $FBB5) 0x03FBA1|$0F:$FB91:A9 FF LDA #$FF 0x03FBA3|$0F:$FB93:8D CC 60 STA $60CC ; text engine end token flag 0x03FBA6|$0F:$FB96:60 RTS ; FB handler: [wait] ; control flow target (from $FB83) 0x03FBA7|$0F:$FB97:A5 8E LDA $8E ; flag for in battle or not (#$FF)? 0x03FBA9|$0F:$FB99:30 0C BMI $FBA7 0x03FBAB|$0F:$FB9B:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03FBAE|$0F:$FB9E:46 ; $02:$800C ; data -> code 0x03FBAF|$0F:$FB9F:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03FBB2|$0F:$FBA2:48 ; $02:$8010 ; data -> code ; FE handler: [line] ; control flow target (from $FB8F) 0x03FBB3|$0F:$FBA3:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03FBB6|$0F:$FBA6:46 ; $02:$800C ; data -> code ; control flow target (from $FB99) 0x03FBB7|$0F:$FBA7:60 RTS ; FD handler ; control flow target (from $FB8B) 0x03FBB8|$0F:$FBA8:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03FBBB|$0F:$FBAB:40 ; $02:$8000; -> $02:$B68F: handler for control code #$FD ; data -> code 0x03FBBC|$0F:$FBAC:60 RTS ; FC handler: [end-FC] ; control flow target (from $FB87) 0x03FBBD|$0F:$FBAD:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03FBC0|$0F:$FBB0:46 ; $02:$800C ; data -> code 0x03FBC1|$0F:$FBB1:A9 00 LDA #$00 0x03FBC3|$0F:$FBB3:85 7C STA $7C 0x03FBC5|$0F:$FBB5:4C 91 FB JMP $FB91 ; set text engine end token flag $60CC and RTS ; read a main script word into word buffer $60D9 ; control flow target (from $FB24) 0x03FBC8|$0F:$FBB8:A9 00 LDA #$00 0x03FBCA|$0F:$FBBA:8D CB 60 STA $60CB ; string word buffer index 1 ; control flow target (from $FBDA) 0x03FBCD|$0F:$FBBD:20 DD FB JSR $FBDD ; return next byte of string in A 0x03FBD0|$0F:$FBC0:C9 FE CMP #$FE ; useless op 0x03FBD2|$0F:$FBC2:D0 00 BNE $FBC4 ; useless op ; control flow target (from $FBC2) 0x03FBD4|$0F:$FBC4:C9 65 CMP #$65 ; "‘" 0x03FBD6|$0F:$FBC6:D0 05 BNE $FBCD ; "‘" enables speech sound effect 0x03FBD8|$0F:$FBC8:A2 01 LDX #$01 0x03FBDA|$0F:$FBCA:8E C8 60 STX $60C8 ; speech sound effect / auto-indent flag ; control flow target (from $FBC6) 0x03FBDD|$0F:$FBCD:AE CB 60 LDX $60CB ; string word buffer index 1 0x03FBE0|$0F:$FBD0:9D D9 60 STA $60D9,X ; start of string word buffer 0x03FBE3|$0F:$FBD3:EE CB 60 INC $60CB ; string word buffer index 1 0x03FBE6|$0F:$FBD6:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03FBE9|$0F:$FBD9:45 ; $02:$800A; -> $02:$B677: CLC if end of word, SEC otherwise ; data -> code 0x03FBEA|$0F:$FBDA:B0 E1 BCS $FBBD ; if not end of word, keep reading more string bytes 0x03FBEC|$0F:$FBDC:60 RTS ; return next byte of string in A ; control flow target (from $FBBD) 0x03FBED|$0F:$FBDD:AE C9 60 LDX $60C9 ; count (only used as flag) of interpolated variable bytes read from $60F1 0x03FBF0|$0F:$FBE0:F0 12 BEQ $FBF4 ; if we're not in "read from $60F1" mode, read next string byte from ROM ; control flow target (from $FBFC) 0x03FBF2|$0F:$FBE2:BD F1 60 LDA $60F1,X ; start of text variable buffer 0x03FBF5|$0F:$FBE5:EE C9 60 INC $60C9 ; count (only used as flag) of interpolated variable bytes read from $60F1 0x03FBF8|$0F:$FBE8:C9 FA CMP #$FA ; [end-FA] 0x03FBFA|$0F:$FBEA:D0 07 BNE $FBF3 ; if not [end-FA], use it 0x03FBFC|$0F:$FBEC:A2 00 LDX #$00 ; otherwise reset read index and "read from $60F1" flag 0x03FBFE|$0F:$FBEE:8E C9 60 STX $60C9 ; count (only used as flag) of interpolated variable bytes read from $60F1 0x03FC01|$0F:$FBF1:F0 01 BEQ $FBF4 ; and read next string token from ROM ; control flow target (from $FBEA, $FBF8) 0x03FC03|$0F:$FBF3:60 RTS ; control flow target (from $FBE0, $FBF1) 0x03FC04|$0F:$FBF4:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03FC07|$0F:$FBF7:4A ; $02:$8014; -> $02:$BE00: read the next text token and interpolate any variable control codes; SEC to trigger read of [end-FA]-terminated string from $60F1, CLC to use A ; data -> code 0x03FC08|$0F:$FBF8:90 F9 BCC $FBF3 ; CLC means to use value in A, so RTS 0x03FC0A|$0F:$FBFA:A2 00 LDX #$00 ; else, SEC means to read from $60F1, so initialize read index to #$00 0x03FC0C|$0F:$FBFC:4C E2 FB JMP $FBE2 ; and start reading ; external control flow target (from $04:$9ADB, $04:$9B46) 0x03FC0F|$0F:$FBFF:29 0F AND #$0F 0x03FC11|$0F:$FC01:C9 0F CMP #$0F 0x03FC13|$0F:$FC03:F0 0E BEQ $FC13 0x03FC15|$0F:$FC05:C9 0E CMP #$0E 0x03FC17|$0F:$FC07:F0 14 BEQ $FC1D 0x03FC19|$0F:$FC09:C9 0C CMP #$0C 0x03FC1B|$0F:$FC0B:D0 06 BNE $FC13 0x03FC1D|$0F:$FC0D:AD D1 60 LDA $60D1 0x03FC20|$0F:$FC10:4C 25 FC JMP $FC25 ; control flow target (from $FC03, $FC0B) 0x03FC23|$0F:$FC13:A9 00 LDA #$00 0x03FC25|$0F:$FC15:8D D0 60 STA $60D0 0x03FC28|$0F:$FC18:8D D1 60 STA $60D1 0x03FC2B|$0F:$FC1B:F0 08 BEQ $FC25 ; control flow target (from $FC07) 0x03FC2D|$0F:$FC1D:A9 00 LDA #$00 0x03FC2F|$0F:$FC1F:8D D1 60 STA $60D1 0x03FC32|$0F:$FC22:AD D0 60 LDA $60D0 ; control flow target (from $FC10, $FC1B) 0x03FC35|$0F:$FC25:85 7D STA $7D 0x03FC37|$0F:$FC27:0A ASL 0x03FC38|$0F:$FC28:69 02 ADC #$02 0x03FC3A|$0F:$FC2A:85 00 STA $00 0x03FC3C|$0F:$FC2C:A9 00 LDA #$00 0x03FC3E|$0F:$FC2E:85 7C STA $7C ; control flow target (from $FC32) 0x03FC40|$0F:$FC30:A5 00 LDA $00 0x03FC42|$0F:$FC32:D0 FC BNE $FC30 0x03FC44|$0F:$FC34:A9 FF LDA #$FF 0x03FC46|$0F:$FC36:85 00 STA $00 0x03FC48|$0F:$FC38:A2 08 LDX #$08 0x03FC4A|$0F:$FC3A:20 EE C1 JSR $C1EE ; set $6007 = #$00, set $00 = #$01, wait for X interrupts, set $00 = #$FF 0x03FC4D|$0F:$FC3D:A5 7D LDA $7D 0x03FC4F|$0F:$FC3F:20 A2 FD JSR $FDA2 ; 16-bit multiplication: set 16-bit ($10-$11) = A * #$16; returns low byte in A and clears C 0x03FC52|$0F:$FC42:65 7C ADC $7C 0x03FC54|$0F:$FC44:AA TAX 0x03FC55|$0F:$FC45:A9 5F LDA #$5F ; control flow target (from $FC4D) 0x03FC57|$0F:$FC47:9D F8 06 STA $06F8,X ; start of main dialogue window 0x03FC5A|$0F:$FC4A:E8 INX 0x03FC5B|$0F:$FC4B:E0 B0 CPX #$B0 0x03FC5D|$0F:$FC4D:D0 F8 BNE $FC47 0x03FC5F|$0F:$FC4F:60 RTS ; print name of hero given by low 2 bits of A to $6119, terminated by #$FA ; control flow target (from $C853) ; external control flow target (from $02:$B2CF, $02:$B2E8, $02:$B330, $04:$9CD3, $06:$80D3, $06:$80FF, $06:$8108, $06:$8B4B, $06:$8BF5, $06:$8C15, $06:$8CCA, $06:$8D27, $06:$8E11, $06:$8E2C, $06:$8ED2, $06:$8EDE, $06:$8F0E, $06:$8F2F, $06:$8F44, $06:$8F55, $06:$8F60, $06:$8F6C, $06:$8F87, $06:$8FCF, $06:$8FE0, $06:$900F, $06:$9079, $06:$908B, $06:$91F7, $06:$9381, $06:$93E8, $06:$9404, $06:$9443, $06:$9574, $06:$95CF, $06:$9644, $06:$96FB, $06:$9739, $06:$9CA7, $06:$A21B, $06:$A248, $06:$BB54, $06:$BB70, $06:$BB79, $06:$BBD0, $07:$82E4) 0x03FC60|$0F:$FC50:48 PHA 0x03FC61|$0F:$FC51:29 03 AND #$03 0x03FC63|$0F:$FC53:85 10 STA $10 0x03FC65|$0F:$FC55:0A ASL 0x03FC66|$0F:$FC56:0A ASL 0x03FC67|$0F:$FC57:85 12 STA $12 ; A & #$03 * 4 0x03FC69|$0F:$FC59:65 10 ADC $10 0x03FC6B|$0F:$FC5B:85 11 STA $11 ; A & #$03 * 5 0x03FC6D|$0F:$FC5D:A0 00 LDY #$00 ; control flow target (from $FC76) 0x03FC6F|$0F:$FC5F:A6 11 LDX $11 0x03FC71|$0F:$FC61:BD 13 01 LDA $0113,X ; Midenhall name bytes 0-3 + terminator 0x03FC74|$0F:$FC64:99 19 61 STA $6119,Y ; start of buffer for [monster(s)], [name], maybe more 0x03FC77|$0F:$FC67:A6 12 LDX $12 0x03FC79|$0F:$FC69:BD 86 01 LDA $0186,X ; Midenhall name bytes 4-7 0x03FC7C|$0F:$FC6C:99 1D 61 STA $611D,Y 0x03FC7F|$0F:$FC6F:E6 11 INC $11 0x03FC81|$0F:$FC71:E6 12 INC $12 0x03FC83|$0F:$FC73:C8 INY 0x03FC84|$0F:$FC74:C0 04 CPY #$04 0x03FC86|$0F:$FC76:D0 E7 BNE $FC5F 0x03FC88|$0F:$FC78:A0 08 LDY #$08 0x03FC8A|$0F:$FC7A:20 D7 FC JSR $FCD7 ; update write index to trim trailing spaces 0x03FC8D|$0F:$FC7D:68 PLA 0x03FC8E|$0F:$FC7E:10 00 BPL $FC80 ; append [end-FA] to string and swap return bank $94 back in; useless op ; append [end-FA] to string and swap return bank $94 back in ; control flow target (from $FC7E, $FCC3, $FCC5, $FCD5) 0x03FC90|$0F:$FC80:A9 FA LDA #$FA ; [end-FA] 0x03FC92|$0F:$FC82:99 19 61 STA $6119,Y ; start of buffer for [monster(s)], [name], maybe more 0x03FC95|$0F:$FC85:20 C2 F6 JSR $F6C2 ; load bank specified by $94 0x03FC98|$0F:$FC88:60 RTS ; write monster name in A (+ monster number within its group in X, if > 0) to $6119 ; external control flow target (from $04:$9CD9) 0x03FC99|$0F:$FC89:8E 8B 60 STX $608B ; monster number within its group 0x03FC9C|$0F:$FC8C:48 PHA ; monster ID 0x03FC9D|$0F:$FC8D:A9 00 LDA #$00 ; start with the first segment 0x03FC9F|$0F:$FC8F:8D AB 60 STA $60AB ; which list segment we're dealing with 0x03FCA2|$0F:$FC92:A9 0B LDA #$0B ; max length of first segment 0x03FCA4|$0F:$FC94:8D A0 60 STA $60A0 ; maximum string length; max segment length 0x03FCA7|$0F:$FC97:68 PLA ; monster ID 0x03FCA8|$0F:$FC98:20 B7 F3 JSR $F3B7 ; given monster ID in A, copy monster name segment to $0100 in reverse 0x03FCAB|$0F:$FC9B:A0 00 LDY #$00 ; initialize write index to #$00 0x03FCAD|$0F:$FC9D:20 E8 FC JSR $FCE8 ; copy $60A0 bytes of data from $00FF to $6119 0x03FCB0|$0F:$FCA0:20 D7 FC JSR $FCD7 ; update write index to trim trailing spaces 0x03FCB3|$0F:$FCA3:A9 5F LDA #$5F ; [space] 0x03FCB5|$0F:$FCA5:99 19 61 STA $6119,Y ; start of buffer for [monster(s)], [name], maybe more; write [space] to $6119,Y 0x03FCB8|$0F:$FCA8:C8 INY ; increment write index 0x03FCB9|$0F:$FCA9:98 TYA 0x03FCBA|$0F:$FCAA:48 PHA ; save write index for later 0x03FCBB|$0F:$FCAB:EE AB 60 INC $60AB ; which list segment we're dealing with 0x03FCBE|$0F:$FCAE:A9 09 LDA #$09 ; max length of second segment 0x03FCC0|$0F:$FCB0:8D A0 60 STA $60A0 ; maximum string length; max segment length 0x03FCC3|$0F:$FCB3:A5 10 LDA $10 ; monster ID, set by previous call to $F3B7 0x03FCC5|$0F:$FCB5:20 B7 F3 JSR $F3B7 ; given monster ID in A, copy monster name segment to $0100 in reverse 0x03FCC8|$0F:$FCB8:68 PLA ; pull write index back into Y 0x03FCC9|$0F:$FCB9:A8 TAY 0x03FCCA|$0F:$FCBA:20 E8 FC JSR $FCE8 ; copy $60A0 bytes of data from $00FF to $6119 0x03FCCD|$0F:$FCBD:20 D7 FC JSR $FCD7 ; update write index to trim trailing spaces 0x03FCD0|$0F:$FCC0:AE 8B 60 LDX $608B ; monster number within its group 0x03FCD3|$0F:$FCC3:F0 BB BEQ $FC80 ; append [end-FA] to string and swap return bank $94 back in 0x03FCD5|$0F:$FCC5:30 B9 BMI $FC80 ; append [end-FA] to string and swap return bank $94 back in 0x03FCD7|$0F:$FCC7:A9 6A LDA #$6A ; "-" 0x03FCD9|$0F:$FCC9:99 19 61 STA $6119,Y ; start of buffer for [monster(s)], [name], maybe more 0x03FCDC|$0F:$FCCC:C8 INY 0x03FCDD|$0F:$FCCD:8A TXA ; monster number within its group 0x03FCDE|$0F:$FCCE:18 CLC 0x03FCDF|$0F:$FCCF:69 23 ADC #$23 ; #$23 == "z" and A > 0, so this is the uppercase letter corresponding to the monster number within its group; net effect is e.g. "-A", "-B", etc. 0x03FCE1|$0F:$FCD1:99 19 61 STA $6119,Y ; start of buffer for [monster(s)], [name], maybe more 0x03FCE4|$0F:$FCD4:C8 INY 0x03FCE5|$0F:$FCD5:D0 A9 BNE $FC80 ; append [end-FA] to string and swap return bank $94 back in ; update write index to trim trailing spaces ; control flow target (from $FC7A, $FCA0, $FCBD, $FCE5) 0x03FCE7|$0F:$FCD7:B9 18 61 LDA $6118,Y ; last byte written 0x03FCEA|$0F:$FCDA:C9 60 CMP #$60 ; [no voice] 0x03FCEC|$0F:$FCDC:F0 04 BEQ $FCE2 0x03FCEE|$0F:$FCDE:C9 5F CMP #$5F ; [space] 0x03FCF0|$0F:$FCE0:D0 05 BNE $FCE7 ; control flow target (from $FCDC) 0x03FCF2|$0F:$FCE2:88 DEY ; if it's some kind of whitespace, decrement the write index 0x03FCF3|$0F:$FCE3:30 02 BMI $FCE7 ; if Y became negative (oops - string is now 0 bytes), stop 0x03FCF5|$0F:$FCE5:D0 F0 BNE $FCD7 ; update write index to trim trailing spaces ; control flow target (from $FCE0, $FCE3) 0x03FCF7|$0F:$FCE7:60 RTS ; copy $60A0 bytes of data from $00FF to $6119 ; X is used as a read index, Y as a write index ; data gets copied in reverse order ; IN: ; A/X/C = irrelevant ; Y = current write index ; OUT: ; A = last byte copied (but calling code doesn't care) ; X = 0 ; Y = current write index; this is important since the calling code needs to remember the write index from the first segment when dealing with the second segment ; C = unchanged ; control flow target (from $FC9D, $FCBA) 0x03FCF8|$0F:$FCE8:AE A0 60 LDX $60A0 ; maximum string length; initialize the read index to the value of $60A0 ; control flow target (from $FCF3) 0x03FCFB|$0F:$FCEB:BD FF 00 LDA $00FF,X ; built-in offset from string copy buffer start at $0100 0x03FCFE|$0F:$FCEE:99 19 61 STA $6119,Y ; start of buffer for [monster(s)], [name], maybe more; write data to $6119,Y 0x03FD01|$0F:$FCF1:C8 INY ; increment write index 0x03FD02|$0F:$FCF2:CA DEX ; decrement read index 0x03FD03|$0F:$FCF3:D0 F6 BNE $FCEB ; if the read index is not 0, loop back to $FCEB 0x03FD05|$0F:$FCF5:60 RTS ; otherwise the read index is 0, so we're done ; text engine: load bank specified by $60C6 (bank containing the desired text string) ; control flow target (from $FDD3, $FE16, $FE34) 0x03FD06|$0F:$FCF6:48 PHA 0x03FD07|$0F:$FCF7:AD C6 60 LDA $60C6 ; ROM bank containing the desired text string 0x03FD0A|$0F:$FCFA:20 D5 C3 JSR $C3D5 ; save A to $05F6, X to $43, and load bank specified by A 0x03FD0D|$0F:$FCFD:68 PLA 0x03FD0E|$0F:$FCFE:60 RTS ; external control flow target (from $02:$B6DB) 0x03FD0F|$0F:$FCFF:20 0F FD JSR $FD0F 0x03FD12|$0F:$FD02:EE 84 60 INC $6084 0x03FD15|$0F:$FD05:20 0F FD JSR $FD0F 0x03FD18|$0F:$FD08:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF 0x03FD1B|$0F:$FD0B:EE 84 60 INC $6084 0x03FD1E|$0F:$FD0E:60 RTS ; control flow target (from $FB21, $FCFF, $FD05) 0x03FD1F|$0F:$FD0F:AD 84 60 LDA $6084 0x03FD22|$0F:$FD12:8D 8C 60 STA $608C 0x03FD25|$0F:$FD15:A9 05 LDA #$05 0x03FD27|$0F:$FD17:8D 8B 60 STA $608B ; control flow target (from $FD34) 0x03FD2A|$0F:$FD1A:AE 85 60 LDX $6085 0x03FD2D|$0F:$FD1D:BD F8 06 LDA $06F8,X ; start of main dialogue window 0x03FD30|$0F:$FD20:85 09 STA $09 0x03FD32|$0F:$FD22:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03FD35|$0F:$FD25:C1 ; $06:$8002 ; data -> code 0x03FD36|$0F:$FD26:20 FA C1 JSR $C1FA ; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00 0x03FD39|$0F:$FD29:EE 85 60 INC $6085 0x03FD3C|$0F:$FD2C:EE 8B 60 INC $608B 0x03FD3F|$0F:$FD2F:AD 8B 60 LDA $608B 0x03FD42|$0F:$FD32:C9 1B CMP #$1B 0x03FD44|$0F:$FD34:D0 E4 BNE $FD1A 0x03FD46|$0F:$FD36:60 RTS ; control flow target (from $FB76) 0x03FD47|$0F:$FD37:48 PHA 0x03FD48|$0F:$FD38:A5 7C LDA $7C 0x03FD4A|$0F:$FD3A:8D 9E 60 STA $609E ; menu current column 0x03FD4D|$0F:$FD3D:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03FD50|$0F:$FD40:47 ; $02:$800E; -> $02:$B687: if menu current column < #$16, CLC and RTS, otherwise do stuff ; data -> code 0x03FD51|$0F:$FD41:A5 7D LDA $7D 0x03FD53|$0F:$FD43:20 A2 FD JSR $FDA2 ; 16-bit multiplication: set 16-bit ($10-$11) = A * #$16; returns low byte in A and clears C 0x03FD56|$0F:$FD46:65 7C ADC $7C 0x03FD58|$0F:$FD48:AA TAX 0x03FD59|$0F:$FD49:68 PLA 0x03FD5A|$0F:$FD4A:C9 5F CMP #$5F 0x03FD5C|$0F:$FD4C:F0 11 BEQ $FD5F 0x03FD5E|$0F:$FD4E:C9 65 CMP #$65 0x03FD60|$0F:$FD50:D0 14 BNE $FD66 0x03FD62|$0F:$FD52:A4 7C LDY $7C 0x03FD64|$0F:$FD54:C0 01 CPY #$01 0x03FD66|$0F:$FD56:D0 0E BNE $FD66 0x03FD68|$0F:$FD58:88 DEY 0x03FD69|$0F:$FD59:84 7C STY $7C 0x03FD6B|$0F:$FD5B:CA DEX 0x03FD6C|$0F:$FD5C:4C 66 FD JMP $FD66 ; control flow target (from $FD4C) 0x03FD6F|$0F:$FD5F:A4 7C LDY $7C 0x03FD71|$0F:$FD61:CC C8 60 CPY $60C8 ; speech sound effect / auto-indent flag 0x03FD74|$0F:$FD64:F0 3B BEQ $FDA1 ; control flow target (from $FD50, $FD56, $FD5C) 0x03FD76|$0F:$FD66:48 PHA 0x03FD77|$0F:$FD67:BD F8 06 LDA $06F8,X ; start of main dialogue window 0x03FD7A|$0F:$FD6A:85 09 STA $09 0x03FD7C|$0F:$FD6C:A8 TAY 0x03FD7D|$0F:$FD6D:68 PLA 0x03FD7E|$0F:$FD6E:C0 5F CPY #$5F 0x03FD80|$0F:$FD70:D0 05 BNE $FD77 0x03FD82|$0F:$FD72:9D F8 06 STA $06F8,X ; start of main dialogue window 0x03FD85|$0F:$FD75:85 09 STA $09 ; control flow target (from $FD70) 0x03FD87|$0F:$FD77:A5 8E LDA $8E ; flag for in battle or not (#$FF)? 0x03FD89|$0F:$FD79:30 24 BMI $FD9F 0x03FD8B|$0F:$FD7B:AD C8 60 LDA $60C8 ; speech sound effect / auto-indent flag 0x03FD8E|$0F:$FD7E:F0 05 BEQ $FD85 0x03FD90|$0F:$FD80:A9 8F LDA #$8F ; Music ID #$8F: speech SFX 0x03FD92|$0F:$FD82:20 61 C5 JSR $C561 ; play PCM specified by A (>= #$80 = sound effect [SFX], < #$80 = background music [BGM]) ; control flow target (from $FD7E) 0x03FD95|$0F:$FD85:A5 7C LDA $7C 0x03FD97|$0F:$FD87:18 CLC 0x03FD98|$0F:$FD88:69 05 ADC #$05 0x03FD9A|$0F:$FD8A:8D 8B 60 STA $608B 0x03FD9D|$0F:$FD8D:A5 7D LDA $7D 0x03FD9F|$0F:$FD8F:18 CLC 0x03FDA0|$0F:$FD90:69 13 ADC #$13 0x03FDA2|$0F:$FD92:8D 8C 60 STA $608C 0x03FDA5|$0F:$FD95:20 97 FE JSR $FE97 ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; code -> data ; indirect data load target 0x03FDA8|$0F:$FD98:C1 ; $06:$8002 ; data -> code 0x03FDA9|$0F:$FD99:20 FA C1 JSR $C1FA ; wait for $02 to not be #$C0, write PPU address in $07-$08 and data in $09 to PPU write buffer at $0300,$02, $01 += 1, $02 += 3, and set $0183 to #$00 0x03FDAC|$0F:$FD9C:20 DC C1 JSR $C1DC ; set $6007 = #$00, set $00 = #$01, wait for interrupt, set $00 = #$FF ; control flow target (from $FD79) 0x03FDAF|$0F:$FD9F:E6 7C INC $7C ; control flow target (from $FD64) 0x03FDB1|$0F:$FDA1:60 RTS ; 16-bit multiplication: set 16-bit ($10-$11) = A * #$16; returns low byte in A and clears C ; control flow target (from $FB14, $FC3F, $FD43) 0x03FDB2|$0F:$FDA2:85 10 STA $10 0x03FDB4|$0F:$FDA4:A9 00 LDA #$00 0x03FDB6|$0F:$FDA6:85 11 STA $11 0x03FDB8|$0F:$FDA8:A2 10 LDX #$10 0x03FDBA|$0F:$FDAA:A9 16 LDA #$16 0x03FDBC|$0F:$FDAC:20 F4 F0 JSR $F0F4 ; 16-bit multiplication: set 16-bit ($00,X-$01,X) = ($00,X-$01,X) * A 0x03FDBF|$0F:$FDAF:A5 10 LDA $10 0x03FDC1|$0F:$FDB1:18 CLC 0x03FDC2|$0F:$FDB2:60 RTS ; scan through group of strings until we find the start of the desired string ; control flow target (from $FAA4) 0x03FDC3|$0F:$FDB3:A9 00 LDA #$00 0x03FDC5|$0F:$FDB5:8D D6 60 STA $60D6 ; bit index into the byte containing the 5-bit text token currently being processed 0x03FDC8|$0F:$FDB8:8D D2 60 STA $60D2 ; read index within current dictionary entry 0x03FDCB|$0F:$FDBB:A5 10 LDA $10 ; low byte of string index 0x03FDCD|$0F:$FDBD:29 0F AND #$0F ; chop it down to index within the current pointer 0x03FDCF|$0F:$FDBF:AA TAX 0x03FDD0|$0F:$FDC0:F0 06 BEQ $FDC8 ; if we want the first string in the pointer, nothing more to do here, so RTS ; otherwise scan through the pointer data to find the start of the desired string ; control flow target (from $FDC6) 0x03FDD2|$0F:$FDC2:20 C9 FD JSR $FDC9 ; scan through current string pointer to find the start of the next string 0x03FDD5|$0F:$FDC5:CA DEX 0x03FDD6|$0F:$FDC6:D0 FA BNE $FDC2 ; control flow target (from $FDC0) 0x03FDD8|$0F:$FDC8:60 RTS ; scan through current string pointer to find the start of the next string ; control flow target (from $FDC2) 0x03FDD9|$0F:$FDC9:8A TXA 0x03FDDA|$0F:$FDCA:48 PHA 0x03FDDB|$0F:$FDCB:20 D3 FD JSR $FDD3 ; scan through string until we reach an end token; updates read address in $55-$56 0x03FDDE|$0F:$FDCE:68 PLA 0x03FDDF|$0F:$FDCF:AA TAX 0x03FDE0|$0F:$FDD0:A5 6D LDA $6D 0x03FDE2|$0F:$FDD2:60 RTS ; scan through string until we reach an end token; updates read address in $55-$56 ; control flow target (from $FDCB, $FDF0) 0x03FDE3|$0F:$FDD3:20 F6 FC JSR $FCF6 ; text engine: load bank specified by $60C6 (bank containing the desired text string) 0x03FDE6|$0F:$FDD6:A9 00 LDA #$00 0x03FDE8|$0F:$FDD8:8D D3 60 STA $60D3 ; secondary text table offset for C0 - C3 tables ; control flow target (from $FDE8) 0x03FDEB|$0F:$FDDB:20 3D FE JSR $FE3D ; set A to the current text dictionary index 0x03FDEE|$0F:$FDDE:20 F7 FD JSR $FDF7 ; after reading a text token, update the read address in $55-$56 and bit index in $60D6 0x03FDF1|$0F:$FDE1:C9 1C CMP #$1C ; #$1C - #$1F are the C0 - C3 table switch tokens 0x03FDF3|$0F:$FDE3:90 06 BCC $FDEB ; if token >= #$1C, we know it's a switch token and the next token is not an end token, so skip over the next token 0x03FDF5|$0F:$FDE5:20 F7 FD JSR $FDF7 ; after reading a text token, update the read address in $55-$56 and bit index in $60D6 0x03FDF8|$0F:$FDE8:4C DB FD JMP $FDDB ; loop to read the next token ; control flow target (from $FDE3) 0x03FDFB|$0F:$FDEB:AD 8B 60 LDA $608B ; text engine: $608B = dictionary index 0x03FDFE|$0F:$FDEE:C9 05 CMP #$05 ; the text tokens 0 - 4 are end tokens 0x03FE00|$0F:$FDF0:B0 E1 BCS $FDD3 ; scan through string until we reach an end token; updates read address in $55-$56; if not an end token, keep scanning 0x03FE02|$0F:$FDF2:A9 FC LDA #$FC ; if end token, set A and $6D to #$FC and RTS 0x03FE04|$0F:$FDF4:85 6D STA $6D ; stash #$FC in $6A since caller needs to pop stuff off the stack 0x03FE06|$0F:$FDF6:60 RTS ; after reading a text token, update the read address in $55-$56 and bit index in $60D6 ; control flow target (from $FDDE, $FDE5) ; external control flow target (from $02:$B3C6, $02:$B3E3) 0x03FE07|$0F:$FDF7:48 PHA 0x03FE08|$0F:$FDF8:AD D6 60 LDA $60D6 ; bit index into the byte containing the 5-bit text token currently being processed 0x03FE0B|$0F:$FDFB:C9 03 CMP #$03 ; if all 5 bits we need are already in A, keep using it, otherwise update read position in $55-$56 0x03FE0D|$0F:$FDFD:90 26 BCC $FE25 ; $FE29 would be a better target :p 0x03FE0F|$0F:$FDFF:E6 55 INC $55 ; pointer to start of sub pointer data, low byte 0x03FE11|$0F:$FE01:D0 02 BNE $FE05 0x03FE13|$0F:$FE03:E6 56 INC $56 ; pointer to start of sub pointer data, high byte ; control flow target (from $FE01) 0x03FE15|$0F:$FE05:A5 55 LDA $55 ; pointer to start of sub pointer data, low byte; check for $55-$56 == $BFD7; if yes, switch to bank #$02, if no, keep using current address 0x03FE17|$0F:$FE07:C9 D7 CMP #$D7 0x03FE19|$0F:$FE09:D0 1A BNE $FE25 0x03FE1B|$0F:$FE0B:A5 56 LDA $56 ; pointer to start of sub pointer data, high byte 0x03FE1D|$0F:$FE0D:C9 BF CMP #$BF 0x03FE1F|$0F:$FE0F:D0 14 BNE $FE25 0x03FE21|$0F:$FE11:A9 02 LDA #$02 0x03FE23|$0F:$FE13:8D C6 60 STA $60C6 ; ROM bank containing the desired text string 0x03FE26|$0F:$FE16:20 F6 FC JSR $FCF6 ; text engine: load bank specified by $60C6 (bank containing the desired text string) 0x03FE29|$0F:$FE19:A9 2E LDA #$2E ; useless 0x03FE2B|$0F:$FE1B:AD 32 FE LDA $FE32 ; set $55-$56 to new address in bank #$02 0x03FE2E|$0F:$FE1E:85 55 STA $55 ; pointer to start of sub pointer data, low byte 0x03FE30|$0F:$FE20:AD 33 FE LDA $FE33 0x03FE33|$0F:$FE23:85 56 STA $56 ; pointer to start of sub pointer data, high byte ; control flow target (from $FDFD, $FE09, $FE0F) 0x03FE35|$0F:$FE25:AD D6 60 LDA $60D6 ; bit index into the byte containing the 5-bit text token currently being processed 0x03FE38|$0F:$FE28:18 CLC 0x03FE39|$0F:$FE29:69 05 ADC #$05 ; we read 5 bits, so update the bit index 0x03FE3B|$0F:$FE2B:29 07 AND #$07 0x03FE3D|$0F:$FE2D:8D D6 60 STA $60D6 ; bit index into the byte containing the 5-bit text token currently being processed 0x03FE40|$0F:$FE30:68 PLA 0x03FE41|$0F:$FE31:60 RTS ; code -> data ; data load target (from $FE1B) 0x03FE42|$0F:$FE32:B2 ; data load target (from $FE20) 0x03FE43|$0F:$FE33: B7 ; $02:$B7B2 ; data -> code ; swap in the right text bank, set A to the current dictionary index, swap in bank #$02 ; external control flow target (from $02:$B3AB) 0x03FE44|$0F:$FE34:20 F6 FC JSR $FCF6 ; text engine: load bank specified by $60C6 (bank containing the desired text string) 0x03FE47|$0F:$FE37:20 3D FE JSR $FE3D ; set A to the current text dictionary index 0x03FE4A|$0F:$FE3A:4C 70 F7 JMP $F770 ; load ROM bank #$02 ; set A to the current text dictionary index ; control flow target (from $FDDB, $FE37) 0x03FE4D|$0F:$FE3D:AD D6 60 LDA $60D6 ; bit index into the byte containing the 5-bit text token currently being processed 0x03FE50|$0F:$FE40:0A ASL 0x03FE51|$0F:$FE41:A8 TAY 0x03FE52|$0F:$FE42:B9 5C FE LDA $FE5C,Y ; jump table for functions to convert the current 5-bit text token into a dictionary index in A 0x03FE55|$0F:$FE45:85 57 STA $57 ; pointer to start of main pointer table, low byte 0x03FE57|$0F:$FE47:B9 5D FE LDA $FE5D,Y 0x03FE5A|$0F:$FE4A:85 58 STA $58 ; pointer to start of main pointer table, high byte ; BUG: this reads the first 2 bytes of ($55) *before* the code for checking whether the read position needs to jump to bank 2 runs 0x03FE5C|$0F:$FE4C:A0 01 LDY #$01 0x03FE5E|$0F:$FE4E:B1 55 LDA ($55),Y ; pointer to start of sub pointer data, low byte 0x03FE60|$0F:$FE50:8D 8C 60 STA $608C ; text engine: $608C = string byte #2 0x03FE63|$0F:$FE53:88 DEY 0x03FE64|$0F:$FE54:B1 55 LDA ($55),Y ; pointer to start of sub pointer data, low byte 0x03FE66|$0F:$FE56:8D 8B 60 STA $608B ; text engine: $608B = string byte #1 0x03FE69|$0F:$FE59:6C 57 00 JMP ($0057) ; pointer to start of main pointer table, low byte; convert the current 5-bit text token into a dictionary index in A ; code -> data ; jump table for functions to convert the current 5-bit text token into a dictionary index in A ; indexed data load target (from $FE42) 0x03FE6C|$0F:$FE5C:6C ; indexed data load target (from $FE47) 0x03FE6D|$0F:$FE5D: FE ; $0F:$FE6C; token is in bits 7-3 of A 0x03FE6E|$0F:$FE5E:6D FE ; $0F:$FE6D; token is in bits 6-2 of A 0x03FE70|$0F:$FE60:6E FE ; $0F:$FE6E; token is in bits 5-1 of A 0x03FE72|$0F:$FE62:8D FE ; $0F:$FE8D; token is in bits 4-0 of A (yay) 0x03FE74|$0F:$FE64:84 FE ; $0F:$FE84; token is in bits 3-0 of A + bit 7 of $608C 0x03FE76|$0F:$FE66:7E FE ; $0F:$FE7E; token is in bits 2-0 of A + bits 7-6 of $608C 0x03FE78|$0F:$FE68:78 FE ; $0F:$FE78; token is in bits 1-0 of A + bits 7-5 of $608C 0x03FE7A|$0F:$FE6A:72 FE ; $0F:$FE72; token is in bit 0 of A + bits 7-4 of $608C ; data -> code ; token is in bits 7-3 of A ; indirect control flow target (via $FE5C) 0x03FE7C|$0F:$FE6C:4A LSR ; token is in bits 6-2 of A ; indirect control flow target (via $FE5E) 0x03FE7D|$0F:$FE6D:4A LSR ; token is in bits 5-1 of A ; indirect control flow target (via $FE60) 0x03FE7E|$0F:$FE6E:4A LSR 0x03FE7F|$0F:$FE6F:4C 8D FE JMP $FE8D ; token is in bits 4-0 of A (yay) ; token is in bit 0 of A + bits 7-4 of $608C ; indirect control flow target (via $FE6A) 0x03FE82|$0F:$FE72:0E 8C 60 ASL $608C ; string byte #2 0x03FE85|$0F:$FE75:2E 8B 60 ROL $608B ; text engine: $608B = string byte #1 ; token is in bits 1-0 of A + bits 7-5 of $608C ; indirect control flow target (via $FE68) 0x03FE88|$0F:$FE78:0E 8C 60 ASL $608C ; string byte #2 0x03FE8B|$0F:$FE7B:2E 8B 60 ROL $608B ; text engine: $608B = string byte #1 ; token is in bits 2-0 of A + bits 7-6 of $608C ; indirect control flow target (via $FE66) 0x03FE8E|$0F:$FE7E:0E 8C 60 ASL $608C ; string byte #2 0x03FE91|$0F:$FE81:2E 8B 60 ROL $608B ; text engine: $608B = string byte #1 ; token is in bits 3-0 of A + bit 7 of $608C ; indirect control flow target (via $FE64) 0x03FE94|$0F:$FE84:0E 8C 60 ASL $608C ; string byte #2 0x03FE97|$0F:$FE87:2E 8B 60 ROL $608B ; text engine: $608B = string byte #1 0x03FE9A|$0F:$FE8A:AD 8B 60 LDA $608B ; text engine: $608B = string byte #1 ; token is in bits 4-0 of A (yay) ; control flow target (from $FE6F) ; indirect control flow target (via $FE62) 0x03FE9D|$0F:$FE8D:29 1F AND #$1F 0x03FE9F|$0F:$FE8F:18 CLC 0x03FEA0|$0F:$FE90:6D D3 60 ADC $60D3 ; secondary text table offset for C0 - C3 tables 0x03FEA3|$0F:$FE93:8D 8B 60 STA $608B ; text engine: $608B = dictionary index 0x03FEA6|$0F:$FE96:60 RTS ; read byte following JSR, parse it for bank and pointer index, execute ($8000,X) in selected bank, swap back in original bank ; BUG: does LDA before PHP, so status of N and Z flags are lost ; control flow target (from $C696, $C6C4, $C6D7, $C6DB, $C6F6, $C886, $C894, $CC9B, $D15C, $D16E, $D2E7, $D2F7, $D33C, $D356, $EE06, $EE7B, $EF58, $F04F, $F0BC, $F4A9, $F4E3, $F5E1, $F5F7, $F611, $F787, $F83A, $FB4A, $FB5E, $FB7A, $FB9B, $FB9F, $FBA3, $FBA8, $FBAD, $FBD6, $FBF4, $FD22, $FD3D, $FD95) ; external control flow target (from $02:$B74B, $02:$BE00, $02:$BE2C, $02:$BE34, $02:$BEA1, $06:$B0A5, $07:$87F1, $08:$80C9, $0A:$80F2, $0A:$813B) 0x03FEA7|$0F:$FE97:8D 94 01 STA $0194 0x03FEAA|$0F:$FE9A:8E 95 01 STX $0195 0x03FEAD|$0F:$FE9D:8C 96 01 STY $0196 0x03FEB0|$0F:$FEA0:AD F6 05 LDA $05F6 ; current bank 0x03FEB3|$0F:$FEA3:48 PHA 0x03FEB4|$0F:$FEA4:08 PHP 0x03FEB5|$0F:$FEA5:20 0E FF JSR $FF0E ; from the perspective of the caller (which always pushes 2 extra bytes to the stack before calling us), increment JSR's return address, read byte following JSR, parse it for bank and pointer index, set $D6-$D7 to $8000,X-$8001,X in selected bank 0x03FEB8|$0F:$FEA8:28 PLP 0x03FEB9|$0F:$FEA9:AC 96 01 LDY $0196 0x03FEBC|$0F:$FEAC:AE 95 01 LDX $0195 0x03FEBF|$0F:$FEAF:AD 94 01 LDA $0194 0x03FEC2|$0F:$FEB2:20 C8 FE JSR $FEC8 ; execute ($D6) 0x03FEC5|$0F:$FEB5:08 PHP 0x03FEC6|$0F:$FEB6:8D 94 01 STA $0194 0x03FEC9|$0F:$FEB9:68 PLA 0x03FECA|$0F:$FEBA:85 D6 STA $D6 0x03FECC|$0F:$FEBC:68 PLA ; original value of $05F6 (current bank) 0x03FECD|$0F:$FEBD:20 BB FF JSR $FFBB ; save A to $05F6, X to $43, and load bank specified by A 0x03FED0|$0F:$FEC0:A5 D6 LDA $D6 ; P 0x03FED2|$0F:$FEC2:48 PHA 0x03FED3|$0F:$FEC3:AD 94 01 LDA $0194 0x03FED6|$0F:$FEC6:28 PLP 0x03FED7|$0F:$FEC7:60 RTS ; execute ($D6) ; control flow target (from $FEB2) 0x03FED8|$0F:$FEC8:6C D6 00 JMP ($00D6) ; code -> unknown ; must be unused since it's invalid 0x03FEDB|$0F:$FECB:20 DA FE ; JSR $FEDA 0x03FEDC|$0F:$FECC:DA ; INVALID OPCODE 0x03FEDD|$0F:$FECD:FE A5 D6 ; INC $D6A5,X 0x03FEDE|$0F:$FECE:A5 D6 ; LDA $D6 0x03FEDF|$0F:$FECF:D6 95 ; DEC $95,X 0x03FEE0|$0F:$FED0:95 00 ; STA $00,X 0x03FEE1|$0F:$FED1:00 ; BRK 0x03FEE2|$0F:$FED2:A5 D7 ; LDA $D7 0x03FEE3|$0F:$FED3:D7 ; INVALID OPCODE 0x03FEE4|$0F:$FED4:95 01 ; STA $01,X 0x03FEE5|$0F:$FED5:01 AD ; ORA ($AD,X) 0x03FEE6|$0F:$FED6:AD 94 01 ; LDA $0194 0x03FEE7|$0F:$FED7:94 01 ; STY $01,X 0x03FEE8|$0F:$FED8:01 60 ; ORA ($60,X) 0x03FEE9|$0F:$FED9:60 ; RTS ; unknown -> code ; parse byte following JSR for bank and pointer index, set $D6-$D7 to $8000,X-$8001,X in selected bank ; control flow target (from $E4EC) ; external control flow target (from $02:$B1C0) 0x03FEEA|$0F:$FEDA:8D 94 01 STA $0194 0x03FEED|$0F:$FEDD:8E 95 01 STX $0195 0x03FEF0|$0F:$FEE0:8C 96 01 STY $0196 0x03FEF3|$0F:$FEE3:AD F6 05 LDA $05F6 ; current bank 0x03FEF6|$0F:$FEE6:48 PHA 0x03FEF7|$0F:$FEE7:48 PHA 0x03FEF8|$0F:$FEE8:20 0E FF JSR $FF0E ; from the perspective of the caller (which always pushes 2 extra bytes to the stack before calling us), increment JSR's return address, read byte following JSR, parse it for bank and pointer index, set $D6-$D7 to $8000,X-$8001,X in selected bank 0x03FEFB|$0F:$FEEB:68 PLA 0x03FEFC|$0F:$FEEC:68 PLA 0x03FEFD|$0F:$FEED:20 BB FF JSR $FFBB ; save A to $05F6, X to $43, and load bank specified by A 0x03FF00|$0F:$FEF0:AC 96 01 LDY $0196 0x03FF03|$0F:$FEF3:AE 95 01 LDX $0195 0x03FF06|$0F:$FEF6:AD 94 01 LDA $0194 0x03FF09|$0F:$FEF9:60 RTS ; increment JSR's return address, read byte following JSR, parse it for bank and pointer index, set $D6-$D7 to $8000,X-$8001,X in selected bank ; control flow target (from $E4F8, $ECFB) 0x03FF0A|$0F:$FEFA:08 PHP 0x03FF0B|$0F:$FEFB:48 PHA 0x03FF0C|$0F:$FEFC:8E 95 01 STX $0195 0x03FF0F|$0F:$FEFF:8C 96 01 STY $0196 0x03FF12|$0F:$FF02:20 0E FF JSR $FF0E ; from the perspective of the caller (which always pushes 2 extra bytes to the stack before calling us), increment JSR's return address, read byte following JSR, parse it for bank and pointer index, set $D6-$D7 to $8000,X-$8001,X in selected bank 0x03FF15|$0F:$FF05:AC 96 01 LDY $0196 0x03FF18|$0F:$FF08:AE 95 01 LDX $0195 0x03FF1B|$0F:$FF0B:68 PLA 0x03FF1C|$0F:$FF0C:28 PLP 0x03FF1D|$0F:$FF0D:60 RTS ; from the perspective of the caller (which always pushes 2 extra bytes to the stack before calling us), increment JSR's return address, read byte following JSR, parse it for bank and pointer index, set $D6-$D7 to $8000,X-$8001,X in selected bank ; control flow target (from $FEA5, $FEE8, $FF02) 0x03FF1E|$0F:$FF0E:BA TSX 0x03FF1F|$0F:$FF0F:FE 05 01 INC $0105,X 0x03FF22|$0F:$FF12:D0 03 BNE $FF17 0x03FF24|$0F:$FF14:FE 06 01 INC $0106,X ; control flow target (from $FF12) 0x03FF27|$0F:$FF17:BD 05 01 LDA $0105,X 0x03FF2A|$0F:$FF1A:85 D6 STA $D6 0x03FF2C|$0F:$FF1C:BD 06 01 LDA $0106,X 0x03FF2F|$0F:$FF1F:85 D7 STA $D7 0x03FF31|$0F:$FF21:A0 00 LDY #$00 0x03FF33|$0F:$FF23:B1 D6 LDA ($D6),Y 0x03FF35|$0F:$FF25:20 33 FF JSR $FF33 ; parse A into bank and pointer indices and load specified bank 0x03FF38|$0F:$FF28:BD 00 80 LDA $8000,X 0x03FF3B|$0F:$FF2B:85 D6 STA $D6 0x03FF3D|$0F:$FF2D:BD 01 80 LDA $8001,X 0x03FF40|$0F:$FF30:85 D7 STA $D7 0x03FF42|$0F:$FF32:60 RTS ; parse A into bank and pointer indices and load specified bank ; bank is high 3 bits of A (but 8 if 0 and 6 if 5), pointer is low 5 bits of A (but low 6 if bank is 6) ; control flow target (from $F3EA, $FF25) 0x03FF43|$0F:$FF33:48 PHA 0x03FF44|$0F:$FF34:2A ROL 0x03FF45|$0F:$FF35:2A ROL 0x03FF46|$0F:$FF36:2A ROL 0x03FF47|$0F:$FF37:2A ROL 0x03FF48|$0F:$FF38:29 07 AND #$07 0x03FF4A|$0F:$FF3A:D0 04 BNE $FF40 0x03FF4C|$0F:$FF3C:A9 08 LDA #$08 0x03FF4E|$0F:$FF3E:D0 06 BNE $FF46 ; control flow target (from $FF3A) 0x03FF50|$0F:$FF40:C9 05 CMP #$05 0x03FF52|$0F:$FF42:D0 02 BNE $FF46 0x03FF54|$0F:$FF44:A9 06 LDA #$06 ; control flow target (from $FF3E, $FF42) 0x03FF56|$0F:$FF46:20 BB FF JSR $FFBB ; save A to $05F6, X to $43, and load bank specified by A 0x03FF59|$0F:$FF49:68 PLA 0x03FF5A|$0F:$FF4A:48 PHA 0x03FF5B|$0F:$FF4B:29 E0 AND #$E0 0x03FF5D|$0F:$FF4D:AA TAX 0x03FF5E|$0F:$FF4E:68 PLA 0x03FF5F|$0F:$FF4F:29 3F AND #$3F 0x03FF61|$0F:$FF51:E0 A0 CPX #$A0 0x03FF63|$0F:$FF53:F0 02 BEQ $FF57 0x03FF65|$0F:$FF55:29 1F AND #$1F ; control flow target (from $FF53) 0x03FF67|$0F:$FF57:0A ASL 0x03FF68|$0F:$FF58:AA TAX 0x03FF69|$0F:$FF59:60 RTS ; external control flow target (from $07:$81E7, $07:$84EC, $07:$8529, $07:$8556) 0x03FF6A|$0F:$FF5A:20 AF C7 JSR $C7AF 0x03FF6D|$0F:$FF5D:4C 90 FF JMP $FF90 ; load bank 7 ; external control flow target (from $07:$81CE) 0x03FF70|$0F:$FF60:20 4F D1 JSR $D14F 0x03FF73|$0F:$FF63:4C 90 FF JMP $FF90 ; load bank 7 ; external control flow target (from $07:$8692) 0x03FF76|$0F:$FF66:20 04 C5 JSR $C504 0x03FF79|$0F:$FF69:4C 90 FF JMP $FF90 ; load bank 7 ; external indirect control flow target (via $07:$8798) ; indirect control flow target 0x03FF7C|$0F:$FF6C:20 C2 E5 JSR $E5C2 0x03FF7F|$0F:$FF6F:4C 90 FF JMP $FF90 ; load bank 7 ; external indirect control flow target (via $07:$879C) ; indirect control flow target 0x03FF82|$0F:$FF72:20 36 E6 JSR $E636 0x03FF85|$0F:$FF75:4C 90 FF JMP $FF90 ; load bank 7 ; external indirect control flow target (via $07:$8796) ; indirect control flow target 0x03FF88|$0F:$FF78:20 97 E7 JSR $E797 0x03FF8B|$0F:$FF7B:4C 90 FF JMP $FF90 ; load bank 7 ; external indirect control flow target (via $07:$879A) ; indirect control flow target 0x03FF8E|$0F:$FF7E:20 B4 E6 JSR $E6B4 0x03FF91|$0F:$FF81:4C 90 FF JMP $FF90 ; load bank 7 ; external control flow target (from $07:$8231, $07:$8242, $07:$8278, $07:$8330, $07:$835F, $07:$8374, $07:$8385, $07:$83FB, $07:$849C, $07:$84D5, $07:$84F6, $07:$8503, $07:$851C, $07:$8533, $07:$8560, $07:$857F, $07:$85EE, $07:$8776) 0x03FF94|$0F:$FF84:20 D2 CC JSR $CCD2 ; execute scripted motion 0x03FF97|$0F:$FF87:4C 90 FF JMP $FF90 ; load bank 7 ; external control flow target (from $07:$8291, $07:$82B1, $07:$82DC, $07:$856B, $07:$85AC, $07:$85E4, $07:$8651, $07:$8675, $07:$86E2, $07:$8712) 0x03FF9A|$0F:$FF8A:20 CB D8 JSR $D8CB 0x03FF9D|$0F:$FF8D:4C 90 FF JMP $FF90 ; load bank 7 ; load bank 7 ; control flow target (from $FF5D, $FF63, $FF69, $FF6F, $FF75, $FF7B, $FF81, $FF87, $FF8D) 0x03FFA0|$0F:$FF90:A9 07 LDA #$07 0x03FFA2|$0F:$FF92:85 94 STA $94 ; return bank for various function calls, doubles as index of selected option for multiple-choice menus 0x03FFA4|$0F:$FF94:4C C2 F6 JMP $F6C2 ; load bank specified by $94 ; code -> free 0x03FFA7|$0F:$FF97:FF ; ... skipping $21 FF bytes 0x03FFC9|$0F:$FFB9:FF ; free -> data ; data load target (from $D37A) 0x03FFCA|$0F:$FFBA:FF ; data -> code ; save A to $05F6, X to $43, and load bank specified by A ; control flow target (from $C3D5, $FEBD, $FEED, $FF46) 0x03FFCB|$0F:$FFBB:8D F6 05 STA $05F6 ; current bank 0x03FFCE|$0F:$FFBE:86 43 STX $43 ; load bank specified by A ; control flow target (from $C3D9) 0x03FFD0|$0F:$FFC0:78 SEI 0x03FFD1|$0F:$FFC1:8D FF FF STA $FFFF 0x03FFD4|$0F:$FFC4:4A LSR 0x03FFD5|$0F:$FFC5:8D FF FF STA $FFFF 0x03FFD8|$0F:$FFC8:4A LSR 0x03FFD9|$0F:$FFC9:8D FF FF STA $FFFF 0x03FFDC|$0F:$FFCC:4A LSR 0x03FFDD|$0F:$FFCD:8D FF FF STA $FFFF 0x03FFE0|$0F:$FFD0:4A LSR 0x03FFE1|$0F:$FFD1:8D FF FF STA $FFFF 0x03FFE4|$0F:$FFD4:EA NOP 0x03FFE5|$0F:$FFD5:EA NOP 0x03FFE6|$0F:$FFD6:60 RTS ; reset vector ; indirect control flow target (via $FFFC) 0x03FFE7|$0F:$FFD7:78 SEI 0x03FFE8|$0F:$FFD8:EE DE FF INC $FFDE ; #$80; used to reset MMC1 shift register and switch to last-fixed-bank mode 0x03FFEB|$0F:$FFDB:4C AF C5 JMP $C5AF ; reset vector handler ; code -> data ; #$80; used to reset MMC1 shift register and switch to last-fixed-bank mode ; data load target (from $C60B, $FFD8) 0x03FFEE|$0F:$FFDE:80 ; data -> unknown 0x03FFEF|$0F:$FFDF:44 ; INVALID OPCODE 0x03FFF0|$0F:$FFE0:52 ; INVALID OPCODE 0x03FFF1|$0F:$FFE1:41 47 ; EOR ($47,X) 0x03FFF2|$0F:$FFE2:47 ; INVALID OPCODE 0x03FFF3|$0F:$FFE3:4F ; INVALID OPCODE 0x03FFF4|$0F:$FFE4:4E 20 57 ; LSR $5720 0x03FFF5|$0F:$FFE5:20 57 41 ; JSR $4157 0x03FFF6|$0F:$FFE6:57 ; INVALID OPCODE 0x03FFF7|$0F:$FFE7:41 52 ; EOR ($52,X) 0x03FFF8|$0F:$FFE8:52 ; INVALID OPCODE 0x03FFF9|$0F:$FFE9:52 ; INVALID OPCODE 0x03FFFA|$0F:$FFEA:49 4F ; EOR #$4F 0x03FFFB|$0F:$FFEB:4F ; INVALID OPCODE 0x03FFFC|$0F:$FFEC:52 ; INVALID OPCODE 0x03FFFD|$0F:$FFED:20 49 49 ; JSR $4949 0x03FFFE|$0F:$FFEE:49 49 ; EOR #$49 0x03FFFF|$0F:$FFEF:49 C7 ; EOR #$C7 0x040000|$0F:$FFF0:C7 ; INVALID OPCODE 0x040001|$0F:$FFF1:AA ; TAX 0x040002|$0F:$FFF2:00 ; BRK 0x040003|$0F:$FFF3:00 ; BRK 0x040004|$0F:$FFF4:48 ; PHA 0x040005|$0F:$FFF5:04 ; INVALID OPCODE 0x040006|$0F:$FFF6:01 0F ; ORA ($0F,X) 0x040007|$0F:$FFF7:0F ; INVALID OPCODE 0x040008|$0F:$FFF8:07 ; INVALID OPCODE 0x040009|$0F:$FFF9:9D 00 C0 ; STA $C000,X ; unknown -> data 0x04000A|$0F:$FFFA:00 C0 ; $0F:$C000; NMI vector 0x04000C|$0F:$FFFC:D7 FF ; $0F:$FFD7; reset vector 0x04000E|$0F:$FFFE:AB C5 ; $0F:$C5AB; IRQ/BRK vector handler