BS-X BIOS:ROM map
I mark with the tag "UNNECESSARY LINE" things that I think could be removed. If anyone ever wants to reassemble this and looks for some bytes to save, there you go.
Contents
- 1 Bank $10
- 2 Bank $80
- 2.1 $80/8200 Update Graphics Registers
- 2.2 $80/8328 During NMI: Update CGRAM
- 2.3 $80/8358 ?
- 2.4 $80/8363 ? (Executed while NMI)
- 2.5 $80/839D Activate NMI
- 2.6 $80/83BD Clear whole VRAM via DMA
- 2.7 $80/8411 Store a chain of values in $01xx (Graphics Register buffer)
- 2.8 $80/8449 Data
- 2.9 $80/8649 Data
- 2.10 $80/8849 Set Sprites in OAM buffer
- 2.11 $80/8944 Update OAM
- 2.12 $80/896A Update Joypad Input buffers
- 2.13 $80/8A14 ? (Use Jump Table)
- 2.14 $80/8A2A Jump Table for $80/8A14
- 2.15 $80/8A32 Push all unused sprites in OAM Buffer out of the Screen
- 2.16 $80/8A6A Clear sixty-four entries of the OAM Low Table buffer
- 2.17 $80/8AEB Clear OAM High Table buffer
- 2.18 $80/8C0F ?
- 2.19 $80/8C2A ? (Put DMA from ROM into DMA Pipeline)
- 2.20 $80/8CDC Work off DMA Pipeline
- 2.21 $80/8DCE Mouse related: Turn negatives input into negative numbers
- 2.22 $80/8DD9 Mouse related: Turn negative input into a negative number
- 2.23 $80/8DEE Mouse related
- 2.24 $80/8E25 Mouse related
- 2.25 $80/8E5F Is a SNES mouse connected?
- 2.26 $80/8E97 Data for $80/8E5F
- 2.27 $80/8E99
- 2.28 $80/8EC9 Mouse related (Set Mouse Sensitivity?)
- 2.29 $80/8F0A ?
- 2.30 $80/8F1B Data for $80/8F0A
- 2.31 $80/8F49 ? (Frame Counter?)
- 2.32 $80/8F7D PROGRAM START
- 2.33 $80/90D7 Data
- 2.34 $80/913A ? (Executed when talking to the aerial building and at ROM start up)
- 2.35 $80/91B6 ? (Executed when talking to the aerial building and at start up)
- 2.36 $80/91E9 ? (Executed when talking to the aerial building)
- 2.37 $80/9225 ? (Clear $0650/4/8/C)
- 2.38 $80/9238 ?
- 2.39 $80/9293 ?
- 2.40 $80/92AF NMI Handler
- 2.41 $80/9345 NMI Handler Short End
- 2.42 $80/9355 Setup Jump Addres in $62F-31
- 2.43 $80/936A ?
- 2.44 $80/936A ? (Jump to $80/938F next NMI)
- 2.45 $80/9390 USELESS SUBROUTINE
- 2.46 $80/9393 USELESS SUBROUTINE
- 2.47 $80/939F ?
- 2.48 $80/94AB ?
- 2.49 $80/951E Inc Bank, reset Pointer to $8000 (Graphics Decompression directly to VRAM)
- 2.50 $80/951E Graphics Decompression directly to VRAM
- 2.51 $80/9720 Sound related: Play Music/Sound Effect
- 2.52 $80/9769 Sound related: Put sound effect to play in pipeline
- 2.53 $80/978D Sound related: Put input for $2140 in pipeline
- 2.54 $80/97A6 Sound related
- 2.55 $80/995A Transfer Data to SPC
- 2.56 $80/99D5 Increment Load Index Y
- 2.57 $80/9AF0 ? (Text-box related)
- 2.58 $80/9B07 Jump Table for $80/9AF0
- 2.59 $80/9B0F ? (Text-box related)
- 2.60 $80/9C23 Store A into $7E/7600 to $7E/7DFF
- 2.61 $80/9C4E TEXTBOX: Transfer Textbox Tiles from buffer to VRAM
- 2.62 $80/9C89 ? (Executed when talking to the aerial building and at ROM start)
- 2.63 $80/9CD7 Data for $80/9C89
- 2.64 $80/9D49 ? (Executed when talking to the aerial building)
- 2.65 $80/9DDA ? (setup jump address in $88) (Executed when talking to the aerial building)
- 2.66 $80/9E2F ? (bit stuff) (Executed when talking to the aerial building)
- 2.67 $80/9E70 ? (Executed at startup)
- 2.68 $80/9EB1 ? (Executed at startup)
- 2.69 $80/9F0B ?
- 2.70 $80/9F13 ?
- 2.71 $80/9F1F ? (Executed when talking to the aerial building and at startup)
- 2.72 $80/9F2F ? (Executed at startup)
- 2.73 $80/9F55 ? (Executed when talking to the aerial building)
- 2.74 $80/9F6A Jump Table for $80/9F55
- 2.75 $80/9F7D ? (Executed when talking to the aerial building and at startup)
- 2.76 $80/9F85 ? (Executed when talking to the aerial building and at startup)
- 2.77 $80/9FE5 ? (Executed when talking to the aerial building)
- 2.78 $80/A217 ? (Executed when talking to the aerial building)
- 2.79 $80/A605 ? (Textbox tiles related) (Executed when talking to the aerial building)
- 2.80 $80/A633 Jump Table for $80/A605
- 2.81 $80/A63B ? (textbox related?) (Executed when talking to the aerial building)
- 2.82 $80/A6BD ? (textbox related) (Executed when talking to the aerial building and at start up)
- 2.83 $80/A6F9 Data for $80/A6BD
- 2.84 $80/A709 ?
- 2.85 $80/A783 ? (textbox related?) (Executed when talking to the aerial building and at ROM start)
- 2.86 $80/A7FB Data for $80/A783
- 2.87 $80/A9A4 ? (Executed when talking to the aerial building)
- 2.88 $80/A9C0 ? (textbox related) (Executed when talking to the aerial building)
- 2.89 $80/AA0C ? (Executed when talking to the aerial building)
- 2.90 $80/AA53 LDA $0B92 (Executed when talking to the aerial building)
- 2.91 $80/AC5E While NMI: VRAM DMA
- 2.92 $80/B0B4 ? (Executed when talking to the aerial building and at start up)
- 2.93 $80/B341 ? (Executed when talking to the aerial building)
- 2.94 $80/B47D TEXTBOX: Setup VRAM Address (and other stuff???)
- 2.95 $80/B4BF ? (Executed when talking to the aerial building)
- 2.96 $80/B51B ?
- 2.97 $80/B569 ? (textbox related) (Executed when talking to the aerial building)
- 2.98 $80/B91E TEXTBOX: Clear Tiles
- 2.99 $80/BB84 MCC Memory Controller Settings: Enable Flash R/W
- 2.100 $80/BBB1 MCC Memory Controller Settings: Disable Flash R/W
- 2.101 $80/BD6C ? (Execute Subroutine from Jump Table)
- 2.102 $80/BD79 Jump Table for $80/BD6C
- 2.103 $80/BD81 ?
- 2.104 $80/BD95 ?
- 2.105 $80/C177 ? (Check if Data from Flash Cart is valid)
- 2.106 $80/C1C5 ?
- 2.107 $80/C2AD Check if Satellaview Stream Number Registers work
- 2.108 $80/C36D Transfer (fixed Set of) Data to Satellaview
- 2.109 $80/C392 Data for Satellaview (transfered at $80/C36D)
- 2.110 $80/C3D6 Transfer Data to Satellaview via Serial I/O Port 2
- 2.111 $80/C5BC Satellaview-related: Restore original Fuction Hook Vectors & Reset function
- 2.112 $80/C8E4 ?
- 2.113 $80/C8F7 Satellaview-related
- 2.114 $80/C98F Satellaview-related: Clear banks $10-$12
- 2.115 $80/C9AA Calculate new SRAM Checksum
- 2.116 $80/C9F7 Satellaview-related: Copy data from banks $13-$15 to $10-$12
- 2.117 $80/CA1B Satellaview-related: Copy data from banks $10-$12 to $13-$15
- 2.118 $80/E7A3 ?
- 2.119 $80/EA28 ?
- 2.120 $80/EFD6 ?
- 2.121 $80/F1EB ?
- 2.122 $80/F231 ? (Check if Errors have occured)
- 2.123 $80/F2AB ?
- 2.124 $80/F2F2 Deactivate Satellaview Power Down Mode
- 3 Bank $81
- 3.1 $81/8002 ? (Executed when talking to the aerial building)
- 3.2 $81/8028 ? (Executed when talking to the aerial building)
- 3.3 $81/8070 TOKEN VECTOR #$25: ?
- 3.4 $81/818F ?
- 3.5 $81/81B4 Jump Table for $81/818F
- 3.6 $81/81C0 ?
- 3.7 $81/9356 TOKEN VECTOR #$27: ?
- 3.8 $81/948E ? (Executed when talking to the aerial building)
- 3.9 $81/A41A ? (Executed when talking to the aerial building)
- 3.10 $81/A551 ? (Executed when talking to the aerial building)
- 3.11 $81/A5C3 ? (Executed when talking to the aerial building)
- 3.12 $81/A6B4 ? (Executed when talking to the aerial building)
- 3.13 $81/AA1D ?
- 3.14 $81/AAA9 ? (Executed when talking to the aerial building)
- 3.15 $81/AACA TOKEN VECTOR: ?
- 3.16 $81/AD9D TOKEN VECTOR #$23: ? (Remove Token Data Load Address)
- 3.17 $81/AE37 TOKEN VECTOR #$02: ?
- 3.18 $81/AFA5 TOKEN VECTOR #$20: ?
- 3.19 $81/AFBF TOKEN VECTOR #$00: ?
- 3.20 $81/AFFD ? (Executed when talking to the aerial building and at start up)
- 3.21 $81/B00D Jump Table for $81/AFFD
- 3.22 $81/B07E ? (Executed when talking to the aerial building and at start up)
- 3.23 $81/B088 ? (Executed when talking to the aerial building and at start up)
- 3.24 $81/B0AA TOKEN VECTOR #$34: ? (Executed when talking to the aerial building and at start up)
- 3.25 $81/B0ED TOKEN VECTOR #$33: ?
- 3.26 $81/B190 TOKEN VECTOR #$26: ?
- 3.27 $81/B1A6 ? (Executed when talking to the aerial building)
- 3.28 $81/B91A ? (Add "Animation Step" to buffer)
- 3.29 $81/BA2A ? (Executed when talking to the aerial building and on the title screen)
- 3.30 $81/BA53 ? (Executed when talking to the aerial building)
- 3.31 $81/BA96 ?
- 3.32 $81/BB5F ? Sound related
- 3.33 $81/BB6E Jump Table for $81/BB5F
- 3.34 $81/BD70 ?
- 3.35 $81/BD77 ?
- 3.36 $81/BDEA ?
- 3.37 $81/BDF9 Jump Table for $81/BDEA
- 3.38 $81/BFFD ?
- 3.39 $81/C00D ? (Executed when talking to the aerial building)
- 3.40 $81/C149 ? (Executed when talking to the aerial building)
- 3.41 $81/C18B ? (Executed when talking to the aerial building)
- 3.42 $81/C210 ?
- 3.43 $81/C225 ?
- 3.44 $81/C29A ?
- 3.45 $81/C2B0 ? (Executed when talking to the aerial building and at start up)
- 3.46 $81/C367 ? (Check/Work off every Token Data Slot)
- 3.47 $81/C39F ?
- 3.48 $81/C3C9 ?
- 3.49 $81/C3FB ? Token-related - Jump to a token vector
- 3.50 $81/C43B ? (Execute Token Data)
- 3.51 $81/C4DD ?
- 3.52 $81/C4F3 ?
- 3.53 $81/C520 ? (Add the sprites of objects to the OAM buffer)
- 3.54 $81/C5D7 Restore original Token Handlers
- 3.55 $81/C5E9 Hook Vectors
- 3.56 $81/C7D0 ?
- 3.57 $81/C7DD ?
- 3.58 $81/C80E ?
- 3.59 $81/C8C3 ?
- 3.60 $81/C968 ?
- 3.61 $81/CA60 ?
- 3.62 $81/CA9C ? (Sprite palette related)
- 3.63 $81/CCE1 ?
- 3.64 $81/CCFD ?
- 3.65 $81/CD89 ?
- 4 Bank $83
- 5 Bank $84
- 6 Bank $94
- 6.1 $94/8000 PROGRAM FLOW: TITLE SCREEN: Start of the program after Boot
- 6.2 $94/80CB Data for Graphics Settings
- 6.3 $94/8108 TOKEN DATA
- 6.4 $94/8111 PROGRAM FLOW: TITLE SCREEN: Wait for the Nintendo Logo
- 6.5 $94/8131 PROGRAM FLOW: TITLE SCREEN: ? (Title Screen Window stuff)
- 6.6 $94/81A0 PROGRAM FLOW: TITLE SCREEN: ? (Intro)
- 6.7 $94/821E PROGRAM FLOW: TITLE SCREEN: Wait after Nintendo Logo Reflection, before turning gray
- 6.8 $94/8237 PROGRAM FLOW: TITLE SCREEN: Turn Nintendo Logo gray
- 6.9 $94/828A PROGRAM FLOW: TITLE SCREEN: City Backdrop Scroll and Color Cycle
- 6.10 $94/82CA PROGRAM FLOW: TITLE SCREEN: Fade to White (and other stuff?)
- 6.11 $94/8326 Color Math Data for Title Screen Fade to White
- 6.12 $94/8366 PROGRAM FLOW: TITLE SCREEN: ?
- 6.13 $94/83E4 ?
- 6.14 $94/846B Transfer NMI Jump Address from Buffer B to A
- 6.15 $94/8534 ? (Screen Fade Out)
- 6.16 $94/8572 ? (related to Intro Screen Brightness)
- 6.17 $94/85ED Title Screen City Backdrop Scroll and Color Cycle
- 6.18 $94/865F Title Screen City Backdrop Color Cycle Table (for $94/85ED)
- 6.19 $94/86BF Title Screen City Backdrop Color Cycle Palettes (for $94/85ED)
- 6.20 $94/8BDB Intro: HDMA table for BG1 VScroll (for $94/81A0)
- 6.21 $94/8A9F ?
- 6.22 $94/8AC8 TOKEN DATA
- 6.23 $94/96F7 Palette Data for the Nintendo Logo turning gray ($94/8237)
- 6.24 $94/BCFF Clear BS-X SRAM
- 6.25 $94/BD38 TOKEN DATA
- 7 Bank $9F
Bank $10
There is a Jump Table on the Satellaview that is used at the Start Up. I guess its implemented to serve as a verification that the Satellaview is there and working correctly, because the BIOS jumps to this jump table just to be redirected to subroutines in itself again.
$10/5974 6B RTL ; (Executed at Start Up) $10/5978 6B RTL ; (Executed while NMI)
$10/598C 5C AD C2 80 JMP $80C2AD ; Check if Satellaview Stream Number Registers work $10/59A4 5C 6D C3 80 JMP $80C36D ; Transfer (fixed Set of) Data to Satellaview $10/59B0 5C D6 C3 80 JMP $80C3D6[$80:C3D6] A:0008 X:FFFE Y:E280 P:envMxdIzC $10/5A6C 5C 84 BB 80 JMP $80BB84 ; MCC Memory Controller Settings: Enable Flash R/W $10/5A70 5C B1 BB 80 JMP $80BBB1 ; MCC Memory Controller Settings: Disable Flash R/W
$10/5A90 5C 6C BD 80 JMP $80BD6C[$80:BD6C] A:0 X:0007 Y:0 P:envMXdIZC $10/5A94 5C 95 BD 80 JMP $80BD95[$80:BD95] A:0 X:0 Y:0 P:envMXdIZc
$10/5B0C 5C 77 C1 80 JMP $80C177[$80:C177] A:0080 X:0007 Y:0 P:eNvMxdIzC $10/5B10 5C C5 C1 80 JMP $80C1C5[$80:C1C5] A:0080 X:0007 Y:0 P:eNvMxdIzC
$10/5B40 5C EB F1 80 JMP $80F1EB[$80:F1EB] A:0061 X:FFFE Y:0 P:eNvmxdIzC $10/5B44 5C 31 F2 80 JMP $80F231[$80:F231] A:0 X:00FF Y:0 P:eNvmxdIzC
$10/5B4C 5C AB F2 80 JMP $80F2AB[$80:F2AB] A:0 X:0 Y:00FF P:envmxdIzC
$10/5B58 5C F2 F2 80 JMP $80F2F2[$80:F2F2] A:0 X:FFFE Y:E280 P:envMxdIZC
$10/5B70 5C A3 E7 80 JMP $80E7A3[$80:E7A3] A:0 X:00FF Y:0 P:envMxdIzC
$10/5BAC 5C 28 EA 80 JMP $80EA28[$80:EA28] A:0 X:0 Y:0 P:envMxdIzC
$10/5C0C 5C D6 EF 80 JMP $80EFD6[$80:EFD6] A:0 X:00FF Y:0 P:envMxdIzC
$10/5C1C 5C 20 97 80 JMP $809720 ; Play Music/Sound Effect $10/5C20 5C A6 97 80 JMP $8097A6[$80:97A6] A:0 X:00FF Y:0 P:eNvmxdIzC
Bank $80
$80/8200 Update Graphics Registers
Transfers values from their $01xx-buffers to their registers
$80/8200 08 PHP ; Buffer Flag Register value on stack $80/8201 E2 20 SEP #$20 ; A = 8-bit $80/8203 AD 00 01 LDA $0100 ; Update Display Control 1 (FBLANK / Brightness) and it's buffer $80/8206 8D 00 21 STA $2100 $80/8209 8D 1B 02 STA $021B $80/820C AD 01 01 LDA $0101 ; Update Object Size and Object Base $80/820F 8D 01 21 STA $2101 $80/8212 AD 04 01 LDA $0104 ; Update BG Mode $80/8215 8D 05 21 STA $2105 $80/8218 AD 05 01 LDA $0105 ; Update Mosaic $80/821B 8D 06 21 STA $2106 $80/821E AD 06 01 LDA $0106 ; Update BG1 Tilemap Address and Mirroring $80/8221 8D 07 21 STA $2107 $80/8224 AD 07 01 LDA $0107 ; Update BG2 Tilemap Address and Mirroring $80/8227 8D 08 21 STA $2108 $80/822A AD 08 01 LDA $0108 ; Update BG3 Tilemap Address and Mirroring $80/822D 8D 09 21 STA $2109 $80/8230 AD 09 01 LDA $0109 ; Update BG4 Tilemap Address and Mirroring $80/8233 8D 0A 21 STA $210A $80/8236 AD 0A 01 LDA $010A ; Update BG1/2 Tileset Address $80/8239 8D 0B 21 STA $210B $80/823C AD 0B 01 LDA $010B ; Update BG3/4 Tileset Address $80/823F 8D 0C 21 STA $210C $80/8242 AD 0C 01 LDA $010C ; Update Mode 7 Rotation/Scaling Mode Settings $80/8245 8D 1A 21 STA $211A $80/8248 AD 0D 01 LDA $010D ; Update Window BG1/BG2 Mask Settings $80/824B 8D 23 21 STA $2123 $80/824E AD 0E 01 LDA $010E ; Update Window BG3/BG4 Mask Settings $80/8251 8D 24 21 STA $2124 $80/8254 AD 1F 01 LDA $011F ; Update Window OBJ/MATH Mask Settings $80/8257 8D 25 21 STA $2125 $80/825A AD 20 01 LDA $0120 ; Update Window 1 Left Position (X1) $80/825D 8D 26 21 STA $2126 $80/8260 AD 21 01 LDA $0121 ; Update Window 1 Right Position (X2) $80/8263 8D 27 21 STA $2127 $80/8266 AD 22 01 LDA $0122 ; Update Window 2 Left Position (X1) $80/8269 8D 28 21 STA $2128 $80/826C AD 23 01 LDA $0123 ; Update Window 2 Right Position (X2) $80/826F 8D 29 21 STA $2129 $80/8272 AD 24 01 LDA $0124 ; Update Window 1/2 Mask Logic (BG1-BG4) $80/8275 8D 2A 21 STA $212A $80/8278 AD 25 01 LDA $0125 ; Update Window 1/2 Mask Logic (OBJ/MATH) $80/827B 8D 2B 21 STA $212B $80/827E AD 26 01 LDA $0126 ; Update Main Screen Designation $80/8281 8D 2C 21 STA $212C $80/8284 AD 28 01 LDA $0128 ; Update Window Area Main Screen Disable $80/8287 8D 2E 21 STA $212E $80/828A AD 27 01 LDA $0127 ; Update Sub Screen Designation $80/828D 8D 2D 21 STA $212D $80/8290 AD 29 01 LDA $0129 ; Update Window Area Sub Screen Disable $80/8293 8D 2F 21 STA $212F $80/8296 AD 2A 01 LDA $012A ; Update $80/8299 8D 30 21 STA $2130 $80/829C AD 2B 01 LDA $012B ; Update $80/829F 8D 31 21 STA $2131 $80/82A2 AD 2D 01 LDA $012D ; Update Color Math Sub Screen Backdrop Color - RED $80/82A5 09 20 ORA #$20 $80/82A7 8D 32 21 STA $2132 $80/82AA AD 2E 01 LDA $012E ; Update Color Math Sub Screen Backdrop Color - GREEN $80/82AD 09 40 ORA #$40 $80/82AF 8D 32 21 STA $2132 $80/82B2 AD 2F 01 LDA $012F ; Update Color Math Sub Screen Backdrop Color - BLUE $80/82B5 09 80 ORA #$80 $80/82B7 8D 32 21 STA $2132 $80/82BA AD 30 01 LDA $0130 ; Update Display Control 2 $80/82BD 8D 33 21 STA $2133 $80/82C0 AD 0F 01 LDA $010F ; Update Scroll Registers for BG1 to BG4 $80/82C3 8D 0D 21 STA $210D $80/82C6 AD 10 01 LDA $0110 $80/82C9 8D 0D 21 STA $210D $80/82CC AD 11 01 LDA $0111 $80/82CF 8D 0E 21 STA $210E $80/82D2 AD 12 01 LDA $0112 $80/82D5 8D 0E 21 STA $210E $80/82D8 AD 13 01 LDA $0113 $80/82DB 8D 0F 21 STA $210F $80/82DE AD 14 01 LDA $0114 $80/82E1 8D 0F 21 STA $210F $80/82E4 AD 15 01 LDA $0115 $80/82E7 8D 10 21 STA $2110 $80/82EA AD 16 01 LDA $0116 $80/82ED 8D 10 21 STA $2110 $80/82F0 AD 17 01 LDA $0117 $80/82F3 8D 11 21 STA $2111 $80/82F6 AD 18 01 LDA $0118 $80/82F9 8D 11 21 STA $2111 $80/82FC AD 19 01 LDA $0119 $80/82FF 8D 12 21 STA $2112 $80/8302 AD 1A 01 LDA $011A $80/8305 8D 12 21 STA $2112 $80/8308 AD 1B 01 LDA $011B $80/830B 8D 13 21 STA $2113 $80/830E AD 1C 01 LDA $011C $80/8311 8D 13 21 STA $2113 $80/8314 AD 1D 01 LDA $011D $80/8317 8D 14 21 STA $2114 $80/831A AD 1E 01 LDA $011E $80/831D 8D 14 21 STA $2114 $80/8320 AD 3A 01 LDA $013A ; Set HDMA flags $80/8323 8D 0C 42 STA $420C $80/8326 28 PLP ; Restore Flag Register value $80/8327 6B RTL
$80/8328 During NMI: Update CGRAM
$80/8328 08 PHP ; Buffer Flag Register value on stack $80/8329 E2 10 SEP #$10 ; X/Y = 8-bit $80/832B C2 20 REP #$20 ; A = 16-bit $80/832D AD 1C 02 LDA $021C ; Is the flag to update the CGRAM set? $80/8330 F0 24 BEQ $24 ; [$8356] Exit if not $80/8332 A9 00 22 LDA #$2200 ; Setup DMA to CGRAM, transfer whole buffer ($7E/2000) $80/8335 8D 10 43 STA $4310 $80/8338 A9 00 20 LDA #$2000 $80/833B 8D 12 43 STA $4312 $80/833E A2 7E LDX #$7E $80/8340 8E 14 43 STX $4314 $80/8343 A9 00 02 LDA #$0200 $80/8346 8D 15 43 STA $4315 $80/8349 A2 00 LDX #$00 ; Set CGRAM address to its start $80/834B 8E 21 21 STX $2121 $80/834E A2 02 LDX #$02 ; Activate DMA $80/8350 8E 0B 42 STX $420B $80/8353 9C 1C 02 STZ $021C ; Clear Flag for CGRAM update $80/8356 28 PLP ; Restore Flag Register value $80/8357 6B RTL
$80/8358 ?
$80/8358 08 PHP ; Buffer Flag Register value on stack $80/8359 C2 20 REP #$20 ; A = 16-bit $80/835B A9 61 00 LDA #$0061 A:00E0 X:FFFE Y:0 P:eNvmxdIzC $80/835E 8D 24 02 STA $0224 [$80:0224] A:0061 X:FFFE Y:0 P:envmxdIzC $80/8361 28 PLP ; Restore Flag Register value $80/8362 6B RTL
$80/8363 ? (Executed while NMI)
$80/8363 08 PHP ; Buffer Flag Register value on stack $80/8364 E2 20 SEP #$20 ; A = 8-bit $80/8366 AD 24 02 LDA $0224 [$80:0224] A:0 X:0 Y:0 P:eNvMxdIzC $80/8369 8D 02 42 STA $4202 [$80:4202] A:0061 X:0 Y:0 P:envMxdIzC $80/836C A9 05 LDA #$05 A:0061 X:0 Y:0 P:envMxdIzC $80/836E 8D 03 42 STA $4203 [$80:4203] A:0005 X:0 Y:0 P:envMxdIzC $80/8371 EA NOP A:0005 X:0 Y:0 P:envMxdIzC $80/8372 C2 20 REP #$20 A:0005 X:0 Y:0 P:envMxdIzC $80/8374 AD 16 42 LDA $4216 [$80:4216] A:0005 X:0 Y:0 P:envmxdIzC $80/8377 48 PHA A:01E5 X:0 Y:0 P:envmxdIzC $80/8378 E2 20 SEP #$20 A:01E5 X:0 Y:0 P:envmxdIzC $80/837A AD 25 02 LDA $0225 [$80:0225] A:01E5 X:0 Y:0 P:envMxdIzC $80/837D 8D 02 42 STA $4202 [$80:4202] A:0100 X:0 Y:0 P:envMxdIZC $80/8380 A9 05 LDA #$05 A:0100 X:0 Y:0 P:envMxdIZC $80/8382 8D 03 42 STA $4203 [$80:4203] A:0105 X:0 Y:0 P:envMxdIzC $80/8385 EB XBA A:0105 X:0 Y:0 P:envMxdIzC $80/8386 EA NOP A:0501 X:0 Y:0 P:envMxdIzC $80/8387 AD 16 42 LDA $4216 [$80:4216] A:0501 X:0 Y:0 P:envMxdIzC $80/838A 38 SEC A:0500 X:0 Y:0 P:envMxdIZC $80/838B 63 02 ADC $02,s [$00:1EEA] A:0500 X:0 Y:0 P:envMxdIZC $80/838D 83 02 STA $02,s [$00:1EEA] A:0502 X:0 Y:0 P:envMxdIzc $80/838F C2 20 REP #$20 A:0502 X:0 Y:0 P:envMxdIzc $80/8391 68 PLA A:0502 X:0 Y:0 P:envmxdIzc $80/8392 69 11 00 ADC #$0011 A:02E5 X:0 Y:0 P:envmxdIzc $80/8395 6D 26 02 ADC $0226 [$80:0226] A:02F6 X:0 Y:0 P:envmxdIzc $80/8398 8D 24 02 STA $0224 [$80:0224] A:02F6 X:0 Y:0 P:envmxdIzc $80/839B 28 PLP ; Restore Flag Register value $80/839C 6B RTL
$80/839D Activate NMI
$80/839D 08 PHP ; Buffer Flag Register value on stack $80/839E E2 20 SEP #$20 $80/83A0 AD 35 01 LDA $0135 ; Load value for Interrupt Enable from buffer $80/83A3 09 80 ORA #$80 ; Set Flag to activate NMI $80/83A5 8D 00 42 STA $4200 ; Set Interrupt Enables $80/83A8 8D 35 01 STA $0135 ; Update buffer $80/83AB 28 PLP ; Restore Flag Register value $80/83AC 6B RTL
$80/83BD Clear whole VRAM via DMA
$80/83BD 08 PHP ; Buffer Flag Register value on stack $80/83BE E2 20 SEP #$20 ; A = 8-bit $80/83C0 A9 80 LDA #$80 ; 16-bit transfer $80/83C2 8D 15 21 STA $2115 $80/83C5 9C 16 21 STZ $2116 ; VRAM Address: $0000 $80/83C8 9C 17 21 STZ $2117 $80/83CB A9 09 LDA #$09 ; Fixed DMA, 16-bit transfer $80/83CD 8D 00 43 STA $4300 $80/83D0 A9 18 LDA #$18 ; Destination: $2118 (VRAM) $80/83D2 8D 01 43 STA $4301 $80/83D5 A9 F5 LDA #$F5 ; Source Address (Clear Byte): $80/83F5 $80/83D7 8D 02 43 STA $4302 $80/83DA A9 83 LDA #$83 $80/83DC 8D 03 43 STA $4303 $80/83DF A9 80 LDA #$80 $80/83E1 8D 04 43 STA $4304 $80/83E4 A9 00 LDA #$00 ; Number of Bytes: $10000 $80/83E6 8D 05 43 STA $4305 $80/83E9 A9 00 LDA #$00 $80/83EB 8D 06 43 STA $4306 $80/83EE A9 01 LDA #$01 ; Activate DMA $80/83F0 8D 0B 42 STA $420B $80/83F3 28 PLP ; Restore Flag Register value $80/83F4 6B RTL
Clear byte:
$80/83F5 00
$80/8411 Store a chain of values in $01xx (Graphics Register buffer)
When this subroutine is called from a place in code, the next three byte are arguments for this subroutine. The arguments are a 24-bit-address.
The address this points contains a variable number of arguments in the following format:
1st byte: Destination ($0100-$01FE) 2nd byte: Value for that register
When #$FF is the first byte the loop is ended.
$80/8411 08 PHP ; Buffer Flag Register value on stack $80/8412 E2 10 SEP #$10 ; X/Y = 8-bit $80/8414 C2 20 REP #$20 ; A = 16-bit $80/8416 A3 03 LDA $03,s ; Copy the original return address (pointing to data for this subroutine)... $80/8418 8D 21 00 STA $0021 ; ... into $20-$22 as a 24-bit load address $80/841B A3 02 LDA $02,s $80/841D 8D 20 00 STA $0020 $80/8420 18 CLC ; Change return address on stack to leap over the data $80/8421 69 03 00 ADC #$0003 $80/8424 83 02 STA $02,s $80/8426 A0 01 LDY #$01 ; Load Data from the original return address $80/8428 B7 20 LDA [$20],y ; Set this data up as another 24-bit-address in $23-$25 $80/842A 8D 23 00 STA $0023 $80/842D C8 INY $80/842E B7 20 LDA [$20],y $80/8430 8D 24 00 STA $0024 $80/8433 E2 20 SEP #$20 ; A = 8 bit $80/8435 A0 00 LDY #$00 ; Reset Load Index $80/8437 B7 23 LDA [$23],y ; Load byte from the second address $80/8439 AA TAX ; Transfer to X as (potential) Store Index $80/843A C9 FF CMP #$FF ; Exit if that byte was = #$FF $80/843C F0 09 BEQ $09 ; [$8447] $80/843E C8 INY $80/843F B7 23 LDA [$23],y ; Load next byte and store it in $01xx $80/8441 9D 00 01 STA $0100,x $80/8444 C8 INY $80/8445 80 F0 BRA $F0 ; [$8437] Loop $80/8447 28 PLP ; Restore Flag Register value $80/8448 6B RTL
$80/8449 Data
01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 00 00 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 00 00 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 00 00 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 00 00 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 00 00 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 00 00 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 00 00 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 00 00 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 00 00 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 00 00 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 00 00 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 00 00 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 00 00 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 00 00 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 00 00 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80 00 00 01 00 02 00 04 00 08 00 10 00 20 00 40 00 80
$80/8649 Data
00 1E 03 00 00 1E 0C 00 00 1E 30 00 00 1E C0 00 00 1E 00 03 00 1E 00 0C 00 1E 00 30 00 1E 00 C0 02 1E 03 00 02 1E 0C 00 02 1E 30 00 02 1E C0 00 02 1E 00 03 02 1E 00 0C 02 1E 00 30 02 1E 00 C0 04 1E 03 00 04 1E 0C 00 04 1E 30 00 04 1E C0 00 04 1E 00 03 04 1E 00 0C 04 1E 00 30 04 1E 00 C0 06 1E 03 00 06 1E 0C 00 06 1E 30 00 06 1E C0 00 06 1E 00 03 06 1E 00 0C 06 1E 00 30 06 1E 00 C0 08 1E 03 00 08 1E 0C 00 08 1E 30 00 08 1E C0 00 08 1E 00 03 08 1E 00 0C 08 1E 00 30 08 1E 00 C0 0A 1E 03 00 0A 1E 0C 00 0A 1E 30 00 0A 1E C0 00 0A 1E 00 03 0A 1E 00 0C 0A 1E 00 30 0A 1E 00 C0 0C 1E 03 00 0C 1E 0C 00 0C 1E 30 00 0C 1E C0 00 0C 1E 00 03 0C 1E 00 0C 0C 1E 00 30 0C 1E 00 C0 0E 1E 03 00 0E 1E 0C 00 0E 1E 30 00 0E 1E C0 00 0E 1E 00 03 0E 1E 00 0C 0E 1E 00 30 0E 1E 00 C0 10 1E 03 00 10 1E 0C 00 10 1E 30 00 10 1E C0 00 10 1E 00 03 10 1E 00 0C 10 1E 00 30 10 1E 00 C0 12 1E 03 00 12 1E 0C 00 12 1E 30 00 12 1E C0 00 12 1E 00 03 12 1E 00 0C 12 1E 00 30 12 1E 00 C0 14 1E 03 00 14 1E 0C 00 14 1E 30 00 14 1E C0 00 14 1E 00 03 14 1E 00 0C 14 1E 00 30 14 1E 00 C0 16 1E 03 00 16 1E 0C 00 16 1E 30 00 16 1E C0 00 16 1E 00 03 16 1E 00 0C 16 1E 00 30 16 1E 00 C0 18 1E 03 00 18 1E 0C 00 18 1E 30 00 18 1E C0 00 18 1E 00 03 18 1E 00 0C 18 1E 00 30 18 1E 00 C0 1A 1E 03 00 1A 1E 0C 00 1A 1E 30 00 1A 1E C0 00 1A 1E 00 03 1A 1E 00 0C 1A 1E 00 30 1A 1E 00 C0 1C 1E 03 00 1C 1E 0C 00 1C 1E 30 00 1C 1E C0 00 1C 1E 00 03 1C 1E 00 0C 1C 1E 00 30 1C 1E 00 C0 1E 1E 03 00 1E 1E 0C 00 1E 1E 30 00 1E 1E C0 00 1E 1E 00 03 1E 1E 00 0C 1E 1E 00 30 1E 1E 00 C0
$80/8849 Set Sprites in OAM buffer
Before this is called, there is an 16-bit value set into $00/1. This gets added to each X/Y-coordinate for every sprite that gets set with this subroutine.
$08/9 is what gets added to the other two bytes of OAM data.
$20-2 contains the Data Load address. First double-byte is the number of sprites to do
$80/8849 A7 20 LDA [$20] ; Load first double-byte - Number of Sprites to do $80/884B F0 78 BEQ $78 ; [$88C5] Exit if #$0000 $80/884D 85 04 STA $04 ; Store number of sprites to do as counter in $04 $80/884F A0 02 00 LDY #$0002 ; Set up Load Index $80/8852 AE 20 1E LDX $1E20 ; Load Number of used Sprites $80/8855 18 CLC A:000C X:0 Y:0002 P:envmxdIZc $80/8856 B7 20 LDA [$20],y ; Load next double-byte $80/8858 85 0C STA $0C [$00:000C] A:81F8 X:0 Y:0002 P:eNvmxdIzc $80/885A C8 INY ; Increment Load Index twice $80/885B C8 INY $80/885C 65 00 ADC $00 [$00:0000] A:81F8 X:0 Y:0004 P:envmxdIzc $80/885E 9D 00 1C STA $1C00,x ; Store in OAM Low Table buffer $80/8861 89 00 01 BIT #$0100 ; Is bit 8 set? $80/8864 F0 0E BEQ $0E ; [$8874] Branch if not $80/8866 BF 49 86 80 LDA $808649,x ; Setup corresponding address for OAM High Table buffer $80/886A 85 06 STA $06 $80/886C B2 06 LDA ($06) [$81:1E00] A:1E00 X:0004 Y:0009 P:envmxdIzc $80/886E 1F 49 84 80 ORA $808449,x[$80:844D] A:0002 X:0004 Y:0009 P:envmxdIzc $80/8872 92 06 STA ($06) [$81:1E00] A:0006 X:0004 Y:0009 P:envmxdIzc $80/8874 B7 20 LDA [$20],y[$95:82B1] A:8200 X:0 Y:0004 P:eNvmxdIZc $80/8876 29 FF 00 AND #$00FF A:0408 X:0 Y:0004 P:envmxdIzc $80/8879 89 80 00 BIT #$0080 A:0008 X:0 Y:0004 P:envmxdIzc $80/887C F0 03 BEQ $03 [$8881] A:0008 X:0 Y:0004 P:envmxdIZc $80/887E 09 00 FF ORA #$FF00 A:00F8 X:000C Y:0013 P:envmxdIzc $80/8881 18 CLC A:0008 X:0 Y:0004 P:envmxdIZc $80/8882 65 02 ADC $02 [$00:0002] A:0008 X:0 Y:0004 P:envmxdIZc $80/8884 C9 F0 00 CMP #$00F0 A:007F X:0 Y:0004 P:envmxdIzc $80/8887 90 08 BCC $08 [$8891] A:007F X:0 Y:0004 P:eNvmxdIzc
code is missing here
$80/8891 E2 20 SEP #$20 A:007F X:0 Y:0004 P:eNvmxdIzc $80/8893 9D 01 1C STA $1C01,x[$81:1C01] A:007F X:0 Y:0004 P:eNvMxdIzc $80/8896 C8 INY A:007F X:0 Y:0004 P:eNvMxdIzc $80/8897 C2 21 REP #$21 A:007F X:0 Y:0005 P:envMxdIzc $80/8899 A5 0C LDA $0C [$00:000C] A:007F X:0 Y:0005 P:envmxdIzc $80/889B 10 0E BPL $0E [$88AB] A:81F8 X:0 Y:0005 P:eNvmxdIzc $80/889D BF 49 86 80 LDA $808649,x[$80:8649] A:81F8 X:0 Y:0005 P:eNvmxdIzc $80/88A1 85 06 STA $06 [$00:0006] A:1E00 X:0 Y:0005 P:envmxdIzc $80/88A3 B2 06 LDA ($06) [$81:1E00] A:1E00 X:0 Y:0005 P:envmxdIzc $80/88A5 1F 4B 84 80 ORA $80844B,x[$80:844B] A:0 X:0 Y:0005 P:envmxdIZc $80/88A9 92 06 STA ($06) [$81:1E00] A:0002 X:0 Y:0005 P:envmxdIzc $80/88AB B7 20 LDA [$20],y[$95:82B2] A:0002 X:0 Y:0005 P:envmxdIzc $80/88AD C8 INY A:3E04 X:0 Y:0005 P:envmxdIzc $80/88AE C8 INY A:3E04 X:0 Y:0006 P:envmxdIzc $80/88AF 25 0A AND $0A [$00:000A] A:3E04 X:0 Y:0007 P:envmxdIzc $80/88B1 65 08 ADC $08 [$00:0008] A:3E04 X:0 Y:0007 P:envmxdIzc $80/88B3 9D 02 1C STA $1C02,x[$81:1C02] A:3E04 X:0 Y:0007 P:envmxdIzc $80/88B6 8A TXA ; Increment number of used sprites by four $80/88B7 69 04 00 ADC #$0004 $80/88BA 29 FF 01 AND #$01FF ; (Reset value if it surpasses the limit of #$200) $80/88BD AA TAX $80/88BE C6 04 DEC $04 ; Decrement number of sprites to do $80/88C0 D0 94 BNE $94 ; [$8856] Branch if there are still sprites to do $80/88C2 8E 20 1E STX $1E20 ; Store number of used sprites back $80/88C5 6B RTL
$80/8944 Update OAM
This subroutine transfers the whole OAM buffer at $7E/1C00 to the OAM via DMA.
$80/8944 08 PHP ; Buffer Flag Register value on stack $80/8945 E2 10 SEP #$10 ; X/Y = 8-bit $80/8947 C2 20 REP #$20 ; A = 16-bit $80/8949 A9 00 04 LDA #$0400 ; DMA transfer type: 8-bit, $2104 $80/894C 8D 00 43 STA $4300 $80/894F A9 00 1C LDA #$1C00 ; Source Address: $00/1C00 $80/8952 8D 02 43 STA $4302 $80/8955 A2 00 LDX #$00 $80/8957 8E 04 43 STX $4304 $80/895A A9 20 02 LDA #$0220 ; Transfer #$220 bytes $80/895D 8D 05 43 STA $4305 $80/8960 9C 02 21 STZ $2102 ; Start at $0000 in OAM $80/8963 A2 01 LDX #$01 ; Activate DMA $80/8965 8E 0B 42 STX $420B $80/8968 28 PLP ; Restore Flag Register value $80/8969 6B RTL
$80/896A Update Joypad Input buffers
$80/896A 08 PHP ; Buffer Flag Register value on stack $80/896B E2 20 SEP #$20 ; A = 8-bit $80/896D AD 12 42 LDA $4212 ; Wait until Auto-Joypad Read is done $80/8970 29 01 AND #$01 $80/8972 D0 F9 BNE $F9 ; [$896D] $80/8974 C2 20 REP #$20 ; A = 16-bit $80/8976 AD 18 42 LDA $4218 ; Buffer Joypad 1 Input of this frame $80/8979 8D 50 01 STA $0150 $80/897C 4D 5C 01 EOR $015C ; Calculate which buttons were pushed this frame $80/897F 2D 50 01 AND $0150 $80/8982 8D 54 01 STA $0154 [$80:0154] A:0 X:00FF Y:00FF P:envmxdIZC $80/8985 8D 58 01 STA $0158 [$80:0158] A:0 X:00FF Y:00FF P:envmxdIZC $80/8988 AD 50 01 LDA $0150 ; Is currently any button pushed/held? $80/898B F0 18 BEQ $18 ; [$89A5] Branch if not
code is missing here
$80/89A5 AD 4C 01 LDA $014C [$80:014C] A:0 X:00FF Y:00FF P:envmxdIZC $80/89A8 8D 62 01 STA $0162 [$80:0162] A:0008 X:00FF Y:00FF P:envmxdIzC $80/89AB AD 50 01 LDA $0150 ; Replace last frame's input with this one (for the next frame) $80/89AE 8D 5C 01 STA $015C $80/89B1 AD 1A 42 LDA $421A ; Buffer Joypad 2 Input of this frame $80/89B4 8D 52 01 STA $0152 $80/89B7 4D 64 01 EOR $0164 ; Calculate which buttons were pushed this frame $80/89BA 2D 52 01 AND $0152 $80/89BD 8D 56 01 STA $0156 [$80:0156] A:0 X:00FF Y:00FF P:envmxdIZC $80/89C0 8D 5A 01 STA $015A [$80:015A] A:0 X:00FF Y:00FF P:envmxdIZC $80/89C3 AD 52 01 LDA $0152 ; Is currently any button pushed/held? $80/89C6 F0 18 BEQ $18 ; [$89E0] Branch if not
code is missing here
$80/89E0 AD 4C 01 LDA $014C [$80:014C] A:0 X:00FF Y:00FF P:envmxdIZC $80/89E3 8D 6A 01 STA $016A [$80:016A] A:0008 X:00FF Y:00FF P:envmxdIzC $80/89E6 AD 52 01 LDA $0152 ; Replace last frame's input with this one (for the next frame) $80/89E9 8D 64 01 STA $0164 $80/89EC 28 PLP ; Restore Flag Register value $80/89ED 6B RTL
$80/8A14 ? (Use Jump Table)
$80/8A14 08 PHP ; Buffer Flag Register value and Direct Bank on stack $80/8A15 0B PHD $80/8A16 E2 30 SEP #$30 ; A/X/Y = 8-bit $80/8A18 AD 21 1E LDA $1E21 [$80:1E21] A:FFFF X:0028 Y:0001 P:envMXdIzc $80/8A1B 29 03 AND #$03 A:FF00 X:0028 Y:0001 P:envMXdIZc $80/8A1D 0A ASL A A:FF00 X:0028 Y:0001 P:envMXdIZc $80/8A1E AA TAX A:FF00 X:0028 Y:0001 P:envMXdIZc $80/8A1F FC 2A 8A JSR ($8A2A,x)[$80:8A32] A:FF00 X:0 Y:0001 P:envMXdIZc $80/8A22 C2 30 REP #$30 ; A/X/Y = 16-bit $80/8A24 9C 20 1E STZ $1E20 ; Clear Number of used Sprites AND Jump Table index in $1E21 $80/8A27 2B PLD ; Restore Flag Register value and Direct Bank $80/8A28 28 PLP $80/8A29 6B RTL
$80/8A2A Jump Table for $80/8A14
$80/8A2A 32 8A Entry #$00 - $80/8A32 - Push all unused sprites in OAM Buffer out of the Screen $80/8A2C 51 8A Entry #$01 - $80/8A51 - $80/8A2E EA 8A Entry #$02 - $80/8AEA - Exit $80/8A30 EA 8A Entry #$03 - $80/8AEA - Exit
$80/8A32 Push all unused sprites in OAM Buffer out of the Screen
$80/8A32 C2 20 REP #$20 ; A = 16-bit $80/8A34 A2 F0 LDX #$F0 ; Clear Byte for OAM Low Table (Set Y-Coordinate beyond Screen) $80/8A36 0B PHD ; Buffer Direct Bank on Stack - Test if this is an UNNECESSCARY LINE $80/8A37 A9 00 1D LDA #$1D00 ; Set Direct Bank for upper half of OAM buffer $80/8A3A 5B TCD $80/8A3B 20 6A 8A JSR $8A6A $80/8A3E 2B PLD ; Restore Original Direct Bank - Test if this is an UNNECESSCARY LINE $80/8A3F AD 20 1E LDA $1E20 ; Load number of used sprites $80/8A42 4A LSR A ; Depending on it, calculate how many other sprites can be cleared $80/8A43 18 CLC $80/8A44 69 6A 8A ADC #$8A6A ; Depending on that, form a Jump address into the midst of Subroutine $80/8A6A $80/8A47 8D 3C 00 STA $003C ; Store it in $3C to jump there $80/8A4A A9 00 1C LDA #$1C00 ; Set Direct Bank for lower half of the OAM buffer $80/8A4D 5B TCD $80/8A4E 6C 3C 00 JMP ($003C) ; Jump into OAM Low Table buffer clearing and return immediately afterwards
$80/8A6A Clear sixty-four entries of the OAM Low Table buffer
Executed during NMI. Before this is executed, the direct page has to be set to $1C00 or $1D00 and X has to contain the clear value #$00F0 (pushing any sprite over the bottom line of the screen)
$80/8A6A 86 01 STX $01 $80/8A6C 86 05 STX $05 $80/8A6E 86 09 STX $09 $80/8A70 86 0D STX $0D $80/8A72 86 11 STX $11 $80/8A74 86 15 STX $15 $80/8A76 86 19 STX $19 $80/8A78 86 1D STX $1D $80/8A7A 86 21 STX $21 $80/8A7C 86 25 STX $25 $80/8A7E 86 29 STX $29 $80/8A80 86 2D STX $2D $80/8A82 86 31 STX $31 $80/8A84 86 35 STX $35 $80/8A86 86 39 STX $39 $80/8A88 86 3D STX $3D $80/8A8A 86 41 STX $41 $80/8A8C 86 45 STX $45 $80/8A8E 86 49 STX $49 $80/8A90 86 4D STX $4D $80/8A92 86 51 STX $51 $80/8A94 86 55 STX $55 $80/8A96 86 59 STX $59 $80/8A98 86 5D STX $5D $80/8A9A 86 61 STX $61 $80/8A9C 86 65 STX $65 $80/8A9E 86 69 STX $69 $80/8AA0 86 6D STX $6D $80/8AA2 86 71 STX $71 $80/8AA4 86 75 STX $75 $80/8AA6 86 79 STX $79 $80/8AA8 86 7D STX $7D $80/8AAA 86 81 STX $81 $80/8AAC 86 85 STX $85 $80/8AAE 86 89 STX $89 $80/8AB0 86 8D STX $8D $80/8AB2 86 91 STX $91 $80/8AB4 86 95 STX $95 $80/8AB6 86 99 STX $99 $80/8AB8 86 9D STX $9D $80/8ABA 86 A1 STX $A1 $80/8ABC 86 A5 STX $A5 $80/8ABE 86 A9 STX $A9 $80/8AC0 86 AD STX $AD $80/8AC2 86 B1 STX $B1 $80/8AC4 86 B5 STX $B5 $80/8AC6 86 B9 STX $B9 $80/8AC8 86 BD STX $BD $80/8ACA 86 C1 STX $C1 $80/8ACC 86 C5 STX $C5 $80/8ACE 86 C9 STX $C9 $80/8AD0 86 CD STX $CD $80/8AD2 86 D1 STX $D1 $80/8AD4 86 D5 STX $D5 $80/8AD6 86 D9 STX $D9 $80/8AD8 86 DD STX $DD $80/8ADA 86 E1 STX $E1 $80/8ADC 86 E5 STX $E5 $80/8ADE 86 E9 STX $E9 $80/8AE0 86 ED STX $ED $80/8AE2 86 F1 STX $F1 $80/8AE4 86 F5 STX $F5 $80/8AE6 86 F9 STX $F9 $80/8AE8 86 FD STX $FD $80/8AEA 60 RTS
$80/8AEB Clear OAM High Table buffer
$80/8AEB 9C 00 1E STZ $1E00 $80/8AEE 9C 02 1E STZ $1E02 $80/8AF1 9C 04 1E STZ $1E04 $80/8AF4 9C 06 1E STZ $1E06 $80/8AF7 9C 08 1E STZ $1E08 $80/8AFA 9C 0A 1E STZ $1E0A $80/8AFD 9C 0C 1E STZ $1E0C $80/8B00 9C 0E 1E STZ $1E0E $80/8B03 9C 10 1E STZ $1E10 $80/8B06 9C 12 1E STZ $1E12 $80/8B09 9C 14 1E STZ $1E14 $80/8B0C 9C 16 1E STZ $1E16 $80/8B0F 9C 18 1E STZ $1E18 $80/8B12 9C 1A 1E STZ $1E1A $80/8B15 9C 1C 1E STZ $1E1C $80/8B18 9C 1E 1E STZ $1E1E $80/8B1B 6B RTL
$80/8C0F ?
$80/8C0F 8B PHB ; Buffer Program Bank and Flag Register value on stack $80/8C10 08 PHP $80/8C11 4B PHK ; Set Program Bank to $80 $80/8C12 AB PLB $80/8C13 E2 30 SEP #$30 ; A/X/Y = 8-bit $80/8C15 A9 80 LDA #$80 A:0080 X:0000 Y:0000 P:eNvMXdIzC $80/8C17 8D 0C 02 STA $020C [$80:020C] A:0080 X:0000 Y:0000 P:eNvMXdIzC $80/8C1A A9 10 LDA #$10 A:0080 X:0000 Y:0000 P:eNvMXdIzC $80/8C1C 8D FC 01 STA $01FC [$80:01FC] A:0010 X:0000 Y:0000 P:envMXdIzC $80/8C1F A2 0F LDX #$0F ; Deactivate all entries in the VRAM DMA pipeline $80/8C21 9E 6C 01 STZ $016C,x $80/8C24 CA DEX $80/8C25 10 FA BPL $FA ; [$8C21] $80/8C27 28 PLP ; Restore Program Bank and Flag Register value $80/8C28 AB PLB $80/8C29 6B RTL
$80/8C2A ? (Put DMA from ROM into DMA Pipeline)
This subroutine sets up a 24-bit address in $3E-$40. The value that is in the active 8-bit of A is the bank. The 16-bit value in X is the address.
$80/8C2A 08 PHP ; Buffer Flag Register value, X and Y on stack $80/8C2B C2 30 REP #$30 ; A/X/Y = 16-bit $80/8C2D DA PHX $80/8C2E 5A PHY $80/8C2F A8 TAY ; Buffer A in Y $80/8C30 AD 43 06 LDA $0643 ; Buffer NMI-is-active-flag on stack $80/8C33 48 PHA $80/8C34 A9 01 00 LDA #$0001 ; Set NMI-is-active-flag (so no half-added Pipeline entry gets executed) $80/8C37 8D 43 06 STA $0643 $80/8C3A 98 TYA ; Restore Original A value $80/8C3B EB XBA ; Build 24-bit address in $3E-$40 $80/8C3C 85 3F STA $3F $80/8C3E 86 3E STX $3E $80/8C40 E2 30 SEP #$30 ; A/X/Y = 8-bit $80/8C42 A0 00 LDY #$00 ; Clear Y to use it as Load Index $80/8C44 A2 0F LDX #$0F ; Setup counter for Pipeline Slots $80/8C46 BD 6C 01 LDA $016C,x ; Check If Pipeline Slot is empty $80/8C49 F0 13 BEQ $13 ; [$8C5E] Branch if it is
code is missing here
$80/8C54 C2 30 REP #$30 ; A/X/Y = 16-bit $80/8C56 68 PLA ; Restore Original NMI-is-active-flag status $80/8C57 8D 43 06 STA $0643 $80/8C5A 7A PLY ; Restore Flag Register value, X and Y $80/8C5B FA PLX $80/8C5C 28 PLP $80/8C5D 6B RTL $80/8C5E B7 3E LDA [$3E],y ; Load Type of DMA Address and put it into DMA Pipeline $80/8C60 C8 INY $80/8C61 9D 6C 01 STA $016C,x $80/8C64 F0 FE BEQ $FE ; [$8C64] UNNECESSARY LINE - SOFT LOCK If Type = 00 (= Empty Slot) $80/8C66 3A DEC A $80/8C67 F0 35 BEQ $35 ; [$8C9E] Branch if Type is 01 = CGRAM
Put VRAM Write or Read DMA into DMA Pipeline
$80/8C69 B7 3E LDA [$3E],y ; Load DMA 24-bit Address from Address and put it into DMA Pipeline $80/8C6B C8 INY $80/8C6C 9D AC 01 STA $01AC,x $80/8C6F B7 3E LDA [$3E],y $80/8C71 C8 INY $80/8C72 9D BC 01 STA $01BC,x $80/8C75 B7 3E LDA [$3E],y $80/8C77 C8 INY $80/8C78 9D CC 01 STA $01CC,x $80/8C7B B7 3E LDA [$3E],y ; Load DMA Number of Bytes to do from Address and put it into DMA Pipeline $80/8C7D C8 INY $80/8C7E 9D DC 01 STA $01DC,x $80/8C81 B7 3E LDA [$3E],y $80/8C83 C8 INY $80/8C84 9D EC 01 STA $01EC,x $80/8C87 B7 3E LDA [$3E],y ; Load VRAM Settings from Address and put it into DMA Pipeline $80/8C89 C8 INY $80/8C8A 9D 7C 01 STA $017C,x $80/8C8D B7 3E LDA [$3E],y ; Load VRAM Address from Address and put it into DMA Pipeline $80/8C8F C8 INY $80/8C90 9D 8C 01 STA $018C,x $80/8C93 B7 3E LDA [$3E],y $80/8C95 C9 80 CMP #$80 ; Check if VRAM Address is invalid (i. e. greater than #$8000) $80/8C97 B0 B7 BCS $B7 ; [$8C50] Branch if it is, else: Go on as usual $80/8C99 9D 9C 01 STA $019C,x $80/8C9C 80 23 BRA $23 [$8CC1] A:0060 X:000F Y:0008 P:eNvMXdizc
Put CGRAM into DMA Pipeline code is missing here
$80/8CC1 A9 80 LDA #$80 A:0060 X:000F Y:0008 P:eNvMXdizc $80/8CC3 9D FC 01 STA $01FC,x[$80:020B] A:0080 X:000F Y:0008 P:eNvMXdizc $80/8CC6 8A TXA A:0080 X:000F Y:0008 P:eNvMXdizc $80/8CC7 AE FC 01 LDX $01FC [$80:01FC] A:000F X:000F Y:0008 P:envMXdizc $80/8CCA 9D FC 01 STA $01FC,x[$80:020C] A:000F X:0010 Y:0008 P:envMXdizc $80/8CCD 8D FC 01 STA $01FC [$80:01FC] A:000F X:0010 Y:0008 P:envMXdizc $80/8CD0 AD 1B 02 LDA $021B ; Is FBLANK active? $80/8CD3 10 04 BPL $04 ; [$8CD9] Branch if not
code is missing here
$80/8CD9 82 78 FF BRL $FF78 ; [$8C54] Loop
$80/8CDC Work off DMA Pipeline
$80/8CDC 8B PHB ; Buffer Program Bank and Flag Register value on stack $80/8CDD 08 PHP $80/8CDE 4B PHK ; Set Program Bank to $80 $80/8CDF AB PLB $80/8CE0 E2 30 SEP #$30 ; A/X/Y = 8-bit $80/8CE2 A2 10 LDX #$10 ; Set up Loop Counter / Index for working off the Pipeline Slots $80/8CE4 BD FC 01 LDA $01FC,x[$80:020C] A:0220 X:0010 Y:0 P:envMXdIzC $80/8CE7 30 12 BMI $12 ; [$8CFB] Exit if negative $80/8CE9 AA TAX A:020F X:0010 Y:0004 P:enVMXdIzC $80/8CEA BD 6C 01 LDA $016C,x ; Load Byte to determine which type of DMA this is $80/8CED 3A DEC A $80/8CEE F0 5C BEQ $5C ; [$8D4C] If Byte is #$01 = CGRAM DMA $80/8CF0 3A DEC A $80/8CF1 F0 15 BEQ $15 ; [$8D08] If Byte is #$02 = VRAM Write DMA $80/8CF3 3A DEC A $80/8CF4 D0 03 BNE $03 ; [$8CF9] If Byte is #$04 or higher = BROKEN DATA, SOFT LOCK $80/8CF6 82 8A 00 BRL $008A ; [$8D83] If Byte is #$03 = VRAM Read DMA $80/8CF9 80 FE BRA $FE ; [$8CF9] SOFT LOCK $80/8CFB A9 80 LDA #$80 A:0280 X:0010 Y:0 P:eNvMXdIzC $80/8CFD 8D 0C 02 STA $020C [$80:020C] A:0280 X:0010 Y:0 P:eNvMXdIzC $80/8D00 A9 10 LDA #$10 A:0280 X:0010 Y:0 P:eNvMXdIzC $80/8D02 8D FC 01 STA $01FC [$80:01FC] A:0210 X:0010 Y:0 P:envMXdIzC $80/8D05 28 PLP ; Restore Program Bank and Flag Register value $80/8D06 AB PLB $80/8D07 6B RTL
VRAM Write DMA
$80/8D08 BD AC 01 LDA $01AC,x ; Setup DMA Source Address $80/8D0B 8D 12 43 STA $4312 $80/8D0E BD BC 01 LDA $01BC,x $80/8D11 8D 13 43 STA $4313 $80/8D14 BD CC 01 LDA $01CC,x $80/8D17 8D 14 43 STA $4314 $80/8D1A BD DC 01 LDA $01DC,x ; Setup DMA number of Bytes to transfer $80/8D1D 8D 15 43 STA $4315 $80/8D20 BD EC 01 LDA $01EC,x $80/8D23 8D 16 43 STA $4316 $80/8D26 BD 7C 01 LDA $017C,x ; Setup VRAM transfer settings $80/8D29 8D 15 21 STA $2115 $80/8D2C BD 8C 01 LDA $018C,x ; Setup VRAM Address $80/8D2F 8D 16 21 STA $2116 $80/8D32 BD 9C 01 LDA $019C,x $80/8D35 8D 17 21 STA $2117 $80/8D38 A9 01 LDA #$01 ; Set DMA Settings $80/8D3A 8D 10 43 STA $4310 $80/8D3D A9 18 LDA #$18 ; DMA Destination: $2118 - VRAM Write $80/8D3F 8D 11 43 STA $4311 $80/8D42 A9 02 LDA #$02 ; Activate DMA $80/8D44 8D 0B 42 STA $420B $80/8D47 9E 6C 01 STZ $016C,x ; Clear flag for DMA $80/8D4A 80 98 BRA $98 ; [$8CE4] Loop, do next DMA
CGRAM DMA
$80/8D4C BD AC 01 LDA $01AC,x ; Setup DMA Source Address $80/8D4F 8D 12 43 STA $4312 $80/8D52 BD BC 01 LDA $01BC,x $80/8D55 8D 13 43 STA $4313 $80/8D58 BD CC 01 LDA $01CC,x $80/8D5B 8D 14 43 STA $4314 $80/8D5E BD DC 01 LDA $01DC,x ; Setup DMA number of Bytes to transfer $80/8D61 8D 15 43 STA $4315 $80/8D64 BD EC 01 LDA $01EC,x $80/8D67 8D 16 43 STA $4316 $80/8D6A BD 7C 01 LDA $017C,x ; Setup CGRAM Address $80/8D6D 8D 21 21 STA $2121 $80/8D70 9C 10 43 STZ $4310 ; Set DMA Settings $80/8D73 A9 22 LDA #$22 ; DMA Destination: $2122 - CGRAM $80/8D75 8D 11 43 STA $4311 $80/8D78 A9 02 LDA #$02 ; Activate DMA $80/8D7A 8D 0B 42 STA $420B $80/8D7D 9E 6C 01 STZ $016C,x ; Clear flag for DMA $80/8D80 82 61 FF BRL $FF61 ; [$8CE4] Loop, do next DMA
VRAM Read DMA
$80/8D83 BD AC 01 LDA $01AC,x ; Setup DMA Destination Address $80/8D86 8D 12 43 STA $4312 $80/8D89 BD BC 01 LDA $01BC,x $80/8D8C 8D 13 43 STA $4313 $80/8D8F BD CC 01 LDA $01CC,x $80/8D92 8D 14 43 STA $4314 $80/8D95 BD DC 01 LDA $01DC,x ; Setup DMA number of Bytes to transfer $80/8D98 8D 15 43 STA $4315 $80/8D9B BD EC 01 LDA $01EC,x $80/8D9E 8D 16 43 STA $4316 $80/8DA1 BD 7C 01 LDA $017C,x ; Setup VRAM transfer settings $80/8DA4 8D 15 21 STA $2115 $80/8DA7 BD 8C 01 LDA $018C,x ; Setup VRAM Address $80/8DAA 8D 16 21 STA $2116 $80/8DAD BD 9C 01 LDA $019C,x $80/8DB0 8D 17 21 STA $2117 $80/8DB3 A9 81 LDA #$81 ; Set DMA Settings $80/8DB5 8D 10 43 STA $4310 $80/8DB8 A9 39 LDA #$39 ; DMA Source: $2139 - VRAM Read $80/8DBA 8D 11 43 STA $4311 $80/8DBD AD 39 21 LDA $2139 [$80:2139] A:0239 X:000D Y:0000 P:envMXdIzC $80/8DC0 AD 3A 21 LDA $213A [$80:213A] A:0200 X:000D Y:0000 P:envMXdIZC $80/8DC3 A9 02 LDA #$02 ; Activate DMA $80/8DC5 8D 0B 42 STA $420B $80/8DC8 9E 6C 01 STZ $016C,x ; Clear flag for DMA $80/8DCB 82 16 FF BRL $FF16 ; [$8CE4] Loop, do next DMA
$80/8DCE DA PHX ; Buffer X on stack $80/8DCF 20 D9 8D JSR $8DD9 ; Turn first input ($0211 or $0212) into negative number if necessary $80/8DD2 E8 INX ; Increment Index so that it points to the second register $80/8DD3 E8 INX $80/8DD4 20 D9 8D JSR $8DD9 ; Turn first input ($0213 or $0214) into negative number if necessary $80/8DD7 FA PLX ; Restore X $80/8DD8 60 RTS
If you move the mouse one pixel down, the value is #$01. If you move it up, it is #$81. The MSB tells the direction and the other bits tell the number of pixels moved, always as a positive.
This subroutine turns this into a real negative number (One pixel up = #$FF, two pixel up = #$FE), so it can be added more easily.
$80/8DD9 BD 11 02 LDA $0211,x ; Load Mouse input $80/8DDC 10 0A BPL $0A ; [$8DE8] Exit if it is positive (nothing is to change) $80/8DDE 29 7F AND #$7F ; If it is negative, remove the MSB $80/8DE0 49 FF EOR #$FF ; Turn the rest into a negative number (EOR + 1) $80/8DE2 1A INC A $80/8DE3 9D 11 02 STA $0211,x ; Store number $80/8DE6 80 02 BRA $02 ; [$8DEA] UNNECESSARY LINE - if the two lines below are removed, this is useless $80/8DE8 29 7F AND #$7F ; UNNECESSARY LINE - This is only executed the MSB already isn't set $80/8DEA 9D 11 02 STA $0211,x ; UNNECESSARY LINE - Nothing gets stored that isn't stored already $80/8DED 60 RTS
$80/8DEE 8A TXA A:0000 X:0000 Y:0000 P:envMXdIZc $80/8DEF 0A ASL A A:0000 X:0000 Y:0000 P:envMXdIZc $80/8DF0 A8 TAY A:0000 X:0000 Y:0000 P:envMXdIZc $80/8DF1 B9 58 01 LDA $0158,y[$80:0158] A:0000 X:0000 Y:0000 P:envMXdIZc $80/8DF4 0A ASL A A:0001 X:0000 Y:0000 P:envMXdIzc $80/8DF5 0A ASL A A:0002 X:0000 Y:0000 P:envMXdIzc $80/8DF6 3E 15 02 ROL $0215,x[$80:0215] A:0004 X:0000 Y:0000 P:envMXdIzc $80/8DF9 B9 54 01 LDA $0154,y[$80:0154] A:0004 X:0000 Y:0000 P:envMXdIZc $80/8DFC 0A ASL A A:0001 X:0000 Y:0000 P:envMXdIzc $80/8DFD 0A ASL A A:0002 X:0000 Y:0000 P:envMXdIzc $80/8DFE 3E 15 02 ROL $0215,x[$80:0215] A:0004 X:0000 Y:0000 P:envMXdIzc $80/8E01 B9 50 01 LDA $0150,y[$80:0150] A:0004 X:0000 Y:0000 P:envMXdIZc $80/8E04 0A ASL A A:0001 X:0000 Y:0000 P:envMXdIzc $80/8E05 0A ASL A A:0002 X:0000 Y:0000 P:envMXdIzc $80/8E06 3E 15 02 ROL $0215,x[$80:0215] A:0004 X:0000 Y:0000 P:envMXdIzc $80/8E09 1E 15 02 ASL $0215,x[$80:0215] A:0004 X:0000 Y:0000 P:envMXdIZc $80/8E0C B9 58 01 LDA $0158,y[$80:0158] A:0004 X:0000 Y:0000 P:envMXdIZc $80/8E0F 0A ASL A A:0001 X:0000 Y:0000 P:envMXdIzc $80/8E10 3E 15 02 ROL $0215,x[$80:0215] A:0002 X:0000 Y:0000 P:envMXdIzc $80/8E13 B9 54 01 LDA $0154,y[$80:0154] A:0002 X:0000 Y:0000 P:envMXdIZc $80/8E16 0A ASL A A:0001 X:0000 Y:0000 P:envMXdIzc $80/8E17 3E 15 02 ROL $0215,x[$80:0215] A:0002 X:0000 Y:0000 P:envMXdIzc $80/8E1A B9 50 01 LDA $0150,y[$80:0150] A:0002 X:0000 Y:0000 P:envMXdIZc $80/8E1D 0A ASL A A:0001 X:0000 Y:0000 P:envMXdIzc $80/8E1E 3E 15 02 ROL $0215,x[$80:0215] A:0002 X:0000 Y:0000 P:envMXdIzc $80/8E21 20 25 8E JSR $8E25 [$80:8E25] A:0002 X:0000 Y:0000 P:envMXdIZc $80/8E24 60 RTS A:0000 X:0000 Y:0000 P:envMXdIZc
$80/8E25 BD 19 02 LDA $0219,x[$80:0219] A:0002 X:0000 Y:0000 P:envMXdIZc $80/8E28 D0 11 BNE $11 [$8E3B] A:0000 X:0000 Y:0000 P:envMXdIZc $80/8E2A BD 15 02 LDA $0215,x[$80:0215] A:0000 X:0000 Y:0000 P:envMXdIZc $80/8E2D 29 22 AND #$22 A:0000 X:0000 Y:0000 P:envMXdIZc $80/8E2F F0 2D BEQ $2D [$8E5E] A:0000 X:0000 Y:0000 P:envMXdIZc $80/8E31 9D 17 02 STA $0217,x[$80:0217] A:0020 X:0000 Y:0000 P:enVMXdIzc $80/8E34 A9 40 LDA #$40 A:0020 X:0000 Y:0000 P:enVMXdIzc $80/8E36 9D 19 02 STA $0219,x[$80:0219] A:0040 X:0000 Y:0000 P:enVMXdIzc $80/8E39 80 23 BRA $23 ; [$8E5E] Exit $80/8E3B BD 11 02 LDA $0211,x[$80:0211] A:0040 X:0000 Y:0000 P:envMXdIzc $80/8E3E 1D 13 02 ORA $0213,x[$80:0213] A:0000 X:0000 Y:0000 P:envMXdIZc $80/8E41 D0 15 BNE $15 [$8E58] A:0000 X:0000 Y:0000 P:envMXdIZc $80/8E43 DE 19 02 DEC $0219,x[$80:0219] A:0000 X:0000 Y:0000 P:envMXdIZc $80/8E46 BD 15 02 LDA $0215,x[$80:0215] A:0000 X:0000 Y:0000 P:envMXdIzc $80/8E49 29 22 AND #$22 A:0010 X:0000 Y:0000 P:envMXdIzc $80/8E4B 3D 17 02 AND $0217,x[$80:0217] A:0000 X:0000 Y:0000 P:envMXdIZc $80/8E4E F0 0E BEQ $0E ; [$8E5E] Exit
code is missing here
$80/8E58 9E 19 02 STZ $0219,x[$80:0219] A:00FB X:0000 Y:0000 P:eNVMXdIzc $80/8E5B 9E 17 02 STZ $0217,x[$80:0217] A:00FB X:0000 Y:0000 P:eNVMXdIzc $80/8E5E 60 RTS A:0000 X:0000 Y:0000 P:envMXdIZc
$80/8E5F Is a SNES mouse connected?
$80/8E5F A2 01 LDX #$01 A:0061 X:00FF Y:00FF P:envMXdIzc $80/8E61 8A TXA A:0061 X:0001 Y:00FF P:envMXdIzc $80/8E62 0A ASL A A:0001 X:0001 Y:00FF P:envMXdIzc $80/8E63 A8 TAY A:0002 X:0001 Y:00FF P:envMXdIzc $80/8E64 B9 18 42 LDA $4218,y[$80:421A] A:0002 X:0001 Y:0002 P:envMXdIzc $80/8E67 29 0F AND #$0F ; Is a mouse connected to the Joypad port? $80/8E69 C9 01 CMP #$01 $80/8E6B F0 08 BEQ $08 ; [$8E75] Branch if it is $80/8E6D 9E 17 02 STZ $0217,x[$80:0218] A:0 X:0001 Y:0002 P:eNvMXdIzc $80/8E70 9E 19 02 STZ $0219,x[$80:021A] A:0 X:0001 Y:0002 P:eNvMXdIzc $80/8E73 80 1E BRA $1E [$8E93] A:0 X:0001 Y:0002 P:eNvMXdIzc
if a SNES mouse is connected
$80/8E75 AD 0E 02 LDA $020E [$80:020E] A:0001 X:0000 Y:0000 P:envMXdIZC $80/8E78 1D 97 8E ORA $8E97,x[$80:8E97] A:0000 X:0000 Y:0000 P:envMXdIZC $80/8E7B 8D 0E 02 STA $020E [$80:020E] A:0001 X:0000 Y:0000 P:envMXdIzC $80/8E7E A0 10 LDY #$10 ; Transfer the Mouse Input to $0211-4 (only 16 bit) $80/8E80 BD 16 40 LDA $4016,x ; (It seems only to care about the mouse POSITION, not if buttons are pushed) $80/8E83 4A LSR A $80/8E84 3E 11 02 ROL $0211,x $80/8E87 3E 13 02 ROL $0213,x $80/8E8A 88 DEY $80/8E8B D0 F3 BNE $F3 ; [$8E80] $80/8E8D 20 CE 8D JSR $8DCE ; Turn negatives input into negative numbers $80/8E90 20 EE 8D JSR $8DEE [$80:8DEE] A:0000 X:0000 Y:0000 P:envMXdIZc $80/8E93 CA DEX A:0 X:0001 Y:0002 P:eNvMXdIzc $80/8E94 10 CB BPL $CB [$8E61] A:0 X:0 Y:0002 P:envMXdIZc $80/8E96 60 RTS A:0 X:00FF Y:0 P:eNvMXdIzc
$80/8E97 Data for $80/8E5F
$80/8E97 01 02
$80/8E99
$80/8E99 8B PHB ; Buffer Program Bank and Flag Register value on stack $80/8E9A 08 PHP $80/8E9B 4B PHK ; Set Program Bank to $80 $80/8E9C AB PLB $80/8E9D E2 30 SEP #$30 ; A/X/Y = 8-bit $80/8E9F 9C 0E 02 STZ $020E ; Clear all Mouse related registers $80/8EA2 9C 15 02 STZ $0215 $80/8EA5 9C 11 02 STZ $0211 $80/8EA8 9C 13 02 STZ $0213 $80/8EAB 9C 16 02 STZ $0216 $80/8EAE 9C 12 02 STZ $0212 $80/8EB1 9C 14 02 STZ $0214 $80/8EB4 AD 35 01 LDA $0135 ; Check if Auto Joypad Read is enabled $80/8EB7 4A LSR A $80/8EB8 90 0C BCC $0C ; [$8EC6] Exit if it is $80/8EBA AD 12 42 LDA $4212 ; Wait if Auto-Joypad-Read is still busy $80/8EBD 4A LSR A $80/8EBE B0 FA BCS $FA ; [$8EBA] $80/8EC0 20 5F 8E JSR $8E5F ; Is a SNES mouse connected? $80/8EC3 20 0A 8F JSR $8F0A [$80:8F0A] A:0 X:00FF Y:0 P:eNvMXdIzc $80/8EC6 28 PLP ; Restore Program Bank and Flag Register $80/8EC7 AB PLB $80/8EC8 6B RTL
From FullSNES:
Mouse Sensitivity The Mouse Resolution is specified as "50 counts/inch (+/-10%)". There are three selectable Sensitivity (Threshold) settings: 0 - slow - linear fixed level (1:1) 1 - normal - exponential -?- levels (1:1 to ?:1) (?:1=smaller than 6:1) 2 - fast - exponential six levels (1:1 to 6:1) Setting 0 returns raw mickeys (so one must implement effects like double-speed threshold by software). Settings 1-2 can be used directly as screen-pixel offsets. To change the sensitivity (for port n=0 or n=1): [4016h]=01h ;set STB=1 dummy=[4016h+n] ;issue CLK pulse while STB=1 <-- increments the value, [4016h]=00h ;set STB=0 or wraps from 2 to 0 ;Thereafter, one should read the Sensitivity bits, typically like so: [4016h]=01h ;set STB=1 ;\another STB on/off, for invoking reading [4016h]=00h ;set STB=0 ;/(not sure if this part is required) for i=11 to 0, dummy=[4016h+n], next i ;skip first 12 bits for i=1 to 0, sensitivity.bit(i)=[4016h+n], next i ;read 2 sensitivity bits ;Repeat the above procedure until the desired sensitivity value is reached. Caution: According to Nintendo, the internal threshold factors aren't initialized until the change-sensitivty procedure is executed at least once (ie. after power-up, or after sensing a newly connected mouse, one MUST execute the change-sensitivity procedure, EVEN if the mouse does return the desired 2bit sensitivity code).
This subroutine is still to-do
$80/8EC9 A9 06 LDA #$06 A:0001 X:0000 Y:0000 P:envMXdIzc $80/8ECB 8D 41 00 STA $0041 [$80:0041] A:0006 X:0000 Y:0000 P:envMXdIzc $80/8ECE A9 01 LDA #$01 A:0006 X:0000 Y:0000 P:envMXdIzc $80/8ED0 8D 16 40 STA $4016 [$80:4016] A:0001 X:0000 Y:0000 P:envMXdIzc $80/8ED3 BD 16 40 LDA $4016,x[$80:4016] A:0001 X:0000 Y:0000 P:envMXdIzc $80/8ED6 9C 16 40 STZ $4016 [$80:4016] A:0040 X:0000 Y:0000 P:envMXdIzc $80/8ED9 A9 01 LDA #$01 A:0040 X:0000 Y:0000 P:envMXdIzc $80/8EDB 8D 16 40 STA $4016 [$80:4016] A:0001 X:0000 Y:0000 P:envMXdIzc $80/8EDE A9 00 LDA #$00 A:0001 X:0000 Y:0000 P:envMXdIzc $80/8EE0 8D 16 40 STA $4016 [$80:4016] A:0000 X:0000 Y:0000 P:envMXdIZc $80/8EE3 8D 44 00 STA $0044 [$80:0044] A:0000 X:0000 Y:0000 P:envMXdIZc $80/8EE6 A0 0A LDY #$0A A:0000 X:0000 Y:0000 P:envMXdIZc $80/8EE8 BD 16 40 LDA $4016,x[$80:4016] A:0000 X:0000 Y:000A P:envMXdIzc $80/8EEB 88 DEY A:0040 X:0000 Y:000A P:envMXdIzc $80/8EEC D0 FA BNE $FA [$8EE8] A:0040 X:0000 Y:0009 P:envMXdIzc $80/8EEE BD 16 40 LDA $4016,x[$80:4016] A:0040 X:0000 Y:0000 P:envMXdIZc $80/8EF1 4A LSR A A:0040 X:0000 Y:0000 P:envMXdIzc $80/8EF2 2E 44 00 ROL $0044 [$80:0044] A:0020 X:0000 Y:0000 P:envMXdIzc $80/8EF5 BD 16 40 LDA $4016,x[$80:4016] A:0020 X:0000 Y:0000 P:envMXdIZc $80/8EF8 4A LSR A A:0041 X:0000 Y:0000 P:envMXdIzc $80/8EF9 2E 44 00 ROL $0044 [$80:0044] A:0020 X:0000 Y:0000 P:envMXdIzC $80/8EFC AD 44 00 LDA $0044 [$80:0044] A:0020 X:0000 Y:0000 P:envMXdIzc $80/8EFF DD 0F 02 CMP $020F,x[$80:020F] A:0001 X:0000 Y:0000 P:envMXdIzc $80/8F02 F0 05 BEQ $05 [$8F09] A:0001 X:0000 Y:0000 P:envMXdIzC $80/8F04 CE 41 00 DEC $0041 [$80:0041] A:0001 X:0000 Y:0000 P:envMXdIzC $80/8F07 D0 C5 BNE $C5 [$8ECE] A:0001 X:0000 Y:0000 P:envMXdIzC $80/8F09 60 RTS A:0000 X:0000 Y:0000 P:envMXdIZC
$80/8F0A ?
$80/8F0A A2 01 LDX #$01 ; Check if a mouse is connected $80/8F0C AD 0E 02 LDA $020E [$80:020E] A:0000 X:0001 Y:0000 P:envMXdIzc $80/8F0F 3D 1B 8F AND $8F1B,x[$80:8F1C] A:0001 X:0001 Y:0000 P:envMXdIzc $80/8F12 F0 03 BEQ $03 [$8F17] A:0000 X:0001 Y:0000 P:envMXdIZc $80/8F14 20 C9 8E JSR $8EC9 [$80:8EC9] A:0001 X:0000 Y:0000 P:envMXdIzc $80/8F17 CA DEX A:0000 X:0001 Y:0000 P:envMXdIZc $80/8F18 10 F2 BPL $F2 [$8F0C] A:0000 X:0000 Y:0000 P:envMXdIZc $80/8F1A 60 RTS A:0000 X:00FF Y:0000 P:eNvMXdIzC
$80/8F1B Data for $80/8F0A
$80/8F1B 01 02
$80/8F49 ? (Frame Counter?)
$80/8F49 AD 27 06 LDA $0627 [$80:0627] A:0 X:0 Y:004B P:envmxdIzC $80/8F4C 1A INC A A:0 X:0 Y:004B P:envmxdIZC $80/8F4D C9 3C 00 CMP #$003C A:0001 X:0 Y:004B P:envmxdIzC $80/8F50 B0 04 BCS $04 [$8F56] A:0001 X:0 Y:004B P:eNvmxdIzc $80/8F52 8D 27 06 STA $0627 [$80:0627] A:0001 X:0 Y:004B P:eNvmxdIzc $80/8F55 6B RTL A:0001 X:0 Y:004B P:eNvmxdIzc $80/8F56 9C 27 06 STZ $0627 [$80:0627] A:003C X:0010 Y:0 P:envmxdIZC $80/8F59 AD 29 06 LDA $0629 [$80:0629] A:003C X:0010 Y:0 P:envmxdIZC $80/8F5C 1A INC A A:0 X:0010 Y:0 P:envmxdIZC $80/8F5D C9 3C 00 CMP #$003C A:0001 X:0010 Y:0 P:envmxdIzC $80/8F60 B0 04 BCS $04 [$8F66] A:0001 X:0010 Y:0 P:eNvmxdIzc $80/8F62 8D 29 06 STA $0629 [$80:0629] A:0001 X:0010 Y:0 P:eNvmxdIzc $80/8F65 6B RTL A:0001 X:0010 Y:0 P:eNvmxdIzc $80/8F66 9C 29 06 STZ $0629 [$80:0629] A:003C X:0 Y:006E P:envmxdIZC $80/8F69 AD 2B 06 LDA $062B [$80:062B] A:003C X:0 Y:006E P:envmxdIZC $80/8F6C 1A INC A A:0 X:0 Y:006E P:envmxdIZC $80/8F6D C9 3C 00 CMP #$003C A:0001 X:0 Y:006E P:envmxdIzC $80/8F70 B0 04 BCS $04 [$8F76] A:0001 X:0 Y:006E P:eNvmxdIzc $80/8F72 8D 2B 06 STA $062B [$80:062B] A:0001 X:0 Y:006E P:eNvmxdIzc $80/8F75 6B RTL A:0001 X:0 Y:006E P:eNvmxdIzc $80/8F76 9C 2B 06 STZ $062B [$80:062B] A:0002 X:0010 Y:0000 P:envmxdIZC $80/8F79 EE 2D 06 INC $062D [$80:062D] A:0002 X:0010 Y:0000 P:envmxdIZC $80/8F7C 6B RTL A:0002 X:0010 Y:0000 P:envmxdIzC
$80/8F7D PROGRAM START
$00/8F7D 78 SEI ; Disable Interrupts $00/8F7E 18 CLC ; Activate Native Mode $00/8F7F FB XCE $00/8F80 5C 84 8F 80 JMP $808F84 ; Switch to FastROM addressing $80/8F84 E2 20 SEP #$20 ; A = 8-bit $80/8F86 C2 10 REP #$10 ; X/Y = 16-bit $80/8F88 4B PHK ; Data Bank = Program Bank $80/8F89 AB PLB $80/8F8A A9 01 LDA #$01 $80/8F8C 8D 00 42 STA $4200 ; Auto-Joypad-Enable, NMI/IRQ Disable $80/8F8F 8D 0D 42 STA $420D ; Activate FastROM $80/8F92 A9 80 LDA #$80 ; FBLANK $80/8F94 8D 00 21 STA $2100 $80/8F97 C2 30 REP #$30 ; A/X/Y = 16-bit $80/8F99 A9 00 00 LDA #$0000 ; Direct Page: $0000 $80/8F9C 5B TCD $80/8F9D AD 63 06 LDA $0663 [$80:0663] A:0000 X:0 Y:0 P:envmxdIZC $80/8FA0 49 FF FF EOR #$FFFF A:5555 X:0 Y:0 P:envmxdIzC $80/8FA3 CD 61 06 CMP $0661 [$80:0661] A:AAAA X:0 Y:0 P:eNvmxdIzC $80/8FA6 D0 06 BNE $06 [$8FAE] A:AAAA X:0 Y:0 P:envmxdIzC
code is missing here
$80/8FAE A9 00 00 LDA #$0000 ; Clear whole WRAM $80/8FB1 8F 00 00 7E STA $7E0000 $80/8FB5 8F 00 00 7F STA $7F0000 $80/8FB9 A9 FD FF LDA #$FFFD ; (Clear Bank $7E) $80/8FBC A2 01 00 LDX #$0001 $80/8FBF 9B TXY $80/8FC0 C8 INY $80/8FC1 54 7E 7E MVN 7E 7E $80/8FC4 A9 FD FF LDA #$FFFD ; (Clear Bank $7F) $80/8FC7 A2 01 00 LDX #$0001 $80/8FCA 9B TXY $80/8FCB C8 INY $80/8FCC 54 7F 7F MVN 7F 7F $80/8FCF 4B PHK ; Data Bank = Program Bank $80/8FD0 AB PLB $80/8FD1 7B TDC ; Buffer Direct Page in $0665 $80/8FD2 8D 65 06 STA $0665 $80/8FD5 A9 00 00 LDA #$0000 ; Direct Page: $0000 $80/8FD8 5B TCD $80/8FD9 A9 FF 1E LDA #$1EFF ; Stack: $1EFF $80/8FDC 1B TCS $80/8FDD 22 11 84 80 JSL $808411 ; Store a chain of values in $01xx
Arguments: $80/8FE1 D7 90 80 ; Data for $01xx registers is at $80/90D7
$80/8FE4 A9 80 00 LDA #$0080 $80/8FE7 8D 00 01 STA $0100 ; #$80 in value to set in $2100 (FBLANK) $80/8FEA 8D 1B 02 STA $021B ; #$80 in value currently set in $2100 (FBLANK) $80/8FED A9 01 00 LDA #$0001 ; Set Flag for Auto Joypad Read in $4200 buffer $80/8FF0 8D 35 01 STA $0135 $80/8FF3 22 00 82 80 JSL $808200[$80:8200] A:0001 X:00FF Y:0062 P:envmxdIzC $80/8FF7 AF F1 FF 9F LDA $9FFFF1 ; Setup address of the SPC program to transfer in $20-22: $9D/8000 $80/8FFB 85 21 STA $21 ; (UNNECESSARY LINE - one could save a few bytes if the address...) $80/8FFD AF F0 FF 9F LDA $9FFFF0 ; (... would be loaded directly here instead of this bank $9F detour) $80/9001 85 20 STA $20 $80/9003 22 5A 99 80 JSL $80995A ; Transfer Data to SPC $80/9007 AD 12 42 LDA $4212 ; Wait until the Auto-Joypad read is done $80/900A 4A LSR A $80/900B 90 FA BCC $FA ; [$9007] $80/900D AD 12 42 LDA $4212 $80/9010 4A LSR A $80/9011 B0 FA BCS $FA ; [$900D] $80/9013 AD 1A 42 LDA $421A ; Load Joypad 2 data $80/9016 29 F0 FF AND #$FFF0 ; Check if A/B/X/Y/L/R are pushed all at the same time $80/9019 C9 F0 C0 CMP #$C0F0 $80/901C D0 0E BNE $0E ; [$902C] Branch if not $80/901E 22 E4 C8 80 JSL $80C8E4[$80:C8E4] A:0000 X:0000 Y:E280 P:envmxdIzc
Play Sound Effect after SRAM reset
$80/9022 A9 84 03 LDA #$0384 ; Play Sound Effect #$84 $80/9025 A0 01 00 LDY #$0001 A:0384 X:FFFE Y:E280 P:envmxdIzc $80/9028 22 1C 5C 10 JSL $105C1C ; APU Message $80/902C 22 F7 C8 80 JSL $80C8F7 ; Copy data from banks $10-$12 to $13-$15 $80/9030 22 74 59 10 JSL $105974[$10:5974] A:0 X:FFFE Y:E280 P:envmxdIzc $80/9034 E2 20 SEP #$20 ; A = 8-bit $80/9036 C2 10 REP #$10 ; X/Y = 16-bit $80/9038 9C 3F 14 STZ $143F ; Clear Error Counter? $80/903B 22 8C 59 10 JSL $10598C ; Check if Satellaview Stream Number Registers work $80/903F F0 03 BEQ $03 ; [$9044] Branch if everything works fine $80/9041 EE 3F 14 INC $143F ; Increment Error Counter? $80/9044 22 58 5B 10 JSL $105B58[$10:5B58] A:0 X:FFFE Y:E280 P:envMxdIZC $80/9048 22 A4 59 10 JSL $1059A4 ; Transfer (fixed Set of) Data to Satellaview $80/904C 22 6C 5A 10 JSL $105A6C ; MCC Memory Controller Settings: Enable Flash R/W $80/9050 22 0C 5B 10 JSL $105B0C[$10:5B0C] A:0080 X:0007 Y:0 P:eNvMxdIzC $80/9054 22 70 5A 10 JSL $105A70 ; MCC Memory Controller Settings: Disable Flash R/W $80/9058 C2 30 REP #$30 A:0080 X:0 Y:0 P:eNvMxdIzC $80/905A 22 0F 8C 80 JSL $808C0F[$80:8C0F] A:0080 X:0 Y:0 P:eNvmxdIzC $80/905E 22 09 A7 80 JSL $80A709[$80:A709] A:0010 X:00FF Y:0 P:eNvmxdIzC $80/9062 22 58 83 80 JSL $808358[$80:8358] A:00E0 X:FFFE Y:0 P:eNvmxdIzC $80/9066 22 40 5B 10 JSL $105B40[$10:5B40] A:0061 X:FFFE Y:0 P:eNvmxdIzC $80/906A A9 08 00 LDA #$0008 A:0006 X:FFFF Y:0 P:eNvmxdIzC $80/906D 8D 4C 01 STA $014C [$80:014C] A:0008 X:FFFF Y:0 P:envmxdIzC $80/9070 A9 04 00 LDA #$0004 A:0008 X:FFFF Y:0 P:envmxdIzC $80/9073 8D 4E 01 STA $014E [$80:014E] A:0004 X:FFFF Y:0 P:envmxdIzC $80/9076 A9 FF FF LDA #$FFFF A:0004 X:FFFF Y:0 P:envmxdIzC $80/9079 8D 13 0A STA $0A13 [$80:0A13] A:FFFF X:FFFF Y:0 P:eNvmxdIzC $80/907C A9 FF FF LDA #$FFFF A:FFFF X:FFFF Y:0 P:eNvmxdIzC $80/907F 8F 15 87 7E STA $7E8715[$7E:8715] A:FFFF X:FFFF Y:0 P:eNvmxdIzC $80/9083 AD 65 06 LDA $0665 [$80:0665] A:FFFF X:FFFF Y:0 P:eNvmxdIzC $80/9086 C9 47 53 CMP #$5347 A:0 X:FFFF Y:0 P:envmxdIZC $80/9089 F0 0E BEQ $0E [$9099] A:0 X:FFFF Y:0 P:eNvmxdIzc $80/908B A9 00 80 LDA #$8000 ; Next NMI, go to $94/8000 $80/908E 8D 37 06 STA $0637 $80/9091 A9 94 00 LDA #$0094 $80/9094 8D 39 06 STA $0639 $80/9097 80 18 BRA $18 [$90B1] A:0094 X:FFFF Y:0 P:envmxdIzc $80/90B1 9C 65 06 STZ $0665 [$80:0665] A:0094 X:FFFF Y:0 P:envmxdIzc $80/90B4 22 25 92 80 JSL $809225[$80:9225] A:0094 X:FFFF Y:0 P:envmxdIzc $80/90B8 A9 3A 91 LDA #$913A A:0 X:0010 Y:0 P:envmxdIzc $80/90BB 8D 3F 06 STA $063F [$80:063F] A:913A X:0010 Y:0 P:eNvmxdIzc $80/90BE A9 80 00 LDA #$0080 A:913A X:0010 Y:0 P:eNvmxdIzc $80/90C1 8D 41 06 STA $0641 [$80:0641] A:0080 X:0010 Y:0 P:envmxdIzc $80/90C4 22 9D 83 80 JSL $80839D[$80:839D] A:0080 X:0010 Y:0 P:envmxdIzc $80/90C8 58 CLI A:0081 X:0010 Y:0 P:envmxdIzc $80/90C9 20 6A 93 JSR $936A [$80:936A] A:0081 X:0010 Y:0 P:envmxdizc $80/90CC 4B PHK A:913A X:0010 Y:0 P:eNvmxdizc $80/90CD F4 D2 90 PEA $90D2 A:913A X:0010 Y:0 P:eNvmxdizc $80/90D0 DC 33 06 JML [$0633][$80:913A] A:913A X:0010 Y:0 P:eNvmxdizc
$80/90D7 Data
This data gets transfered to the $01xx Graphics Register buffer via $80/8411 at $80/8FDD.
This is executed while the start-up, these values serve to clear those Graphics Registers.
$80/90D7 01 00 - Value for $0101 = $2101 - Object Size and Object Base $80/90D9 02 00 - Value for $0102 $80/90DB 03 00 - Value for $0103 $80/90DD 04 00 - Value for $0104 = $2105 - BG Mode $80/90DF 05 00 - Value for $0105 = $2106 - Mosaic $80/90E1 06 00 $80/90E3 07 00 $80/90E5 08 00 $80/90E7 09 00 $80/90E9 0A 00 $80/90EB 0B 00 $80/90ED 0F 00 $80/90EF 10 00 $80/90F1 11 00 $80/90F3 12 00 $80/90F5 13 00 $80/90F7 14 00 $80/90F9 15 00 $80/90FB 16 00 $80/90FD 17 00 $80/90FF 18 00 $80/9101 19 00 $80/9103 1A 00 $80/9105 1B 00 $80/9107 1C 00 $80/9109 1D 00 $80/910B 1E 00 $80/910D 0C 00 $80/910F 0D 00 $80/9111 0E 00 $80/9113 1F 00 $80/9115 20 00 $80/9117 21 00 $80/9119 22 00 $80/911B 23 00 $80/911D 24 00 $80/911F 25 00 $80/9121 26 00 $80/9123 27 00 $80/9125 28 00 $80/9127 2A 30 $80/9129 2B 00 $80/912B 2C E0 $80/912D 30 00 $80/912F 38 00 $80/9131 39 00 $80/9133 36 00 $80/9135 37 00 $80/9137 3A 00 $80/9139 FF
$80/913A ? (Executed when talking to the aerial building and at ROM start up)
$064D,y contain a 24-bit-address. $0650,y flags. If the MSB in $0650,y is set,
$80/913A 08 PHP ; Push everything on stack, A/X/Y = 16-bit $80/913B C2 30 REP #$30 $80/913D 48 PHA $80/913E DA PHX $80/913F 5A PHY $80/9140 0B PHD $80/9141 8B PHB $80/9142 4B PHK ; Set Program Bank to $80 $80/9143 AB PLB $80/9144 BA TSX A:0000 X:0000 Y:001C P:eNvmxdizc $80/9145 8A TXA A:0000 X:1E8D Y:001C P:envmxdizc $80/9146 E2 10 SEP #$10 ; X/Y = 16-bit $80/9148 AC 45 06 LDY $0645 [$80:0645] A:1E8D X:008D Y:001C P:envmXdizc $80/914B BE 50 06 LDX $0650,y[$80:0650] A:1E8D X:008D Y:0000 P:envmXdiZc $80/914E 10 03 BPL $03 [$9153] A:1E8D X:0000 Y:0000 P:envmXdiZc $80/9150 99 4D 06 STA $064D,y[$80:064D] A:1E86 X:00C0 Y:0 P:eNvmXdizc $80/9153 BB TYX A:1E8D X:0000 Y:0000 P:envmXdiZc $80/9154 E2 30 SEP #$30 ; A/X/Y = 8-bit $80/9156 A9 FF LDA #$FF A:1E8D X:0000 Y:0000 P:envMXdiZc $80/9158 80 09 BRA $09 [$9163] A:1EFF X:0000 Y:0000 P:eNvMXdizc $80/915A 3C 50 06 BIT $0650,x[$80:0654] A:1EFF X:0004 Y:0 P:eNvMXdizc $80/915D 70 04 BVS $04 [$9163] A:1EFF X:0004 Y:0 P:envMXdiZc $80/915F 30 0E BMI $0E [$916F] A:1EFF X:0004 Y:0 P:envMXdiZc $80/9161 D0 1D BNE $1D [$9180] A:1EFF X:0004 Y:0 P:envMXdiZc $80/9163 E8 INX A:1EFF X:0 Y:0 P:eNvMXdizc $80/9164 E8 INX A:1EFF X:0001 Y:0 P:envMXdizc $80/9165 E8 INX A:1EFF X:0002 Y:0 P:envMXdizc $80/9166 E8 INX A:1EFF X:0003 Y:0 P:envMXdizc $80/9167 E0 10 CPX #$10 A:1EFF X:0004 Y:0 P:envMXdizc $80/9169 90 EF BCC $EF [$915A] A:1EFF X:0004 Y:0 P:eNvMXdizc $80/916B A2 00 LDX #$00 A:1EFF X:0010 Y:0 P:envMXdiZC $80/916D 80 EB BRA $EB [$915A] A:1EFF X:0 Y:0 P:envMXdiZC $80/916F 8E 45 06 STX $0645 [$80:0645] A:1EFF X:0 Y:0 P:eNvMXdizC $80/9172 9B TXY A:1EFF X:0 Y:0 P:eNvMXdizC $80/9173 C2 30 REP #$30 A:1EFF X:0 Y:0 P:envMXdiZC $80/9175 BE 4D 06 LDX $064D,y[$80:064D] A:1EFF X:0 Y:0 P:envmxdiZC $80/9178 9A TXS A:1EFF X:1E86 Y:0 P:envmxdizC $80/9179 AB PLB A:1EFF X:1E86 Y:0 P:envmxdizC $80/917A 2B PLD A:1EFF X:1E86 Y:0 P:eNvmxdizC $80/917B 7A PLY A:1EFF X:1E86 Y:0 P:envmxdiZC $80/917C FA PLX A:1EFF X:1E86 Y:0094 P:envmxdizC $80/917D 68 PLA A:1EFF X:0 Y:0094 P:envmxdiZC $80/917E 28 PLP A:1E01 X:0 Y:0094 P:envmxdizC $80/917F 6B RTL A:1E01 X:0 Y:0094 P:envmxdizc $80/9180 8E 45 06 STX $0645 [$80:0645] A:1EFF X:0 Y:0 P:envMXdizC $80/9183 A9 80 LDA #$80 A:1EFF X:0 Y:0 P:envMXdizC $80/9185 9D 50 06 STA $0650,x[$80:0650] A:1E80 X:0 Y:0 P:eNvMXdizC $80/9188 C2 20 REP #$20 ; A = 16-bit $80/918A BD 4D 06 LDA $064D,x[$80:064D] A:1E80 X:0 Y:0 P:eNvmXdizC $80/918D 8D 4A 06 STA $064A [$80:064A] A:8572 X:0 Y:0 P:eNvmXdizC $80/9190 BC 4F 06 LDY $064F,x[$80:064F] A:8572 X:0 Y:0 P:eNvmXdizC $80/9193 8C 4C 06 STY $064C [$80:064C] A:8572 X:0 Y:0094 P:eNvmXdizC $80/9196 C2 30 REP #$30 ; A/X/Y = 16-bit $80/9198 AD 45 06 LDA $0645 [$80:0645] A:8572 X:0 Y:0094 P:eNvmxdizC $80/919B 29 FF 00 AND #$00FF A:0 X:0 Y:0094 P:envmxdiZC $80/919E AA TAX A:0 X:0 Y:0094 P:envmxdiZC $80/919F BD A6 91 LDA $91A6,x[$80:91A6] A:0 X:0 Y:0094 P:envmxdiZC $80/91A2 1B TCS A:1E97 X:0 Y:0094 P:envmxdizC $80/91A3 DC 4A 06 JML [$064A][$94:8572] A:1E97 X:0 Y:0094 P:envmxdizC
$80/91B6 ? (Executed when talking to the aerial building and at start up)
$80/91B6 DA PHX A:B0B4 X:0000 Y:0000 P:eNvmxdIzc $80/91B7 08 PHP A:B0B4 X:0000 Y:0000 P:eNvmxdIzc $80/91B8 E2 30 SEP #$30 A:B0B4 X:0000 Y:0000 P:eNvmxdIzc $80/91BA A2 00 LDX #$00 A:B0B4 X:0000 Y:0000 P:eNvMXdIzc $80/91BC BD 50 06 LDA $0650,x[$81:0650] A:B0B4 X:0000 Y:0000 P:envMXdIZc $80/91BF F0 0C BEQ $0C [$91CD] A:B000 X:0000 Y:0000 P:envMXdIZc
$80/91C1 E8 INX A:8A01 X:0 Y:0 P:envMXdIzc $80/91C2 E8 INX A:8A01 X:0001 Y:0 P:envMXdIzc $80/91C3 E8 INX A:8A01 X:0002 Y:0 P:envMXdIzc $80/91C4 E8 INX A:8A01 X:0003 Y:0 P:envMXdIzc $80/91C5 E0 10 CPX #$10 A:8A01 X:0004 Y:0 P:envMXdIzc $80/91C7 D0 F3 BNE $F3 [$91BC] A:8A01 X:0004 Y:0 P:eNvMXdIzc
$80/91CD C2 20 REP #$20 A:B000 X:0000 Y:0000 P:envMXdIZc $80/91CF AD 5D 06 LDA $065D [$81:065D] A:B000 X:0000 Y:0000 P:envmXdIZc $80/91D2 9D 4D 06 STA $064D,x[$81:064D] A:B0B4 X:0000 Y:0000 P:eNvmXdIzc $80/91D5 AD 5F 06 LDA $065F [$81:065F] A:B0B4 X:0000 Y:0000 P:eNvmXdIzc $80/91D8 29 FF 00 AND #$00FF A:0080 X:0000 Y:0000 P:envmXdIzc $80/91DB 09 00 01 ORA #$0100 A:0080 X:0000 Y:0000 P:envmXdIzc $80/91DE 9D 4F 06 STA $064F,x[$81:064F] A:0180 X:0000 Y:0000 P:envmXdIzc $80/91E1 8E 60 06 STX $0660 [$81:0660] A:0180 X:0000 Y:0000 P:envmXdIzc $80/91E4 8A TXA A:0180 X:0000 Y:0000 P:envmXdIzc $80/91E5 28 PLP A:0000 X:0000 Y:0000 P:envmXdIZc $80/91E6 FA PLX A:0000 X:0000 Y:0000 P:eNvmxdIzc $80/91E7 18 CLC A:0000 X:0000 Y:0000 P:envmxdIZc $80/91E8 6B RTL A:0000 X:0000 Y:0000 P:envmxdIZc
$80/91E9 ? (Executed when talking to the aerial building)
$80/91E9 E2 30 SEP #$30 ; A/X/Y = 8-bit $80/91EB AE 45 06 LDX $0645 [$80:0645] A:0000 X:0000 Y:001C P:envMXdiZc $80/91EE 9E 50 06 STZ $0650,x[$80:0650] A:0000 X:0000 Y:001C P:envMXdiZc $80/91F1 4C 3A 91 JMP $913A [$80:913A] A:0000 X:0000 Y:001C P:envMXdiZc
$80/9225 ? (Clear $0650/4/8/C)
$80/9225 08 PHP ; Buffer Flag Register value on stack $80/9226 E2 30 SEP #$30 ; A/X/Y = 8-bit $80/9228 A2 00 LDX #$00 ; Clear A and X $80/922A 8A TXA $80/922B 9D 50 06 STA $0650,x ; Clear $0650(/4/8/C) $80/922E E8 INX ; Increment Store Index four times $80/922F E8 INX $80/9230 E8 INX $80/9231 E8 INX $80/9232 E0 10 CPX #$10 ; Check if limit was reached $80/9234 D0 F5 BNE $F5 ; [$922B] $80/9236 28 PLP ; Restore Flag Register value $80/9237 6B RTL
$80/9238 ?
$80/9238 08 PHP A:1E01 X:0 Y:0094 P:eNvMXdizc $80/9239 C2 30 REP #$30 A:1E01 X:0 Y:0094 P:eNvMXdizc $80/923B 48 PHA A:1E01 X:0 Y:0094 P:eNvmxdizc $80/923C DA PHX A:1E01 X:0 Y:0094 P:eNvmxdizc $80/923D 5A PHY A:1E01 X:0 Y:0094 P:eNvmxdizc $80/923E E2 30 SEP #$30 A:1E01 X:0 Y:0094 P:eNvmxdizc $80/9240 AE 45 06 LDX $0645 [$80:0645] A:1E01 X:0 Y:0094 P:eNvMXdizc $80/9243 BD 50 06 LDA $0650,x[$80:0650] A:1E01 X:0 Y:0094 P:envMXdiZc $80/9246 09 40 ORA #$40 A:1E80 X:0 Y:0094 P:eNvMXdizc $80/9248 9D 50 06 STA $0650,x[$80:0650] A:1EC0 X:0 Y:0094 P:eNvMXdizc $80/924B C2 30 REP #$30 A:1EC0 X:0 Y:0094 P:eNvMXdizc $80/924D 7A PLY A:1EC0 X:0 Y:0094 P:eNvmxdizc $80/924E FA PLX A:1EC0 X:0 Y:0094 P:envmxdizc $80/924F 68 PLA A:1EC0 X:0 Y:0094 P:envmxdiZc $80/9250 22 3A 91 80 JSL $80913A[$80:913A] A:1E01 X:0 Y:0094 P:envmxdizc $80/9254 28 PLP A:1E01 X:0 Y:0094 P:envmxdizc $80/9255 6B RTL A:1E01 X:0 Y:0094 P:eNvMXdizc
$80/9293 ?
$80/9293 08 PHP A:FFFF X:00F0 Y:0 P:envmxdIzC $80/9294 E2 30 SEP #$30 A:FFFF X:00F0 Y:0 P:envmxdIzC $80/9296 A2 00 LDX #$00 A:FFFF X:00F0 Y:0 P:envMXdIzC $80/9298 3C 50 06 BIT $0650,x[$80:0650] A:FFFF X:0 Y:0 P:envMXdIZC $80/929B 50 08 BVC $08 [$92A5] A:FFFF X:0 Y:0 P:envMXdIzC $80/929D BD 50 06 LDA $0650,x[$80:0650] A:FFFF X:0 Y:0 P:eNVMXdIzC $80/92A0 29 BF AND #$BF A:FFC0 X:0 Y:0 P:eNVMXdIzC $80/92A2 9D 50 06 STA $0650,x[$80:0650] A:FF80 X:0 Y:0 P:eNVMXdIzC $80/92A5 E8 INX A:FFFF X:0 Y:0 P:envMXdIzC $80/92A6 E8 INX A:FFFF X:0001 Y:0 P:envMXdIzC $80/92A7 E8 INX A:FFFF X:0002 Y:0 P:envMXdIzC $80/92A8 E8 INX A:FFFF X:0003 Y:0 P:envMXdIzC $80/92A9 E0 10 CPX #$10 A:FFFF X:0004 Y:0 P:envMXdIzC $80/92AB D0 EB BNE $EB [$9298] A:FFFF X:0004 Y:0 P:eNvMXdIzc $80/92AD 28 PLP A:FFFF X:0010 Y:0 P:envMXdIZC $80/92AE 6B RTL A:FFFF X:0010 Y:0 P:envmxdIzC
$80/92AF NMI Handler
$00/92AF 5C B3 92 80 JMP $8092B3 ; Change to FastROM $80/92B3 C2 30 REP #$30 ; Buffer everything on Stack $80/92B5 48 PHA $80/92B6 DA PHX $80/92B7 5A PHY $80/92B8 8B PHB $80/92B9 0B PHD $80/92BA 4B PHK ; Set Program Bank to $80 $80/92BB AB PLB $80/92BC A9 00 00 LDA #$0000 ; Set Direct Page to $0000 $80/92BF 5B TCD $80/92C0 AD 10 42 LDA $4210 ; Remove NMI flag $80/92C3 22 78 59 10 JSL $105978[$10:5978] A:42C2 X:0010 Y:0 P:envmxdIzc $80/92C7 A3 0D LDA $0D,s [$00:1EFB] A:42C2 X:0010 Y:0 P:envmxdIzc $80/92C9 29 FF 00 AND #$00FF A:0480 X:0010 Y:0 P:envmxdIzc $80/92CC C9 04 00 CMP #$0004 ; [$92CF] If #04, LOOP FOREVER $80/92CF F0 FE BEQ $FE $80/92D1 AD 43 06 LDA $0643 ; Check Flag: Is already one NMI Handler active? $80/92D4 F0 03 BEQ $03 ; [$92D9] Branch and go on if not $80/92D6 4C 45 93 JMP $9345 ; Branch to "short end" of this NMI $80/92D9 EE 43 06 INC $0643 ; Set Flag: NMI Handler is active $80/92DC 22 44 89 80 JSL $808944 ; Update OAM $80/92E0 22 DC 8C 80 JSL $808CDC ; Work off DMA Pipeline $80/92E4 22 4E 9C 80 JSL $809C4E[$80:9C4E] A:0210 X:0010 Y:0 P:eNvmxdIzC $80/92E8 22 C8 AF 83 JSL $83AFC8[$83:AFC8] A:0 X:0001 Y:0 P:envmxdIzC $80/92EC 22 28 83 80 JSL $808328 ; Update CGRAM $80/92F0 22 5E AC 80 JSL $80AC5E ; VRAM DMA ($0BB4/5) $80/92F4 22 00 82 80 JSL $808200 ; Update Graphics Registers $80/92F8 22 90 93 80 JSL $809390 ; UNNECESSARY LINE - USELESS SUBROUTINE $80/92FC 22 4C 5B 10 JSL $105B4C[$10:5B4C] A:0 X:0 Y:00FF P:envmxdIzC $80/9300 22 6A 89 80 JSL $80896A[$80:896A] A:0001 X:00FF Y:00FF P:envmxdIzC $80/9304 22 99 8E 80 JSL $808E99[$80:8E99] A:0 X:00FF Y:00FF P:envmxdIzC $80/9308 22 20 5C 10 JSL $105C20 ; ? (Work off SPC pipeline) $80/930C 22 44 5B 10 JSL $105B44[$10:5B44] A:0 X:00FF Y:0 P:eNvmxdIzC $80/9310 22 63 83 80 JSL $808363[$80:8363] A:0 X:0 Y:0 P:eNvmxdIzC $80/9314 22 EB 8A 80 JSL $808AEB[$80:8AEB] A:02F6 X:0 Y:0 P:eNvmxdIzC $80/9318 20 55 93 JSR $9355 ; Setup an 24-bit-Address in $062F to jump to $80/931B 4B PHK ; Push 24-bit Return Address on Stack (because it's a JML, not a JSL) $80/931C F4 21 93 PEA $9321 $80/931F DC 2F 06 JML [$062F] ; Jump to address in $062F-31 $80/9322 C2 30 REP #$30 ; A/X/Y = 16-bit $80/9324 22 67 C3 81 JSL $81C367[$81:C367] A:0094 X:FFFE Y:0001 P:envmxdIzc $80/9328 22 14 8A 80 JSL $808A14[$80:8A14] A:FFFF X:0028 Y:0001 P:envmxdIzc $80/932C 22 E1 B0 83 JSL $83B0E1[$83:B0E1] A:1C00 X:00F0 Y:0001 P:envmxdIzc $80/9330 22 93 92 80 JSL $809293[$80:9293] A:FFFF X:00F0 Y:0 P:envmxdIzC $80/9334 22 93 93 80 JSL $809393 ; UNNECESSARY LINE - USELESS SUBROUTINE $80/9338 22 49 8F 80 JSL $808F49 ; ? (Frame Counter?) $80/933C 2B PLD ; Restore everything $80/933D AB PLB $80/933E 7A PLY $80/933F FA PLX $80/9340 68 PLA $80/9341 9C 43 06 STZ $0643 ; Clear Flag: NMI Handler is not active anymore $80/9344 40 RTI
$80/9345 NMI Handler Short End
This is executed if a NMI interrupts an NMI Handler. The second NMI gets ended here quickly so the first one can be worked off and nothing gets done twice.
$80/9345 C2 30 REP #$30 ; A/X/Y = 16-bit $80/9347 22 44 5B 10 JSL $105B44[$10:5B44] A:0001 X:0007 Y:014B P:envmxdIzC $80/934B 22 49 8F 80 JSL $808F49 ; ? (Frame Counter?) $80/934F 2B PLD ; Restore everything $80/9350 AB PLB $80/9351 7A PLY $80/9352 FA PLX $80/9353 68 PLA $80/9354 40 RTI
$80/9355 Setup Jump Addres in $62F-31
Executed during NMI. A = 16 bit!
$80/9355 AD 39 06 LDA $0639 $80/9358 30 0F BMI $0F ; [$9369] Exit if MSB of $063A is set $80/935A 8D 31 06 STA $0631 ; If not, store it as Bank for the Jump Address in $062F-31 $80/935D 09 00 80 ORA #$8000 ; Set MSB in $063A (this subroutine won't be executed again by default) $80/9360 8D 39 06 STA $0639 $80/9363 AD 37 06 LDA $0637 ; Setup Jump Address in $62F-31 $80/9366 8D 2F 06 STA $062F $80/9369 60 RTS
$80/936A ?
$80/936A AD 41 06 LDA $0641 [$80:0641] A:0081 X:0010 Y:0 P:envmxdizc $80/936D 30 0F BMI $0F [$937E] A:0080 X:0010 Y:0 P:envmxdizc $80/936F 8D 35 06 STA $0635 [$80:0635] A:0080 X:0010 Y:0 P:envmxdizc $80/9372 09 00 80 ORA #$8000 A:0080 X:0010 Y:0 P:envmxdizc $80/9375 8D 41 06 STA $0641 [$80:0641] A:8080 X:0010 Y:0 P:eNvmxdizc $80/9378 AD 3F 06 LDA $063F [$80:063F] A:8080 X:0010 Y:0 P:eNvmxdizc $80/937B 8D 33 06 STA $0633 [$80:0633] A:913A X:0010 Y:0 P:eNvmxdizc $80/937E 60 RTS A:913A X:0010 Y:0 P:eNvmxdizc
$80/936A ? (Jump to $80/938F next NMI)
$80/937F 08 PHP A:0094 X:0000 Y:0000 P:envmxdIzc $80/9380 C2 30 REP #$30 A:0094 X:0000 Y:0000 P:envmxdIzc $80/9382 A9 8F 93 LDA #$938F A:0094 X:0000 Y:0000 P:envmxdIzc $80/9385 8D 37 06 STA $0637 [$80:0637] A:938F X:0000 Y:0000 P:eNvmxdIzc $80/9388 A9 80 00 LDA #$0080 A:938F X:0000 Y:0000 P:eNvmxdIzc $80/938B 8D 39 06 STA $0639 [$80:0639] A:0080 X:0000 Y:0000 P:envmxdIzc $80/938E 28 PLP A:0080 X:0000 Y:0000 P:envmxdIzc $80/938F 6B RTL A:0080 X:0000 Y:0000 P:envmxdIzc
$80/9390 USELESS SUBROUTINE
Life would be so desolate without them.
$80/9390 08 PHP ; UNNECESSARY LINE $80/9391 28 PLP ; UNNECESSARY LINE $80/9392 6B RTL ; UNNECESSARY LINE
$80/9393 USELESS SUBROUTINE
You should call home more often.
$80/9393 08 PHP ; UNNECESSARY LINE $80/9394 28 PLP ; UNNECESSARY LINE $80/9395 6B RTL ; UNNECESSARY LINE
$80/939F ?
When this subroutine is called from a place in code, the next three byte are arguments for this subroutine. The arguments are a 24-bit-address.
At $80/936A, it is set up that NMI Jump Address is set to $93BF
This subroutine loads data from the address that is its argument. The first byte there is a command byte. The three most significant bits are command signals, the other bits are arguments:
#%111a.aabb = ? #%1111.1111 = #$FF = Exit
$80/939F 08 PHP ; Buffer Flag Register value on stack $80/93A0 C2 30 REP #$30 ; A/X/Y = 16-bit $80/93A2 A3 03 LDA $03,s ; Copy the original return address (pointing to data for this subroutine)... $80/93A4 85 76 STA $76 ; ... into $75-$77 as a 24-bit load address $80/93A6 A3 02 LDA $02,s $80/93A8 85 75 STA $75 $80/93AA 18 CLC ; Change return address on stack to leap over the data $80/93AB 69 03 00 ADC #$0003 $80/93AE 83 02 STA $02,s $80/93B0 A0 01 00 LDY #$0001 ; Load Data from the original return address $80/93B3 B7 75 LDA [$75],y ; Set this data up as another 24-bit-address in $7D-$7F $80/93B5 85 7D STA $7D $80/93B7 C8 INY $80/93B8 B7 75 LDA [$75],y $80/93BA 85 7E STA $7E $80/93BC 28 PLP ; Restore Original Flag Register $80/93BD 08 PHP ; Buffer Flag Register value again on stack $80/93BE 8B PHB ; Buffer Direct Bank $80/93BF E2 20 SEP #$20 ; A = 8-bit $80/93C1 C2 10 REP #$10 ; X/Y = 16-bit $80/93C3 A5 7A LDA $7A ; Set Direct Bank to the Bank of the Data Load Address $80/93C5 48 PHA $80/93C6 AB PLB $80/93C7 64 81 STZ $81 [$00:0081] A:7E84 X:0084 Y:0002 P:eNvMxdIzC $80/93C9 A0 00 00 LDY #$0000 A:7E84 X:0084 Y:0002 P:eNvMxdIzC $80/93CC DA PHX ; Buffer X on stack $80/93CD A6 78 LDX $78 ; Load Compressed Data Address $80/93CF BD 00 00 LDA $0000,x ; Load Command Byte from Compressed Data $80/93D2 E8 INX ; Increment Data Load Address $80/93D3 D0 03 BNE $03 ; [$93D8] Branch if it did not latch from $FFFF to $0000
code is missing here
$80/93D8 86 78 STX $78 ; Store Compressed Data Address back $80/93DA FA PLX ; Restore X $80/93DB 85 7B STA $7B ; Store Command Byte in $7B $80/93DD C9 FF CMP #$FF ; Exit if it is #$FF $80/93DF D0 07 BNE $07 ; [$93E8] Branch if not
Exit
$80/93E1 8B PHB ; Store current Program Bank back to $7A $80/93E2 68 PLA $80/93E3 85 7A STA $7A $80/93E5 AB PLB ; Restore Flag Register value and Program Bank $80/93E6 28 PLP $80/93E7 6B RTL
Check if Bits 5-7 of Command Byte are set
$80/93E8 29 E0 AND #$E0 ; Check if Bits 5 to 7 of the Data Byte are set $80/93EA C9 E0 CMP #$E0 $80/93EC D0 1E BNE $1E ; [$940C] Branch if not
If Command Byte Bits 5-7 are set
$80/93EE A5 7B LDA $7B ; Push Command Byte Bits 2-4 to 5-7, remove the rest, push that value on stack $80/93F0 0A ASL A $80/93F1 0A ASL A $80/93F2 0A ASL A $80/93F3 29 E0 AND #$E0 $80/93F5 48 PHA $80/93F6 A5 7B LDA $7B ; Load Command Byte, remove all the bits but Bits 0 and 1 $80/93F8 29 03 AND #$03 $80/93FA EB XBA ; Keep those in the hidden part of A $80/93FB DA PHX ; Buffer X on stack $80/93FC A6 78 LDX $78 ; Load next Data Byte $80/93FE BD 00 00 LDA $0000,x $80/9401 E8 INX ; Increment Data Load Address $80/9402 D0 03 BNE $03 ; [$9407] Branch if it did not latch from $FFFF to $0000
code is missing
$80/9407 86 78 STX $78 ; Store Compressed Data Address back $80/9409 FA PLX ; Restore X $80/940A 80 08 BRA $08 [$9414] A:0023 X:0084 Y:0 P:envMxdIzC
$80/940C 48 PHA A:0020 X:0 Y:0024 P:envMxdIzc $80/940D A9 00 LDA #$00 A:0020 X:0 Y:0024 P:envMxdIzc $80/940F EB XBA A:0 X:0 Y:0024 P:envMxdIZc $80/9410 A5 7B LDA $7B [$00:007B] A:0 X:0 Y:0024 P:envMxdIZc $80/9412 29 1F AND #$1F A:0025 X:0 Y:0024 P:envMxdIzc $80/9414 AA TAX A:0023 X:0084 Y:0 P:envMxdIzC $80/9415 E8 INX A:0023 X:0023 Y:0 P:envMxdIzC $80/9416 68 PLA A:0023 X:0024 Y:0 P:envMxdIzC $80/9417 C9 00 CMP #$00 A:0 X:0024 Y:0 P:envMxdIZC $80/9419 10 04 BPL $04 [$941F] A:0 X:0024 Y:0 P:envMxdIZC $80/941B 5C AB 94 80 JMP $8094AB[$80:94AB] A:00C0 X:0003 Y:0010 P:eNvMxdIzC $80/941F C9 20 CMP #$20 A:0 X:0024 Y:0 P:envMxdIZC $80/9421 F0 1F BEQ $1F [$9442] A:0 X:0024 Y:0 P:eNvMxdIzc $80/9423 C9 40 CMP #$40 A:0 X:0024 Y:0 P:eNvMxdIzc $80/9425 F0 34 BEQ $34 [$945B] A:0 X:0024 Y:0 P:eNvMxdIzc $80/9427 C9 60 CMP #$60 A:0 X:0024 Y:0 P:eNvMxdIzc $80/9429 F0 66 BEQ $66 [$9491] A:0 X:0024 Y:0 P:eNvMxdIzc $80/942B DA PHX A:0 X:0024 Y:0 P:eNvMxdIzc $80/942C A6 78 LDX $78 ; Load next Data Byte $80/942E BD 00 00 LDA $0000,x $80/9431 E8 INX ; Increment Data Load Address $80/9432 D0 03 BNE $03 ; [$9437]
code is missing here
$80/9437 86 78 STX $78 ; Store Compressed Data Address back $80/9439 FA PLX ; Restore X $80/943A 97 7D STA [$7D],y[$7E:2000] A:003F X:0024 Y:0 P:envMxdIzc $80/943C C8 INY A:003F X:0024 Y:0 P:envMxdIzc $80/943D CA DEX A:003F X:0024 Y:0001 P:envMxdIzc $80/943E D0 EB BNE $EB [$942B] A:003F X:0023 Y:0001 P:envMxdIzc $80/9440 F0 8A BEQ $8A [$93CC] A:007F X:0 Y:0024 P:envMxdIZc $80/9442 DA PHX A:0020 X:0006 Y:0024 P:envMxdIZC $80/9443 A6 78 LDX $78 ; Load next Data Byte $80/9445 BD 00 00 LDA $0000,x $80/9448 E8 INX ; Increment Data Load Address $80/9449 D0 03 BNE $03 ; [$944E]
code is missing here
$80/944E 86 78 STX $78 ; Store Compressed Data Address back $80/9450 FA PLX ; Restore X $80/9451 97 7D STA [$7D],y[$7E:2024] A:0 X:0006 Y:0024 P:envMxdIzC $80/9453 C8 INY A:0 X:0006 Y:0024 P:envMxdIzC $80/9454 CA DEX A:0 X:0006 Y:0025 P:envMxdIzC $80/9455 D0 FA BNE $FA [$9451] A:0 X:0005 Y:0025 P:envMxdIzC $80/9457 5C CC 93 80 JMP $8093CC[$80:93CC] A:0 X:0 Y:002A P:envMxdIZC $80/945B DA PHX A:0040 X:0004 Y:0050 P:envMxdIZC $80/945C A6 78 LDX $78 ; Load next Data Byte $80/945E BD 00 00 LDA $0000,x $80/9461 E8 INX ; Increment Data Load Address $80/9462 D0 03 BNE $03 ; [$9467]
code is missing here
$80/9467 86 78 STX $78 ; Store Compressed Data Address back $80/9469 FA PLX ; Restore X $80/946A 85 7B STA $7B [$00:007B] A:007B X:0004 Y:0050 P:envMxdIzC $80/946C DA PHX A:007B X:0004 Y:0050 P:envMxdIzC $80/946D A6 78 LDX $78 ; Load next Data Byte $80/946F BD 00 00 LDA $0000,x $80/9472 E8 INX ; Increment Data Load Address $80/9473 D0 03 BNE $03 ; [$9478]
code is missing here
$80/9478 86 78 STX $78 ; Store Compressed Data Address back $80/947A FA PLX ; Restore X $80/947B 85 7C STA $7C [$00:007C] A:006F X:0004 Y:0050 P:envMxdIzC $80/947D A5 7B LDA $7B [$00:007B] A:006F X:0004 Y:0050 P:envMxdIzC $80/947F 97 7D STA [$7D],y[$7E:2050] A:007B X:0004 Y:0050 P:envMxdIzC $80/9481 C8 INY A:007B X:0004 Y:0050 P:envMxdIzC $80/9482 CA DEX A:007B X:0004 Y:0051 P:envMxdIzC $80/9483 F0 08 BEQ $08 [$948D] A:007B X:0003 Y:0051 P:envMxdIzC $80/9485 A5 7C LDA $7C [$00:007C] A:007B X:0003 Y:0051 P:envMxdIzC $80/9487 97 7D STA [$7D],y[$7E:2051] A:006F X:0003 Y:0051 P:envMxdIzC $80/9489 C8 INY A:006F X:0003 Y:0051 P:envMxdIzC $80/948A CA DEX A:006F X:0003 Y:0052 P:envMxdIzC $80/948B D0 F0 BNE $F0 [$947D] A:006F X:0002 Y:0052 P:envMxdIzC $80/948D 5C CC 93 80 JMP $8093CC[$80:93CC] A:006F X:0 Y:0054 P:envMxdIZC
$80/94AB ?
$80/94AB C9 C0 CMP #$C0 A:00C0 X:0003 Y:0010 P:eNvMxdIzC $80/94AD B0 43 BCS $43 [$94F2] A:00C0 X:0003 Y:0010 P:envMxdIZC $80/94AF 29 20 AND #$20 A:0080 X:0008 Y:0100 P:eNvMxdIzc $80/94B1 85 80 STA $80 [$00:0080] A:0000 X:0008 Y:0100 P:envMxdIZc $80/94B3 DA PHX A:0000 X:0008 Y:0100 P:envMxdIZc $80/94B4 A6 78 LDX $78 [$00:0078] A:0000 X:0008 Y:0100 P:envMxdIZc $80/94B6 BD 00 00 LDA $0000,x[$93:AD2F] A:0000 X:AD2F Y:0100 P:eNvMxdIzc $80/94B9 E8 INX A:0000 X:AD2F Y:0100 P:envMxdIZc $80/94BA D0 03 BNE $03 [$94BF] A:0000 X:AD30 Y:0100 P:eNvMxdIzc $80/94BF 86 78 STX $78 [$00:0078] A:0000 X:AD30 Y:0100 P:eNvMxdIzc $80/94C1 FA PLX A:0000 X:AD30 Y:0100 P:eNvMxdIzc $80/94C2 85 7B STA $7B [$00:007B] A:0000 X:0008 Y:0100 P:envMxdIzc $80/94C4 DA PHX A:0000 X:0008 Y:0100 P:envMxdIzc $80/94C5 A6 78 LDX $78 [$00:0078] A:0000 X:0008 Y:0100 P:envMxdIzc $80/94C7 BD 00 00 LDA $0000,x[$93:AD30] A:0000 X:AD30 Y:0100 P:eNvMxdIzc $80/94CA E8 INX A:0000 X:AD30 Y:0100 P:envMxdIZc $80/94CB D0 03 BNE $03 [$94D0] A:0000 X:AD31 Y:0100 P:eNvMxdIzc $80/94D0 86 78 STX $78 [$00:0078] A:0000 X:AD31 Y:0100 P:eNvMxdIzc $80/94D2 FA PLX A:0000 X:AD31 Y:0100 P:eNvMxdIzc $80/94D3 85 7C STA $7C [$00:007C] A:0000 X:0008 Y:0100 P:envMxdIzc $80/94D5 E2 20 SEP #$20 A:0001 X:0003 Y:0010 P:envmxdIzC $80/94D7 DA PHX A:0001 X:0003 Y:0010 P:envMxdIzC $80/94D8 5A PHY A:0001 X:0003 Y:0010 P:envMxdIzC $80/94D9 A4 7B LDY $7B [$00:007B] A:0001 X:0003 Y:0010 P:envMxdIzC $80/94DB B7 7D LDA [$7D],y[$7F:C001] A:0001 X:0003 Y:0001 P:envMxdIzC $80/94DD C8 INY A:0000 X:0003 Y:0001 P:envMxdIZC $80/94DE 84 7B STY $7B [$00:007B] A:0000 X:0003 Y:0002 P:envMxdIzC $80/94E0 7A PLY A:0000 X:0003 Y:0002 P:envMxdIzC $80/94E1 A6 80 LDX $80 [$00:0080] A:0000 X:0003 Y:0010 P:envMxdIzC $80/94E3 F0 02 BEQ $02 [$94E7] A:0000 X:0000 Y:0010 P:envMxdIZC
code is missing here
$80/94E7 97 7D STA [$7D],y[$7F:C010] A:0000 X:0000 Y:0010 P:envMxdIZC $80/94E9 C8 INY A:0000 X:0000 Y:0010 P:envMxdIZC $80/94EA FA PLX A:0000 X:0000 Y:0011 P:envMxdIzC $80/94EB CA DEX A:0000 X:0003 Y:0011 P:envMxdIzC $80/94EC D0 E9 BNE $E9 [$94D7] A:0000 X:0002 Y:0011 P:envMxdIzC $80/94EE 5C CC 93 80 JMP $8093CC[$80:93CC] A:0003 X:0000 Y:0013 P:envMxdIZC $80/94F2 29 20 AND #$20 A:00C0 X:0003 Y:0010 P:envMxdIZC $80/94F4 85 80 STA $80 [$00:0080] A:0000 X:0003 Y:0010 P:envMxdIZC $80/94F6 DA PHX A:0000 X:0003 Y:0010 P:envMxdIZC $80/94F7 A6 78 LDX $78 [$00:0078] A:0000 X:0003 Y:0010 P:envMxdIZC $80/94F9 BD 00 00 LDA $0000,x[$93:ACA9] A:0000 X:ACA9 Y:0010 P:eNvMxdIzC $80/94FC E8 INX A:000F X:ACA9 Y:0010 P:envMxdIzC $80/94FD D0 03 BNE $03 [$9502] A:000F X:ACAA Y:0010 P:eNvMxdIzC $80/9502 86 78 STX $78 [$00:0078] A:000F X:ACAA Y:0010 P:eNvMxdIzC $80/9504 FA PLX A:000F X:ACAA Y:0010 P:eNvMxdIzC $80/9505 85 7B STA $7B [$00:007B] A:000F X:0003 Y:0010 P:envMxdIzC $80/9507 64 7C STZ $7C [$00:007C] A:000F X:0003 Y:0010 P:envMxdIzC $80/9509 C2 20 REP #$20 A:000F X:0003 Y:0010 P:envMxdIzC $80/950B 98 TYA A:000F X:0003 Y:0010 P:envmxdIzC $80/950C 38 SEC A:0010 X:0003 Y:0010 P:envmxdIzC $80/950D E5 7B SBC $7B [$00:007B] A:0010 X:0003 Y:0010 P:envmxdIzC $80/950F 85 7B STA $7B [$00:007B] A:0001 X:0003 Y:0010 P:envmxdIzC $80/9511 80 C2 BRA $C2 [$94D5] A:0001 X:0003 Y:0010 P:envmxdIzC
$80/951E Inc Bank, reset Pointer to $8000 (Graphics Decompression directly to VRAM)
Used (at least) in the Decompression subroutine below. When byte $FFFF on one bank gets read, this subroutine is called and makes the settings so that the next byte that gets read is byte #$8000 from the next bank.
$80/9513 A2 00 80 LDX #$8000 ; Reset Index to #$8000 $80/9516 48 PHA ; Buffer A on stack $80/9517 8B PHB ; Get current Program Bank $80/9518 68 PLA $80/9519 1A INC A ; Increment Program Bank $80/951A 48 PHA ; Set this value as the new Program Bank $80/951B AB PLB $80/951C 68 PLA ; Restore A $80/951D 60 RTS
$80/951E Graphics Decompression directly to VRAM
This subroutine is to 80% commented. Since I do not plan to write compression/decompression Utility, I see no use in breaking my brain to fully understand every piece of its mechanisms.
Notes:
Transfers data directly to VRAM.
The data source address is stored in $78-$7A.
$7B Buffer for Loaded Compressed Data Byte.
$7D contains the VRAM destination (times two).
Compressed Data Byte = $FF - Exit Subroutine.
Bits 5-7 of the first Data Byte decide how to handle the other bits / the next byte(s)
%000x.xxxx The next byte gets stored alternating in $2118/9 and incremented after each storing, how often depends on bits 0-4 (#%0000.0000 transfers it one time, #%0001.1111 transfers it thirty-two times).
%001x.xxxx
The next byte gets stored alternating in $2118/9 unchanged, how often depends on bits 0-4 (#%0010.0000 transfers it one time, #%0011.1111 transfers it thirty-two times).
%010x.xxxx
The next two bytes get alternating stored in $2118/9 unchanged, how often depends on bits 0-4 (#%0100.0000 transfers one byte, #%0101.1111 transfers thirty-two). Note that the counter gets decremented every SINGLE byte transfered, not every byte duo; this way, with an uneven number, the first and the last byte are the same.
%011x.xxxx
The next bytes get stored alternating in $2118/9 unchanged, how many depends on bits 0-4 (#%0110.0000 transfers one byte, #%0111.1111 transfers thirty-two).
%100x.xxxx
Next two bytes are an offset. This subroutine repeats already decompressed data from there.
%101x.xxxx
Same as above, but Data Byte gets EORed with #$FF %110x.xxxx Next two bytes are an offset. This subroutine repeats already decompressed data from Offset - Y.
%111x.xxxx
Same as above, but Data Byte gets EORed with #$FF
START UP: Set VRAM Address
$80/951E 08 PHP ; Buffer Flag Register value and Program Bank on stack $80/951F 8B PHB $80/9520 C2 30 REP #$30 ; A/X/Y = 16-bit $80/9522 A5 7D LDA $7D [$00:007D] A:8000 X:0084 Y:003C P:eNvmxdIzC $80/9524 A8 TAY A:0 X:0084 Y:003C P:envmxdIZC $80/9525 4A LSR A ; Set VRAM Destination $80/9526 8D 16 21 STA $2116 $80/9529 E2 20 SEP #$20 ; A = 8-bit $80/952B A5 7A LDA $7A ; Set Program Bank to Bank of the Compressed Data $80/952D 48 PHA $80/952E AB PLB $80/952F 64 81 STZ $81 [$00:0081] A:0084 X:0084 Y:0 P:eNvMxdIzc
Load Data Byte and check if it's the Exit Signal
$80/9531 DA PHX ; Buffer X on stack $80/9532 A6 78 LDX $78 ; Load Compressed Data Address $80/9534 BD 00 00 LDA $0000,x ; Load Compressed Data Byte $80/9537 E8 INX ; Increment Data Load Address $80/9538 D0 03 BNE $03 ; [$953D] Branch if it did not latch from $FFFF to $0000 $80/953A 20 13 95 JSR $9513 ; Increment Program Bank, Reset Counter to $8000 $80/953D 86 78 STX $78 ; Store Compressed Data Address back $80/953F FA PLX ; Restore X $80/9540 85 7B STA $7B ; Buffer loaded Data Byte in $7B $80/9542 C9 FF CMP #$FF ; Branch if it is not $FF (which is the Exit Signal) $80/9544 D0 07 BNE $07 ; [$954D]
Exit
$80/9546 8B PHB ; Store current Program Bank back to $7A $80/9547 68 PLA $80/9548 85 7A STA $7A $80/954A AB PLB ; Restore Flag Register value and Program Bank $80/954B 28 PLP $80/954C 6B RTL
Check if Bits 5-7 of Data Byte are set
$80/954D 29 E0 AND #$E0 ; Check if Bits 5 to 7 of the Data Byte are set $80/954F C9 E0 CMP #$E0 $80/9551 D0 1E BNE $1E ; [$9571] Branch if not
If Data Byte Bits 5-7 are set
$80/9553 A5 7B LDA $7B ; Push Data Byte Bits 2-4 to 5-7, remove the rest, push that value on stack $80/9555 0A ASL A $80/9556 0A ASL A $80/9557 0A ASL A $80/9558 29 E0 AND #$E0 $80/955A 48 PHA $80/955B A5 7B LDA $7B ; Load Data Byte, remove all the bits but Bits 0 and 1 $80/955D 29 03 AND #$03 $80/955F EB XBA A:0 X:0084 Y:0 P:envMxdIZC $80/9560 DA PHX ; Buffer X on stack $80/9561 A6 78 LDX $78 ; Load next Data Byte $80/9563 BD 00 00 LDA $0000,x $80/9566 E8 INX ; Increment Data Load Address $80/9567 D0 03 BNE $03 ; [$956C] Branch if it did not latch from $FFFF to $0000
code is missing here
$80/956C 86 78 STX $78 ; Store Compressed Data Address back $80/956E FA PLX ; Restore X $80/956F 80 08 BRA $08 [$9579] A:0020 X:0084 Y:0 P:envMxdIzC
If not all Data Byte Bits 5-7 are set: But the other bits in X and Increment X
$80/9571 48 PHA ; Push Bits on Stack $80/9572 A9 00 LDA #$00 A:0 X:0 Y:0021 P:envMxdIzc $80/9574 EB XBA A:0 X:0 Y:0021 P:envMxdIZc $80/9575 A5 7B LDA $7B ; Restore Data Byte $80/9577 29 1F AND #$1F ; Remove Bits 5-7 from Data Byte $80/9579 AA TAX A:0020 X:0084 Y:0 P:envMxdIzC $80/957A E8 INX A:0020 X:0020 Y:0 P:envMxdIzC
If not all Data Byte Bits 5-7 are set: WHICH Bits ARE set, exactly?
$80/957B 68 PLA ; Pull Data Byte Bits 5-7 from Stack $80/957C C9 00 CMP #$00 ; UNNECESSARY LINE? (unnecessary if PLA sets the negative flag) $80/957E 10 04 BPL $04 ; [$9584] Branch if positive $80/9580 5C 5C 96 80 JMP $80965C ; Jump if negative $80/9584 C9 20 CMP #$20 $80/9586 F0 33 BEQ $33 ; [$95BB] if %001x.xxxx $80/9588 C9 40 CMP #$40 $80/958A F0 56 BEQ $56 ; [$95E2] if %010x.xxxx $80/958C C9 60 CMP #$60 $80/958E D0 04 BNE $04 ; [$9594] if %011x.xxxx $80/9590 5C 34 96 80 JMP $809634 ; If %000x.xxxx
If Data Byte Bits 5-7 = %011x.xxxx --- TRANSFER DATA AS IS
$80/9594 DA PHX ; Buffer X on stack $80/9595 A6 78 LDX $78 ; Load next Data Byte $80/9597 BD 00 00 LDA $0000,x $80/959A E8 INX ; Increment Data Load Address $80/959B D0 03 BNE $03 ; [$95A0] Branch if it did not latch from $FFFF to $0000
code is missing here
$80/95A0 86 78 STX $78 ; Store Compressed Data Address back $80/95A2 FA PLX ; Restore X $80/95A3 48 PHA ; Store in $2118 if Y is even / Store in $2119 if Y is odd $80/95A4 98 TYA $80/95A5 4A LSR A $80/95A6 68 PLA $80/95A7 B0 06 BCS $06 ; [$95AF] $80/95A9 8F 18 21 00 STA $002118 $80/95AD 80 04 BRA $04 ; [$95B3] $80/95AF 8F 19 21 00 STA $002119 $80/95B3 C8 INY ; Next time, store in the other VRAM register $80/95B4 CA DEX ; Decrement number of bytes to do this way $80/95B5 D0 DD BNE $DD ; [$9594] Loop if counter did not run out $80/95B7 5C 31 95 80 JMP $809531 ; Go back, load next Data Byte (next Command)
If Data Byte Bits 5-7 = %001x.xxxx --- REPEAT ONE BYTE
$80/95BB DA PHX ; Buffer X on stack $80/95BC A6 78 LDX $78 ; Load next Data Byte $80/95BE BD 00 00 LDA $0000,x $80/95C1 E8 INX ; Increment Data Load Address $80/95C2 D0 03 BNE $03 ; [$95C7] Branch if it did not latch from $FFFF to $0000
code is missing here
$80/95C7 86 78 STX $78 ; Store Compressed Data Address back $80/95C9 FA PLX ; Restore X $80/95CA 48 PHA ; Store in $2118 if Y is even / Store in $2119 if Y is odd $80/95CB 98 TYA $80/95CC 4A LSR A $80/95CD 68 PLA $80/95CE B0 06 BCS $06 ; [$95D6] $80/95D0 8F 18 21 00 STA $002118 $80/95D4 80 04 BRA $04 ; [$95DA] $80/95D6 8F 19 21 00 STA $002119 $80/95DA C8 INY ; Next time, store in the other VRAM register $80/95DB CA DEX ; Decrement number of bytes to do this way $80/95DC D0 EC BNE $EC ; [$95CA] Loop if counter did not run out $80/95DE 5C 31 95 80 JMP $809531 ; Go back, load next Data Byte (next Command)
If Data Byte Bits 5-7 = %010x.xxxx --- STORE TWO BYTES ALTERNATING
$80/95E2 DA PHX ; Buffer X on stack $80/95E3 A6 78 LDX $78 ; Load next Data Byte $80/95E5 BD 00 00 LDA $0000,x $80/95E8 E8 INX ; Increment Data Load Address $80/95E9 D0 03 BNE $03 ; [$95EE] Branch if it did not latch from $FFFF to $0000
code is missing here
$80/95EE 86 78 STX $78 ; Store Compressed Data Address back $80/95F0 FA PLX ; Restore X $80/95F1 85 7B STA $7B ; Buffer loaded Data Byte in $7B $80/95F3 DA PHX ; Buffer X on stack $80/95F4 A6 78 LDX $78 ; Load next Data Byte $80/95F6 BD 00 00 LDA $0000,x $80/95F9 E8 INX ; Increment Data Load Address $80/95FA D0 03 BNE $03 ; [$95FF] Branch if it did not latch from $FFFF to $0000
code is missing here
$80/95FF 86 78 STX $78 ; Store Compressed Data Address back $80/9601 FA PLX ; Restore X $80/9602 85 7C STA $7C ; Buffer second loaded Data Byte in $7B $80/9604 A5 7B LDA $7B ; Load first data byte $80/9606 48 PHA ; Store in $2118 if Y is even / Store in $2119 if Y is odd $80/9607 98 TYA $80/9608 4A LSR A $80/9609 68 PLA $80/960A B0 06 BCS $06 ; [$9612] $80/960C 8F 18 21 00 STA $002118 $80/9610 80 04 BRA $04 ; [$9616] $80/9612 8F 19 21 00 STA $002119 $80/9616 C8 INY ; Next time, store in the other VRAM register $80/9617 CA DEX ; Decrement number of bytes to do this way $80/9618 F0 16 BEQ $16 ; [$9630] Load next command if number of Bytes has run out $80/961A A5 7C LDA $7C ; Load second Data Byte $80/961C 48 PHA ; Store in $2118 if Y is even / Store in $2119 if Y is odd $80/961D 98 TYA $80/961E 4A LSR A $80/961F 68 PLA $80/9620 B0 06 BCS $06 ; [$9628] $80/9622 8F 18 21 00 STA $002118 $80/9626 80 04 BRA $04 ; [$962C] $80/9628 8F 19 21 00 STA $002119 $80/962C C8 INY ; Next time, store in the other VRAM register $80/962D CA DEX ; Decrement number of bytes to do this way $80/962E D0 D4 BNE $D4 ; [$9604] Loop if counter did not run out $80/9630 5C 31 95 80 JMP $809531 ; Go back, load next Data Byte (next Command)
If Data Byte Bits 5-7 = %000x.xxxx --- REPEAT BYTE AND INC IT AFTER EACH STORING
$80/9634 DA PHX ; Buffer X on stack $80/9635 A6 78 LDX $78 ; Load next Data Byte $80/9637 BD 00 00 LDA $0000,x $80/963A E8 INX ; Increment Data Load Address $80/963B D0 03 BNE $03 ; [$9640] Branch if it did not latch from $FFFF to $0000
code is missing here
$80/9640 86 78 STX $78 ; Store Compressed Data Address back $80/9642 FA PLX ; Restore X $80/9643 48 PHA ; Store in $2118 if Y is even / Store in $2119 if Y is odd $80/9644 98 TYA $80/9645 4A LSR A $80/9646 68 PLA $80/9647 B0 06 BCS $06 ; [$964F] $80/9649 8F 18 21 00 STA $002118 $80/964D 80 04 BRA $04 ; [$9653] $80/964F 8F 19 21 00 STA $002119 $80/9653 C8 INY ; Next time, store in the other VRAM register $80/9654 1A INC A ; Increment Byte to store $80/9655 CA DEX ; Decrement number of bytes to do this way $80/9656 D0 EB BNE $EB ; [$9643] Loop if counter did not run out $80/9658 5C 31 95 80 JMP $809531 ; Go back, load next Data Byte (next Command)
If Data Byte Bits 5-7 = %1??x.xxxx = Is bit 6 set?
$80/965C C9 C0 CMP #$C0 $80/965E B0 73 BCS $73 ; [$96D3] Branch if #$C0 or #$E0 (Bit 6 is set)
If Data Byte Bits 5-7 = %10?x.xxxx
$80/9660 29 20 AND #$20 ; Buffer bit 5 in $80 $80/9662 85 80 STA $80 $80/9664 DA PHX ; Buffer X on stack $80/9665 A6 78 LDX $78 ; Load next Data Byte $80/9667 BD 00 00 LDA $0000,x $80/966A E8 INX ; Increment Data Load Address $80/966B D0 03 BNE $03 ; [$9670] Branch if it did not latch from $FFFF to $0000
code is missing here
$80/9670 86 78 STX $78 ; Store Compressed Data Address back $80/9672 FA PLX ; Restore X $80/9673 85 7B STA $7B ; Store first loaded Data Byte in $7B $80/9675 DA PHX ; Buffer X on stack $80/9676 A6 78 LDX $78 ; Load next Data Byte $80/9678 BD 00 00 LDA $0000,x $80/967B E8 INX ; Increment Data Load Address $80/967C D0 03 BNE $03 ; [$9681] Branch if it did not latch from $FFFF to $0000
code is missing here
$80/9681 86 78 STX $78 ; Store Compressed Data Address back $80/9683 FA PLX ; Restore X $80/9684 85 7C STA $7C ; Store second loaded Data Byte in $7C $80/9686 C2 20 REP #$20 ; A = 16-bit $80/9688 A5 7D LDA $7D ; Add Offset ($7B/C) to VRAM Address ($7D/E) and store it in $7B/C $80/968A 18 CLC $80/968B 65 7B ADC $7B $80/968D 85 7B STA $7B
Second part of everything with Data Byte Bit 7 = %1xxx.xxxx
$80/968F DA PHX A:0350 X:0003 Y:0405 P:envmxdIzC $80/9690 C2 20 REP #$20 ; A = 16-bit $80/9692 A5 7B LDA $7B ; Set Address in VRAM $80/9694 4A LSR A $80/9695 8F 16 21 00 STA $002116 $80/9699 AF 39 21 00 LDA $002139 ; Load from VRAM $80/969D AF 39 21 00 LDA $002139 $80/96A1 90 01 BCC $01 ; [$96A4] Branch if the LSB of $7B was clear $80/96A3 EB XBA A:0300 X:0002 Y:0406 P:envmxdIzC $80/96A4 E6 7B INC $7B ; Increment VRAM Address $80/96A6 E2 20 SEP #$20 ; A = 8-bit $80/96A8 A6 80 LDX $80 ; If bit 5 of the Commando Byte was set, EOR the Data Byte $80/96AA F0 02 BEQ $02 ; [$96AE] Else, Branch $80/96AC 49 FF EOR #$FF $80/96AE 48 PHA ; Buffer A on Stack $80/96AF C2 20 REP #$20 ; A = 16-bit $80/96B1 98 TYA ; Restore VRAM Address (for Storing) $80/96B2 4A LSR A $80/96B3 8F 16 21 00 STA $002116 $80/96B7 E2 20 SEP #$20 ; A = 8-bit $80/96B9 68 PLA ; Restore A $80/96BA 48 PHA ; Store in $2118 if Y is even / Store in $2119 if Y is odd $80/96BB 98 TYA $80/96BC 4A LSR A $80/96BD 68 PLA $80/96BE B0 06 BCS $06 ; [$96C6] $80/96C0 8F 18 21 00 STA $002118 $80/96C4 80 04 BRA $04 ; [$96CA] $80/96C6 8F 19 21 00 STA $002119 $80/96CA C8 INY ; Next time, store in the other VRAM register $80/96CB FA PLX ; Decrement number of bytes to do this way $80/96CC CA DEX $80/96CD D0 C0 BNE $C0 ; [$968F] Loop if counter did not run out $80/96CF 5C 31 95 80 JMP $809531 ; Go back, load next Data Byte (next Command)
If Data Byte Bits 5-7 = %11?x.xxxx
$80/96D3 29 20 AND #$20 ; Buffer bit 5 in $80 $80/96D5 85 80 STA $80 $80/96D7 DA PHX ; Buffer X on stack $80/96D8 A6 78 LDX $78 ; Load next Data Byte $80/96DA BD 00 00 LDA $0000,x $80/96DD E8 INX ; Increment Data Load Address $80/96DE D0 03 BNE $03 ; [$96E3] Branch if it did not latch from $FFFF to $0000
code is missing here
$80/96E3 86 78 STX $78 ; Store Compressed Data Address back $80/96E5 FA PLX ; Restore X $80/96E6 85 7B STA $7B [$00:007B] A:00B5 X:0003 Y:0405 P:envMxdIzC $80/96E8 64 7C STZ $7C [$00:007C] A:00B5 X:0003 Y:0405 P:envMxdIzC $80/96EA C2 20 REP #$20 A:00B5 X:0003 Y:0405 P:envMxdIzC $80/96EC 98 TYA A:00B5 X:0003 Y:0405 P:envmxdIzC $80/96ED 38 SEC A:0405 X:0003 Y:0405 P:envmxdIzC $80/96EE E5 7B SBC $7B [$00:007B] A:0405 X:0003 Y:0405 P:envmxdIzC $80/96F0 85 7B STA $7B [$00:007B] A:0350 X:0003 Y:0405 P:envmxdIzC $80/96F2 80 9B BRA $9B ; [$968F] Branch to the second part
This subroutine exits with an Error flag (in the Carry).
$80/9720 DA PHX ; Buffer X and Flag Register value on stack $80/9721 08 PHP $80/9722 E2 30 SEP #$30 ; A/X/Y = 8-bit $80/9724 C0 00 CPY #$00 ; =#$00 = Music, !=#$00 = Sound Effect $80/9726 D0 34 BNE $34 ; [$975C] Branch if Sound Effect
If Music
$80/9728 C9 FD CMP #$FD A:0003 X:00FE Y:0 P:envMXdIZC $80/972A 90 1E BCC $1E [$974A] A:0003 X:00FE Y:0 P:envMXdIzc
code is missing here
$80/974A C9 22 CMP #$22 A:0003 X:00FE Y:0 P:envMXdIzc $80/974C B0 07 BCS $07 [$9755] A:0003 X:00FE Y:0 P:eNvMXdIzc $80/974E 48 PHA A:0003 X:00FE Y:0 P:eNvMXdIzc $80/974F A9 80 LDA #$80 A:0003 X:00FE Y:0 P:eNvMXdIzc $80/9751 20 8D 97 JSR $978D [$80:978D] A:0080 X:00FE Y:0 P:eNvMXdIzc $80/9754 68 PLA A:0080 X:0080 Y:0 P:eNvMXdIzc $80/9755 20 8D 97 JSR $978D [$80:978D] A:0003 X:0080 Y:0 P:envMXdIzc $80/9758 B0 0B BCS $0B ; [$9765] Branch if Error flag is set $80/975A 80 05 BRA $05 ; [$9761] Else: Exit and clear Error flag
If Sound Effect
$80/975C 20 69 97 JSR $9769 ; Put sound effect to play in pipeline $80/975F B0 04 BCS $04 ; [$9765] Branch if Error flag is set $80/9761 28 PLP ; Restore X and Flag Register value $80/9762 FA PLX $80/9763 18 CLC ; Clear Error flag $80/9764 6B RTL $80/9765 28 PLP ; Restore X and Flag Register value $80/9766 FA PLX $80/9767 38 SEC ; Set Error flag $80/9768 6B RTL
When this subroutine gets called, Y contains the APU register destination (Y = #$0x ==> $214x). A is 8-bit, the active 8-bit (A) are the value store in that APU register, the inactive 8-bit (B) are for $2143.
The carry is used here as error flag. When it's set, something went wrong.
$80/9769 AA TAX ; Buffer Original (active) A value in X $80/976A AD 0A 07 LDA $070A [$80:070A] A:0384 X:0084 Y:0001 P:eNvMXdIzC $80/976D 1A INC A A:0300 X:0084 Y:0001 P:envMXdIZC $80/976E 29 0F AND #$0F A:0301 X:0084 Y:0001 P:envMXdIzC $80/9770 CD 0C 07 CMP $070C [$80:070C] A:0301 X:0084 Y:0001 P:envMXdIzC $80/9773 F0 16 BEQ $16 ; [$978B] Set Error Flag and Exit $80/9775 8D 0A 07 STA $070A [$80:070A] A:0301 X:0084 Y:0001 P:envMXdIzC $80/9778 3A DEC A A:0301 X:0084 Y:0001 P:envMXdIzC $80/9779 29 0F AND #$0F A:0300 X:0084 Y:0001 P:envMXdIZC $80/977B DA PHX ; Push Original A value on stack $80/977C AA TAX A:0300 X:0084 Y:0001 P:envMXdIZC $80/977D 98 TYA ; $80/977E 9D CA 06 STA $06CA,x[$80:06CA] A:0301 X:0000 Y:0001 P:envMXdIzC $80/9781 68 PLA ; Pull Original A from stack $80/9782 9D EA 06 STA $06EA,x[$80:06EA] A:0384 X:0000 Y:0001 P:eNvMXdIzC $80/9785 EB XBA ; Store byte from inactive Accumulator part as value for $2143 $80/9786 9D FA 06 STA $06FA,x[$80:06FA] A:8403 X:0000 Y:0001 P:envMXdIzC $80/9789 18 CLC ; Clear Error flag - everything's fine $80/978A 60 RTS $80/978B 38 SEC ; Set Error flag - something went wrong $80/978C 60 RTS
A contains the input.
The carry is used here as error flag. When it's set, something went wrong.
$80/978D AA TAX A:0080 X:00FE Y:0 P:eNvMXdIzc $80/978E AD 0B 07 LDA $070B [$80:070B] A:0080 X:0080 Y:0 P:eNvMXdIzc $80/9791 1A INC A A:0 X:0080 Y:0 P:envMXdIZc $80/9792 29 0F AND #$0F A:0001 X:0080 Y:0 P:envMXdIzc $80/9794 CD 0D 07 CMP $070D [$80:070D] A:0001 X:0080 Y:0 P:envMXdIzc $80/9797 F0 F2 BEQ $F2 ; [$978B] Branch to the subroutine before - Set Error Flag and exit $80/9799 8D 0B 07 STA $070B [$80:070B] A:0001 X:0080 Y:0 P:envMXdIzC $80/979C 3A DEC A A:0001 X:0080 Y:0 P:envMXdIzC $80/979D 29 0F AND #$0F A:0 X:0080 Y:0 P:envMXdIZC $80/979F A8 TAY A:0 X:0080 Y:0 P:envMXdIZC $80/97A0 8A TXA A:0 X:0080 Y:0 P:envMXdIZC $80/97A1 99 DA 06 STA $06DA,y[$80:06DA] A:0080 X:0080 Y:0 P:eNvMXdIzC $80/97A4 18 CLC ; Clear Error flag - everything's fine $80/97A5 60 RTS
A wild guess: This is used to play a sound effect
$80/97A6 08 PHP ; Buffer Flag Register value on stack $80/97A7 C2 30 REP #$30 ; A/X/Y 16-bit $80/97A9 AD 16 07 LDA $0716 [$80:0716] A:0000 X:00FF Y:0000 P:eNvmxdIzC $80/97AC F0 03 BEQ $03 [$97B1] A:0000 X:00FF Y:0000 P:envmxdIZC
code is missing here
$80/97B1 E2 20 SEP #$20 ; A = 8-bit $80/97B3 AD 19 07 LDA $0719 [$80:0719] A:0000 X:00FF Y:0000 P:envMxdIZC $80/97B6 F0 03 BEQ $03 [$97BB] A:0000 X:00FF Y:0000 P:envMxdIZC
code is missing here
$80/97BB AD 15 07 LDA $0715 [$80:0715] A:0000 X:00FF Y:0000 P:envMxdIZC $80/97BE C9 02 CMP #$02 A:0000 X:00FF Y:0000 P:envMxdIZC $80/97C0 D0 03 BNE $03 [$97C5] A:0000 X:00FF Y:0000 P:eNvMxdIzc $80/97C2 4C B0 98 JMP $98B0 ; Exit $80/97C5 AD 41 21 LDA $2141 ; Has the value in $2141 changed? $80/97C8 CD 0F 07 CMP $070F $80/97CB D0 4A BNE $4A ; [$9817] Branch if the value has changed $80/97CD AC 42 21 LDY $2142 ; Have the values in $2142/3 changed? $80/97D0 CC 10 07 CPY $0710 $80/97D3 D0 42 BNE $42 ; [$9817] Branch if the values have changed $80/97D5 AD 18 07 LDA $0718 [$80:0718] A:0000 X:00FF Y:0000 P:envMxdIZC $80/97D8 D0 08 BNE $08 [$97E2] A:0000 X:00FF Y:0000 P:envMxdIZC $80/97DA AD 0C 07 LDA $070C [$80:070C] A:0000 X:00FF Y:0000 P:envMxdIZC $80/97DD CD 0A 07 CMP $070A [$80:070A] A:0000 X:00FF Y:0000 P:envMxdIZC $80/97E0 D0 14 BNE $14 [$97F6] A:0000 X:00FF Y:0000 P:envMxdIZC $80/97E2 A0 00 00 LDY #$0000 A:0000 X:00FF Y:0000 P:envMxdIZC $80/97E5 9C 0F 07 STZ $070F [$80:070F] A:0000 X:00FF Y:0000 P:envMxdIZC $80/97E8 8C 10 07 STY $0710 [$80:0710] A:0000 X:00FF Y:0000 P:envMxdIZC $80/97EB 9C 41 21 STZ $2141 [$80:2141] A:0000 X:00FF Y:0000 P:envMxdIZC $80/97EE 8C 42 21 STY $2142 [$80:2142] A:0000 X:00FF Y:0000 P:envMxdIZC $80/97F1 9C 18 07 STZ $0718 [$80:0718] A:0000 X:00FF Y:0000 P:envMxdIZC $80/97F4 80 21 BRA $21 [$9817] A:0000 X:00FF Y:0000 P:envMxdIZC
executed when a sound effect is played
$80/97F6 E2 30 SEP #$30 A:0000 X:00FF Y:0000 P:eNvMxdIzc $80/97F8 AA TAX A:0000 X:00FF Y:0000 P:eNvMXdIzc $80/97F9 1A INC A A:0000 X:0000 Y:0000 P:envMXdIZc $80/97FA 29 0F AND #$0F A:0001 X:0000 Y:0000 P:envMXdIzc $80/97FC 8D 0C 07 STA $070C [$80:070C] A:0001 X:0000 Y:0000 P:envMXdIzc $80/97FF BD FA 06 LDA $06FA,x[$80:06FA] A:0001 X:0000 Y:0000 P:envMXdIzc $80/9802 8D 11 07 STA $0711 [$80:0711] A:0003 X:0000 Y:0000 P:envMXdIzc $80/9805 8D 43 21 STA $2143 [$80:2143] A:0003 X:0000 Y:0000 P:envMXdIzc $80/9808 BC CA 06 LDY $06CA,x[$80:06CA] A:0003 X:0000 Y:0000 P:envMXdIzc $80/980B BD EA 06 LDA $06EA,x[$80:06EA] A:0003 X:0000 Y:0001 P:envMXdIzc $80/980E 99 0E 07 STA $070E,y[$80:070F] A:0084 X:0000 Y:0001 P:eNvMXdIzc $80/9811 99 40 21 STA $2140,y[$80:2141] A:0084 X:0000 Y:0001 P:eNvMXdIzc $80/9814 EE 18 07 INC $0718 [$80:0718] A:0084 X:0000 Y:0001 P:eNvMXdIzc
if $2141 != $070F / $2142/3 != $0710/1
$80/9817 AD 40 21 LDA $2140 [$80:2140] A:0000 X:00FF Y:0000 P:envMxdIZC $80/981A CD 0E 07 CMP $070E [$80:070E] A:0000 X:00FF Y:0000 P:envMxdIZC $80/981D D0 A3 BNE $A3 ; [$97C2] Exit $80/981F AD 0D 07 LDA $070D [$80:070D] A:0000 X:00FF Y:0000 P:envMxdIZC $80/9822 CD 0B 07 CMP $070B [$80:070B] A:0000 X:00FF Y:0000 P:envMxdIZC $80/9825 F0 9B BEQ $9B ; [$97C2] Exit
executed when a sound effect is played?
$80/9827 E2 30 SEP #$30 ; A/X/Y = 8-bit $80/9829 AE 19 07 LDX $0719 [$80:0719] A:0000 X:00FF Y:0000 P:eNvMXdIzc $80/982C D0 94 BNE $94 ; [$97C2] Exit $80/982E AA TAX A:0000 X:0000 Y:0000 P:envMXdIZc $80/982F 1A INC A A:0000 X:0000 Y:0000 P:envMXdIZc $80/9830 29 0F AND #$0F A:0001 X:0000 Y:0000 P:envMXdIzc $80/9832 8D 0D 07 STA $070D [$80:070D] A:0001 X:0000 Y:0000 P:envMXdIzc $80/9835 BD DA 06 LDA $06DA,x[$80:06DA] A:0001 X:0000 Y:0000 P:envMXdIzc $80/9838 8D 0E 07 STA $070E [$80:070E] A:0080 X:0000 Y:0000 P:eNvMXdIzc $80/983B 8D 40 21 STA $2140 [$80:2140] A:0080 X:0000 Y:0000 P:eNvMXdIzc $80/983E C9 81 CMP #$81 A:0080 X:0000 Y:0000 P:eNvMXdIzc $80/9840 D0 00 BNE $00 [$9842] A:0080 X:0000 Y:0000 P:eNvMXdIzc $80/9842 C9 FD CMP #$FD A:0080 X:0000 Y:0000 P:eNvMXdIzc $80/9844 90 6A BCC $6A ; [$98B0] Exit
code is missing here
$80/98B0 28 PLP ; Restore Flag Register value $80/98B1 6B RTL
$80/995A Transfer Data to SPC
I guess this subroutine is the standard SPC Data Transfer Subroutine by Nintendo. Furthermore, since this ROM is programmed by Nintendo (I guess?), they surely will use this subroutine, too, to transfer song/sfx data. Other developers tended to write their own.
$80/995A 08 PHP ; Buffer Flag Register value on stack $80/995B C2 30 REP #$30 ; A/X/Y = 16 bit $80/995D AC 20 00 LDY $0020 [$80:0020] A:8000 X:00FF Y:0062 P:eNvmxdIzC $80/9960 9C 20 00 STZ $0020 [$80:0020] A:8000 X:00FF Y:8000 P:eNvmxdIzC $80/9963 A9 AA BB LDA #$BBAA ; Is the SPC ready? $80/9966 CD 40 21 CMP $2140 $80/9969 D0 FB BNE $FB ; [$9966] $80/996B E2 20 SEP #$20 ; Send ready signal back $80/996D A9 CC LDA #$CC $80/996F 80 2B BRA $2B ; [$999C]
$80/9971 FA PLX A:51CC X:03FA Y:8004 P:enVMxdIZC $80/9972 B7 20 LDA [$20],y[$9D:8004] A:51CC X:00F0 Y:8004 P:enVMxdIzC $80/9974 20 D5 99 JSR $99D5 ; Inc Y $80/9977 EB XBA A:5120 X:00F0 Y:8005 P:eNVMxdIzC $80/9978 A9 00 LDA #$00 A:2051 X:00F0 Y:8005 P:enVMxdIzC $80/997A 80 0D BRA $0D [$9989] A:2000 X:00F0 Y:8005 P:enVMxdIZC $80/997C EB XBA A:2000 X:00EF Y:8005 P:enVMxdIzC $80/997D B7 20 LDA [$20],y[$9D:8005] A:0020 X:00EF Y:8005 P:enVMxdIzC $80/997F 20 D5 99 JSR $99D5 [$80:99D5] A:0054 X:00EF Y:8005 P:enVMxdIzC $80/9982 EB XBA A:0054 X:00EF Y:8006 P:eNVMxdIzC $80/9983 CD 40 21 CMP $2140 [$80:2140] A:5400 X:00EF Y:8006 P:enVMxdIZC $80/9986 D0 FB BNE $FB [$9983] A:5400 X:00EF Y:8006 P:enVMxdIzc $80/9988 1A INC A A:5400 X:00EF Y:8006 P:enVMxdIZC $80/9989 C2 20 REP #$20 A:2000 X:00F0 Y:8005 P:enVMxdIZC $80/998B 8D 40 21 STA $2140 [$80:2140] A:2000 X:00F0 Y:8005 P:enVmxdIZC $80/998E E2 20 SEP #$20 A:2000 X:00F0 Y:8005 P:enVmxdIZC $80/9990 CA DEX A:2000 X:00F0 Y:8005 P:enVMxdIZC $80/9991 D0 E9 BNE $E9 [$997C] A:2000 X:00EF Y:8005 P:enVMxdIzC $80/9993 CD 40 21 CMP $2140 [$80:2140] A:E4EF X:0 Y:80F4 P:enVMxdIZC $80/9996 D0 FB BNE $FB [$9993] A:E4EF X:0 Y:80F4 P:enVMxdIzC $80/9998 69 03 ADC #$03 A:E4EF X:0 Y:80F4 P:enVMxdIZC $80/999A F0 FC BEQ $FC [$9998] A:E4F3 X:0 Y:80F4 P:eNvMxdIzc $80/999C 48 PHA A:BBCC X:00FF Y:8000 P:eNvMxdIzC $80/999D C2 20 REP #$20 ; A = 16-bit $80/999F B7 20 LDA [$20],y[$9D:8000] A:BBCC X:00FF Y:8000 P:eNvmxdIzC $80/99A1 20 D5 99 JSR $99D5 ; Inc Y $80/99A4 20 D5 99 JSR $99D5 ; Inc Y $80/99A7 AA TAX A:00F0 X:00FF Y:8002 P:eNvmxdIzC $80/99A8 B7 20 LDA [$20],y[$9D:8002] A:00F0 X:00F0 Y:8002 P:envmxdIzC $80/99AA 20 D5 99 JSR $99D5 ; Inc Y $80/99AD 20 D5 99 JSR $99D5 ; Inc Y $80/99B0 8D 42 21 STA $2142 [$80:2142] A:5100 X:00F0 Y:8004 P:eNvmxdIzC $80/99B3 E2 20 SEP #$20 A:5100 X:00F0 Y:8004 P:eNvmxdIzC $80/99B5 E0 01 00 CPX #$0001 A:5100 X:00F0 Y:8004 P:eNvMxdIzC $80/99B8 A9 00 LDA #$00 A:5100 X:00F0 Y:8004 P:envMxdIzC $80/99BA 2A ROL A A:5100 X:00F0 Y:8004 P:envMxdIZC $80/99BB 8D 41 21 STA $2141 [$80:2141] A:5101 X:00F0 Y:8004 P:envMxdIzc $80/99BE 69 7F ADC #$7F A:5101 X:00F0 Y:8004 P:envMxdIzc $80/99C0 68 PLA A:5180 X:00F0 Y:8004 P:eNVMxdIzc $80/99C1 8D 40 21 STA $2140 [$80:2140] A:51CC X:00F0 Y:8004 P:eNVMxdIzc $80/99C4 DA PHX A:51CC X:00F0 Y:8004 P:eNVMxdIzc $80/99C5 A2 00 04 LDX #$0400 A:51CC X:00F0 Y:8004 P:eNVMxdIzc $80/99C8 CA DEX A:51CC X:0400 Y:8004 P:enVMxdIzc $80/99C9 F0 07 BEQ $07 [$99D2] A:51CC X:03FF Y:8004 P:enVMxdIzc $80/99CB CD 40 21 CMP $2140 [$80:2140] A:51CC X:03FF Y:8004 P:enVMxdIzc $80/99CE D0 F8 BNE $F8 [$99C8] A:51CC X:03FF Y:8004 P:enVMxdIzC $80/99D0 70 9F BVS $9F [$9971] A:51CC X:03FA Y:8004 P:enVMxdIZC $80/99D2 FA PLX A:0403 X:03F9 Y:E280 P:envMxdIZC $80/99D3 28 PLP ; Restore Flag Register value $80/99D4 6B RTL
$80/99D5 Increment Load Index Y
This subroutine increments Y. If it turned from #$FFFF to #$0000, its value gets set to #$8000 and the bank of the 24-bit-address in $20-$22 gets incremented.
Side Note: One could save one byte of code if the branch command is a BNE that points to an RTS, but maybe they built it this way to save cycles?
$80/99D5 C8 INY ; Increment Load index $80/99D6 F0 01 BEQ $01 ; [$99D9] Branch if it turned from #$FFFF to #$0000 $80/99D8 60 RTS $80/99D9 E6 22 INC $22 ; Increment bank $80/99DB A0 00 80 LDY #$8000 ; Reset to #$8000 (first byte of the new LoROM bank) $80/99DE 60 RTS
$80/9AF0 DA PHX ; Buffer X on stack $80/9AF1 AD 1D 07 LDA $071D [$80:071D] A:0060 X:0000 Y:0000 P:envmxdizc $80/9AF4 85 89 STA $89 [$00:0089] A:9499 X:0000 Y:0000 P:eNvmxdizc $80/9AF6 AD 1C 07 LDA $071C [$80:071C] A:9499 X:0000 Y:0000 P:eNvmxdizc $80/9AF9 85 88 STA $88 [$00:0088] A:9909 X:0000 Y:0000 P:eNvmxdizc $80/9AFB 8B PHB ; Buffer Program Bank on stack $80/9AFC F4 00 7E PEA $7E00 ; Set Program Bank to $7E $80/9AFF AB PLB $80/9B00 AB PLB $80/9B01 AE 21 07 LDX $0721 [$7E:0721] A:9909 X:0000 Y:0000 P:envmxdizc $80/9B04 7C 07 9B JMP ($9B07,x)[$80:9B0F] A:9909 X:0002 Y:0000 P:envmxdizc
$80/9B07 Jump Table for $80/9AF0
0F 9B 0F 9B 1E 9B 7E 9B
The stuff where data gets transfered from $7E00 to $8200 has to do with writing the Tiles in the text boxes
$80/9B0F A2 00 00 LDX #$0000 A:9909 X:0002 Y:0000 P:envmxdizc $80/9B12 AD 1F 07 LDA $071F [$7E:071F] A:9909 X:0000 Y:0000 P:envmxdiZc $80/9B15 18 CLC A:0060 X:0000 Y:0000 P:envmxdizc $80/9B16 69 07 00 ADC #$0007 A:0060 X:0000 Y:0000 P:envmxdizc $80/9B19 4A LSR A A:0067 X:0000 Y:0000 P:envmxdizc $80/9B1A 4A LSR A A:0033 X:0000 Y:0000 P:envmxdizC $80/9B1B 4A LSR A A:0019 X:0000 Y:0000 P:envmxdizC $80/9B1C 80 0C BRA $0C [$9B2A] A:000C X:0000 Y:0000 P:envmxdizC
$80/9B2A 48 PHA A:000C X:0000 Y:0000 P:envmxdizC $80/9B2B A0 00 00 LDY #$0000 A:000C X:0000 Y:0000 P:envmxdizC $80/9B2E B7 88 LDA [$88],y[$94:9909] A:000C X:0000 Y:0000 P:envmxdiZC $80/9B30 9D 00 7E STA $7E00,x[$7E:7E00] A:FFFF X:0000 Y:0000 P:eNvmxdizC $80/9B33 9D 00 82 STA $8200,x[$7E:8200] A:FFFF X:0000 Y:0000 P:eNvmxdizC $80/9B36 C8 INY A:FFFF X:0000 Y:0000 P:eNvmxdizC $80/9B37 C8 INY A:FFFF X:0000 Y:0001 P:envmxdizC $80/9B38 9D 02 7E STA $7E02,x[$7E:7E02] A:FFFF X:0000 Y:0002 P:envmxdizC $80/9B3B 9D 02 82 STA $8202,x[$7E:8202] A:FFFF X:0000 Y:0002 P:envmxdizC $80/9B3E C8 INY A:FFFF X:0000 Y:0002 P:envmxdizC $80/9B3F C8 INY A:FFFF X:0000 Y:0003 P:envmxdizC $80/9B40 9D 04 7E STA $7E04,x[$7E:7E04] A:FFFF X:0000 Y:0004 P:envmxdizC $80/9B43 9D 04 82 STA $8204,x[$7E:8204] A:FFFF X:0000 Y:0004 P:envmxdizC $80/9B46 C8 INY A:FFFF X:0000 Y:0004 P:envmxdizC $80/9B47 C8 INY A:FFFF X:0000 Y:0005 P:envmxdizC $80/9B48 9D 06 7E STA $7E06,x[$7E:7E06] A:FFFF X:0000 Y:0006 P:envmxdizC $80/9B4B 9D 06 82 STA $8206,x[$7E:8206] A:FFFF X:0000 Y:0006 P:envmxdizC $80/9B4E C8 INY A:FFFF X:0000 Y:0006 P:envmxdizC $80/9B4F C8 INY A:FFFF X:0000 Y:0007 P:envmxdizC $80/9B50 9D 08 7E STA $7E08,x[$7E:7E08] A:FFFF X:0000 Y:0008 P:envmxdizC $80/9B53 9D 08 82 STA $8208,x[$7E:8208] A:FFFF X:0000 Y:0008 P:envmxdizC $80/9B56 C8 INY A:FFFF X:0000 Y:0008 P:envmxdizC $80/9B57 C8 INY A:FFFF X:0000 Y:0009 P:envmxdizC $80/9B58 9D 0A 7E STA $7E0A,x[$7E:7E0A] A:FFFF X:0000 Y:000A P:envmxdizC $80/9B5B 9D 0A 82 STA $820A,x[$7E:820A] A:FFFF X:0000 Y:000A P:envmxdizC $80/9B5E C8 INY A:FFFF X:0000 Y:000A P:envmxdizC $80/9B5F C8 INY A:FFFF X:0000 Y:000B P:envmxdizC $80/9B60 9D 0C 7E STA $7E0C,x[$7E:7E0C] A:FFFF X:0000 Y:000C P:envmxdizC $80/9B63 9D 0C 82 STA $820C,x[$7E:820C] A:FFFF X:0000 Y:000C P:envmxdizC $80/9B66 C8 INY A:FFFF X:0000 Y:000C P:envmxdizC $80/9B67 C8 INY A:FFFF X:0000 Y:000D P:envmxdizC $80/9B68 9D 0E 7E STA $7E0E,x[$7E:7E0E] A:FFFF X:0000 Y:000E P:envmxdizC $80/9B6B 9D 0E 82 STA $820E,x[$7E:820E] A:FFFF X:0000 Y:000E P:envmxdizC $80/9B6E 8A TXA A:FFFF X:0000 Y:000E P:envmxdizC $80/9B6F 18 CLC A:0000 X:0000 Y:000E P:envmxdiZC $80/9B70 69 10 00 ADC #$0010 A:0000 X:0000 Y:000E P:envmxdiZc $80/9B73 AA TAX A:0010 X:0000 Y:000E P:envmxdizc $80/9B74 68 PLA A:0010 X:0010 Y:000E P:envmxdizc $80/9B75 3A DEC A A:000C X:0010 Y:000E P:envmxdizc $80/9B76 D0 B2 BNE $B2 [$9B2A] A:000B X:0010 Y:000E P:envmxdizc $80/9B78 AB PLB A:0000 X:00C0 Y:000E P:envmxdiZc $80/9B79 FA PLX A:0000 X:00C0 Y:000E P:eNvmxdizc $80/9B7A 9C 35 07 STZ $0735 [$80:0735] A:0000 X:0000 Y:000E P:envmxdiZc $80/9B7D 6B RTL A:0000 X:0000 Y:000E P:envmxdiZc
$80/9C23 Store A into $7E/7600 to $7E/7DFF
$80/9C23 08 PHP ; Buffer Flag Register value and Data Bank on stack $80/9C24 8B PHB $80/9C25 F4 00 7E PEA $7E00 ; Set Data Bank to $7E $80/9C28 AB PLB $80/9C29 AB PLB $80/9C2A C2 30 REP #$30 ; A/X/Y = 16-bit $80/9C2C A2 FE 00 LDX #$00FE ; Loop $80/9C2F 9D 00 76 STA $7600,x $80/9C32 9D 00 77 STA $7700,x $80/9C35 9D 00 78 STA $7800,x $80/9C38 9D 00 79 STA $7900,x $80/9C3B 9D 00 7A STA $7A00,x $80/9C3E 9D 00 7B STA $7B00,x $80/9C41 9D 00 7C STA $7C00,x $80/9C44 9D 00 7D STA $7D00,x $80/9C47 CA DEX $80/9C48 CA DEX $80/9C49 10 E4 BPL $E4 ; [$9C2F] $80/9C4B AB PLB ; Restore Flag Register value and Data Bank $80/9C4C 28 PLP $80/9C4D 6B RTL
$80/9C4E TEXTBOX: Transfer Textbox Tiles from buffer to VRAM
Transfers #$800 byte from $7E/7600 to VRAM
$80/9C4E AD 42 07 LDA $0742 ; Is flag set for VRAM DMA? $80/9C51 F0 2E BEQ $2E ; [$9C81] Exit if not $80/9C53 E2 10 SEP #$10 ; X/Y = 8-bit $80/9C55 A9 01 18 LDA #$1801 ; 16-bit transfer to $2118 (VRAM) $80/9C58 8D 00 43 STA $4300 $80/9C5B A9 00 76 LDA #$7600 ; Source: $7E/7600 $80/9C5E 8D 02 43 STA $4302 $80/9C61 A2 7E LDX #$7E $80/9C63 8E 04 43 STX $4304 $80/9C66 A9 00 08 LDA #$0800 ; Transfer #$800 byte $80/9C69 8D 05 43 STA $4305 $80/9C6C A2 80 LDX #$80 ; 16-bit transfer $80/9C6E 8E 15 21 STX $2115 $80/9C71 AD 29 07 LDA $0729 ; Set VRAM destination $80/9C74 8D 16 21 STA $2116 $80/9C77 A2 01 LDX #$01 ; Activate DMA $80/9C79 8E 0B 42 STX $420B $80/9C7C 9C 42 07 STZ $0742 ; Remove flag for VRAM DMA $80/9C7F C2 10 REP #$10 ; X/Y = 16-bit $80/9C81 6B RTL
$80/9C89 ? (Executed when talking to the aerial building and at ROM start)
I presume this subroutine is textbox related. When I forced it to give out error flags, Satebo's text box at the start stayed empty.
This subroutine uses the Carry as an Error flag (i. e. it sets the Carry at the end if an error occurs or clears the Carry if everything worked just as planned).
NOTE (to self): The first double-byte of the Data below is the Lower Border value and the second double-byte as the Upper Border value. If A is
$80/9C89 8B PHB ; Buffer Program Bank on Stack $80/9C8A 4B PHK ; Set Program Bank to $80 $80/9C8B AB PLB $80/9C8C C9 FF FF CMP #$FFFF A:95FA X:0004 Y:000E P:eNvmxdizC $80/9C8F F0 43 BEQ $43 [$9CD4] A:95FA X:0004 Y:000E P:eNvmxdizc $80/9C91 A2 00 00 LDX #$0000 A:95FA X:0004 Y:000E P:eNvmxdizc $80/9C94 DD D7 9C CMP $9CD7,x[$80:9CD7] A:95FA X:0000 Y:000E P:envmxdiZc $80/9C97 90 3B BCC $3B [$9CD4] A:95FA X:0000 Y:000E P:envmxdizC $80/9C99 DD D9 9C CMP $9CD9,x[$80:9CD9] A:95FA X:0000 Y:000E P:envmxdizC $80/9C9C 90 0A BCC $0A [$9CA8] A:95FA X:0000 Y:000E P:envmxdizC $80/9C9E E8 INX A:95FA X:0000 Y:000E P:envmxdizC $80/9C9F E8 INX A:95FA X:0001 Y:000E P:envmxdizC $80/9CA0 E8 INX A:95FA X:0002 Y:000E P:envmxdizC $80/9CA1 E8 INX A:95FA X:0003 Y:000E P:envmxdizC $80/9CA2 E8 INX A:95FA X:0004 Y:000E P:envmxdizC $80/9CA3 E8 INX A:95FA X:0005 Y:000E P:envmxdizC $80/9CA4 E8 INX A:95FA X:0006 Y:000E P:envmxdizC $80/9CA5 E8 INX A:95FA X:0007 Y:000E P:envmxdizC $80/9CA6 80 EC BRA $EC [$9C94] A:95FA X:0008 Y:000E P:envmxdizC $80/9CA8 48 PHA A:95FA X:0038 Y:000E P:eNvmxdizc $80/9CA9 BD DC 9C LDA $9CDC,x[$80:9D14] A:95FA X:0038 Y:000E P:eNvmxdizc $80/9CAC 85 8C STA $8C [$00:008C] A:8B80 X:0038 Y:000E P:eNvmxdizc $80/9CAE 68 PLA A:8B80 X:0038 Y:000E P:eNvmxdizc $80/9CAF 38 SEC A:95FA X:0038 Y:000E P:eNvmxdizc $80/9CB0 FD D7 9C SBC $9CD7,x[$80:9D0F] A:95FA X:0038 Y:000E P:eNvmxdizC $80/9CB3 0A ASL A A:0549 X:0038 Y:000E P:envmxdizC $80/9CB4 0A ASL A A:0A92 X:0038 Y:000E P:envmxdizc $80/9CB5 0A ASL A A:1524 X:0038 Y:000E P:envmxdizc $80/9CB6 48 PHA A:2A48 X:0038 Y:000E P:envmxdizc $80/9CB7 0A ASL A A:2A48 X:0038 Y:000E P:envmxdizc $80/9CB8 18 CLC A:5490 X:0038 Y:000E P:envmxdizc $80/9CB9 63 01 ADC $01,s [$00:1E8B] A:5490 X:0038 Y:000E P:envmxdizc $80/9CBB 18 CLC A:7ED8 X:0038 Y:000E P:envmxdizc $80/9CBC 7D DB 9C ADC $9CDB,x[$80:9D13] A:7ED8 X:0038 Y:000E P:envmxdizc $80/9CBF 85 8B STA $8B [$00:008B] A:FED8 X:0038 Y:000E P:eNvmxdizc $80/9CC1 68 PLA A:FED8 X:0038 Y:000E P:eNvmxdizc $80/9CC2 BD DE 9C LDA $9CDE,x[$80:9D16] A:2A48 X:0038 Y:000E P:envmxdizc $80/9CC5 29 FF 00 AND #$00FF A:060C X:0038 Y:000E P:envmxdizc $80/9CC8 8D 39 07 STA $0739 [$80:0739] A:000C X:0038 Y:000E P:envmxdizc $80/9CCB A9 18 00 LDA #$0018 A:000C X:0038 Y:000E P:envmxdizc $80/9CCE 8D 3B 07 STA $073B [$80:073B] A:0018 X:0038 Y:000E P:envmxdizc $80/9CD1 AB PLB ; Restore Program Bank $80/9CD2 18 CLC ; Clear Error Flag $80/9CD3 6B RTL $80/9CD4 28 PLP ; UNNECESSARY LINE - This should be a "PLB", not a PLB $80/9CD5 38 SEC ; Set Error Flag $80/9CD6 6B RTL
$80/9CD7 Data for $80/9C89
$80/9CD7 40 81 AD 81 00 80 89 0C $80/9CDF 4F 82 F2 82 38 8A 89 0C $80/9CE7 40 83 D7 83 80 99 89 0C $80/9CEF 40 84 92 84 A8 A7 89 0C $80/9CF7 3F 85 DE 85 58 AF 89 06 $80/9DFF 9F 88 5C 8B 40 BE 89 0C $80/9D07 5C 8B B1 90 00 80 8A 0C $80/9D0F B1 90 06 96 00 80 8B 0C $80/9D17 06 96 74 98 00 80 8C 0C $80/9D1F 9F 98 86 9B 50 BA 8C 0C $80/9D27 86 9B FD 9F 00 80 8D 0C $80/9D2F 40 E0 1E E1 28 EB 8D 0C $80/9D37 1E E1 73 E6 00 80 8E 0C $80/9D3F 73 E6 A3 EA 00 80 8F 0C $80/9D47 FF FF
$80/9D49 ? (Executed when talking to the aerial building)
$80/9D49 B7 8B LDA [$8B],y[$8B:FED8] A:7E00 X:7E32 Y:0000 P:envmxdiZc $80/9D4B EB XBA A:0000 X:7E32 Y:0000 P:envmxdiZc $80/9D4C 85 8E STA $8E [$00:008E] A:0000 X:7E32 Y:0000 P:envmxdiZc $80/9D4E AF 25 07 00 LDA $000725[$00:0725] A:0000 X:7E32 Y:0000 P:envmxdiZc $80/9D52 85 90 STA $90 [$00:0090] A:0000 X:7E32 Y:0000 P:envmxdiZc $80/9D54 89 02 00 BIT #$0002 A:0000 X:7E32 Y:0000 P:envmxdiZc $80/9D57 F0 07 BEQ $07 [$9D60] A:0000 X:7E32 Y:0000 P:envmxdiZc
code is missing here
$80/9D60 A5 90 LDA $90 [$00:0090] A:0000 X:7E32 Y:0000 P:envmxdiZc $80/9D62 89 01 00 BIT #$0001 A:0000 X:7E32 Y:0000 P:envmxdiZc $80/9D65 F0 10 BEQ $10 [$9D77] A:0000 X:7E32 Y:0000 P:envmxdiZc
code is missing here
$80/9D77 A5 90 LDA $90 [$00:0090] A:0000 X:7E32 Y:0000 P:envmxdiZc $80/9D79 89 04 00 BIT #$0004 A:0000 X:7E32 Y:0000 P:envmxdiZc $80/9D7C F0 17 BEQ $17 [$9D95] A:0000 X:7E32 Y:0000 P:envmxdiZc
code is missing here
$80/9D95 A5 8E LDA $8E [$00:008E] A:0000 X:7E32 Y:0000 P:envmxdiZc $80/9D97 60 RTS A:0000 X:7E32 Y:0000 P:envmxdiZc
$80/9DDA ? (setup jump address in $88) (Executed when talking to the aerial building)
$80/9DDA AE 21 07 LDX $0721 [$80:0721] A:002A X:0038 Y:000E P:eNvmxdizc $80/9DDD BF 0B 9F 80 LDA $809F0B,x[$80:9F0D] A:002A X:0002 Y:000E P:envmxdizc $80/9DE1 18 CLC A:0000 X:0002 Y:000E P:envmxdiZc $80/9DE2 6D 23 07 ADC $0723 [$80:0723] A:0000 X:0002 Y:000E P:envmxdiZc $80/9DE5 0A ASL A A:0001 X:0002 Y:000E P:envmxdizc $80/9DE6 AA TAX A:0002 X:0002 Y:000E P:envmxdizc $80/9DE7 BF 13 9F 80 LDA $809F13,x[$80:9F15] A:0002 X:0002 Y:000E P:envmxdizc $80/9DEB 85 88 STA $88 [$00:0088] A:9E2F X:0002 Y:000E P:eNvmxdizc $80/9DED 60 RTS A:9E2F X:0002 Y:000E P:eNvmxdizc
$80/9E2F ? (bit stuff) (Executed when talking to the aerial building)
$80/9F1F jumps here
This subroutine transforms bits of values. You put three values in $8F-91. After that, you set an address RAM address in X. You put the "masks" for these values in X, X+#$01, X+#$10, X+#$11, X+#$20 and X+#$21.
The values get transformed and stored into the X-addresses. To make it short, this subroutine does this:
$0000,x = $8F OR $0000,x $0001,x = $8F NOR $0001,x $0010,x = $90 OR $0010,x $0011,x = $90 NOR $0011,x $0020,x = $91 OR $0020,x $0021,x = $91 NOR $0021,x
$80/9E2F E2 20 SEP #$20 A:0108 X:7E34 Y:0020 P:envmxdiZC $80/9E31 A5 91 LDA $91 [$00:0091] A:0108 X:7E34 Y:0020 P:envMxdiZC $80/9E33 F0 10 BEQ $10 [$9E45] A:0101 X:7E34 Y:0020 P:envMxdizC $80/9E35 1D 00 00 ORA $0000,x[$7E:7E34] A:0101 X:7E34 Y:0020 P:envMxdizC $80/9E38 9D 00 00 STA $0000,x[$7E:7E34] A:01FF X:7E34 Y:0020 P:eNvMxdizC $80/9E3B A5 91 LDA $91 [$00:0091] A:01FF X:7E34 Y:0020 P:eNvMxdizC $80/9E3D 49 FF EOR #$FF A:0101 X:7E34 Y:0020 P:envMxdizC $80/9E3F 3D 01 00 AND $0001,x[$7E:7E35] A:01FE X:7E34 Y:0020 P:eNvMxdizC $80/9E42 9D 01 00 STA $0001,x[$7E:7E35] A:01FE X:7E34 Y:0020 P:eNvMxdizC $80/9E45 A5 90 LDA $90 [$00:0090] A:01FE X:7E34 Y:0020 P:eNvMxdizC $80/9E47 F0 10 BEQ $10 [$9E59] A:0108 X:7E34 Y:0020 P:envMxdizC $80/9E49 1D 10 00 ORA $0010,x[$7E:7E44] A:0108 X:7E34 Y:0020 P:envMxdizC $80/9E4C 9D 10 00 STA $0010,x[$7E:7E44] A:01FF X:7E34 Y:0020 P:eNvMxdizC $80/9E4F A5 90 LDA $90 [$00:0090] A:01FF X:7E34 Y:0020 P:eNvMxdizC $80/9E51 49 FF EOR #$FF A:0108 X:7E34 Y:0020 P:envMxdizC $80/9E53 3D 11 00 AND $0011,x[$7E:7E45] A:01F7 X:7E34 Y:0020 P:eNvMxdizC $80/9E56 9D 11 00 STA $0011,x[$7E:7E45] A:01F7 X:7E34 Y:0020 P:eNvMxdizC $80/9E59 A5 8F LDA $8F [$00:008F] A:01F7 X:7E34 Y:0020 P:eNvMxdizC $80/9E5B F0 10 BEQ $10 [$9E6D] A:0100 X:7E34 Y:0020 P:envMxdiZC $80/9E5D 1D 20 00 ORA $0020,x[$7E:7E58] A:0380 X:7E38 Y:0020 P:eNvMxdizC $80/9E60 9D 20 00 STA $0020,x[$7E:7E58] A:03FF X:7E38 Y:0020 P:eNvMxdizC $80/9E63 A5 8F LDA $8F [$00:008F] A:03FF X:7E38 Y:0020 P:eNvMxdizC $80/9E65 49 FF EOR #$FF A:0380 X:7E38 Y:0020 P:eNvMxdizC $80/9E67 3D 21 00 AND $0021,x[$7E:7E59] A:037F X:7E38 Y:0020 P:envMxdizC $80/9E6A 9D 21 00 STA $0021,x[$7E:7E59] A:037F X:7E38 Y:0020 P:envMxdizC $80/9E6D C2 20 REP #$20 A:0100 X:7E34 Y:0020 P:envMxdiZC $80/9E6F 60 RTS A:0100 X:7E34 Y:0020 P:envmxdiZC
$80/9E70 ? (Executed at startup)
$80/9F1F jumps here
$80/9E70 E2 20 SEP #$20 A:F000 X:7E06 Y:0 P:envmxdiZc $80/9E72 A5 91 LDA $91 [$00:0091] A:F000 X:7E06 Y:0 P:envMxdiZc $80/9E74 F0 10 BEQ $10 [$9E86] A:F0F0 X:7E06 Y:0 P:eNvMxdizc $80/9E76 49 FF EOR #$FF A:F0F0 X:7E06 Y:0 P:eNvMxdizc $80/9E78 3D 00 00 AND $0000,x[$7E:7E06] A:F00F X:7E06 Y:0 P:envMxdizc $80/9E7B 9D 00 00 STA $0000,x[$7E:7E06] A:F00F X:7E06 Y:0 P:envMxdizc $80/9E7E A5 91 LDA $91 [$00:0091] A:F00F X:7E06 Y:0 P:envMxdizc $80/9E80 1D 01 00 ORA $0001,x[$7E:7E07] A:F0F0 X:7E06 Y:0 P:eNvMxdizc $80/9E83 9D 01 00 STA $0001,x[$7E:7E07] A:F0FF X:7E06 Y:0 P:eNvMxdizc $80/9E86 A5 90 LDA $90 [$00:0090] A:F0FF X:7E06 Y:0 P:eNvMxdizc $80/9E88 F0 10 BEQ $10 [$9E9A] A:F000 X:7E06 Y:0 P:envMxdiZc $80/9E8A 49 FF EOR #$FF A:0080 X:7E06 Y:0020 P:eNvMxdizC $80/9E8C 3D 10 00 AND $0010,x[$7E:7E16] A:007F X:7E06 Y:0020 P:envMxdizC $80/9E8F 9D 10 00 STA $0010,x[$7E:7E16] A:007F X:7E06 Y:0020 P:envMxdizC $80/9E92 A5 90 LDA $90 [$00:0090] A:007F X:7E06 Y:0020 P:envMxdizC $80/9E94 1D 11 00 ORA $0011,x[$7E:7E17] A:0080 X:7E06 Y:0020 P:eNvMxdizC $80/9E97 9D 11 00 STA $0011,x[$7E:7E17] A:00FF X:7E06 Y:0020 P:eNvMxdizC $80/9E9A A5 8F LDA $8F [$00:008F] A:F000 X:7E06 Y:0 P:envMxdiZc $80/9E9C F0 10 BEQ $10 [$9EAE] A:F000 X:7E06 Y:0 P:envMxdiZc
code is missing here
$80/9EAE C2 20 REP #$20 A:F000 X:7E06 Y:0 P:envMxdiZc $80/9EB0 60 RTS A:F000 X:7E06 Y:0 P:envmxdiZc
$80/9EB1 ? (Executed at startup)
$80/9F1F jumps here
$80/9EB1 E2 20 SEP #$20 A:2100 X:7E06 Y:0 P:envmxdiZc $80/9EB3 A5 91 LDA $91 [$00:0091] A:2100 X:7E06 Y:0 P:envMxdiZc $80/9EB5 F0 0D BEQ $0D [$9EC4] A:2121 X:7E06 Y:0 P:envMxdizc $80/9EB7 EB XBA A:2121 X:7E06 Y:0 P:envMxdizc $80/9EB8 A5 91 LDA $91 [$00:0091] A:2121 X:7E06 Y:0 P:envMxdizc $80/9EBA C2 20 REP #$20 ; A = 16-bit $80/9EBC 1D 00 00 ORA $0000,x[$7E:7E06] A:2121 X:7E06 Y:0 P:envmxdizc $80/9EBF 9D 00 00 STA $0000,x[$7E:7E06] A:21FF X:7E06 Y:0 P:envmxdizc $80/9EC2 E2 20 SEP #$20 ; A = 8-bit $80/9EC4 A5 90 LDA $90 [$00:0090] A:21FF X:7E06 Y:0 P:envMxdizc $80/9EC6 F0 0D BEQ $0D [$9ED5] A:2100 X:7E06 Y:0 P:envMxdiZc $80/9EC8 EB XBA A:4FC0 X:7E0A Y:0 P:eNvMxdizc $80/9EC9 A5 90 LDA $90 [$00:0090] A:C04F X:7E0A Y:0 P:envMxdizc $80/9ECB C2 20 REP #$20 A:C0C0 X:7E0A Y:0 P:eNvMxdizc $80/9ECD 1D 10 00 ORA $0010,x[$7E:7E1A] A:C0C0 X:7E0A Y:0 P:eNvmxdizc $80/9ED0 9D 10 00 STA $0010,x[$7E:7E1A] A:C0FF X:7E0A Y:0 P:eNvmxdizc $80/9ED3 E2 20 SEP #$20 A:C0FF X:7E0A Y:0 P:eNvmxdizc $80/9ED5 A5 8F LDA $8F [$00:008F] A:2100 X:7E06 Y:0 P:envMxdiZc $80/9ED7 F0 0C BEQ $0C [$9EE5] A:2100 X:7E06 Y:0 P:envMxdiZc
code is missing here
$80/9EE5 C2 20 REP #$20 ; A = 16-bit $80/9EE7 60 RTS
$80/9F0B ?
These are pointers for the table at $80/9F13 which contains jump addresses that are set up in $88 at $80/9DDA.
$80/9F0B 00 00 ; Entry #$00 $80/9F0D 00 00 ; Entry #$01 $80/9F0F 04 00 ; Entry #$02 $80/9F11 00 00 ; Entry #$03
$80/9F13 ?
These are addresses that are set up in $88 at $80/9DDA. Pointers for this table are at $80/9F0B
$80/9F13 EE 9D ; Entry #$00 - $9DEE $80/9F15 2F 9E ; Entry #$01 - $9E2F $80/9F17 70 9E ; Entry #$02 - $9E70 $80/9F19 B1 9E ; Entry #$03 - $9EB1 $80/9F1B E8 9E ; Entry #$04 - $9EE8 $80/9F1D E8 9E ; Entry #$05 - $9EE8
$80/9F1F ? (Executed when talking to the aerial building and at startup)
$80/9F1F A4 92 LDY $92 [$00:0092] A:4200 X:7E34 Y:0002 P:envmxdizc $80/9F21 84 8E STY $8E [$00:008E] A:4200 X:7E34 Y:0020 P:envmxdizc $80/9F23 F0 05 BEQ $05 [$9F2A] A:4200 X:7E34 Y:0020 P:envmxdizc $80/9F25 4A LSR A A:4200 X:7E34 Y:0020 P:envmxdizc $80/9F26 66 8E ROR $8E [$00:008E] A:2100 X:7E34 Y:0020 P:envmxdizc $80/9F28 90 FB BCC $FB [$9F25] A:2100 X:7E34 Y:0020 P:envmxdizc $80/9F2A 85 90 STA $90 [$00:0090] A:0108 X:7E34 Y:0020 P:envmxdiZC $80/9F2C 6C 88 00 JMP ($0088)[$80:9E2F] A:0108 X:7E34 Y:0020 P:envmxdiZC
$80/9F2F ? (Executed at startup)
$80/9F2F F4 00 00 PEA $0000 A:0002 X:002E Y:000E P:envmxdizc $80/9F32 48 PHA A:0002 X:002E Y:000E P:envmxdizc $80/9F33 A3 03 LDA $03,s [$00:1E93] A:0002 X:002E Y:000E P:envmxdizc $80/9F35 0A ASL A A:0 X:002E Y:000E P:envmxdiZc $80/9F36 83 03 STA $03,s [$00:1E93] A:0 X:002E Y:000E P:envmxdiZc $80/9F38 0A ASL A A:0 X:002E Y:000E P:envmxdiZc $80/9F39 0A ASL A A:0 X:002E Y:000E P:envmxdiZc $80/9F3A 18 CLC A:0 X:002E Y:000E P:envmxdiZc $80/9F3B 63 03 ADC $03,s [$00:1E93] A:0 X:002E Y:000E P:envmxdiZc $80/9F3D 83 03 STA $03,s [$00:1E93] A:0 X:002E Y:000E P:envmxdiZc $80/9F3F A7 85 LDA [$85] [$94:A7CF] A:0 X:002E Y:000E P:envmxdiZc $80/9F41 29 FF 00 AND #$00FF A:3130 X:002E Y:000E P:envmxdizc $80/9F44 38 SEC A:0030 X:002E Y:000E P:envmxdizc $80/9F45 E9 30 00 SBC #$0030 A:0030 X:002E Y:000E P:envmxdizC $80/9F48 18 CLC A:0 X:002E Y:000E P:envmxdiZC $80/9F49 63 03 ADC $03,s [$00:1E93] A:0 X:002E Y:000E P:envmxdiZc $80/9F4B 83 03 STA $03,s [$00:1E93] A:0 X:002E Y:000E P:envmxdiZc $80/9F4D E6 85 INC $85 [$00:0085] A:0 X:002E Y:000E P:envmxdiZc $80/9F4F 68 PLA A:0 X:002E Y:000E P:eNvmxdizc $80/9F50 3A DEC A A:0002 X:002E Y:000E P:envmxdizc $80/9F51 D0 DF BNE $DF [$9F32] A:0001 X:002E Y:000E P:envmxdizc $80/9F53 68 PLA A:0 X:002E Y:000E P:envmxdiZc $80/9F54 60 RTS A:0001 X:002E Y:000E P:envmxdizc
$80/9F55 ? (Executed when talking to the aerial building)
$80/9F55 08 PHP A:00B0 X:0002 Y:000E P:envmxdizC $80/9F56 C2 30 REP #$30 A:00B0 X:0002 Y:000E P:envmxdizC $80/9F58 A7 85 LDA [$85] [$88:A1E1] A:00B0 X:0002 Y:000E P:envmxdizC $80/9F5A 29 FF 00 AND #$00FF A:4081 X:0002 Y:000E P:envmxdizC $80/9F5D AA TAX A:0081 X:0002 Y:000E P:envmxdizC $80/9F5E BF FD A2 80 LDA $80A2FD,x[$80:A37E] A:0081 X:0081 Y:000E P:envmxdizC $80/9F62 29 FF 00 AND #$00FF A:0202 X:0081 Y:000E P:envmxdizC $80/9F65 0A ASL A A:0002 X:0081 Y:000E P:envmxdizC $80/9F66 AA TAX A:0004 X:0081 Y:000E P:envmxdizc $80/9F67 7C 6A 9F JMP ($9F6A,x)[$80:9FE5] A:0004 X:0004 Y:000E P:envmxdizc
$80/9F6A Jump Table for $80/9F55
F8 A2 85 9F E5 9F 41 A0 17 A2 84 A0 B6 A1 7A 9F 82 9A 02
$80/9F7D ? (Executed when talking to the aerial building and at startup)
At startup the BEQ-branch is not taken, while talking with the aerial building, it is.
$80/9F7D AD 3D 07 LDA $073D [$80:073D] A:002A X:823A Y:0018 P:eNvmxdizc $80/9F80 F0 D6 BEQ $D6 [$9F58] A:0000 X:823A Y:0018 P:envmxdiZc $80/9F82 82 B3 02 BRL $02B3 [$A238] A:0002 X:820A Y:0018 P:envmxdizc
$80/9F85 ? (Executed when talking to the aerial building and at startup)
$80/9F85 AD 44 07 LDA $0744 [$80:0744] A:0002 X:0002 Y:000E P:envmxdizc $80/9F88 89 01 00 BIT #$0001 A:0000 X:0002 Y:000E P:envmxdiZc $80/9F8B F0 12 BEQ $12 [$9F9F] A:0000 X:0002 Y:000E P:envmxdiZc
code is missing here
$80/9F9F A7 85 LDA [$85] [$88:A1E5] A:0000 X:0002 Y:000E P:envmxdiZc $80/9FA1 29 FF 00 AND #$00FF A:9520 X:0002 Y:000E P:eNvmxdizc $80/9FA4 C9 20 00 CMP #$0020 A:0020 X:0002 Y:000E P:envmxdizc $80/9FA7 F0 23 BEQ $23 [$9FCC] A:0020 X:0002 Y:000E P:envmxdiZC $80/9FA9 18 CLC A:002F X:0002 Y:0018 P:envmxdizC $80/9FAA 69 1F 85 ADC #$851F A:002F X:0002 Y:0018 P:envmxdizc $80/9FAD 22 89 9C 80 JSL $809C89[$80:9C89] A:854E X:0002 Y:0018 P:eNvmxdizc $80/9FB1 B0 17 BCS $17 [$9FCA] A:0018 X:0020 Y:0018 P:eNvmxdizc $80/9FB3 AD 35 07 LDA $0735 [$80:0735] A:0018 X:0020 Y:0018 P:eNvmxdizc $80/9FB6 18 CLC A:000C X:0020 Y:0018 P:envmxdizc $80/9FB7 6D 39 07 ADC $0739 [$80:0739] A:000C X:0020 Y:0018 P:envmxdizc $80/9FBA CD 1F 07 CMP $071F [$80:071F] A:0012 X:0020 Y:0018 P:envmxdizc $80/9FBD F0 05 BEQ $05 [$9FC4] A:0012 X:0020 Y:0018 P:eNvmxdizc $80/9FBF 90 03 BCC $03 [$9FC4] A:0012 X:0020 Y:0018 P:eNvmxdizc $80/9FC4 22 83 A7 80 JSL $80A783[$80:A783] A:0012 X:0020 Y:0018 P:eNvmxdizc $80/9FC8 E6 85 INC $85 [$00:0085] A:0012 X:821A Y:0018 P:eNvmxdizc $80/9FCA 80 B1 BRA $B1 [$9F7D] A:0012 X:821A Y:0018 P:eNvmxdizc $80/9FCC AD 35 07 LDA $0735 [$80:0735] A:0020 X:0002 Y:000E P:envmxdiZC $80/9FCF 18 CLC A:0018 X:0002 Y:000E P:envmxdizC $80/9FD0 69 06 00 ADC #$0006 A:0018 X:0002 Y:000E P:envmxdizc $80/9FD3 CD 1F 07 CMP $071F [$80:071F] A:001E X:0002 Y:000E P:envmxdizc $80/9FD6 F0 05 BEQ $05 [$9FDD] A:001E X:0002 Y:000E P:eNvmxdizc $80/9FD8 90 03 BCC $03 [$9FDD] A:001E X:0002 Y:000E P:eNvmxdizc $80/9FDD 8D 35 07 STA $0735 [$80:0735] A:001E X:0002 Y:000E P:eNvmxdizc $80/9FE0 E6 85 INC $85 [$00:0085] A:001E X:0002 Y:000E P:eNvmxdizc $80/9FE2 82 73 FF BRL $FF73 [$9F58] A:001E X:0002 Y:000E P:eNvmxdizc
$80/9FE5 ? (Executed when talking to the aerial building)
$80/9FE5 AD 44 07 LDA $0744 [$80:0744] A:0004 X:0004 Y:000E P:envmxdizc $80/9FE8 89 01 00 BIT #$0001 A:0000 X:0004 Y:000E P:envmxdiZc $80/9FEB F0 0F BEQ $0F [$9FFC] A:0000 X:0004 Y:000E P:envmxdiZc $80/9FED AD 35 07 LDA $0735 [$80:0735] A:0001 X:0004 Y:000E P:envmxdizc $80/9FF0 18 CLC A:0 X:0004 Y:000E P:envmxdiZc $80/9FF1 69 0F 00 ADC #$000F A:0 X:0004 Y:000E P:envmxdiZc $80/9FF4 29 F0 FF AND #$FFF0 A:000F X:0004 Y:000E P:envmxdizc $80/9FF7 1A INC A A:0 X:0004 Y:000E P:envmxdiZc $80/9FF8 1A INC A A:0001 X:0004 Y:000E P:envmxdizc $80/9FF9 8D 35 07 STA $0735 [$80:0735] A:0002 X:0004 Y:000E P:envmxdizc $80/9FFC A7 85 LDA [$85] [$88:A1E1] A:0000 X:0004 Y:000E P:envmxdiZc $80/9FFE EB XBA A:4081 X:0004 Y:000E P:envmxdizc $80/9FFF C9 40 81 CMP #$8140 A:8140 X:0004 Y:000E P:envmxdizc $80/A002 F0 22 BEQ $22 [$A026] A:8140 X:0004 Y:000E P:envmxdiZC $80/A004 22 89 9C 80 JSL $809C89[$80:9C89] A:95FA X:0004 Y:000E P:envmxdizC $80/A008 B0 19 BCS $19 ; [$A023] Branch=Exit=Loop if Error Flag is set $80/A00A AD 35 07 LDA $0735 [$80:0735] A:0018 X:0038 Y:000E P:eNvmxdizc $80/A00D 18 CLC A:001E X:0038 Y:000E P:envmxdizc $80/A00E 6D 39 07 ADC $0739 [$80:0739] A:001E X:0038 Y:000E P:envmxdizc $80/A011 CD 1F 07 CMP $071F [$80:071F] A:002A X:0038 Y:000E P:envmxdizc $80/A014 F0 05 BEQ $05 [$A01B] A:002A X:0038 Y:000E P:eNvmxdizc $80/A016 90 03 BCC $03 [$A01B] A:002A X:0038 Y:000E P:eNvmxdizc $80/A01B 22 83 A7 80 JSL $80A783[$80:A783] A:002A X:0038 Y:000E P:eNvmxdizc $80/A01F E6 85 INC $85 [$00:0085] A:002A X:823A Y:0018 P:eNvmxdizc $80/A021 E6 85 INC $85 [$00:0085] A:002A X:823A Y:0018 P:eNvmxdizc $80/A023 82 57 FF BRL $FF57 [$9F7D] A:002A X:823A Y:0018 P:eNvmxdizc
$80/A026 AD 35 07 LDA $0735 [$80:0735] A:8140 X:0004 Y:000E P:envmxdiZC $80/A029 18 CLC A:0000 X:0004 Y:000E P:envmxdiZC $80/A02A 69 0C 00 ADC #$000C A:0000 X:0004 Y:000E P:envmxdiZc $80/A02D CD 1F 07 CMP $071F [$80:071F] A:000C X:0004 Y:000E P:envmxdizc $80/A030 F0 05 BEQ $05 [$A037] A:000C X:0004 Y:000E P:eNvmxdizc $80/A032 90 03 BCC $03 [$A037] A:000C X:0004 Y:000E P:eNvmxdizc $80/A037 8D 35 07 STA $0735 [$80:0735] A:000C X:0004 Y:000E P:eNvmxdizc $80/A03A E6 85 INC $85 [$00:0085] A:000C X:0004 Y:000E P:eNvmxdizc $80/A03C E6 85 INC $85 [$00:0085] A:000C X:0004 Y:000E P:eNvmxdizc $80/A03E 82 17 FF BRL $FF17 [$9F58] A:000C X:0004 Y:000E P:eNvmxdizc
$80/A217 ? (Executed when talking to the aerial building)
$80/A217 AD 3F 07 LDA $073F [$80:073F] A:0008 X:0008 Y:0018 P:envmxdizc $80/A21A 0D 40 07 ORA $0740 [$80:0740] A:0000 X:0008 Y:0018 P:envmxdiZc $80/A21D F0 19 BEQ $19 [$A238] A:0000 X:0008 Y:0018 P:envmxdiZc
code is missing here
$80/A238 28 PLP A:0000 X:0008 Y:0018 P:envmxdiZc $80/A239 C2 40 REP #$40 A:0000 X:0008 Y:0018 P:envmxdizC $80/A23B 08 PHP A:0000 X:0008 Y:0018 P:envmxdizC $80/A23C AD 35 07 LDA $0735 [$80:0735] A:0000 X:0008 Y:0018 P:envmxdizC $80/A23F CD 37 07 CMP $0737 [$80:0737] A:0060 X:0008 Y:0018 P:envmxdizC $80/A242 D0 03 BNE $03 [$A247] A:0060 X:0008 Y:0018 P:envmxdizC
code is missing here
$80/A247 E2 10 SEP #$10 A:0060 X:0008 Y:0018 P:envmxdizC $80/A249 AD 2F 07 LDA $072F [$80:072F] A:0060 X:0008 Y:0018 P:envmXdizC $80/A24C 29 FF 03 AND #$03FF A:20B0 X:0008 Y:0018 P:envmXdizC $80/A24F 0A ASL A A:00B0 X:0008 Y:0018 P:envmXdizC $80/A250 0A ASL A A:0160 X:0008 Y:0018 P:envmXdizc $80/A251 0A ASL A A:02C0 X:0008 Y:0018 P:envmXdizc $80/A252 18 CLC A:0580 X:0008 Y:0018 P:envmXdizc $80/A253 6D 27 07 ADC $0727 [$80:0727] A:0580 X:0008 Y:0018 P:envmXdizc $80/A256 48 PHA A:5580 X:0008 Y:0018 P:envmXdizc $80/A257 A2 80 LDX #$80 A:5580 X:0008 Y:0018 P:envmXdizc $80/A259 DA PHX A:5580 X:0080 Y:0018 P:eNvmXdizc $80/A25A AE 21 07 LDX $0721 [$80:0721] A:5580 X:0080 Y:0018 P:eNvmXdizc $80/A25D AD 37 07 LDA $0737 [$80:0737] A:5580 X:0002 Y:0018 P:envmXdizc $80/A260 3F FD A3 80 AND $80A3FD,x[$80:A3FF] A:0000 X:0002 Y:0018 P:envmXdiZc $80/A264 48 PHA A:0000 X:0002 Y:0018 P:envmXdiZc $80/A265 AD 35 07 LDA $0735 [$80:0735] A:0000 X:0002 Y:0018 P:envmXdiZc $80/A268 38 SEC A:0060 X:0002 Y:0018 P:envmXdizc $80/A269 E3 01 SBC $01,s [$00:1E8C] A:0060 X:0002 Y:0018 P:envmXdizC $80/A26B 18 CLC A:0060 X:0002 Y:0018 P:envmXdizC $80/A26C 7F 05 A4 80 ADC $80A405,x[$80:A407] A:0060 X:0002 Y:0018 P:envmXdizc $80/A270 3F FD A3 80 AND $80A3FD,x[$80:A3FF] A:0067 X:0002 Y:0018 P:envmXdizc $80/A274 0A ASL A A:0060 X:0002 Y:0018 P:envmXdizc $80/A275 83 01 STA $01,s [$00:1E8C] A:00C0 X:0002 Y:0018 P:envmXdizc $80/A277 A2 7E LDX #$7E A:00C0 X:0002 Y:0018 P:envmXdizc $80/A279 DA PHX A:00C0 X:007E Y:0018 P:envmXdizc $80/A27A AE 21 07 LDX $0721 [$80:0721] A:00C0 X:007E Y:0018 P:envmXdizc $80/A27D AD 37 07 LDA $0737 [$80:0737] A:00C0 X:0002 Y:0018 P:envmXdizc $80/A280 3F FD A3 80 AND $80A3FD,x[$80:A3FF] A:0000 X:0002 Y:0018 P:envmXdiZc $80/A284 0A ASL A A:0000 X:0002 Y:0018 P:envmXdiZc $80/A285 18 CLC A:0000 X:0002 Y:0018 P:envmXdiZc $80/A286 69 00 7E ADC #$7E00 A:0000 X:0002 Y:0018 P:envmXdiZc $80/A289 48 PHA A:7E00 X:0002 Y:0018 P:envmXdizc $80/A28A A2 02 LDX #$02 A:7E00 X:0002 Y:0018 P:envmXdizc $80/A28C DA PHX A:7E00 X:0002 Y:0018 P:envmXdizc $80/A28D C2 10 REP #$10 A:7E00 X:0002 Y:0018 P:envmXdizc $80/A28F BA TSX A:7E00 X:0002 Y:0018 P:envmxdizc $80/A290 E8 INX A:7E00 X:1E87 Y:0018 P:envmxdizc $80/A291 A9 00 00 LDA #$0000 A:7E00 X:1E88 Y:0018 P:envmxdizc $80/A294 22 2A 8C 80 JSL $808C2A[$80:8C2A] A:0000 X:1E88 Y:0018 P:envmxdiZc $80/A298 3B TSC A:0000 X:1E88 Y:0018 P:envmxdiZc $80/A299 18 CLC A:1E87 X:1E88 Y:0018 P:envmxdizc $80/A29A 69 09 00 ADC #$0009 A:1E87 X:1E88 Y:0018 P:envmxdizc $80/A29D 1B TCS A:1E90 X:1E88 Y:0018 P:envmxdizc $80/A29E E2 10 SEP #$10 A:1E90 X:1E88 Y:0018 P:envmxdizc $80/A2A0 AD 31 07 LDA $0731 [$80:0731] A:1E90 X:0088 Y:0018 P:envmXdizc $80/A2A3 29 FF 03 AND #$03FF A:20BC X:0088 Y:0018 P:envmXdizc $80/A2A6 0A ASL A A:00BC X:0088 Y:0018 P:envmXdizc $80/A2A7 0A ASL A A:0178 X:0088 Y:0018 P:envmXdizc $80/A2A8 0A ASL A A:02F0 X:0088 Y:0018 P:envmXdizc $80/A2A9 18 CLC A:05E0 X:0088 Y:0018 P:envmXdizc $80/A2AA 6D 27 07 ADC $0727 [$80:0727] A:05E0 X:0088 Y:0018 P:envmXdizc $80/A2AD 48 PHA A:55E0 X:0088 Y:0018 P:envmXdizc $80/A2AE A2 80 LDX #$80 A:55E0 X:0088 Y:0018 P:envmXdizc $80/A2B0 DA PHX A:55E0 X:0080 Y:0018 P:eNvmXdizc $80/A2B1 AE 21 07 LDX $0721 [$80:0721] A:55E0 X:0080 Y:0018 P:eNvmXdizc $80/A2B4 AD 37 07 LDA $0737 [$80:0737] A:55E0 X:0002 Y:0018 P:envmXdizc $80/A2B7 3F FD A3 80 AND $80A3FD,x[$80:A3FF] A:0000 X:0002 Y:0018 P:envmXdiZc $80/A2BB 48 PHA A:0000 X:0002 Y:0018 P:envmXdiZc $80/A2BC AD 35 07 LDA $0735 [$80:0735] A:0000 X:0002 Y:0018 P:envmXdiZc $80/A2BF 38 SEC A:0060 X:0002 Y:0018 P:envmXdizc $80/A2C0 E3 01 SBC $01,s [$00:1E8C] A:0060 X:0002 Y:0018 P:envmXdizC $80/A2C2 18 CLC A:0060 X:0002 Y:0018 P:envmXdizC $80/A2C3 7F 05 A4 80 ADC $80A405,x[$80:A407] A:0060 X:0002 Y:0018 P:envmXdizc $80/A2C7 3F FD A3 80 AND $80A3FD,x[$80:A3FF] A:0067 X:0002 Y:0018 P:envmXdizc $80/A2CB 0A ASL A A:0060 X:0002 Y:0018 P:envmXdizc $80/A2CC 83 01 STA $01,s [$00:1E8C] A:00C0 X:0002 Y:0018 P:envmXdizc $80/A2CE A2 7E LDX #$7E A:00C0 X:0002 Y:0018 P:envmXdizc $80/A2D0 DA PHX A:00C0 X:007E Y:0018 P:envmXdizc $80/A2D1 AE 21 07 LDX $0721 [$80:0721] A:00C0 X:007E Y:0018 P:envmXdizc $80/A2D4 AD 37 07 LDA $0737 [$80:0737] A:00C0 X:0002 Y:0018 P:envmXdizc $80/A2D7 3F FD A3 80 AND $80A3FD,x[$80:A3FF] A:0000 X:0002 Y:0018 P:envmXdiZc $80/A2DB 0A ASL A A:0000 X:0002 Y:0018 P:envmXdiZc $80/A2DC 18 CLC A:0000 X:0002 Y:0018 P:envmXdiZc $80/A2DD 69 00 82 ADC #$8200 A:0000 X:0002 Y:0018 P:envmXdiZc $80/A2E0 48 PHA A:8200 X:0002 Y:0018 P:eNvmXdizc $80/A2E1 A2 02 LDX #$02 A:8200 X:0002 Y:0018 P:eNvmXdizc $80/A2E3 DA PHX A:8200 X:0002 Y:0018 P:envmXdizc $80/A2E4 C2 10 REP #$10 A:8200 X:0002 Y:0018 P:envmXdizc $80/A2E6 BA TSX A:8200 X:0002 Y:0018 P:envmxdizc $80/A2E7 E8 INX A:8200 X:1E87 Y:0018 P:envmxdizc $80/A2E8 A9 00 00 LDA #$0000 A:8200 X:1E88 Y:0018 P:envmxdizc $80/A2EB 22 2A 8C 80 JSL $808C2A[$80:8C2A] A:0000 X:1E88 Y:0018 P:envmxdiZc $80/A2EF 3B TSC A:0000 X:1E88 Y:0018 P:envmxdiZc $80/A2F0 18 CLC A:1E87 X:1E88 Y:0018 P:envmxdizc $80/A2F1 69 09 00 ADC #$0009 A:1E87 X:1E88 Y:0018 P:envmxdizc $80/A2F4 1B TCS A:1E90 X:1E88 Y:0018 P:envmxdizc $80/A2F5 28 PLP A:1E90 X:1E88 Y:0018 P:envmxdizc $80/A2F6 18 CLC A:1E90 X:1E88 Y:0018 P:envmxdizC $80/A2F7 6B RTL A:1E90 X:1E88 Y:0018 P:envmxdizc
$80/A605 AD 35 07 LDA $0735 [$80:0735] A:1E90 X:1E88 Y:0018 P:envmxdizc $80/A608 CD 37 07 CMP $0737 [$80:0737] A:0060 X:1E88 Y:0018 P:envmxdizc $80/A60B F0 6A BEQ $6A ; [$A677] Exit if equal $80/A60D A9 00 7E LDA #$7E00 ; Setup two Textbox Tiles write addressses in $88-A and $8B-D $80/A610 85 89 STA $89 ; $88-A = $7E/7600, $8B-D = $7E/7640 (same row, one column below) $80/A612 85 8C STA $8C $80/A614 A9 00 76 LDA #$7600 $80/A617 85 88 STA $88 $80/A619 18 CLC $80/A61A 69 40 00 ADC #$0040 $80/A61D 85 8B STA $8B $80/A61F AD 2D 07 LDA $072D ; Load Textbox Position in Column and multiply by #$20 $80/A622 0A ASL A $80/A623 0A ASL A $80/A624 0A ASL A $80/A625 0A ASL A $80/A626 0A ASL A $80/A627 18 CLC ; Add Position in Row $80/A628 6D 2B 07 ADC $072B $80/A62B 0A ASL A ; Multiply by 2 (each value is 2 bytes in size) $80/A62C A8 TAY ; Transfer Offset in Y $80/A62D AE 21 07 LDX $0721 [$80:0721] A:0404 X:1E88 Y:0404 P:envmxdizc $80/A630 7C 33 A6 JMP ($A633,x)[$80:A63B] A:0404 X:0002 Y:0404 P:envmxdizc
$80/A633 Jump Table for $80/A605
3B A6 3B A6 3B A6 78 A6
$80/A63B AD 37 07 LDA $0737 [$80:0737] A:0404 X:0002 Y:0404 P:envmxdizc $80/A63E 29 F8 FF AND #$FFF8 A:0000 X:0002 Y:0404 P:envmxdiZc $80/A641 48 PHA A:0000 X:0002 Y:0404 P:envmxdiZc $80/A642 AD 35 07 LDA $0735 [$80:0735] A:0000 X:0002 Y:0404 P:envmxdiZc $80/A645 38 SEC A:0060 X:0002 Y:0404 P:envmxdizc $80/A646 E3 01 SBC $01,s [$00:1E8F] A:0060 X:0002 Y:0404 P:envmxdizC $80/A648 FA PLX A:0060 X:0002 Y:0404 P:envmxdizC $80/A649 18 CLC A:0060 X:0000 Y:0404 P:envmxdiZC $80/A64A 69 07 00 ADC #$0007 ; (Div by 8, always round up) $80/A64D 4A LSR A $80/A64E 4A LSR A $80/A64F 4A LSR A $80/A650 AA TAX ; Transfer in X as Loop Counter $80/A651 AD 2F 07 LDA $072F [$80:072F] A:000C X:000C Y:0404 P:envmxdizC $80/A654 97 88 STA [$88],y[$7E:7A04] A:20B0 X:000C Y:0404 P:envmxdizC $80/A656 AD 31 07 LDA $0731 [$80:0731] A:20B0 X:000C Y:0404 P:envmxdizC $80/A659 97 8B STA [$8B],y[$7E:7A44] A:20BC X:000C Y:0404 P:envmxdizC $80/A65B EE 2F 07 INC $072F [$80:072F] A:20BC X:000C Y:0404 P:envmxdizC $80/A65E EE 31 07 INC $0731 [$80:0731] A:20BC X:000C Y:0404 P:envmxdizC $80/A661 C8 INY A:20BC X:000C Y:0404 P:envmxdizC $80/A662 C8 INY A:20BC X:000C Y:0405 P:envmxdizC $80/A663 EE 2B 07 INC $072B ; Increment Position in Row (X-coordinate) $80/A666 CA DEX ; Decrement Loop Counter $80/A667 D0 E8 BNE $E8 ; [$A651] Loop until it runs out $80/A669 AD 44 07 LDA $0744 [$80:0744] A:20C7 X:0000 Y:041C P:envmxdiZC $80/A66C 89 02 00 BIT #$0002 A:0000 X:0000 Y:041C P:envmxdiZC $80/A66F D0 06 BNE $06 [$A677] A:0000 X:0000 Y:041C P:envmxdiZC $80/A671 A9 01 00 LDA #$0001 ; Set Flag for VRAM update $80/A674 8D 42 07 STA $0742 $80/A677 6B RTL
$80/A6BD AD 35 07 LDA $0735 [$80:0735] A:0081 X:0000 Y:000E P:envmxdizC $80/A6C0 8D 37 07 STA $0737 [$80:0737] A:0000 X:0000 Y:000E P:envmxdiZC $80/A6C3 AE 21 07 LDX $0721 [$80:0721] A:0000 X:0000 Y:000E P:envmxdiZC $80/A6C6 3F F9 A6 80 AND $80A6F9,x[$80:A6FB] A:0000 X:0002 Y:000E P:envmxdizC $80/A6CA F0 19 BEQ $19 [$A6E5] A:0000 X:0002 Y:000E P:envmxdiZC $80/A6CC CE 2B 07 DEC $072B ; Decrement Position in Row (X-Coordinate) $80/A6CF AD 2F 07 LDA $072F [$80:072F] A:0004 X:0002 Y:00CA P:envmxdizC $80/A6D2 38 SEC A:3CCF X:0002 Y:00CA P:envmxdizC $80/A6D3 FF 01 A7 80 SBC $80A701,x[$80:A703] A:3CCF X:0002 Y:00CA P:envmxdizC $80/A6D7 8D 2F 07 STA $072F [$80:072F] A:3CCE X:0002 Y:00CA P:envmxdizC $80/A6DA AD 31 07 LDA $0731 [$80:0731] A:3CCE X:0002 Y:00CA P:envmxdizC $80/A6DD 38 SEC A:3CEB X:0002 Y:00CA P:envmxdizC $80/A6DE FF 01 A7 80 SBC $80A701,x[$80:A703] A:3CEB X:0002 Y:00CA P:envmxdizC $80/A6E2 8D 31 07 STA $0731 [$80:0731] A:3CEA X:0002 Y:00CA P:envmxdizC $80/A6E5 AD 2F 07 LDA $072F [$80:072F] A:0000 X:0002 Y:000E P:envmxdiZC $80/A6E8 29 FF 03 AND #$03FF A:20B0 X:0002 Y:000E P:envmxdizC $80/A6EB 8D 33 07 STA $0733 [$80:0733] A:00B0 X:0002 Y:000E P:envmxdizC $80/A6EE 22 55 9F 80 JSL $809F55[$80:9F55] A:00B0 X:0002 Y:000E P:envmxdizC $80/A6F2 08 PHP ; Buffer Flag Register value on stack $80/A6F3 22 05 A6 80 JSL $80A605[$80:A605] A:1E90 X:1E88 Y:0018 P:envmxdizc $80/A6F7 28 PLP ; Restore Flag Register value $80/A6F8 6B RTL
$80/A6F9 Data for $80/A6BD
07 00 07 00 07 00 0F 00 01 00 01 00 01 00 02 00
$80/A709 ?
$80/A709 08 PHP ; Buffer Flag Register value on stack $80/A70A C2 30 REP #$30 ; A/X/Y = 16-bit $80/A70C A9 00 80 LDA #$8000 A:0010 X:00FF Y:0 P:eNvmxdIzC $80/A70F 8D 1D 07 STA $071D [$80:071D] A:8000 X:00FF Y:0 P:eNvmxdIzC $80/A712 A9 63 A7 LDA #$A763 A:8000 X:00FF Y:0 P:eNvmxdIzC $80/A715 8D 1C 07 STA $071C [$80:071C] A:A763 X:00FF Y:0 P:eNvmxdIzC $80/A718 A9 00 00 LDA #$0000 ; Clear $7E/7600 to $7E/7DFF $80/A71B 22 23 9C 80 JSL $809C23 ; Store A into $7E/7600 to $7E/7DFF $80/A71F A9 01 00 LDA #$0001 ; Set Flag for VRAM update $80/A722 8D 42 07 STA $0742 $80/A725 A9 02 00 LDA #$0002 A:0001 X:FFFE Y:0 P:envmxdIzC $80/A728 8D 21 07 STA $0721 [$80:0721] A:0002 X:FFFE Y:0 P:envmxdIzC $80/A72B 9C 2F 07 STZ $072F [$80:072F] A:0002 X:FFFE Y:0 P:envmxdIzC $80/A72E 9C 31 07 STZ $0731 [$80:0731] A:0002 X:FFFE Y:0 P:envmxdIzC $80/A731 9C 2B 07 STZ $072B ; Clear Textbox X-Position $80/A734 9C 2D 07 STZ $072D ; Clear Textbox Y-Position $80/A737 A9 01 00 LDA #$0001 A:0002 X:FFFE Y:0 P:envmxdIzC $80/A73A 8D 23 07 STA $0723 [$80:0723] A:0001 X:FFFE Y:0 P:envmxdIzC $80/A73D 9C 25 07 STZ $0725 [$80:0725] A:0001 X:FFFE Y:0 P:envmxdIzC $80/A740 9C 3D 07 STZ $073D [$80:073D] A:0001 X:FFFE Y:0 P:envmxdIzC $80/A743 9C 27 07 STZ $0727 [$80:0727] A:0001 X:FFFE Y:0 P:envmxdIzC $80/A746 9C 29 07 STZ $0729 [$80:0729] A:0001 X:FFFE Y:0 P:envmxdIzC $80/A749 9C 44 07 STZ $0744 [$80:0744] A:0001 X:FFFE Y:0 P:envmxdIzC $80/A74C A9 E0 00 LDA #$00E0 A:0001 X:FFFE Y:0 P:envmxdIzC $80/A74F 8D 1F 07 STA $071F [$80:071F] A:00E0 X:FFFE Y:0 P:envmxdIzC $80/A752 9C 92 0B STZ $0B92 [$80:0B92] A:00E0 X:FFFE Y:0 P:envmxdIzC $80/A755 9C 98 0B STZ $0B98 [$80:0B98] A:00E0 X:FFFE Y:0 P:envmxdIzC $80/A758 9C 9E 0B STZ $0B9E [$80:0B9E] A:00E0 X:FFFE Y:0 P:envmxdIzC $80/A75B 9C 3F 07 STZ $073F [$80:073F] A:00E0 X:FFFE Y:0 P:envmxdIzC $80/A75E 9C 40 07 STZ $0740 [$80:0740] A:00E0 X:FFFE Y:0 P:envmxdIzC $80/A761 28 PLP ; Restore Flag Register value $80/A762 6B RTL
$80/A783 08 PHP ; Buffer Flag Register value on stack $80/A784 C2 30 REP #$30 ; A/X/Y = 16-bit $80/A786 20 DA 9D JSR $9DDA [$80:9DDA] A:002A X:0038 Y:000E P:eNvmxdizc $80/A789 AD 35 07 LDA $0735 [$80:0735] A:9E2F X:0002 Y:000E P:eNvmxdizc $80/A78C 29 07 00 AND #$0007 ; This part here turns the number now in A into a value where... $80/A78F 0A ASL A ; ... the corresponding bit is set: #$01 = #$01, #$03 = #$04, ... $80/A790 AA TAX ; ... #$04 = #$08, #$05 = #$10 and so on $80/A791 BF FB A7 80 LDA $80A7FB,x $80/A795 85 92 STA $92 ; Store this value in $92 $80/A797 AD 35 07 LDA $0735 [$80:0735] A:0020 X:000C Y:000E P:envmxdizc $80/A79A 29 F8 FF AND #$FFF8 A:001E X:000C Y:000E P:envmxdizc $80/A79D 0A ASL A A:0018 X:000C Y:000E P:envmxdizc $80/A79E 18 CLC A:0030 X:000C Y:000E P:envmxdizc $80/A79F 69 00 7E ADC #$7E00 A:0030 X:000C Y:000E P:envmxdizc $80/A7A2 AA TAX A:7E30 X:000C Y:000E P:envmxdizc $80/A7A3 E8 INX A:7E30 X:7E30 Y:000E P:envmxdizc $80/A7A4 E8 INX A:7E30 X:7E31 Y:000E P:envmxdizc $80/A7A5 8B PHB ; Buffer Program Bank on Stack $80/A7A6 A9 00 7E LDA #$7E00 ; Set Program Bank to $7E $80/A7A9 48 PHA $80/A7AA AB PLB $80/A7AB AB PLB $80/A7AC A0 00 00 LDY #$0000 A:7E00 X:7E32 Y:000E P:envmxdizc $80/A7AF 20 49 9D JSR $9D49 [$80:9D49] A:7E00 X:7E32 Y:0000 P:envmxdiZc $80/A7B2 F0 05 BEQ $05 [$A7B9] A:0000 X:7E32 Y:0000 P:envmxdiZc $80/A7B4 5A PHY A:4200 X:7E34 Y:0002 P:envmxdizc $80/A7B5 20 1F 9F JSR $9F1F [$80:9F1F] A:4200 X:7E34 Y:0002 P:envmxdizc $80/A7B8 7A PLY A:0100 X:7E34 Y:0020 P:envmxdiZC $80/A7B9 E8 INX A:0000 X:7E32 Y:0000 P:envmxdiZc $80/A7BA E8 INX A:0000 X:7E33 Y:0000 P:envmxdizc $80/A7BB 8A TXA A:0000 X:7E34 Y:0000 P:envmxdizc $80/A7BC 29 0F 00 AND #$000F A:7E34 X:7E34 Y:0000 P:envmxdizc $80/A7BF D0 06 BNE $06 [$A7C7] A:0004 X:7E34 Y:0000 P:envmxdizc $80/A7C1 8A TXA A:0000 X:7E40 Y:000C P:envmxdiZC $80/A7C2 18 CLC A:7E40 X:7E40 Y:000C P:envmxdizC $80/A7C3 69 F0 03 ADC #$03F0 A:7E40 X:7E40 Y:000C P:envmxdizc $80/A7C6 AA TAX A:8230 X:7E40 Y:000C P:eNVmxdizc $80/A7C7 C8 INY A:0004 X:7E34 Y:0000 P:envmxdizc $80/A7C8 C8 INY A:0004 X:7E34 Y:0001 P:envmxdizc $80/A7C9 CC 3B 07 CPY $073B [$7E:073B] A:0004 X:7E34 Y:0002 P:envmxdizc $80/A7CC 90 E1 BCC $E1 [$A7AF] A:0004 X:7E34 Y:0002 P:eNvmxdizc $80/A7CE A0 18 00 LDY #$0018 A:000A X:823A Y:0018 P:enVmxdiZC $80/A7D1 CC 3B 07 CPY $073B [$7E:073B] A:000A X:823A Y:0018 P:enVmxdizC $80/A7D4 90 18 BCC $18 [$A7EE] A:000A X:823A Y:0018 P:enVmxdiZC $80/A7D6 AD 25 07 LDA $0725 [$7E:0725] A:000A X:823A Y:0018 P:enVmxdiZC $80/A7D9 89 08 00 BIT #$0008 A:0000 X:823A Y:0018 P:enVmxdiZC $80/A7DC F0 10 BEQ $10 [$A7EE] A:0000 X:823A Y:0018 P:enVmxdiZC
code is missing here
$80/A7EE AB PLB A:0000 X:823A Y:0018 P:enVmxdiZC $80/A7EF AD 35 07 LDA $0735 [$80:0735] A:0000 X:823A Y:0018 P:eNVmxdizC $80/A7F2 18 CLC A:001E X:823A Y:0018 P:enVmxdizC $80/A7F3 6D 39 07 ADC $0739 [$80:0739] A:001E X:823A Y:0018 P:enVmxdizc $80/A7F6 8D 35 07 STA $0735 [$80:0735] A:002A X:823A Y:0018 P:envmxdizc $80/A7F9 28 PLP ; Restore Flag Register value $80/A7FA 6B RTL
$80/A7FB Data for $80/A783
This data can be used to turn a value from #$00-#$07 into its corresponding bit being set.
$80/A7FB 00 00 $80/A7FD 01 00 $80/A7FF 02 00 $80/A801 04 00 $80/A803 08 00 $80/A805 10 00 $80/A807 20 00 $80/A809 40 00
$80/A9A4 ? (Executed when talking to the aerial building)
$80/A9A4 AD 29 0C LDA $0C29 [$80:0C29] A:1E97 X:0000 Y:0080 P:envmxdiZC $80/A9A7 EB XBA A:E194 X:0000 Y:0080 P:eNvmxdizC $80/A9A8 8D 1D 07 STA $071D [$80:071D] A:94E1 X:0000 Y:0080 P:eNvmxdizC $80/A9AB BD 92 0C LDA $0C92,x[$80:0C92] A:94E1 X:0000 Y:0080 P:eNvmxdizC $80/A9AE 0A ASL A A:0003 X:0000 Y:0080 P:envmxdizC $80/A9AF 0A ASL A A:0006 X:0000 Y:0080 P:envmxdizc $80/A9B0 0A ASL A A:000C X:0000 Y:0080 P:envmxdizc $80/A9B1 0A ASL A A:0018 X:0000 Y:0080 P:envmxdizc $80/A9B2 18 CLC A:0030 X:0000 Y:0080 P:envmxdizc $80/A9B3 6D 27 0C ADC $0C27 [$80:0C27] A:0030 X:0000 Y:0080 P:envmxdizc $80/A9B6 8D 1C 07 STA $071C [$80:071C] A:9909 X:0000 Y:0080 P:eNvmxdizc $80/A9B9 BD 86 0C LDA $0C86,x[$80:0C86] A:9909 X:0000 Y:0080 P:eNvmxdizc $80/A9BC 8D 23 07 STA $0723 [$80:0723] A:0001 X:0000 Y:0080 P:envmxdizc $80/A9BF 6B RTL A:0001 X:0000 Y:0080 P:envmxdizc
$80/A9C0 BD AA 0C LDA $0CAA,x[$80:0CAA] A:0001 X:0000 Y:0080 P:envmxdizc $80/A9C3 BC 6E 0C LDY $0C6E,x[$80:0C6E] A:00B0 X:0000 Y:0080 P:envmxdizc $80/A9C6 18 CLC A:00B0 X:0000 Y:0000 P:envmxdiZc $80/A9C7 F0 06 BEQ $06 [$A9CF] A:00B0 X:0000 Y:0000 P:envmxdiZc $80/A9CF 7D 62 0C ADC $0C62,x[$80:0C62] A:00B0 X:0000 Y:0000 P:envmxdiZc $80/A9D2 8D 2F 07 STA $072F [$80:072F] A:00B0 X:0000 Y:0000 P:envmxdizc $80/A9D5 BD 9E 0C LDA $0C9E,x[$80:0C9E] A:00B0 X:0000 Y:0000 P:envmxdizc $80/A9D8 EB XBA A:0000 X:0000 Y:0000 P:envmxdiZc $80/A9D9 0A ASL A A:0000 X:0000 Y:0000 P:envmxdiZc $80/A9DA 0A ASL A A:0000 X:0000 Y:0000 P:envmxdiZc $80/A9DB 18 CLC A:0000 X:0000 Y:0000 P:envmxdiZc $80/A9DC 09 00 20 ORA #$2000 A:0000 X:0000 Y:0000 P:envmxdiZc $80/A9DF 0D 2F 07 ORA $072F [$80:072F] A:2000 X:0000 Y:0000 P:envmxdizc $80/A9E2 8D 2F 07 STA $072F [$80:072F] A:20B0 X:0000 Y:0000 P:envmxdizc $80/A9E5 18 CLC A:20B0 X:0000 Y:0000 P:envmxdizc $80/A9E6 7D 4A 0C ADC $0C4A,x[$80:0C4A] A:20B0 X:0000 Y:0000 P:envmxdizc $80/A9E9 8D 31 07 STA $0731 [$80:0731] A:20BC X:0000 Y:0000 P:envmxdizc $80/A9EC 6B RTL A:20BC X:0000 Y:0000 P:envmxdizc
$80/AA0C ? (Executed when talking to the aerial building)
$80/AA0C 48 PHA A:0000 X:0000 Y:0000 P:envmxdIZc $80/AA0D 22 53 AA 80 JSL $80AA53 ; UNNECESSARY LINE - Just write "LDA $0B92"! $80/AA11 D0 3D BNE $3D [$AA50] A:0000 X:0000 Y:0000 P:envmxdIZc $80/AA13 A9 01 00 LDA #$0001 A:0000 X:0000 Y:0000 P:envmxdIZc $80/AA16 8D 92 0B STA $0B92 [$81:0B92] A:0001 X:0000 Y:0000 P:envmxdIzc $80/AA19 A3 01 LDA $01,s [$00:1E6A] A:0001 X:0000 Y:0000 P:envmxdIzc $80/AA1B 29 FF 00 AND #$00FF A:0000 X:0000 Y:0000 P:envmxdIZc $80/AA1E 0A ASL A A:0000 X:0000 Y:0000 P:envmxdIZc $80/AA1F 8D 94 0B STA $0B94 [$81:0B94] A:0000 X:0000 Y:0000 P:envmxdIZc $80/AA22 A3 01 LDA $01,s [$00:1E6A] A:0000 X:0000 Y:0000 P:envmxdIZc $80/AA24 29 00 FF AND #$FF00 A:0000 X:0000 Y:0000 P:envmxdIZc $80/AA27 EB XBA A:0000 X:0000 Y:0000 P:envmxdIZc $80/AA28 8D 3D 07 STA $073D [$81:073D] A:0000 X:0000 Y:0000 P:envmxdIZc $80/AA2B A5 21 LDA $21 [$00:0021] A:0000 X:0000 Y:0000 P:envmxdIZc $80/AA2D 85 86 STA $86 [$00:0086] A:88A1 X:0000 Y:0000 P:eNvmxdIzc $80/AA2F A5 20 LDA $20 [$00:0020] A:88A1 X:0000 Y:0000 P:eNvmxdIzc $80/AA31 85 85 STA $85 [$00:0085] A:A1E1 X:0000 Y:0000 P:eNvmxdIzc $80/AA33 68 PLA A:A1E1 X:0000 Y:0000 P:eNvmxdIzc $80/AA34 29 FF 00 AND #$00FF A:0000 X:0000 Y:0000 P:envmxdIZc $80/AA37 22 41 B3 80 JSL $80B341[$80:B341] A:0000 X:0000 Y:0000 P:envmxdIZc $80/AA3B A9 00 80 LDA #$8000 A:0010 X:0000 Y:0000 P:envmxdIZc $80/AA3E 8D 5E 06 STA $065E [$81:065E] A:8000 X:0000 Y:0000 P:eNvmxdIzc $80/AA41 A9 B4 B0 LDA #$B0B4 A:8000 X:0000 Y:0000 P:eNvmxdIzc $80/AA44 8D 5D 06 STA $065D [$81:065D] A:B0B4 X:0000 Y:0000 P:eNvmxdIzc $80/AA47 22 B6 91 80 JSL $8091B6[$80:91B6] A:B0B4 X:0000 Y:0000 P:eNvmxdIzc $80/AA4B 8D 9A 0B STA $0B9A [$81:0B9A] A:0000 X:0000 Y:0000 P:envmxdIZc $80/AA4E 18 CLC A:0000 X:0000 Y:0000 P:envmxdIZc $80/AA4F 6B RTL A:0000 X:0000 Y:0000 P:envmxdIZc
$80/AA53 LDA $0B92 (Executed when talking to the aerial building)
If this isn't just the end of a longer Subroutine, this makes no sense. UNNECESSARY LINE?
$80/AA53 AD 92 0B LDA $0B92 [$81:0B92] A:0000 X:0000 Y:0000 P:envmxdIZc $80/AA56 6B RTL A:0000 X:0000 Y:0000 P:envmxdIZc
$80/AC5E While NMI: VRAM DMA
If the flag in $0BB6 is set, this subroutine transfers the data in $7E/8C15-$7E/9414 to whatever VRAM address is in $0BB4/5.
$80/AC5E 08 PHP ; Buffer Flag Register value on stack $80/AC5F E2 10 SEP #$10 ; X/Y = 8-bit $80/AC61 C2 20 REP #$20 ; A = 16-bit $80/AC63 AD B6 0B LDA $0BB6 ; Is the flag for the VRAM DMA set? $80/AC66 F0 2A BEQ $2A ; [$AC92] $80/AC68 A9 01 18 LDA #$1801 ; Setup DMA from $7E/8C15 to VRAM, $800 bytes $80/AC6B 8D 00 43 STA $4300 $80/AC6E A9 15 8C LDA #$8C15 $80/AC71 8D 02 43 STA $4302 $80/AC74 A2 7E LDX #$7E $80/AC76 8E 04 43 STX $4304 $80/AC79 A9 00 08 LDA #$0800 $80/AC7C 8D 05 43 STA $4305 $80/AC7F A2 80 LDX #$80 ; VRAM transfer settings: 16-bit transfer $80/AC81 8E 15 21 STX $2115 $80/AC84 AD B4 0B LDA $0BB4 ; Set VRAM address according to $0BB4/5 $80/AC87 8D 16 21 STA $2116 $80/AC8A A2 01 LDX #$01 ; Activate DMA $80/AC8C 8E 0B 42 STX $420B $80/AC8F 9C B6 0B STZ $0BB6 ; Remove flag for this VRAM DMA $80/AC92 28 PLP ; Restore Flag Register value $80/AC93 6B RTL
$80/B0B4 ? (Executed when talking to the aerial building and at start up)
$80/B0B4 AE 94 0B LDX $0B94 [$80:0B94] A:1E97 X:0000 Y:0080 P:envmxdizC $80/B0B7 22 A4 A9 80 JSL $80A9A4[$80:A9A4] A:1E97 X:0000 Y:0080 P:envmxdiZC $80/B0BB 22 C0 A9 80 JSL $80A9C0[$80:A9C0] A:0001 X:0000 Y:0080 P:envmxdizc $80/B0BF BD 4A 0C LDA $0C4A,x[$80:0C4A] A:20BC X:0000 Y:0000 P:envmxdizc $80/B0C2 0A ASL A A:000C X:0000 Y:0000 P:envmxdizc $80/B0C3 0A ASL A A:0018 X:0000 Y:0000 P:envmxdizc $80/B0C4 0A ASL A A:0030 X:0000 Y:0000 P:envmxdizc $80/B0C5 8D 1F 07 STA $071F [$80:071F] A:0060 X:0000 Y:0000 P:envmxdizc $80/B0C8 22 F0 9A 80 JSL $809AF0[$80:9AF0] A:0060 X:0000 Y:0000 P:envmxdizc $80/B0CC AD 3D 07 LDA $073D [$80:073D] A:0000 X:0000 Y:000E P:envmxdiZc $80/B0CF 8D 96 0B STA $0B96 [$80:0B96] A:0000 X:0000 Y:000E P:envmxdiZc $80/B0D2 80 3A BRA $3A [$B10E] A:0000 X:0000 Y:000E P:envmxdiZc $80/B0D4 22 BD A6 80 JSL $80A6BD[$80:A6BD] A:0081 X:0000 Y:000E P:envmxdizC $80/B0D8 08 PHP A:0001 X:0000 Y:041C P:envmxdizc $80/B0D9 AE 94 0B LDX $0B94 [$80:0B94] A:0001 X:0000 Y:041C P:envmxdizc $80/B0DC AD 2B 07 LDA $072B [$80:072B] A:0001 X:0000 Y:041C P:envmxdiZc $80/B0DF 38 SEC A:000E X:0000 Y:041C P:envmxdizc $80/B0E0 FD 32 0C SBC $0C32,x[$80:0C32] A:000E X:0000 Y:041C P:envmxdizC $80/B0E3 9D 62 0C STA $0C62,x[$80:0C62] A:000C X:0000 Y:041C P:envmxdizC $80/B0E6 AD 2D 07 LDA $072D [$80:072D] A:000C X:0000 Y:041C P:envmxdizC $80/B0E9 38 SEC A:0010 X:0000 Y:041C P:envmxdizC $80/B0EA FD 3E 0C SBC $0C3E,x[$80:0C3E] A:0010 X:0000 Y:041C P:envmxdizC $80/B0ED 9D 6E 0C STA $0C6E,x[$80:0C6E] A:0000 X:0000 Y:041C P:envmxdiZC $80/B0F0 28 PLP A:0000 X:0000 Y:041C P:envmxdiZC $80/B0F1 70 2E BVS $2E [$B121] A:0000 X:0000 Y:041C P:envmxdizc $80/B0F3 B0 33 BCS $33 [$B128] A:0000 X:0000 Y:041C P:envmxdizc $80/B0F5 AD 3D 07 LDA $073D [$80:073D] A:0000 X:0000 Y:041C P:envmxdizc $80/B0F8 F0 14 BEQ $14 [$B10E] A:0000 X:0000 Y:041C P:envmxdiZc
this part is only executed at startup:
$80/B0FA 22 6A 92 80 JSL $80926A[$80:926A] A:0002 X:0 Y:00CA P:envmxdizc $80/B0FE AD 3D 07 LDA $073D [$80:073D] A:0002 X:0 Y:00CA P:envmxdizc $80/B101 F0 0B BEQ $0B [$B10E] A:0002 X:0 Y:00CA P:envmxdizc $80/B103 CE 96 0B DEC $0B96 [$80:0B96] A:0002 X:0 Y:00CA P:envmxdizc $80/B106 D0 F2 BNE $F2 [$B0FA] A:0002 X:0 Y:00CA P:envmxdizc $80/B108 AD 3D 07 LDA $073D [$80:073D] A:0002 X:0 Y:00CA P:envmxdiZc $80/B10B 8D 96 0B STA $0B96 [$80:0B96] A:0002 X:0 Y:00CA P:envmxdizc
$80/B10E A7 85 LDA [$85] [$88:A1E1] A:0000 X:0000 Y:000E P:envmxdiZc $80/B110 29 FF 00 AND #$00FF A:4081 X:0000 Y:000E P:envmxdizc $80/B113 F0 13 BEQ $13 [$B128] A:0081 X:0000 Y:000E P:envmxdizc $80/B115 C9 0D 00 CMP #$000D A:0081 X:0000 Y:000E P:envmxdizc $80/B118 F0 26 BEQ $26 [$B140] A:0081 X:0000 Y:000E P:envmxdizC $80/B11A C9 5C 00 CMP #$005C A:0081 X:0000 Y:000E P:envmxdizC $80/B11D F0 24 BEQ $24 [$B143] A:0081 X:0000 Y:000E P:envmxdizC $80/B11F 80 B3 BRA $B3 [$B0D4] A:0081 X:0000 Y:000E P:envmxdizC
code is missing here
$80/B128 AD 3F 07 LDA $073F [$80:073F] A:0000 X:0000 Y:041C P:envmxdiZc $80/B12B 0D 40 07 ORA $0740 [$80:0740] A:0000 X:0000 Y:041C P:envmxdiZc $80/B12E D0 A4 BNE $A4 [$B0D4] A:0000 X:0000 Y:041C P:envmxdiZc $80/B130 9C 25 07 STZ $0725 [$80:0725] A:0000 X:0000 Y:041C P:envmxdiZc $80/B133 9C 44 07 STZ $0744 [$80:0744] A:0000 X:0000 Y:041C P:envmxdiZc $80/B136 9C 92 0B STZ $0B92 [$80:0B92] A:0000 X:0000 Y:041C P:envmxdiZc $80/B139 9C 98 0B STZ $0B98 [$80:0B98] A:0000 X:0000 Y:041C P:envmxdiZc $80/B13C 5C E9 91 80 JMP $8091E9[$80:91E9] A:0000 X:0000 Y:041C P:envmxdiZc
$80/B341 ? (Executed when talking to the aerial building)
$80/B341 DA PHX A:0000 X:0000 Y:0000 P:envmxdIZc $80/B342 5A PHY A:0000 X:0000 Y:0000 P:envmxdIZc $80/B343 0A ASL A A:0000 X:0000 Y:0000 P:envmxdIZc $80/B344 AA TAX A:0000 X:0000 Y:0000 P:envmxdIZc $80/B345 A3 03 LDA $03,s [$00:1E67] A:0000 X:0000 Y:0000 P:envmxdIZc $80/B347 F0 05 BEQ $05 [$B34E] A:0000 X:0000 Y:0000 P:envmxdIZc
code is missing here
$80/B34E A3 01 LDA $01,s [$00:1E65] A:0000 X:0000 Y:0000 P:envmxdIZc $80/B350 F0 05 BEQ $05 [$B357] A:0000 X:0000 Y:0000 P:envmxdIZc
code is missing here
$80/B357 A3 03 LDA $03,s [$00:1E67] A:0000 X:0000 Y:0000 P:envmxdIZc $80/B359 9D 62 0C STA $0C62,x[$81:0C62] A:0000 X:0000 Y:0000 P:envmxdIZc $80/B35C 18 CLC A:0000 X:0000 Y:0000 P:envmxdIZc $80/B35D 7D 32 0C ADC $0C32,x[$81:0C32] A:0000 X:0000 Y:0000 P:envmxdIZc $80/B360 8D 2B 07 STA $072B [$81:072B] A:0002 X:0000 Y:0000 P:envmxdIzc $80/B363 A3 01 LDA $01,s [$00:1E65] A:0002 X:0000 Y:0000 P:envmxdIzc $80/B365 9D 6E 0C STA $0C6E,x[$81:0C6E] A:0000 X:0000 Y:0000 P:envmxdIZc $80/B368 18 CLC A:0000 X:0000 Y:0000 P:envmxdIZc $80/B369 7D 3E 0C ADC $0C3E,x[$81:0C3E] A:0000 X:0000 Y:0000 P:envmxdIZc $80/B36C 8D 2D 07 STA $072D [$81:072D] A:0010 X:0000 Y:0000 P:envmxdIzc $80/B36F 7A PLY A:0010 X:0000 Y:0000 P:envmxdIzc $80/B370 FA PLX A:0010 X:0000 Y:0000 P:envmxdIZc $80/B371 6B RTL A:0010 X:0000 Y:0000 P:envmxdIZc
$80/B47D TEXTBOX: Setup VRAM Address (and other stuff???)
$80/B47D 08 PHP ; Buffer Flag Register value on stack $80/B47E C2 30 REP #$30 ; A/X/Y = 16-bit $80/B480 A9 B0 00 LDA #$00B0 A:9DAD X:0024 Y:0004 P:eNvmxdIzc $80/B483 8D 30 0C STA $0C30 [$81:0C30] A:00B0 X:0024 Y:0004 P:envmxdIzc $80/B486 A9 02 00 LDA #$0002 A:00B0 X:0024 Y:0004 P:envmxdIzc $80/B489 8D 21 07 STA $0721 [$81:0721] A:0002 X:0024 Y:0004 P:envmxdIzc $80/B48C AD 04 01 LDA $0104 ; Check if BG Mode is Mode 1 $80/B48F 29 07 00 AND #$0007 $80/B492 C9 01 00 CMP #$0001 $80/B495 D0 13 BNE $13 ; [$B4AA] Branch if not $80/B497 AD 0B 01 LDA $010B ; Take the address of the BG3 Tiles (Textbox Tiles) and form its VRAM address $80/B49A 29 0F 00 AND #$000F $80/B49D EB XBA $80/B49E 0A ASL A $80/B49F 0A ASL A $80/B4A0 0A ASL A $80/B4A1 0A ASL A $80/B4A2 8D 27 07 STA $0727 ; Store the VRAM Address of the Textbox Tiles in $0727 $80/B4A5 8D 29 07 STA $0729 ; Store the VRAM Address of the Textbox Tiles in $0729 $80/B4A8 28 PLP ; Restore Flag Register value $80/B4A9 6B RTL
$80/B4BF ? (Executed when talking to the aerial building)
$80/B4BF 86 00 STX $00 [$00:0000] A:0000 X:1002 Y:020C P:envmxdIZc $80/B4C1 84 02 STY $02 [$00:0002] A:0000 X:1002 Y:020C P:envmxdIZc $80/B4C3 0A ASL A A:0000 X:1002 Y:020C P:envmxdIZc $80/B4C4 AA TAX A:0000 X:1002 Y:020C P:envmxdIZc $80/B4C5 A5 00 LDA $00 [$00:0000] A:0000 X:0000 Y:020C P:envmxdIZc $80/B4C7 29 FF 00 AND #$00FF A:1002 X:0000 Y:020C P:envmxdIzc $80/B4CA 9D 32 0C STA $0C32,x[$81:0C32] A:0002 X:0000 Y:020C P:envmxdIzc $80/B4CD A5 00 LDA $00 [$00:0000] A:0002 X:0000 Y:020C P:envmxdIzc $80/B4CF 29 00 FF AND #$FF00 A:1002 X:0000 Y:020C P:envmxdIzc $80/B4D2 EB XBA A:1000 X:0000 Y:020C P:envmxdIzc $80/B4D3 9D 3E 0C STA $0C3E,x[$81:0C3E] A:0010 X:0000 Y:020C P:envmxdIzc $80/B4D6 A5 02 LDA $02 [$00:0002] A:0010 X:0000 Y:020C P:envmxdIzc $80/B4D8 29 FF 00 AND #$00FF A:020C X:0000 Y:020C P:envmxdIzc $80/B4DB 9D 4A 0C STA $0C4A,x[$81:0C4A] A:000C X:0000 Y:020C P:envmxdIzc $80/B4DE A5 02 LDA $02 [$00:0002] A:000C X:0000 Y:020C P:envmxdIzc $80/B4E0 29 00 FF AND #$FF00 A:020C X:0000 Y:020C P:envmxdIzc $80/B4E3 EB XBA A:0200 X:0000 Y:020C P:envmxdIzc $80/B4E4 9D 56 0C STA $0C56,x[$81:0C56] A:0002 X:0000 Y:020C P:envmxdIzc $80/B4E7 A5 02 LDA $02 [$00:0002] A:0002 X:0000 Y:020C P:envmxdIzc $80/B4E9 8D 02 42 STA $4202 [$81:4202] A:020C X:0000 Y:020C P:envmxdIzc $80/B4EC A9 00 00 LDA #$0000 A:020C X:0000 Y:020C P:envmxdIzc $80/B4EF 9D 7A 0C STA $0C7A,x[$81:0C7A] A:0000 X:0000 Y:020C P:envmxdIZc $80/B4F2 A9 01 00 LDA #$0001 A:0000 X:0000 Y:020C P:envmxdIZc $80/B4F5 9D 86 0C STA $0C86,x[$81:0C86] A:0001 X:0000 Y:020C P:envmxdIzc $80/B4F8 A9 03 00 LDA #$0003 A:0001 X:0000 Y:020C P:envmxdIzc $80/B4FB 9D 92 0C STA $0C92,x[$81:0C92] A:0003 X:0000 Y:020C P:envmxdIzc $80/B4FE A9 00 00 LDA #$0000 A:0003 X:0000 Y:020C P:envmxdIzc $80/B501 9D 9E 0C STA $0C9E,x[$81:0C9E] A:0000 X:0000 Y:020C P:envmxdIZc $80/B504 9E 62 0C STZ $0C62,x[$81:0C62] A:0000 X:0000 Y:020C P:envmxdIZc $80/B507 9E 6E 0C STZ $0C6E,x[$81:0C6E] A:0000 X:0000 Y:020C P:envmxdIZc $80/B50A AD 30 0C LDA $0C30 [$81:0C30] A:0000 X:0000 Y:020C P:envmxdIZc $80/B50D 29 FF 03 AND #$03FF A:00B0 X:0000 Y:020C P:envmxdIzc $80/B510 9D AA 0C STA $0CAA,x[$81:0CAA] A:00B0 X:0000 Y:020C P:envmxdIzc $80/B513 18 CLC A:00B0 X:0000 Y:020C P:envmxdIzc $80/B514 6D 16 42 ADC $4216 [$81:4216] A:00B0 X:0000 Y:020C P:envmxdIzc $80/B517 8D 30 0C STA $0C30 [$81:0C30] A:00C8 X:0000 Y:020C P:envmxdIzc $80/B51A 6B RTL A:00C8 X:0000 Y:020C P:envmxdIzc
$80/B51B ?
$80/B51B 8B PHB ; Buffer Program Bank on stack $80/B51C F4 00 7E PEA $7E00 ; Set Program Bank to $7E $80/B51F AB PLB $80/B520 AB PLB $80/B521 0A ASL A A:0 X:0 Y:0004 P:envmxdIzc $80/B522 AA TAX A:0 X:0 Y:0004 P:envmxdIZc $80/B523 BD 3E 0C LDA $0C3E,x ; Form Store Index: Load Y-coordinate $80/B526 3A DEC A ; Decrement Y-coordinate (so "#$01" is the actual lowest coordinate value) $80/B527 0A ASL A ; Multiply by #$20 (#$20 tiles per Tilemap row) $80/B528 0A ASL A $80/B529 0A ASL A $80/B52A 0A ASL A $80/B52B 0A ASL A $80/B52C 18 CLC ; Add X-coordinate $80/B52D 7D 32 0C ADC $0C32,x $80/B530 3A DEC A ; Decrement X-coordinate (so "#$01" is the actual lowest coordinate value) $80/B531 0A ASL A ; Multiply by 2 - each Tile value is 2 bytes in size $80/B532 A8 TAY ; Transfer Store Index in Y (for buffering) $80/B533 BD 56 0C LDA $0C56,x[$7E:0C56] A:0042 X:0 Y:0042 P:envmxdIzc $80/B536 1A INC A A:0008 X:0 Y:0042 P:envmxdIzc $80/B537 85 02 STA $02 [$00:0002] A:0009 X:0 Y:0042 P:envmxdIzc $80/B539 BD 4A 0C LDA $0C4A,x[$7E:0C4A] A:0009 X:0 Y:0042 P:envmxdIzc $80/B53C 1A INC A A:001C X:0 Y:0042 P:envmxdIzc $80/B53D 85 00 STA $00 [$00:0000] A:001D X:0 Y:0042 P:envmxdIzc $80/B53F 84 04 STY $04 ; Buffer Store Index in $04 $80/B541 DA PHX A:001D X:0 Y:0042 P:envmxdIzc $80/B542 BB TYX ; Transfer buffered Store Index in X for actual storing $80/B543 A9 80 20 LDA #$2080 A:001D X:0042 Y:0042 P:envmxdIzc $80/B546 9D 00 76 STA $7600,x[$7E:7642] A:2080 X:0042 Y:0042 P:envmxdIzc $80/B549 FA PLX A:2080 X:0042 Y:0042 P:envmxdIzc $80/B54A C8 INY A:2080 X:0 Y:0042 P:envmxdIZc $80/B54B C8 INY A:2080 X:0 Y:0043 P:envmxdIzc $80/B54C A5 00 LDA $00 [$00:0000] A:2080 X:0 Y:0044 P:envmxdIzc $80/B54E 3A DEC A A:001D X:0 Y:0044 P:envmxdIzc $80/B54F 85 00 STA $00 [$00:0000] A:001C X:0 Y:0044 P:envmxdIzc $80/B551 10 EE BPL $EE [$B541] A:001C X:0 Y:0044 P:envmxdIzc $80/B553 A5 04 LDA $04 ; Load Store Index, add #$40 (so it points one row lower) $80/B555 18 CLC $80/B556 69 40 00 ADC #$0040 $80/B559 A8 TAY ; Transfer new Store Index back in Y $80/B55A A5 02 LDA $02 [$00:0002] A:0082 X:0 Y:0082 P:envmxdIzc $80/B55C 3A DEC A A:0009 X:0 Y:0082 P:envmxdIzc $80/B55D 85 02 STA $02 [$00:0002] A:0008 X:0 Y:0082 P:envmxdIzc $80/B55F 10 D8 BPL $D8 [$B539] A:0008 X:0 Y:0082 P:envmxdIzc $80/B561 A9 01 00 LDA #$0001 ; Set Flag for VRAM update $80/B564 8D 42 07 STA $0742 $80/B567 AB PLB ; Restore Program Bank $80/B568 6B RTL
$80/B569 C2 30 REP #$30 ; A/X/Y = 16-bit $80/B56B 8B PHB ; Buffer Program Bank on stack $80/B56C F4 00 7E PEA $7E00 ; Set Program Bank to $7E $80/B56F AB PLB $80/B570 AB PLB $80/B571 0A ASL A A:0000 X:0024 Y:0004 P:envmxdIzc $80/B572 AA TAX A:0000 X:0024 Y:0004 P:envmxdIZc $80/B573 BD 4A 0C LDA $0C4A,x[$7E:0C4A] A:0000 X:0000 Y:0004 P:envmxdIZc $80/B576 85 02 STA $02 [$00:0002] A:000C X:0000 Y:0004 P:envmxdIzc $80/B578 BD 56 0C LDA $0C56,x[$7E:0C56] A:000C X:0000 Y:0004 P:envmxdIzc $80/B57B 85 04 STA $04 [$00:0004] A:0002 X:0000 Y:0004 P:envmxdIzc $80/B57D BD 9E 0C LDA $0C9E,x[$7E:0C9E] A:0002 X:0000 Y:0004 P:envmxdIzc $80/B580 EB XBA A:0000 X:0000 Y:0004 P:envmxdIZc $80/B581 0A ASL A A:0000 X:0000 Y:0004 P:envmxdIZc $80/B582 0A ASL A A:0000 X:0000 Y:0004 P:envmxdIZc $80/B583 18 CLC A:0000 X:0000 Y:0004 P:envmxdIZc $80/B584 7D 92 0C ADC $0C92,x[$7E:0C92] A:0000 X:0000 Y:0004 P:envmxdIZc $80/B587 18 CLC A:0003 X:0000 Y:0004 P:envmxdIzc $80/B588 69 80 20 ADC #$2080 A:0003 X:0000 Y:0004 P:envmxdIzc $80/B58B 85 08 STA $08 [$00:0008] A:2083 X:0000 Y:0004 P:envmxdIzc $80/B58D BD 7A 0C LDA $0C7A,x[$7E:0C7A] A:2083 X:0000 Y:0004 P:envmxdIzc $80/B590 C9 FF 00 CMP #$00FF A:0000 X:0000 Y:0004 P:envmxdIZc $80/B593 D0 03 BNE $03 [$B598] A:0000 X:0000 Y:0004 P:eNvmxdIzc $80/B598 0A ASL A A:0000 X:0000 Y:0004 P:eNvmxdIzc $80/B599 0A ASL A A:0000 X:0000 Y:0004 P:envmxdIZc $80/B59A 0A ASL A A:0000 X:0000 Y:0004 P:envmxdIZc $80/B59B 0A ASL A A:0000 X:0000 Y:0004 P:envmxdIZc $80/B59C 89 10 00 BIT #$0010 A:0000 X:0000 Y:0004 P:envmxdIZc $80/B59F F0 03 BEQ $03 [$B5A4] A:0000 X:0000 Y:0004 P:envmxdIZc $80/B5A4 85 06 STA $06 [$00:0006] A:0000 X:0000 Y:0004 P:envmxdIZc $80/B5A6 BD 3E 0C LDA $0C3E,x[$7E:0C3E] A:0000 X:0000 Y:0004 P:envmxdIZc $80/B5A9 3A DEC A A:0010 X:0000 Y:0004 P:envmxdIzc $80/B5AA 0A ASL A A:000F X:0000 Y:0004 P:envmxdIzc $80/B5AB 0A ASL A A:001E X:0000 Y:0004 P:envmxdIzc $80/B5AC 0A ASL A A:003C X:0000 Y:0004 P:envmxdIzc $80/B5AD 0A ASL A A:0078 X:0000 Y:0004 P:envmxdIzc $80/B5AE 0A ASL A A:00F0 X:0000 Y:0004 P:envmxdIzc $80/B5AF 18 CLC A:01E0 X:0000 Y:0004 P:envmxdIzc $80/B5B0 7D 32 0C ADC $0C32,x[$7E:0C32] A:01E0 X:0000 Y:0004 P:envmxdIzc $80/B5B3 3A DEC A A:01E2 X:0000 Y:0004 P:envmxdIzc $80/B5B4 0A ASL A A:01E1 X:0000 Y:0004 P:envmxdIzc $80/B5B5 85 00 STA $00 [$00:0000] A:03C2 X:0000 Y:0004 P:envmxdIzc $80/B5B7 AA TAX A:03C2 X:0000 Y:0004 P:envmxdIzc $80/B5B8 A9 84 38 LDA #$3884 A:03C2 X:03C2 Y:0004 P:envmxdIzc $80/B5BB 18 CLC A:3884 X:03C2 Y:0004 P:envmxdIzc $80/B5BC 65 06 ADC $06 [$00:0006] A:3884 X:03C2 Y:0004 P:envmxdIzc $80/B5BE 9D 00 76 STA $7600,x[$7E:79C2] A:3884 X:03C2 Y:0004 P:envmxdIzc $80/B5C1 E8 INX A:3884 X:03C2 Y:0004 P:envmxdIzc $80/B5C2 E8 INX A:3884 X:03C3 Y:0004 P:envmxdIzc $80/B5C3 A5 02 LDA $02 [$00:0002] A:3884 X:03C4 Y:0004 P:envmxdIzc $80/B5C5 F0 10 BEQ $10 [$B5D7] A:000C X:03C4 Y:0004 P:envmxdIzc $80/B5C7 3A DEC A A:000C X:03C4 Y:0004 P:envmxdIzc $80/B5C8 A8 TAY A:000B X:03C4 Y:0004 P:envmxdIzc $80/B5C9 A9 85 38 LDA #$3885 A:000B X:03C4 Y:000B P:envmxdIzc $80/B5CC 18 CLC A:3885 X:03C4 Y:000B P:envmxdIzc $80/B5CD 65 06 ADC $06 [$00:0006] A:3885 X:03C4 Y:000B P:envmxdIzc $80/B5CF 9D 00 76 STA $7600,x[$7E:79C4] A:3885 X:03C4 Y:000B P:envmxdIzc $80/B5D2 E8 INX A:3885 X:03C4 Y:000B P:envmxdIzc $80/B5D3 E8 INX A:3885 X:03C5 Y:000B P:envmxdIzc $80/B5D4 88 DEY A:3885 X:03C6 Y:000B P:envmxdIzc $80/B5D5 10 F8 BPL $F8 [$B5CF] A:3885 X:03C6 Y:000A P:envmxdIzc $80/B5D7 A9 86 38 LDA #$3886 A:3885 X:03DC Y:FFFF P:eNvmxdIzc $80/B5DA 18 CLC A:3886 X:03DC Y:FFFF P:envmxdIzc $80/B5DB 65 06 ADC $06 [$00:0006] A:3886 X:03DC Y:FFFF P:envmxdIzc $80/B5DD 9D 00 76 STA $7600,x[$7E:79DC] A:3886 X:03DC Y:FFFF P:envmxdIzc $80/B5E0 A5 00 LDA $00 [$00:0000] A:3886 X:03DC Y:FFFF P:envmxdIzc $80/B5E2 18 CLC A:03C2 X:03DC Y:FFFF P:envmxdIzc $80/B5E3 69 40 00 ADC #$0040 A:03C2 X:03DC Y:FFFF P:envmxdIzc $80/B5E6 85 00 STA $00 [$00:0000] A:0402 X:03DC Y:FFFF P:envmxdIzc $80/B5E8 AA TAX A:0402 X:03DC Y:FFFF P:envmxdIzc $80/B5E9 A5 04 LDA $04 [$00:0004] A:0402 X:0402 Y:FFFF P:envmxdIzc $80/B5EB F0 34 BEQ $34 [$B621] A:0002 X:0402 Y:FFFF P:envmxdIzc $80/B5ED 3A DEC A A:0002 X:0402 Y:FFFF P:envmxdIzc $80/B5EE A8 TAY A:0001 X:0402 Y:FFFF P:envmxdIzc $80/B5EF 5A PHY A:0001 X:0402 Y:0001 P:envmxdIzc $80/B5F0 A9 87 38 LDA #$3887 A:0001 X:0402 Y:0001 P:envmxdIzc $80/B5F3 18 CLC A:3887 X:0402 Y:0001 P:envmxdIzc $80/B5F4 65 06 ADC $06 [$00:0006] A:3887 X:0402 Y:0001 P:envmxdIzc $80/B5F6 9D 00 76 STA $7600,x[$7E:7A02] A:3887 X:0402 Y:0001 P:envmxdIzc $80/B5F9 E8 INX A:3887 X:0402 Y:0001 P:envmxdIzc $80/B5FA E8 INX A:3887 X:0403 Y:0001 P:envmxdIzc $80/B5FB A5 02 LDA $02 [$00:0002] A:3887 X:0404 Y:0001 P:envmxdIzc $80/B5FD F0 0C BEQ $0C [$B60B] A:000C X:0404 Y:0001 P:envmxdIzc $80/B5FF 3A DEC A A:000C X:0404 Y:0001 P:envmxdIzc $80/B600 A8 TAY A:000B X:0404 Y:0001 P:envmxdIzc $80/B601 A5 08 LDA $08 [$00:0008] A:000B X:0404 Y:000B P:envmxdIzc $80/B603 9D 00 76 STA $7600,x[$7E:7A04] A:2083 X:0404 Y:000B P:envmxdIzc $80/B606 E8 INX A:2083 X:0404 Y:000B P:envmxdIzc $80/B607 E8 INX A:2083 X:0405 Y:000B P:envmxdIzc $80/B608 88 DEY A:2083 X:0406 Y:000B P:envmxdIzc $80/B609 10 F8 BPL $F8 [$B603] A:2083 X:0406 Y:000A P:envmxdIzc $80/B60B A9 88 38 LDA #$3888 A:2083 X:041C Y:FFFF P:eNvmxdIzc $80/B60E 18 CLC A:3888 X:041C Y:FFFF P:envmxdIzc $80/B60F 65 06 ADC $06 [$00:0006] A:3888 X:041C Y:FFFF P:envmxdIzc $80/B611 9D 00 76 STA $7600,x[$7E:7A1C] A:3888 X:041C Y:FFFF P:envmxdIzc $80/B614 A5 00 LDA $00 [$00:0000] A:3888 X:041C Y:FFFF P:envmxdIzc $80/B616 18 CLC A:0402 X:041C Y:FFFF P:envmxdIzc $80/B617 69 40 00 ADC #$0040 A:0402 X:041C Y:FFFF P:envmxdIzc $80/B61A 85 00 STA $00 [$00:0000] A:0442 X:041C Y:FFFF P:envmxdIzc $80/B61C AA TAX A:0442 X:041C Y:FFFF P:envmxdIzc $80/B61D 7A PLY A:0442 X:0442 Y:FFFF P:envmxdIzc $80/B61E 88 DEY A:0442 X:0442 Y:0001 P:envmxdIzc $80/B61F 10 CE BPL $CE [$B5EF] A:0442 X:0442 Y:0000 P:envmxdIZc $80/B621 A9 89 38 LDA #$3889 A:0482 X:0482 Y:FFFF P:eNvmxdIzc $80/B624 18 CLC A:3889 X:0482 Y:FFFF P:envmxdIzc $80/B625 65 06 ADC $06 [$00:0006] A:3889 X:0482 Y:FFFF P:envmxdIzc $80/B627 9D 00 76 STA $7600,x[$7E:7A82] A:3889 X:0482 Y:FFFF P:envmxdIzc $80/B62A E8 INX A:3889 X:0482 Y:FFFF P:envmxdIzc $80/B62B E8 INX A:3889 X:0483 Y:FFFF P:envmxdIzc $80/B62C A5 02 LDA $02 [$00:0002] A:3889 X:0484 Y:FFFF P:envmxdIzc $80/B62E F0 10 BEQ $10 [$B640] A:000C X:0484 Y:FFFF P:envmxdIzc $80/B630 3A DEC A A:000C X:0484 Y:FFFF P:envmxdIzc $80/B631 A8 TAY A:000B X:0484 Y:FFFF P:envmxdIzc $80/B632 A9 8A 38 LDA #$388A A:000B X:0484 Y:000B P:envmxdIzc $80/B635 18 CLC A:388A X:0484 Y:000B P:envmxdIzc $80/B636 65 06 ADC $06 [$00:0006] A:388A X:0484 Y:000B P:envmxdIzc $80/B638 9D 00 76 STA $7600,x[$7E:7A84] A:388A X:0484 Y:000B P:envmxdIzc $80/B63B E8 INX A:388A X:0484 Y:000B P:envmxdIzc $80/B63C E8 INX A:388A X:0485 Y:000B P:envmxdIzc $80/B63D 88 DEY A:388A X:0486 Y:000B P:envmxdIzc $80/B63E 10 F8 BPL $F8 [$B638] A:388A X:0486 Y:000A P:envmxdIzc $80/B640 A9 8B 38 LDA #$388B A:388A X:049C Y:FFFF P:eNvmxdIzc $80/B643 18 CLC A:388B X:049C Y:FFFF P:envmxdIzc $80/B644 65 06 ADC $06 [$00:0006] A:388B X:049C Y:FFFF P:envmxdIzc $80/B646 9D 00 76 STA $7600,x[$7E:7A9C] A:388B X:049C Y:FFFF P:envmxdIzc $80/B649 A9 01 00 LDA #$0001 ; Set Flag for VRAM update $80/B64C 8D 42 07 STA $0742 $80/B64F AB PLB ; Restore Program Bank $80/B650 6B RTL
$80/B91E TEXTBOX: Clear Tiles
$80/B91E 08 PHP ; Buffer Flag Register value and Program Bank on stack $80/B91F 8B PHB $80/B920 F4 00 7E PEA $7E00 ; Set Program Bank to $7E $80/B923 AB PLB $80/B924 AB PLB $80/B925 C2 30 REP #$30 ; A/X/Y = 16-bit $80/B927 A2 FE 07 LDX #$07FE ; Setup Store Index/Loop Counter $80/B92A A9 80 00 LDA #$0080 ; Load Value to clear $80/B92D 9D 00 76 STA $7600,x ; Store in Textbox Tile Buffer $80/B930 CA DEX ; Decrement Store Index/Loop Counter twice $80/B931 CA DEX $80/B932 10 F6 BPL $F6 ; [$B92A] Loop until everything is done $80/B934 A9 01 00 LDA #$0001 ; Set Flag for VRAM update $80/B937 8D 42 07 STA $0742 $80/B93A AB PLB ; Restore Flag Register value and Program Bank $80/B93B 28 PLP $80/B93C 6B RTL
$80/BB84 MCC Memory Controller Settings: Enable Flash R/W
$80/BB84 08 PHP ; Buffer Flag Register value on stack $80/BB85 E2 20 SEP #$20 ; A = 8-bit $80/BB87 A9 00 LDA #$00 $80/BB89 8F 00 50 05 STA $055000 ; Bank $40-$4F: PSRAM $80/BB8D 8F 00 50 06 STA $065000 ; Bank $50-$5F: PSRAM $80/BB91 8F 00 50 04 STA $045000 ; LoROM Mapping $80/BB95 8F 00 50 01 STA $015000 ; Bank $00-$3F: Flash $80/BB99 A9 80 LDA #$80 $80/BB9B 8F 00 50 02 STA $025000 ; Flash: HiROM $80/BB9F 8F 00 50 03 STA $035000 ; Bank $60-$6F: Flash $80/BBA3 8F 00 50 0C STA $0C5000 ; Enable Bank $C0-$FF Flash Reads $80/BBA7 8F 00 50 0D STA $0D5000 ; Enable Bank $C0-$FF Flash Writes $80/BBAB 8F 00 50 0E STA $0E5000 ; Apply Changes to Other MCC Registers $80/BBAF 28 PLP ; Restore Flag Register value $80/BBB0 6B RTL
$80/BBB1 MCC Memory Controller Settings: Disable Flash R/W
$80/BBB1 08 PHP ; Buffer Flag Register value on stack $80/BBB2 E2 20 SEP #$20 ; A = 8-bit $80/BBB4 A9 00 LDA #$00 $80/BBB6 8F 00 50 05 STA $055000 ; Bank $40-$4F: PSRAM $80/BBBA 8F 00 50 06 STA $065000 ; Bank $50-$5F: PSRAM $80/BBBE 8F 00 50 04 STA $045000 ; LoROM Mapping $80/BBC2 8F 00 50 01 STA $015000 ; Bank $00-$3F: Flash $80/BBC6 8F 00 50 0C STA $0C5000 ; Disable Bank $C0-$FF Flash Reads $80/BBCA 8F 00 50 0D STA $0D5000 ; Disable Bank $C0-$FF Flash Writes $80/BBCE A9 80 LDA #$80 $80/BBD0 8F 00 50 02 STA $025000 ; Flash: HiROM $80/BBD4 8F 00 50 03 STA $035000 ; Bank $60-$6F: Flash $80/BBD8 8F 00 50 0E STA $0E5000 ; Apply Changes to Other MCC Registers $80/BBDC 28 PLP ; Restore Flag Register value $80/BBDD 6B RTL
$80/BD6C ? (Execute Subroutine from Jump Table)
$80/BD6C 08 PHP ; Buffer Flag Register value on stack $80/BD6D E2 30 SEP #$30 ; A/X/Y = 8-bit $80/BD6F AD 41 14 LDA $1441 ; Load Jump Table Index $80/BD72 0A ASL A ; Multiply by 2 (each Jump Table Entry is 2 bytes in size) $80/BD73 AA TAX ; Transfer to X $80/BD74 FC 79 BD JSR ($BD79,x) ; JUMP $80/BD77 28 PLP ; Restore Flag Register value $80/BD78 6B RTL
$80/BD79 Jump Table for $80/BD6C
81 BD 86 BD 8B BD 90 BD
$80/BD81 ?
$80/BD81 22 94 5A 10 JSL $105A94[$10:5A94] A:0 X:0 Y:0 P:envMXdIZc $80/BD85 60 RTS A:00FF X:0 Y:0 P:eNvMXdIzc
$80/BD95 ?
$80/BD95 A9 FF LDA #$FF A:0 X:0 Y:0 P:envMXdIZc $80/BD97 8F 00 00 C0 STA $C00000[$C0:0000] A:00FF X:0 Y:0 P:eNvMXdIzc $80/BD9B 6B RTL A:00FF X:0 Y:0 P:eNvMXdIzc
$80/C177 ? (Check if Data from Flash Cart is valid)
$80/C177 08 PHP ; Buffer Flag Register value on stack $80/C178 E2 20 SEP #$20 ; A = 8-bit $80/C17A C2 10 REP #$10 ; X/Y = 16-bit $80/C17C 22 10 5B 10 JSL $105B10[$10:5B10] A:0080 X:0007 Y:0 P:eNvMxdIzC $80/C180 AF D6 99 7E LDA $7E99D6[$7E:99D6] A:00FF X:0 Y:0 P:eNvMxdIzC $80/C184 C9 4D CMP #$4D A:004D X:0 Y:0 P:envMxdIzC $80/C186 D0 36 BNE $36 ; [$C1BE] Flash Cart data isn't valid - clear flag, exit $80/C188 AF D7 99 7E LDA $7E99D7[$7E:99D7] A:004D X:0 Y:0 P:envMxdIZC $80/C18C C9 50 CMP #$50 A:0050 X:0 Y:0 P:envMxdIzC $80/C18E D0 2E BNE $2E ; [$C1BE] Flash Cart data isn't valid - clear flag, exit $80/C190 AF D8 99 7E LDA $7E99D8[$7E:99D8] A:0050 X:0 Y:0 P:envMxdIZC $80/C194 29 81 AND #$81 A:0 X:0 Y:0 P:envMxdIZC $80/C196 D0 26 BNE $26 ; [$C1BE] Flash Cart data isn't valid - clear flag, exit $80/C198 E2 10 SEP #$10 A:0 X:0 Y:0 P:envMxdIZC $80/C19A AF D9 99 7E LDA $7E99D9[$7E:99D9] A:0 X:0 Y:0 P:envMXdIZC $80/C19E 4A LSR A A:002B X:0 Y:0 P:envMXdIzC $80/C19F 4A LSR A A:0015 X:0 Y:0 P:envMXdIzC $80/C1A0 4A LSR A A:000A X:0 Y:0 P:envMXdIzC $80/C1A1 4A LSR A A:0005 X:0 Y:0 P:envMXdIzc $80/C1A2 3A DEC A A:0002 X:0 Y:0 P:envMXdIzC $80/C1A3 8D 41 14 STA $1441 [$80:1441] A:0001 X:0 Y:0 P:envMXdIzC $80/C1A6 C9 04 CMP #$04 A:0001 X:0 Y:0 P:envMXdIzC $80/C1A8 B0 14 BCS $14 [$C1BE] A:0001 X:0 Y:0 P:eNvMXdIzc $80/C1AA AF D9 99 7E LDA $7E99D9[$7E:99D9] A:0001 X:0 Y:0 P:eNvMXdIzc $80/C1AE 29 0F AND #$0F A:002B X:0 Y:0 P:envMXdIzc $80/C1B0 38 SEC A:000B X:0 Y:0 P:envMXdIzc $80/C1B1 E9 06 SBC #$06 ; If value is less than #$06... $80/C1B3 90 09 BCC $09 ; [$C1BE] ... Flash Cart data isn't valid - clear flag, exit $80/C1B5 AA TAX A:0005 X:0 Y:0 P:envMXdIzC $80/C1B6 A9 01 LDA #$01 ; Set Flag in $1440 "Flash Cart data is valid" $80/C1B8 CA DEX ; Decrement X $80/C1B9 F0 05 BEQ $05 ; [$C1C0] Exit when X has run out $80/C1BB 0A ASL A ; The flag gets pushed on bit to the left for 1 in X $80/C1BC 80 FA BRA $FA ; [$C1B8] (Loop until X has run out) $80/C1BE A9 00 LDA #$00 ; Clear Flag in $1440: Flash Cart data is invalid $80/C1C0 8D 40 14 STA $1440 $80/C1C3 28 PLP ; Restore Flag Register value $80/C1C4 6B RTL
$80/C1C5 ?
See nocash's FullSNES, Section "SNES Cart Satellaview I/O FLASH Detection"
$80/C1C5 08 PHP ; Buffer Flag Register value on stack $80/C1C6 E2 30 SEP #$30 ; A/X/Y = 8-bit $80/C1C8 A9 38 LDA #$38 ; DETECTION SEQUENCE FOR FLASH CHIP $80/C1CA 8F 00 00 C0 STA $C00000 ; Send #$38 and #$D0 to Flash Chip $80/C1CE A9 D0 LDA #$D0 $80/C1D0 8F 00 00 C0 STA $C00000 $80/C1D4 48 PHA ; Wait $80/C1D5 68 PLA $80/C1D6 48 PHA $80/C1D7 68 PLA $80/C1D8 48 PHA $80/C1D9 68 PLA $80/C1DA A9 71 LDA #$71 ; "Enter Status Mode" $80/C1DC 8F 00 00 C0 STA $C00000 $80/C1E0 AF 02 00 C0 LDA $C00002 ; Wait until Flash Cart sets MSB (ready) $80/C1E4 10 FA BPL $FA ; [$C1E0] $80/C1E6 A9 72 LDA #$72 ; "Request Chip Info Part 2" ($72, $75) $80/C1E8 8F 00 00 C0 STA $C00000 $80/C1EC A9 75 LDA #$75 $80/C1EE 8F 00 00 C0 STA $C00000 $80/C1F2 AF 00 FF C0 LDA $C0FF00[$C0:FF00] A:0075 X:0007 Y:0 P:envMXdIzC $80/C1F6 8F D6 99 7E STA $7E99D6[$7E:99D6] A:004D X:0007 Y:0 P:envMXdIzC $80/C1FA AF 02 FF C0 LDA $C0FF02[$C0:FF02] A:004D X:0007 Y:0 P:envMXdIzC $80/C1FE 8F D7 99 7E STA $7E99D7[$7E:99D7] A:0050 X:0007 Y:0 P:envMXdIzC $80/C202 AF 04 FF C0 LDA $C0FF04[$C0:FF04] A:0050 X:0007 Y:0 P:envMXdIzC $80/C206 8F D8 99 7E STA $7E99D8[$7E:99D8] A:0 X:0007 Y:0 P:envMXdIZC $80/C20A AF 06 FF C0 LDA $C0FF06[$C0:FF06] A:0 X:0007 Y:0 P:envMXdIZC $80/C20E 8F D9 99 7E STA $7E99D9[$7E:99D9] A:002B X:0007 Y:0 P:envMXdIzC $80/C212 AF 08 FF C0 LDA $C0FF08[$C0:FF08] A:002B X:0007 Y:0 P:envMXdIzC $80/C216 8F DA 99 7E STA $7E99DA[$7E:99DA] A:0 X:0007 Y:0 P:envMXdIZC $80/C21A AF 0A FF C0 LDA $C0FF0A[$C0:FF0A] A:0 X:0007 Y:0 P:envMXdIZC $80/C21E 8F DB 99 7E STA $7E99DB[$7E:99DB] A:0 X:0007 Y:0 P:envMXdIZC $80/C222 AF 0C FF C0 LDA $C0FF0C[$C0:FF0C] A:0 X:0007 Y:0 P:envMXdIZC $80/C226 8F DC 99 7E STA $7E99DC[$7E:99DC] A:0 X:0007 Y:0 P:envMXdIZC $80/C22A AF 0E FF C0 LDA $C0FF0E[$C0:FF0E] A:0 X:0007 Y:0 P:envMXdIZC $80/C22E 8F DD 99 7E STA $7E99DD[$7E:99DD] A:0 X:0007 Y:0 P:envMXdIZC $80/C232 AF 10 FF C0 LDA $C0FF10[$C0:FF10] A:0 X:0007 Y:0 P:envMXdIZC $80/C236 8F DE 99 7E STA $7E99DE[$7E:99DE] A:0 X:0007 Y:0 P:envMXdIZC $80/C23A AF 12 FF C0 LDA $C0FF12[$C0:FF12] A:0 X:0007 Y:0 P:envMXdIZC $80/C23E 8F DF 99 7E STA $7E99DF[$7E:99DF] A:0 X:0007 Y:0 P:envMXdIZC $80/C242 22 90 5A 10 JSL $105A90[$10:5A90] A:0 X:0007 Y:0 P:envMXdIZC $80/C246 28 PLP ; Restore Flag Register value $80/C247 6B RTL
$80/C2AD Check if Satellaview Stream Number Registers work
If something went wrong, A != #$00 at the end. If everything is fine, A = #$00.
$80/C2AD A9 01 LDA #$01 ; Set Power Bit for Satellaview $80/C2AF 8D 94 21 STA $2194 $80/C2B2 A9 AA LDA #$AA ; Check if you can write into $2188 and check if it keeps its value $80/C2B4 8D 88 21 STA $2188 $80/C2B7 CD 88 21 CMP $2188 $80/C2BA D0 22 BNE $22 ; [$C2DE] Exit if it doesn't work $80/C2BC A9 55 LDA #$55 ; Check if you can write into $2188 and check if it keeps its value $80/C2BE 8D 88 21 STA $2188 $80/C2C1 CD 88 21 CMP $2188 $80/C2C4 D0 18 BNE $18 ; [$C2DE] Exit if it doesn't work $80/C2C6 9C 88 21 STZ $2188 ; Check if you can clear $2189/9/E/F and the values stay cleared $80/C2C9 9C 89 21 STZ $2189 $80/C2CC 9C 8E 21 STZ $218E $80/C2CF 9C 8F 21 STZ $218F $80/C2D2 AD 88 21 LDA $2188 $80/C2D5 0D 89 21 ORA $2189 $80/C2D8 0D 8E 21 ORA $218E $80/C2DB 0D 8F 21 ORA $218F $80/C2DE 6B RTL
$80/C36D Transfer (fixed Set of) Data to Satellaview
This subroutine transfers data to the Satellaview via Serial Port 2.
First, it sends "08" and then "00" (maybe the "$08" says that there will come eight double-bytes in total?). Then it sends one byte with a counter value and one data byte from $C392. So the transfered data is:
08 00 00 xx 01 xx 02 xx 03 xx 04 xx 05 xx 06 xx (xx = data bytes from $80/C392)
$80/C36D 8B PHB ; Buffer Program Bank on Stack $80/C36E 4B PHK ; Set Program Bank to $80 $80/C36F AB PLB $80/C370 A9 41 LDA #$41 ; Select port 1 (to signalize a transfer comes up!?), set Clock bit $80/C372 8D 99 21 STA $2199 $80/C375 A9 00 LDA #$00 ; Setup first double-byte to transfer: $08 $00 $80/C377 EB XBA $80/C378 A9 08 LDA #$08 $80/C37A 22 B0 59 10 JSL $1059B0 ; Transfer Data to Satellaview via Serial I/O Port 2 $80/C37E A2 00 00 LDX #$0000 ; Setup counter for Data Loading/Transfer $80/C381 BD 92 C3 LDA $C392,x ; Load byte to transfer $80/C384 EB XBA $80/C385 8A TXA ; Transfer Counter Value from X to A $80/C386 22 B0 59 10 JSL $1059B0 ; Transfer Data to Satellaview via Serial I/O Port 2 $80/C38A E8 INX ; Increment Counter $80/C38B E0 07 00 CPX #$0007 ; Branch if the counter hasn't reached #$0007 yet $80/C38E 90 F1 BCC $F1 ; [$C381] $80/C390 AB PLB ; Restore Program Bank $80/C391 6B RTL
$80/C392 Data for Satellaview (transfered at $80/C36D)
§80/C392 88 80 04 00 08 00 70
$80/C3D6 Transfer Data to Satellaview via Serial I/O Port 2
From nocash's FullSNES document:
2198h Serial I/O Port 1 (R/W) 2199h Serial I/O Port 2 (R/W) These ports are basically 3-bit parallel ports, which can be used as three-wire serial ports (with clock, data.in, data.out lines) (by doing the "serial" transfer by software). Outgoing data must be written before toggling clock, incoming data can be read thereafter. 0 Clock (must be manually toggled per data bit) 1-5 Unknown/unused (should be 0) 6 Chip Select - For Port 1: 1=Select / For Port 2: 0=Select 7 Data (Write=Data.Out, Read=Data.in) (data-in is directly poll-able) Bits are transferred MSB first. Unknown which chips these ports are connected to. One port does most probably connect to the 64pin MN88821 chip (which should do have a serial port; assuming that it is a MN88831 variant). The other port <might> connect to the small 8pin SPR-BSA chip? Possible purposes might be configuration/calibration, Audio volume control, and Audio channel selection (assuming that the hardware can decode audio data and inject it to SNES Expansion Port sound inputs).
A contains a 16-bit value that gets transfered via Serial I/O Port 2 ($2199) to the Satellaview. The MSB gets transfered first.
As mentioned: A contains a 16-bit value, even though A has to be set to 8-bit-size before this Subroutine gets executed.
$80/C3D6 A0 08 00 LDY #$0008 ; Setup counter for first byte $80/C3D9 48 PHA ; Buffer first byte on stack $80/C3DA 29 80 AND #$80 ; Transfer bit $80/C3DC 8D 99 21 STA $2199 $80/C3DF 09 01 ORA #$01 ; Toggle Clock bit $80/C3E1 8D 99 21 STA $2199 $80/C3E4 68 PLA ; Restore byte $80/C3E5 0A ASL A ; Prepare byte to transfer next bit $80/C3E6 88 DEY ; Decrement Loop Counter $80/C3E7 D0 F0 BNE $F0 ; [$C3D9] $80/C3E9 EB XBA ; Now do the second byte $80/C3EA A0 08 00 LDY #$0008 ; Reset counter for second byte $80/C3ED 48 PHA ; Buffer second byte on stack $80/C3EE 29 80 AND #$80 ; Transfer bit $80/C3F0 8D 99 21 STA $2199 $80/C3F3 09 01 ORA #$01 ; Toggle Clock bit $80/C3F5 8D 99 21 STA $2199 $80/C3F8 68 PLA ; Restore byte $80/C3F9 0A ASL A ; Prepare byte to transfer next bit $80/C3FA 88 DEY ; Decrement Loop Counter $80/C3FB D0 F0 BNE $F0 ; [$C3ED] $80/C3FD A9 41 LDA #$41 ; Select port 1 (to make sure this transfer is over?), set Clock bit $80/C3FF 8D 99 21 STA $2199 $80/C402 6B RTL
This transfers the original Hook Vectors & Reset function from ROM to SRAM (after the SRAM is reset).
$80/C5BC 08 PHP ; Buffer Flag Register value on stack $80/C5BD C2 30 REP #$30 ; A/X/Y = 16 bit $80/C5BF A2 12 03 LDX #$0312 $80/C5C2 BF D0 C5 80 LDA $80C5D0,x $80/C5C6 9F 8C 59 10 STA $10598C,x $80/C5CA CA DEX $80/C5CB CA DEX $80/C5CC 10 F4 BPL $F4 ; [$C5C2] $80/C5CE 28 PLP ; Restore Flag Register $80/C5CF 6B RTL
$80/C8E4 ?
$80/C8E4 08 PHP A:0000 X:0000 Y:E280 P:envmxdIzc $80/C8E5 E2 20 SEP #$20 A:0000 X:0000 Y:E280 P:envmxdIzc $80/C8E7 A9 00 LDA #$00 A:0000 X:0000 Y:E280 P:envMxdIzc $80/C8E9 8F 00 50 10 STA $105000[$10:5000] A:0000 X:0000 Y:E280 P:envMxdIZc $80/C8ED 8F 00 50 13 STA $135000[$13:5000] A:0000 X:0000 Y:E280 P:envMxdIZc $80/C8F1 22 F7 C8 80 JSL $80C8F7[$80:C8F7] A:0000 X:0000 Y:E280 P:envMxdIZc $80/C8F5 28 PLP A:0000 X:FFFE Y:E280 P:envMxdIZc $80/C8F6 6B RTL A:0000 X:FFFE Y:E280 P:envmxdIzc
I am not entirely sure, but $02 is at least used as a flag (maybe for more):
First, it gets cleared (everything is fine). If something is wrong, it gets checked if it is clear. If it is, the backup from banks $13-15 gets transfered to $10-$12, its value gets incremented and the subroutine starts over. If something goes wrong again, the subroutine branches to a different path.
$80/C8F7 08 PHP ; Buffer Flag Register value on stack $80/C8F8 C2 30 REP #$30 ; A/X/Y = 16 bit $80/C8FA 9C 02 00 STZ $0002 [$80:0002] A:0 X:0 Y:E280 P:envmxdIzc $80/C8FD AF 00 50 10 LDA $105000 ; Check if a Satellaview is connected $80/C901 C9 53 47 CMP #$4753 ; If it is, it has #$4753 in $10/5000 (ASCII: "SG") $80/C904 D0 45 BNE $45 ; [$C94B] Branch if not $80/C906 AF 04 50 10 LDA $105004 ; Load Checksum $80/C90A 4F 02 50 10 EOR $105002 ; EOR it with the Checksum Complement $80/C90E C9 FF FF CMP #$FFFF ; Does Checksum fit with its complement? $80/C911 D0 38 BNE $38 ; [$C94B] Branch if not $80/C913 64 00 STZ $00 [$00:0000] A:FFFF X:0 Y:E280 P:envmxdIZC $80/C915 A2 FF 0F LDX #$0FFF ; CALCULATE CHECKSUM $80/C918 BF 00 50 10 LDA $105000,x ; The Checksum is every byte between $5000-$5FFF (from banks $10-$12) added together $80/C91C 29 FF 00 AND #$00FF $80/C91F 18 CLC $80/C920 65 00 ADC $00 $80/C922 85 00 STA $00 $80/C924 BF 00 50 11 LDA $115000,x $80/C928 29 FF 00 AND #$00FF $80/C92B 18 CLC $80/C92C 65 00 ADC $00 $80/C92E 85 00 STA $00 $80/C930 BF 00 50 12 LDA $125000,x $80/C934 29 FF 00 AND #$00FF $80/C937 18 CLC $80/C938 65 00 ADC $00 $80/C93A 85 00 STA $00 $80/C93C CA DEX $80/C93D 10 D9 BPL $D9 ; [$C918] Loop $80/C93F CF 04 50 10 CMP $105004 ; Is the calculated Checksum the same as the one in $10/5004? $80/C943 D0 06 BNE $06 ; [$C94B] Branch if not $80/C945 22 1B CA 80 JSL $80CA1B ; Copy data from banks $10-$12 to $13-$15 $80/C949 80 42 BRA $42 ; [$C98D] Exit
(executed when Satellaview does not respond correctly)
$80/C94B A5 02 LDA $02 [$00:0002] A:4700 X:0000 Y:E280 P:eNvmxdIzc $80/C94D D0 08 BNE $08 [$C957] A:0000 X:0000 Y:E280 P:envmxdIZc $80/C94F E6 02 INC $02 [$00:0002] A:0000 X:0000 Y:E280 P:envmxdIZc $80/C951 22 F7 C9 80 JSL $80C9F7 ; Satellaview-related: Copy data from banks $13-$15 to $10-$12 $80/C955 80 A6 BRA $A6 ; [$C8FD] Go back to the start and check if everything works now $80/C957 22 8F C9 80 JSL $80C98F ; Clear banks $10-$12 $80/C95B 22 FF BC 94 JSL $94BCFF ; Clear BS-X SRAM $80/C95F AD 8E C9 LDA $C98E ; This could be optimized with an "LDA #$6B" (UNNECESSARY LINE) $80/C962 8F 74 59 10 STA $105974 ; "Boot Hook" $80/C966 8F 78 59 10 STA $105978 ; "NMI Hook" $80/C96A 8F 7C 59 10 STA $10597C ; "IRQ Vector" $80/C96E 8F 80 59 10 STA $105980 ; "Download Start Hook" $80/C972 8F 84 59 10 STA $105984 ; "File Start Hook" $80/C976 8F 88 59 10 STA $105988 ; "Whatever Hook" $80/C97A A9 53 47 LDA #$4753 ; Store ASCII text "SG" in $10/5000 $80/C97D 8F 00 50 10 STA $105000 $80/C981 22 D7 C5 81 JSL $81C5D7 ; Restore original Hook Vectors $80/C985 22 BC C5 80 JSL $80C5BC ; Restore original Fuction Hook Vectors & Reset function $80/C989 22 AA C9 80 JSL $80C9AA ; Calculate new SRAM Checksum $80/C98D 28 PLP ; Restore Flag Register value $80/C98E 6B RTL
$80/C98F 08 PHP ; Buffer Flag Register value on stack $80/C990 C2 30 REP #$30 ; $80/C992 A9 00 00 LDA #$0000 A:0001 X:FFFE Y:E280 P:envmxdIzc $80/C995 A2 FE 0F LDX #$0FFE A:0000 X:FFFE Y:E280 P:envmxdIZc $80/C998 9F 00 50 10 STA $105000,x[$10:5FFE] A:0000 X:0FFE Y:E280 P:envmxdIzc $80/C99C 9F 00 50 11 STA $115000,x[$11:5FFE] A:0000 X:0FFE Y:E280 P:envmxdIzc $80/C9A0 9F 00 50 12 STA $125000,x[$12:5FFE] A:0000 X:0FFE Y:E280 P:envmxdIzc $80/C9A4 CA DEX A:0000 X:0FFE Y:E280 P:envmxdIzc $80/C9A5 CA DEX A:0000 X:0FFD Y:E280 P:envmxdIzc $80/C9A6 10 F0 BPL $F0 ; [$C998] Loop until everything is done $80/C9A8 28 PLP ; Restore Flag Register value $80/C9A9 6B RTL
$80/C9AA Calculate new SRAM Checksum
$80/C9AA 08 PHP ; Buffer Flag Register value on stack $80/C9AB C2 30 REP #$30 ; A/X/Y = 16 bit $80/C9AD A9 00 00 LDA #$0000 ; Set temporary Checksum: #$0000 $80/C9B0 8F 04 50 10 STA $105004 $80/C9B4 3A DEC A ; Set temporary Checksum Complement: #$FFFF $80/C9B5 8F 02 50 10 STA $105002 $80/C9B9 9C 00 00 STZ $0000 ; Clear Buffer for Checksum $80/C9BC A2 FF 0F LDX #$0FFF ; CALCULATE CHECKSUM $80/C9BF BF 00 50 10 LDA $105000,x ; The Checksum is every byte between $5000-$5FFF (from banks $10-$12) added together $80/C9C3 29 FF 00 AND #$00FF $80/C9C6 18 CLC $80/C9C7 65 00 ADC $00 $80/C9C9 85 00 STA $00 $80/C9CB BF 00 50 11 LDA $115000,x $80/C9CF 29 FF 00 AND #$00FF $80/C9D2 18 CLC $80/C9D3 65 00 ADC $00 $80/C9D5 85 00 STA $00 $80/C9D7 BF 00 50 12 LDA $125000,x $80/C9DB 29 FF 00 AND #$00FF $80/C9DE 18 CLC $80/C9DF 65 00 ADC $00 $80/C9E1 85 00 STA $00 $80/C9E3 CA DEX $80/C9E4 10 D9 BPL $D9 ; [$C9BF] $80/C9E6 8F 04 50 10 STA $105004 ; Store Checksum $80/C9EA 49 FF FF EOR #$FFFF ; Form Checksum Complement and store it $80/C9ED 8F 02 50 10 STA $105002 $80/C9F1 28 PLP ; Restore Flag Register value $80/C9F2 22 1B CA 80 JSL $80CA1B ; Copy data from banks $10-$12 to $13-$15 $80/C9F6 6B RTL
This subroutine copies the data from $5000-$5FFF from the banks $13-15 to $10-12.
$80/C9F7 08 PHP ; Buffer Flag Register value on stack $80/C9F8 C2 30 REP #$30 ; A/X/Y = 16 bit $80/C9FA A2 FE 0F LDX #$0FFE ; Setup Load/Store Index/Loop Counter $80/C9FD BF 00 50 13 LDA $135000,x ; Transfer from bank $13 to $10 $80/CA01 9F 00 50 10 STA $105000,x $80/CA05 BF 00 50 14 LDA $145000,x ; Transfer from bank $14 to $11 $80/CA09 9F 00 50 11 STA $115000,x $80/CA0D BF 00 50 15 LDA $155000,x ; Transfer from bank $15 to $12 $80/CA11 9F 00 50 12 STA $125000,x $80/CA15 CA DEX ; Decrement Load/Store Index twice $80/CA16 CA DEX $80/CA17 10 E4 BPL $E4 ; [$C9FD] Loop until everything is done $80/CA19 28 PLP ; Restore Flag Register value $80/CA1A 6B RTL
This subroutine copies the data from $5000-$5FFF from the banks $10-12 to $13-15.
$80/CA1B 08 PHP ; Buffer Flag Register value on stack $80/CA1C C2 30 REP #$30 ; A/X/Y = 16 bit $80/CA1E A2 FE 0F LDX #$0FFE ; Setup Load/Store Index/Loop Counter $80/CA21 BF 00 50 10 LDA $105000,x ; Transfer from bank $10 to $13 $80/CA25 9F 00 50 13 STA $135000,x $80/CA29 BF 00 50 11 LDA $115000,x ; Transfer from bank $11 to $14 $80/CA2D 9F 00 50 14 STA $145000,x $80/CA31 BF 00 50 12 LDA $125000,x ; Transfer from bank $12 to $15 $80/CA35 9F 00 50 15 STA $155000,x $80/CA39 CA DEX ; Decrement Load/Store Index twice $80/CA3A CA DEX $80/CA3B 10 E4 BPL $E4 ; [$CA21] Loop until everything is done $80/CA3D 28 PLP ; Restore Flag Register value $80/CA3E 6B RTL
$80/E7A3 ?
Executed while NMI.
$80/E7A3 08 PHP ; Buffer Flag Register value on stack $80/E7A4 E2 30 SEP #$30 ; A/X/Y = 8-bit $80/E7A6 AD D2 13 LDA $13D2 [$80:13D2] A:0 X:00FF Y:0 P:envMXdIzC $80/E7A9 D0 35 BNE $35 [$E7E0] A:0 X:00FF Y:0 P:envMXdIZC $80/E7AB AE DD 13 LDX $13DD [$80:13DD] A:0 X:00FF Y:0 P:envMXdIZC $80/E7AE EC DE 13 CPX $13DE [$80:13DE] A:0 X:0 Y:0 P:envMXdIZC $80/E7B1 F0 2D BEQ $2D [$E7E0] A:0 X:0 Y:0 P:envMXdIZC
code is missing here
$80/E7E0 28 PLP ; Restore Flag Register value $80/E7E1 6B RTL
$80/EA28 ?
Executed while NMI.
$80/EA28 08 PHP ; Buffer Flag Register value on stack $80/EA29 AD D2 13 LDA $13D2 [$80:13D2] A:0 X:0 Y:0 P:envMxdIzC $80/EA2C F0 0C BEQ $0C [$EA3A] A:0 X:0 Y:0 P:envMxdIZC
code is missing here
$80/EA3A 28 PLP ; Restore Flag Register value $80/EA3B 6B RTL
$80/EFD6 ?
Executed while NMI.
$80/EFD6 08 PHP ; Buffer Flag Register value on stack $80/EFD7 E2 30 SEP #$30 ; A/X/Y = 8-bit $80/EFD9 AD C9 13 LDA $13C9 [$80:13C9] A:0 X:00FF Y:0 P:envMXdIzC $80/EFDC F0 0B BEQ $0B [$EFE9] A:0 X:00FF Y:0 P:envMXdIZC
code is missing here
$80/EFE9 28 PLP ; Restore Flag Register value $80/EFEA 6B RTL
$80/F1EB ?
$80/F1EB 08 PHP ; Buffer Flag Register value on stack $80/F1EC E2 20 SEP #$20 ; A = 8-bit $80/F1EE C2 10 REP #$10 ; X/Y = 16-bit $80/F1F0 9C D1 13 STZ $13D1 [$80:13D1] A:0061 X:FFFE Y:0 P:eNvMxdIzC $80/F1F3 9C D2 13 STZ $13D2 [$80:13D2] A:0061 X:FFFE Y:0 P:eNvMxdIzC $80/F1F6 9C DD 13 STZ $13DD [$80:13DD] A:0061 X:FFFE Y:0 P:eNvMxdIzC $80/F1F9 9C DE 13 STZ $13DE [$80:13DE] A:0061 X:FFFE Y:0 P:eNvMxdIzC $80/F1FC 9C DF 13 STZ $13DF [$80:13DF] A:0061 X:FFFE Y:0 P:eNvMxdIzC $80/F1FF 9C C4 13 STZ $13C4 [$80:13C4] A:0061 X:FFFE Y:0 P:eNvMxdIzC $80/F202 9C B6 13 STZ $13B6 [$80:13B6] A:0061 X:FFFE Y:0 P:eNvMxdIzC $80/F205 9C B2 13 STZ $13B2 [$80:13B2] A:0061 X:FFFE Y:0 P:eNvMxdIzC $80/F208 9C B4 13 STZ $13B4 [$80:13B4] A:0061 X:FFFE Y:0 P:eNvMxdIzC $80/F20B 9C B5 13 STZ $13B5 [$80:13B5] A:0061 X:FFFE Y:0 P:eNvMxdIzC $80/F20E 9C BF 13 STZ $13BF [$80:13BF] A:0061 X:FFFE Y:0 P:eNvMxdIzC $80/F211 9C 42 14 STZ $1442 [$80:1442] A:0061 X:FFFE Y:0 P:eNvMxdIzC $80/F214 9C B7 13 STZ $13B7 [$80:13B7] A:0061 X:FFFE Y:0 P:eNvMxdIzC $80/F217 9C 74 0B STZ $0B74 [$80:0B74] A:0061 X:FFFE Y:0 P:eNvMxdIzC $80/F21A A2 FF FF LDX #$FFFF A:0061 X:FFFE Y:0 P:eNvMxdIzC $80/F21D 8E 33 14 STX $1433 [$80:1433] A:0061 X:FFFF Y:0 P:eNvMxdIzC $80/F220 A9 FF LDA #$FF A:0061 X:FFFF Y:0 P:eNvMxdIzC $80/F222 8D 4F 14 STA $144F [$80:144F] A:00FF X:FFFF Y:0 P:eNvMxdIzC $80/F225 A9 09 LDA #$09 A:00FF X:FFFF Y:0 P:eNvMxdIzC $80/F227 8D 50 14 STA $1450 [$80:1450] A:0009 X:FFFF Y:0 P:envMxdIzC $80/F22A A9 06 LDA #$06 A:0009 X:FFFF Y:0 P:envMxdIzC $80/F22C 8D 51 14 STA $1451 [$80:1451] A:0006 X:FFFF Y:0 P:envMxdIzC $80/F22F 28 PLP ; Restore Flag Register value $80/F230 6B RTL
$80/F231 ? (Check if Errors have occured)
$80/F231 08 PHP ; Buffer Flag Register value on stack $80/F232 E2 20 SEP #$20 ; A = 8-bit $80/F234 C2 10 REP #$10 ; X/Y = 16-bit $80/F236 AD 3F 14 LDA $143F ; Check if Errors occured(?) $80/F239 D0 3C BNE $3C ; [$F277] Exit if it has $80/F23B AD DF 13 LDA $13DF [$80:13DF] A:0 X:00FF Y:0 P:envMxdIZC $80/F23E D0 37 BNE $37 ; [$F277] Exit $80/F240 EE DF 13 INC $13DF [$80:13DF] A:0 X:00FF Y:0 P:envMxdIZC $80/F243 22 0C 5C 10 JSL $105C0C[$10:5C0C] A:0 X:00FF Y:0 P:envMxdIzC $80/F247 22 70 5B 10 JSL $105B70[$10:5B70] A:0 X:00FF Y:0 P:envMxdIzC $80/F24B 22 AC 5B 10 JSL $105BAC[$10:5BAC] A:0 X:0 Y:0 P:envMxdIzC $80/F24F AD D1 13 LDA $13D1 [$80:13D1] A:0 X:0 Y:0 P:envMxdIzC $80/F252 F0 20 BEQ $20 [$F274] A:0 X:0 Y:0 P:envMxdIZC
code is missing here
$80/F274 9C DF 13 STZ $13DF [$80:13DF] A:0 X:0 Y:0 P:envMxdIZC $80/F277 28 PLP ; Restore Flag Register value $80/F278 6B RTL
$80/F2AB ?
$80/F2AB 08 PHP ; Buffer Flag Register value on stack $80/F2AC E2 30 SEP #$30 ; A/X/Y = 8-bit $80/F2AE AD 94 21 LDA $2194 [$80:2194] A:0 X:0 Y:00FF P:envMXdIzC $80/F2B1 AE 4F 14 LDX $144F [$80:144F] A:0001 X:0 Y:00FF P:envMXdIzC $80/F2B4 F0 0E BEQ $0E [$F2C4] A:0001 X:00FF Y:00FF P:eNvMXdIzC $80/F2B6 E0 FF CPX #$FF A:0001 X:00FF Y:00FF P:eNvMXdIzC $80/F2B8 D0 07 BNE $07 [$F2C1] A:0001 X:00FF Y:00FF P:envMXdIZC $80/F2BA 29 F3 AND #$F3 ; Deactivate Access LED $80/F2BC 8D 94 21 STA $2194 $80/F2BF 80 19 BRA $19 ; [$F2DA] Exit
code is missing here
$80/F2DA 28 PLP ; Restore Flag Register value $80/F2DB 6B RTL
$80/F2F2 Deactivate Satellaview Power Down Mode
From FullSNES:
2197h Control (only bit7 is modified) (R/W) 0-6 Unknown/unused (should be left unchanged) 7 Power Down Mode? (0=Power Down, 1=Operate/Normal) (Soundlink enable?) Bit7 is set by various BIOS functions, and, notably: When [7FD9h/FFD9h].Bit4 (in Satellaview FLASH File Header) is set. Also notably: Bit7 is set/cleared depending on Town Status Entry[07h].Bit6-7.
$80/F2F2 08 PHP ; Buffer Flag Register value and A on stack $80/F2F3 E2 20 SEP #$20 $80/F2F5 48 PHA $80/F2F6 AF 97 21 00 LDA $002197 ; Load $2197 value, set MSB, store back $80/F2FA 09 80 ORA #$80 $80/F2FC 8F 97 21 00 STA $002197 $80/F300 68 PLA ; Restore Flag Register value and A $80/F301 28 PLP $80/F302 6B RTL
Bank $81
$81/8002 ? (Executed when talking to the aerial building)
$81/8002 A5 AC LDA $AC [$00:00AC] A:8001 X:0024 Y:0007 P:envmxdIzc $81/8004 1A INC A A:9DF8 X:0024 Y:0007 P:eNvmxdIzc $81/8005 1A INC A A:9DF9 X:0024 Y:0007 P:eNvmxdIzc $81/8006 1A INC A A:9DFA X:0024 Y:0007 P:eNvmxdIzc $81/8007 1A INC A A:9DFB X:0024 Y:0007 P:eNvmxdIzc $81/8008 20 49 C1 JSR $C149 [$81:C149] A:9DFC X:0024 Y:0007 P:eNvmxdIzc $81/800B A5 AD LDA $AD [$00:00AD] A:9DFC X:0024 Y:1000 P:eNvmxdIzc $81/800D 20 49 C1 JSR $C149 [$81:C149] A:889D X:0024 Y:1000 P:eNvmxdIzc $81/8010 A0 01 00 LDY #$0001 A:889D X:0024 Y:0FFE P:eNvmxdIzc $81/8013 B7 AC LDA [$AC],y[$88:9DF9] A:889D X:0024 Y:0001 P:envmxdIzc $81/8015 85 20 STA $20 [$00:0020] A:DE65 X:0024 Y:0001 P:eNvmxdIzc $81/8017 C8 INY A:DE65 X:0024 Y:0001 P:eNvmxdIzc $81/8018 B7 AC LDA [$AC],y[$88:9DFA] A:DE65 X:0024 Y:0002 P:envmxdIzc $81/801A 85 21 STA $21 [$00:0021] A:88DE X:0024 Y:0002 P:eNvmxdIzc $81/801C 20 96 BA JSR $BA96 [$81:BA96] A:88DE X:0024 Y:0002 P:eNvmxdIzc $81/801F A5 21 LDA $21 [$00:0021] A:0088 X:0024 Y:0002 P:envmxdIzc $81/8021 85 AD STA $AD [$00:00AD] A:88DE X:0024 Y:0002 P:eNvmxdIzc $81/8023 A5 20 LDA $20 [$00:0020] A:88DE X:0024 Y:0002 P:eNvmxdIzc $81/8025 85 AC STA $AC [$00:00AC] A:DE65 X:0024 Y:0002 P:eNvmxdIzc $81/8027 60 RTS A:DE65 X:0024 Y:0002 P:eNvmxdIzc
$81/8028 ? (Executed when talking to the aerial building)
$81/8028 20 8B C1 JSR $C18B [$81:C18B] A:8027 X:0024 Y:0007 P:envmxdIzc $81/802B 85 AD STA $AD [$00:00AD] A:889D X:0024 Y:0FFE P:envmxdIzc $81/802D 20 8B C1 JSR $C18B [$81:C18B] A:889D X:0024 Y:0FFE P:envmxdIzc $81/8030 85 AC STA $AC [$00:00AC] A:9DFC X:0024 Y:1000 P:envmxdIzc $81/8032 60 RTS A:9DFC X:0024 Y:1000 P:envmxdIzc
$81/8070 TOKEN VECTOR #$25: ?
$81/8070 AD B6 0C LDA $0CB6 [$81:0CB6] A:806F X:0026 Y:0007 P:envmxdIzc $81/8073 F0 0D BEQ $0D [$8082] A:0000 X:0026 Y:0007 P:envmxdIZc $81/8075 C9 FF FF CMP #$FFFF A:0001 X:0026 Y:0000 P:envmxdIzc $81/8078 F0 12 BEQ $12 [$808C] A:0001 X:0026 Y:0000 P:envmxdIzc $81/807A CE B6 0C DEC $0CB6 [$81:0CB6] A:0001 X:0026 Y:0000 P:envmxdIzc $81/807D D0 0D BNE $0D [$808C] A:0001 X:0026 Y:0000 P:envmxdIZc $81/807F 4C 8D 80 JMP $808D [$81:808D] A:0001 X:0026 Y:0000 P:envmxdIZc $81/8082 A0 01 00 LDY #$0001 A:0000 X:0026 Y:0007 P:envmxdIZc $81/8085 B7 AC LDA [$AC],y[$95:830F] A:0000 X:0026 Y:0001 P:envmxdIzc $81/8087 F0 04 BEQ $04 [$808D] A:0001 X:0026 Y:0001 P:envmxdIzc $81/8089 8D B6 0C STA $0CB6 [$81:0CB6] A:0001 X:0026 Y:0001 P:envmxdIzc $81/808C 60 RTS A:0001 X:0026 Y:0001 P:envmxdIzc $81/808D A5 AC LDA $AC [$00:00AC] A:0001 X:0026 Y:0000 P:envmxdIZc $81/808F 18 CLC A:830E X:0026 Y:0000 P:eNvmxdIzc $81/8090 69 03 00 ADC #$0003 A:830E X:0026 Y:0000 P:eNvmxdIzc $81/8093 85 AC STA $AC [$00:00AC] A:8311 X:0026 Y:0000 P:eNvmxdIzc $81/8095 60 RTS A:8311 X:0026 Y:0000 P:eNvmxdIzc
$81/818F ?
$81/818F DA PHX A:818E X:0026 Y:0000 P:envmxdIzc $81/8190 A0 01 00 LDY #$0001 A:818E X:0026 Y:0000 P:envmxdIzc $81/8193 20 5F BB JSR $BB5F [$81:BB5F] A:818E X:0026 Y:0001 P:envmxdIzc $81/8196 85 00 STA $00 [$00:0000] A:0008 X:0026 Y:0004 P:envmxdIzc $81/8198 B7 AC LDA [$AC],y[$95:8315] A:0008 X:0026 Y:0004 P:envmxdIzc $81/819A 30 13 BMI $13 [$81AF] A:0000 X:0026 Y:0004 P:envmxdIZc $81/819C C9 06 00 CMP #$0006 A:0000 X:0026 Y:0004 P:envmxdIZc $81/819F 10 0E BPL $0E [$81AF] A:0000 X:0026 Y:0004 P:eNvmxdIzc $81/81A1 48 PHA A:0000 X:0026 Y:0004 P:eNvmxdIzc $81/81A2 C8 INY A:0000 X:0026 Y:0004 P:eNvmxdIzc $81/81A3 C8 INY A:0000 X:0026 Y:0005 P:envmxdIzc $81/81A4 20 5F BB JSR $BB5F [$81:BB5F] A:0000 X:0026 Y:0006 P:envmxdIzc $81/81A7 85 02 STA $02 [$00:0002] A:0100 X:0026 Y:0009 P:envmxdIzc $81/81A9 68 PLA A:0100 X:0026 Y:0009 P:envmxdIzc $81/81AA 0A ASL A A:0000 X:0026 Y:0009 P:envmxdIZc $81/81AB AA TAX A:0000 X:0026 Y:0009 P:envmxdIZc $81/81AC 7C B4 81 JMP ($81B4,x)[$81:81C0] A:0000 X:0000 Y:0009 P:envmxdIZc
$81/81B4 Jump Table for $81/818F
C0 81 C8 81 D2 81 DA 81 E2 81 EC 81
$81/81C0 ?
$81/81C0 A5 00 LDA $00 [$00:0000] A:0000 X:0000 Y:0009 P:envmxdIZc $81/81C2 C5 02 CMP $02 [$00:0002] A:0008 X:0000 Y:0009 P:envmxdIzc $81/81C4 30 2E BMI $2E [$81F4] A:0008 X:0000 Y:0009 P:eNvmxdIzc $81/81C6 80 42 BRA $42 [$820A] A:0100 X:0000 Y:0009 P:envmxdIZC
code is missing here
$81/81DA A5 00 LDA $00 [$00:0000] A:0006 X:0006 Y:0009 P:envmxdIzc $81/81DC C5 02 CMP $02 [$00:0002] A:0001 X:0006 Y:0009 P:envmxdIzc $81/81DE D0 14 BNE $14 [$81F4] A:0001 X:0006 Y:0009 P:eNvmxdIzc
code is missing here
$81/81EC A5 00 LDA $00 [$00:0000] A:000A X:000A Y:0009 P:envmxdIzc $81/81EE C5 02 CMP $02 [$00:0002] A:0002 X:000A Y:0009 P:envmxdIzc $81/81F0 10 02 BPL $02 [$81F4] A:0002 X:000A Y:0009 P:eNvmxdIzc $81/81F2 80 16 BRA $16 [$820A] A:0002 X:000A Y:0009 P:eNvmxdIzc $81/81F4 B7 AC LDA [$AC],y[$95:831A] A:0008 X:0000 Y:0009 P:eNvmxdIzc $81/81F6 85 20 STA $20 [$00:0020] A:8300 X:0000 Y:0009 P:eNvmxdIzc $81/81F8 C8 INY A:8300 X:0000 Y:0009 P:eNvmxdIzc $81/81F9 B7 AC LDA [$AC],y[$95:831B] A:8300 X:0000 Y:000A P:envmxdIzc $81/81FB 85 21 STA $21 [$00:0021] A:9583 X:0000 Y:000A P:eNvmxdIzc $81/81FD 20 96 BA JSR $BA96 [$81:BA96] A:9583 X:0000 Y:000A P:eNvmxdIzc $81/8200 A5 20 LDA $20 [$00:0020] A:0095 X:0000 Y:000A P:envmxdIZc $81/8202 85 AC STA $AC [$00:00AC] A:8300 X:0000 Y:000A P:eNvmxdIzc $81/8204 A5 21 LDA $21 [$00:0021] A:8300 X:0000 Y:000A P:eNvmxdIzc $81/8206 85 AD STA $AD [$00:00AD] A:9583 X:0000 Y:000A P:eNvmxdIzc $81/8208 FA PLX A:9583 X:0000 Y:000A P:eNvmxdIzc $81/8209 60 RTS A:9583 X:0026 Y:000A P:envmxdIzc
$81/820A A5 AC LDA $AC [$00:00AC] A:0100 X:0000 Y:0009 P:envmxdIZC $81/820C 18 CLC A:8311 X:0000 Y:0009 P:eNvmxdIzC $81/820D 69 0C 00 ADC #$000C A:8311 X:0000 Y:0009 P:eNvmxdIzc $81/8210 85 AC STA $AC [$00:00AC] A:831D X:0000 Y:0009 P:eNvmxdIzc $81/8212 FA PLX A:831D X:0000 Y:0009 P:eNvmxdIzc $81/8213 60 RTS A:831D X:0026 Y:0009 P:envmxdIzc
$81/9356 TOKEN VECTOR #$27: ?
$81/9356 5A PHY A:9355 X:0026 Y:0007 P:envmxdIzc $81/9357 DA PHX A:9355 X:0026 Y:0007 P:envmxdIzc $81/9358 9C 98 19 STZ $1998 [$81:1998] A:9355 X:0026 Y:0007 P:envmxdIzc $81/935B A0 01 00 LDY #$0001 A:9355 X:0026 Y:0007 P:envmxdIzc $81/935E 20 EA BD JSR $BDEA [$81:BDEA] A:9355 X:0026 Y:0001 P:envmxdIzc $81/9361 85 00 STA $00 [$00:0000] A:1676 X:0026 Y:0004 P:envmxdIzc $81/9363 20 5F BB JSR $BB5F [$81:BB5F] A:1676 X:0026 Y:0004 P:envmxdIzc $81/9366 85 02 STA $02 [$00:0002] A:0008 X:0026 Y:0007 P:envmxdIzc $81/9368 B2 00 LDA ($00) [$81:1676] A:0008 X:0026 Y:0007 P:envmxdIzc $81/936A 18 CLC A:0 X:0026 Y:0007 P:envmxdIZc $81/936B 65 02 ADC $02 [$00:0002] A:0 X:0026 Y:0007 P:envmxdIZc $81/936D 92 00 STA ($00) [$81:1676] A:0008 X:0026 Y:0007 P:envmxdIzc $81/936F 2E 98 19 ROL $1998 [$81:1998] A:0008 X:0026 Y:0007 P:envmxdIzc $81/9372 98 TYA A:0008 X:0026 Y:0007 P:envmxdIZc $81/9373 18 CLC A:0007 X:0026 Y:0007 P:envmxdIzc $81/9374 65 AC ADC $AC [$00:00AC] A:0007 X:0026 Y:0007 P:envmxdIzc $81/9376 85 AC STA $AC [$00:00AC] A:8307 X:0026 Y:0007 P:eNvmxdIzc $81/9378 FA PLX A:8307 X:0026 Y:0007 P:eNvmxdIzc $81/9379 7A PLY A:8307 X:0026 Y:0007 P:envmxdIzc $81/937A 60 RTS A:8307 X:0026 Y:0007 P:envmxdIzc
$81/948E ? (Executed when talking to the aerial building)
$81/948E 08 PHP A:948D X:0024 Y:0000 P:envmxdIzc $81/948F DA PHX A:948D X:0024 Y:0000 P:envmxdIzc $81/9490 A0 01 00 LDY #$0001 A:948D X:0024 Y:0000 P:envmxdIzc $81/9493 20 5F BB JSR $BB5F [$81:BB5F] A:948D X:0024 Y:0001 P:envmxdIzc $81/9496 85 00 STA $00 [$00:0000] A:0000 X:0024 Y:0004 P:envmxdIzc $81/9498 20 5F BB JSR $BB5F [$81:BB5F] A:0000 X:0024 Y:0004 P:envmxdIzc $81/949B 25 00 AND $00 [$00:0000] A:8080 X:0024 Y:0007 P:envmxdIzc $81/949D D0 19 BNE $19 [$94B8] A:0000 X:0024 Y:0007 P:envmxdIZc $81/949F B7 AC LDA [$AC],y[$88:DE75] A:0000 X:0024 Y:0007 P:envmxdIZc $81/94A1 85 20 STA $20 [$00:0020] A:DE65 X:0024 Y:0007 P:eNvmxdIzc $81/94A3 C8 INY A:DE65 X:0024 Y:0007 P:eNvmxdIzc $81/94A4 B7 AC LDA [$AC],y[$88:DE76] A:DE65 X:0024 Y:0008 P:envmxdIzc $81/94A6 85 21 STA $21 [$00:0021] A:88DE X:0024 Y:0008 P:eNvmxdIzc $81/94A8 20 96 BA JSR $BA96 [$81:BA96] A:88DE X:0024 Y:0008 P:eNvmxdIzc $81/94AB AD 20 00 LDA $0020 [$81:0020] A:0088 X:0024 Y:0008 P:envmxdIzc $81/94AE 85 AC STA $AC [$00:00AC] A:DE65 X:0024 Y:0008 P:eNvmxdIzc $81/94B0 AD 21 00 LDA $0021 [$81:0021] A:DE65 X:0024 Y:0008 P:eNvmxdIzc $81/94B3 85 AD STA $AD [$00:00AD] A:88DE X:0024 Y:0008 P:eNvmxdIzc $81/94B5 FA PLX A:88DE X:0024 Y:0008 P:eNvmxdIzc $81/94B6 28 PLP A:88DE X:0024 Y:0008 P:envmxdIzc $81/94B7 60 RTS A:88DE X:0024 Y:0008 P:envmxdIzc $81/94B8 A5 AC LDA $AC [$00:00AC] A:0080 X:0024 Y:0007 P:envmxdIzc $81/94BA 18 CLC A:DE6E X:0024 Y:0007 P:eNvmxdIzc $81/94BB 69 0A 00 ADC #$000A A:DE6E X:0024 Y:0007 P:eNvmxdIzc $81/94BE 85 AC STA $AC [$00:00AC] A:DE78 X:0024 Y:0007 P:eNvmxdIzc $81/94C0 FA PLX A:DE78 X:0024 Y:0007 P:eNvmxdIzc $81/94C1 28 PLP A:DE78 X:0024 Y:0007 P:envmxdIzc $81/94C2 60 RTS A:DE78 X:0024 Y:0007 P:envmxdIzc
$81/A41A ? (Executed when talking to the aerial building)
$81/A41A A0 01 00 LDY #$0001 A:A419 X:0026 Y:000A P:envmxdIzc $81/A41D 20 5F BB JSR $BB5F [$81:BB5F] A:A419 X:0026 Y:0001 P:envmxdIzc $81/A420 29 3F 00 AND #$003F A:000E X:0026 Y:0004 P:envmxdIzc $81/A423 85 00 STA $00 [$00:0000] A:000E X:0026 Y:0004 P:envmxdIzc $81/A425 C9 3F 00 CMP #$003F A:000E X:0026 Y:0004 P:envmxdIzc $81/A428 D0 04 BNE $04 [$A42E] A:000E X:0026 Y:0004 P:eNvmxdIzc $81/A42E B7 AC LDA [$AC],y[$88:8E40] A:000E X:0026 Y:0004 P:eNvmxdIzc $81/A430 29 03 00 AND #$0003 A:0303 X:0026 Y:0004 P:envmxdIzc $81/A433 EB XBA A:0003 X:0026 Y:0004 P:envmxdIzc $81/A434 4A LSR A A:0300 X:0026 Y:0004 P:envmxdIZc $81/A435 4A LSR A A:0180 X:0026 Y:0004 P:envmxdIzc $81/A436 05 00 ORA $00 [$00:0000] A:00C0 X:0026 Y:0004 P:envmxdIzc $81/A438 85 00 STA $00 [$00:0000] A:00CE X:0026 Y:0004 P:envmxdIzc $81/A43A C8 INY A:00CE X:0026 Y:0004 P:envmxdIzc $81/A43B B7 AC LDA [$AC],y[$88:8E41] A:00CE X:0026 Y:0005 P:envmxdIzc $81/A43D 29 03 00 AND #$0003 A:3403 X:0026 Y:0005 P:envmxdIzc $81/A440 EB XBA A:0003 X:0026 Y:0005 P:envmxdIzc $81/A441 05 00 ORA $00 [$00:0000] A:0300 X:0026 Y:0005 P:envmxdIZc $81/A443 85 00 STA $00 [$00:0000] A:03CE X:0026 Y:0005 P:envmxdIzc $81/A445 C8 INY A:03CE X:0026 Y:0005 P:envmxdIzc $81/A446 5A PHY A:03CE X:0026 Y:0006 P:envmxdIzc $81/A447 A0 01 00 LDY #$0001 A:03CE X:0026 Y:0006 P:envmxdIzc $81/A44A A5 00 LDA $00 [$00:0000] A:03CE X:0026 Y:0001 P:envmxdIzc $81/A44C 22 1C 5C 10 JSL $105C1C[$10:5C1C] A:03CE X:0026 Y:0001 P:envmxdIzc $81/A450 7A PLY A:CE03 X:0026 Y:0001 P:envmxdIzc $81/A451 98 TYA A:CE03 X:0026 Y:0006 P:envmxdIzc $81/A452 18 CLC A:0006 X:0026 Y:0006 P:envmxdIzc $81/A453 65 AC ADC $AC [$00:00AC] A:0006 X:0026 Y:0006 P:envmxdIzc $81/A455 85 AC STA $AC [$00:00AC] A:8E42 X:0026 Y:0006 P:eNvmxdIzc $81/A457 60 RTS A:8E42 X:0026 Y:0006 P:eNvmxdIzc
$81/A551 ? (Executed when talking to the aerial building)
$81/A551 DA PHX A:9DB5 X:0024 Y:0004 P:eNvmxdIzc $81/A552 A7 AC LDA [$AC] [$88:9DB5] A:9DB5 X:0024 Y:0004 P:eNvmxdIzc $81/A554 48 PHA A:0000 X:0024 Y:0004 P:envmxdIZc $81/A555 E6 AC INC $AC [$00:00AC] A:0000 X:0024 Y:0004 P:envmxdIZc $81/A557 E6 AC INC $AC [$00:00AC] A:0000 X:0024 Y:0004 P:eNvmxdIzc $81/A559 A7 AC LDA [$AC] [$88:9DB7] A:0000 X:0024 Y:0004 P:eNvmxdIzc $81/A55B AA TAX A:1002 X:0024 Y:0004 P:envmxdIzc $81/A55C E6 AC INC $AC [$00:00AC] A:1002 X:1002 Y:0004 P:envmxdIzc $81/A55E E6 AC INC $AC [$00:00AC] A:1002 X:1002 Y:0004 P:eNvmxdIzc $81/A560 A7 AC LDA [$AC] [$88:9DB9] A:1002 X:1002 Y:0004 P:eNvmxdIzc $81/A562 A8 TAY A:020C X:1002 Y:0004 P:envmxdIzc $81/A563 E6 AC INC $AC [$00:00AC] A:020C X:1002 Y:020C P:envmxdIzc $81/A565 E6 AC INC $AC [$00:00AC] A:020C X:1002 Y:020C P:eNvmxdIzc $81/A567 68 PLA A:020C X:1002 Y:020C P:eNvmxdIzc $81/A568 22 BF B4 80 JSL $80B4BF[$80:B4BF] A:0000 X:1002 Y:020C P:envmxdIZc $81/A56C FA PLX A:00C8 X:0000 Y:020C P:envmxdIzc $81/A56D 6B RTL A:00C8 X:0024 Y:020C P:envmxdIzc
$81/A5C3 ? (Executed when talking to the aerial building)
$81/A5C3 C2 30 REP #$30 A:9DBF X:0024 Y:0004 P:eNvmxdIzc $81/A5C5 DA PHX A:9DBF X:0024 Y:0004 P:eNvmxdIzc $81/A5C6 A7 AC LDA [$AC] [$88:9DBF] A:9DBF X:0024 Y:0004 P:eNvmxdIzc $81/A5C8 E6 AC INC $AC [$00:00AC] A:0000 X:0024 Y:0004 P:envmxdIZc $81/A5CA E6 AC INC $AC [$00:00AC] A:0000 X:0024 Y:0004 P:eNvmxdIzc $81/A5CC 22 69 B5 80 JSL $80B569[$80:B569] A:0000 X:0024 Y:0004 P:eNvmxdIzc $81/A5D0 FA PLX A:0001 X:049C Y:FFFF P:eNvmxdIzc $81/A5D1 6B RTL A:0001 X:0024 Y:FFFF P:envmxdIzc
$81/A6B4 ? (Executed when talking to the aerial building)
$81/A6B4 A0 00 00 LDY #$0000 A:9F45 X:0024 Y:0004 P:eNvmxdIzc $81/A6B7 20 EA BD JSR $BDEA [$81:BDEA] A:9F45 X:0024 Y:0000 P:envmxdIZc $81/A6BA 85 00 STA $00 [$00:0000] A:1B3E X:0024 Y:0003 P:envmxdIzc $81/A6BC E6 AC INC $AC [$00:00AC] A:1B3E X:0024 Y:0003 P:envmxdIzc $81/A6BE E6 AC INC $AC [$00:00AC] A:1B3E X:0024 Y:0003 P:eNvmxdIzc $81/A6C0 E6 AC INC $AC [$00:00AC] A:1B3E X:0024 Y:0003 P:eNvmxdIzc $81/A6C2 A7 AC LDA [$AC] [$88:9F48] A:1B3E X:0024 Y:0003 P:eNvmxdIzc $81/A6C4 85 20 STA $20 [$00:0020] A:0B5E X:0024 Y:0003 P:envmxdIzc $81/A6C6 E6 AC INC $AC [$00:00AC] A:0B5E X:0024 Y:0003 P:envmxdIzc $81/A6C8 A7 AC LDA [$AC] [$88:9F49] A:0B5E X:0024 Y:0003 P:eNvmxdIzc $81/A6CA 85 21 STA $21 [$00:0021] A:000B X:0024 Y:0003 P:envmxdIzc $81/A6CC E6 AC INC $AC [$00:00AC] A:000B X:0024 Y:0003 P:envmxdIzc $81/A6CE E6 AC INC $AC [$00:00AC] A:000B X:0024 Y:0003 P:eNvmxdIzc $81/A6D0 B2 00 LDA ($00) [$81:1B3E] A:000B X:0024 Y:0003 P:eNvmxdIzc $81/A6D2 87 20 STA [$20] [$00:0B5E] A:0000 X:0024 Y:0003 P:envmxdIZc $81/A6D4 6B RTL A:0000 X:0024 Y:0003 P:envmxdIZc
$81/AA1D ?
$81/AA1D AD B6 0C LDA $0CB6 [$81:0CB6] A:AA1C X:0026 Y:0000 P:envmxdIzc $81/AA20 F0 06 BEQ $06 [$AA28] A:0000 X:0026 Y:0000 P:envmxdIZc $81/AA22 3A DEC A A:0002 X:0026 Y:0000 P:envmxdIzc $81/AA23 F0 03 BEQ $03 [$AA28] A:0001 X:0026 Y:0000 P:envmxdIzc $81/AA25 4C 58 AA JMP $AA58 [$81:AA58] A:0001 X:0026 Y:0000 P:envmxdIzc $81/AA28 AD A5 13 LDA $13A5 [$81:13A5] A:0000 X:0026 Y:0000 P:envmxdIZc $81/AA2B D0 24 BNE $24 [$AA51] A:0000 X:0026 Y:0000 P:envmxdIZc $81/AA2D 9C EE 0C STZ $0CEE [$81:0CEE] A:0000 X:0026 Y:0000 P:envmxdIZc $81/AA30 A0 02 00 LDY #$0002 A:0000 X:0026 Y:0000 P:envmxdIZc $81/AA33 B7 AC LDA [$AC],y[$94:810A] A:0000 X:0026 Y:0002 P:envmxdIzc $81/AA35 85 21 STA $21 [$00:0021] A:93AC X:0026 Y:0002 P:eNvmxdIzc $81/AA37 A0 01 00 LDY #$0001 A:93AC X:0026 Y:0002 P:eNvmxdIzc $81/AA3A B7 AC LDA [$AC],y[$94:8109] A:93AC X:0026 Y:0001 P:envmxdIzc $81/AA3C 85 20 STA $20 [$00:0020] A:AC8F X:0026 Y:0001 P:eNvmxdIzc $81/AA3E 20 96 BA JSR $BA96 [$81:BA96] A:AC8F X:0026 Y:0001 P:eNvmxdIzc $81/AA41 22 C3 C8 81 JSL $81C8C3[$81:C8C3] A:0093 X:0026 Y:0001 P:envmxdIzc $81/AA45 AD A5 13 LDA $13A5 [$81:13A5] A:0000 X:0026 Y:0001 P:envmxdIzc $81/AA48 F0 17 BEQ $17 [$AA61] A:0001 X:0026 Y:0001 P:envmxdIzc $81/AA4A A9 02 00 LDA #$0002 A:0001 X:0026 Y:0001 P:envmxdIzc $81/AA4D 8D B6 0C STA $0CB6 [$81:0CB6] A:0002 X:0026 Y:0001 P:envmxdIzc $81/AA50 60 RTS A:0002 X:0026 Y:0001 P:envmxdIzc
code is missing here
$81/AA58 AD A3 13 LDA $13A3 [$81:13A3] A:0001 X:0026 Y:0000 P:envmxdIzc $81/AA5B C9 02 00 CMP #$0002 A:0001 X:0026 Y:0000 P:envmxdIzc $81/AA5E F0 01 BEQ $01 [$AA61] A:0001 X:0026 Y:0000 P:eNvmxdIzc $81/AA60 60 RTS A:0001 X:0026 Y:0000 P:eNvmxdIzc $81/AA61 9C B6 0C STZ $0CB6 ; Clear "No-repitition flag" (= settings for a repitition) $81/AA64 9C A3 13 STZ $13A3 [$81:13A3] A:0002 X:0026 Y:0000 P:envmxdIZC $81/AA67 9C A5 13 STZ $13A5 [$81:13A5] A:0002 X:0026 Y:0000 P:envmxdIZC $81/AA6A A5 AC LDA $AC ; Increment Token Data Load address by four $81/AA6C 18 CLC $81/AA6D 69 04 00 ADC #$0004 $81/AA70 85 AC STA $AC $81/AA72 60 RTS
$81/AAA9 ? (Executed when talking to the aerial building)
$81/AAA9 86 00 STX $00 [$00:0000] A:AAA8 X:0024 Y:0001 P:envmxdIzc $81/AAAB A0 26 00 LDY #$0026 A:AAA8 X:0024 Y:0001 P:envmxdIzc $81/AAAE C4 00 CPY $00 [$00:0000] A:AAA8 X:0024 Y:0026 P:envmxdIzc $81/AAB0 F0 0B BEQ $0B [$AABD] A:AAA8 X:0024 Y:0026 P:envmxdIzC $81/AAB2 BD E0 17 LDA $17E0,x[$81:1804] A:AAA8 X:0024 Y:0026 P:envmxdIzC $81/AAB5 F0 06 BEQ $06 [$AABD] A:886C X:0024 Y:0026 P:eNvmxdIzC $81/AAB7 A9 01 00 LDA #$0001 A:886C X:0024 Y:0026 P:eNvmxdIzC $81/AABA 99 7A 11 STA $117A,y[$81:11A0] A:0001 X:0024 Y:0026 P:envmxdIzC $81/AABD 88 DEY A:0001 X:0024 Y:0026 P:envmxdIzC $81/AABE 88 DEY A:0001 X:0024 Y:0025 P:envmxdIzC $81/AABF 10 ED BPL $ED [$AAAE] A:0001 X:0024 Y:0024 P:envmxdIzC $81/AAC1 A5 AC LDA $AC [$00:00AC] A:0001 X:0024 Y:FFFE P:eNvmxdIzc $81/AAC3 18 CLC A:9DA8 X:0024 Y:FFFE P:eNvmxdIzc $81/AAC4 69 01 00 ADC #$0001 A:9DA8 X:0024 Y:FFFE P:eNvmxdIzc $81/AAC7 85 AC STA $AC [$00:00AC] A:9DA9 X:0024 Y:FFFE P:eNvmxdIzc $81/AAC9 60 RTS A:9DA9 X:0024 Y:FFFE P:eNvmxdIzc
$81/AACA TOKEN VECTOR: ?
$81/AACA 86 00 STX $00 [$00:0000] A:AAC9 X:0024 Y:0007 P:envmxdIzc $81/AACC A0 26 00 LDY #$0026 A:AAC9 X:0024 Y:0007 P:envmxdIzc $81/AACF C4 00 CPY $00 [$00:0000] A:AAC9 X:0024 Y:0026 P:envmxdIzc $81/AAD1 F0 0B BEQ $0B [$AADE] A:AAC9 X:0024 Y:0026 P:envmxdIzC $81/AAD3 BD E0 17 LDA $17E0,x[$81:1804] A:AAC9 X:0024 Y:0026 P:envmxdIzC $81/AAD6 F0 06 BEQ $06 [$AADE] A:88DE X:0024 Y:0026 P:eNvmxdIzC $81/AAD8 A9 00 00 LDA #$0000 A:88DE X:0024 Y:0026 P:eNvmxdIzC $81/AADB 99 7A 11 STA $117A,y[$81:11A0] A:0000 X:0024 Y:0026 P:envmxdIZC $81/AADE 88 DEY A:0000 X:0024 Y:0026 P:envmxdIZC $81/AADF 88 DEY A:0000 X:0024 Y:0025 P:envmxdIzC $81/AAE0 10 ED BPL $ED [$AACF] A:0000 X:0024 Y:0024 P:envmxdIzC $81/AAE2 A5 AC LDA $AC [$00:00AC] A:0000 X:0024 Y:FFFE P:eNvmxdIzc $81/AAE4 18 CLC A:DE63 X:0024 Y:FFFE P:eNvmxdIzc $81/AAE5 69 01 00 ADC #$0001 A:DE63 X:0024 Y:FFFE P:eNvmxdIzc $81/AAE8 85 AC STA $AC [$00:00AC] A:DE64 X:0024 Y:FFFE P:eNvmxdIzc $81/AAEA 60 RTS A:DE64 X:0024 Y:FFFE P:eNvmxdIzc
$81/AD9D TOKEN VECTOR #$23: ? (Remove Token Data Load Address)
$81/AD9D 64 AC STZ $AC ; Clear Address part of the Token Data Load Address $81/AD9F 64 AD STZ $AD $81/ADA1 A9 01 00 LDA #$0001 ; Set "No Repition flag" $81/ADA4 8D B6 0C STA $0CB6 $81/ADA7 20 2A BA JSR $BA2A [$81:BA2A] A:0001 X:0024 Y:1000 P:envmxdIzc $81/ADAA 60 RTS
$81/AE37 TOKEN VECTOR #$02: ?
$81/AE37 AD B6 0C LDA $0CB6 [$81:0CB6] A:AE36 X:0026 Y:0001 P:envmxdIzc $81/AE3A F0 0D BEQ $0D [$AE49] A:0 X:0026 Y:0001 P:envmxdIZc $81/AE3C C9 FF FF CMP #$FFFF A:0002 X:0026 Y:0001 P:envmxdIzc $81/AE3F F0 24 BEQ $24 [$AE65] A:0002 X:0026 Y:0001 P:envmxdIzc $81/AE41 CE B6 0C DEC $0CB6 [$81:0CB6] A:0002 X:0026 Y:0001 P:envmxdIzc $81/AE44 D0 1F BNE $1F [$AE65] A:0002 X:0026 Y:0001 P:envmxdIzc $81/AE46 4C 6B AE JMP $AE6B ; Branch if $0CB6 was #$0001 $81/AE49 A0 01 00 LDY #$0001 A:0 X:0026 Y:0001 P:envmxdIZc $81/AE4C B7 AC LDA [$AC],y[$95:82EC] A:0 X:0026 Y:0001 P:envmxdIzc $81/AE4E 8D B6 0C STA $0CB6 [$81:0CB6] A:0002 X:0026 Y:0001 P:envmxdIzc $81/AE51 A0 03 00 LDY #$0003 A:0002 X:0026 Y:0001 P:envmxdIzc $81/AE54 B7 AC LDA [$AC],y[$95:82EE] A:0002 X:0026 Y:0003 P:envmxdIzc $81/AE56 85 20 STA $20 [$00:0020] A:82AD X:0026 Y:0003 P:eNvmxdIzc $81/AE58 A0 04 00 LDY #$0004 A:82AD X:0026 Y:0003 P:eNvmxdIzc $81/AE5B B7 AC LDA [$AC],y[$95:82EF] A:82AD X:0026 Y:0004 P:envmxdIzc $81/AE5D 85 21 STA $21 [$00:0021] A:9582 X:0026 Y:0004 P:eNvmxdIzc $81/AE5F 20 96 BA JSR $BA96 [$81:BA96] A:9582 X:0026 Y:0004 P:eNvmxdIzc $81/AE62 20 1A B9 JSR $B91A ; (Add "Animation Step" to buffer) $81/AE65 AD B6 0C LDA $0CB6 [$81:0CB6] A:9582 X:0026 Y:0004 P:eNvmxdIzc $81/AE68 F0 01 BEQ $01 [$AE6B] A:0002 X:0026 Y:0004 P:envmxdIzc $81/AE6A 60 RTS $81/AE6B A5 AC LDA $AC [$00:00AC] A:0001 X:0026 Y:0001 P:envmxdIZc $81/AE6D 18 CLC A:82EB X:0026 Y:0001 P:eNvmxdIzc $81/AE6E 69 06 00 ADC #$0006 A:82EB X:0026 Y:0001 P:eNvmxdIzc $81/AE71 85 AC STA $AC [$00:00AC] A:82F1 X:0026 Y:0001 P:eNvmxdIzc $81/AE73 60 RTS A:82F1 X:0026 Y:0001 P:eNvmxdIzc
$81/AFA5 TOKEN VECTOR #$20: ?
$81/AFA5 A0 01 00 LDY #$0001 A:AFA4 X:0026 Y:0001 P:envmxdIzc $81/AFA8 B7 AC LDA [$AC],y[$95:82F2] A:AFA4 X:0026 Y:0001 P:envmxdIzc $81/AFAA 85 20 STA $20 [$00:0020] A:82EB X:0026 Y:0001 P:eNvmxdIzc $81/AFAC A0 02 00 LDY #$0002 A:82EB X:0026 Y:0001 P:eNvmxdIzc $81/AFAF B7 AC LDA [$AC],y[$95:82F3] A:82EB X:0026 Y:0002 P:envmxdIzc $81/AFB1 85 21 STA $21 [$00:0021] A:9582 X:0026 Y:0002 P:eNvmxdIzc $81/AFB3 20 96 BA JSR $BA96 [$81:BA96] A:9582 X:0026 Y:0002 P:eNvmxdIzc $81/AFB6 A5 20 LDA $20 [$00:0020] A:0095 X:0026 Y:0002 P:envmxdIzc $81/AFB8 85 AC STA $AC [$00:00AC] A:82EB X:0026 Y:0002 P:eNvmxdIzc $81/AFBA A5 21 LDA $21 [$00:0021] A:82EB X:0026 Y:0002 P:eNvmxdIzc $81/AFBC 85 AD STA $AD [$00:00AD] A:9582 X:0026 Y:0002 P:eNvmxdIzc $81/AFBE 60 RTS A:9582 X:0026 Y:0002 P:eNvmxdIzc
$81/AFBF TOKEN VECTOR #$00: ?
$81/AFBF A0 01 00 LDY #$0001 A:AFBE X:0026 Y:0077 P:envmxdIzc $81/AFC2 B7 AC LDA [$AC],y[$95:82F6] A:AFBE X:0026 Y:0001 P:envmxdIzc $81/AFC4 85 20 STA $20 [$00:0020] A:82EB X:0026 Y:0001 P:eNvmxdIzc $81/AFC6 A0 02 00 LDY #$0002 A:82EB X:0026 Y:0001 P:eNvmxdIzc $81/AFC9 B7 AC LDA [$AC],y[$95:82F7] A:82EB X:0026 Y:0002 P:envmxdIzc $81/AFCB 85 21 STA $21 [$00:0021] A:9582 X:0026 Y:0002 P:eNvmxdIzc $81/AFCD 20 96 BA JSR $BA96 [$81:BA96] A:9582 X:0026 Y:0002 P:eNvmxdIzc $81/AFD0 18 CLC A:0095 X:0026 Y:0002 P:envmxdIzc $81/AFD1 A5 20 LDA $20 [$00:0020] A:0095 X:0026 Y:0002 P:envmxdIzc $81/AFD3 C9 06 00 CMP #$0006 A:82EB X:0026 Y:0002 P:eNvmxdIzc $81/AFD6 90 25 BCC $25 [$AFFD] A:82EB X:0026 Y:0002 P:eNvmxdIzC $81/AFD8 DD 1A 12 CMP $121A,x[$81:1240] A:82EB X:0026 Y:0002 P:eNvmxdIzC $81/AFDB D0 0A BNE $0A [$AFE7] A:82EB X:0026 Y:0002 P:eNvmxdIzC $81/AFE7 A5 20 LDA $20 [$00:0020] A:82EB X:0026 Y:0002 P:eNvmxdIzC $81/AFE9 9D 08 18 STA $1808,x[$81:182E] A:82EB X:0026 Y:0002 P:eNvmxdIzC $81/AFEC 9D 1A 12 STA $121A,x[$81:1240] A:82EB X:0026 Y:0002 P:eNvmxdIzC $81/AFEF A5 21 LDA $21 [$00:0021] A:82EB X:0026 Y:0002 P:eNvmxdIzC $81/AFF1 9D 30 18 STA $1830,x[$81:1856] A:9582 X:0026 Y:0002 P:eNvmxdIzC $81/AFF4 9D 42 12 STA $1242,x[$81:1268] A:9582 X:0026 Y:0002 P:eNvmxdIzC $81/AFF7 9E 80 18 STZ $1880,x[$81:18A6] A:9582 X:0026 Y:0002 P:eNvmxdIzC $81/AFFA 4C 04 B0 JMP $B004 [$81:B004] A:9582 X:0026 Y:0002 P:eNvmxdIzC
$81/AFFD ? (Executed when talking to the aerial building and at start up)
$81/AFFD 86 00 STX $00 [$00:0000] A:0005 X:0026 Y:0002 P:eNvmxdIzc $81/AFFF 0A ASL A A:0005 X:0026 Y:0002 P:eNvmxdIzc $81/B000 AA TAX A:000A X:0026 Y:0002 P:envmxdIzc $81/B001 7C 0D B0 JMP ($B00D,x)[$81:B07E] A:000A X:000A Y:0002 P:envmxdIzc $81/B004 A5 AC LDA $AC [$00:00AC] A:9582 X:0026 Y:0002 P:eNvmxdIzC $81/B006 18 CLC A:82F5 X:0026 Y:0002 P:eNvmxdIzC $81/B007 69 04 00 ADC #$0004 A:82F5 X:0026 Y:0002 P:eNvmxdIzc $81/B00A 85 AC STA $AC [$00:00AC] A:82F9 X:0026 Y:0002 P:eNvmxdIzc $81/B00C 60 RTS A:82F9 X:0026 Y:0002 P:eNvmxdIzc
$81/B00D Jump Table for $81/AFFD
$81/B00D 19 B0 $81/B00F 28 B0 $81/B011 3C B0 $81/B013 4B B0 $81/B015 63 B0 $81/B017 7E B0
$81/B07E ? (Executed when talking to the aerial building and at start up)
$81/B07E AE 00 00 LDX $0000 [$81:0000] A:000A X:000A Y:0002 P:envmxdIzc $81/B081 22 88 B0 81 JSL $81B088[$81:B088] A:000A X:0026 Y:0002 P:envmxdIzc $81/B085 4C 04 B0 JMP $B004 [$81:B004] A:0010 X:0026 Y:0002 P:envmxdIzc
$81/B088 ? (Executed when talking to the aerial building and at start up)
$81/B088 9E 52 11 STZ $1152,x[$81:1178] A:000A X:0026 Y:0002 P:envmxdIzc $81/B08B 9E 42 12 STZ $1242,x[$81:1268] A:000A X:0026 Y:0002 P:envmxdIzc $81/B08E 9E 30 18 STZ $1830,x[$81:1856] A:000A X:0026 Y:0002 P:envmxdIzc $81/B091 9E 1A 12 STZ $121A,x[$81:1240] A:000A X:0026 Y:0002 P:envmxdIzc $81/B094 9E 08 18 STZ $1808,x[$81:182E] A:000A X:0026 Y:0002 P:envmxdIzc $81/B097 9E 80 18 STZ $1880,x[$81:18A6] A:000A X:0026 Y:0002 P:envmxdIzc $81/B09A 9E 6A 0D STZ $0D6A,x[$81:0D90] A:000A X:0026 Y:0002 P:envmxdIzc $81/B09D 9E 92 0D STZ $0D92,x[$81:0DB8] A:000A X:0026 Y:0002 P:envmxdIzc $81/B0A0 9E F2 11 STZ $11F2,x[$81:1218] A:000A X:0026 Y:0002 P:envmxdIzc $81/B0A3 A9 10 00 LDA #$0010 A:000A X:0026 Y:0002 P:envmxdIzc $81/B0A6 9D AA 0E STA $0EAA,x[$81:0ED0] A:0010 X:0026 Y:0002 P:envmxdIzc $81/B0A9 6B RTL A:0010 X:0026 Y:0002 P:envmxdIzc
$81/B0AA TOKEN VECTOR #$34: ? (Executed when talking to the aerial building and at start up)
$81/B0AA A0 01 00 LDY #$0001 A:B0A9 X:0026 Y:0006 P:envmxdIzc $81/B0AD 20 EA BD JSR $BDEA [$81:BDEA] A:B0A9 X:0026 Y:0001 P:envmxdIzc $81/B0B0 9D CA 11 STA $11CA,x[$81:11F0] A:178E X:0026 Y:0004 P:envmxdIzc $81/B0B3 A0 04 00 LDY #$0004 A:178E X:0026 Y:0004 P:envmxdIzc $81/B0B6 B7 AC LDA [$AC],y[$88:8E46] A:178E X:0026 Y:0004 P:envmxdIzc $81/B0B8 29 FF 00 AND #$00FF A:A801 X:0026 Y:0004 P:eNvmxdIzc $81/B0BB 85 00 STA $00 [$00:0000] A:0001 X:0026 Y:0004 P:envmxdIzc $81/B0BD C8 INY A:0001 X:0026 Y:0004 P:envmxdIzc $81/B0BE B7 AC LDA [$AC],y[$88:8E47] A:0001 X:0026 Y:0005 P:envmxdIzc $81/B0C0 85 20 STA $20 [$00:0020] A:9DA8 X:0026 Y:0005 P:eNvmxdIzc $81/B0C2 C8 INY A:9DA8 X:0026 Y:0005 P:eNvmxdIzc $81/B0C3 B7 AC LDA [$AC],y[$88:8E48] A:9DA8 X:0026 Y:0006 P:envmxdIzc $81/B0C5 85 21 STA $21 [$00:0021] A:889D X:0026 Y:0006 P:eNvmxdIzc $81/B0C7 20 96 BA JSR $BA96 [$81:BA96] A:889D X:0026 Y:0006 P:eNvmxdIzc $81/B0CA 20 53 BA JSR $BA53 [$81:BA53] A:0088 X:0026 Y:0006 P:envmxdIzc $81/B0CD B0 0F BCS $0F [$B0DE] A:0001 X:0026 Y:178E P:envmxdIzc $81/B0CF A9 01 00 LDA #$0001 A:0001 X:0026 Y:178E P:envmxdIzc $81/B0D2 8D 98 19 STA $1998 [$81:1998] A:0001 X:0026 Y:178E P:envmxdIzc $81/B0D5 A5 AC LDA $AC [$00:00AC] A:0001 X:0026 Y:178E P:envmxdIzc $81/B0D7 18 CLC A:8E42 X:0026 Y:178E P:eNvmxdIzc $81/B0D8 69 08 00 ADC #$0008 A:8E42 X:0026 Y:178E P:eNvmxdIzc $81/B0DB 85 AC STA $AC [$00:00AC] A:8E4A X:0026 Y:178E P:eNvmxdIzc $81/B0DD 60 RTS A:8E4A X:0026 Y:178E P:eNvmxdIzc
$81/B0ED TOKEN VECTOR #$33: ?
$81/B0ED 08 PHP ; Buffer Flag Register value on stack $81/B0EE A0 01 00 LDY #$0001 A:B0EC X:0026 Y:0 P:envmxdIzc $81/B0F1 B7 AC LDA [$AC],y[$94:A5C4] A:B0EC X:0026 Y:0001 P:envmxdIzc $81/B0F3 29 FF 00 AND #$00FF A:0001 X:0026 Y:0001 P:envmxdIzc $81/B0F6 3A DEC A A:0001 X:0026 Y:0001 P:envmxdIzc $81/B0F7 0A ASL A A:0 X:0026 Y:0001 P:envmxdIZc $81/B0F8 A8 TAY A:0 X:0026 Y:0001 P:envmxdIZc $81/B0F9 B9 50 01 LDA $0150,y ; Transfer Joypad Input of this frame in $19A0 $81/B0FC 8D A0 19 STA $19A0 $81/B0FF B9 54 01 LDA $0154,y ; Transfer Joypad buttons pushed in this frame in $199E $81/B102 8D 9E 19 STA $199E $81/B105 B9 58 01 LDA $0158,y[$81:0158] A:0 X:0026 Y:0 P:envmxdIZc $81/B108 8D A2 19 STA $19A2 [$81:19A2] A:0 X:0026 Y:0 P:envmxdIZc $81/B10B 9C 9A 19 STZ $199A [$81:199A] A:0 X:0026 Y:0 P:envmxdIZc $81/B10E 9C 9C 19 STZ $199C [$81:199C] A:0 X:0026 Y:0 P:envmxdIZc $81/B111 9C 98 19 STZ $1998 [$81:1998] A:0 X:0026 Y:0 P:envmxdIZc $81/B114 AD A0 19 LDA $19A0 ; Is the Down-Button in this frame's input? $81/B117 29 00 04 AND #$0400 $81/B11A C9 00 04 CMP #$0400 $81/B11D D0 10 BNE $10 ; [$B12F] Branch if not
$81/B11F A0 04 00 LDY #$0004 A:0400 X:0024 Y:0000 P:envmxdIZC $81/B122 B7 AC LDA [$AC],y[$94:BF27] A:0400 X:0024 Y:0004 P:envmxdIzC $81/B124 8D 9C 19 STA $199C [$81:199C] A:0000 X:0024 Y:0004 P:envmxdIZC $81/B127 A9 01 00 LDA #$0001 A:0000 X:0024 Y:0004 P:envmxdIZC $81/B12A 8D 98 19 STA $1998 [$81:1998] A:0001 X:0024 Y:0004 P:envmxdIzC $81/B12D 80 1D BRA $1D [$B14C] A:0001 X:0024 Y:0004 P:envmxdIzC
$81/B12F AD A0 19 LDA $19A0 ; Is the Up-Button in this frame's input? $81/B132 29 00 08 AND #$0800 $81/B135 C9 00 08 CMP #$0800 $81/B138 D0 12 BNE $12 ; [$B14C] Branch if not
$81/B13A A0 04 00 LDY #$0004 A:0800 X:0024 Y:0000 P:envmxdIZC $81/B13D B7 AC LDA [$AC],y[$94:BF27] A:0800 X:0024 Y:0004 P:envmxdIzC $81/B13F 49 FF FF EOR #$FFFF A:0000 X:0024 Y:0004 P:envmxdIZC $81/B142 1A INC A A:FFFF X:0024 Y:0004 P:eNvmxdIzC $81/B143 8D 9C 19 STA $199C [$81:199C] A:0000 X:0024 Y:0004 P:envmxdIZC $81/B146 A9 01 00 LDA #$0001 A:0000 X:0024 Y:0004 P:envmxdIZC $81/B149 8D 98 19 STA $1998 [$81:1998] A:0001 X:0024 Y:0004 P:envmxdIzC
$81/B14C AD A0 19 LDA $19A0 ; Is the Right-Button in this frame's input? $81/B14F 29 00 01 AND #$0100 $81/B152 C9 00 01 CMP #$0100 $81/B155 D0 10 BNE $10 ; [$B167] Branch if not
$81/B157 A0 02 00 LDY #$0002 A:0100 X:0024 Y:0004 P:envmxdIZC $81/B15A B7 AC LDA [$AC],y[$94:BF25] A:0100 X:0024 Y:0002 P:envmxdIzC $81/B15C 8D 9A 19 STA $199A [$81:199A] A:0000 X:0024 Y:0002 P:envmxdIZC $81/B15F A9 01 00 LDA #$0001 A:0000 X:0024 Y:0002 P:envmxdIZC $81/B162 8D 98 19 STA $1998 [$81:1998] A:0001 X:0024 Y:0002 P:envmxdIzC $81/B165 80 1F BRA $1F [$B186] A:0001 X:0024 Y:0002 P:envmxdIzC
$81/B167 AD A0 19 LDA $19A0 ; Is the Left-Button in this frame's input? $81/B16A 29 00 02 AND #$0200 $81/B16D C9 00 02 CMP #$0200 $81/B170 D0 14 BNE $14 ; [$B186] Branch if not
$81/B172 5A PHY A:0200 X:0024 Y:0000 P:envmxdIZC $81/B173 A0 02 00 LDY #$0002 A:0200 X:0024 Y:0000 P:envmxdIZC $81/B176 B7 AC LDA [$AC],y[$94:BF25] A:0200 X:0024 Y:0002 P:envmxdIzC $81/B178 49 FF FF EOR #$FFFF A:0000 X:0024 Y:0002 P:envmxdIZC $81/B17B 1A INC A A:FFFF X:0024 Y:0002 P:eNvmxdIzC $81/B17C 8D 9A 19 STA $199A [$81:199A] A:0000 X:0024 Y:0002 P:envmxdIZC $81/B17F 7A PLY A:0000 X:0024 Y:0002 P:envmxdIZC $81/B180 A9 01 00 LDA #$0001 A:0000 X:0024 Y:0000 P:envmxdIZC $81/B183 8D 98 19 STA $1998 [$81:1998] A:0001 X:0024 Y:0000 P:envmxdIzC
$81/B186 A5 AC LDA $AC [$00:00AC] A:0 X:0026 Y:0 P:eNvmxdIzc $81/B188 18 CLC A:A5C3 X:0026 Y:0 P:eNvmxdIzc $81/B189 69 06 00 ADC #$0006 A:A5C3 X:0026 Y:0 P:eNvmxdIzc $81/B18C 85 AC STA $AC [$00:00AC] A:A5C9 X:0026 Y:0 P:eNvmxdIzc $81/B18E 28 PLP ; Restore Flag Register value $81/B18F 60 RTS
$81/B190 TOKEN VECTOR #$26: ?
$81/B190 A0 01 00 LDY #$0001 A:B18F X:0026 Y:0002 P:envmxdIzc $81/B193 20 EA BD JSR $BDEA [$81:BDEA] A:B18F X:0026 Y:0001 P:envmxdIzc $81/B196 85 00 STA $00 [$00:0000] A:1A00 X:0026 Y:0004 P:envmxdIzc $81/B198 20 5F BB JSR $BB5F [$81:BB5F] A:1A00 X:0026 Y:0004 P:envmxdIzc $81/B19B 92 00 STA ($00) [$81:1A00] A:0 X:0026 Y:0007 P:envmxdIzc $81/B19D A5 AC LDA $AC [$00:00AC] A:0 X:0026 Y:0007 P:envmxdIzc $81/B19F 18 CLC A:82F9 X:0026 Y:0007 P:eNvmxdIzc $81/B1A0 69 07 00 ADC #$0007 A:82F9 X:0026 Y:0007 P:eNvmxdIzc $81/B1A3 85 AC STA $AC [$00:00AC] A:8300 X:0026 Y:0007 P:eNvmxdIzc $81/B1A5 60 RTS A:8300 X:0026 Y:0007 P:eNvmxdIzc
$81/B1A6 ? (Executed when talking to the aerial building)
$81/B1A6 A0 01 00 LDY #$0001 A:B1A5 X:0024 Y:0002 P:envmxdIzc $81/B1A9 20 5F BB JSR $BB5F [$81:BB5F] A:B1A5 X:0024 Y:0001 P:envmxdIzc $81/B1AC 8D A4 19 STA $19A4 [$81:19A4] A:0026 X:0024 Y:0004 P:envmxdIzc $81/B1AF A5 AC LDA $AC [$00:00AC] A:0026 X:0024 Y:0004 P:envmxdIzc $81/B1B1 18 CLC A:DE58 X:0024 Y:0004 P:eNvmxdIzc $81/B1B2 69 04 00 ADC #$0004 A:DE58 X:0024 Y:0004 P:eNvmxdIzc $81/B1B5 85 AC STA $AC [$00:00AC] A:DE5C X:0024 Y:0004 P:eNvmxdIzc $81/B1B7 60 RTS A:DE5C X:0024 Y:0004 P:eNvmxdIzc
$81/B91A ? (Add "Animation Step" to buffer)
$81/B91A A7 20 LDA [$20] [$95:82AD] A:0095 X:0026 Y:0004 P:envmxdIzc $81/B91C 29 00 F0 AND #$F000 A:000C X:0026 Y:0004 P:envmxdIzc $81/B91F F0 47 BEQ $47 [$B968] A:0 X:0026 Y:0004 P:envmxdIZc
code is missing here
$81/B968 9E F2 11 STZ $11F2,x[$81:1218] A:0 X:0026 Y:0004 P:envmxdIZc $81/B96B A5 20 LDA $20 ; Set Address in $20-22 in Animation Step buffer $81/B96D 9D 1A 0D STA $0D1A,x $81/B970 A5 21 LDA $21 $81/B972 9D 6A 0D STA $0D6A,x $81/B975 60 RTS
$81/BA2A ? (Executed when talking to the aerial building and on the title screen)
$81/BA2A 9E E0 17 STZ $17E0,x ; Clear Bank for the 24-bit address of a Index for the Token Vector table $81/BA2D 9E 30 18 STZ $1830,x[$81:1854] A:0001 X:0024 Y:1000 P:envmxdIzc $81/BA30 9E 1A 12 STZ $121A,x[$81:123E] A:0001 X:0024 Y:1000 P:envmxdIzc $81/BA33 9E 42 12 STZ $1242,x[$81:1266] A:0001 X:0024 Y:1000 P:envmxdIzc $81/BA36 9E 6A 0D STZ $0D6A,x[$81:0D8E] A:0001 X:0024 Y:1000 P:envmxdIzc $81/BA39 BC 90 17 LDY $1790,x[$81:17B4] A:0001 X:0024 Y:1000 P:envmxdIzc $81/BA3C C0 FF FF CPY #$FFFF A:0001 X:0024 Y:0026 P:envmxdIzc $81/BA3F F0 11 BEQ $11 [$BA52] A:0001 X:0024 Y:0026 P:envmxdIzc $81/BA41 B9 CA 11 LDA $11CA,y[$81:11F0] A:0001 X:0024 Y:0026 P:envmxdIzc $81/BA44 A8 TAY A:178E X:0024 Y:0026 P:envmxdIzc $81/BA45 B9 00 00 LDA $0000,y[$81:178E] A:178E X:0024 Y:178E P:envmxdIzc $81/BA48 3A DEC A A:0001 X:0024 Y:178E P:envmxdIzc $81/BA49 99 00 00 STA $0000,y[$81:178E] A:0000 X:0024 Y:178E P:envmxdIZc $81/BA4C A9 FF FF LDA #$FFFF A:0000 X:0024 Y:178E P:envmxdIZc $81/BA4F 9D 90 17 STA $1790,x[$81:17B4] A:FFFF X:0024 Y:178E P:eNvmxdIzc $81/BA52 60 RTS A:FFFF X:0024 Y:178E P:eNvmxdIzc
$81/BA53 ? (Executed when talking to the aerial building)
$81/BA53 DA PHX A:0088 X:0026 Y:0006 P:envmxdIzc $81/BA54 BD CA 11 LDA $11CA,x[$81:11F0] A:0088 X:0026 Y:0006 P:envmxdIzc $81/BA57 85 02 STA $02 [$00:0002] A:178E X:0026 Y:0006 P:envmxdIzc $81/BA59 B2 02 LDA ($02) [$81:178E] A:178E X:0026 Y:0006 P:envmxdIzc $81/BA5B C5 00 CMP $00 [$00:0000] A:0000 X:0026 Y:0006 P:envmxdIZc $81/BA5D 10 15 BPL $15 [$BA74] A:0000 X:0026 Y:0006 P:eNvmxdIzc $81/BA5F BD A0 16 LDA $16A0,x[$81:16C6] A:0000 X:0026 Y:0006 P:eNvmxdIzc $81/BA62 A8 TAY A:01A5 X:0026 Y:0006 P:envmxdIzc $81/BA63 BD 50 16 LDA $1650,x[$81:1676] A:01A5 X:0026 Y:01A5 P:envmxdIzc $81/BA66 AA TAX A:0129 X:0026 Y:01A5 P:envmxdIzc $81/BA67 A5 22 LDA $22 [$00:0022] A:0129 X:0129 Y:01A5 P:envmxdIzc $81/BA69 8D BE 00 STA $00BE [$81:00BE] A:6C88 X:0129 Y:01A5 P:envmxdIzc $81/BA6C A5 20 LDA $20 [$00:0020] A:6C88 X:0129 Y:01A5 P:envmxdIzc $81/BA6E 22 B0 C2 81 JSL $81C2B0[$81:C2B0] A:9DA8 X:0129 Y:01A5 P:eNvmxdIzc $81/BA72 90 03 BCC $03 [$BA77] A:16C4 X:0024 Y:01A5 P:eNvmxdIzc $81/BA77 9B TXY A:16C4 X:0024 Y:01A5 P:eNvmxdIzc $81/BA78 FA PLX A:16C4 X:0024 Y:0024 P:envmxdIzc $81/BA79 8A TXA A:16C4 X:0026 Y:0024 P:envmxdIzc $81/BA7A 99 90 17 STA $1790,y[$81:17B4] A:0026 X:0026 Y:0024 P:envmxdIzc $81/BA7D BD 32 0E LDA $0E32,x[$81:0E58] A:0026 X:0026 Y:0024 P:envmxdIzc $81/BA80 99 32 0E STA $0E32,y[$81:0E56] A:0200 X:0026 Y:0024 P:envmxdIzc $81/BA83 BD 0A 0E LDA $0E0A,x[$81:0E30] A:0200 X:0026 Y:0024 P:envmxdIzc $81/BA86 99 0A 0E STA $0E0A,y[$81:0E2E] A:0020 X:0026 Y:0024 P:envmxdIzc $81/BA89 BD CA 11 LDA $11CA,x[$81:11F0] A:0020 X:0026 Y:0024 P:envmxdIzc $81/BA8C A8 TAY A:178E X:0026 Y:0024 P:envmxdIzc $81/BA8D B9 00 00 LDA $0000,y[$81:178E] A:178E X:0026 Y:178E P:envmxdIzc $81/BA90 1A INC A A:0000 X:0026 Y:178E P:envmxdIZc $81/BA91 99 00 00 STA $0000,y[$81:178E] A:0001 X:0026 Y:178E P:envmxdIzc $81/BA94 18 CLC A:0001 X:0026 Y:178E P:envmxdIzc $81/BA95 60 RTS A:0001 X:0026 Y:178E P:envmxdIzc
$81/BA96 ?
$81/BA96 DA PHX A:9582 X:0026 Y:0002 P:eNvmxdIzc $81/BA97 A5 22 LDA $22 [$00:0022] A:9582 X:0026 Y:0002 P:eNvmxdIzc $81/BA99 29 FF 00 AND #$00FF A:CB95 X:0026 Y:0002 P:eNvmxdIzc $81/BA9C C9 F0 00 CMP #$00F0 A:0095 X:0026 Y:0002 P:envmxdIzc $81/BA9F 30 41 BMI $41 [$BAE2] A:0095 X:0026 Y:0002 P:eNvmxdIzc
code is missing here
$81/BAE2 FA PLX A:0095 X:0026 Y:0002 P:eNvmxdIzc $81/BAE3 60 RTS A:0095 X:0026 Y:0002 P:envmxdIzc
$81/BB5F 5A PHY A:1A00 X:0026 Y:0004 P:envmxdIzc $81/BB60 C8 INY A:1A00 X:0026 Y:0004 P:envmxdIzc $81/BB61 C8 INY A:1A00 X:0026 Y:0005 P:envmxdIzc $81/BB62 B7 AC LDA [$AC],y[$95:82FF] A:1A00 X:0026 Y:0006 P:envmxdIzc $81/BB64 29 FF 00 AND #$00FF A:2700 X:0026 Y:0006 P:envmxdIzc $81/BB67 0A ASL A A:0 X:0026 Y:0006 P:envmxdIZc $81/BB68 7A PLY A:0 X:0026 Y:0006 P:envmxdIZc $81/BB69 DA PHX A:0 X:0026 Y:0004 P:envmxdIzc $81/BB6A AA TAX A:0 X:0026 Y:0004 P:envmxdIzc $81/BB6B 7C 6E BB JMP ($BB6E,x)[$81:BD70] A:0 X:0 Y:0004 P:envmxdIZc
$81/BB6E Jump Table for $81/BB5F
$81/BB6E 70 BD ; Entry #$00: $BD70 $81/BB70 77 BD ; Entry #$01: $BD77 $81/BB72 86 BD ; Entry #$02: $BD86 $81/BB74 6E BD ; Entry #$03: $BD6E
$81/BD70 ?
$81/BD70 FA PLX A:0 X:0 Y:0004 P:envmxdIZc $81/BD71 B7 AC LDA [$AC],y[$95:82FD] A:0 X:0026 Y:0004 P:envmxdIzc $81/BD73 C8 INY A:0 X:0026 Y:0004 P:envmxdIZc $81/BD74 C8 INY A:0 X:0026 Y:0005 P:envmxdIzc $81/BD75 C8 INY A:0 X:0026 Y:0006 P:envmxdIzc $81/BD76 60 RTS A:0 X:0026 Y:0007 P:envmxdIzc
$81/BD77 ?
$81/BD77 FA PLX A:0002 X:0002 Y:0001 P:envmxdIzc $81/BD78 8A TXA A:0002 X:0026 Y:0001 P:envmxdIzc $81/BD79 18 CLC A:0026 X:0026 Y:0001 P:envmxdIzc $81/BD7A 77 AC ADC [$AC],y[$95:8312] A:0026 X:0026 Y:0001 P:envmxdIzc $81/BD7C 5A PHY A:1A00 X:0026 Y:0001 P:envmxdIzc $81/BD7D A8 TAY A:1A00 X:0026 Y:0001 P:envmxdIzc $81/BD7E B9 00 00 LDA $0000,y[$81:1A00] A:1A00 X:0026 Y:1A00 P:envmxdIzc $81/BD81 7A PLY A:0008 X:0026 Y:1A00 P:envmxdIzc $81/BD82 C8 INY A:0008 X:0026 Y:0001 P:envmxdIzc $81/BD83 C8 INY A:0008 X:0026 Y:0002 P:envmxdIzc $81/BD84 C8 INY A:0008 X:0026 Y:0003 P:envmxdIzc $81/BD85 60 RTS A:0008 X:0026 Y:0004 P:envmxdIzc
$81/BDEA ?
$81/BDEA 5A PHY A:B18F X:0026 Y:0001 P:envmxdIzc $81/BDEB C8 INY A:B18F X:0026 Y:0001 P:envmxdIzc $81/BDEC C8 INY A:B18F X:0026 Y:0002 P:envmxdIzc $81/BDED B7 AC LDA [$AC],y[$95:82FC] A:B18F X:0026 Y:0003 P:envmxdIzc $81/BDEF 29 FF 00 AND #$00FF A:0001 X:0026 Y:0003 P:envmxdIzc $81/BDF2 0A ASL A A:0001 X:0026 Y:0003 P:envmxdIzc $81/BDF3 7A PLY A:0002 X:0026 Y:0003 P:envmxdIzc $81/BDF4 DA PHX A:0002 X:0026 Y:0001 P:envmxdIzc $81/BDF5 AA TAX A:0002 X:0026 Y:0001 P:envmxdIzc $81/BDF6 7C F9 BD JMP ($BDF9,x)[$81:BFFD] A:0002 X:0002 Y:0001 P:envmxdIzc
$81/BDF9 Jump Table for $81/BDEA
FB BF FD BF 06 C0 0D C0
$81/BFFD ?
$81/BFFD FA PLX A:0002 X:0002 Y:0001 P:envmxdIzc $81/BFFE 8A TXA A:0002 X:0026 Y:0001 P:envmxdIzc $81/BFFF 18 CLC A:0026 X:0026 Y:0001 P:envmxdIzc $81/C000 77 AC ADC [$AC],y[$95:82FA] A:0026 X:0026 Y:0001 P:envmxdIzc $81/C002 C8 INY A:1A00 X:0026 Y:0001 P:envmxdIzc $81/C003 C8 INY A:1A00 X:0026 Y:0002 P:envmxdIzc $81/C004 C8 INY A:1A00 X:0026 Y:0003 P:envmxdIzc $81/C005 60 RTS A:1A00 X:0026 Y:0004 P:envmxdIzc
$81/C00D ? (Executed when talking to the aerial building)
$81/C00D FA PLX A:0012 X:0012 Y:0001 P:envmxdIzc $81/C00E B7 AC LDA [$AC],y[$88:DE5D] A:0012 X:0024 Y:0001 P:envmxdIzc $81/C010 18 CLC A:1A52 X:0024 Y:0001 P:envmxdIzc $81/C011 6D A4 19 ADC $19A4 [$81:19A4] A:1A52 X:0024 Y:0001 P:envmxdIzc $81/C014 C8 INY A:1A78 X:0024 Y:0001 P:envmxdIzc $81/C015 C8 INY A:1A78 X:0024 Y:0002 P:envmxdIzc $81/C016 C8 INY A:1A78 X:0024 Y:0003 P:envmxdIzc $81/C017 60 RTS A:1A78 X:0024 Y:0004 P:envmxdIzc
$81/C149 ? (Executed when talking to the aerial building)
$81/C149 48 PHA A:9DFC X:0024 Y:0007 P:eNvmxdIzc $81/C14A AD BA 0C LDA $0CBA [$81:0CBA] A:9DFC X:0024 Y:0007 P:eNvmxdIzc $81/C14D D0 1D BNE $1D [$C16C] A:0000 X:0024 Y:0007 P:envmxdIZc $81/C14F DE 82 0E DEC $0E82,x[$81:0EA6] A:0000 X:0024 Y:0007 P:envmxdIZc $81/C152 DE 82 0E DEC $0E82,x[$81:0EA6] A:0000 X:0024 Y:0007 P:envmxdIzc $81/C155 BD 82 0E LDA $0E82,x[$81:0EA6] A:0000 X:0024 Y:0007 P:envmxdIzc $81/C158 30 2F BMI $2F [$C189] A:000E X:0024 Y:0007 P:envmxdIzc $81/C15A BF D0 C1 81 LDA $81C1D0,x[$81:C1F4] A:000E X:0024 Y:0007 P:envmxdIzc $81/C15E 18 CLC A:0120 X:0024 Y:0007 P:envmxdIzc $81/C15F 69 D2 0E ADC #$0ED2 A:0120 X:0024 Y:0007 P:envmxdIzc $81/C162 18 CLC A:0FF2 X:0024 Y:0007 P:envmxdIzc $81/C163 7D 82 0E ADC $0E82,x[$81:0EA6] A:0FF2 X:0024 Y:0007 P:envmxdIzc $81/C166 A8 TAY A:1000 X:0024 Y:0007 P:envmxdIzc $81/C167 68 PLA A:1000 X:0024 Y:1000 P:envmxdIzc $81/C168 99 00 00 STA $0000,y[$81:1000] A:9DFC X:0024 Y:1000 P:eNvmxdIzc $81/C16B 60 RTS A:9DFC X:0024 Y:1000 P:eNvmxdIzc
$81/C18B ? (Executed when talking to the aerial building)
$81/C18B AD BA 0C LDA $0CBA [$81:0CBA] A:8027 X:0024 Y:0007 P:envmxdIzc $81/C18E D0 1F BNE $1F [$C1AF] A:0000 X:0024 Y:0007 P:envmxdIZc $81/C190 BD 82 0E LDA $0E82,x[$81:0EA6] A:0000 X:0024 Y:0007 P:envmxdIZc $81/C193 C9 10 00 CMP #$0010 A:000C X:0024 Y:0007 P:envmxdIzc $81/C196 10 36 BPL $36 [$C1CE] A:000C X:0024 Y:0007 P:eNvmxdIzc $81/C198 BF D0 C1 81 LDA $81C1D0,x[$81:C1F4] A:000C X:0024 Y:0007 P:eNvmxdIzc $81/C19C 18 CLC A:0120 X:0024 Y:0007 P:envmxdIzc $81/C19D 69 D2 0E ADC #$0ED2 A:0120 X:0024 Y:0007 P:envmxdIzc $81/C1A0 18 CLC A:0FF2 X:0024 Y:0007 P:envmxdIzc $81/C1A1 7D 82 0E ADC $0E82,x[$81:0EA6] A:0FF2 X:0024 Y:0007 P:envmxdIzc $81/C1A4 A8 TAY A:0FFE X:0024 Y:0007 P:envmxdIzc $81/C1A5 B9 00 00 LDA $0000,y[$81:0FFE] A:0FFE X:0024 Y:0FFE P:envmxdIzc $81/C1A8 FE 82 0E INC $0E82,x[$81:0EA6] A:889D X:0024 Y:0FFE P:eNvmxdIzc $81/C1AB FE 82 0E INC $0E82,x[$81:0EA6] A:889D X:0024 Y:0FFE P:envmxdIzc $81/C1AE 60 RTS A:889D X:0024 Y:0FFE P:envmxdIzc
$81/C210 ?
$81/C210 08 PHP A:0001 X:0 Y:0 P:envmxdIzC $81/C211 8B PHB A:0001 X:0 Y:0 P:envmxdIzC $81/C212 C2 30 REP #$30 A:0001 X:0 Y:0 P:envmxdIzC $81/C214 A2 26 00 LDX #$0026 A:0001 X:0 Y:0 P:envmxdIzC $81/C217 20 2A BA JSR $BA2A [$81:BA2A] A:0001 X:0026 Y:0 P:envmxdIzC $81/C21A CA DEX A:FFFF X:0026 Y:0 P:eNvmxdIzc $81/C21B CA DEX A:FFFF X:0025 Y:0 P:envmxdIzc $81/C21C 10 F9 BPL $F9 [$C217] A:FFFF X:0024 Y:0 P:envmxdIzc $81/C21E 22 25 C2 81 JSL $81C225[$81:C225] A:FFFF X:FFFE Y:0 P:eNvmxdIzc $81/C222 AB PLB A:000A X:FFFE Y:0 P:envmxdIzc $81/C223 28 PLP A:000A X:FFFE Y:0 P:eNvmxdIzc $81/C224 6B RTL A:000A X:FFFE Y:0 P:envmxdIzC
$81/C225 ?
$81/C225 A9 C0 FF LDA #$FFC0 A:FFFF X:FFFE Y:0 P:eNvmxdIzc $81/C228 8D CE 0C STA $0CCE [$80:0CCE] A:FFC0 X:FFFE Y:0 P:eNvmxdIzc $81/C22B 8D D6 0C STA $0CD6 [$80:0CD6] A:FFC0 X:FFFE Y:0 P:eNvmxdIzc $81/C22E A9 40 01 LDA #$0140 A:FFC0 X:FFFE Y:0 P:eNvmxdIzc $81/C231 8D D0 0C STA $0CD0 [$80:0CD0] A:0140 X:FFFE Y:0 P:envmxdIzc $81/C234 8D D8 0C STA $0CD8 [$80:0CD8] A:0140 X:FFFE Y:0 P:envmxdIzc $81/C237 A9 C0 FF LDA #$FFC0 A:0140 X:FFFE Y:0 P:envmxdIzc $81/C23A 8D D2 0C STA $0CD2 [$80:0CD2] A:FFC0 X:FFFE Y:0 P:eNvmxdIzc $81/C23D 8D DA 0C STA $0CDA [$80:0CDA] A:FFC0 X:FFFE Y:0 P:eNvmxdIzc $81/C240 A9 40 01 LDA #$0140 A:FFC0 X:FFFE Y:0 P:eNvmxdIzc $81/C243 8D D4 0C STA $0CD4 [$80:0CD4] A:0140 X:FFFE Y:0 P:envmxdIzc $81/C246 8D DC 0C STA $0CDC [$80:0CDC] A:0140 X:FFFE Y:0 P:envmxdIzc $81/C249 9C C2 0C STZ $0CC2 [$80:0CC2] A:0140 X:FFFE Y:0 P:envmxdIzc $81/C24C 9C C4 0C STZ $0CC4 [$80:0CC4] A:0140 X:FFFE Y:0 P:envmxdIzc $81/C24F 9C C0 0C STZ $0CC0 [$80:0CC0] A:0140 X:FFFE Y:0 P:envmxdIzc $81/C252 A9 0A 00 LDA #$000A A:0140 X:FFFE Y:0 P:envmxdIzc $81/C255 8D BC 0C STA $0CBC [$80:0CBC] A:000A X:FFFE Y:0 P:envmxdIzc $81/C258 8D BE 0C STA $0CBE [$80:0CBE] A:000A X:FFFE Y:0 P:envmxdIzc $81/C25B 9C EE 0C STZ $0CEE [$80:0CEE] A:000A X:FFFE Y:0 P:envmxdIzc $81/C25E 9C A3 13 STZ $13A3 [$80:13A3] A:000A X:FFFE Y:0 P:envmxdIzc $81/C261 9C A7 13 STZ $13A7 [$80:13A7] A:000A X:FFFE Y:0 P:envmxdIzc $81/C264 9C A5 13 STZ $13A5 [$80:13A5] A:000A X:FFFE Y:0 P:envmxdIzc $81/C267 6B RTL A:000A X:FFFE Y:0 P:envmxdIzc
$81/C29A ?
$81/C29A 08 PHP A:000A X:FFFE Y:0 P:envmxdIzC $81/C29B C2 20 REP #$20 A:000A X:FFFE Y:0 P:envmxdIzC $81/C29D A9 00 80 LDA #$8000 A:000A X:FFFE Y:0 P:envmxdIzC $81/C2A0 0C B8 0C TSB $0CB8 [$80:0CB8] A:8000 X:FFFE Y:0 P:eNvmxdIzC $81/C2A3 28 PLP A:8000 X:FFFE Y:0 P:eNvmxdIZC $81/C2A4 6B RTL A:8000 X:FFFE Y:0 P:envmxdIzC
$81/C2B0 ? (Executed when talking to the aerial building and at start up)
When this subroutine is called, A contains the address of a Token Vector table Index. Its Bank got stored in $00BE beforehand.
The carry is used here as error flag. When it's set, something went wrong.
$81/C2B0 08 PHP ; Buffer Flag Register value, Y, X and A on stack $81/C2B1 5A PHY $81/C2B2 DA PHX $81/C2B3 48 PHA $81/C2B4 A2 26 00 LDX #$0026 A:9DA8 X:0129 Y:01A5 P:eNvmxdIzc $81/C2B7 BD E0 17 LDA $17E0,x[$81:1806] A:9DA8 X:0026 Y:01A5 P:envmxdIzc $81/C2BA F0 0A BEQ $0A [$C2C6] A:8887 X:0026 Y:01A5 P:eNvmxdIzc $81/C2BC CA DEX A:8887 X:0026 Y:01A5 P:eNvmxdIzc $81/C2BD CA DEX A:8887 X:0025 Y:01A5 P:envmxdIzc $81/C2BE 10 F7 BPL $F7 [$C2B7] A:8887 X:0024 Y:01A5 P:envmxdIzc
Exit and set Error flag
$81/C2C0 68 PLA ; Restore Flag Register value, Y, X and A $81/C2C1 FA PLX $81/C2C2 7A PLY $81/C2C3 28 PLP $81/C2C4 38 SEC ; Set Error flag - something went wrong $81/C2C5 6B RTL
$81/C2C6 AD BE 00 LDA $00BE ; Load $00BE and set the high byte as Bank for a Token Vector table Index $81/C2C9 EB XBA $81/C2CA 9D E0 17 STA $17E0,x $81/C2CD 68 PLA ; Pull Original A-value (16-bit) from Stack $81/C2CE 9D B8 17 STA $17B8,x ; Set it as Address for a Token Vector table Index $81/C2D1 68 PLA ; Pull Original X-value (16-bit) from Stack $81/C2D2 9D 50 16 STA $1650,x ; Set as X/Y coordinate addition value for all sprites of this Animation Step $81/C2D5 68 PLA ; Pull Original Y-value (16-bit) from Stack $81/C2D6 9D A0 16 STA $16A0,x[$81:16C4] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C2D9 9E 30 18 STZ $1830,x[$81:1854] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C2DC 9E 08 18 STZ $1808,x[$81:182C] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C2DF 9E 58 18 STZ $1858,x[$81:187C] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C2E2 9E 80 18 STZ $1880,x[$81:18A4] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C2E5 9E 1A 0D STZ $0D1A,x[$81:0D3E] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C2E8 9E 42 0D STZ $0D42,x[$81:0D66] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C2EB 9E 6A 0D STZ $0D6A,x[$81:0D8E] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C2EE 9E 92 0D STZ $0D92,x[$81:0DB6] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C2F1 9E BA 0D STZ $0DBA,x[$81:0DDE] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C2F4 9E E2 0D STZ $0DE2,x[$81:0E06] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C2F7 9E 0A 0E STZ $0E0A,x[$81:0E2E] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C2FA 9E 32 0E STZ $0E32,x[$81:0E56] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C2FD 9E 1A 12 STZ $121A,x[$81:123E] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C300 9E 42 12 STZ $1242,x[$81:1266] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C303 9E C8 16 STZ $16C8,x[$81:16EC] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C306 9E F0 16 STZ $16F0,x[$81:1714] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C309 9E 68 17 STZ $1768,x[$81:178C] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C30C 9E 40 17 STZ $1740,x[$81:1764] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C30F 9E F2 11 STZ $11F2,x[$81:1216] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C312 9E 7A 11 STZ $117A,x[$81:119E] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C315 9E A2 11 STZ $11A2,x[$81:11C6] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C318 9E 52 11 STZ $1152,x[$81:1176] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C31B 9E 48 19 STZ $1948,x[$81:196C] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C31E 9E 70 19 STZ $1970,x[$81:1994] A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C321 A9 FF FF LDA #$FFFF A:01A5 X:0024 Y:01A5 P:envmxdIzc $81/C324 9D 90 17 STA $1790,x[$81:17B4] A:FFFF X:0024 Y:01A5 P:eNvmxdIzc $81/C327 9D 18 17 STA $1718,x[$81:173C] A:FFFF X:0024 Y:01A5 P:eNvmxdIzc $81/C32A A9 00 30 LDA #$3000 A:FFFF X:0024 Y:01A5 P:eNvmxdIzc $81/C32D 9D 5A 0E STA $0E5A,x[$81:0E7E] A:3000 X:0024 Y:01A5 P:envmxdIzc $81/C330 A9 10 00 LDA #$0010 A:3000 X:0024 Y:01A5 P:envmxdIzc $81/C333 9D 82 0E STA $0E82,x[$81:0EA6] A:0010 X:0024 Y:01A5 P:envmxdIzc $81/C336 9D AA 0E STA $0EAA,x[$81:0ECE] A:0010 X:0024 Y:01A5 P:envmxdIzc $81/C339 8A TXA A:0010 X:0024 Y:01A5 P:envmxdIzc $81/C33A 4A LSR A A:0024 X:0024 Y:01A5 P:envmxdIzc $81/C33B 9D 00 16 STA $1600,x[$81:1624] A:0012 X:0024 Y:01A5 P:envmxdIzc $81/C33E 8A TXA A:0012 X:0024 Y:01A5 P:envmxdIzc $81/C33F 18 CLC A:0024 X:0024 Y:01A5 P:envmxdIzc $81/C340 69 A0 16 ADC #$16A0 A:0024 X:0024 Y:01A5 P:envmxdIzc $81/C343 9D 20 19 STA $1920,x[$81:1944] A:16C4 X:0024 Y:01A5 P:envmxdIzc $81/C346 9E B2 19 STZ $19B2,x[$81:19D6] A:16C4 X:0024 Y:01A5 P:envmxdIzc $81/C349 9E DA 19 STZ $19DA,x[$81:19FE] A:16C4 X:0024 Y:01A5 P:envmxdIzc $81/C34C 9E 02 1A STZ $1A02,x[$81:1A26] A:16C4 X:0024 Y:01A5 P:envmxdIzc $81/C34F 9E 2A 1A STZ $1A2A,x[$81:1A4E] A:16C4 X:0024 Y:01A5 P:envmxdIzc $81/C352 9E 52 1A STZ $1A52,x[$81:1A76] A:16C4 X:0024 Y:01A5 P:envmxdIzc $81/C355 9E 7A 1A STZ $1A7A,x[$81:1A9E] A:16C4 X:0024 Y:01A5 P:envmxdIzc $81/C358 9E A2 1A STZ $1AA2,x[$81:1AC6] A:16C4 X:0024 Y:01A5 P:envmxdIzc $81/C35B 9E CA 1A STZ $1ACA,x[$81:1AEE] A:16C4 X:0024 Y:01A5 P:envmxdIzc $81/C35E 9E F2 1A STZ $1AF2,x[$81:1B16] A:16C4 X:0024 Y:01A5 P:envmxdIzc $81/C361 9E 1A 1B STZ $1B1A,x[$81:1B3E] A:16C4 X:0024 Y:01A5 P:envmxdIzc $81/C364 28 PLP A:16C4 X:0024 Y:01A5 P:envmxdIzc $81/C365 18 CLC ; Clear Error flag - everything's fine $81/C366 6B RTL
$81/C367 ? (Check/Work off every Token Data Slot)
$81/C367 08 PHP ; Buffer Flag Register value and Program Bank on Stack $81/C368 8B PHB $81/C369 4B PHK ; Set Program Bank to $81 $81/C36A AB PLB $81/C36B C2 30 REP #$30 ; A/X/Y = 16-bit $81/C36D AD B8 0C LDA $0CB8 [$81:0CB8] A:0094 X:FFFE Y:0001 P:eNvmxdIzc $81/C370 89 00 80 BIT #$8000 A:8000 X:FFFE Y:0001 P:eNvmxdIzc $81/C373 F0 27 BEQ $27 ; [$C39C] If MSB is not set, exit $81/C375 20 9F C3 JSR $C39F [$81:C39F] A:8000 X:FFFE Y:0001 P:eNvmxdIzc $81/C378 B0 1C BCS $1C [$C396] A:0001 X:FFFE Y:0001 P:eNvmxdIzc $81/C37A A2 26 00 LDX #$0026 ; Setup slot counter $81/C37D BD E0 17 LDA $17E0,x[$81:1806] A:0001 X:0026 Y:0001 P:envmxdIzc $81/C380 F0 10 BEQ $10 ; [$C392] If empty, do next slot
$81/C382 20 C9 C3 JSR $C3C9 [$81:C3C9] A:9500 X:0026 Y:0077 P:eNvmxdIzc $81/C385 B0 0B BCS $0B ; [$C392] Do next slot $81/C387 BD 7A 11 LDA $117A,x[$81:11A0] A:0077 X:0026 Y:0077 P:eNvmxdIzc $81/C38A D0 06 BNE $06 ; [$C392] Do next slot $81/C38C 20 FB C3 JSR $C3FB [$81:C3FB] A:0 X:0026 Y:0077 P:envmxdIZc $81/C38F 20 3B C4 JSR $C43B ; (= Execute Token Data)
$81/C392 CA DEX ; Decrement slot counter twice $81/C393 CA DEX $81/C394 10 E7 BPL $E7 ; [$C37D] Loop until every slot is checked/worked off $81/C396 20 DD C4 JSR $C4DD [$81:C4DD] A:0 X:FFFE Y:0001 P:eNvmxdIzc $81/C399 20 20 C5 JSR $C520 [$81:C520] A:0 X:FFFE Y:0001 P:eNvmxdIzc $81/C39C AB PLB ; Restore Flag Register value and Program Bank $81/C39D 28 PLP $81/C39E 6B RTL
$81/C39F ?
$81/C39F 08 PHP ; Buffer Flag Register value on stack $81/C3A0 C2 30 REP #$30 ; A/X/Y = 16-bit $81/C3A2 EE C0 0C INC $0CC0 [$81:0CC0] A:8000 X:FFFE Y:0001 P:eNvmxdIzc $81/C3A5 AD BE 0C LDA $0CBE [$81:0CBE] A:8000 X:FFFE Y:0001 P:envmxdIzc $81/C3A8 CD C0 0C CMP $0CC0 [$81:0CC0] A:000A X:FFFE Y:0001 P:envmxdIzc $81/C3AB 10 0E BPL $0E [$C3BB] A:000A X:FFFE Y:0001 P:envmxdIzC
code is missing here
$81/C3BB AD C0 0C LDA $0CC0 [$81:0CC0] A:000A X:FFFE Y:0001 P:envmxdIzC $81/C3BE CD BC 0C CMP $0CBC [$81:0CBC] A:0001 X:FFFE Y:0001 P:envmxdIzC $81/C3C1 30 03 BMI $03 [$C3C6] A:0001 X:FFFE Y:0001 P:eNvmxdIzc $81/C3C3 9C C0 0C STZ $0CC0 [$81:0CC0] A:000A X:0 Y:0 P:enVmxdIZC $81/C3C6 28 PLP ; Restore Flag Register value $81/C3C7 18 CLC A:0001 X:FFFE Y:0001 P:eNvmxdIzc $81/C3C8 60 RTS
$81/C3C9 ?
$81/C3C9 C2 30 REP #$30 A:9500 X:0026 Y:0077 P:eNvmxdIzc $81/C3CB BD 50 16 LDA $1650,x[$81:1676] A:9500 X:0026 Y:0077 P:eNvmxdIzc $81/C3CE 38 SEC A:0000 X:0026 Y:0077 P:envmxdIZc $81/C3CF ED C2 0C SBC $0CC2 [$81:0CC2] A:0000 X:0026 Y:0077 P:envmxdIZC $81/C3D2 CD D2 0C CMP $0CD2 [$81:0CD2] A:0000 X:0026 Y:0077 P:envmxdIZC $81/C3D5 30 18 BMI $18 [$C3EF] A:0000 X:0026 Y:0077 P:envmxdIzc $81/C3D7 CD D4 0C CMP $0CD4 [$81:0CD4] A:0000 X:0026 Y:0077 P:envmxdIzc $81/C3DA 10 13 BPL $13 [$C3EF] A:0000 X:0026 Y:0077 P:eNvmxdIzc $81/C3DC BD A0 16 LDA $16A0,x[$81:16C6] A:0000 X:0026 Y:0077 P:eNvmxdIzc $81/C3DF 38 SEC A:0077 X:0026 Y:0077 P:envmxdIzc $81/C3E0 ED C4 0C SBC $0CC4 [$81:0CC4] A:0077 X:0026 Y:0077 P:envmxdIzC $81/C3E3 CD CE 0C CMP $0CCE [$81:0CCE] A:0077 X:0026 Y:0077 P:envmxdIzC $81/C3E6 30 07 BMI $07 [$C3EF] A:0077 X:0026 Y:0077 P:envmxdIzc $81/C3E8 CD D0 0C CMP $0CD0 [$81:0CD0] A:0077 X:0026 Y:0077 P:envmxdIzc $81/C3EB 10 02 BPL $02 [$C3EF] A:0077 X:0026 Y:0077 P:eNvmxdIzc $81/C3ED 80 08 BRA $08 [$C3F7] A:0077 X:0026 Y:0077 P:eNvmxdIzc $81/C3F7 18 CLC A:0077 X:0026 Y:0077 P:eNvmxdIzc $81/C3F8 60 RTS
$81/C3FB C2 30 REP #$30 ; A/X/Y = 16-bit $81/C3FD 9C BA 0C STZ $0CBA [$81:0CBA] A:0000 X:0026 Y:0077 P:envmxdIZc $81/C400 BD 58 18 LDA $1858,x ; Load value if the Token Handler should be executed multiple times $81/C403 8D B6 0C STA $0CB6 $81/C406 BD E0 17 LDA $17E0,x ; Setup 24-bit address in $AC-E $81/C409 85 AD STA $AD $81/C40B BD B8 17 LDA $17B8,x $81/C40E 85 AC STA $AC $81/C410 A7 AC LDA [$AC] ; Load byte from there (Index to Token Vector table) $81/C412 29 FF 00 AND #$00FF ; Remove accidentally loaded second byte $81/C415 8D EC 0C STA $0CEC ; Store loaded Token Vector table Index in $0CEC $81/C418 0A ASL A ; Multiply by 2 (each Token Vector is 2 bytes in size) $81/C419 86 00 STX $00 ; Buffer X $81/C41B AA TAX ; Transfer Token Vector table Index in X $81/C41C F4 27 C4 PEA $C427 ; Put Return Address on stack - go to $C428 after Token Handler $81/C41F BF A0 5C 10 LDA $105CA0,x ; Load Token Vector (with the help of the loaded Index) $81/C423 3A DEC A ; Dec Vector (so the program jumps right), push it on stack $81/C424 48 PHA $81/C425 A6 00 LDX $00 ; Restore X on stack $81/C427 60 RTS ; Follow Token Vector - this is NOT the end of this subroutine! $81/C428 AD B6 0C LDA $0CB6 ; Load Token Handler no-repetition flag $81/C42B F0 E3 BEQ $E3 ; [$C410] Loop if the no-repetition flag is not set $81/C42D 9D 58 18 STA $1858,x ; Store Token Handler no-repetition flag back $81/C430 A5 AD LDA $AD ; Store 24-bit Address for Token Vector table Index back $81/C432 9D E0 17 STA $17E0,x $81/C435 A5 AC LDA $AC $81/C437 9D B8 17 STA $17B8,x $81/C43A 60 RTS
$81/C43B ? (Execute Token Data)
$81/C43B C2 30 REP #$30 ; A/X/Y = 16-bit $81/C43D BD 30 18 LDA $1830,x ; Load BANK for 24-bit Slot Token Data address $81/C440 F0 53 BEQ $53 ; [$C495] If it is empty, exit $81/C442 A9 02 00 LDA #$0002 A:9582 X:0026 Y:0001 P:eNvmxdIzc $81/C445 8D BA 0C STA $0CBA [$81:0CBA] A:0002 X:0026 Y:0001 P:envmxdIzc $81/C448 BD 80 18 LDA $1880,x ; Load No-Repition flag $81/C44B 8D B6 0C STA $0CB6 $81/C44E BD 30 18 LDA $1830,x ; Setup 24-bit Address to Load Data (Token Stuff) in $AC-E $81/C451 85 AD STA $AD $81/C453 BD 08 18 LDA $1808,x $81/C456 85 AC STA $AC $81/C458 BD 52 11 LDA $1152,x[$81:1178] A:82EB X:0026 Y:0001 P:eNvmxdIzc $81/C45B 89 01 00 BIT #$0001 A:0000 X:0026 Y:0001 P:envmxdIZc $81/C45E F0 0B BEQ $0B [$C46B] A:0000 X:0026 Y:0001 P:envmxdIZc
code is missing here
$81/C46B A7 AC LDA [$AC] ; Load byte from there (Index to Token Vector table) $81/C46D 29 FF 00 AND #$00FF ; Remove accidentally loaded second byte $81/C470 8D EC 0C STA $0CEC ; Store loaded Token Vector table Index in $0CEC $81/C473 0A ASL A ; Multiply by 2 (each Token Vector is 2 bytes in size) $81/C474 86 00 STX $00 ; Buffer X $81/C476 AA TAX ; Transfer Token Vector table Index in X $81/C477 F4 82 C4 PEA $C482 ; Put Return Address on stack - go to $C483 after Token Handler $81/C47A BF A0 5C 10 LDA $105CA0,x ; Load Token Vector (with the help of the loaded Index) $81/C47E 3A DEC A ; Dec Vector (so the program jumps right), push it on stack $81/C47F 48 PHA $81/C480 A6 00 LDX $00 ; Restore X on stack $81/C482 60 RTS ; Follow Token Vector - this is NOT the end of this subroutine! $81/C483 AD B6 0C LDA $0CB6 ; Is "No-Repition flag" set? $81/C486 F0 E3 BEQ $E3 ; [$C46B] If it is, go on, else branch/loop $81/C488 9D 80 18 STA $1880,x ; Store (empty?) no-repition flag value back $81/C48B A5 AD LDA $AD ; Store 24-bit Data Load address back $81/C48D 9D 30 18 STA $1830,x $81/C490 A5 AC LDA $AC $81/C492 9D 08 18 STA $1808,x $81/C495 60 RTS
$81/C4DD ?
$81/C4DD A9 FF FF LDA #$FFFF A:0 X:FFFE Y:0001 P:eNvmxdIzc $81/C4E0 8D 18 0D STA $0D18 [$81:0D18] A:FFFF X:FFFE Y:0001 P:eNvmxdIzc $81/C4E3 A2 26 00 LDX #$0026 ; Go through every Slot $81/C4E6 BD E0 17 LDA $17E0,x ; Check if Bank-entry is #$00 $81/C4E9 F0 03 BEQ $03 ; [$C4EE] If it is, the slot is unused. Branch and do next slot $81/C4EB 20 F3 C4 JSR $C4F3 [$81:C4F3] A:9583 X:0026 Y:0004 P:eNvmxdIzc $81/C4EE CA DEX ; Decrement Index/Loop Counter twice $81/C4EF CA DEX $81/C4F0 10 F4 BPL $F4 ; [$C4E6] Loop until every Slot is checked/worked off $81/C4F2 60 RTS
$81/C4F3 ?
$81/C4F3 A0 28 00 LDY #$0028 A:9583 X:0026 Y:0004 P:eNvmxdIzc $81/C4F6 84 20 STY $20 [$00:0020] A:9583 X:0026 Y:0028 P:envmxdIzc $81/C4F8 B9 F0 0C LDA $0CF0,y[$81:0D18] A:9583 X:0026 Y:0028 P:envmxdIzc $81/C4FB C9 FF FF CMP #$FFFF A:FFFF X:0026 Y:0028 P:eNvmxdIzc $81/C4FE F0 13 BEQ $13 [$C513] A:FFFF X:0026 Y:0028 P:envmxdIZC $81/C500 A8 TAY A:0026 X:0024 Y:0028 P:envmxdIzc $81/C501 BD 20 19 LDA $1920,x[$81:1944] A:0026 X:0024 Y:0026 P:envmxdIzc $81/C504 85 00 STA $00 [$00:0000] A:16C4 X:0024 Y:0026 P:envmxdIzc $81/C506 B9 20 19 LDA $1920,y[$81:1946] A:16C4 X:0024 Y:0026 P:envmxdIzc $81/C509 85 02 STA $02 [$00:0002] A:16C6 X:0024 Y:0026 P:envmxdIzc $81/C50B B2 00 LDA ($00) [$81:16C4] A:16C6 X:0024 Y:0026 P:envmxdIzc $81/C50D D2 02 CMP ($02) [$81:16C6] A:01A5 X:0024 Y:0026 P:envmxdIzc $81/C50F 10 02 BPL $02 [$C513] A:01A5 X:0024 Y:0026 P:envmxdIZC
code is missing here
$81/C513 A4 20 LDY $20 [$00:0020] A:FFFF X:0026 Y:0028 P:envmxdIZC $81/C515 B9 F0 0C LDA $0CF0,y[$81:0D18] A:FFFF X:0026 Y:0028 P:envmxdIzC $81/C518 9D F0 0C STA $0CF0,x[$81:0D16] A:FFFF X:0026 Y:0028 P:eNvmxdIzC $81/C51B 8A TXA A:FFFF X:0026 Y:0028 P:eNvmxdIzC $81/C51C 99 F0 0C STA $0CF0,y[$81:0D18] A:0026 X:0026 Y:0028 P:envmxdIzC $81/C51F 60 RTS A:0026 X:0026 Y:0028 P:envmxdIzC
$81/C520 ? (Add the sprites of objects to the OAM buffer)
$81/C520 A2 28 00 LDX #$0028 A:0 X:FFFE Y:0001 P:eNvmxdIzc $81/C523 BD F0 0C LDA $0CF0,x[$81:0D18] A:0 X:0028 Y:0001 P:envmxdIzc $81/C526 C9 FF FF CMP #$FFFF A:FFFF X:0028 Y:0001 P:eNvmxdIzc $81/C529 D0 01 BNE $01 [$C52C] A:FFFF X:0028 Y:0001 P:envmxdIZC $81/C52B 60 RTS A:FFFF X:0028 Y:0001 P:envmxdIZC $81/C52C AA TAX A:0026 X:0028 Y:0028 P:envmxdIzc $81/C52D BD F2 11 LDA $11F2,x[$81:1218] A:0026 X:0026 Y:0028 P:envmxdIzc $81/C530 29 00 F0 AND #$F000 A:0 X:0026 Y:0028 P:envmxdIZc $81/C533 F0 29 BEQ $29 [$C55E] A:0 X:0026 Y:0028 P:envmxdIZc
code is missing here
$81/C55E BD 6A 0D LDA $0D6A,x ; Load Bank of 24-bit-address - if zero, slot is empty, do next $81/C561 F0 4F BEQ $4F ; [$C5B2] UNNECESSARY LINE - Cycles could be saved if branching to $C523 $81/C563 85 21 STA $21 ; If not empty, set up 24-bit-address in $20-22 $81/C565 BD 1A 0D LDA $0D1A,x $81/C568 85 20 STA $20 $81/C56A BD 50 16 LDA $1650,x[$81:1676] A:82AD X:0026 Y:0028 P:eNvmxdIzc $81/C56D 38 SEC A:0008 X:0026 Y:0028 P:envmxdIzc $81/C56E ED C2 0C SBC $0CC2 [$81:0CC2] A:0008 X:0026 Y:0028 P:envmxdIzC $81/C571 CD D2 0C CMP $0CD2 [$81:0CD2] A:0008 X:0026 Y:0028 P:envmxdIzC $81/C574 30 3C BMI $3C [$C5B2] A:0008 X:0026 Y:0028 P:envmxdIzc $81/C576 CD D4 0C CMP $0CD4 [$81:0CD4] A:0008 X:0026 Y:0028 P:envmxdIzc $81/C579 10 37 BPL $37 [$C5B2] A:0008 X:0026 Y:0028 P:eNvmxdIzc $81/C57B 85 00 STA $00 [$00:0000] A:0008 X:0026 Y:0028 P:eNvmxdIzc $81/C57D BD A0 16 LDA $16A0,x[$81:16C6] A:0008 X:0026 Y:0028 P:eNvmxdIzc $81/C580 38 SEC A:0077 X:0026 Y:0028 P:envmxdIzc $81/C581 ED C4 0C SBC $0CC4 [$81:0CC4] A:0077 X:0026 Y:0028 P:envmxdIzC $81/C584 CD CE 0C CMP $0CCE [$81:0CCE] A:0077 X:0026 Y:0028 P:envmxdIzC $81/C587 30 29 BMI $29 [$C5B2] A:0077 X:0026 Y:0028 P:envmxdIzc $81/C589 CD D0 0C CMP $0CD0 [$81:0CD0] A:0077 X:0026 Y:0028 P:envmxdIzc $81/C58C 10 24 BPL $24 [$C5B2] A:0077 X:0026 Y:0028 P:eNvmxdIzc $81/C58E 85 02 STA $02 [$00:0002] A:0077 X:0026 Y:0028 P:eNvmxdIzc $81/C590 64 08 STZ $08 [$00:0008] A:0077 X:0026 Y:0028 P:eNvmxdIzc $81/C592 A9 FF FF LDA #$FFFF A:0077 X:0026 Y:0028 P:eNvmxdIzc $81/C595 85 0A STA $0A [$00:000A] A:FFFF X:0026 Y:0028 P:eNvmxdIzc $81/C597 AD EE 0C LDA $0CEE [$81:0CEE] A:FFFF X:0026 Y:0028 P:eNvmxdIzc $81/C59A D0 10 BNE $10 [$C5AC] A:0001 X:0026 Y:0028 P:envmxdIzc
code is missing here
$81/C5AC DA PHX ; Buffer Index/Loop Counter on stack $81/C5AD 22 49 88 80 JSL $808849 ; Set Sprites in OAM buffer $81/C5B1 FA PLX ; Restore Index/Loop Counter $81/C5B2 4C 23 C5 JMP $C523 [$81:C523] A:0030 X:0026 Y:003E P:envmxdIzc
$81/C5D7 Restore original Token Handlers
This transfers the original Token Handlers from ROM to SRAM (after the SRAM is reset).
$81/C5D7 DA PHX ; Buffer X on stack $81/C5D8 A2 00 02 LDX #$0200 $81/C5DB BF E9 C5 81 LDA $81C5E9,x $81/C5DF 9F A0 5C 10 STA $105CA0,x $81/C5E3 CA DEX $81/C5E4 CA DEX $81/C5E5 10 F4 BPL $F4 ; [$C5DB] $81/C5E7 FA PLX ; Restore X $81/C5E8 6B RTL
$81/C5E9 Hook Vectors
The #$200 byte here get transfered to $10/5CA0-$10/5EA0 if the SRAM got reset.
$81/C5E9 BF AF ; = $10/5CA0 Vector #$00 $81/C5EB B7 B2 ; = $10/5CA2 Vector #$01 $81/C5ED 37 AE ; = $10/5CA4 Vector #$02 $81/C5EF 0A B3 ; = $10/5CA6 Vector #$03 $81/C5F1 45 B3 ; = $10/5CA8 Vector #$04 $81/C5F3 D9 91 ; = $10/5CAA Vector #$05 $81/C5F5 6C 92 ; = $10/5CAC Vector #$06 $81/C5F7 1B 93 ; = $10/5CAE Vector #$07 $81/C5F9 87 86 ; = $10/5CB0 Vector #$08 $81/C5FB C2 83 ; = $10/5CB2 Vector #$09 $81/C5FD A5 8E ; = $10/5CB4 Vector #$0A $81/C5FF BD AB ; = $10/5CB6 Vector #$0B $81/C601 73 AA ; = $10/5CB8 Vector #$0C $81/C603 91 AA ; = $10/5CBA Vector #$0D $81/C605 39 AC ; = $10/5CBC Vector #$0E $81/C607 9C AD ; = $10/5CBE Vector #$0F $81/C609 33 80 ; = $10/5CC0 Vector #$10 $81/C60B 09 85 ; = $10/5CC2 Vector #$11 $81/C60D 2A A0 ; = $10/5CC4 Vector #$12 $81/C60F 4D 81 ; = $10/5CC6 Vector #$13 $81/C611 C6 90 ; = $10/5CC8 Vector #$14 $81/C613 74 AE ; = $10/5CCA Vector #$15 $81/C615 66 A0 ; = $10/5CCC Vector #$16 $81/C617 35 8D ; = $10/5CCE Vector #$17 $81/C619 F9 A0 ; = $10/5CD0 Vector #$18 $81/C61B 7B 93 ; = $10/5CD2 Vector #$19 $81/C61D 08 95 ; = $10/5CD4 Vector #$1A $81/C61F 2B AE ; = $10/5CD6 Vector #$1B $81/C621 BA AC ; = $10/5CD8 Vector #$1C $81/C623 9C AD ; = $10/5CDA Vector #$1D $81/C625 9C AD ; = $10/5CDC Vector #$1E $81/C627 9C AD ; = $10/5CDE Vector #$1F $81/C629 A5 AF ; = $10/5CE0 Vector #$20 $81/C62B 02 80 ; = $10/5CE2 Vector #$21 $81/C62D 28 80 ; = $10/5CE4 Vector #$22 $81/C62F 9D AD ; = $10/5CE6 Vector #$23 $81/C631 80 B3 ; = $10/5CE8 Vector #$24 $81/C633 70 80 ; = $10/5CEA Vector #$25 $81/C635 90 B1 ; = $10/5CEC Vector #$26 $81/C637 56 93 ; = $10/5CEE Vector #$27 $81/C639 D3 A1 ; = $10/5CF0 Vector #$28 $81/C63B F6 A1 ; = $10/5CF2 Vector #$29 $81/C63D 18 A2 ; = $10/5CF4 Vector #$2A $81/C63F 3A A2 ; = $10/5CF6 Vector #$2B $81/C641 5C A2 ; = $10/5CF8 Vector #$2C $81/C643 4E B2 ; = $10/5CFA Vector #$2D $81/C645 14 82 ; = $10/5CFC Vector #$2E $81/C647 8F 81 ; = $10/5CFE Vector #$2F $81/C649 83 A1 ; = $10/5D00 Vector #$30 $81/C64B AB A1 ; = $10/5D02 Vector #$31 $81/C64D 50 82 ; = $10/5D04 Vector #$32 $81/C64F ED B0 ; = $10/5D06 Vector #$33 $81/C651 AA B0 ; = $10/5D08 Vector #$34 $81/C653 5A AF ; = $10/5D0A Vector #$35 $81/C655 FD 93 ; = $10/5D0C Vector #$36 $81/C657 AF B3 ; = $10/5D0E Vector #$37 $81/C659 96 80 ; = $10/5D10 Vector #$38 $81/C65A F2 98 ; = $10/5D12 Vector #$39 01 A4 ; Vector #$3A 1A A4 ; Vector #$3B 58 A4 ; Vector #$3C 98 A4 ; Vector #$3D B8 8A ; Vector #$3E B8 B1 ; Vector #$3F AB AD ; Vector #$40 0A AE ; Vector #$41 CC B6 ; Vector #$42 1B B6 ; Vector #$43 D3 B3 ; Vector #$44 EA B3 ; Vector #$45 F3 B3 ; Vector #$46 84 B4 ; Vector #$47 D9 B4 ; Vector #$48 40 B5 ; Vector #$49 9D B7 ; Vector #$4A 53 B8 ; Vector #$4B 9C AD ; Vector #$4C 9C AD ; Vector #$4D 9C AD ; Vector #$4E 9C AD ; Vector #$4F 59 94 ; Vector #$50 8E 94 ; Vector #$51 CA 80 ; Vector #$52 C5 85 ; Vector #$53 6F 85 ; Vector #$54 87 A3 ; Vector #$55 C3 94 ; Vector #$56 E8 B1 ; Vector #$57 19 B2 ; Vector #$58 D6 A4 ; Vector #$59 9C AD ; Vector #$5A 9C AD ; Vector #$5B 9C AD ; Vector #$5C 9C AD ; Vector #$5D 9C AD ; Vector #$5E 9C AD ; Vector #$5F A7 84 ; Vector #$60 A6 B1 91 B3 D3 84 EE 84 1D AA 7A A2 F0 A2 27 A3 EF AD 78 85 32 8A 1E AE 57 95 C0 95 05 96 A9 AA CA AA E5 A8 EB AA 54 AB F8 AB D5 A6 D5 AD 43 B7 79 B7 8B B7 6E AD 6F B5 3C 88 1A 86 06 8F 08 8B E2 20 A9 81 48 AB C2 30 A5 00 85 14 20 B5 C5 BD 28 16 18 65 14 BD 50 16 65 16 85 08 A5 02 85 14 20 B5 C5 BD 78 16 18 65 14 BD A0 16 65 16 85 0A B9 BA 0D 18 65 04 85 0C B9 E2 0D 18 65 06 85 0E B9 50 16 38 E5 08 10 04 49 FF FF 1A 85 10 B9 A0 16 38 E5 0A 10 04 49 FF FF 1A 85 12 A5 10 38 E5 0C 10 7E 29 FF 00 EB 85 14 49 FF FF 1A 85 18 A5 12 38 E5 0E 10 6B 29 FF 00 EB 85 16 49 FF FF 1A 85 1A BD 50 16 38 F9 50 16 10 04 49 FF FF 1A 85 1C BD A0 16 38 F9 A0 16 10 04 49 FF FF 1A 85 1E A5 10 C5 1C 30 09 A5 12 C5 1E 30 03 4C C8 C7 A5 00 30 07 18 65 14 30 09 80 0A 18 65 18 10 02 80 03 A9 00 00 85 00 A5 02 30 07 18 65 16 30 09 80 0A 18 65 1A 10 02 80 03 A9 00 00 85 02 AB 28 38 6B AB 28 18 6B DA 08 22 DD C7 81 22 0E C8 81 28 FA 6B DA 08 AD 01 01 18 6A 6A 6A 6A 29 00
$81/C7D0 ?
$81/C7D0 DA PHX A:8000 X:FFFE Y:0 P:envmxdIzC $81/C7D1 08 PHP A:8000 X:FFFE Y:0 P:envmxdIzC $81/C7D2 22 DD C7 81 JSL $81C7DD[$81:C7DD] A:8000 X:FFFE Y:0 P:envmxdIzC $81/C7D6 22 0E C8 81 JSL $81C80E[$81:C80E] A:0010 X:FFFE Y:0 P:eNvmxdIzC $81/C7DA 28 PLP A:0 X:FFFE Y:FFFE P:eNvmxdIzC $81/C7DB FA PLX A:0 X:FFFE Y:FFFE P:envmxdIzC $81/C7DC 6B RTL A:0 X:FFFE Y:FFFE P:eNvmxdIzC
$81/C7DD ?
$81/C7DD DA PHX A:8000 X:FFFE Y:0 P:envmxdIzC $81/C7DE 08 PHP A:8000 X:FFFE Y:0 P:envmxdIzC $81/C7DF AD 01 01 LDA $0101 [$80:0101] A:8000 X:FFFE Y:0 P:envmxdIzC $81/C7E2 18 CLC A:0003 X:FFFE Y:0 P:envmxdIzC $81/C7E3 6A ROR A A:0003 X:FFFE Y:0 P:envmxdIzc $81/C7E4 6A ROR A A:0001 X:FFFE Y:0 P:envmxdIzC $81/C7E5 6A ROR A A:8000 X:FFFE Y:0 P:eNvmxdIzC $81/C7E6 6A ROR A A:C000 X:FFFE Y:0 P:eNvmxdIzc $81/C7E7 29 00 E0 AND #$E000 A:6000 X:FFFE Y:0 P:envmxdIzc $81/C7EA 8D 78 12 STA $1278 [$80:1278] A:6000 X:FFFE Y:0 P:envmxdIzc $81/C7ED A9 01 20 LDA #$2001 A:6000 X:FFFE Y:0 P:envmxdIzc $81/C7F0 8D 7C 12 STA $127C [$80:127C] A:2001 X:FFFE Y:0 P:envmxdIzc $81/C7F3 A9 00 00 LDA #$0000 A:2001 X:FFFE Y:0 P:envmxdIzc $81/C7F6 8D 7A 12 STA $127A [$80:127A] A:0 X:FFFE Y:0 P:envmxdIZc $81/C7F9 A9 00 00 LDA #$0000 A:0 X:FFFE Y:0 P:envmxdIZc $81/C7FC 0A ASL A A:0 X:FFFE Y:0 P:envmxdIZc $81/C7FD 8D 7E 12 STA $127E [$80:127E] A:0 X:FFFE Y:0 P:envmxdIZc $81/C800 8D 82 12 STA $1282 [$80:1282] A:0 X:FFFE Y:0 P:envmxdIZc $81/C803 A9 07 00 LDA #$0007 A:0 X:FFFE Y:0 P:envmxdIZc $81/C806 1A INC A A:0007 X:FFFE Y:0 P:envmxdIzc $81/C807 0A ASL A A:0008 X:FFFE Y:0 P:envmxdIzc $81/C808 8D 80 12 STA $1280 [$80:1280] A:0010 X:FFFE Y:0 P:envmxdIzc $81/C80B 28 PLP A:0010 X:FFFE Y:0 P:envmxdIzc $81/C80C FA PLX A:0010 X:FFFE Y:0 P:envmxdIzC $81/C80D 6B RTL A:0010 X:FFFE Y:0 P:eNvmxdIzC
$81/C80E ?
$81/C80E DA PHX A:0010 X:FFFE Y:0 P:eNvmxdIzC $81/C80F 08 PHP A:0010 X:FFFE Y:0 P:eNvmxdIzC $81/C810 A9 00 00 LDA #$0000 A:0010 X:FFFE Y:0 P:eNvmxdIzC $81/C813 8D A6 12 STA $12A6 [$80:12A6] A:0 X:FFFE Y:0 P:envmxdIZC $81/C816 8D 20 13 STA $1320 [$80:1320] A:0 X:FFFE Y:0 P:envmxdIZC $81/C819 AD 7E 12 LDA $127E [$80:127E] A:0 X:FFFE Y:0 P:envmxdIZC $81/C81C 0A ASL A A:0 X:FFFE Y:0 P:envmxdIZC $81/C81D 0A ASL A A:0 X:FFFE Y:0 P:envmxdIZc $81/C81E 0A ASL A A:0 X:FFFE Y:0 P:envmxdIZc $81/C81F 0A ASL A A:0 X:FFFE Y:0 P:envmxdIZc $81/C820 85 00 STA $00 [$00:0000] A:0 X:FFFE Y:0 P:envmxdIZc $81/C822 AD 80 12 LDA $1280 [$80:1280] A:0 X:FFFE Y:0 P:envmxdIZc $81/C825 0A ASL A A:0010 X:FFFE Y:0 P:envmxdIzc $81/C826 0A ASL A A:0020 X:FFFE Y:0 P:envmxdIzc $81/C827 0A ASL A A:0040 X:FFFE Y:0 P:envmxdIzc $81/C828 0A ASL A A:0080 X:FFFE Y:0 P:envmxdIzc $81/C829 85 02 STA $02 [$00:0002] A:0100 X:FFFE Y:0 P:envmxdIzc $81/C82B A6 00 LDX $00 [$00:0000] A:0100 X:FFFE Y:0 P:envmxdIzc $81/C82D A9 00 00 LDA #$0000 A:0100 X:0 Y:0 P:envmxdIZc $81/C830 9F 00 21 7E STA $7E2100,x[$7E:2100] A:0 X:0 Y:0 P:envmxdIZc $81/C834 A5 00 LDA $00 [$00:0000] A:0 X:0 Y:0 P:envmxdIZc $81/C836 69 10 00 ADC #$0010 A:0 X:0 Y:0 P:envmxdIZc $81/C839 85 00 STA $00 [$00:0000] A:0010 X:0 Y:0 P:envmxdIzc $81/C83B C5 02 CMP $02 [$00:0002] A:0010 X:0 Y:0 P:envmxdIzc $81/C83D 30 EC BMI $EC [$C82B] A:0010 X:0 Y:0 P:eNvmxdIzc $81/C83F A0 28 00 LDY #$0028 A:0100 X:00F0 Y:0 P:envmxdIZC $81/C842 A9 00 00 LDA #$0000 A:0100 X:00F0 Y:0028 P:envmxdIzC $81/C845 99 A8 12 STA $12A8,y[$80:12D0] A:0 X:00F0 Y:0028 P:envmxdIZC $81/C848 99 D0 12 STA $12D0,y[$80:12F8] A:0 X:00F0 Y:0028 P:envmxdIZC $81/C84B 99 F8 12 STA $12F8,y[$80:1320] A:0 X:00F0 Y:0028 P:envmxdIZC $81/C84E 99 22 13 STA $1322,y[$80:134A] A:0 X:00F0 Y:0028 P:envmxdIZC $81/C851 99 4A 13 STA $134A,y[$80:1372] A:0 X:00F0 Y:0028 P:envmxdIZC $81/C854 99 72 13 STA $1372,y[$80:139A] A:0 X:00F0 Y:0028 P:envmxdIZC $81/C857 88 DEY A:0 X:00F0 Y:0028 P:envmxdIZC $81/C858 88 DEY A:0 X:00F0 Y:0027 P:envmxdIzC $81/C859 10 E7 BPL $E7 [$C842] A:0 X:00F0 Y:0026 P:envmxdIzC $81/C85B A0 20 00 LDY #$0020 A:0 X:00F0 Y:FFFE P:eNvmxdIzC $81/C85E A9 00 00 LDA #$0000 A:0 X:00F0 Y:0020 P:envmxdIzC $81/C861 99 84 12 STA $1284,y[$80:12A4] A:0 X:00F0 Y:0020 P:envmxdIZC $81/C864 88 DEY A:0 X:00F0 Y:0020 P:envmxdIZC $81/C865 88 DEY A:0 X:00F0 Y:001F P:envmxdIzC $81/C866 10 F6 BPL $F6 [$C85E] A:0 X:00F0 Y:001E P:envmxdIzC $81/C868 9C A3 13 STZ $13A3 [$80:13A3] A:0 X:00F0 Y:FFFE P:eNvmxdIzC $81/C86B 9C A5 13 STZ $13A5 [$80:13A5] A:0 X:00F0 Y:FFFE P:eNvmxdIzC $81/C86E 28 PLP A:0 X:00F0 Y:FFFE P:eNvmxdIzC $81/C86F FA PLX A:0 X:00F0 Y:FFFE P:eNvmxdIzC $81/C870 6B RTL A:0 X:FFFE Y:FFFE P:eNvmxdIzC
$81/C8C3 ?
$81/C8C3 DA PHX A:0093 X:0026 Y:0001 P:envmxdIzc $81/C8C4 5A PHY A:0093 X:0026 Y:0001 P:envmxdIzc $81/C8C5 08 PHP A:0093 X:0026 Y:0001 P:envmxdIzc $81/C8C6 C2 30 REP #$30 A:0093 X:0026 Y:0001 P:envmxdIzc $81/C8C8 9C A4 12 STZ $12A4 [$81:12A4] A:0093 X:0026 Y:0001 P:envmxdIzc $81/C8CB A0 01 00 LDY #$0001 A:0093 X:0026 Y:0001 P:envmxdIzc $81/C8CE B7 20 LDA [$20],y[$93:AC90] A:0093 X:0026 Y:0001 P:envmxdIzc $81/C8D0 85 24 STA $24 [$00:0024] A:93B1 X:0026 Y:0001 P:eNvmxdIzc $81/C8D2 85 27 STA $27 [$00:0027] A:93B1 X:0026 Y:0001 P:eNvmxdIzc $81/C8D4 A0 00 00 LDY #$0000 A:93B1 X:0026 Y:0001 P:eNvmxdIzc $81/C8D7 B7 20 LDA [$20],y[$93:AC8F] A:93B1 X:0026 Y:0000 P:envmxdIZc $81/C8D9 85 23 STA $23 [$00:0023] A:B19F X:0026 Y:0000 P:eNvmxdIzc $81/C8DB 85 26 STA $26 [$00:0026] A:B19F X:0026 Y:0000 P:eNvmxdIzc $81/C8DD 20 E1 CC JSR $CCE1 [$81:CCE1] A:B19F X:0026 Y:0000 P:eNvmxdIzc $81/C8E0 90 0F BCC $0F [$C8F1] A:B19F X:0026 Y:FFFE P:eNvmxdIzc
code is missing here
$81/C8F1 22 9C CA 81 JSL $81CA9C[$81:CA9C] A:B19F X:0026 Y:FFFE P:eNvmxdIzc $81/C8F5 B0 64 BCS $64 [$C95B] A:0000 X:0026 Y:FFFE P:envmxdIzc $81/C8F7 AC 20 13 LDY $1320 [$81:1320] A:0000 X:0026 Y:FFFE P:envmxdIzc $81/C8FA A5 26 LDA $26 [$00:0026] A:0000 X:0026 Y:0000 P:envmxdIZc $81/C8FC 99 22 13 STA $1322,y[$81:1322] A:B19F X:0026 Y:0000 P:eNvmxdIzc $81/C8FF A5 28 LDA $28 [$00:0028] A:B19F X:0026 Y:0000 P:eNvmxdIzc $81/C901 29 FF 00 AND #$00FF A:0093 X:0026 Y:0000 P:envmxdIzc $81/C904 99 4A 13 STA $134A,y[$81:134A] A:0093 X:0026 Y:0000 P:envmxdIzc $81/C907 BD 32 0E LDA $0E32,x[$81:0E58] A:0093 X:0026 Y:0000 P:envmxdIzc $81/C90A 99 72 13 STA $1372,y[$81:1372] A:0000 X:0026 Y:0000 P:envmxdIZc $81/C90D A0 04 00 LDY #$0004 A:0000 X:0026 Y:0000 P:envmxdIZc $81/C910 B7 20 LDA [$20],y[$93:AC93] A:0000 X:0026 Y:0004 P:envmxdIzc $81/C912 85 24 STA $24 [$00:0024] A:93AC X:0026 Y:0004 P:eNvmxdIzc $81/C914 85 27 STA $27 [$00:0027] A:93AC X:0026 Y:0004 P:eNvmxdIzc $81/C916 A0 03 00 LDY #$0003 A:93AC X:0026 Y:0004 P:eNvmxdIzc $81/C919 B7 20 LDA [$20],y[$93:AC92] A:93AC X:0026 Y:0003 P:envmxdIzc $81/C91B 85 23 STA $23 [$00:0023] A:AC95 X:0026 Y:0003 P:eNvmxdIzc $81/C91D 85 26 STA $26 [$00:0026] A:AC95 X:0026 Y:0003 P:eNvmxdIzc $81/C91F 20 FD CC JSR $CCFD [$81:CCFD] A:AC95 X:0026 Y:0003 P:eNvmxdIzc $81/C922 90 09 BCC $09 [$C92D] A:AC95 X:0026 Y:FFFE P:eNvmxdIzc
code is missing here
$81/C92D 22 68 C9 81 JSL $81C968[$81:C968] A:AC95 X:0026 Y:FFFE P:eNvmxdIzc $81/C931 B0 28 BCS $28 [$C95B] A:0008 X:0026 Y:0000 P:envmxdIzc $81/C933 AC A6 12 LDY $12A6 [$81:12A6] A:0008 X:0026 Y:0000 P:envmxdIzc $81/C936 A5 26 LDA $26 [$00:0026] A:0008 X:0026 Y:0000 P:envmxdIZc $81/C938 99 A8 12 STA $12A8,y[$81:12A8] A:AC95 X:0026 Y:0000 P:eNvmxdIzc $81/C93B A5 28 LDA $28 [$00:0028] A:AC95 X:0026 Y:0000 P:eNvmxdIzc $81/C93D 29 FF 00 AND #$00FF A:EE93 X:0026 Y:0000 P:eNvmxdIzc $81/C940 0D A4 12 ORA $12A4 [$81:12A4] A:0093 X:0026 Y:0000 P:envmxdIzc $81/C943 99 D0 12 STA $12D0,y[$81:12D0] A:0093 X:0026 Y:0000 P:envmxdIzc $81/C946 BD 0A 0E LDA $0E0A,x[$81:0E30] A:0093 X:0026 Y:0000 P:envmxdIzc $81/C949 99 F8 12 STA $12F8,y[$81:12F8] A:0000 X:0026 Y:0000 P:envmxdIZc $81/C94C EE 20 13 INC $1320 [$81:1320] A:0000 X:0026 Y:0000 P:envmxdIZc $81/C94F EE 20 13 INC $1320 [$81:1320] A:0000 X:0026 Y:0000 P:envmxdIzc $81/C952 EE A6 12 INC $12A6 [$81:12A6] A:0000 X:0026 Y:0000 P:envmxdIzc $81/C955 EE A6 12 INC $12A6 [$81:12A6] A:0000 X:0026 Y:0000 P:envmxdIzc $81/C958 4C 60 C9 JMP $C960 [$81:C960] A:0000 X:0026 Y:0000 P:envmxdIzc $81/C960 EE 1C 02 INC $021C [$81:021C] A:0000 X:0026 Y:0000 P:envmxdIzc $81/C963 28 PLP A:0000 X:0026 Y:0000 P:envmxdIzc $81/C964 7A PLY A:0000 X:0026 Y:0000 P:envmxdIzc $81/C965 FA PLX A:0000 X:0026 Y:0001 P:envmxdIzc $81/C966 18 CLC A:0000 X:0026 Y:0001 P:envmxdIzc $81/C967 6B RTL A:0000 X:0026 Y:0001 P:envmxdIzc
$81/C968 ?
$81/C968 DA PHX A:AC95 X:0026 Y:FFFE P:eNvmxdIzc $81/C969 08 PHP A:AC95 X:0026 Y:FFFE P:eNvmxdIzc $81/C96A C2 30 REP #$30 A:AC95 X:0026 Y:FFFE P:eNvmxdIzc $81/C96C A7 23 LDA [$23] [$93:AC95] A:AC95 X:0026 Y:FFFE P:eNvmxdIzc $81/C96E 29 01 00 AND #$0001 A:0801 X:0026 Y:FFFE P:envmxdIzc $81/C971 85 08 STA $08 [$00:0008] A:0001 X:0026 Y:FFFE P:envmxdIzc $81/C973 AD 78 12 LDA $1278 [$81:1278] A:0001 X:0026 Y:FFFE P:envmxdIzc $81/C976 18 CLC A:6000 X:0026 Y:FFFE P:envmxdIzc $81/C977 6D 7A 12 ADC $127A [$81:127A] A:6000 X:0026 Y:FFFE P:envmxdIzc $81/C97A 85 02 STA $02 [$00:0002] A:6000 X:0026 Y:FFFE P:envmxdIzc $81/C97C AD 7A 12 LDA $127A [$81:127A] A:6000 X:0026 Y:FFFE P:envmxdIzc $81/C97F 4A LSR A A:0000 X:0026 Y:FFFE P:envmxdIZc $81/C980 4A LSR A A:0000 X:0026 Y:FFFE P:envmxdIZc $81/C981 4A LSR A A:0000 X:0026 Y:FFFE P:envmxdIZc $81/C982 4A LSR A A:0000 X:0026 Y:FFFE P:envmxdIZc $81/C983 9D 0A 0E STA $0E0A,x[$81:0E30] A:0000 X:0026 Y:FFFE P:envmxdIZc $81/C986 A7 23 LDA [$23] [$93:AC95] A:0000 X:0026 Y:FFFE P:envmxdIZc $81/C988 29 FE FF AND #$FFFE A:0801 X:0026 Y:FFFE P:envmxdIzc $81/C98B 85 04 STA $04 [$00:0004] A:0800 X:0026 Y:FFFE P:envmxdIzc $81/C98D 4A LSR A A:0800 X:0026 Y:FFFE P:envmxdIzc $81/C98E 18 CLC A:0400 X:0026 Y:FFFE P:envmxdIzc $81/C98F 6D 7A 12 ADC $127A [$81:127A] A:0400 X:0026 Y:FFFE P:envmxdIzc $81/C992 CD 7C 12 CMP $127C [$81:127C] A:0400 X:0026 Y:FFFE P:envmxdIzc $81/C995 30 03 BMI $03 [$C99A] A:0400 X:0026 Y:FFFE P:eNvmxdIzc $81/C99A 8D 7A 12 STA $127A [$81:127A] A:0400 X:0026 Y:FFFE P:eNvmxdIzc $81/C99D E6 23 INC $23 [$00:0023] A:0400 X:0026 Y:FFFE P:eNvmxdIzc $81/C99F E6 23 INC $23 [$00:0023] A:0400 X:0026 Y:FFFE P:eNvmxdIzc $81/C9A1 A9 00 7F LDA #$7F00 A:0400 X:0026 Y:FFFE P:eNvmxdIzc $81/C9A4 85 2D STA $2D [$00:002D] A:7F00 X:0026 Y:FFFE P:envmxdIzc $81/C9A6 A9 00 C0 LDA #$C000 A:7F00 X:0026 Y:FFFE P:envmxdIzc $81/C9A9 85 2C STA $2C [$00:002C] A:C000 X:0026 Y:FFFE P:eNvmxdIzc $81/C9AB A5 08 LDA $08 [$00:0008] A:C000 X:0026 Y:FFFE P:eNvmxdIzc $81/C9AD D0 0D BNE $0D [$C9BC] A:0001 X:0026 Y:FFFE P:envmxdIzc $81/C9BC A5 23 LDA $23 [$00:0023] A:0001 X:0026 Y:FFFE P:envmxdIzc $81/C9BE 85 78 STA $78 [$00:0078] A:AC97 X:0026 Y:FFFE P:eNvmxdIzc $81/C9C0 A6 24 LDX $24 [$00:0024] A:AC97 X:0026 Y:FFFE P:eNvmxdIzc $81/C9C2 86 79 STX $79 [$00:0079] A:AC97 X:93AC Y:FFFE P:eNvmxdIzc $81/C9C4 22 9F 93 80 JSL $80939F[$80:939F] A:AC97 X:93AC Y:FFFE P:eNvmxdIzc
Arguments: $81/C9C8 80 00 C0 ; Data for $01xx registers is at $80/90D7
$81/C9CB 4C CE C9 JMP $C9CE ; UNNECESSARY LINE $81/C9CE A2 00 00 LDX #$0000 A:0093 X:0000 Y:0800 P:eNvmxdIzc $81/C9D1 AD A4 12 LDA $12A4 [$81:12A4] A:0093 X:0000 Y:0800 P:envmxdIZc $81/C9D4 C9 00 80 CMP #$8000 A:0000 X:0000 Y:0800 P:envmxdIZc $81/C9D7 D0 03 BNE $03 [$C9DC] A:0000 X:0000 Y:0800 P:eNvmxdIzc $81/C9D9 4C 16 CA JMP $CA16 [$81:CA16] A:8000 X:0000 Y:0800 P:envmxdIZC $81/C9DC 8A TXA A:0000 X:0000 Y:0800 P:eNvmxdIzc $81/C9DD 29 10 00 AND #$0010 A:0000 X:0000 Y:0800 P:envmxdIZc $81/C9E0 F0 2A BEQ $2A [$CA0C] A:0000 X:0000 Y:0800 P:envmxdIZc $81/C9E2 A5 2D LDA $2D [$00:002D] A:0010 X:0010 Y:0800 P:envmxdIzc $81/C9E4 85 2A STA $2A [$00:002A] A:7FC0 X:0010 Y:0800 P:envmxdIzc $81/C9E6 A5 2C LDA $2C [$00:002C] A:7FC0 X:0010 Y:0800 P:envmxdIzc $81/C9E8 38 SEC A:C010 X:0010 Y:0800 P:eNvmxdIzc $81/C9E9 E9 10 00 SBC #$0010 A:C010 X:0010 Y:0800 P:eNvmxdIzC $81/C9EC 85 29 STA $29 [$00:0029] A:C000 X:0010 Y:0800 P:eNvmxdIzC $81/C9EE A0 00 00 LDY #$0000 A:C000 X:0010 Y:0800 P:eNvmxdIzC $81/C9F1 B7 29 LDA [$29],y[$7F:C000] A:C000 X:0010 Y:0000 P:envmxdIZC $81/C9F3 C8 INY A:0000 X:0010 Y:0000 P:envmxdIZC $81/C9F4 17 29 ORA [$29],y[$7F:C001] A:0000 X:0010 Y:0001 P:envmxdIzC $81/C9F6 88 DEY A:0300 X:0010 Y:0001 P:envmxdIzC $81/C9F7 17 2C ORA [$2C],y[$7F:C010] A:0300 X:0010 Y:0000 P:envmxdIZC $81/C9F9 C8 INY A:0300 X:0010 Y:0000 P:envmxdIzC $81/C9FA 57 2C EOR [$2C],y[$7F:C011] A:0300 X:0010 Y:0001 P:envmxdIzC $81/C9FC 29 FF 00 AND #$00FF A:0003 X:0010 Y:0001 P:envmxdIzC $81/C9FF EB XBA A:0003 X:0010 Y:0001 P:envmxdIzC $81/CA00 85 06 STA $06 [$00:0006] A:0300 X:0010 Y:0001 P:envmxdIZC $81/CA02 88 DEY A:0300 X:0010 Y:0001 P:envmxdIZC $81/CA03 B7 2C LDA [$2C],y[$7F:C010] A:0300 X:0010 Y:0000 P:envmxdIZC $81/CA05 29 FF 00 AND #$00FF A:0300 X:0010 Y:0000 P:envmxdIzC $81/CA08 05 06 ORA $06 [$00:0006] A:0000 X:0010 Y:0000 P:envmxdIZC $81/CA0A 87 2C STA [$2C] [$7F:C010] A:0300 X:0010 Y:0000 P:envmxdIzC $81/CA0C E6 2C INC $2C [$00:002C] A:0000 X:0000 Y:0800 P:envmxdIZc $81/CA0E E6 2C INC $2C [$00:002C] A:0000 X:0000 Y:0800 P:eNvmxdIzc $81/CA10 E8 INX A:0000 X:0000 Y:0800 P:eNvmxdIzc $81/CA11 E8 INX A:0000 X:0001 Y:0800 P:envmxdIzc $81/CA12 E4 04 CPX $04 [$00:0004] A:0000 X:0002 Y:0800 P:envmxdIzc $81/CA14 30 C6 BMI $C6 [$C9DC] A:0000 X:0002 Y:0800 P:eNvmxdIzc $81/CA16 E2 20 SEP #$20 A:C000 X:0800 Y:0000 P:envmxdIZC $81/CA18 C2 10 REP #$10 A:C000 X:0800 Y:0000 P:envMxdIZC $81/CA1A AD 1B 02 LDA $021B [$81:021B] A:C000 X:0800 Y:0000 P:envMxdIZC $81/CA1D 89 80 BIT #$80 A:C00F X:0800 Y:0000 P:envMxdIzC $81/CA1F D0 03 BNE $03 [$CA24] A:C00F X:0800 Y:0000 P:envMxdIZC $81/CA21 4C 60 CA JMP $CA60 [$81:CA60] A:C00F X:0800 Y:0000 P:envMxdIZC
$81/CA60 ?
$81/CA60 C2 30 REP #$30 A:C00F X:0800 Y:0000 P:envMxdIZC $81/CA62 A9 00 7F LDA #$7F00 A:C00F X:0800 Y:0000 P:envmxdIZC $81/CA65 8D AC 13 STA $13AC [$81:13AC] A:7F00 X:0800 Y:0000 P:envmxdIzC $81/CA68 A9 00 C0 LDA #$C000 A:7F00 X:0800 Y:0000 P:envmxdIzC $81/CA6B 8D AB 13 STA $13AB [$81:13AB] A:C000 X:0800 Y:0000 P:eNvmxdIzC $81/CA6E A5 02 LDA $02 [$00:0002] A:C000 X:0800 Y:0000 P:eNvmxdIzC $81/CA70 8D AE 13 STA $13AE [$81:13AE] A:6000 X:0800 Y:0000 P:envmxdIzC $81/CA73 A5 04 LDA $04 [$00:0004] A:6000 X:0800 Y:0000 P:envmxdIzC $81/CA75 8D A9 13 STA $13A9 [$81:13A9] A:0800 X:0800 Y:0000 P:envmxdIzC $81/CA78 EE B0 13 INC $13B0 [$81:13B0] A:0800 X:0800 Y:0000 P:envmxdIzC $81/CA7B A9 01 00 LDA #$0001 A:0800 X:0800 Y:0000 P:envmxdIzC $81/CA7E 8D A5 13 STA $13A5 [$81:13A5] A:0001 X:0800 Y:0000 P:envmxdIzC $81/CA81 9C A3 13 STZ $13A3 [$81:13A3] A:0001 X:0800 Y:0000 P:envmxdIzC $81/CA84 A9 00 81 LDA #$8100 A:0001 X:0800 Y:0000 P:envmxdIzC $81/CA87 8D 5E 06 STA $065E [$81:065E] A:8100 X:0800 Y:0000 P:eNvmxdIzC $81/CA8A A9 89 CD LDA #$CD89 A:8100 X:0800 Y:0000 P:eNvmxdIzC $81/CA8D 8D 5D 06 STA $065D [$81:065D] A:CD89 X:0800 Y:0000 P:eNvmxdIzC $81/CA90 22 B6 91 80 JSL $8091B6[$80:91B6] A:CD89 X:0800 Y:0000 P:eNvmxdIzC $81/CA94 28 PLP A:0008 X:0800 Y:0000 P:envmxdIzc $81/CA95 FA PLX A:0008 X:0800 Y:0000 P:eNvmxdIzc $81/CA96 18 CLC A:0008 X:0026 Y:0000 P:envmxdIzc $81/CA97 6B RTL A:0008 X:0026 Y:0000 P:envmxdIzc
$81/CA9C DA PHX A:B19F X:0026 Y:FFFE P:eNvmxdIzc $81/CA9D 5A PHY A:B19F X:0026 Y:FFFE P:eNvmxdIzc $81/CA9E 08 PHP A:B19F X:0026 Y:FFFE P:eNvmxdIzc $81/CA9F C2 30 REP #$30 A:B19F X:0026 Y:FFFE P:eNvmxdIzc $81/CAA1 AD 7E 12 LDA $127E [$81:127E] A:B19F X:0026 Y:FFFE P:eNvmxdIzc $81/CAA4 8D 82 12 STA $1282 [$81:1282] A:0000 X:0026 Y:FFFE P:envmxdIZc $81/CAA7 AD 82 12 LDA $1282 [$81:1282] A:0000 X:0026 Y:FFFE P:envmxdIZc $81/CAAA CD 80 12 CMP $1280 [$81:1280] A:0000 X:0026 Y:FFFE P:envmxdIZc $81/CAAD 30 03 BMI $03 [$CAB2] A:0000 X:0026 Y:FFFE P:eNvmxdIzc
code is missing here
$81/CAB2 AD 82 12 LDA $1282 [$81:1282] A:0000 X:0026 Y:FFFE P:eNvmxdIzc $81/CAB5 0A ASL A A:0000 X:0026 Y:FFFE P:envmxdIZc $81/CAB6 A8 TAY A:0000 X:0026 Y:FFFE P:envmxdIZc $81/CAB7 B9 84 12 LDA $1284,y[$81:1284] A:0000 X:0026 Y:0000 P:envmxdIZc $81/CABA F0 06 BEQ $06 [$CAC2] A:0000 X:0026 Y:0000 P:envmxdIZc $81/CABC EE 82 12 INC $1282 [$81:1282] A:0010 X:0026 Y:0000 P:envmxdIzc $81/CABF 4C A7 CA JMP $CAA7 [$81:CAA7] A:0010 X:0026 Y:0000 P:envmxdIzc $81/CAC2 AD 82 12 LDA $1282 [$81:1282] A:0000 X:0026 Y:0000 P:envmxdIZc $81/CAC5 85 02 STA $02 [$00:0002] A:0000 X:0026 Y:0000 P:envmxdIZc $81/CAC7 A7 23 LDA [$23] [$93:B19F] A:0000 X:0026 Y:0000 P:envmxdIZc $81/CAC9 85 00 STA $00 [$00:0000] A:0010 X:0026 Y:0000 P:envmxdIzc $81/CACB C9 20 00 CMP #$0020 A:0010 X:0026 Y:0000 P:envmxdIzc $81/CACE F0 08 BEQ $08 [$CAD8] A:0010 X:0026 Y:0000 P:eNvmxdIzc $81/CAD0 C9 10 00 CMP #$0010 A:0010 X:0026 Y:0000 P:eNvmxdIzc $81/CAD3 F0 28 BEQ $28 [$CAFD] A:0010 X:0026 Y:0000 P:envmxdIZC
code is missing here
$81/CAFD A5 00 LDA $00 [$00:0000] A:0010 X:0026 Y:0000 P:envmxdIZC $81/CAFF 99 84 12 STA $1284,y[$81:1284] A:0010 X:0026 Y:0000 P:envmxdIzC $81/CB02 EE 82 12 INC $1282 [$81:1282] A:0010 X:0026 Y:0000 P:envmxdIzC $81/CB05 A5 02 LDA $02 [$00:0002] A:0010 X:0026 Y:0000 P:envmxdIzC $81/CB07 29 01 00 AND #$0001 A:0000 X:0026 Y:0000 P:envmxdIZC $81/CB0A F0 06 BEQ $06 [$CB12] A:0000 X:0026 Y:0000 P:envmxdIZC $81/CB0C A9 00 80 LDA #$8000 A:0001 X:0026 Y:0002 P:envmxdIzC $81/CB0F 8D A4 12 STA $12A4 [$81:12A4] A:8000 X:0026 Y:0002 P:eNvmxdIzC $81/CB12 DA PHX A:0000 X:0026 Y:0000 P:envmxdIZC $81/CB13 A5 02 LDA $02 [$00:0002] A:0000 X:0026 Y:0000 P:envmxdIZC $81/CB15 0A ASL A A:0000 X:0026 Y:0000 P:envmxdIZC $81/CB16 0A ASL A A:0000 X:0026 Y:0000 P:envmxdIZc $81/CB17 0A ASL A A:0000 X:0026 Y:0000 P:envmxdIZc $81/CB18 0A ASL A A:0000 X:0026 Y:0000 P:envmxdIZc $81/CB19 18 CLC A:0000 X:0026 Y:0000 P:envmxdIZc $81/CB1A 69 00 01 ADC #$0100 ; Add #$100 so it points to the upper half of the CGRAM (Sprite Palettes) $81/CB1D AA TAX ; Transfer to X as Store Index $81/CB1E A0 00 00 LDY #$0000 ; Setup Load Index $81/CB21 E6 23 INC $23 ; Increment Load address twice $81/CB23 E6 23 INC $23 $81/CB25 B7 23 LDA [$23],y ; Transfer Sprite Color Data from ROM to CGRAM Buffer $81/CB27 9F 00 20 7E STA $7E2000,x $81/CB2B E8 INX ; Increment Store Index twice $81/CB2C E8 INX $81/CB2D C8 INY ; Increment Load Index twice $81/CB2E C8 INY $81/CB2F C4 00 CPY $00 ; Compare Load Index to Limit value $81/CB31 30 F2 BMI $F2 ; [$CB25] Loop until all colors are done $81/CB33 FA PLX A:6AD4 X:0110 Y:0010 P:envmxdIZC $81/CB34 A5 02 LDA $02 [$00:0002] A:6AD4 X:0026 Y:0010 P:envmxdIzC $81/CB36 29 0E 00 AND #$000E A:0000 X:0026 Y:0010 P:envmxdIZC $81/CB39 EB XBA A:0000 X:0026 Y:0010 P:envmxdIZC $81/CB3A 9D 32 0E STA $0E32,x[$81:0E58] A:0000 X:0026 Y:0010 P:envmxdIZC $81/CB3D 28 PLP A:0000 X:0026 Y:0010 P:envmxdIZC $81/CB3E 7A PLY A:0000 X:0026 Y:0010 P:eNvmxdIzc $81/CB3F FA PLX A:0000 X:0026 Y:FFFE P:eNvmxdIzc $81/CB40 18 CLC A:0000 X:0026 Y:FFFE P:envmxdIzc $81/CB41 6B RTL
$81/CCE1 ?
$81/CCE1 AC 20 13 LDY $1320 [$81:1320] A:B19F X:0026 Y:0000 P:eNvmxdIzc $81/CCE4 A5 23 LDA $23 [$00:0023] A:B19F X:0026 Y:0000 P:envmxdIZc $81/CCE6 D9 22 13 CMP $1322,y[$81:1322] A:B19F X:0026 Y:0000 P:eNvmxdIzc $81/CCE9 D0 0A BNE $0A [$CCF5] A:B19F X:0026 Y:0000 P:eNvmxdIzC
code is missing here
$81/CCF5 88 DEY A:B19F X:0026 Y:0000 P:eNvmxdIzC $81/CCF6 88 DEY A:B19F X:0026 Y:FFFF P:eNvmxdIzC $81/CCF7 10 EB BPL $EB [$CCE4] A:B19F X:0026 Y:FFFE P:eNvmxdIzC $81/CCF9 18 CLC A:B19F X:0026 Y:FFFE P:eNvmxdIzC $81/CCFA 60 RTS A:B19F X:0026 Y:FFFE P:eNvmxdIzc
$81/CCFD ?
$81/CCFD AC A6 12 LDY $12A6 [$81:12A6] A:AC95 X:0026 Y:0003 P:eNvmxdIzc $81/CD00 A5 23 LDA $23 [$00:0023] A:AC95 X:0026 Y:0000 P:envmxdIZc $81/CD02 D9 A8 12 CMP $12A8,y[$81:12A8] A:AC95 X:0026 Y:0000 P:eNvmxdIzc $81/CD05 D0 0A BNE $0A [$CD11] A:AC95 X:0026 Y:0000 P:eNvmxdIzC
code is missing here
$81/CD11 88 DEY A:AC95 X:0026 Y:0000 P:eNvmxdIzC $81/CD12 88 DEY A:AC95 X:0026 Y:FFFF P:eNvmxdIzC $81/CD13 10 EB BPL $EB [$CD00] A:AC95 X:0026 Y:FFFE P:eNvmxdIzC $81/CD15 18 CLC A:AC95 X:0026 Y:FFFE P:eNvmxdIzC $81/CD16 60 RTS A:AC95 X:0026 Y:FFFE P:eNvmxdIzc
$81/CD89 ?
$81/CD89 C2 30 REP #$30 A:1F87 X:0008 Y:0081 P:envmxdizc $81/CD8B A9 01 00 LDA #$0001 A:1F87 X:0008 Y:0081 P:envmxdizc $81/CD8E 8D A3 13 STA $13A3 [$80:13A3] A:0001 X:0008 Y:0081 P:envmxdizc $81/CD91 AD A9 13 LDA $13A9 [$80:13A9] A:0001 X:0008 Y:0081 P:envmxdizc $81/CD94 F0 59 BEQ $59 [$CDEF] A:0800 X:0008 Y:0081 P:envmxdizc $81/CD96 3A DEC A A:0800 X:0008 Y:0081 P:envmxdizc $81/CD97 29 00 FF AND #$FF00 A:07FF X:0008 Y:0081 P:envmxdizc $81/CD9A EB XBA A:0700 X:0008 Y:0081 P:envmxdizc $81/CD9B 4A LSR A A:0007 X:0008 Y:0081 P:envmxdizc $81/CD9C 4A LSR A A:0003 X:0008 Y:0081 P:envmxdizC $81/CD9D 1A INC A A:0001 X:0008 Y:0081 P:envmxdizC $81/CD9E 8D A7 13 STA $13A7 [$80:13A7] A:0002 X:0008 Y:0081 P:envmxdizC $81/CDA1 A9 02 00 LDA #$0002 A:0002 X:0008 Y:0081 P:envmxdizC $81/CDA4 8D 9A 13 STA $139A [$80:139A] A:0002 X:0008 Y:0081 P:envmxdizC $81/CDA7 AD AB 13 LDA $13AB [$80:13AB] A:0002 X:0008 Y:0081 P:envmxdizC $81/CDAA 8D 9B 13 STA $139B [$80:139B] A:C000 X:0008 Y:0081 P:eNvmxdizC $81/CDAD AD AC 13 LDA $13AC [$80:13AC] A:C000 X:0008 Y:0081 P:eNvmxdizC $81/CDB0 8D 9C 13 STA $139C [$80:139C] A:7FC0 X:0008 Y:0081 P:envmxdizC $81/CDB3 A9 00 04 LDA #$0400 A:7FC0 X:0008 Y:0081 P:envmxdizC $81/CDB6 8D 9E 13 STA $139E [$80:139E] A:0400 X:0008 Y:0081 P:envmxdizC $81/CDB9 A9 80 00 LDA #$0080 A:0400 X:0008 Y:0081 P:envmxdizC $81/CDBC 8D A0 13 STA $13A0 [$80:13A0] A:0080 X:0008 Y:0081 P:envmxdizC $81/CDBF AD AE 13 LDA $13AE [$80:13AE] A:0080 X:0008 Y:0081 P:envmxdizC $81/CDC2 8D A1 13 STA $13A1 [$80:13A1] A:6000 X:0008 Y:0081 P:envmxdizC $81/CDC5 A2 9A 13 LDX #$139A A:6000 X:0008 Y:0081 P:envmxdizC $81/CDC8 A9 00 00 LDA #$0000 A:6000 X:139A Y:0081 P:envmxdizC $81/CDCB 22 2A 8C 80 JSL $808C2A[$80:8C2A] A:0000 X:139A Y:0081 P:envmxdiZC $81/CDCF 22 38 92 80 JSL $809238[$80:9238] A:0000 X:139A Y:0081 P:envmxdiZC $81/CDD3 AD AB 13 LDA $13AB [$80:13AB] A:0000 X:139A Y:0081 P:envmxdiZC $81/CDD6 18 CLC A:C000 X:139A Y:0081 P:eNvmxdizC $81/CDD7 69 00 04 ADC #$0400 A:C000 X:139A Y:0081 P:eNvmxdizc $81/CDDA 8D AB 13 STA $13AB [$80:13AB] A:C400 X:139A Y:0081 P:eNvmxdizc $81/CDDD AD AE 13 LDA $13AE [$80:13AE] A:C400 X:139A Y:0081 P:eNvmxdizc $81/CDE0 18 CLC A:6000 X:139A Y:0081 P:envmxdizc $81/CDE1 69 00 02 ADC #$0200 A:6000 X:139A Y:0081 P:envmxdizc $81/CDE4 8D AE 13 STA $13AE [$80:13AE] A:6200 X:139A Y:0081 P:envmxdizc $81/CDE7 CE A7 13 DEC $13A7 [$80:13A7] A:6200 X:139A Y:0081 P:envmxdizc $81/CDEA F0 03 BEQ $03 [$CDEF] A:6200 X:139A Y:0081 P:envmxdizc $81/CDEC 4C A1 CD JMP $CDA1 [$81:CDA1] A:6200 X:139A Y:0081 P:envmxdizc $81/CDEF A9 02 00 LDA #$0002 A:6400 X:139A Y:0081 P:envmxdiZc $81/CDF2 8D A3 13 STA $13A3 [$80:13A3] A:0002 X:139A Y:0081 P:envmxdizc $81/CDF5 5C E9 91 80 JMP $8091E9[$80:91E9] A:0002 X:139A Y:0081 P:envmxdizc
Bank $83
$83/AFC8 ?
Executed during NMI.
$83/AFC8 08 PHP ; Buffer Flag Register value, Program Bank and Direct Page on stack $83/AFC9 8B PHB $83/AFCA 0B PHD $83/AFCB E2 20 SEP #$20 ; A = 8-bit $83/AFCD A9 81 LDA #$81 A:0 X:0001 Y:0 P:envMxdIzC $83/AFCF 8D 15 21 STA $2115 [$80:2115] A:0081 X:0001 Y:0 P:eNvMxdIzC $83/AFD2 A9 7E LDA #$7E ; Set Program Bank to $7E $83/AFD4 48 PHA $83/AFD5 AB PLB $83/AFD6 C2 30 REP #$30 ; A/X/Y = 16-bit $83/AFD8 A9 00 21 LDA #$2100 ; Set Direct Page to $2100 $83/AFDB 5B TCD $83/AFDC A2 00 00 LDX #$0000 A:2100 X:0001 Y:0 P:envmxdIzC $83/AFDF BC 15 87 LDY $8715,x[$7E:8715] A:2100 X:0 Y:0 P:envmxdIZC $83/AFE2 30 21 BMI $21 [$B005] A:2100 X:0 Y:FFFF P:eNvmxdIzC
code is missing here
$83/B005 8C 15 87 STY $8715 [$7E:8715] A:2100 X:0 Y:FFFF P:eNvmxdIzC $83/B008 2B PLD ; Restore Flag Register value, Program Bank and Direct Page $83/B009 AB PLB $83/B00A 28 PLP $83/B00B 6B RTL
$83/B0E1 ?
Executed during NMI.
$83/B0E1 DA PHX ; Buffer X on stack $83/B0E2 9C 84 0B STZ $0B84 [$80:0B84] A:1C00 X:00F0 Y:0001 P:envmxdIzc $83/B0E5 A0 00 00 LDY #$0000 A:1C00 X:00F0 Y:0001 P:envmxdIzc $83/B0E8 B9 13 0A LDA $0A13,y[$80:0A13] A:1C00 X:00F0 Y:0 P:envmxdIZc $83/B0EB C9 FF FF CMP #$FFFF A:FFFF X:00F0 Y:0 P:eNvmxdIzc $83/B0EE F0 3B BEQ $3B [$B12B] A:FFFF X:00F0 Y:0 P:envmxdIZC
code is missing here
$83/B12B FA PLX ; Restore X $83/B12C 6B RTL
$83/C346 ? (Executed when talking to the aerial building)
$83/C346 08 PHP ; Buffer Flag Register value and X on stack $83/C347 DA PHX $83/C348 AD B2 13 LDA $13B2 [$81:13B2] A:86B8 X:0026 Y:0004 P:eNvmxdIzc $83/C34B 29 FF 00 AND #$00FF A:0000 X:0026 Y:0004 P:envmxdIZc $83/C34E F0 0C BEQ $0C [$C35C] A:0000 X:0026 Y:0004 P:envmxdIZc
code is missing here
$83/C35C A9 00 83 LDA #$8300 ; Set up 24-bit address in $20-2: $83/C517 $83/C35F 85 21 STA $21 $83/C361 A9 17 C5 LDA #$C517 $83/C364 85 20 STA $20 $83/C366 AD 0F 0A LDA $0A0F [$81:0A0F] A:C517 X:0026 Y:0004 P:eNvmxdIzc $83/C369 D0 06 BNE $06 [$C371] A:0001 X:0026 Y:0004 P:envmxdIzc $83/C371 AE 5F 07 LDX $075F [$81:075F] A:0001 X:0026 Y:0004 P:envmxdIzc $83/C374 BD 50 16 LDA $1650,x[$81:1676] A:0001 X:0026 Y:0004 P:envmxdIzc $83/C377 8D 07 0A STA $0A07 [$81:0A07] A:0129 X:0026 Y:0004 P:envmxdIzc $83/C37A BD A0 16 LDA $16A0,x[$81:16C6] A:0129 X:0026 Y:0004 P:envmxdIzc $83/C37D 8D 09 0A STA $0A09 [$81:0A09] A:01A5 X:0026 Y:0004 P:envmxdIzc $83/C380 C9 98 02 CMP #$0298 A:01A5 X:0026 Y:0004 P:envmxdIzc $83/C383 B0 6A BCS $6A [$C3EF] A:01A5 X:0026 Y:0004 P:eNvmxdIzc $83/C385 AD 07 0A LDA $0A07 [$81:0A07] A:01A5 X:0026 Y:0004 P:eNvmxdIzc $83/C388 4A LSR A A:0129 X:0026 Y:0004 P:envmxdIzc $83/C389 4A LSR A A:0094 X:0026 Y:0004 P:envmxdIzC $83/C38A 4A LSR A A:004A X:0026 Y:0004 P:envmxdIzc $83/C38B 4A LSR A A:0025 X:0026 Y:0004 P:envmxdIzc $83/C38C 85 00 STA $00 [$00:0000] A:0012 X:0026 Y:0004 P:envmxdIzC $83/C38E AD 09 0A LDA $0A09 [$81:0A09] A:0012 X:0026 Y:0004 P:envmxdIzC $83/C391 4A LSR A A:01A5 X:0026 Y:0004 P:envmxdIzC $83/C392 4A LSR A A:00D2 X:0026 Y:0004 P:envmxdIzC $83/C393 4A LSR A A:0069 X:0026 Y:0004 P:envmxdIzc $83/C394 4A LSR A A:0034 X:0026 Y:0004 P:envmxdIzC $83/C395 EB XBA A:001A X:0026 Y:0004 P:envmxdIzc $83/C396 05 00 ORA $00 [$00:0000] A:1A00 X:0026 Y:0004 P:envmxdIZc $83/C398 8D 76 0B STA $0B76 [$81:0B76] A:1A12 X:0026 Y:0004 P:envmxdIzc $83/C39B A2 00 00 LDX #$0000 A:1A12 X:0026 Y:0004 P:envmxdIzc $83/C39E BF 7D C5 83 LDA $83C57D,x[$83:C57D] A:1A12 X:0000 Y:0004 P:envmxdIZc $83/C3A2 C9 FF FF CMP #$FFFF A:1F06 X:0000 Y:0004 P:envmxdIzc $83/C3A5 F0 3C BEQ $3C [$C3E3] A:1F06 X:0000 Y:0004 P:envmxdIzc $83/C3A7 CD 76 0B CMP $0B76 [$81:0B76] A:1F06 X:0000 Y:0004 P:envmxdIzc $83/C3AA F0 06 BEQ $06 [$C3B2] A:1F06 X:0000 Y:0004 P:envmxdIzC $83/C3AC E8 INX A:1F06 X:0000 Y:0004 P:envmxdIzC $83/C3AD E8 INX A:1F06 X:0001 Y:0004 P:envmxdIzC $83/C3AE E8 INX A:1F06 X:0002 Y:0004 P:envmxdIzC $83/C3AF E8 INX A:1F06 X:0003 Y:0004 P:envmxdIzC $83/C3B0 80 EC BRA $EC [$C39E] A:1F06 X:0004 Y:0004 P:envmxdIzC $83/C3B2 E8 INX A:1A12 X:0010 Y:0004 P:envmxdIZC $83/C3B3 E8 INX A:1A12 X:0011 Y:0004 P:envmxdIzC $83/C3B4 BF 7D C5 83 LDA $83C57D,x[$83:C58F] A:1A12 X:0012 Y:0004 P:envmxdIzC $83/C3B8 EB XBA A:0200 X:0012 Y:0004 P:envmxdIzC $83/C3B9 29 FF 00 AND #$00FF A:0002 X:0012 Y:0004 P:envmxdIzC $83/C3BC 8D 78 0B STA $0B78 [$81:0B78] A:0002 X:0012 Y:0004 P:envmxdIzC $83/C3BF C9 0F 00 CMP #$000F A:0002 X:0012 Y:0004 P:envmxdIzC $83/C3C2 D0 0A BNE $0A [$C3CE] A:0002 X:0012 Y:0004 P:eNvmxdIzc
code is missing here
$83/C3CE BF 7D C5 83 LDA $83C57D,x[$83:C58F] A:0002 X:0012 Y:0004 P:eNvmxdIzc $83/C3D2 89 01 00 BIT #$0001 A:0200 X:0012 Y:0004 P:envmxdIzc $83/C3D5 D0 06 BNE $06 [$C3DD] A:0200 X:0012 Y:0004 P:envmxdIZc $83/C3D7 22 61 C4 83 JSL $83C461[$83:C461] A:0200 X:0012 Y:0004 P:envmxdIZc $83/C3DB 80 1B BRA $1B [$C3F8] A:0002 X:0012 Y:0007 P:envmxdIZc
code is missing here
$83/C3F8 FA PLX ; Restore Flag Register value and X $83/C3F9 28 PLP $83/C3FA 6B RTL
$83/C461 ? (Executed when talking to the aerial building)
$83/C461 08 PHP ; Buffer Flag Register value and X on stack $83/C462 DA PHX $83/C463 AD B2 13 LDA $13B2 [$81:13B2] A:0200 X:0012 Y:0004 P:envmxdIZc $83/C466 29 FF 00 AND #$00FF A:0000 X:0012 Y:0004 P:envmxdIZc $83/C469 F0 0C BEQ $0C [$C477] A:0000 X:0012 Y:0004 P:envmxdIZc
code is missing here
$83/C477 A9 00 83 LDA #$8300 ; Set up 24-bit address in $20-2: $83/C517 $83/C47A 85 21 STA $21 $83/C47C A9 17 C5 LDA #$C517 $83/C47F 85 20 STA $20 $83/C481 AD 76 0B LDA $0B76 [$81:0B76] A:C517 X:0012 Y:0004 P:eNvmxdIzc $83/C484 29 FF 00 AND #$00FF A:1A12 X:0012 Y:0004 P:envmxdIzc $83/C487 0A ASL A A:0012 X:0012 Y:0004 P:envmxdIzc $83/C488 0A ASL A A:0024 X:0012 Y:0004 P:envmxdIzc $83/C489 0A ASL A A:0048 X:0012 Y:0004 P:envmxdIzc $83/C48A 0A ASL A A:0090 X:0012 Y:0004 P:envmxdIzc $83/C48B 18 CLC A:0120 X:0012 Y:0004 P:envmxdIzc $83/C48C 69 08 00 ADC #$0008 A:0120 X:0012 Y:0004 P:envmxdIzc $83/C48F 8D 82 0B STA $0B82 [$81:0B82] A:0128 X:0012 Y:0004 P:envmxdIzc $83/C492 AD 76 0B LDA $0B76 [$81:0B76] A:0128 X:0012 Y:0004 P:envmxdIzc $83/C495 EB XBA A:1A12 X:0012 Y:0004 P:envmxdIzc $83/C496 29 FF 00 AND #$00FF A:121A X:0012 Y:0004 P:envmxdIzc $83/C499 0A ASL A A:001A X:0012 Y:0004 P:envmxdIzc $83/C49A 0A ASL A A:0034 X:0012 Y:0004 P:envmxdIzc $83/C49B 0A ASL A A:0068 X:0012 Y:0004 P:envmxdIzc $83/C49C 0A ASL A A:00D0 X:0012 Y:0004 P:envmxdIzc $83/C49D 8D 84 0B STA $0B84 [$81:0B84] A:01A0 X:0012 Y:0004 P:envmxdIzc $83/C4A0 AD 78 0B LDA $0B78 [$81:0B78] A:01A0 X:0012 Y:0004 P:envmxdIzc $83/C4A3 29 3F 00 AND #$003F A:0002 X:0012 Y:0004 P:envmxdIzc $83/C4A6 0A ASL A A:0002 X:0012 Y:0004 P:envmxdIzc $83/C4A7 0A ASL A A:0004 X:0012 Y:0004 P:envmxdIzc $83/C4A8 AA TAX A:0008 X:0012 Y:0004 P:envmxdIzc $83/C4A9 AD 82 0B LDA $0B82 [$81:0B82] A:0008 X:0008 Y:0004 P:envmxdIzc $83/C4AC 3A DEC A A:0128 X:0008 Y:0004 P:envmxdIzc $83/C4AD 38 SEC A:0127 X:0008 Y:0004 P:envmxdIzc $83/C4AE FF 1B C6 83 SBC $83C61B,x[$83:C623] A:0127 X:0008 Y:0004 P:envmxdIzC $83/C4B2 CD 07 0A CMP $0A07 [$81:0A07] A:011F X:0008 Y:0004 P:envmxdIzC $83/C4B5 B0 54 BCS $54 [$C50B] A:011F X:0008 Y:0004 P:eNvmxdIzc $83/C4B7 AD 82 0B LDA $0B82 [$81:0B82] A:011F X:0008 Y:0004 P:eNvmxdIzc $83/C4BA 18 CLC A:0128 X:0008 Y:0004 P:envmxdIzc $83/C4BB 7F 1B C6 83 ADC $83C61B,x[$83:C623] A:0128 X:0008 Y:0004 P:envmxdIzc $83/C4BF CD 07 0A CMP $0A07 [$81:0A07] A:0130 X:0008 Y:0004 P:envmxdIzc $83/C4C2 90 47 BCC $47 [$C50B] A:0130 X:0008 Y:0004 P:envmxdIzC $83/C4C4 E8 INX A:0130 X:0008 Y:0004 P:envmxdIzC $83/C4C5 E8 INX A:0130 X:0009 Y:0004 P:envmxdIzC $83/C4C6 AD 84 0B LDA $0B84 [$81:0B84] A:0130 X:000A Y:0004 P:envmxdIzC $83/C4C9 3A DEC A A:01A0 X:000A Y:0004 P:envmxdIzC $83/C4CA CD 09 0A CMP $0A09 [$81:0A09] A:019F X:000A Y:0004 P:envmxdIzC $83/C4CD B0 3C BCS $3C [$C50B] A:019F X:000A Y:0004 P:eNvmxdIzc $83/C4CF AD 84 0B LDA $0B84 [$81:0B84] A:019F X:000A Y:0004 P:eNvmxdIzc $83/C4D2 18 CLC A:01A0 X:000A Y:0004 P:envmxdIzc $83/C4D3 7F 1B C6 83 ADC $83C61B,x[$83:C625] A:01A0 X:000A Y:0004 P:envmxdIzc $83/C4D7 CD 09 0A CMP $0A09 [$81:0A09] A:01AD X:000A Y:0004 P:envmxdIzc $83/C4DA 90 2F BCC $2F [$C50B] A:01AD X:000A Y:0004 P:envmxdIzC $83/C4DC AD 78 0B LDA $0B78 [$81:0B78] A:01AD X:000A Y:0004 P:envmxdIzC $83/C4DF 0A ASL A A:0002 X:000A Y:0004 P:envmxdIzC $83/C4E0 18 CLC A:0004 X:000A Y:0004 P:envmxdIzc $83/C4E1 6D 78 0B ADC $0B78 [$81:0B78] A:0004 X:000A Y:0004 P:envmxdIzc $83/C4E4 A8 TAY A:0006 X:000A Y:0004 P:envmxdIzc $83/C4E5 AD 78 0B LDA $0B78 [$81:0B78] A:0006 X:000A Y:0006 P:envmxdIzc $83/C4E8 29 3F 00 AND #$003F A:0002 X:000A Y:0006 P:envmxdIzc $83/C4EB C9 18 00 CMP #$0018 A:0002 X:000A Y:0006 P:envmxdIzc $83/C4EE B0 10 BCS $10 [$C500] A:0002 X:000A Y:0006 P:eNvmxdIzc $83/C4F0 B7 20 LDA [$20],y[$83:C51D] A:0002 X:000A Y:0006 P:eNvmxdIzc $83/C4F2 8D 80 07 STA $0780 [$81:0780] A:0000 X:000A Y:0006 P:envmxdIZc $83/C4F5 C8 INY A:0000 X:000A Y:0006 P:envmxdIZc $83/C4F6 B7 20 LDA [$20],y[$83:C51E] A:0000 X:000A Y:0007 P:envmxdIzc $83/C4F8 8D 81 07 STA $0781 [$81:0781] A:0000 X:000A Y:0007 P:envmxdIZc $83/C4FB AD 78 0B LDA $0B78 [$81:0B78] A:0000 X:000A Y:0007 P:envmxdIZc $83/C4FE 80 14 BRA $14 [$C514] A:0002 X:000A Y:0007 P:envmxdIzc
code is missing here
$83/C514 FA PLX ; Restore Flag Register value and X $83/C515 28 PLP $83/C516 6B RTL
$83/C517 Data for $83/C346
?
$83/C57D Data for $83/C346
?
Bank $84
$84/8000 Graphic Data
Should be the BS-X logo stuff at the very beginning. Get's decompressed at $94/8000
Bank $94
$94/8000 PROGRAM FLOW: TITLE SCREEN: Start of the program after Boot
$94/8000 E2 10 SEP #$10 ; A = 8-bit $94/8002 C2 20 REP #$20 ; X/Y = 16-bit $94/8004 22 11 84 80 JSL $808411 ; Transfer a chain of variables to $01xx
Arguments: $80/8FE1 CB 80 94 ; Data for $01xx registers is at $94/80CB
$94/800B 22 BD 83 80 JSL $8083BD ; Clear whole VRAM $94/800F A2 80 LDX #$80 ; VRAM transfer settings: 16-bit (for upcoming decompression Subroutine) $94/8011 8E 15 21 STX $2115 $94/8014 A9 00 80 LDA #$8000 ; Address of compressed Graphics Data: $84/8000 $94/8017 85 78 STA $78 $94/8019 A2 84 LDX #$84 $94/801B 86 7A STX $7A $94/801D 64 7D STZ $7D ; VRAM Destination: $0000 $94/801F 22 1E 95 80 JSL $80951E ; Graphics Decompression directly to VRAM $94/8023 A9 A7 A9 LDA #$A9A7 ; Address of Compressed Graphics Data: $84/A9A7 $94/8026 85 78 STA $78 $94/8028 A2 84 LDX #$84 $94/802A 86 7A STX $7A $94/802C A9 00 80 LDA #$8000 ; VRAM Destination: $4000 $94/802F 85 7D STA $7D $94/8031 22 1E 95 80 JSL $80951E ; Graphics Decompression directly to VRAM $94/8035 A9 1B AE LDA #$AE1B ; Address of Compressed Graphics Data: $84/AE1B $94/8038 85 78 STA $78 $94/803A A2 84 LDX #$84 $94/803C 86 7A STX $7A $94/803E A9 00 98 LDA #$9800 ; VRAM Destination: $4C00 $94/8041 85 7D STA $7D $94/8043 22 1E 95 80 JSL $80951E ; Graphics Decompression directly to VRAM $94/8047 A9 52 AD LDA #$AD52 ; Address of Compressed Graphics Data: $84/AD52 $94/804A 85 78 STA $78 $94/804C A2 84 LDX #$84 $94/804E 86 7A STX $7A $94/8050 A9 00 A0 LDA #$A000 ; VRAM Destination: $5000 $94/8053 85 7D STA $7D $94/8055 22 1E 95 80 JSL $80951E ; Graphics Decompression directly to VRAM $94/8059 A9 F7 F6 LDA #$F6F7 ; Address of Compressed Graphics Data: $95/F6F7 $94/805C 85 78 STA $78 $94/805E A2 95 LDX #$95 $94/8060 86 7A STX $7A $94/8062 A9 00 C0 LDA #$C000 ; VRAM Destination: $6000 $94/8065 85 7D STA $7D $94/8067 22 1E 95 80 JSL $80951E ; Graphics Decompression directly to VRAM $94/806B A9 BB A8 LDA #$A8BB A:0195 X:0 Y:0 P:eNvmXdIzC $94/806E 85 78 STA $78 [$00:0078] A:A8BB X:0 Y:0 P:eNvmXdIzC $94/8070 A2 84 LDX #$84 A:A8BB X:0 Y:0 P:eNvmXdIzC $94/8072 86 7A STX $7A [$00:007A] A:A8BB X:0084 Y:0 P:eNvmXdIzC $94/8074 22 9F 93 80 JSL $80939F[$80:939F] A:A8BB X:0084 Y:0 P:eNvmXdIzC
arguments: 00 20 7E
$94/807B A9 01 00 LDA #$0001 ; Set Flag for CGRAM Update $94/807E 8D 1C 02 STA $021C ; (this one and the one above could be combined as INC $021C - UNNECESSARY LINE) $94/8081 C2 30 REP #$30 ; A/X/Y = 16-bit $94/8083 22 10 C2 81 JSL $81C210[$81:C210] A:0001 X:0 Y:0 P:envmxdIzC $94/8087 22 9A C2 81 JSL $81C29A[$81:C29A] A:000A X:FFFE Y:0 P:envmxdIzC $94/808B 22 D0 C7 81 JSL $81C7D0[$81:C7D0] A:8000 X:FFFE Y:0 P:envmxdIzC $94/808F A9 03 00 LDA #$0003 ; Play Music #$03 $94/8092 A0 00 00 LDY #$0000 A:0003 X:FFFE Y:FFFE P:envmxdIzC $94/8095 22 1C 5C 10 JSL $105C1C[$10:5C1C] A:0003 X:FFFE Y:0 P:envmxdIZC $94/8099 9C 6B 06 STZ $066B [$80:066B] A:0003 X:FFFE Y:0001 P:eNvmxdIzc $94/809C 9C 6D 06 STZ $066D [$80:066D] A:0003 X:FFFE Y:0001 P:eNvmxdIzc $94/809F 9C 71 06 STZ $0671 [$80:0671] A:0003 X:FFFE Y:0001 P:eNvmxdIzc $94/80A2 9C 73 06 STZ $0673 [$80:0673] A:0003 X:FFFE Y:0001 P:eNvmxdIzc $94/80A5 9C 6F 06 STZ $066F [$80:066F] A:0003 X:FFFE Y:0001 P:eNvmxdIzc $94/80A8 A9 06 00 LDA #$0006 A:0003 X:FFFE Y:0001 P:eNvmxdIzc $94/80AB 8D 77 06 STA $0677 [$80:0677] A:0006 X:FFFE Y:0001 P:envmxdIzc $94/80AE A9 00 94 LDA #$9400 A:0006 X:FFFE Y:0001 P:envmxdIzc $94/80B1 8D 5E 06 STA $065E [$80:065E] A:9400 X:FFFE Y:0001 P:eNvmxdIzc $94/80B4 A9 72 85 LDA #$8572 A:9400 X:FFFE Y:0001 P:eNvmxdIzc $94/80B7 8D 5D 06 STA $065D [$80:065D] A:8572 X:FFFE Y:0001 P:eNvmxdIzc $94/80BA 22 B6 91 80 JSL $8091B6[$80:91B6] A:8572 X:FFFE Y:0001 P:eNvmxdIzc $94/80BE A9 11 81 LDA #$8111 ; Next NMI, go to $94/8111 $94/80C1 8D 37 06 STA $0637 $94/80C4 A9 94 00 LDA #$0094 $94/80C7 8D 39 06 STA $0639 $94/80CA 6B RTL
$94/80CB Data for Graphics Settings
This data gets transfered to the $01xx Graphics Register buffer via $80/8411 at $94/8004.
This is executed while the start-up, these values serve to clear those Graphics Registers.
$94/80CB 00 00 - Value for $0100 = $2100 - 0% Brightness $94/80CD 01 03 - Value for $0101 = $2101 - $94/80CF 04 09 - Value for $0104 = $2105 - BG Mode 1, BG3 Priority Bit $94/80D1 06 43 - Value for $0106 = $2107 - BG1 Tilemap at $4000, V/H Mirroring $94/80D3 07 52 - Value for $0107 = $2108 - BG2 Tilemap at $5000, H Mirroring $94/80D5 08 70 - Value for $0108 = $2109 - BG3 Tilemap at $7000, no Mirroring $94/80D7 0A 00 - Value for $010A = $210B - BG1/2 Tileset at $0000 $94/80D9 0B 07 - Value for $010B = $210C - BG3 Tileset at $7000 $94/80DB 0F 00 - Value for $010F/10 = $210D - BG1 H-Scroll = #$0100 $94/80DD 10 01 $94/80DF 11 88 - Value for $0111/12 = $210E - BG1 V-Scroll = #$0188 $94/80E1 12 01 $94/80E3 13 00 - Value for $0113/14 = $210F - BG2 H-Scroll = #$0000 $94/80E5 14 00 $94/80E7 15 00 - Value for $0115/16 = $2110 - BG2 V-Scroll = #$0000 $94/80E9 16 00 $94/80EB 17 00 - Value for $0117/18 = $2111 - BG3 H-Scroll = #$0000 $94/80ED 18 00 $94/80EF 19 00 - Value for $0119/1A = $2112 - BG3 V-Scroll = #$0000 $94/80F1 1A 00 $94/80F3 26 03 - Value for $0126 = $212C - BG1/2 on Main Screen $94/80F5 27 10 - Value for $0127 = $212E - Disable Sprites on Main Screen in Window $94/80F7 28 01 - Value for $0128 = $212D - BG1 on Sub Screen $94/80F9 0D 03 - Value for $010D = $2123 - Window 1 on BG1, outside $94/80FB 20 80 - Value for $0120 = $2126 - Window 1 Left Position: $80 $94/80FD 21 7F - Value for $0121 = $2127 - Window 1 Right Position: $7F $94/80FF 2A 00 - Value for $012A = $212A - Mask Logic for BGs: OR $94/8101 2B 03 - Value for $012B = $212B - Mask Logic for Sprites: XNOR $94/8103 2C 00 - Value for $012C $94/8105 3A 00 - Value for $013A = $420C - Disable HDMAs $94/8107 FF
$94/8108 TOKEN DATA
65 8F AC 93 65 D4 B4 93 23
$94/8111 PROGRAM FLOW: TITLE SCREEN: Wait for the Nintendo Logo
When you start the BIOS, you see the city backdrop appearing, then a line that unfolds to the Nintendo logo. This subroutine is the waiting time AFTER the appearance of the city silhouette and BEFORE the line appears. $066D is the (frame?) counter for this. When it reaches #$20, it sets everything up so that the next step of the title screen (the appearance of the "line", which is some Mask Window stuff) gets setup and executed in the following NMI.
$94/8111 08 PHP ; Buffer Flag Register value on stack $94/8112 E2 30 SEP #$30 ; A/X/Y = 8-bit $94/8114 AD 6D 06 LDA $066D ; Increment Counter $94/8117 1A INC A $94/8118 8D 6D 06 STA $066D $94/811B C9 20 CMP #$20 ; Has counter reached #$20? $94/811D D0 10 BNE $10 ; [$812F] Exit if not $94/811F C2 20 REP #$20 ; A = 16-bit $94/8121 A9 31 81 LDA #$8131 ; Next NMI, go to $94/8131 $94/8124 8D 37 06 STA $0637 $94/8127 A9 94 00 LDA #$0094 $94/812A 8D 39 06 STA $0639 $94/812D E2 20 SEP #$20 ; A = 8-bit $94/812F 28 PLP ; Restore Flag Register value $94/8130 6B RTL
$94/8131 PROGRAM FLOW: TITLE SCREEN: ? (Title Screen Window stuff)
$94/8131 08 PHP ; Buffer Flag Register value and Data Bank on stack $94/8132 E2 30 SEP #$30 ; A/X/Y = 8-bit $94/8134 AD 20 01 LDA $0120 ; Check buffer for Window 1 Left position: is it smaller than #$10? $94/8137 C9 10 CMP #$10 $94/8139 90 11 BCC $11 ; [$814C] Branch if it is $94/813B 38 SEC ; If not, broaden the window: put left pos 4 px more to the left... $94/813C E9 04 SBC #$04 $94/813E 8D 20 01 STA $0120 $94/8141 AD 21 01 LDA $0121 ; ... and the right position 4 Pixel more to the right $94/8144 18 CLC $94/8145 69 04 ADC #$04 $94/8147 8D 21 01 STA $0121 $94/814A 80 52 BRA $52 ; [$819E] And Exit $94/814C C2 10 REP #$10 ; X/Y = 16-bit $94/814E A9 FF LDA #$FF ; Deactivate window $94/8150 8D 20 01 STA $0120 ; (Left pos: #$FF) $94/8153 9C 21 01 STZ $0121 ; (Right pos: #$00) $94/8156 9C 0D 01 STZ $010D ; (Clear Window settings) $94/8159 9C 28 01 STZ $0128 ; (Clear Subscreen designation) $94/815C A2 02 0E LDX #$0E02 ; SETUP HALF OF AN HDMA - BG1 Vertical Scroll register $94/815F 8E 20 43 STX $4320 $94/8162 A2 27 02 LDX #$0227 ; (HDMA Table Start Address: $000227) $94/8165 8E 22 43 STX $4322 $94/8168 A9 00 LDA #$00 $94/816A 8D 24 43 STA $4324 $94/816D A9 52 LDA #$52 ; (Begin to build the HDMA Table here) $94/816F 8D 27 02 STA $0227 $94/8172 A2 00 01 LDX #$0100 $94/8175 8E 28 02 STX $0228 $94/8178 A9 B1 LDA #$B1 $94/817A 8D 2A 02 STA $022A $94/817D A9 01 LDA #$01 A:80B1 X:0100 Y:0 P:eNVMxdIzc $94/817F 8D 8D 02 STA $028D [$80:028D] A:8001 X:0100 Y:0 P:enVMxdIzc $94/8182 8E 8E 02 STX $028E [$80:028E] A:8001 X:0100 Y:0 P:enVMxdIzc $94/8185 9C 90 02 STZ $0290 [$80:0290] A:8001 X:0100 Y:0 P:enVMxdIzc $94/8188 A2 00 00 LDX #$0000 ; Reset frame counter $94/818B 8E 6D 06 STX $066D $94/818E C2 20 REP #$20 ; A = 16-bit $94/8190 A9 A0 81 LDA #$81A0 ; Next NMI, go to $94/81A0 $94/8193 8D 37 06 STA $0637 $94/8196 A9 94 00 LDA #$0094 $94/8199 8D 39 06 STA $0639 $94/819C E2 20 SEP #$20 ; A = 8-bit $94/819E 28 PLP ; Restore Flag Register value $94/819F 6B RTL
$94/81A0 PROGRAM FLOW: TITLE SCREEN: ? (Intro)
The sound effect that gets triggered here is the one when the "reflection shine walks across the Nintendo logo" in the intro (you know exactly what I mean. Don't act as if you don't), so this whole part will take care of that part of the intro, I guess.
$94/81A0 08 PHP A:81A0 X:0 Y:0 P:eNVmxdIzC $94/81A1 C2 30 REP #$30 ; A/X/Y = 16-bits $94/81A3 A2 00 01 LDX #$0100 ; BG1 V-Scroll = #$0100 $94/81A6 8E 11 01 STX $0111 $94/81A9 A0 00 00 LDY #$0000 ; Setup Store Index $94/81AC AE 6D 06 LDX $066D [$80:066D] A:81A0 X:0100 Y:0 P:enVmxdIZC $94/81AF BF DB 8B 94 LDA $948BDB,x[$94:8BDB] A:81A0 X:0 Y:0 P:enVmxdIZC $94/81B3 30 21 BMI $21 [$81D6] A:01E0 X:0 Y:0 P:enVmxdIzC $94/81B5 BF DB 8B 94 LDA $948BDB,x[$94:8BDB] A:01E0 X:0 Y:0 P:enVmxdIzC $94/81B9 99 2B 02 STA $022B,y[$80:022B] A:01E0 X:0 Y:0 P:enVmxdIzC $94/81BC E8 INX A:01E0 X:0 Y:0 P:enVmxdIzC $94/81BD E8 INX A:01E0 X:0001 Y:0 P:enVmxdIzC $94/81BE C8 INY A:01E0 X:0002 Y:0 P:enVmxdIzC $94/81BF C8 INY A:01E0 X:0002 Y:0001 P:enVmxdIzC $94/81C0 C0 62 00 CPY #$0062 A:01E0 X:0002 Y:0002 P:enVmxdIzC $94/81C3 D0 F0 BNE $F0 [$81B5] A:01E0 X:0002 Y:0002 P:eNVmxdIzc $94/81C5 8E 6D 06 STX $066D [$80:066D] A:01E0 X:0062 Y:0062 P:enVmxdIZC $94/81C8 E2 20 SEP #$20 A:01E0 X:0062 Y:0062 P:enVmxdIZC $94/81CA AD 3A 01 LDA $013A ; Set flag for Channel 0 HDMA activation $94/81CD 09 04 ORA #$04 $94/81CF 8D 3A 01 STA $013A $94/81D2 C2 20 REP #$20 ; A = 16-bit $94/81D4 80 46 BRA $46 ; [$821C] Exit $94/81D6 E2 20 SEP #$20 ; A = 8-bit $94/81D8 AD 3A 01 LDA $013A ; Deactivate every HDMA but on channel 2 $94/81DB 29 FB AND #$FB $94/81DD 8D 3A 01 STA $013A $94/81E0 C2 20 REP #$20 ; A = 16-bit $94/81E2 A9 C1 03 LDA #$03C1 ; Play Sound Effect #$C1 ("Bling"-Sound for Nintendo Logo) $94/81E5 A0 01 00 LDY #$0001 $94/81E8 22 1C 5C 10 JSL $105C1C $94/81EC A9 02 01 LDA #$0102 ; Color Math Control Registers $94/81EF 8D 2A 01 STA $012A [$80:012A] A:0102 X:0B1A Y:0001 P:envmxdIzc $94/81F2 A9 01 00 LDA #$0001 A:0102 X:0B1A Y:0001 P:envmxdIzc $94/81F5 8D EE 0C STA $0CEE [$80:0CEE] A:0001 X:0B1A Y:0001 P:envmxdIzc $94/81F8 A2 00 00 LDX #$0000 A:0001 X:0B1A Y:0001 P:envmxdIzc $94/81FB A0 77 00 LDY #$0077 A:0001 X:0 Y:0001 P:envmxdIZc $94/81FE A9 95 00 LDA #$0095 A:0001 X:0 Y:0077 P:envmxdIzc $94/8201 85 BE STA $BE [$00:00BE] A:0095 X:0 Y:0077 P:envmxdIzc $94/8203 A9 F5 82 LDA #$82F5 A:0095 X:0 Y:0077 P:envmxdIzc $94/8206 22 B0 C2 81 JSL $81C2B0[$81:C2B0] A:82F5 X:0 Y:0077 P:eNvmxdIzc $94/820A A9 20 00 LDA #$0020 ; Set up Frame Counter for next Program Flow Subroutine $94/820D 8D 6D 06 STA $066D $94/8210 A9 1E 82 LDA #$821E ; Next NMI, go to $94/821E $94/8213 8D 37 06 STA $0637 $94/8216 A9 94 00 LDA #$0094 $94/8219 8D 39 06 STA $0639 $94/821C 28 PLP ; Restore Flag Register value $94/821D 6B RTL
$94/821E PROGRAM FLOW: TITLE SCREEN: Wait after Nintendo Logo Reflection, before turning gray
This subroutine is for the moment between the "Bling" sound and the reflection of the Nintendo Logo and the Logo turning gray.
Decrements the Frame Counter value in $066D (gets set at $94/820A), afterwards goes to $94/8237.
$94/821E 08 PHP ; Buffer Flag Register value on stack $94/821F C2 30 REP #$30 ; A/X/Y = 16-bit $94/8221 CE 6D 06 DEC $066D ; Decrement Frame Counter $94/8224 D0 0F BNE $0F ; [$8235] Exit if Counter hasn't run out $94/8226 9C 6B 06 STZ $066B ; Reset Frame Counter $94/8229 A9 37 82 LDA #$8237 ; Next NMI, go to $94/8237 $94/822C 8D 37 06 STA $0637 $94/822F A9 94 00 LDA #$0094 $94/8232 8D 39 06 STA $0639 $94/8235 28 PLP ; Restore Flag Register value $94/8236 6B RTL
$94/8237 PROGRAM FLOW: TITLE SCREEN: Turn Nintendo Logo gray
After the "Bling" sound and the reflection running over the Nintendo logo, its background color turns from dark blue to grey. This happens here
$94/8237 08 PHP ; Buffer Flag Register value and Program Bank on stack $94/8238 8B PHB $94/8239 4B PHK ; Set Program Bank to $94 $94/823A AB PLB $94/823B C2 30 REP #$30 ; A/X/Y = 16-bit $94/823D AD 6B 06 LDA $066B ; Increment Frame Counter $94/8240 1A INC A $94/8241 8D 6B 06 STA $066B $94/8244 C9 03 00 CMP #$0003 ; Check if Frame Counter has reached it's limit (for next palette) $94/8247 90 3E BCC $3E ; [$8287] Exit if not $94/8249 9C 6B 06 STZ $066B ; Reset Frame Counter $94/824C AC 6D 06 LDY $066D ; Load Palette Pointer in Y $94/824F B9 F7 96 LDA $96F7,y ; Load first color $94/8252 C9 FF FF CMP #$FFFF ; Is it $FFFF? (Perfect White; Turning Gray is done) $94/8255 F0 1E BEQ $1E ; [$8275] Branch if it is $94/8257 A2 00 00 LDX #$0000 ; If Turn to Gray isn't done yet: Set X as Store Index $94/825A B9 F7 96 LDA $96F7,y ; Load Color $94/825D 9F 62 20 7E STA $7E2062,x ; Store in CGRAM Buffer $94/8261 E8 INX ; Increment Store Index twice $94/8262 E8 INX $94/8263 C8 INY ; Increment Load Index twice $94/8264 C8 INY $94/8265 E0 10 00 CPX #$0010 ; Are #$10 colors done (one palette)? $94/8268 D0 F0 BNE $F0 ; [$825A] Loop if it is not $94/826A 8C 6D 06 STY $066D ; Store Palette Pointer back - next time load the next palette from $96F7,x $94/826D A9 01 00 LDA #$0001 ; Set Flag for CGRAM Update $94/8270 8D 1C 02 STA $021C ; UNNECESSARY LINE - This would be shorter with a "INC $021C" $94/8273 80 12 BRA $12 ; [$8287] Exit $94/8275 A9 01 00 LDA #$0001 A:FFFF X:0 Y:00E0 P:envmxdIZC $94/8278 8D 6D 06 STA $066D [$94:066D] A:0001 X:0 Y:00E0 P:envmxdIzC $94/827B A9 8A 82 LDA #$828A ; Next NMI, go to $94/828A $94/827E 8D 37 06 STA $0637 $94/8281 A9 94 00 LDA #$0094 $94/8284 8D 39 06 STA $0639 $94/8287 AB PLB ; Restore Flag Register value and Program Bank $94/8288 28 PLP $94/8289 6B RTL
$94/828A PROGRAM FLOW: TITLE SCREEN: City Backdrop Scroll and Color Cycle
$94/828A 08 PHP ; Buffer Flag Register value on stack $94/828B C2 30 REP #$30 ; A/X/Y = 16-bit $94/828D A9 13 00 LDA #$0013 ; Put BG1-3 and Sprites on Main Screen, no Window Area Disable $94/8290 8D 26 01 STA $0126 $94/8293 A9 00 3F LDA #$3F00 A:0013 X:0 Y:0 P:envmxdIzC $94/8296 8D 2A 01 STA $012A [$80:012A] A:3F00 X:0 Y:0 P:envmxdIzC $94/8299 9C 6B 06 STZ $066B ; Reset Frame Counter $94/829C A9 00 94 LDA #$9400 ; (Set Address for City Backdrop Scrolling and Color Cycle in $065D-F) $94/829F 8D 5E 06 STA $065E $94/82A2 A9 ED 85 LDA #$85ED $94/82A5 8D 5D 06 STA $065D $94/82A8 22 B6 91 80 JSL $8091B6[$80:91B6] A:85ED X:0 Y:0 P:eNvmxdIzC $94/82AC A9 00 94 LDA #$9400 A:0 X:0 Y:0 P:envmxdIZc $94/82AF 8D 5E 06 STA $065E [$80:065E] A:9400 X:0 Y:0 P:eNvmxdIzc $94/82B2 A9 9F 8A LDA #$8A9F A:9400 X:0 Y:0 P:eNvmxdIzc $94/82B5 8D 5D 06 STA $065D [$80:065D] A:8A9F X:0 Y:0 P:eNvmxdIzc $94/82B8 22 B6 91 80 JSL $8091B6[$80:91B6] A:8A9F X:0 Y:0 P:eNvmxdIzc $94/82BC A9 CA 82 LDA #$82CA ; Next NMI, go to $94/82CA $94/82BF 8D 37 06 STA $0637 $94/82C2 A9 94 00 LDA #$0094 $94/82C5 8D 39 06 STA $0639 $94/82C8 28 PLP ; Restore Flag Register value $94/82C9 6B RTL
$94/82CA PROGRAM FLOW: TITLE SCREEN: Fade to White (and other stuff?)
This subroutine uses $066B as frame counter. It counts to #$100. The counter value gets devided by 4 and used as load index for the Color Math stuff.
The division by 4 makes sure that the Color Math value only gets changed every fourth frame (#$40 values for Color Math * 4 frames = #$100 frames).
After #$80 frames, when the screen has turned perfectly white, the subroutine does the changing of the screen.
$94/82CA 08 PHP ; Buffer Flag Register value and Program Bank on stack $94/82CB 8B PHB $94/82CC 4B PHK ; Set Program Bank to $94 $94/82CD AB PLB $94/82CE C2 30 REP #$30 ; A/X/Y = 16-bit $94/82D0 AD 6B 06 LDA $066B ; Load Counter value $94/82D3 4A LSR A ; Div by 4 and set as load index for X $94/82D4 4A LSR A $94/82D5 AA TAX $94/82D6 E2 20 SEP #$20 ; A = 8-bit $94/82D8 BD 26 83 LDA $8326,x ; Load value from Table beneath and set it in Color Math Register $94/82DB 8D 32 21 STA $2132 ; (This makes the Fade to white effect) $94/82DE C2 20 REP #$20 ; A/X/Y = 16-bit $94/82E0 AD 6B 06 LDA $066B ; Increment Frame Counter $94/82E3 1A INC A $94/82E4 8D 6B 06 STA $066B $94/82E7 C9 00 01 CMP #$0100 ; Has the counter reached #$100? $94/82EA D0 0E BNE $0E ; [$82FA] Branch if not $94/82EC A9 66 83 LDA #$8366 ; Next NMI, go to $94/8366 $94/82EF 8D 37 06 STA $0637 $94/82F2 A9 94 00 LDA #$0094 $94/82F5 8D 39 06 STA $0639 $94/82F8 80 29 BRA $29 ; [$8323] Exit $94/82FA C9 80 00 CMP #$0080 ; Has Counter reached #$80? $94/82FD D0 24 BNE $24 ; [$8323] Exit if not $94/82FF E2 20 SEP #$20 A:0080 X:001F Y:0 P:enVmxdIZC $94/8301 A9 13 LDA #$13 A:0080 X:001F Y:0 P:enVMxdIZC $94/8303 8D 26 01 STA $0126 [$94:0126] A:0013 X:001F Y:0 P:enVMxdIzC $94/8306 9C 27 01 STZ $0127 [$94:0127] A:0013 X:001F Y:0 P:enVMxdIzC $94/8309 C2 20 REP #$20 A:0013 X:001F Y:0 P:enVMxdIzC $94/830B A9 00 00 LDA #$0000 A:0013 X:001F Y:0 P:enVmxdIzC $94/830E 8D 0F 01 STA $010F [$94:010F] A:0 X:001F Y:0 P:enVmxdIZC $94/8311 8D 11 01 STA $0111 [$94:0111] A:0 X:001F Y:0 P:enVmxdIZC $94/8314 9C EE 0C STZ $0CEE [$94:0CEE] A:0 X:001F Y:0 P:enVmxdIZC $94/8317 A9 94 00 LDA #$0094 A:0 X:001F Y:0 P:enVmxdIZC $94/831A 85 BE STA $BE [$00:00BE] A:0094 X:001F Y:0 P:enVmxdIzC $94/831C A9 08 81 LDA #$8108 A:0094 X:001F Y:0 P:enVmxdIzC $94/831F 22 B0 C2 81 JSL $81C2B0[$81:C2B0] A:8108 X:001F Y:0 P:eNVmxdIzC $94/8323 AB PLB ; Restore Flag Register value and Program Bank $94/8324 28 PLP $94/8325 6B RTL
$94/8326 Color Math Data for Title Screen Fade to White
These values get stored in $2132 at $94/82DB. This makes the screen turn white between the Nintendo Logo and the BS-X Logo.
E0 E1 E2 E3 E4 E5 E6 E7 E8 E9 EA EB EC ED EE EF F0 F1 F2 F3 F4 F5 F6 F7 F8 F9 FA FB FC FD FE FF FF FE FD FC FB FA F9 F8 F7 F6 F5 F4 F3 F2 F1 F0 EF EE ED EC EB EA E9 E8 E7 E6 E5 E4 E3 E2 E1 E0
$94/8366 PROGRAM FLOW: TITLE SCREEN: ?
$94/8366 08 PHP ; Buffer Flag Register value on stack $94/8367 E2 30 SEP #$30 ; A/X/Y = 8-bit $94/8369 A9 13 LDA #$13 ; Put BG1-3 and Sprites on Main Screen $94/836B 8D 26 01 STA $0126 $94/836E 9C 27 01 STZ $0127 ; No Window Area Main Screen Disable $94/8371 A9 E0 LDA #$E0 ; Turn Color Math off $94/8373 8D 32 21 STA $2132 $94/8376 C2 20 REP #$20 ; A = 16-bit $94/8378 A9 00 00 LDA #$0000 $94/837B 8D 0F 01 STA $010F ; BG1 H-Scroll: #$0000 $94/837E 8D 11 01 STA $0111 ; BG1 V-Scroll: #$0000 $94/8381 9C 6B 06 STZ $066B ; Reset Frame Counter $94/8384 9C 6D 06 STZ $066D ; Reset Frame Counter $94/8387 9C EE 0C STZ $0CEE [$80:0CEE] A:0 X:0 Y:0 P:envmXdIZC $94/838A A9 01 00 LDA #$0001 A:0 X:0 Y:0 P:envmXdIZC $94/838D 8D 6F 06 STA $066F [$80:066F] A:0001 X:0 Y:0 P:envmXdIzC $94/8390 A9 02 0D LDA #$0D02 ; HDMA Destination: $210D - BG1 H-Scroll $94/8393 8D 20 43 STA $4320 $94/8396 A9 27 02 LDA #$0227 ; HDMA Table at $00/0227 $94/8399 8D 22 43 STA $4322 $94/839C A2 00 LDX #$00 $94/839E 8E 24 43 STX $4324 $94/83A1 A2 77 LDX #$77 A:0227 X:0 Y:0 P:envmXdIZC $94/83A3 8E 27 02 STX $0227 [$80:0227] A:0227 X:0077 Y:0 P:envmXdIzC $94/83A6 A9 00 00 LDA #$0000 A:0227 X:0077 Y:0 P:envmXdIzC $94/83A9 8D 28 02 STA $0228 [$80:0228] A:0 X:0077 Y:0 P:envmXdIZC $94/83AC A2 10 LDX #$10 A:0 X:0077 Y:0 P:envmXdIZC $94/83AE 8E 2A 02 STX $022A [$80:022A] A:0 X:0010 Y:0 P:envmXdIzC $94/83B1 8D 2B 02 STA $022B [$80:022B] A:0 X:0010 Y:0 P:envmXdIzC $94/83B4 A2 7F LDX #$7F A:0 X:0010 Y:0 P:envmXdIzC $94/83B6 8E 2D 02 STX $022D [$80:022D] A:0 X:007F Y:0 P:envmXdIzC $94/83B9 8D 2E 02 STA $022E [$80:022E] A:0 X:007F Y:0 P:envmXdIzC $94/83BC E2 20 SEP #$20 A:0 X:007F Y:0 P:envmXdIzC $94/83BE AD 3A 01 LDA $013A ; Add HDMA-Flag for Channel 2 $94/83C1 09 04 ORA #$04 $94/83C3 8D 3A 01 STA $013A $94/83C6 C2 20 REP #$20 ; UNNECESSARY LINE $94/83C8 C2 30 REP #$30 A:0004 X:007F Y:0 P:envmXdIzC $94/83CA A9 94 00 LDA #$0094 A:0004 X:007F Y:0 P:envmxdIzC $94/83CD 85 BE STA $BE [$00:00BE] A:0094 X:007F Y:0 P:envmxdIzC $94/83CF A9 C8 8A LDA #$8AC8 A:0094 X:007F Y:0 P:envmxdIzC $94/83D2 22 B0 C2 81 JSL $81C2B0[$81:C2B0] A:8AC8 X:007F Y:0 P:eNvmxdIzC $94/83D6 A9 E4 83 LDA #$83E4 ; Next NMI, go to $94/83E4 $94/83D9 8D 37 06 STA $0637 $94/83DC A9 94 00 LDA #$0094 $94/83DF 8D 39 06 STA $0639 $94/83E2 28 PLP ; Restore Flag Register value $94/83E3 6B RTL
$94/83E4 ?
$94/83E4 08 PHP ; Buffer Flag Register value on stack $94/83E5 C2 30 REP #$30 ; A/X/Y = 16-bit $94/83E7 EE 6D 06 INC $066D [$80:066D] A:83E4 X:0 Y:0 P:eNvmxdIzC $94/83EA 22 63 83 80 JSL $808363[$80:8363] A:83E4 X:0 Y:0 P:envmxdIzC $94/83EE 18 CLC A:A4A2 X:0 Y:0 P:envmxdIzC $94/83EF 6D 6D 06 ADC $066D [$80:066D] A:A4A2 X:0 Y:0 P:envmxdIzc $94/83F2 E2 20 SEP #$20 A:A4A3 X:0 Y:0 P:eNvmxdIzc $94/83F4 8D 6F 12 STA $126F [$80:126F] A:A4A3 X:0 Y:0 P:eNvMxdIzc $94/83F7 C2 20 REP #$20 A:A4A3 X:0 Y:0 P:eNvMxdIzc $94/83F9 AD 54 01 LDA $0154 ; Check if Start or A Button on Joypad 1 was pushed $94/83FC 29 80 10 AND #$1080 $94/83FF F0 20 BEQ $20 ; [$8421] Branch if not
If Start or A Button on Title screen was pushed
$94/8401 A9 53 03 LDA #$0353 ; Play Sound Effect for leaving the title screen $94/8404 A0 01 00 LDY #$0001 $94/8407 22 1C 5C 10 JSL $105C1C $94/840B 22 6B 84 94 JSL $94846B[$94:846B] A:5303 X:0 Y:0001 P:envmxdIZc $94/840F 22 7F 93 80 JSL $80937F[$80:937F] A:0 X:0010 Y:0001 P:envmxdIZc $94/8413 A9 94 00 LDA #$0094 A:0080 X:0010 Y:0001 P:envmxdIZc $94/8416 85 BE STA $BE [$00:00BE] A:0094 X:0010 Y:0001 P:envmxdIzc $94/8418 A9 38 BD LDA #$BD38 A:0094 X:0010 Y:0001 P:envmxdIzc $94/841B 22 B0 C2 81 JSL $81C2B0[$81:C2B0] A:BD38 X:0010 Y:0001 P:eNvmxdIzc $94/841F 80 00 BRA $00 ; [$8421] UNNECESSARY LINE - Branch to where you already are $94/8421 AD 6B 06 LDA $066B [$80:066B] A:0 X:0 Y:0 P:envmxdIZc $94/8424 1A INC A A:0 X:0 Y:0 P:envmxdIZc $94/8425 8D 6B 06 STA $066B [$80:066B] A:0001 X:0 Y:0 P:envmxdIzc $94/8428 C9 10 0E CMP #$0E10 A:0001 X:0 Y:0 P:envmxdIzc $94/842B D0 3C BNE $3C [$8469] A:0001 X:0 Y:0 P:eNvmxdIzc
Executed when Title Screen loops
$94/842D A9 81 00 LDA #$0081 ; Fade Music out $94/8430 A0 00 00 LDY #$0000 $94/8433 22 1C 5C 10 JSL $105C1C $94/8437 A9 00 80 LDA #$8000 ; Next NMI, go to $94/8000 $94/843A 8D 71 06 STA $0671 $94/843D A9 94 00 LDA #$0094 $94/8440 8D 73 06 STA $0673 $94/8443 A9 06 00 LDA #$0006 A:0094 X:0000 Y:0000 P:envmxdIzC $94/8446 8D 77 06 STA $0677 [$80:0677] A:0006 X:0000 Y:0000 P:envmxdIzC $94/8449 A9 00 94 LDA #$9400 A:0006 X:0000 Y:0000 P:envmxdIzC $94/844C 8D 5E 06 STA $065E [$80:065E] A:9400 X:0000 Y:0000 P:eNvmxdIzC $94/844F A9 34 85 LDA #$8534 A:9400 X:0000 Y:0000 P:eNvmxdIzC $94/8452 8D 5D 06 STA $065D [$80:065D] A:8534 X:0000 Y:0000 P:eNvmxdIzC $94/8455 22 B6 91 80 JSL $8091B6[$80:91B6] A:8534 X:0000 Y:0000 P:eNvmxdIzC $94/8459 A9 6B 84 LDA #$846B A:0004 X:0000 Y:0000 P:envmxdIZc $94/845C 8D 3B 06 STA $063B [$80:063B] A:846B X:0000 Y:0000 P:eNvmxdIzc $94/845F A9 94 00 LDA #$0094 A:846B X:0000 Y:0000 P:eNvmxdIzc $94/8462 8D 3D 06 STA $063D [$80:063D] A:0094 X:0000 Y:0000 P:envmxdIzc $94/8465 22 7F 93 80 JSL $80937F[$80:937F] A:0094 X:0000 Y:0000 P:envmxdIzc $94/8469 28 PLP ; Restore Flag Register value $94/846A 6B RTL A:0001 X:0 Y:0 P:eNvmxdIzC
$94/846B Transfer NMI Jump Address from Buffer B to A
$94/846B 08 PHP ; Buffer Flag Register value on stack $94/846C E2 30 SEP #$30 ; A/X/Y = 8-bit $94/846E 9C 3A 01 STZ $013A ; Clear all HDMA flags $94/8471 C2 30 REP #$30 ; A/X/Y = 16-bit $94/8473 AD 71 06 LDA $0671 [$80:0671] A:5303 X:0 Y:0001 P:envmxdIZc $94/8476 8D 37 06 STA $0637 [$80:0637] A:0 X:0 Y:0001 P:envmxdIZc $94/8479 AD 73 06 LDA $0673 [$80:0673] A:0 X:0 Y:0001 P:envmxdIZc $94/847C 8D 39 06 STA $0639 [$80:0639] A:0 X:0 Y:0001 P:envmxdIZc $94/847F 22 25 92 80 JSL $809225[$80:9225] A:0 X:0 Y:0001 P:envmxdIZc $94/8483 28 PLP ; Restore Flag Register value $94/8484 6B RTL
$94/8534 ? (Screen Fade Out)
$94/8534 E2 30 SEP #$30 ; A/X/Y = 8-bit $94/8536 AD 00 01 LDA $0100 ; Is Screen Brightness zero? $94/8539 29 0F AND #$0F $94/853B F0 25 BEQ $25 ; [$8562] Branch if it is $94/853D 9C 75 06 STZ $0675 [$80:0675] A:1F0F X:0004 Y:0094 P:envMXdizc $94/8540 EE 75 06 INC $0675 [$80:0675] A:1F0F X:0004 Y:0094 P:envMXdizc $94/8543 AD 75 06 LDA $0675 [$80:0675] A:1F0F X:0004 Y:0094 P:envMXdizc $94/8546 CD 77 06 CMP $0677 [$80:0677] A:1F01 X:0004 Y:0094 P:envMXdizc $94/8549 D0 11 BNE $11 [$855C] A:1F01 X:0004 Y:0094 P:eNvMXdizc $94/854B 9C 75 06 STZ $0675 [$80:0675] A:1F06 X:0004 Y:0094 P:envMXdiZC $94/854E AD 00 01 LDA $0100 ; Load value for $2100 (FBLANK / Screen Brightness) $94/8551 3A DEC A ; Turn down Screen Brightness a notch $94/8552 8D 00 01 STA $0100 ; Set it in buffer to set in $2100 $94/8555 8D 1B 02 STA $021B ; Set it in buffer for the value currently in $2100 $94/8558 29 0F AND #$0F ; Check if Brightness has reached zero $94/855A F0 06 BEQ $06 ; [$8562] Branch if it has $94/855C 22 38 92 80 JSL $809238[$80:9238] A:1F01 X:0004 Y:0094 P:eNvMXdizc $94/8560 80 DE BRA $DE [$8540] A:1F01 X:0004 Y:0094 P:eNvMXdizc
$94/8572 E2 30 SEP #$30 ; A/X/Y = 8-bit $94/8574 AD 00 01 LDA $0100 ; Load $2100 buffer (FBLANK / Screen Brightness) $94/8577 29 0F AND #$0F ; Is Screen Brightness at its maximum? $94/8579 C9 0F CMP #$0F $94/857B F0 32 BEQ $32 ; [$85AF] Branch if it is $94/857D 9C 75 06 STZ $0675 [$80:0675] A:1E00 X:0 Y:0094 P:eNvMXdizc $94/8580 AD 00 01 LDA $0100 ; Remove any screen brightness from buffered value for $2100 $94/8583 29 F0 AND #$F0 $94/8585 8D 00 01 STA $0100 $94/8588 8D 1B 02 STA $021B ; Set as value that currently is in $2100 $94/858B EE 75 06 INC $0675 [$80:0675] A:1E00 X:0 Y:0094 P:envMXdiZc $94/858E AD 75 06 LDA $0675 [$80:0675] A:1E00 X:0 Y:0094 P:envMXdizc $94/8591 CD 77 06 CMP $0677 [$80:0677] A:1E01 X:0 Y:0094 P:envMXdizc $94/8594 D0 13 BNE $13 [$85A9] A:1E01 X:0 Y:0094 P:eNvMXdizc $94/8596 9C 75 06 STZ $0675 [$80:0675] A:1E06 X:0 Y:0094 P:envMXdiZC $94/8599 AD 00 01 LDA $0100 ; Load $2100 buffer value $94/859C 1A INC A ; Increment value (Brightness one step up) $94/859D 8D 00 01 STA $0100 $94/85A0 8D 1B 02 STA $021B $94/85A3 29 0F AND #$0F ; Was max. Brightness reached? $94/85A5 C9 0F CMP #$0F $94/85A7 F0 06 BEQ $06 ; [$85AF] Branch if it has $94/85A9 22 38 92 80 JSL $809238[$80:9238] A:1E01 X:0 Y:0094 P:eNvMXdizc $94/85AD 80 DC BRA $DC [$858B] A:1E01 X:0 Y:0094 P:eNvMXdizc $94/85AF 22 38 92 80 JSL $809238[$80:9238] A:1E0F X:0 Y:0094 P:envMXdiZC $94/85B3 5C E9 91 80 JMP $8091E9[$80:91E9] A:1E0F X:0 Y:0094 P:envMXdiZC
$94/85ED Title Screen City Backdrop Scroll and Color Cycle
This subroutine is important for the scrolling of the City Backdrop and it's Night/Day-Color changing on Title screen
$94/85ED C2 20 REP #$20 ; A = 16-bit $94/85EF 9C 67 06 STZ $0667 ; Reset Frame Counter $94/85F2 9C 69 06 STZ $0669 ; Reset Color Cycle Counter $94/85F5 C2 30 REP #$30 ; A/X/Y = 16-bit - necessary, other code jumps directly here $94/85F7 AD 67 06 LDA $0667 ; Is the Frame counter even? (Stuff to do for every second frame) $94/85FA 29 01 00 AND #$0001 $94/85FD D0 0A BNE $0A ; [$8609] Branch if not $94/85FF AD 13 01 LDA $0113 ; Scroll BG2 (City Backdrop) one pixel, reset to #$0000 after #$01FF $94/8602 1A INC A $94/8603 29 FF 01 AND #$01FF $94/8606 8D 13 01 STA $0113 $94/8609 AD 67 06 LDA $0667 ; Stuff to do for every eighth frame $94/860C 29 07 00 AND #$0007 $94/860F D0 40 BNE $40 ; [$8651] Branch on the seven other frames $94/8611 8B PHB ; Buffer Program Bank on stack $94/8612 4B PHK ; Set Program Bank to $94 $94/8613 AB PLB $94/8614 AD 69 06 LDA $0669 ; Load Color Cycle Counter and transfer to X $94/8617 AA TAX ; UNNECESSARY LINE - why not replace the prior one with "LDX $0669"? $94/8618 BD 5F 86 LDA $865F,x ; Load, according to Cycle Counter, a Pointer for the Palette table $94/861B 29 FF 00 AND #$00FF ; (Remove second byte that was accidentally loaded from that table) $94/861E 0A ASL A ; Multiply by #$20, transfer to X as Load Index $94/861F 0A ASL A $94/8620 0A ASL A $94/8621 0A ASL A $94/8622 0A ASL A $94/8623 AA TAX $94/8624 A0 00 00 LDY #$0000 ; Set Y as Store Index $94/8627 BD BF 86 LDA $86BF,x ; Load Color from Palette $94/862A DA PHX ; Buffer X on stack $94/862B BB TYX ; Transfer Store Index from Y to X $94/862C 9F 84 20 7E STA $7E2084,x ; Store loaded Color in CGRAM buffer $94/8630 FA PLX ; Restore X (Load Index) $94/8631 E8 INX ; Increment Load Index twice $94/8632 E8 INX $94/8633 C8 INY ; Increment Store Index twice $94/8634 C8 INY $94/8635 98 TYA ; Check if the store index has reached #$1A (after thirteen colors) $94/8636 C9 1A 00 CMP #$001A $94/8639 D0 EC BNE $EC ; [$8627] Loop until thirteen colors are done $94/863B AB PLB ; Restore Original Program Bank $94/863C A9 01 00 LDA #$0001 ; Set flag for CGRAM Update $94/863F 8D 1C 02 STA $021C ; UNNECESSARY LINE if the one before is replaced with "INC $021C" $94/8642 AD 69 06 LDA $0669 ; Increment Color Cycle Counter, reset at #$0060 $94/8645 1A INC A $94/8646 C9 60 00 CMP #$0060 $94/8649 D0 03 BNE $03 ; [$864E] $94/864B A9 00 00 LDA #$0000 $94/864E 8D 69 06 STA $0669 $94/8651 AD 67 06 LDA $0667 ; Increment Frame Counter $94/8654 1A INC A $94/8655 8D 67 06 STA $0667 $94/8658 22 38 92 80 JSL $809238[$80:9238] A:0001 X:001A Y:001A P:envmxdizc $94/865C 4C F5 85 JMP $85F5 ; Loop
$94/865F Title Screen City Backdrop Color Cycle Table (for $94/85ED)
These #$60 bytes are the pointers to the palettes at $94/68BF. In the Subroutine at $94/85ED, a counter is incremented and goes through every of these entries (and is reset at #$60), making the Day and Night cycle on the title screen.
data is missing here
$94/865F 00 01 02 03 04 05 06 07 $94/8667 08 09 0A 0B 0C 0D 0E 0F $94/866F 0F 0F 0F 0F 0F 0F 0F 0F $94/8677 0F 0F 0F 0F 0F 0E 0D 0C $94/867F 0B 0A 09 08 07 06 05 04 $94/8687 03 02 01 00 00 00 00 00 $94/868F 00 10 11 12 13 14 15 16 $94/8697 17 18 19 1A 1B 1C 1D 1E $94/869F 1E 1E 1E 1E 1E 1E 1E 1E $94/86A7 1E 1E 1E 1E 1E 1D 1C 1B $94/86AF 1A 19 18 17 16 15 14 13 $94/86B7 12 11 10 00 00 00 00 00
$94/86BF Title Screen City Backdrop Color Cycle Palettes (for $94/85ED)
Note that the Subroutine at $94/85ED starts at the third color and only transfers thirteen colors, so the first four bytes and the last two of these palettes are never used(?).
Here are $#1F palettes, these should be #$3E0 bytes (last byte at $94/8A9E).
$94/8BDB Intro: HDMA table for BG1 VScroll (for $94/81A0)
E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 C8 00 00 01 38 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 C3 00 D2 00 E2 00 F1 00 00 01 0F 01 1E 01 2E 01 3D 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 C5 00 CD 00 D6 00 DE 00 E7 00 EF 00 F8 00 00 01 08 01 11 01 19 01 22 01 2A 01 33 01 3B 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 C1 00 C7 00 CD 00 D2 00 D8 00 DE 00 E4 00 E9 00 EF 00 F5 00 FB 00 00 01 05 01 0B 01 11 01 17 01 1C 01 22 01 28 01 2E 01 33 01 39 01 3F 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 C1 00 C5 00 C9 00 CE 00 D2 00 D6 00 DA 00 DF 00 E3 00 E7 00 EB 00 F0 00 F4 00 F8 00 FC 00 00 01 04 01 08 01 0C 01 10 01 15 01 19 01 1D 01 21 01 26 01 2A 01 2E 01 32 01 37 01 3B 01 3F 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 E0 01 C2 00 C5 00 C9 00 CC 00 CF 00 D3 00 D6 00 D9 00 DC 00 E0 00 E3 00 E6 00 EA 00 ED 00 F0 00 F3 00 F7 00 FA 00 FD 00 00 01 03 01 06 01 09 01 0D 01 10 01 13 01 16 01 1A 01 1D 01 20 01 24 01 27 01 2A 01 2D 01 31 01 34 01 37 01 3B 01 3E 01 E0 01 E0 01 E0 01 E0 01 E0 01 C1 00 C4 00 C7 00 C9 00 CC 00 CF 00 D1 00 D4 00 D6 00 D9 00 DC 00 DE 00 E1 00 E4 00 E6 00 E9 00 EB 00 EE 00 F1 00 F3 00 F6 00 F9 00 FB 00 FE 00 00 01 02 01 05 01 07 01 0A 01 0D 01 0F 01 12 01 15 01 17 01 1A 01 1C 01 1F 01 22 01 24 01 27 01 2A 01 2C 01 2F 01 31 01 34 01 37 01 39 01 3C 01 3F 01 CD 00 CF 00 D1 00 D3 00 D5 00 D8 00 DA 00 DC 00 DE 00 E0 00 E2 00 E5 00 E7 00 E9 00 EB 00 ED 00 EF 00 F1 00 F4 00 F6 00 F8 00 FA 00 FC 00 FE 00 00 01 02 01 04 01 06 01 08 01 0A 01 0C 01 0F 01 11 01 13 01 15 01 17 01 19 01 1B 01 1E 01 20 01 22 01 24 01 26 01 28 01 2B 01 2D 01 2F 01 31 01 33 01 D6 00 D7 00 D9 00 DB 00 DD 00 DE 00 E0 00 E2 00 E4 00 E6 00 E7 00 E9 00 EB 00 ED 00 EF 00 F0 00 F2 00 F4 00 F6 00 F8 00 F9 00 FB 00 FD 00 FF 00 00 01 01 01 03 01 05 01 07 01 08 01 0A 01 0C 01 0E 01 10 01 11 01 13 01 15 01 17 01 19 01 1A 01 1C 01 1E 01 20 01 22 01 23 01 25 01 27 01 29 01 2A 01 DC 00 DE 00 DF 00 E1 00 E2 00 E4 00 E5 00 E7 00 E8 00 EA 00 EB 00 ED 00 EE 00 F0 00 F1 00 F3 00 F4 00 F6 00 F7 00 F9 00 FA 00 FC 00 FD 00 FF 00 00 01 01 01 03 01 04 01 06 01 07 01 09 01 0A 01 0C 01 0D 01 0F 01 10 01 12 01 13 01 15 01 16 01 18 01 19 01 1B 01 1C 01 1E 01 1F 01 21 01 22 01 24 01 E2 00 E3 00 E4 00 E6 00 E7 00 E8 00 E9 00 EB 00 EC 00 ED 00 EF 00 F0 00 F1 00 F2 00 F4 00 F5 00 F6 00 F8 00 F9 00 FA 00 FB 00 FD 00 FE 00 FF 00 00 01 01 01 02 01 03 01 05 01 06 01 07 01 08 01 0A 01 0B 01 0C 01 0E 01 0F 01 10 01 11 01 13 01 14 01 15 01 17 01 18 01 19 01 1A 01 1C 01 1D 01 1E 01 E6 00 E7 00 E8 00 E9 00 EB 00 EC 00 ED 00 EE 00 EF 00 F0 00 F1 00 F2 00 F3 00 F4 00 F6 00 F7 00 F8 00 F9 00 FA 00 FB 00 FC 00 FD 00 FE 00 FF 00 00 01 01 01 02 01 03 01 04 01 05 01 06 01 07 01 08 01 09 01 0A 01 0C 01 0D 01 0E 01 0F 01 10 01 11 01 12 01 13 01 14 01 15 01 17 01 18 01 19 01 1A 01 EA 00 EB 00 EC 00 ED 00 EE 00 EF 00 F0 00 F0 00 F1 00 F2 00 F3 00 F4 00 F5 00 F6 00 F7 00 F8 00 F9 00 FA 00 FB 00 FC 00 FD 00 FE 00 FF 00 00 01 00 01 00 01 01 01 02 01 03 01 04 01 05 01 06 01 07 01 08 01 09 01 0A 01 0B 01 0C 01 0D 01 0E 01 0F 01 10 01 10 01 11 01 12 01 13 01 14 01 15 01 16 01 ED 00 EE 00 EF 00 EF 00 F0 00 F1 00 F2 00 F3 00 F4 00 F4 00 F5 00 F6 00 F7 00 F8 00 F8 00 F9 00 FA 00 FB 00 FC 00 FC 00 FD 00 FE 00 FF 00 00 01 00 01 00 01 01 01 02 01 03 01 04 01 04 01 05 01 06 01 07 01 08 01 08 01 09 01 0A 01 0B 01 0C 01 0C 01 0D 01 0E 01 0F 01 10 01 11 01 11 01 12 01 13 01 F0 00 F0 00 F1 00 F2 00 F2 00 F3 00 F4 00 F5 00 F5 00 F6 00 F7 00 F7 00 F8 00 F9 00 F9 00 FA 00 FB 00 FC 00 FC 00 FD 00 FE 00 FE 00 FF 00 00 01 00 01 00 01 01 01 02 01 02 01 03 01 04 01 04 01 05 01 06 01 07 01 07 01 08 01 09 01 09 01 0A 01 0B 01 0B 01 0C 01 0D 01 0E 01 0E 01 0F 01 10 01 10 01 F2 00 F3 00 F3 00 F4 00 F4 00 F5 00 F6 00 F6 00 F7 00 F7 00 F8 00 F9 00 F9 00 FA 00 FA 00 FB 00 FC 00 FC 00 FD 00 FD 00 FE 00 FF 00 FF 00 00 01 00 01 00 01 01 01 01 01 02 01 03 01 03 01 04 01 04 01 05 01 06 01 06 01 07 01 07 01 08 01 09 01 09 01 0A 01 0A 01 0B 01 0C 01 0C 01 0D 01 0D 01 0E 01 F4 00 F4 00 F5 00 F5 00 F6 00 F7 00 F7 00 F8 00 F8 00 F9 00 F9 00 FA 00 FA 00 FB 00 FB 00 FC 00 FC 00 FD 00 FD 00 FE 00 FE 00 FF 00 FF 00 00 01 00 01 00 01 01 01 01 01 02 01 02 01 03 01 03 01 04 01 04 01 05 01 05 01 06 01 06 01 07 01 07 01 08 01 08 01 09 01 09 01 0A 01 0B 01 0B 01 0C 01 0C 01 F6 00 F6 00 F7 00 F7 00 F7 00 F8 00 F8 00 F9 00 F9 00 FA 00 FA 00 FB 00 FB 00 FC 00 FC 00 FC 00 FD 00 FD 00 FE 00 FE 00 FF 00 FF 00 00 01 00 01 00 01 00 01 00 01 01 01 01 01 02 01 02 01 03 01 03 01 04 01 04 01 04 01 05 01 05 01 06 01 06 01 07 01 07 01 08 01 08 01 09 01 09 01 09 01 0A 01 0A 01 F7 00 F8 00 F8 00 F8 00 F9 00 F9 00 F9 00 FA 00 FA 00 FB 00 FB 00 FB 00 FC 00 FC 00 FD 00 FD 00 FD 00 FE 00 FE 00 FF 00 FF 00 FF 00 00 01 00 01 00 01 00 01 00 01 01 01 01 01 01 01 02 01 02 01 03 01 03 01 03 01 04 01 04 01 05 01 05 01 05 01 06 01 06 01 07 01 07 01 07 01 08 01 08 01 08 01 09 01 F8 00 F9 00 F9 00 F9 00 FA 00 FA 00 FA 00 FB 00 FB 00 FB 00 FC 00 FC 00 FC 00 FD 00 FD 00 FD 00 FE 00 FE 00 FE 00 FF 00 FF 00 FF 00 00 01 00 01 00 01 00 01 00 01 01 01 01 01 01 01 02 01 02 01 02 01 03 01 03 01 03 01 04 01 04 01 04 01 05 01 05 01 05 01 06 01 06 01 06 01 07 01 07 01 07 01 08 01 FA 00 FA 00 FA 00 FA 00 FB 00 FB 00 FB 00 FC 00 FC 00 FC 00 FC 00 FD 00 FD 00 FD 00 FE 00 FE 00 FE 00 FE 00 FF 00 FF 00 FF 00 00 01 00 01 00 01 00 01 00 01 00 01 00 01 01 01 01 01 01 01 02 01 02 01 02 01 02 01 03 01 03 01 03 01 04 01 04 01 04 01 04 01 05 01 05 01 05 01 06 01 06 01 06 01 06 01 FB 00 FB 00 FB 00 FB 00 FC 00 FC 00 FC 00 FC 00 FD 00 FD 00 FD 00 FD 00 FE 00 FE 00 FE 00 FE 00 FF 00 FF 00 FF 00 FF 00 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 01 01 01 01 01 01 01 01 02 01 02 01 02 01 02 01 03 01 03 01 03 01 03 01 04 01 04 01 04 01 04 01 05 01 05 01 05 01 05 01 FC 00 FC 00 FC 00 FC 00 FC 00 FD 00 FD 00 FD 00 FD 00 FD 00 FE 00 FE 00 FE 00 FE 00 FE 00 FF 00 FF 00 FF 00 FF 00 FF 00 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 01 01 01 01 01 01 01 01 01 01 02 01 02 01 02 01 02 01 02 01 03 01 03 01 03 01 03 01 03 01 04 01 04 01 04 01 04 01 04 01 FC 00 FD 00 FD 00 FD 00 FD 00 FD 00 FD 00 FE 00 FE 00 FE 00 FE 00 FE 00 FE 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 01 01 01 01 01 01 01 01 01 01 01 01 02 01 02 01 02 01 02 01 02 01 02 01 03 01 03 01 03 01 03 01 03 01 03 01 04 01 FD 00 FD 00 FD 00 FD 00 FE 00 FE 00 FE 00 FE 00 FE 00 FE 00 FE 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 02 01 02 01 02 01 02 01 02 01 02 01 02 01 03 01 03 01 03 01 03 01 FE 00 FE 00 FE 00 FE 00 FE 00 FE 00 FE 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 02 01 02 01 02 01 02 01 02 01 02 01 02 01 FE 00 FE 00 FE 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 02 01 02 01 02 01 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 00 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 data is missing here
$94/8A9F ?
$94/8A9F C2 30 REP #$30 ; A/X/Y = 16-bit $94/8AA1 AD 6F 06 LDA $066F [$80:066F] A:1F0F X:0004 Y:0094 P:envmxdizc $94/8AA4 D0 1A BNE $1A [$8AC0] A:0 X:0004 Y:0094 P:envmxdiZc $94/8AA6 AD 54 01 LDA $0154 ; Have the Start or A Button on Joypad 1 been pushed? $94/8AA9 29 80 10 AND #$1080 $94/8AAC D0 06 BNE $06 ; [$8AB4] Branch if not $94/8AAE 22 38 92 80 JSL $809238[$80:9238] A:0 X:0004 Y:0094 P:envmxdiZc $94/8AB2 80 ED BRA $ED [$8AA1] A:0 X:0004 Y:0094 P:envmxdiZc
code is missing here
$94/8AC0 22 38 92 80 JSL $809238[$80:9238] A:0001 X:0004 Y:0094 P:envmxdizc $94/8AC4 5C E9 91 80 JMP $8091E9[$80:91E9] A:0001 X:0004 Y:0094 P:envmxdizc
$94/8AC8 TOKEN DATA
26 DA 19 01 00 00 00 25 01 00 27 DA 19 01 01 00 00 2F DA 19 01 03 00 E0 01 00 CF 8A 94 25 01 00 60 93 A6 81 DA 19 01 2B 02 00 27 DA 19 01 01 00 00 29 DA 19 01 FF 01 00 60 B4 A6 81 DA 19 01 2B 02 00 2F DA 19 01 03 00 00 01 00 E5 8A 94 38 00 00 00 00 00 00 7D B4 93 38 00 00 00 00 00 00 CC C0 93 26 DA 19 01 00 00 00 25 01 00 27 DA 19 01 01 00 00 2F DA 19 01 03 00 C0 03 00 31 8B 94 25
$94/96F7 Palette Data for the Nintendo Logo turning gray ($94/8237)
When you start the program, you see the Nintendo Logo appear and then turn from blue to silver. These palettes are used for this color transition.
The $FFFF at $94/97D7 is the signal for the subroutine at $94/8237 to end this palette changing.
$94/96F7 E7 38 E7 38 08 3D 08 3D 29 3D 29 3D 4A 41 4A 41 $94/9707 E7 38 08 39 08 3D 29 3D 4A 41 6B 41 6B 45 8C 45 $94/9717 E7 38 08 3D 29 3D 4A 41 6B 45 8C 49 AD 49 CE 4D $94/9727 E7 38 08 3D 4A 41 6B 45 8C 45 AD 49 EF 4D 10 52 $94/9737 E7 38 29 3D 4A 41 8C 45 CE 4D 10 52 31 56 73 5A $94/9747 E7 38 29 3D 6B 45 AD 49 EF 4D 31 52 73 5A B5 5E $94/9757 E7 38 29 41 8C 45 CE 4D 10 52 52 5A B5 5E F7 66 $94/9767 4A 41 8C 45 CE 4D 10 52 31 56 73 5A B5 62 F7 66 $94/9777 8C 45 CE 49 EF 4D 31 52 52 5A 94 5E B5 62 F7 66 $94/9787 CE 4D EF 51 31 56 52 5A 73 5A 94 5E D6 62 F7 66 $94/9797 10 52 31 56 52 56 73 5A 94 5E B5 62 D6 62 F7 66 $94/97A7 73 5A 94 5A 94 5E B5 5E B5 62 D6 62 D6 66 F7 66 $94/97B7 B5 5E B5 5E D6 62 D6 62 D6 62 D6 62 F7 66 F7 66 $94/97C7 F7 66 F7 66 F7 66 F7 66 F7 66 F7 66 F7 66 F7 66 $94/97D7 FF FF
$94/BCFF Clear BS-X SRAM
$94/BCFF 08 PHP ; Buffer Flag Register value and Data Bank on stack $94/BD00 8B PHB $94/BD01 F4 00 10 PEA $1000 ; Set Data Bank to $10 $94/BD04 AB PLB $94/BD05 AB PLB $94/BD06 E2 20 SEP #$20 ; A = 8-bit $94/BD08 C2 10 REP #$10 ; X/Y = 16-bit $94/BD0A A2 6D 09 LDX #$096D ; Clear $10/5006 to $10/5973 $94/BD0D A9 00 LDA #$00 $94/BD0F 9D 06 50 STA $5006,x $94/BD12 CA DEX $94/BD13 10 FA BPL $FA ; [$BD0F] $94/BD15 A2 88 13 LDX #$1388 ; Set Money Start Value: 5000 (= #$1388) $94/BD18 8E 1E 50 STX $501E $94/BD1B A2 D9 98 LDX #$98D9 ; Set GUI Border Scheme to standard value (= $94/98D9) $94/BD1E 8E 6A 59 STX $596A $94/BD21 A9 94 LDA #$94 $94/BD23 8D 6C 59 STA $596C $94/BD26 A2 31 A4 LDX #$A431 ; Set GUI Color Scheme pointer (= $94/A431) $94/BD29 8E 6D 59 STX $596D $94/BD2C A9 94 LDA #$94 $94/BD2E 8D 6F 59 STA $596F $94/BD31 AB PLB ; Restore Data Bank $94/BD32 22 AA C9 80 JSL $80C9AA ; Calculate new SRAM Checksum $94/BD36 28 PLP ; Restore Flag Register value $94/BD37 6B RTL
$94/BD38 TOKEN DATA
Bank $9F
$9F/FFF0 Address of the SPC program
This gets used at $80/8FF7. This is an UNNECESSARY LINE: It makes no sense why this address isn't directly loaded there. This must be a remnant of the development that was left the few bytes it saves would make no difference.
$9F/FFF0 00 80 9D ; SPC program is at $9D/8000
Internal Data for BS-X BIOS |
---|
ROM Map • RAM Map • Text Table • Notes • Tutorials |