; maclab eprom, first half ; The first half is permanently selected on the circuit ; board by wiring pin 27 (A14) to ground. ; The first half has 35 bytes more code than the second half ; tjt 12-19-2010 ; The startup vectors are at the end of the EPROM, ; in particular the symbol RESET is where the show starts. ; Here is a list of hardware on the board: ; ; am27C256 - 32Kx8 ROM (we see only 16K) ; 6264 - 8Kx8 SRAM ; 62256 - 32Kx8 SRAM ; 53C80 - scsi chip - 8 registers ; mc68c50 - "acia" UART - 2 registers ; R65C22 via chip (1 of 2) - 16 registers ; R65C22 via chip (2 of 2) - 16 registers ; ADS7800 (Burr Brown) 12 bit ADC (3 microsecond) ; AD667 Analog Devices, 12 bit DAC ; ADG526 Analog Devices, 16 channel analog mux ; ; Both the DAC and ADC are 8 bit bus compatible devices. ; Here is what I believe the address map to look like: ; ; 0x0000 - 0x7ffff RAM (32K) ; 0x8000 - 0x9ffff RAM (8K) ; 0xa000 - 0xbffff IO (8K) ; 0xc000 - 0xfffff ROM (16K) ; It is not clear yet (and doesn't really matter) which ; RAM chip is mapped first into the address space. ; Here are a bunch of symbolic references for zero page addresses. Z00 .equ $00 Z01 .equ $01 Z02 .equ $02 Z03 .equ $03 Z04 .equ $04 Z0b .equ $0b Z0c .equ $0c Z0d .equ $0d Z0e .equ $0e Z0f .equ $0f Z10 .equ $10 Z11 .equ $11 Z12 .equ $12 Z13 .equ $13 Z14 .equ $14 Z15 .equ $15 Z16 .equ $16 Z17 .equ $17 Z18 .equ $18 Z19 .equ $19 ; two byte pointer Z1a .equ $1a Z1b .equ $1b Z1c .equ $1c Z1d .equ $1d Z26 .equ $26 Z27 .equ $27 Z28 .equ $28 Z36 .equ $36 Z37 .equ $37 Z38 .equ $38 Z47 .equ $47 Z48 .equ $48 Z49 .equ $49 Z4a .equ $4a ; two byte pointer Z5a .equ $5a Z5b .equ $5b Z5c .equ $5c Z5d .equ $5d Z5e .equ $5e Z5f .equ $5f Z60 .equ $60 Z61 .equ $61 Z62 .equ $62 Z63 .equ $63 Z64 .equ $64 Z66 .equ $66 Z67 .equ $67 Z6c .equ $6c Z6d .equ $6d Z6e .equ $6e Z6f .equ $6f Z71 .equ $71 Z72 .equ $72 Z73 .equ $73 Z74 .equ $74 Z75 .equ $75 Z76 .equ $76 Z77 .equ $77 Z78 .equ $78 Z79 .equ $79 Z7a .equ $7a Z7b .equ $7b Z7c .equ $7c Z7d .equ $7d Z7e .equ $7e Z7f .equ $7f Z80 .equ $80 Z82 .equ $82 Z83 .equ $83 Z84 .equ $84 Z88 .equ $88 Z89 .equ $89 Z8a .equ $8a ; two byte pointer Z8b .equ $8b Z8c .equ $8c Z8d .equ $8d Z8e .equ $8e Z8f .equ $8f Z90 .equ $90 Z91 .equ $91 Z92 .equ $92 Z93 .equ $93 Z94 .equ $94 ; 3 byte thing. Z98 .equ $98 ; two byte pointer Z99 .equ $99 Z9a .equ $9a Z9b .equ $9b Z9c .equ $9c Z9d .equ $9d Z9e .equ $9e Z9f .equ $9f ; two byte pointer Za0 .equ $a0 Za1 .equ $a1 Za2 .equ $a2 Za3 .equ $a3 Za4 .equ $a4 Za5 .equ $a5 Za6 .equ $a6 Za7 .equ $a7 Za8 .equ $a8 Za9 .equ $a9 Zaa .equ $aa Zab .equ $ab Zac .equ $ac Zb0 .equ $b0 Zb4 .equ $b4 Zb8 .equ $b8 Zb9 .equ $b9 Zba .equ $ba Zbb .equ $bb Zbc .equ $bc Zbd .equ $bd Zbf .equ $bf Zc0 .equ $c0 Zc1 .equ $c1 Zca .equ $ca Zcb .equ $cb Zcc .equ $cc Zcd .equ $cd Zce .equ $ce Zcf .equ $cf Zd0 .equ $d0 Zd1 .equ $d1 Zd2 .equ $d2 Zd3 .equ $d3 Zd4 .equ $d4 Zd5 .equ $d5 Zd6 .equ $d6 Zd7 .equ $d7 Zd8 .equ $d8 Zd9 .equ $d9 Zda .equ $da Zdb .equ $db Zdc .equ $dc ; 3 bytes for a JMP to handle IRQ IRQ .equ $dd Zde .equ $de Zdf .equ $df Ze0 .equ $e0 Ze1 .equ $e1 D0100 .equ $0100 D0105 .equ $0105 D0106 .equ $0106 D0200 .equ $0200 D0201 .equ $0201 D0202 .equ $0202 D0203 .equ $0203 D0300 .equ $0300 D0301 .equ $0301 D0302 .equ $0302 D0303 .equ $0303 D0304 .equ $0304 D0305 .equ $0305 D0306 .equ $0306 D0307 .equ $0307 D0308 .equ $0308 D0309 .equ $0309 D030a .equ $030a D030b .equ $030b D030c .equ $030c D030d .equ $030d D030e .equ $030e D030f .equ $030f D0310 .equ $0310 D0311 .equ $0311 D0312 .equ $0312 D0313 .equ $0313 D0314 .equ $0314 D0315 .equ $0315 D0316 .equ $0316 D0410 .equ $0410 D0420 .equ $0420 D13dc .equ $13dc D1adb .equ $1adb D1add .equ $1add D58db .equ $58db D8000 .equ $8000 D88db .equ $88db ; Here is some device. Da008 .equ $a008 Da009 .equ $a009 Da00a .equ $a00a Da00b .equ $a00b Da00c .equ $a00c Da00d .equ $a00d Da010 .equ $a010 ; 7seg ?? Da012 .equ $a012 ; hw12 Da013 .equ $a013 ; hw13 Da016 .equ $a016 ; hw16 Da017 .equ $a017 ; hw17 Da810 .equ $a810 Da830 .equ $a830 Db010 .equ $b010 Db090 .equ $b090 Db0d0 .equ $b0d0 Db110 .equ $b110 Db150 .equ $b150 Db210 .equ $b210 Db250 .equ $b250 Db2d0 .equ $b2d0 Db310 .equ $b310 Db350 .equ $b350 Db390 .equ $b390 Db410 .equ $b410 Db490 .equ $b490 Db4d0 .equ $b4d0 Db6d0 .equ $b6d0 Db710 .equ $b710 Db750 .equ $b750 Db7d0 .equ $b7d0 ; The 5380 chip has 8 registers ; the 6522 via has 16 registers (and we have 2) ; the acia has 2 registers Db810 .equ $b810 Db811 .equ $b811 ; device register of some kind. Db812 .equ $b812 Db813 .equ $b813 Db814 .equ $b814 Db815 .equ $b815 Db816 .equ $b816 Db817 .equ $b817 Db818 .equ $b818 ; the following gets lots of attention, along with the above. Db81c .equ $b81c Dbcdc .equ $bcdc .org $c000 ; long delay c000 38 Sc000: SEC c001 e9 01 SBC #$01 ; 1 . c003 d0 fb BNE Sc000 c005 60 RTS ; short delay (never used) c006 ea Pc006: NOP c007 ea NOP c008 ea NOP c009 ea NOP c00a ea NOP c00b 60 RTS ; The BMI below can only do a relative jump, so it bounces through ; here to go farther away. c00c 4c f1 e6 Lc00c: JMP Le6f1 ; The BIT instruction does an AND of A and memory, setting Z accordingly ; also, as a peculiar side effect, it loads 2 bits from the memory ; location into V and N ; bit 6 goes into V ; bit 7 goes into N ; location Z93 has some flag bits that get set elsewhere that ; this code is polling (in this case looking at bit 6) ; notes on Z93 - ; it gets set to all zeros on startup. ; it gets set to $80 at e8ce ; it gets zeroed at e8d6 ; it gets set to $c0 at e9ae ; so most of the time this bit is clear and the test ; on the b814 device register gets bypassed. ; b814 looks like a device register. ; Here the BMI tests the N flag (which is bit 7 of that register) ; (Must be some device that needs attention while this waiting loop cranks) ; This gets called with A set to a count of how many times to ; repeat this test. The test is to check bit 6 of Z93. ; If we find it set, we branch to Le6f1, bouncing through Lc00c ; (but first read device register Db814). c00f 48 Sc00f: PHA c010 20 00 c0 JSR Sc000 ; delay c013 24 93 BIT Z93 c015 50 05 BVC Lc01c c017 ad 14 b8 LDA Db814 ; device c01a 30 f0 BMI Lc00c ; go far away (Le6f1) c01c 68 Lc01c: PLA c01d 3a DEC c01e d0 ef BNE Sc00f c020 60 RTS c021 .byte $a5,$1d,$30,$3c,$38,$e9,$01,$f0 ; "..0<8..." c029 .byte $1e,$48,$20,$09,$c0,$a5,$00,$24 ; ".H ....$" c031 .byte $93,$70,$0a,$ad,$10,$a8,$29,$01 ; ".p....)." c039 .byte $f0,$0a,$4c,$6b,$cb,$ad,$14,$b8 ; "..Lk...." c041 .byte $30,$f8,$a5,$00,$68,$80,$dd,$24 ; "0...h..$" c049 .byte $93,$70,$0a,$ad,$10,$a8,$29,$01 ; ".p....)." c051 .byte $f0,$0a,$4c,$6b,$cb,$ad,$14,$b8 ; "..Lk...." c059 .byte $30,$f8,$a5,$00,$20,$0b,$c0,$60 ; "0... ..`" c061 .byte $48,$a5,$1e,$38,$e9,$01,$f0,$09 ; "H..8...." c069 .byte $48,$68,$48,$68,$20,$7a,$c0,$80 ; "HhHh z.." c071 .byte $f2,$20,$7a,$c0,$68,$29,$7f,$80 ; ". z.h).." c079 .byte $ab,$48,$a9,$27,$ea,$ea,$48,$24 ; ".H.'..H$" c081 .byte $93,$70,$0b,$ea,$ad,$10,$a8,$29 ; ".p.....)" c089 .byte $01,$f0,$0a,$4c,$6b,$cb,$ad,$14 ; "...Lk..." c091 .byte $b8,$30,$f8,$a5,$00,$a9,$0c,$20 ; ".0..... " c099 .byte $00,$c0,$68,$38,$e9,$01,$d0,$de ; "..h8...." c0a1 .byte $68,$60,$a2,$c0,$8e,$10,$a0,$a6 ; "h`......" c0a9 .byte $1d,$8a,$f0,$03,$20,$21,$c0,$b1 ; ".... !.." c0b1 .byte $0d,$8d,$13,$a0,$ad,$17,$a0,$91 ; "........" c0b9 .byte $0b,$ad,$16,$a0,$c8,$91,$0b,$b1 ; "........" c0c1 .byte $0d,$8d,$12,$a0,$c8,$d0,$e2,$24 ; ".......$" c0c9 .byte $93,$70,$09,$ad,$10,$a8,$29,$01 ; ".p....)." c0d1 .byte $f0,$07,$80,$12,$ad,$14,$b8,$30 ; ".......0" c0d9 .byte $0d,$e6,$0e,$e6,$0c,$a5,$0c,$c5 ; "........" c0e1 .byte $1c,$d0,$c6,$4c,$81,$c4,$4c,$6b ; "...L..Lk" c0e9 .byte $cb,$ad,$16,$a0,$a9,$04,$20,$00 ; "...... ." c0f1 .byte $c0,$24,$93,$70,$0a,$ad,$10,$a8 ; ".$.p...." c0f9 .byte $29,$01,$f0,$08,$4c,$6b,$cb,$ad ; ")...Lk.." c101 .byte $14,$b8,$30,$f8,$ad,$17,$a0,$45 ; "..0....E" c109 .byte $a8,$c5,$a6,$90,$dc,$d0,$0e,$ad ; "........" c111 .byte $16,$a0,$45,$a7,$c5,$a5,$b0,$05 ; "..E....." c119 .byte $20,$0b,$c0,$80,$d4,$ca,$f0,$12 ; " ......." c121 .byte $a5,$11,$85,$a5,$a5,$12,$85,$a6 ; "........" c129 .byte $a5,$0f,$85,$a7,$a5,$10,$85,$a8 ; "........" c131 .byte $80,$b7,$a2,$a1,$8e,$10,$a0,$a6 ; "........" c139 .byte $cb,$d0,$04,$a4,$ca,$f0,$33,$a4 ; "......3." c141 .byte $ca,$f0,$01,$e8,$24,$93,$70,$0a ; "....$.p." c149 .byte $ad,$10,$a8,$29,$01,$f0,$0a,$4c ; "...)...L" c151 .byte $6b,$cb,$ad,$14,$b8,$30,$f8,$a5 ; "k....0.." c159 .byte $00,$a5,$1d,$f0,$07,$20,$21,$c0 ; "..... !." c161 .byte $68,$48,$a5,$00,$88,$d0,$05,$ca ; "hH......" c169 .byte $d0,$04,$80,$06,$ea,$ea,$68,$48 ; "......hH" c171 .byte $80,$d2,$ad,$16,$a0,$a2,$a3,$8e ; "........" c179 .byte $10,$a0,$a9,$02,$20,$00,$c0,$a0 ; ".... ..." c181 .byte $00,$a6,$0c,$a5,$1d,$f0,$34,$ea ; "......4." c189 .byte $ea,$ad,$17,$a0,$91,$0b,$c8,$ad ; "........" c191 .byte $16,$a0,$91,$0b,$24,$93,$70,$0a ; "....$.p." c199 .byte $ad,$10,$a8,$29,$01,$f0,$0a,$4c ; "...)...L" c1a1 .byte $6b,$cb,$ad,$14,$b8,$30,$f8,$a5 ; "k....0.." c1a9 .byte $00,$a5,$1d,$20,$21,$c0,$c8,$d0 ; "... !..." c1b1 .byte $d6,$e8,$86,$0c,$e4,$1c,$d0,$d1 ; "........" c1b9 .byte $4c,$81,$c4,$24,$93,$70,$2f,$80 ; "L..$.p/." c1c1 .byte $08,$ea,$ad,$10,$a8,$29,$01,$d0 ; ".....).." c1c9 .byte $1a,$ad,$17,$a0,$ae,$16,$a0,$91 ; "........" c1d1 .byte $0b,$c8,$8a,$91,$0b,$c8,$d0,$e9 ; "........" c1d9 .byte $e6,$0c,$a6,$0c,$e4,$1c,$d0,$e9 ; "........" c1e1 .byte $4c,$81,$c4,$4c,$6b,$cb,$ea,$a5 ; "L..Lk..." c1e9 .byte $00,$ad,$14,$b8,$30,$f5,$ad,$17 ; "....0..." c1f1 .byte $a0,$ae,$16,$a0,$91,$0b,$c8,$8a ; "........" c1f9 .byte $91,$0b,$c8,$d0,$e9,$e6,$0c,$a6 ; "........" c201 .byte $0c,$e4,$1c,$d0,$e9,$4c,$81,$c4 ; ".....L.." c209 .byte $a2,$0c,$8e,$10,$a0,$a6,$d8,$d0 ; "........" c211 .byte $07,$a5,$d9,$d0,$03,$4c,$a7,$c2 ; ".....L.." c219 .byte $a5,$1d,$f0,$50,$20,$21,$c0,$ad ; "...P !.." c221 .byte $17,$a0,$91,$0b,$c8,$45,$14,$c5 ; ".....E.." c229 .byte $16,$90,$1c,$d0,$24,$ad,$16,$a0 ; "....$..." c231 .byte $91,$0b,$45,$13,$c5,$15,$b0,$1e ; "..E....." c239 .byte $c8,$d0,$02,$e6,$0c,$ca,$d0,$dc ; "........" c241 .byte $c6,$d9,$d0,$d8,$4c,$a7,$c2,$ad ; "....L..." c249 .byte $16,$a0,$91,$0b,$ea,$ea,$ea,$80 ; "........" c251 .byte $e7,$ad,$16,$a0,$91,$0b,$c6,$17 ; "........" c259 .byte $f0,$2f,$a5,$11,$85,$15,$a5,$12 ; "./......" c261 .byte $85,$16,$a5,$0f,$85,$13,$a5,$10 ; "........" c269 .byte $85,$14,$80,$cc,$a5,$00,$ad,$17 ; "........" c271 .byte $a0,$ae,$16,$a0,$91,$0b,$c8,$8a ; "........" c279 .byte $91,$0b,$c8,$d0,$02,$e6,$0c,$c6 ; "........" c281 .byte $d8,$d0,$e9,$c6,$d9,$d0,$e7,$80 ; "........" c289 .byte $1d,$a6,$0c,$c8,$d0,$0b,$e8,$86 ; "........" c291 .byte $0c,$c5,$1c,$d0,$04,$a6,$1b,$86 ; "........" c299 .byte $0c,$a5,$1d,$d0,$03,$4c,$bc,$c1 ; ".....L.." c2a1 .byte $20,$21,$c0,$4c,$8a,$c1,$a2,$8c ; " !.L...." c2a9 .byte $8e,$10,$a0,$a6,$1d,$d0,$5e,$a5 ; "......^." c2b1 .byte $a6,$09,$f0,$85,$a6,$a5,$bb,$29 ; ".......)" c2b9 .byte $0c,$d0,$0e,$a5,$a7,$f0,$0a,$45 ; ".......E" c2c1 .byte $a5,$85,$a5,$a5,$a8,$45,$a6,$85 ; ".....E.." c2c9 .byte $a6,$4c,$d2,$c3,$ad,$16,$a0,$91 ; ".L......" c2d1 .byte $0b,$ea,$ea,$ea,$80,$1f,$8a,$f0 ; "........" c2d9 .byte $5e,$20,$21,$c0,$ad,$17,$a0,$91 ; "^ !....." c2e1 .byte $0b,$45,$a8,$c8,$c5,$a6,$90,$e4 ; ".E......" c2e9 .byte $d0,$2f,$ad,$16,$a0,$91,$0b,$45 ; "./.....E" c2f1 .byte $a7,$c5,$a5,$b0,$29,$c8,$d0,$de ; "....)..." c2f9 .byte $24,$93,$70,$0a,$ad,$10,$a8,$29 ; "$.p....)" c301 .byte $01,$f0,$08,$4c,$6b,$cb,$ad,$14 ; "...Lk..." c309 .byte $b8,$30,$f8,$e6,$0c,$a5,$0c,$c5 ; ".0......" c311 .byte $1c,$d0,$c3,$a5,$1b,$85,$0c,$80 ; "........" c319 .byte $bd,$ad,$16,$a0,$91,$0b,$c6,$17 ; "........" c321 .byte $d0,$03,$4c,$00,$c4,$a5,$11,$85 ; "..L....." c329 .byte $a5,$a5,$12,$85,$a6,$a5,$0f,$85 ; "........" c331 .byte $a7,$a5,$10,$85,$a8,$80,$be,$a5 ; "........" c339 .byte $bb,$29,$0c,$d0,$16,$a5,$a7,$f0 ; ".)......" c341 .byte $56,$45,$a5,$85,$a5,$a5,$a8,$45 ; "VE.....E" c349 .byte $a6,$85,$a6,$80,$25,$a5,$bb,$29 ; "....%..)" c351 .byte $0c,$f0,$1b,$ad,$17,$a0,$ae,$16 ; "........" c359 .byte $a0,$91,$0b,$c8,$45,$a8,$c5,$a6 ; "....E..." c361 .byte $b0,$42,$8a,$91,$0b,$a5,$00,$c8 ; ".B......" c369 .byte $d0,$e9,$a2,$00,$80,$4c,$a5,$a7 ; ".....L.." c371 .byte $f0,$25,$ad,$17,$a0,$ae,$16,$a0 ; ".%......" c379 .byte $91,$0b,$c8,$c5,$a6,$f0,$0c,$90 ; "........" c381 .byte $5d,$ea,$ea,$8a,$91,$0b,$c8,$d0 ; "]......." c389 .byte $e9,$80,$2f,$e4,$a5,$90,$4f,$8a ; "../...O." c391 .byte $91,$0b,$c8,$d0,$dd,$80,$23,$ad ; "......#." c399 .byte $17,$a0,$ae,$16,$a0,$91,$0b,$c8 ; "........" c3a1 .byte $c5,$a6,$f0,$0c,$b0,$38,$ea,$ea ; ".....8.." c3a9 .byte $8a,$91,$0b,$c8,$d0,$e9,$80,$0a ; "........" c3b1 .byte $e4,$a5,$b0,$2a,$8a,$91,$0b,$c8 ; "...*...." c3b9 .byte $d0,$dd,$24,$93,$70,$0a,$ad,$10 ; "..$.p..." c3c1 .byte $a8,$29,$01,$f0,$0a,$4c,$6b,$cb ; ".)...Lk." c3c9 .byte $ad,$12,$b8,$29,$20,$f0,$f6,$e6 ; "...) ..." c3d1 .byte $0c,$a5,$0c,$c5,$1c,$d0,$04,$a5 ; "........" c3d9 .byte $1b,$85,$0c,$4c,$4e,$c3,$8a,$91 ; "...LN..." c3e1 .byte $0b,$a2,$00,$4c,$1f,$c3,$ff,$ff ; "...L...." c3e9 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" c3f1 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" c3f9 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$a9 ; "........" c401 .byte $a3,$8d,$10,$a0,$a6,$0c,$c8,$d0 ; "........" c409 .byte $0b,$e8,$86,$0c,$e4,$1c,$d0,$04 ; "........" c411 .byte $a6,$1b,$86,$0c,$a5,$1f,$05,$20 ; "....... " c419 .byte $f0,$66,$a5,$1d,$f0,$3d,$20,$21 ; ".f...= !" c421 .byte $c0,$ad,$17,$a0,$91,$0b,$c8,$ad ; "........" c429 .byte $16,$a0,$91,$0b,$c8,$f0,$1f,$24 ; ".......$" c431 .byte $93,$70,$0a,$ad,$10,$a8,$29,$01 ; ".p....)." c439 .byte $f0,$0a,$4c,$6b,$cb,$ad,$14,$b8 ; "..Lk...." c441 .byte $30,$f8,$a5,$00,$c6,$1f,$d0,$d6 ; "0......." c449 .byte $c6,$20,$d0,$d2,$80,$32,$e8,$86 ; ". ...2.." c451 .byte $0c,$e4,$1c,$d0,$ef,$a6,$1b,$86 ; "........" c459 .byte $0c,$80,$e9,$ad,$17,$a0,$ae,$16 ; "........" c461 .byte $a0,$91,$0b,$c8,$8a,$91,$0b,$c8 ; "........" c469 .byte $d0,$0c,$e6,$0c,$a6,$0c,$e4,$1c ; "........" c471 .byte $d0,$06,$a6,$1b,$86,$0c,$a5,$00 ; "........" c479 .byte $c6,$1f,$d0,$df,$c6,$20,$d0,$db ; "..... .." c481 .byte $20,$b4,$e5,$84,$18,$a6,$0c,$e4 ; " ......." c489 .byte $1c,$d0,$04,$a6,$1b,$86,$0c,$86 ; "........" c491 .byte $19,$24,$93,$70,$36,$a9,$00,$20 ; ".$.p6.. " c499 .byte $92,$e6,$20,$92,$e6,$20,$92,$e6 ; ".. .. .." c4a1 .byte $a5,$ba,$20,$92,$e6,$a9,$0f,$31 ; ".. ....1" c4a9 .byte $0b,$20,$92,$e6,$c8,$b1,$0b,$20 ; ". ..... " c4b1 .byte $92,$e6,$c8,$d0,$0b,$e8,$86,$0c ; "........" c4b9 .byte $e4,$1c,$d0,$04,$a6,$1b,$86,$0c ; "........" c4c1 .byte $e4,$19,$d0,$e1,$c4,$18,$d0,$dd ; "........" c4c9 .byte $4c,$a8,$e7,$a5,$a2,$29,$7f,$85 ; "L....).." c4d1 .byte $a2,$8d,$10,$a0,$ad,$15,$b8,$29 ; ".......)" c4d9 .byte $10,$f0,$f9,$20,$fd,$e8,$90,$f4 ; "... ...." c4e1 .byte $a5,$a4,$c9,$01,$f0,$06,$20,$e0 ; "...... ." c4e9 .byte $eb,$4c,$a8,$e7,$a9,$00,$38,$e5 ; ".L....8." c4f1 .byte $18,$85,$8d,$a5,$1c,$e5,$19,$85 ; "........" c4f9 .byte $8e,$d0,$04,$a5,$8d,$f0,$0b,$a5 ; "........" c501 .byte $18,$85,$8b,$a5,$19,$85,$8c,$20 ; "....... " c509 .byte $38,$eb,$a5,$18,$38,$e5,$1a,$85 ; "8...8..." c511 .byte $8d,$a5,$19,$e5,$1b,$85,$8e,$d0 ; "........" c519 .byte $04,$a5,$8d,$f0,$0b,$a5,$1b,$85 ; "........" c521 .byte $8c,$a5,$1a,$85,$8b,$20,$38,$eb ; "..... 8." c529 .byte $20,$1a,$ea,$4c,$a8,$e7,$20,$7a ; " ..L.. z" c531 .byte $e7,$20,$b4,$e5,$a5,$9f,$48,$a9 ; ". ....H." c539 .byte $14,$85,$9f,$20,$8d,$e3,$a9,$c9 ; "... ...." c541 .byte $8d,$10,$a0,$85,$a2,$a5,$b9,$0a ; "........" c549 .byte $aa,$a5,$c1,$d0,$0c,$bd,$cb,$ed ; "........" c551 .byte $85,$20,$bd,$cc,$ed,$85,$21,$80 ; ". ....!." c559 .byte $0a,$bd,$dd,$ed,$85,$20,$bd,$de ; "..... .." c561 .byte $ed,$85,$21,$a9,$01,$85,$14,$20 ; "..!.... " c569 .byte $f6,$e5,$a2,$01,$b5,$a7,$95,$25 ; ".......%" c571 .byte $b5,$a5,$95,$27,$ca,$10,$f5,$a5 ; "...'...." c579 .byte $bb,$29,$02,$f0,$05,$20,$c7,$e5 ; ".)... .." c581 .byte $e6,$14,$a2,$01,$b5,$a7,$95,$29 ; ".......)" c589 .byte $b5,$a5,$95,$2b,$ca,$10,$f5,$a9 ; "...+...." c591 .byte $ff,$85,$1b,$64,$24,$a2,$0c,$a0 ; "...d$..." c599 .byte $03,$b5,$a9,$f0,$14,$e6,$1b,$d0 ; "........" c5a1 .byte $04,$84,$1e,$85,$22,$84,$1f,$85 ; "...."..." c5a9 .byte $23,$b5,$ac,$29,$10,$05,$24,$85 ; "#..)..$." c5b1 .byte $24,$ca,$ca,$ca,$ca,$88,$10,$e1 ; "$......." c5b9 .byte $64,$1d,$a5,$bc,$c5,$1e,$f0,$0a ; "d......." c5c1 .byte $a6,$1e,$a5,$1f,$85,$1e,$86,$1f ; "........" c5c9 .byte $e6,$1d,$a6,$1e,$b5,$94,$85,$1e ; "........" c5d1 .byte $a6,$1f,$b5,$94,$85,$1f,$68,$d0 ; "......h." c5d9 .byte $07,$a5,$24,$f0,$03,$20,$16,$ca ; "..$.. .." c5e1 .byte $64,$15,$a5,$22,$85,$16,$64,$17 ; "d.."..d." c5e9 .byte $a5,$23,$85,$18,$a5,$ba,$85,$1b ; ".#......" c5f1 .byte $a0,$00,$a5,$c1,$d0,$6c,$a2,$01 ; ".....l.." c5f9 .byte $b5,$ca,$85,$1a,$a5,$ca,$85,$19 ; "........" c601 .byte $f0,$02,$e6,$1a,$a5,$bb,$30,$03 ; "......0." c609 .byte $4c,$64,$c8,$29,$04,$d0,$03,$4c ; "Ld.)...L" c611 .byte $b7,$c7,$ad,$d0,$b2,$09,$20,$8d ; "...... ." c619 .byte $d0,$b2,$a9,$ff,$8d,$10,$b2,$8d ; "........" c621 .byte $50,$b2,$4c,$55,$c7,$5a,$a8,$a9 ; "P.LU.Z.." c629 .byte $09,$20,$00,$c0,$ea,$a5,$00,$a9 ; ". ......" c631 .byte $09,$20,$00,$c0,$ea,$ea,$24,$93 ; ". ....$." c639 .byte $50,$0a,$a5,$00,$ad,$14,$b8,$10 ; "P......." c641 .byte $0a,$4c,$6b,$cb,$ad,$10,$a8,$29 ; ".Lk....)" c649 .byte $01,$d0,$f6,$88,$d0,$e1,$7a,$60 ; "......z`" c651 .byte $c9,$ff,$f0,$03,$20,$26,$c6,$a9 ; ".... &.." c659 .byte $09,$20,$00,$c0,$ea,$a5,$00,$a5 ; ". ......" c661 .byte $00,$60,$64,$19,$a5,$bf,$85,$1a ; ".`d....." c669 .byte $a0,$00,$a5,$0b,$8d,$13,$a0,$a5 ; "........" c671 .byte $0c,$8d,$12,$a0,$a5,$1f,$8d,$0c ; "........" c679 .byte $a0,$ad,$16,$a0,$a9,$05,$20,$00 ; "...... ." c681 .byte $c0,$a5,$b9,$c9,$01,$f0,$03,$4c ; ".......L" c689 .byte $e7,$c6,$a6,$1b,$a5,$1e,$8d,$0c ; "........" c691 .byte $a0,$a5,$00,$ea,$ad,$17,$a0,$91 ; "........" c699 .byte $15,$b1,$19,$8d,$13,$a0,$ad,$16 ; "........" c6a1 .byte $a0,$c8,$91,$15,$b1,$19,$8d,$12 ; "........" c6a9 .byte $a0,$a5,$1f,$8d,$0c,$a0,$a5,$00 ; "........" c6b1 .byte $88,$ea,$ad,$17,$a0,$91,$17,$ad ; "........" c6b9 .byte $16,$a0,$c8,$91,$17,$48,$68,$c8 ; ".....Hh." c6c1 .byte $d0,$ca,$a5,$1e,$8d,$0c,$a0,$24 ; ".......$" c6c9 .byte $93,$70,$0a,$ad,$10,$a8,$29,$01 ; ".p....)." c6d1 .byte $f0,$08,$4c,$6b,$cb,$ad,$14,$b8 ; "..Lk...." c6d9 .byte $30,$f8,$e6,$18,$e6,$1a,$e6,$16 ; "0......." c6e1 .byte $ca,$d0,$b1,$4c,$28,$ca,$a5,$1e ; "...L(..." c6e9 .byte $8d,$0c,$a0,$a9,$05,$20,$00,$c0 ; "..... .." c6f1 .byte $20,$0b,$c0,$a5,$00,$ad,$17,$a0 ; " ......." c6f9 .byte $91,$15,$b1,$19,$8d,$13,$a0,$c8 ; "........" c701 .byte $ad,$16,$a0,$91,$15,$b1,$19,$8d ; "........" c709 .byte $12,$a0,$a5,$1f,$8d,$0c,$a0,$a5 ; "........" c711 .byte $20,$f0,$03,$20,$26,$c6,$a9,$05 ; " .. &..." c719 .byte $20,$00,$c0,$ad,$17,$a0,$88,$91 ; " ......." c721 .byte $17,$c8,$ad,$16,$a0,$91,$17,$c8 ; "........" c729 .byte $d0,$bc,$a5,$1e,$8d,$0c,$a0,$24 ; ".......$" c731 .byte $93,$50,$0a,$a5,$00,$ad,$14,$b8 ; ".P......" c739 .byte $10,$0a,$4c,$6b,$cb,$ad,$10,$a8 ; "..Lk...." c741 .byte $29,$01,$d0,$f6,$20,$0a,$c0,$e6 ; ")... ..." c749 .byte $18,$e6,$1a,$e6,$16,$c6,$1b,$d0 ; "........" c751 .byte $9f,$4c,$28,$ca,$a5,$1b,$0a,$85 ; ".L(....." c759 .byte $1c,$a0,$00,$a5,$13,$f0,$11,$a5 ; "........" c761 .byte $20,$f0,$03,$20,$51,$c6,$c8,$d0 ; " .. Q..." c769 .byte $07,$c6,$1c,$d0,$03,$4c,$64,$c8 ; ".....Ld." c771 .byte $24,$93,$50,$08,$ad,$14,$b8,$10 ; "$.P....." c779 .byte $0a,$4c,$6b,$cb,$ad,$10,$a8,$29 ; ".Lk....)" c781 .byte $01,$d0,$f6,$ad,$10,$b0,$aa,$ad ; "........" c789 .byte $10,$b2,$2d,$50,$b2,$c9,$ff,$f0 ; "..-P...." c791 .byte $08,$a9,$ff,$8d,$10,$b2,$8d,$50 ; ".......P" c799 .byte $b2,$8a,$45,$2a,$29,$40,$f0,$bb ; "..E*)@.." c7a1 .byte $a5,$a2,$49,$08,$85,$a2,$8d,$10 ; "..I....." c7a9 .byte $a0,$c6,$14,$f0,$06,$a5,$26,$85 ; "......&." c7b1 .byte $2a,$80,$a8,$4c,$2b,$c8,$a5,$1b ; "*..L+..." c7b9 .byte $0a,$85,$1c,$a0,$00,$a5,$1e,$8d ; "........" c7c1 .byte $0c,$a0,$ad,$16,$a0,$a5,$13,$f0 ; "........" c7c9 .byte $11,$a5,$20,$f0,$03,$20,$51,$c6 ; ".. .. Q." c7d1 .byte $c8,$d0,$07,$c6,$1c,$d0,$03,$4c ; ".......L" c7d9 .byte $64,$c8,$20,$06,$c0,$24,$93,$50 ; "d. ..$.P" c7e1 .byte $08,$ad,$14,$b8,$10,$0a,$4c,$6b ; "......Lk" c7e9 .byte $cb,$ad,$10,$a8,$29,$01,$d0,$f6 ; "....)..." c7f1 .byte $ad,$17,$a0,$45,$2a,$c5,$2c,$90 ; "...E*.,." c7f9 .byte $c9,$d0,$10,$ad,$16,$a0,$45,$29 ; "......E)" c801 .byte $c5,$2b,$b0,$07,$a9,$03,$20,$00 ; ".+.... ." c809 .byte $c0,$80,$ba,$a5,$a2,$49,$08,$85 ; ".....I.." c811 .byte $a2,$8d,$10,$a0,$c6,$14,$f0,$12 ; "........" c819 .byte $a5,$27,$85,$2b,$a5,$28,$85,$2c ; ".'.+.(.," c821 .byte $a5,$25,$85,$29,$a5,$26,$85,$2a ; ".%.).&.*" c829 .byte $80,$98,$a5,$19,$05,$1a,$f0,$33 ; ".......3" c831 .byte $a9,$a1,$8d,$10,$a0,$80,$02,$48 ; ".......H" c839 .byte $68,$24,$93,$50,$0a,$a5,$00,$ad ; "h$.P...." c841 .byte $14,$b8,$10,$0a,$4c,$6b,$cb,$ad ; "....Lk.." c849 .byte $10,$a8,$29,$01,$d0,$f6,$ea,$a9 ; "..)....." c851 .byte $07,$20,$00,$c0,$a5,$20,$f0,$03 ; ". ... .." c859 .byte $20,$51,$c6,$c6,$19,$d0,$d8,$c6 ; " Q......" c861 .byte $1a,$d0,$d6,$a5,$1f,$8d,$0c,$a0 ; "........" c869 .byte $ad,$16,$a0,$a0,$00,$a6,$1b,$a9 ; "........" c871 .byte $04,$20,$00,$c0,$a5,$1e,$8d,$0c ; ". ......" c879 .byte $a0,$20,$09,$c0,$ad,$17,$a0,$91 ; ". ......" c881 .byte $15,$c8,$ad,$16,$a0,$91,$15,$a5 ; "........" c889 .byte $20,$f0,$03,$20,$51,$c6,$68,$48 ; " .. Q.hH" c891 .byte $a5,$00,$a5,$00,$a5,$1f,$8d,$0c ; "........" c899 .byte $a0,$ad,$17,$a0,$88,$91,$17,$c8 ; "........" c8a1 .byte $ad,$16,$a0,$91,$17,$c8,$d0,$cc ; "........" c8a9 .byte $a5,$1e,$8d,$0c,$a0,$24,$93,$70 ; ".....$.p" c8b1 .byte $0a,$ad,$10,$a8,$29,$01,$f0,$0a ; "....)..." c8b9 .byte $4c,$6b,$cb,$ad,$14,$b8,$30,$f8 ; "Lk....0." c8c1 .byte $a5,$00,$e6,$18,$e6,$16,$ca,$d0 ; "........" c8c9 .byte $b3,$4c,$28,$ca,$ad,$12,$b8,$09 ; ".L(....." c8d1 .byte $02,$8d,$12,$b8,$60,$ad,$12,$b8 ; "....`..." c8d9 .byte $29,$fd,$8d,$12,$b8,$60,$ff,$ff ; ")....`.." c8e1 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" c8e9 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" c8f1 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" c8f9 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$48 ; ".......H" c901 .byte $5a,$da,$a9,$01,$8d,$13,$b8,$ad ; "Z......." c909 .byte $12,$b8,$09,$02,$8d,$12,$b8,$a9 ; "........" c911 .byte $09,$8d,$11,$b8,$8d,$15,$b8,$a4 ; "........" c919 .byte $8e,$c8,$a6,$8d,$f0,$2c,$ea,$ea ; ".....,.." c921 .byte $a5,$8b,$f0,$04,$3a,$d0,$fd,$ea ; "....:..." c929 .byte $ad,$17,$a0,$85,$00,$ad,$16,$a0 ; "........" c931 .byte $46,$00,$6a,$46,$00,$6a,$46,$00 ; "F.jF.jF." c939 .byte $6a,$46,$00,$6a,$2c,$15,$b8,$70 ; "jF.j,..p" c941 .byte $03,$20,$bd,$eb,$8d,$1c,$b8,$ca ; ". ......" c949 .byte $d0,$d4,$88,$d0,$d3,$a5,$8c,$f0 ; "........" c951 .byte $04,$c6,$8c,$80,$c9,$a9,$08,$8d ; "........" c959 .byte $11,$b8,$ad,$12,$b8,$29,$fd,$8d ; ".....).." c961 .byte $12,$b8,$20,$a3,$ea,$fa,$7a,$68 ; ".. ...zh" c969 .byte $60,$48,$5a,$da,$a9,$01,$8d,$13 ; "`HZ....." c971 .byte $b8,$ad,$12,$b8,$09,$02,$8d,$12 ; "........" c979 .byte $b8,$a9,$09,$8d,$11,$b8,$8d,$15 ; "........" c981 .byte $b8,$a4,$8e,$c8,$a6,$8d,$f0,$29 ; ".......)" c989 .byte $ea,$ea,$a5,$8b,$f0,$04,$3a,$d0 ; "......:." c991 .byte $fd,$ea,$ad,$17,$a0,$2c,$15,$b8 ; ".....,.." c999 .byte $70,$03,$20,$bd,$eb,$8d,$1c,$b8 ; "p. ....." c9a1 .byte $ad,$16,$a0,$2c,$15,$b8,$70,$03 ; "...,..p." c9a9 .byte $20,$bd,$eb,$8d,$1c,$b8,$ca,$d0 ; " ......." c9b1 .byte $d7,$88,$d0,$d6,$a5,$8c,$f0,$04 ; "........" c9b9 .byte $c6,$8c,$80,$cc,$a9,$08,$8d,$11 ; "........" c9c1 .byte $b8,$ad,$12,$b8,$29,$fd,$8d,$12 ; "....)..." c9c9 .byte $b8,$20,$a3,$ea,$fa,$7a,$68,$60 ; ". ...zh`" c9d1 20 06 ca Lc9d1: JSR Sca06 c9d4 a5 02 LDA Z02 c9d6 20 08 ca JSR Sca08 c9d9 a9 89 LDA #$89 ; 137 . c9db 20 08 ca JSR Sca08 c9de 20 06 ca JSR Sca06 c9e1 a4 01 LDY Z01 c9e3 20 ed c9 JSR Sc9ed c9e6 a4 00 LDY Z00 c9e8 20 ed c9 JSR Sc9ed c9eb 80 e4 BRA Lc9d1 c9ed 98 Sc9ed: TYA c9ee 4a LSR c9ef 4a LSR c9f0 4a LSR c9f1 4a LSR c9f2 aa TAX c9f3 bd 46 ee LDA Dee46,X c9f6 20 08 ca JSR Sca08 c9f9 20 06 ca JSR Sca06 c9fc 98 TYA c9fd 29 0f AND #$0f ; 15 . c9ff aa TAX ca00 bd 46 ee LDA Dee46,X ca03 20 08 ca JSR Sca08 ; called via JSR ; it is a common (almost universal) idiom to call ca08 then ca06 ; Da010 must be a device register. ca06 a9 ff Sca06: LDA #$ff ; 1111 1111 ; called via JSR (caller must set A) ca08 8d 10 a0 Sca08: STA Da010 ; 7seg ; here is a loop to call the Sc00f subroutine 128 times ca0b a9 80 Sca0b: LDA #$80 ; 128 . ca0d 48 Lca0d: PHA ca0e 20 0f c0 JSR Sc00f ca11 68 PLA ca12 3a DEC ca13 d0 f8 BNE Lca0d ca15 60 RTS ca16 .byte $a0,$0a,$ad,$10,$a8,$29,$01,$d0 ; ".....).." ca1e .byte $08,$a9,$ef,$20,$0f,$c0,$88,$d0 ; "... ...." ca26 .byte $f1,$60,$20,$b4,$e5,$24,$93,$70 ; ".` ..$.p" ca2e .byte $10,$a9,$00,$20,$92,$e6,$20,$92 ; "... .. ." ca36 .byte $e6,$20,$92,$e6,$a9,$ff,$20,$92 ; ". .... ." ca3e .byte $e6,$a2,$00,$a4,$22,$c4,$23,$f0 ; "....".#." ca46 .byte $14,$a2,$03,$64,$18,$a5,$1d,$f0 ; "...d...." ca4e .byte $0c,$86,$18,$a2,$00,$a4,$22,$a5 ; "......"." ca56 .byte $23,$85,$22,$84,$23,$a5,$22,$20 ; "#.".#." " ca5e .byte $71,$ca,$a5,$23,$c5,$22,$f0,$05 ; "q..#.".." ca66 .byte $a6,$18,$20,$71,$ca,$20,$d0,$e3 ; ".. q. .." ca6e .byte $4c,$a8,$e7,$64,$26,$64,$27,$64 ; "L..d&d'd" ca76 .byte $25,$64,$15,$85,$16,$a5,$ba,$85 ; "%d......" ca7e .byte $1b,$a0,$00,$24,$93,$50,$03,$4c ; "...$.P.L" ca86 .byte $37,$cb,$b1,$15,$c8,$29,$0f,$85 ; "7....).." ca8e .byte $29,$b5,$0f,$f0,$0d,$b1,$15,$38 ; ")......8" ca96 .byte $f5,$0d,$85,$28,$a5,$29,$f5,$0e ; "...(.).." ca9e .byte $80,$0b,$b5,$0d,$38,$f1,$15,$85 ; "....8..." caa6 .byte $28,$b5,$0e,$e5,$29,$30,$0c,$c9 ; "(...)0.." caae .byte $08,$30,$10,$a9,$ff,$85,$28,$a9 ; ".0....(." cab6 .byte $07,$80,$08,$c9,$f8,$10,$04,$64 ; ".......d" cabe .byte $28,$a9,$f8,$24,$93,$50,$0a,$88 ; "(..$.P.." cac6 .byte $91,$15,$c8,$a5,$28,$91,$15,$80 ; "....(..." cace .byte $52,$85,$29,$38,$a5,$28,$e5,$26 ; "R.)8.(.&" cad6 .byte $85,$24,$a5,$29,$e5,$27,$f0,$0a ; ".$.).'.." cade .byte $c9,$ff,$d0,$22,$a5,$24,$10,$1e ; "...".$.." cae6 .byte $80,$04,$a5,$24,$30,$18,$a5,$24 ; "...$0..$" caee .byte $c9,$80,$f0,$12,$a5,$25,$d0,$07 ; ".....%.." caf6 .byte $a9,$80,$85,$25,$20,$92,$e6,$a5 ; "...% ..." cafe .byte $24,$20,$92,$e6,$80,$15,$a5,$25 ; "$ .....%" cb06 .byte $f0,$07,$a9,$80,$20,$92,$e6,$64 ; ".... ..d" cb0e .byte $25,$a5,$29,$20,$92,$e6,$a5,$28 ; "%.) ...(" cb16 .byte $20,$92,$e6,$a5,$28,$85,$26,$a5 ; " ...(.&." cb1e .byte $29,$85,$27,$c8,$d0,$44,$a5,$a2 ; ").'..D.." cb26 .byte $49,$60,$85,$a2,$8d,$10,$a0,$e6 ; "I`......" cb2e .byte $16,$c6,$1b,$d0,$35,$24,$93,$50 ; "....5$.P" cb36 .byte $30,$a5,$a2,$29,$7f,$85,$a2,$8d ; "0..)...." cb3e .byte $10,$a0,$ad,$15,$b8,$29,$10,$f0 ; ".....).." cb46 .byte $f9,$20,$fd,$e8,$90,$f4,$a5,$a4 ; ". ......" cb4e .byte $c9,$01,$f0,$03,$4c,$e0,$eb,$64 ; "....L..d" cb56 .byte $8d,$a5,$ba,$85,$8e,$64,$8b,$a5 ; ".....d.." cb5e .byte $16,$85,$8c,$20,$38,$eb,$20,$1a ; "... 8. ." cb66 .byte $ea,$60,$4c,$88,$ca,$20,$b4,$e5 ; ".`L.. .." cb6e .byte $24,$93,$50,$05,$20,$a4,$e8,$80 ; "$.P. ..." cb76 .byte $11,$ad,$30,$a8,$a9,$00,$20,$92 ; "..0... ." cb7e .byte $e6,$20,$92,$e6,$20,$92,$e6,$20 ; ". .. .. " cb86 .byte $92,$e6,$20,$d0,$e3,$4c,$a5,$e7 ; ".. ..L.." cb8e .byte $a5,$c1,$f0,$40,$a9,$fd,$85,$17 ; "...@...." cb96 .byte $a9,$ff,$85,$19,$18,$a5,$bf,$65 ; ".......e" cb9e .byte $ba,$38,$e9,$01,$85,$1a,$85,$18 ; ".8......" cba6 .byte $b2,$17,$92,$19,$a5,$19,$d0,$02 ; "........" cbae .byte $c6,$1a,$c6,$19,$a5,$1a,$c5,$bf ; "........" cbb6 .byte $30,$0a,$a5,$17,$d0,$02,$c6,$18 ; "0......." cbbe .byte $c6,$17,$80,$e4,$a5,$bf,$85,$1a ; "........" cbc6 .byte $64,$19,$a5,$0b,$92,$19,$a0,$01 ; "d......." cbce .byte $a5,$0c,$91,$19,$20,$7a,$e7,$4c ; ".... z.L" cbd6 .byte $a8,$e7,$a5,$05,$85,$13,$a5,$01 ; "........" cbde .byte $85,$10,$a5,$02,$29,$0f,$85,$11 ; "....)..." cbe6 .byte $a5,$02,$29,$80,$85,$12,$a5,$03 ; "..)....." cbee .byte $85,$0d,$a5,$04,$29,$0f,$85,$0e ; "....)..." cbf6 .byte $a5,$04,$29,$80,$85,$0f,$a5,$c1 ; "..)....." cbfe .byte $f0,$30,$64,$19,$a9,$02,$85,$17 ; ".0d....." cc06 .byte $a5,$bf,$85,$1a,$85,$18,$18,$65 ; ".......e" cc0e .byte $ba,$aa,$b2,$19,$85,$0b,$a0,$01 ; "........" cc16 .byte $b1,$19,$85,$0c,$b2,$17,$92,$19 ; "........" cc1e .byte $e6,$17,$d0,$06,$e6,$18,$e4,$18 ; "........" cc26 .byte $f0,$08,$e6,$19,$d0,$ee,$e6,$1a ; "........" cc2e .byte $80,$ea,$20,$7a,$e7,$4c,$a8,$e7 ; ".. z.L.." cc36 .byte $20,$7a,$e7,$4c,$f1,$e6,$a0,$00 ; " z.L...." cc3e .byte $80,$02,$a0,$80,$20,$82,$e7,$a2 ; ".... ..." cc46 .byte $00,$e0,$2e,$d0,$04,$a5,$d4,$d0 ; "........" cc4e .byte $0b,$e0,$73,$d0,$04,$a5,$e0,$80 ; "..s....." cc56 .byte $03,$bd,$57,$ee,$24,$93,$70,$05 ; "..W.$.p." cc5e .byte $20,$92,$e6,$80,$03,$20,$10,$ea ; " .... .." cc66 .byte $e8,$88,$d0,$dd,$24,$93,$50,$03 ; "....$.P." cc6e .byte $20,$1a,$ea,$4c,$a8,$e7,$20,$7a ; " ..L.. z" cc76 .byte $e7,$20,$91,$e7,$4c,$a8,$e7,$20 ; ". ..L.. " cc7e .byte $79,$e4,$20,$7a,$e7,$4c,$a8,$e7 ; "y. z.L.." cc86 .byte $a5,$01,$85,$a4,$20,$5a,$e8,$a2 ; ".... Z.." cc8e .byte $00,$90,$01,$ca,$24,$93,$50,$0a ; "....$.P." cc96 .byte $8a,$20,$10,$ea,$20,$1a,$ea,$4c ; ". .. ..L" cc9e .byte $a8,$e7,$20,$82,$e7,$8a,$20,$92 ; ".. ... ." cca6 .byte $e6,$4c,$a8,$e7,$20,$82,$e7,$a5 ; ".L.. ..." ccae .byte $9f,$48,$a9,$14,$85,$9f,$a5,$01 ; ".H......" ccb6 .byte $20,$43,$e5,$68,$d0,$0e,$a5,$01 ; " C.h...." ccbe .byte $0a,$0a,$aa,$b5,$ac,$29,$10,$f0 ; ".....).." ccc6 .byte $03,$20,$16,$ca,$a4,$01,$20,$6a ; ". .... j" ccce .byte $e3,$a5,$02,$24,$93,$50,$0e,$20 ; "...$.P. " ccd6 .byte $10,$ea,$a5,$01,$20,$10,$ea,$20 ; ".... .. " ccde .byte $1a,$ea,$4c,$a8,$e7,$20,$92,$e6 ; "..L.. .." cce6 .byte $a5,$01,$20,$92,$e6,$4c,$a8,$e7 ; ".. ..L.." ccee .byte $a5,$01,$a8,$0a,$0a,$aa,$b5,$ac ; "........" ccf6 .byte $29,$10,$f0,$1f,$9c,$08,$a0,$a9 ; ")......." ccfe .byte $80,$20,$0f,$c0,$20,$6a,$e3,$20 ; ". .. j. " cd06 .byte $82,$e7,$a5,$bd,$f0,$07,$a5,$98 ; "........" cd0e .byte $8d,$08,$a0,$80,$bc,$64,$9f,$64 ; ".....d.d" cd16 .byte $98,$80,$b6,$a9,$00,$20,$6d,$e3 ; "..... m." cd1e .byte $20,$82,$e7,$80,$ac,$a5,$01,$aa ; " ......." cd26 .byte $29,$80,$f0,$05,$8e,$10,$a0,$80 ; ")......." cd2e .byte $06,$bd,$46,$ee,$8d,$10,$a0,$20 ; "..F.... " cd36 .byte $7a,$e7,$4c,$a8,$e7,$24,$93,$50 ; "z.L..$.P" cd3e .byte $16,$a9,$02,$85,$8b,$a9,$00,$85 ; "........" cd46 .byte $8c,$64,$8e,$a9,$20,$85,$8d,$20 ; ".d.. .. " cd4e .byte $c5,$ea,$20,$1a,$ea,$80,$0f,$20 ; ".. .... " cd56 .byte $82,$e7,$a2,$00,$20,$aa,$e6,$95 ; ".... ..." cd5e .byte $02,$e8,$e0,$20,$d0,$f6,$a2,$00 ; "... ...." cd66 .byte $86,$99,$a5,$01,$85,$9a,$a0,$00 ; "........" cd6e .byte $b5,$03,$85,$9b,$b5,$02,$85,$9c ; "........" cd76 .byte $a5,$9b,$f0,$02,$e6,$9c,$a5,$9b ; "........" cd7e .byte $d0,$04,$a5,$9c,$f0,$16,$b5,$12 ; "........" cd86 .byte $91,$99,$b5,$13,$c8,$91,$99,$c8 ; "........" cd8e .byte $d0,$02,$e6,$9a,$c6,$9b,$d0,$ee ; "........" cd96 .byte $c6,$9c,$d0,$ea,$e8,$e8,$e0,$10 ; "........" cd9e .byte $d0,$ce,$4c,$a8,$e7,$20,$7a,$e7 ; "..L.. z." cda6 .byte $20,$f6,$e5,$a5,$a7,$85,$0f,$a5 ; " ......." cdae .byte $a5,$85,$11,$a5,$a8,$85,$10,$a5 ; "........" cdb6 .byte $a6,$85,$12,$a5,$b9,$0a,$aa,$bd ; "........" cdbe .byte $ef,$ed,$85,$1d,$bd,$f0,$ed,$85 ; "........" cdc6 .byte $1e,$a6,$01,$b5,$94,$8d,$0c,$a0 ; "........" cdce .byte $a5,$9f,$48,$a9,$14,$85,$9f,$a5 ; "..H....." cdd6 .byte $01,$20,$43,$e5,$a5,$01,$0a,$0a ; ". C....." cdde .byte $aa,$68,$d0,$09,$b5,$ac,$29,$10 ; ".h....)." cde6 .byte $f0,$03,$20,$16,$ca,$a9,$dc,$20 ; ".. .... " cdee .byte $0f,$c0,$b5,$a9,$85,$0c,$85,$1b ; "........" cdf6 .byte $85,$19,$18,$65,$ba,$85,$1c,$20 ; "...e... " cdfe .byte $b4,$e5,$a0,$00,$84,$0b,$84,$0d ; "........" ce06 .byte $84,$1a,$84,$18,$a5,$bf,$85,$0e ; "........" ce0e .byte $ad,$16,$a0,$a5,$c1,$f0,$03,$4c ; ".......L" ce16 .byte $a3,$c0,$a9,$01,$85,$17,$a5,$bb ; "........" ce1e .byte $29,$02,$f0,$05,$20,$c7,$e5,$e6 ; ")... ..." ce26 .byte $17,$a5,$bb,$0a,$30,$0a,$a9,$9c ; "....0..." ce2e .byte $8d,$10,$a0,$a6,$17,$4c,$ea,$c0 ; ".....L.." ce36 .byte $29,$02,$f0,$08,$a9,$ff,$85,$14 ; ")......." ce3e .byte $85,$16,$80,$10,$a5,$a7,$85,$13 ; "........" ce46 .byte $a5,$a8,$85,$14,$a5,$a5,$85,$15 ; "........" ce4e .byte $a5,$a6,$85,$16,$a5,$ca,$85,$1f ; "........" ce56 .byte $a5,$cb,$85,$20,$a5,$ba,$4a,$85 ; "... ..J." ce5e .byte $d9,$98,$6a,$38,$e5,$1f,$85,$d8 ; "..j8...." ce66 .byte $a5,$d9,$e5,$20,$85,$d9,$a5,$d8 ; "... ...." ce6e .byte $f0,$02,$e6,$d9,$a5,$1f,$f0,$02 ; "........" ce76 .byte $e6,$20,$24,$93,$50,$04,$a5,$1d ; ". $.P..." ce7e .byte $d0,$00,$4c,$09,$c2,$20,$7a,$e7 ; "..L.. z." ce86 .byte $a9,$ce,$48,$a9,$b6,$48,$6c,$01 ; "..H..Hl." ce8e .byte $00,$a0,$fd,$c8,$c8,$c8,$b1,$01 ; "........" ce96 .byte $c9,$fe,$f0,$08,$c9,$ff,$d0,$f3 ; "........" ce9e .byte $a9,$fe,$91,$01,$c8,$a5,$da,$91 ; "........" cea6 .byte $01,$a5,$01,$85,$da,$c8,$a5,$db ; "........" ceae .byte $91,$01,$a5,$02,$85,$db,$20,$7a ; "...... z" ceb6 .byte $e7,$4c,$a8,$e7,$a9,$c7,$8d,$10 ; ".L......" cebe .byte $a0,$a0,$02,$b1,$01,$85,$9a,$88 ; "........" cec6 .byte $b1,$01,$85,$99,$88,$b1,$01,$c9 ; "........" cece .byte $ff,$d0,$06,$20,$7a,$e7,$4c,$a8 ; "... z.L." ced6 .byte $e7,$0a,$b0,$0a,$4a,$aa,$bd,$ee ; "....J..." cede .byte $ee,$91,$99,$4c,$f0,$ce,$aa,$bd ; "...L...." cee6 .byte $5e,$ef,$91,$99,$bd,$5f,$ef,$c8 ; "^...._.." ceee .byte $91,$99,$18,$a5,$01,$69,$03,$85 ; ".....i.." cef6 .byte $01,$90,$c6,$e6,$02,$80,$c2,$20 ; "....... " cefe .byte $06,$cf,$20,$7a,$e7,$4c,$a8,$e7 ; ".. z.L.." cf06 .byte $a5,$01,$a6,$02,$d0,$07,$a9,$12 ; "........" cf0e .byte $38,$e5,$01,$80,$0d,$e0,$07,$d0 ; "8......." cf16 .byte $09,$38,$e9,$05,$95,$b9,$20,$b4 ; ".8.... ." cf1e .byte $e5,$60,$95,$b9,$24,$bb,$30,$02 ; ".`..$.0." cf26 .byte $64,$bb,$a5,$bd,$29,$01,$85,$bd ; "d...)..." cf2e .byte $a5,$be,$29,$01,$85,$be,$60,$20 ; "..)...` " cf36 .byte $41,$cf,$20,$b4,$e5,$20,$7a,$e7 ; "A. .. z." cf3e .byte $4c,$a8,$e7,$a5,$03,$0a,$aa,$a5 ; "L......." cf46 .byte $01,$95,$c2,$a5,$02,$95,$c3,$a5 ; "........" cf4e .byte $c3,$09,$f0,$85,$c3,$60,$20,$5d ; ".....` ]" cf56 .byte $cf,$20,$7a,$e7,$4c,$a8,$e7,$a5 ; ". z.L..." cf5e .byte $04,$0a,$0a,$0a,$0a,$0a,$aa,$a5 ; "........" cf66 .byte $01,$a4,$03,$d0,$0c,$9d,$02,$03 ; "........" cf6e .byte $a5,$02,$9d,$03,$03,$9e,$0c,$03 ; "........" cf76 .byte $60,$c0,$01,$d0,$09,$9d,$04,$03 ; "`......." cf7e .byte $a5,$02,$9d,$05,$03,$60,$c0,$02 ; ".....`.." cf86 .byte $d0,$0a,$9d,$06,$03,$a5,$02,$29 ; ".......)" cf8e .byte $0f,$9d,$07,$03,$60,$20,$9c,$cf ; "....` .." cf96 .byte $20,$7a,$e7,$4c,$a8,$e7 ; " z.L.." cf9c a4 02 Scf9c: LDY Z02 cf9e c0 05 CPY #$05 ; 5 . cfa0 90 21 BCC Lcfc3 cfa2 a5 03 LDA Z03 cfa4 0a ASL cfa5 0a ASL cfa6 0a ASL cfa7 0a ASL cfa8 0a ASL cfa9 aa TAX cfaa a5 01 LDA Z01 cfac c0 05 CPY #$05 ; 5 . cfae d0 0b BNE Lcfbb cfb0 1a INC cfb1 9d 01 03 STA D0301,X cfb4 49 ff EOR #$ff ; 255 . cfb6 1a INC cfb7 9d 00 03 STA D0300,X cfba 60 RTS cfbb c0 06 Lcfbb: CPY #$06 ; 6 . cfbd d0 03 BNE Lcfc2 cfbf 9d 0b 03 STA D030b,X cfc2 60 Lcfc2: RTS cfc3 c0 04 Lcfc3: CPY #$04 ; 4 . cfc5 d0 04 BNE Lcfcb cfc7 a9 03 LDA #$03 ; 3 . cfc9 85 02 STA Z02 cfcb a5 03 Lcfcb: LDA Z03 cfcd 0a ASL cfce 0a ASL cfcf 05 02 ORA Z02 cfd1 aa TAX cfd2 c0 03 CPY #$03 ; 3 . cfd4 f0 0e BEQ Lcfe4 cfd6 c0 04 CPY #$04 ; 4 . cfd8 f0 1a BEQ Lcff4 cfda a5 01 LDA Z01 cfdc 95 a9 Lcfdc: STA Za9,X cfde a5 03 LDA Z03 cfe0 20 43 e5 JSR Se543 cfe3 60 RTS cfe4 38 Lcfe4: SEC cfe5 a5 01 LDA Z01 cfe7 e9 05 SBC #$05 ; 5 . cfe9 a8 TAY cfea b5 a9 LDA Za9,X cfec 29 f0 AND #$f0 ; 240 . cfee 19 2b ee ORA Dee2b,Y cff1 4c dc cf JMP Lcfdc cff4 a4 03 Lcff4: LDY Z03 cff6 c4 bc CPY Zbc cff8 d0 06 BNE Ld000 cffa a5 01 LDA Z01 cffc 29 20 AND #$20 ; 32 cffe 85 a3 STA Za3 d000 a5 01 Ld000: LDA Z01 d002 29 10 AND #$10 ; 16 . d004 f0 04 BEQ Ld00a d006 c8 INY d007 c8 INY d008 c8 INY d009 c8 INY d00a b9 3e ee Ld00a: LDA Dee3e,Y d00d a4 03 LDY Z03 d00f 99 94 00 STA Z94,Y d012 a5 01 LDA Z01 d014 0a ASL d015 0a ASL d016 0a ASL d017 0a ASL d018 29 f0 AND #$f0 ; 240 . d01a 85 01 STA Z01 d01c b5 a9 LDA Za9,X d01e 29 0f AND #$0f ; 15 . d020 05 01 ORA Z01 d022 4c dc cf JMP Lcfdc d025 .byte $24,$93,$50,$24,$a5,$01,$85,$8b ; "$.P$...." d02d .byte $a5,$02,$85,$8c,$a5,$03,$85,$8d ; "........" d035 .byte $a5,$04,$85,$8e,$a5,$a4,$c9,$50 ; ".......P" d03d .byte $d0,$05,$20,$c5,$ea,$80,$03,$20 ; ".. .... " d045 .byte $38,$eb,$20,$1a,$ea,$4c,$a8,$e7 ; "8. ..L.." d04d .byte $20,$82,$e7,$a4,$a4,$a5,$03,$f0 ; " ......." d055 .byte $02,$e6,$04,$c0,$50,$d0,$07,$20 ; "....P.. " d05d .byte $aa,$e6,$92,$01,$80,$05,$b2,$01 ; "........" d065 .byte $20,$92,$e6,$e6,$01,$d0,$02,$e6 ; " ......." d06d .byte $02,$c6,$03,$d0,$e6,$c6,$04,$d0 ; "........" d075 .byte $e2,$4c,$a8,$e7,$24,$93,$50,$19 ; ".L..$.P." d07d .byte $a5,$01,$85,$8d,$a5,$02,$85,$8e ; "........" d085 .byte $a5,$03,$85,$8c,$a5,$05,$85,$8b ; "........" d08d .byte $20,$00,$c9,$20,$1a,$ea,$4c,$a8 ; " .. ..L." d095 .byte $e7,$20,$82,$e7,$4c,$a8,$e7,$20 ; ". ..L.. " d09d .byte $82,$e7,$a2,$00,$20,$c7,$d0,$e8 ; ".... ..." d0a5 .byte $f0,$1d,$a9,$34,$20,$00,$c0,$20 ; "...4 .. " d0ad .byte $0b,$c0,$ad,$10,$b0,$10,$f0,$e8 ; "........" d0b5 .byte $f0,$0d,$a9,$34,$20,$00,$c0,$20 ; "...4 .. " d0bd .byte $0b,$c0,$ad,$10,$b0,$30,$f0,$8a ; ".....0.." d0c5 .byte $80,$19 ; ".." d0c7 ad 10 b0 Sd0c7: LDA Db010 d0ca 10 fb BPL Sd0c7 d0cc ad 10 b0 Ld0cc: LDA Db010 d0cf 30 fb BMI Ld0cc d0d1 60 RTS d0d2 .byte $20,$82,$e7,$a2,$00,$ad,$10,$b0 ; " ......." d0da .byte $29,$40,$f0,$01,$ca,$8a,$24,$93 ; ")@....$." d0e2 .byte $50,$09,$20,$10,$ea,$20,$1a,$ea ; "P. .. .." d0ea .byte $4c,$a8,$e7,$20,$92,$e6,$4c,$a8 ; "L.. ..L." d0f2 .byte $e7,$20,$7a,$e7,$a5,$01,$49,$ff ; ". z...I." d0fa .byte $8d,$10,$b4,$4c,$a8,$e7,$24,$93 ; "...L..$." d102 .byte $50,$0c,$ad,$d0,$b7,$20,$10,$ea ; "P.... .." d10a .byte $20,$1a,$ea,$4c,$a8,$e7,$20,$82 ; " ..L.. ." d112 .byte $e7,$ad,$d0,$b7,$20,$92,$e6,$4c ; ".... ..L" d11a .byte $a8,$e7,$a5,$01,$85,$11,$20,$7a ; "...... z" d122 .byte $e7,$64,$0b,$64,$0c,$a9,$ff,$85 ; ".d.d...." d12a .byte $0d,$85,$0e,$ad,$16,$a0,$a9,$04 ; "........" d132 .byte $20,$00,$c0,$ad,$16,$a0,$a5,$11 ; " ......." d13a .byte $f0,$03,$20,$c7,$d0,$a9,$04,$20 ; ".. .... " d142 .byte $00,$c0,$ad,$17,$a0,$29,$0f,$85 ; ".....).." d14a .byte $10,$ad,$16,$a0,$85,$0f,$a2,$0f ; "........" d152 .byte $a0,$0d,$20,$cb,$d1,$b0,$08,$a5 ; ".. ....." d15a .byte $0f,$85,$0d,$a5,$10,$85,$0e,$a2 ; "........" d162 .byte $0b,$a0,$0f,$20,$cb,$d1,$b0,$08 ; "... ...." d16a .byte $a5,$0f,$85,$0b,$a5,$10,$85,$0c ; "........" d172 .byte $24,$93,$50,$27,$ad,$15,$b8,$29 ; "$.P'...)" d17a .byte $10,$f0,$bb,$20,$fd,$e8,$90,$b6 ; "... ...." d182 .byte $a5,$a4,$c9,$01,$d0,$0f,$a2,$03 ; "........" d18a .byte $b5,$0b,$20,$10,$ea,$ca,$10,$f8 ; ".. ....." d192 .byte $20,$1a,$ea,$80,$19,$20,$e0,$eb ; " .... .." d19a .byte $4c,$a8,$e7,$20,$3f,$e6,$90,$96 ; "L.. ?..." d1a2 .byte $c9,$01,$d0,$f4,$a2,$03,$b5,$0b ; "........" d1aa .byte $20,$92,$e6,$ca,$10,$f8,$20,$b6 ; " ..... ." d1b2 .byte $d1,$4c,$38,$d1,$a5,$0b,$48,$a5 ; ".L8...H." d1ba .byte $0c,$48,$a5,$0d,$85,$0b,$a5,$0e ; ".H......" d1c2 .byte $85,$0c,$68,$85,$0e,$68,$85,$0d ; "..h..h.." d1ca .byte $60,$b5,$01,$d9,$01,$00,$90,$0a ; "`......." d1d2 .byte $d0,$07,$b5,$00,$d9,$00,$00,$90 ; "........" d1da .byte $01,$38,$60,$24,$93,$50,$13,$a9 ; ".8`$.P.." d1e2 .byte $01,$85,$8b,$a9,$00,$85,$8c,$64 ; ".......d" d1ea .byte $8e,$a9,$0a,$85,$8d,$20,$c5,$ea ; "..... .." d1f2 .byte $80,$0f,$20,$82,$e7,$a2,$00,$20 ; ".. .... " d1fa .byte $aa,$e6,$95,$01,$e8,$e0,$0a,$d0 ; "........" d202 .byte $f6,$64,$0b,$64,$0c,$a5,$02,$85 ; ".d.d...." d20a .byte $0d,$a5,$01,$85,$0e,$a6,$06,$f0 ; "........" d212 .byte $02,$e6,$05,$a4,$04,$a5,$03,$85 ; "........" d21a .byte $04,$64,$03,$a5,$0e,$91,$03,$c8 ; ".d......" d222 .byte $a5,$0d,$91,$03,$c8,$d0,$02,$e6 ; "........" d22a .byte $04,$18,$a5,$0b,$65,$0a,$85,$0b ; "....e..." d232 .byte $a5,$0c,$65,$09,$85,$0c,$a5,$0d ; "..e....." d23a .byte $65,$08,$85,$0d,$a5,$0e,$65,$07 ; "e.....e." d242 .byte $85,$0e,$ca,$d0,$d6,$c6,$05,$d0 ; "........" d24a .byte $d2,$24,$93,$50,$06,$20,$1a,$ea ; ".$.P. .." d252 .byte $4c,$a8,$e7,$a9,$ff,$20,$92,$e6 ; "L.... .." d25a .byte $4c,$a8,$e7,$a9,$ff,$85,$79,$64 ; "L.....yd" d262 .byte $64,$a2,$00,$a5,$ba,$18,$6a,$90 ; "d.....j." d26a .byte $13,$a2,$80,$80,$0f,$a9,$ff,$85 ; "........" d272 .byte $64,$a5,$03,$3a,$0a,$0a,$85,$79 ; "d..:...y" d27a .byte $a5,$02,$a6,$01,$86,$62,$85,$63 ; ".....b.c" d282 .byte $24,$93,$70,$04,$86,$64,$85,$65 ; "$.p..d.e" d28a .byte $20,$7a,$e7,$20,$d0,$e3,$20,$f6 ; " z. .. ." d292 .byte $e5,$a5,$9f,$48,$a9,$14,$85,$9f ; "...H...." d29a .byte $20,$8d,$e3,$a5,$b9,$0a,$aa,$bd ; " ......." d2a2 .byte $0d,$ee,$85,$d8,$85,$d6,$e8,$bd ; "........" d2aa .byte $0d,$ee,$aa,$a5,$d8,$f0,$01,$e8 ; "........" d2b2 .byte $86,$d9,$86,$d7,$64,$5a,$a5,$bf ; "....dZ.." d2ba .byte $85,$5b,$20,$5c,$db,$a2,$07,$74 ; ".[ \...t" d2c2 .byte $4a,$ca,$10,$fb,$a2,$00,$9e,$00 ; "J......." d2ca .byte $02,$ca,$d0,$fa,$a0,$00,$a9,$04 ; "........" d2d2 .byte $9d,$00,$02,$b9,$ab,$00,$f0,$54 ; ".......T" d2da .byte $30,$2e,$29,$1f,$c9,$09,$90,$19 ; "0.)....." d2e2 .byte $e9,$09,$4a,$29,$03,$da,$aa,$bd ; "..J)...." d2ea .byte $f7,$d2,$fa,$9d,$01,$02,$a9,$04 ; "........" d2f2 .byte $9d,$02,$02,$80,$0c,$08,$0a,$0e ; "........" d2fa .byte $16,$a9,$01,$9d,$01,$02,$9d,$02 ; "........" d302 .byte $02,$b9,$ab,$00,$c9,$20,$90,$24 ; "..... .$" d30a .byte $c9,$81,$d0,$30,$9e,$0d,$03,$9e ; "...0...." d312 .byte $0e,$03,$9e,$0f,$03,$9e,$10,$03 ; "........" d31a .byte $9e,$11,$03,$9e,$12,$03,$9e,$13 ; "........" d322 .byte $03,$9e,$14,$03,$9e,$15,$03,$9e ; "........" d32a .byte $16,$03,$80,$2f,$8a,$18,$69,$20 ; ".../..i " d332 .byte $aa,$c8,$c8,$c8,$c8,$c0,$10,$b0 ; "........" d33a .byte $48,$4c,$d0,$d2,$c9,$82,$d0,$07 ; "HL......" d342 .byte $a9,$01,$9d,$00,$03,$80,$e5,$a9 ; "........" d34a .byte $08,$9d,$0e,$03,$9e,$0d,$03,$9d ; "........" d352 .byte $10,$03,$9e,$0f,$03,$9d,$12,$03 ; "........" d35a .byte $9e,$11,$03,$9e,$08,$03,$9e,$09 ; "........" d362 .byte $03,$9e,$0a,$03,$bd,$0c,$03,$f0 ; "........" d36a .byte $c3,$bd,$02,$03,$18,$7d,$06,$03 ; ".....}.." d372 .byte $9d,$02,$03,$bd,$03,$03,$7d,$07 ; "......}." d37a .byte $03,$9d,$03,$03,$9e,$0c,$03,$80 ; "........" d382 .byte $ab,$a2,$ff,$86,$0e,$a2,$7f,$86 ; "........" d38a .byte $0b,$64,$0c,$64,$26,$64,$47,$a9 ; ".d.d&dG." d392 .byte $01,$85,$49,$85,$48,$a2,$00,$a0 ; "..I.H..." d39a .byte $00,$a9,$00,$99,$1e,$00,$18,$b5 ; "........" d3a2 .byte $a9,$f0,$2f,$e6,$0e,$e6,$49,$c5 ; "../...I." d3aa .byte $0b,$10,$02,$85,$0b,$c5,$0c,$30 ; ".......0" d3b2 .byte $02,$85,$0c,$c4,$bc,$d0,$05,$a5 ; "........" d3ba .byte $0e,$0a,$85,$75,$b5,$ac,$29,$10 ; "...u..)." d3c2 .byte $05,$26,$85,$26,$b5,$ab,$10,$08 ; ".&.&...." d3ca .byte $e6,$49,$a5,$47,$05,$48,$85,$47 ; ".I.G.H.G" d3d2 .byte $06,$48,$e8,$e8,$e8,$e8,$c8,$c0 ; ".H......" d3da .byte $04,$d0,$be,$06,$49,$68,$d0,$07 ; "....Ih.." d3e2 .byte $a5,$26,$f0,$03,$20,$16,$ca,$a9 ; ".&.. ..." d3ea .byte $c0,$85,$a2,$a5,$0c,$18,$65,$ba ; "......e." d3f2 .byte $65,$ba,$85,$0c,$38,$e5,$0b,$85 ; "e...8..." d3fa .byte $0d,$64,$5e,$64,$5c,$64,$7a,$a5 ; ".d^d\dz." d402 .byte $0b,$85,$5f,$85,$5d,$85,$6f,$64 ; ".._.].od" d40a .byte $73,$64,$74,$64,$60,$64,$61,$64 ; "sdtd`dad" d412 .byte $66,$64,$67,$a5,$ca,$85,$6d,$a5 ; "fdg...m." d41a .byte $cb,$85,$6e,$64,$6c,$ad,$d0,$b2 ; "..ndl..." d422 .byte $09,$20,$8d,$d0,$b2,$a9,$ff,$8d ; ". ......" d42a .byte $10,$b2,$8d,$50,$b2,$ad,$10,$b0 ; "...P...." d432 .byte $29,$40,$85,$76,$85,$77,$85,$78 ; ")@.v.w.x" d43a .byte $a5,$bb,$29,$04,$d0,$06,$a5,$a7 ; "..)....." d442 .byte $49,$ff,$85,$76,$a5,$a6,$45,$a8 ; "I..v..E." d44a .byte $29,$0f,$85,$a6,$a5,$a5,$45,$a7 ; ").....E." d452 .byte $85,$a5,$a2,$a3,$a5,$bb,$29,$08 ; "......)." d45a .byte $d0,$08,$24,$bb,$50,$02,$a2,$8c ; "..$.P..." d462 .byte $30,$06,$a9,$80,$85,$6c,$a2,$9c ; "0....l.." d46a .byte $86,$a2,$a9,$c0,$8d,$90,$b3,$ad ; "........" d472 .byte $10,$b0,$29,$ef,$8d,$10,$b0,$ad ; "..)....." d47a .byte $d0,$b2,$09,$20,$8d,$d0,$b2,$a9 ; "... ...." d482 .byte $ff,$8d,$10,$b2,$8d,$50,$b2,$24 ; ".....P.$" d48a .byte $93,$50,$6b,$4c,$95,$d5,$da,$5a ; ".PkL...Z" d492 .byte $aa,$20,$19,$e2,$a5,$08,$85,$02 ; ". ......" d49a .byte $a5,$07,$85,$01,$80,$10,$da,$5a ; ".......Z" d4a2 .byte $aa,$20,$19,$e2,$20,$aa,$e6,$85 ; ". .. ..." d4aa .byte $02,$20,$aa,$e6,$85,$01,$20,$65 ; ". .... e" d4b2 .byte $e2,$a2,$ff,$20,$19,$e2,$7a,$fa ; "... ..z." d4ba .byte $60,$da,$29,$0f,$aa,$a5,$08,$48 ; "`.)....H" d4c2 .byte $a5,$07,$80,$0b,$da,$29,$0f,$aa ; ".....).." d4ca .byte $20,$aa,$e6,$48,$20,$aa,$e6,$24 ; " ..H ..$" d4d2 .byte $c1,$10,$21,$78,$9d,$20,$04,$68 ; "..!x. .h" d4da .byte $9d,$10,$04,$58,$e8,$e4,$84,$d0 ; "...X...." d4e2 .byte $13,$ca,$78,$bd,$10,$04,$8d,$13 ; "..x....." d4ea .byte $a0,$85,$7f,$bd,$20,$04,$8d,$12 ; ".... ..." d4f2 .byte $a0,$85,$80,$58,$fa,$60,$a6,$65 ; "...X.`.e" d4fa .byte $a4,$64,$ad,$10,$a8,$29,$01,$f0 ; ".d...).." d502 .byte $4e,$ad,$30,$a8,$c9,$01,$f0,$41 ; "N.0....A" d50a .byte $48,$29,$f0,$c9,$10,$d0,$08,$68 ; "H).....h" d512 .byte $29,$0f,$20,$c6,$d4,$80,$e3,$c9 ; "). ....." d51a .byte $20,$d0,$0b,$68,$a5,$82,$f0,$da ; " ..h...." d522 .byte $a9,$ff,$85,$82,$80,$d4,$c9,$30 ; ".......0" d52a .byte $d0,$08,$68,$29,$0f,$20,$a0,$d4 ; "..h). .." d532 .byte $80,$c8,$c9,$40,$d0,$09,$68,$20 ; "...@..h " d53a .byte $aa,$e6,$8d,$10,$b4,$80,$bb,$68 ; ".......h" d542 .byte $a9,$40,$8d,$90,$b3,$a2,$00,$a0 ; ".@......" d54a .byte $00,$78,$86,$63,$84,$62,$58,$78 ; ".x.c.bXx" d552 .byte $a5,$60,$05,$61,$d0,$1a,$a5,$63 ; ".`.a...c" d55a .byte $05,$62,$58,$d0,$9d,$a9,$80,$20 ; ".bX.... " d562 .byte $92,$e6,$ad,$30,$a8,$64,$a2,$20 ; "...0.d. " d56a .byte $b4,$e5,$20,$d0,$e3,$4c,$a8,$e7 ; ".. ..L.." d572 .byte $b2,$5e,$20,$92,$e6,$c6,$60,$a5 ; ".^ ...`." d57a .byte $60,$c9,$ff,$d0,$02,$c6,$61,$58 ; "`.....aX" d582 .byte $e6,$5e,$d0,$0c,$e6,$5f,$a5,$5f ; ".^..._._" d58a .byte $c5,$0c,$d0,$04,$a5,$0b,$85,$5f ; "......._" d592 .byte $4c,$fc,$d4,$ad,$15,$b8,$29,$10 ; "L.....)." d59a .byte $f0,$f9,$20,$fd,$e8,$90,$f4,$a5 ; ".. ....." d5a2 .byte $a4,$c9,$01,$f0,$45,$20,$e0,$eb ; "....E .." d5aa .byte $a5,$a4,$29,$f0,$c9,$10,$d0,$09 ; "..)....." d5b2 .byte $a5,$a4,$29,$0f,$20,$bb,$d4,$80 ; "..). ..." d5ba .byte $da,$c9,$20,$d0,$0a,$a5,$82,$f0 ; ".. ....." d5c2 .byte $d2,$a9,$ff,$85,$82,$80,$cc,$c9 ; "........" d5ca .byte $30,$d0,$09,$a5,$a4,$29,$0f,$20 ; "0....). " d5d2 .byte $90,$d4,$80,$bf,$c9,$40,$d0,$07 ; ".....@.." d5da .byte $a5,$08,$8d,$10,$b4,$80,$b4,$64 ; ".......d" d5e2 .byte $a2,$20,$b4,$e5,$20,$d0,$e3,$4c ; ". .. ..L" d5ea .byte $a8,$e7,$78,$a5,$66,$85,$68,$a5 ; "..x.f.h." d5f2 .byte $67,$85,$69,$a5,$60,$85,$6a,$a5 ; "g.i.`.j." d5fa .byte $61,$85,$6b,$a5,$62,$48,$a5,$63 ; "a.k.bH.c" d602 .byte $48,$58,$a5,$69,$c5,$06,$90,$14 ; "HX.i...." d60a .byte $d0,$06,$a5,$68,$c5,$05,$90,$0c ; "...h...." d612 .byte $a5,$06,$20,$10,$ea,$a5,$05,$20 ; ".. .... " d61a .byte $10,$ea,$80,$0a,$a5,$69,$20,$10 ; ".....i ." d622 .byte $ea,$a5,$68,$20,$10,$ea,$a5,$64 ; "..h ...d" d62a .byte $f0,$14,$68,$68,$a9,$ff,$85,$62 ; "..hh...b" d632 .byte $85,$63,$a5,$69,$20,$10,$ea,$a5 ; ".c.i ..." d63a .byte $68,$20,$10,$ea,$80,$08,$68,$20 ; "h ....h " d642 .byte $10,$ea,$68,$20,$10,$ea,$18,$a5 ; "..h ...." d64a .byte $5e,$85,$8b,$65,$07,$aa,$a5,$5f ; "^..e..._" d652 .byte $85,$8c,$65,$08,$c5,$0c,$90,$2e ; "..e....." d65a .byte $d0,$03,$8a,$f0,$29,$a9,$00,$38 ; "....)..8" d662 .byte $e5,$8b,$85,$8d,$85,$00,$a5,$0c ; "........" d66a .byte $e5,$8c,$85,$8e,$85,$01,$20,$38 ; "...... 8" d672 .byte $eb,$a5,$0b,$85,$8c,$64,$8b,$38 ; ".....d.8" d67a .byte $a5,$07,$e5,$00,$85,$8d,$a5,$08 ; "........" d682 .byte $e5,$01,$85,$8e,$80,$08,$a5,$08 ; "........" d68a .byte $85,$8e,$a5,$07,$85,$8d,$20,$38 ; "...... 8" d692 .byte $eb,$20,$1a,$ea,$a5,$69,$c5,$06 ; ". ...i.." d69a .byte $90,$08,$d0,$16,$a5,$68,$c5,$05 ; ".....h.." d6a2 .byte $b0,$10,$a5,$68,$85,$05,$a5,$69 ; "...h...i" d6aa .byte $85,$06,$a5,$6a,$85,$07,$a5,$6b ; "...j...k" d6b2 .byte $85,$08,$78,$a5,$60,$38,$e5,$07 ; "..x.`8.." d6ba .byte $85,$60,$a5,$61,$e5,$08,$85,$61 ; ".`.a...a" d6c2 .byte $a5,$66,$38,$e5,$05,$85,$66,$a5 ; ".f8...f." d6ca .byte $67,$e5,$06,$85,$67,$58,$a5,$5e ; "g...gX.^" d6d2 .byte $18,$65,$07,$85,$5e,$a5,$5f,$65 ; ".e..^._e" d6da .byte $08,$c5,$0c,$90,$05,$e5,$0c,$18 ; "........" d6e2 .byte $65,$0b,$85,$5f,$4c,$95,$d5 ; "e.._L.." d6e9 da Sd6e9: PHX d6ea 5a PHY d6eb ad d0 b7 LDA Db7d0 d6ee 85 11 STA Z11 d6f0 a0 0c LDY #$0c ; 12 . d6f2 a5 0e LDA Z0e d6f4 0a ASL d6f5 aa TAX d6f6 e8 INX d6f7 a9 21 LDA #$21 ; 33 ! d6f9 85 0f STA Z0f d6fb 64 10 STZ Z10 d6fd a9 60 LDA #$60 ; 96 ` d6ff 85 12 STA Z12 d701 86 13 Ld701: STX Z13 d703 b9 a9 00 LDA Za9,Y d706 f0 0d BEQ Ld715 d708 b9 ab 00 LDA Zab,Y d70b c9 03 CMP #$03 ; 3 . d70d b0 18 BCS Ld727 d70f a6 13 Ld70f: LDX Z13 d711 ca DEX d712 ca DEX d713 86 13 STX Z13 d715 c6 0f Ld715: DEC Z0f d717 a5 12 LDA Z12 d719 38 SEC d71a e9 20 SBC #$20 ; 32 d71c 85 12 STA Z12 d71e 88 DEY d71f 88 DEY d720 88 DEY d721 88 DEY d722 10 dd BPL Ld701 d724 7a PLY d725 fa PHX d726 60 RTS d727 c9 1f Ld727: CMP #$1f ; 31 . d729 b0 03 BCS Ld72e d72b 4c 97 d9 JMP Ld997 d72e a6 12 Ld72e: LDX Z12 d730 c9 45 CMP #$45 ; 69 E d732 90 21 BCC Ld755 d734 c9 80 CMP #$80 ; 128 . d736 b0 1d BCS Ld755 d738 c9 50 CMP #$50 ; 80 P d73a d0 d3 BNE Ld70f d73c bd 0b 03 LDA D030b,X d73f 0a ASL d740 0a ASL d741 0a ASL d742 0a ASL d743 0a ASL d744 aa TAX d745 bd 04 03 LDA D0304,X d748 48 PHA d749 bd 05 03 LDA D0305,X d74c a6 13 LDX Z13 d74e 95 49 STA Z49,X d750 68 PLA d751 95 4a STA Z4a,X d753 80 ba BRA Ld70f d755 bd 0b 03 Ld755: LDA D030b,X d758 aa TAX d759 b5 94 LDA Z94,X d75b 8d 0c a0 STA Da00c d75e a9 04 LDA #$04 ; 4 . d760 20 00 c0 JSR Sc000 ; delay d763 ad 16 a0 LDA Da016 ; hw16 d766 a9 04 LDA #$04 ; 4 . d768 20 00 c0 JSR Sc000 ; delay d76b ad 17 a0 LDA Da017 ; hw17 d76e 29 0f AND #$0f ; 15 . d770 85 15 STA Z15 d772 ad 16 a0 LDA Da016 ; hw16 d775 85 14 STA Z14 d777 a6 12 LDX Z12 d779 b9 ab 00 LDA Zab,Y d77c 10 3a BPL Ld7b8 d77e c9 80 CMP #$80 ; 128 . d780 d0 05 BNE Ld787 d782 20 41 db JSR Sdb41 d785 80 3d BRA Ld7c4 d787 c9 81 Ld787: CMP #$81 ; 129 . d789 d0 84 BNE Ld70f d78b bd 0d 03 LDA D030d,X d78e 18 CLC d78f 65 14 ADC Z14 d791 9d 0d 03 STA D030d,X d794 bd 0e 03 LDA D030e,X d797 65 15 ADC Z15 d799 9d 0e 03 STA D030e,X d79c 90 08 BCC Ld7a6 d79e fe 0f 03 INC D030f,X d7a1 d0 03 BNE Ld7a6 d7a3 fe 10 03 INC D0310,X d7a6 fe 11 03 Ld7a6: INC D0311,X d7a9 d0 1f BNE Ld7ca d7ab fe 12 03 INC D0312,X d7ae d0 1a BNE Ld7ca d7b0 de 12 03 DEC D0312,X d7b3 de 11 03 DEC D0311,X d7b6 80 12 BRA Ld7ca d7b8 c9 42 Ld7b8: CMP #$42 ; 66 B d7ba d0 06 BNE Ld7c2 d7bc 20 41 db JSR Sdb41 d7bf 4c 0f d7 JMP Ld70f d7c2 90 06 Ld7c2: BCC Ld7ca d7c4 20 26 db Ld7c4: JSR Sdb26 d7c7 4c 0f d7 JMP Ld70f d7ca a5 14 Ld7ca: LDA Z14 d7cc 38 SEC d7cd fd 04 03 SBC D0304,X d7d0 48 PHA d7d1 a5 15 LDA Z15 d7d3 fd 05 03 SBC D0305,X d7d6 10 08 BPL Ld7e0 d7d8 c9 fe CMP #$fe ; 254 . d7da b0 0a BCS Ld7e6 d7dc a9 fe LDA #$fe ; 254 . d7de 80 06 BRA Ld7e6 d7e0 c9 02 Ld7e0: CMP #$02 ; 2 . d7e2 90 02 BCC Ld7e6 d7e4 a9 01 LDA #$01 ; 1 . d7e6 85 16 Ld7e6: STA Z16 d7e8 68 PLA d7e9 0a ASL d7ea 26 16 ROL Z16 d7ec 0a ASL d7ed 26 16 ROL Z16 d7ef 0a ASL d7f0 26 16 ROL Z16 d7f2 0a ASL d7f3 26 16 ROL Z16 d7f5 0a ASL d7f6 26 16 ROL Z16 d7f8 0a ASL d7f9 26 16 ROL Z16 d7fb 18 CLC d7fc 7d 08 03 ADC D0308,X d7ff 9d 08 03 STA D0308,X d802 a5 16 LDA Z16 d804 7d 09 03 ADC D0309,X d807 9d 09 03 STA D0309,X d80a 50 54 BVC Ld860 d80c 30 2f BMI Ld83d d80e 09 80 ORA #$80 ; 128 . d810 9d 09 03 STA D0309,X d813 de 0a 03 DEC D030a,X d816 bd 0a 03 LDA D030a,X d819 dd 00 03 CMP D0300,X d81c d0 42 BNE Ld860 d81e 9e 0a 03 STZ D030a d821 de 02 03 DEC D0302,X d824 bd 02 03 LDA D0302,X d827 c9 ff CMP #$ff ; 255 . d829 d0 03 BNE Ld82e d82b de 03 03 DEC D0303,X d82e de 04 03 Ld82e: DEC D0304,X d831 bd 04 03 LDA D0304,X d834 c9 ff CMP #$ff ; 255 . d836 d0 28 BNE Ld860 d838 de 05 03 DEC D0305,X d83b 80 23 BRA Ld860 d83d 29 7f Ld83d: AND #$7f ; 127 . d83f 9d 09 03 STA D0309,X d842 fe 0a 03 INC D030a,X d845 bd 0a 03 LDA D030a,X d848 dd 01 03 CMP D0301,X d84b d0 13 BNE Ld860 d84d 9e 0a 03 STZ D030a d850 fe 02 03 INC D0302,X d853 d0 03 BNE Ld858 d855 fe 03 03 INC D0303,X d858 fe 04 03 Ld858: INC D0304,X d85b d0 03 BNE Ld860 d85d fe 05 03 INC D0305,X d860 a5 15 Ld860: LDA Z15 d862 dd 03 03 CMP D0303,X d865 90 17 BCC Ld87e d867 d0 07 BNE Ld870 d869 a5 14 LDA Z14 d86b dd 02 03 CMP D0302,X d86e 90 0e BCC Ld87e d870 b9 ab 00 Ld870: LDA Zab,Y d873 c9 41 CMP #$41 ; 65 A d875 d0 03 BNE Ld87a d877 20 26 db JSR Sdb26 d87a a9 01 Ld87a: LDA #$01 ; 1 . d87c 80 0c BRA Ld88a d87e b9 ab 00 Ld87e: LDA Zab,Y d881 c9 40 CMP #$40 ; 64 @ d883 d0 03 BNE Ld888 d885 20 41 db JSR Sdb41 d888 a9 00 Ld888: LDA #$00 ; 0 . d88a a6 13 Ld88a: LDX Z13 d88c d2 0f CMP d88e f0 39 BEQ Ld8c9 d890 a6 12 LDX Z12 d892 29 01 AND #$01 ; 1 . d894 d0 36 BNE Ld8cc d896 bd 02 03 LDA D0302,X d899 18 CLC d89a 7d 06 03 ADC D0306,X d89d 9d 02 03 STA D0302,X d8a0 bd 03 03 LDA D0303,X d8a3 7d 07 03 ADC D0307,X d8a6 9d 03 03 STA D0303,X d8a9 9e 0c 03 STZ D030c d8ac b9 ab 00 LDA Zab,Y d8af c9 41 CMP #$41 ; 65 A d8b1 d0 12 BNE Ld8c5 d8b3 bd 0f 03 LDA D030f,X d8b6 9d 11 03 STA D0311,X d8b9 bd 10 03 LDA D0310,X d8bc 9d 12 03 STA D0312,X d8bf 9e 0f 03 STZ D030f d8c2 9e 10 03 STZ D0310 d8c5 a6 13 Ld8c5: LDX Z13 d8c7 a9 00 LDA #$00 ; 0 . d8c9 4c b4 d9 Ld8c9: JMP Ld9b4 d8cc bd 02 03 Ld8cc: LDA D0302,X d8cf 38 SEC d8d0 fd 06 03 SBC D0306,X d8d3 9d 02 03 STA D0302,X d8d6 bd 03 03 LDA D0303,X d8d9 fd 07 03 SBC D0307,X d8dc 9d 03 03 STA D0303,X d8df a9 01 LDA #$01 ; 1 . d8e1 9d 0c 03 STA D030c,X d8e4 b9 ab 00 LDA Zab,Y d8e7 c9 40 CMP #$40 ; 64 @ d8e9 d0 14 BNE Ld8ff d8eb bd 0d 03 LDA D030d,X d8ee 9d 11 03 STA D0311,X d8f1 bd 0e 03 LDA D030e,X d8f4 9d 12 03 STA D0312,X d8f7 a9 ff LDA #$ff ; 255 . d8f9 9d 0d 03 STA D030d,X d8fc 9d 0e 03 STA D030e,X d8ff c9 81 Ld8ff: CMP #$81 ; 129 . d901 f0 03 BEQ Ld906 d903 4c 91 d9 JMP Ld991 d906 5a Ld906: PHY d907 a0 04 LDY #$04 ; 4 . d909 bd 11 03 LDA D0311,X d90c 9d 15 03 STA D0315,X d90f bd 12 03 LDA D0312,X d912 9d 16 03 STA D0316,X d915 c9 08 CMP #$08 ; 8 . d917 90 25 BCC Ld93e d919 bd 0f 03 LDA D030f,X d91c 9d 14 03 STA D0314,X d91f bd 0e 03 LDA D030e,X d922 9d 13 03 STA D0313,X d925 bd 16 03 LDA D0316,X d928 30 06 BMI Ld930 d92a 88 Ld92a: DEY d92b f0 51 BEQ Ld97e d92d 0a ASL d92e 10 fa BPL Ld92a d930 5e 10 03 Ld930: LSR D0310,X d933 7e 14 03 ROR D0314,X d936 7e 13 03 ROR D0313,X d939 88 DEY d93a d0 f4 BNE Ld930 d93c 80 36 BRA Ld974 d93e bd 0e 03 Ld93e: LDA D030e,X d941 9d 14 03 STA D0314,X d944 bd 0d 03 LDA D030d,X d947 9d 13 03 STA D0313,X d94a bd 16 03 LDA D0316,X d94d f0 0e BEQ Ld95d d94f a0 07 LDY #$07 ; 7 . d951 c9 04 CMP #$04 ; 4 . d953 b0 13 BCS Ld968 d955 88 DEY d956 c9 02 CMP #$02 ; 2 . d958 b0 0e BCS Ld968 d95a 88 DEY d95b 80 0b BRA Ld968 d95d bd 15 03 Ld95d: LDA D0315,X d960 30 06 BMI Ld968 d962 88 Ld962: DEY d963 f0 19 BEQ Ld97e d965 0a ASL d966 10 fa BPL Ld962 d968 5e 0f 03 Ld968: LSR D030f,X d96b 7e 14 03 ROR D0314,X d96e 7e 13 03 ROR D0313,X d971 88 DEY d972 d0 f4 BNE Ld968 d974 90 08 Ld974: BCC Ld97e d976 fe 13 03 INC D0313,X d979 d0 03 BNE Ld97e d97b fe 14 03 INC D0314,X d97e 9e 0d 03 Ld97e: STZ D030d d981 9e 0e 03 STZ D030e d984 9e 0f 03 STZ D030f d987 9e 10 03 STZ D0310 d98a 9e 11 03 STZ D0311 d98d 9e 12 03 STZ D0312 d990 7a PLY d991 a9 01 Ld991: LDA #$01 ; 1 . d993 a6 13 LDX Z13 d995 80 1b BRA Ld9b2 d997 29 01 Ld997: AND #$01 ; 1 . d999 d0 0e BNE Ld9a9 d99b a5 11 LDA Z11 d99d 39 aa 00 AND Zaa,Y d9a0 d9 aa 00 CMP Zaa,Y d9a3 f0 0d BEQ Ld9b2 d9a5 a9 00 LDA #$00 ; 0 . d9a7 80 0b BRA Ld9b4 d9a9 a5 11 Ld9a9: LDA Z11 d9ab 39 aa 00 AND Zaa,Y d9ae f0 04 BEQ Ld9b4 d9b0 a9 01 LDA #$01 ; 1 . d9b2 d2 0f Ld9b2: CMP d9b4 08 Ld9b4: PHP d9b5 92 0f STA d9b7 b9 ab 00 LDA Zab,Y d9ba 30 14 BMI Ld9d0 d9bc c9 40 CMP #$40 ; 64 @ d9be 90 14 BCC Ld9d4 d9c0 a6 12 LDX Z12 d9c2 bd 12 03 LDA D0312,X d9c5 48 PHA d9c6 bd 11 03 LDA D0311,X d9c9 a6 13 LDX Z13 d9cb 95 4a STA Z4a,X d9cd 68 PLA d9ce 95 49 STA Z49,X d9d0 68 Ld9d0: PLA d9d1 4c 0f d7 JMP Ld70f d9d4 29 1f Ld9d4: AND #$1f ; 31 . d9d6 c9 05 CMP #$05 ; 5 . d9d8 b0 37 BCS Lda11 d9da c9 03 CMP #$03 ; 3 . d9dc b0 17 BCS Ld9f5 d9de 68 PLA d9df b2 0f LDA (Z0f) d9e1 d0 07 BNE Ld9ea d9e3 74 4a STZ Z4a d9e5 74 49 STZ Z49 d9e7 4c 0f d7 JMP Ld70f d9ea a9 e8 Ld9ea: LDA #$e8 ; 232 . d9ec 95 4a STA Z4a,X d9ee a9 03 LDA #$03 ; 3 . d9f0 95 49 STA Z49,X d9f2 4c 0f d7 JMP Ld70f d9f5 28 Ld9f5: PLP d9f6 f0 16 BEQ Lda0e d9f8 f6 4a INC Z4a,X d9fa d0 02 BNE Ld9fe d9fc f6 49 INC Z49,X d9fe b5 4a Ld9fe: LDA Z4a,X da00 c9 d0 CMP #$d0 ; 208 . da02 d0 0a BNE Lda0e da04 b5 49 LDA Z49,X da06 c9 07 CMP #$07 ; 7 . da08 90 04 BCC Lda0e da0a 74 4a STZ Z4a da0c 74 49 STZ Z49 da0e 4c 0f d7 Lda0e: JMP Ld70f da11 a6 12 Lda11: LDX Z12 da13 c9 09 CMP #$09 ; 9 . da15 90 6d BCC Lda84 da17 8a TXA da18 18 CLC da19 7d 00 02 ADC D0200,X da1c aa TAX da1d fe 00 02 INC D0200,X da20 d0 0b BNE Lda2d da22 fe 01 02 INC D0201,X da25 d0 06 BNE Lda2d da27 de 01 02 DEC D0201,X da2a de 00 02 DEC D0200,X da2d a6 12 Lda2d: LDX Z12 da2f bd 03 02 LDA D0203,X da32 dd 02 02 CMP D0202,X da35 f0 25 BEQ Lda5c da37 5a PHY da38 18 CLC da39 65 12 ADC Z12 da3b a8 TAY da3c a5 12 LDA Z12 da3e 18 CLC da3f 7d 00 02 ADC D0200,X da42 aa TAX da43 bd 01 02 LDA D0201,X da46 d9 01 02 CMP D0201,Y da49 90 10 BCC Lda5b da4b bd 00 02 LDA D0200,X da4e d9 00 02 CMP D0200,Y da51 90 08 BCC Lda5b da53 a6 12 LDX Z12 da55 bd 03 02 LDA D0203,X da58 9d 02 02 STA D0202,X da5b 7a Lda5b: PLY da5c 28 Lda5c: PLP da5d f0 22 BEQ Lda81 da5f a6 12 LDX Z12 da61 bd 00 02 LDA D0200,X da64 9d 03 02 STA D0203,X da67 18 CLC da68 69 02 ADC #$02 ; 2 . da6a dd 01 02 CMP D0201,X da6d 90 02 BCC Lda71 da6f a9 04 LDA #$04 ; 4 . da71 9d 00 02 Lda71: STA D0200,X da74 9d 02 02 STA D0202,X da77 18 CLC da78 65 12 ADC Z12 da7a aa TAX da7b 9e 00 02 STZ D0200 da7e 9e 01 02 STZ D0201 da81 4c 21 db Lda81: JMP Ldb21 da84 28 Lda84: PLP da85 f0 10 BEQ Lda97 da87 8a TXA da88 18 CLC da89 7d 00 02 ADC D0200,X da8c aa TAX da8d fe 00 02 INC D0200,X da90 d0 03 BNE Lda95 da92 de 00 02 DEC D0200,X da95 a6 12 Lda95: LDX Z12 da97 de 01 02 Lda97: DEC D0201,X da9a d0 e5 BNE Lda81 da9c de 02 02 DEC D0202,X da9f d0 e0 BNE Lda81 daa1 b9 ab 00 LDA Zab,Y daa4 29 1f AND #$1f ; 31 . daa6 c9 07 CMP #$07 ; 7 . daa8 90 1e BCC Ldac8 daaa a5 b9 LDA Zb9 daac c9 08 CMP #$08 ; 8 . daae b0 0c BCS Ldabc dab0 a9 70 LDA #$70 ; 112 p dab2 9d 01 02 STA D0201,X dab5 a9 18 LDA #$18 ; 24 . dab7 9d 02 02 STA D0202,X daba 80 28 BRA Ldae4 dabc a9 b8 Ldabc: LDA #$b8 ; 184 . dabe 9d 01 02 STA D0201,X dac1 a9 0c LDA #$0c ; 12 . dac3 9d 02 02 STA D0202,X dac6 80 1c BRA Ldae4 dac8 a5 b9 Ldac8: LDA Zb9 daca c9 08 CMP #$08 ; 8 . dacc b0 0c BCS Ldada dace a9 64 LDA #$64 ; 100 d dad0 9d 01 02 STA D0201,X dad3 a9 01 LDA #$01 ; 1 . dad5 9d 02 02 STA D0202,X dad8 80 0a BRA Ldae4 dada a9 32 Ldada: LDA #$32 ; 50 2 dadc 9d 01 02 STA D0201,X dadf a9 01 LDA #$01 ; 1 . dae1 9d 02 02 STA D0202,X dae4 a5 12 Ldae4: LDA Z12 dae6 18 CLC dae7 7d 00 02 ADC D0200,X daea aa TAX daeb bd 00 02 LDA D0200,X daee a6 13 LDX Z13 daf0 18 CLC daf1 75 4a ADC Z4a,X daf3 95 4a STA Z4a,X daf5 90 02 BCC Ldaf9 daf7 f6 49 INC Z49,X daf9 a6 12 Ldaf9: LDX Z12 dafb bd 00 02 LDA D0200,X dafe 1a INC daff c9 19 CMP #$19 ; 25 . db01 90 02 BCC Ldb05 db03 a9 04 LDA #$04 ; 4 . db05 9d 00 02 Ldb05: STA D0200,X db08 18 CLC db09 65 12 ADC Z12 db0b aa TAX db0c bd 00 02 LDA D0200,X db0f 85 16 STA Z16 db11 9e 00 02 STZ D0200 db14 a6 13 LDX Z13 db16 b5 4a LDA Z4a,X db18 38 SEC db19 e5 16 SBC Z16 db1b 95 4a STA Z4a,X db1d b0 04 BCS Ldb23 db1f d6 49 DEC Z49,X db21 a6 13 Ldb21: LDX Z13 db23 4c 0f d7 Ldb23: JMP Ld70f db26 a5 15 Sdb26: LDA Z15 db28 dd 10 03 CMP D0310,X db2b 90 13 BCC Ldb40 db2d d0 07 BNE Ldb36 db2f a5 14 LDA Z14 db31 dd 0f 03 CMP D030f,X db34 90 0a BCC Ldb40 db36 a5 15 Ldb36: LDA Z15 db38 9d 10 03 STA D0310,X db3b a5 14 LDA Z14 db3d 9d 0f 03 STA D030f,X db40 60 Ldb40: RTS db41 a5 15 Sdb41: LDA Z15 db43 dd 0e 03 CMP D030e,X db46 90 09 BCC Ldb51 db48 d0 11 BNE Ldb5b db4a a5 14 LDA Z14 db4c dd 0d 03 CMP D030d,X db4f b0 0a BCS Ldb5b db51 a5 15 Ldb51: LDA Z15 db53 9d 0e 03 STA D030e,X db56 a5 14 LDA Z14 db58 9d 0d 03 STA D030d,X db5b 60 Ldb5b: RTS db5c a9 ff Pdb5c: LDA #$ff ; 255 . db5e 85 82 STA Z82 db60 a9 01 LDA #$01 ; 1 . db62 a6 b9 LDX Zb9 db64 e0 08 CPX #$08 ; 8 . db66 b0 02 BCS Ldb6a db68 a9 02 LDA #$02 ; 2 . db6a 85 7b Ldb6a: STA Z7b db6c 85 7c STA Z7c db6e 64 7e STZ Z7e db70 a9 01 LDA #$01 ; 1 . db72 85 7d STA Z7d db74 64 83 STZ Z83 db76 64 84 STZ Z84 db78 60 RTS ; called only from IRQ code. db79 c6 7d Sdb79: DEC Z7d db7b d0 06 BNE Ldb83 db7d a5 7e LDA Z7e db7f f0 03 BEQ Ldb84 db81 c6 7e DEC Z7e db83 60 Ldb83: RTS db84 da Ldb84: PHX db85 5a PHY db86 80 34 BRA Ldbbc ; note in the following the LDA (zp),Y is using the Y flavor ; of zero page indexed addressing. This fetches a 16 bit pointer ; from the zero page (from Z5a and Z5b), then adds Y to that pointer, ; then the pointer is used to (in this case) fetch a byte. ; no path to the following. db88 a0 01 LDY #$01 ; 1 . db8a b1 5a LDA (Z5a),Y db8c 85 7f STA Z7f db8e 8d 13 a0 STA Da013 ; hw13 db91 c8 INY db92 b1 5a LDA (Z5a),Y db94 85 80 STA Z80 db96 8d 12 a0 STA Da012 ; hw12 db99 64 84 STZ Z84 db9b 80 0e BRA Ldbab ; no path to the following db9d aa TAX db9e a0 01 LDY #$01 ; 1 . dba0 b1 5a LDA (Z5a),Y dba2 9d 10 04 STA D0410,X dba5 c8 INY dba6 b1 5a LDA (Z5a),Y dba8 9d 20 04 STA D0420,X dbab a5 5a Ldbab: LDA Z5a dbad 18 CLC dbae 69 03 ADC #$03 ; 3 . dbb0 85 5a STA Z5a dbb2 90 08 BCC Ldbbc dbb4 80 04 BRA Ldbba dbb6 e6 5a Ldbb6: INC Z5a dbb8 d0 02 BNE Ldbbc dbba e6 5b Ldbba: INC Z5b ; from IRQ subroutine above. dbbc b2 5a Ldbbc: LDA (Z5a) dbbe 4a LSR ; logical shift right dbbf 4a LSR dbc0 4a LSR dbc1 4a LSR dbc2 f0 0d BEQ Ldbd1 dbc4 c9 0c CMP #$0c ; 12 . dbc6 b0 52 BCS Ldc1a dbc8 0a ASL dbc9 aa TAX dbca b2 5a LDA (Z5a) dbcc 29 0f AND #$0f ; 15 . dbce 7c 35 dc JMP Sdc35 dbd1 b2 5a Ldbd1: LDA (Z5a) dbd3 29 0f AND #$0f ; 15 . dbd5 c9 06 CMP #$06 ; 6 . dbd7 b0 41 BCS Ldc1a dbd9 0a ASL dbda aa TAX dbdb 7c 29 dc JMP Sdc29 dbde a9 01 LDA #$01 ; 1 . dbe0 85 82 STA Z82 dbe2 4c 1e dd JMP Ldd1e dbe5 .byte $64,$82,$20,$b4,$e5,$4c,$24,$dd ; "d. ..L$." dbed .byte $a6,$83,$f0,$27,$bd,$00,$04,$1d ; "...'...." dbf5 .byte $01,$04,$f0,$0d,$de,$00,$04,$d0 ; "........" dbfd .byte $08,$bd,$01,$04,$f0,$0f,$de,$01 ; "........" dc05 .byte $04,$bd,$02,$04,$85,$5a,$bd,$03 ; ".....Z.." dc0d .byte $04,$85,$5b,$80,$aa,$ca,$ca,$ca ; "..[....." dc15 .byte $ca,$86,$83,$80,$9c ; "....." dc1a a9 4f Ldc1a: LDA #$4f ; 79 O dc1c 85 02 STA Z02 dc1e a5 5b LDA Z5b dc20 85 01 STA Z01 dc22 b2 5a LDA (Z5a) dc24 85 00 STA Z00 dc26 4c d1 c9 JMP Lc9d1 dc29 1a Sdc29: INC dc2a dc NOPX dc2b de db 1a DEC D1adb,X dc2e dc NOPX dc2f e5 db SBC Zdb dc31 ed db 88 SBC D88db dc34 .byte $db ; "." dc35 1a Sdc35: INC dc36 dc NOPX dc37 9d db 58 STA D58db,X dc3a dc NOPX dc3b 86 dc STX Zdc dc3d 97 dc SMB1 Zdc dc3f ae dc bc LDX Dbcdc dc42 dc NOPX dc43 cc dc 13 CPY D13dc dc46 dd 4d dc CMP Ddc4d,X dc49 75 dc ADC Zdc,X dc4b 0c dd 1a TSB D1add dc4e 18 CLC dc4f 65 80 ADC Z80 dc51 85 80 STA Z80 dc53 48 PHA dc54 a9 00 LDA #$00 ; 0 . dc56 80 0d BRA Ldc65 dc58 aa TAX dc59 bd 20 04 LDA D0420,X dc5c 18 CLC dc5d 65 80 ADC Z80 dc5f 85 80 STA Z80 dc61 48 PHA dc62 bd 10 04 LDA D0410,X dc65 65 7f Ldc65: ADC Z7f dc67 85 7f STA Z7f dc69 8d 13 a0 STA Da013 ; hw13 dc6c 68 PLA dc6d 8d 12 a0 STA Da012 ; hw12 dc70 64 84 STZ Z84 dc72 4c b6 db JMP Ldbb6 dc75 .byte $1a,$85,$81,$a5,$80,$38,$e5,$81 ; ".....8.." dc7d .byte $85,$80,$48,$a5,$7f,$e9,$00,$80 ; "..H....." dc85 .byte $e1,$aa,$a5,$80,$38,$fd,$20,$04 ; "....8. ." dc8d .byte $85,$80,$48,$a5,$7f,$fd,$10,$04 ; "..H....." dc95 .byte $80,$d0,$aa,$1a,$85,$84,$bd,$10 ; "........" dc9d .byte $04,$85,$7f,$8d,$13,$a0,$bd,$20 ; "....... " dca5 .byte $04,$85,$80,$8d,$12,$a0,$4c,$b6 ; "......L." dcad .byte $db,$aa,$bd,$20,$04,$aa,$bd,$37 ; "... ...7" dcb5 .byte $ee,$8d,$0d,$a0,$4c,$b6,$db,$aa ; "....L..." dcbd .byte $bd,$20,$04,$a6,$b9,$e0,$08,$b0 ; ". ......" dcc5 .byte $01,$0a,$85,$7c,$4c,$b6,$db,$aa ; "...|L..." dccd .byte $bd,$10,$04,$48,$bd,$20,$04,$a6 ; "...H. .." dcd5 .byte $83,$e0,$10,$b0,$23,$e8,$e8,$e8 ; "....#..." dcdd .byte $e8,$86,$83,$9d,$00,$04,$68,$9d ; "......h." dce5 .byte $01,$04,$a5,$5a,$18,$69,$01,$85 ; "...Z.i.." dced .byte $5a,$9d,$02,$04,$a5,$5b,$69,$00 ; "Z....[i." dcf5 .byte $85,$5b,$9d,$03,$04,$4c,$bc,$db ; ".[...L.." dcfd .byte $a9,$8f,$85,$02,$a5,$5b,$85,$01 ; ".....[.." dd05 .byte $a5,$5a,$85,$00,$4c,$d1,$c9,$1a ; ".Z..L..." dd0d .byte $85,$7d,$64,$7e,$80,$0b,$aa,$bd ; ".}d~...." dd15 .byte $20,$04,$85,$7d,$bd,$10,$04,$85 ; " ..}...." dd1d .byte $7e ; "~" dd1e e6 5a Ldd1e: INC Z5a dd20 d0 02 BNE Ldd24 dd22 e6 5b INC Z5b dd24 7a Ldd24: PLY dd25 fa PHX dd26 60 RTS ; IRQ processing can bounce here. dd27 48 Ldd27: PHA dd28 a5 7a LDA Z7a dd2a f0 02 BEQ Ldd2e dd2c 68 PLA dd2d 40 RTI dd2e a9 ff Ldd2e: LDA #$ff ; 255 . dd30 85 7a STA Z7a dd32 da PHX dd33 5a PHY dd34 a5 b9 LDA Zb9 dd36 c9 0a CMP #$0a ; 10 . dd38 30 07 BMI Ldd41 dd3a a5 a3 LDA Za3 dd3c f0 03 BEQ Ldd41 dd3e 20 c7 d0 JSR Sd0c7 dd41 a5 c1 Ldd41: LDA Zc1 dd43 f0 05 BEQ Ldd4a dd45 30 03 BMI Ldd4a dd47 20 5d dd JSR Sdd5d dd4a 20 93 dd Ldd4a: JSR Sdd93 dd4d a5 6c LDA Z6c dd4f d0 03 BNE Ldd54 dd51 20 6a e0 JSR Se06a dd54 20 5e e1 Ldd54: JSR Se15e dd57 7a PLY dd58 fa PHX dd59 68 PLA dd5a 64 7a STZ Z7a dd5c 40 RTI dd5d b2 5a Sdd5d: LDA (Z5a) dd5f e6 5a INC Z5a dd61 a8 TAY dd62 29 f0 AND #$f0 ; 240 . dd64 d0 20 BNE Ldd86 dd66 98 TYA dd67 8d 13 a0 STA Da013 ; hw13 dd6a b2 5a LDA (Z5a) dd6c 8d 12 a0 STA Da012 ; hw12 dd6f e6 5a Ldd6f: INC Z5a dd71 d0 12 BNE Ldd85 dd73 a5 ba LDA Zba dd75 18 CLC dd76 65 bf ADC Zbf dd78 85 d2 STA Zd2 dd7a a5 5b LDA Z5b dd7c 1a INC dd7d c5 5b CMP Z5b dd7f d0 02 BNE Ldd83 dd81 a5 d2 LDA Zd2 dd83 85 5b Ldd83: STA Z5b dd85 60 Ldd85: RTS dd86 c9 f0 Ldd86: CMP #$f0 ; 240 . dd88 d0 07 BNE Ldd91 dd8a 64 5a STZ Z5a dd8c a5 bf LDA Zbf dd8e 85 5b STA Z5b dd90 60 RTS dd91 80 dc Ldd91: BRA Ldd6f dd93 ad 10 b0 Sdd93: LDA Db010 dd96 29 40 AND #$40 ; 64 @ dd98 c5 77 CMP Z77 dd9a d0 10 BNE Lddac dd9c ad 10 b2 LDA Db210 dd9f 2d 50 b2 AND Db250 dda2 c9 ff CMP #$ff ; 255 . dda4 f0 10 BEQ Lddb6 dda6 a5 77 LDA Z77 dda8 49 40 EOR #$40 ; 64 @ ddaa 85 78 STA Z78 ddac 85 77 Lddac: STA Z77 ddae a9 ff LDA #$ff ; 255 . ddb0 8d 10 b2 STA Db210 ddb3 8d 50 b2 STA Db250 ddb6 ad d0 b7 Lddb6: LDA Db7d0 ddb9 85 9b STA Z9b ddbb a2 0c LDX #$0c ; 12 . ; put pointer to $0097 at Z99/Z9a ddbd a9 97 LDA #$97 ; 151 . ddbf 85 99 STA Z99 ddc1 64 9a STZ Z9a ddc3 a5 0e LDA Z0e ddc5 0a ASL ddc6 a8 TAY ddc7 c8 INY ddc8 b5 a9 Lddc8: LDA Za9,X ddca d0 03 BNE Lddcf ddcc 4c 6d df JMP Ldf6d ddcf b5 ab Lddcf: LDA Zab,X ddd1 d0 41 BNE Lde14 ddd3 b2 99 LDA (Z99) ddd5 78 SEI ; disable interrupts ddd6 8d 0c a0 STA Da00c ddd9 a9 04 LDA #$04 ; 4 . dddb 20 00 c0 JSR Sc000 ; delay ddde ad 16 a0 LDA Da016 ; hw16 dde1 a9 04 LDA #$04 ; 4 . dde3 20 00 c0 JSR Sc000 ; delay dde6 ad 17 a0 LDA Da017 ; hw17 dde9 48 PHA ddea ad 16 a0 LDA Da016 ; hw16 dded 58 CLI ; allow interrupts. ddee 99 27 00 STA Z27,Y ddf1 68 PLA ddf2 29 0f AND #$0f ; 15 . ddf4 e4 79 CPX Z79 ddf6 d0 14 BNE Lde0c ddf8 48 PHA ddf9 a5 77 LDA Z77 ddfb c5 78 CMP Z78 ddfd f0 0c BEQ Lde0b ddff 85 78 STA Z78 de01 68 PLA de02 38 SEC de03 e9 04 SBC #$04 ; 4 . de05 10 05 BPL Lde0c de07 a9 00 LDA #$00 ; 0 . de09 80 01 BRA Lde0c de0b 68 Lde0b: PLA de0c 88 Lde0c: DEY de0d 99 27 00 STA Z27,Y de10 88 DEY de11 4c 6d df JMP Ldf6d de14 c9 03 Lde14: CMP #$03 ; 3 . de16 b0 26 BCS Lde3e de18 c9 01 CMP #$01 ; 1 . de1a f0 0a BEQ Lde26 de1c a5 9b LDA Z9b de1e 35 aa AND Zaa,X de20 d5 aa CMP Zaa,X de22 f0 10 BEQ Lde34 de24 80 06 BRA Lde2c de26 a5 9b Lde26: LDA Z9b de28 35 aa AND Zaa,X de2a d0 08 BNE Lde34 de2c a9 00 Lde2c: LDA #$00 ; 0 . de2e 99 27 00 STA Z27,Y de31 4c 4d df JMP Ldf4d de34 a9 e8 Lde34: LDA #$e8 ; 232 . de36 99 27 00 STA Z27,Y de39 a9 03 LDA #$03 ; 3 . de3b 4c 4d df JMP Ldf4d de3e c9 42 Lde3e: CMP #$42 ; 66 B de40 b0 03 BCS Lde45 de42 4c d7 de JMP Lded7 de45 c9 44 Lde45: CMP #$44 ; 68 D de47 90 07 BCC Lde50 de49 c9 80 CMP #$80 ; 128 . de4b b0 03 BCS Lde50 de4d 4c 43 df JMP Ldf43 de50 c9 82 Lde50: CMP #$82 ; 130 . de52 90 03 BCC Lde57 de54 4c 83 df JMP Ldf83 de57 da Lde57: PHX de58 48 PHA de59 8a TXA de5a 0a ASL de5b 0a ASL de5c 0a ASL de5d aa TAX de5e 68 PLA de5f 10 46 BPL Ldea7 de61 c9 81 CMP #$81 ; 129 . de63 d0 19 BNE Lde7e de65 78 SEI ; disable interrupts de66 bd 13 03 LDA D0313,X de69 99 37 00 STA Z37,Y de6c bd 14 03 LDA D0314,X de6f 99 36 00 STA Z36,Y de72 bd 15 03 LDA D0315,X de75 99 27 00 STA Z27,Y de78 bd 16 03 LDA D0316,X de7b 58 CLI ; allow interrupts. de7c 80 55 BRA Lded3 de7e 78 Lde7e: SEI ; disable interrupts de7f bd 0d 03 LDA D030d,X de82 99 37 00 STA Z37,Y de85 bd 0e 03 LDA D030e,X de88 99 36 00 STA Z36,Y de8b bd 0f 03 LDA D030f,X de8e 99 27 00 STA Z27,Y de91 bd 10 03 LDA D0310,X de94 48 PHA de95 9e 0f 03 STZ D030f de98 9e 10 03 STZ D0310 de9b a9 ff LDA #$ff ; 255 . de9d 9d 0d 03 STA D030d,X dea0 9d 0e 03 STA D030e,X dea3 58 CLI ; allow interrupts. dea4 68 PLA dea5 80 2c BRA Lded3 dea7 c9 42 Ldea7: CMP #$42 ; 66 B dea9 f0 13 BEQ Ldebe deab 78 SEI ; disable interrupts deac bd 0f 03 LDA D030f,X deaf 99 27 00 STA Z27,Y deb2 bd 10 03 LDA D0310,X deb5 9e 0f 03 STZ D030f deb8 9e 10 03 STZ D0310 debb 58 CLI ; allow interrupts. debc 80 15 BRA Lded3 debe 78 Ldebe: SEI ; disable interrupts debf bd 0d 03 LDA D030d,X dec2 99 27 00 STA Z27,Y dec5 bd 0e 03 LDA D030e,X dec8 48 PHA dec9 a9 ff LDA #$ff ; 255 . decb 9d 0d 03 STA D030d,X dece 9d 0e 03 STA D030e,X ded1 58 CLI ; allow interrupts. ded2 68 PLA ded3 fa Lded3: PHX ded4 4c 4d df JMP Ldf4d ded7 29 1f Lded7: AND #$1f ; 31 . ded9 c9 09 CMP #$09 ; 9 . dedb 90 66 BCC Ldf43 dedd da PHX dede 5a PHY dedf e9 09 SBC #$09 ; 9 . dee1 4a LSR dee2 48 PHA dee3 8a TXA dee4 0a ASL dee5 0a ASL dee6 0a ASL dee7 85 1a STA Z1a dee9 a9 02 LDA #$02 ; 2 . deeb 85 1b STA Z1b deed 64 17 STZ Z17 deef 64 18 STZ Z18 def1 64 19 STZ Z19 def3 a0 01 LDY #$01 ; 1 . def5 78 SEI ; disable interrupts def6 b1 1a LDA (Z1a),Y def8 85 1d STA Z1d defa c8 INY defb b1 1a LDA (Z1a),Y defd 85 1c STA Z1c deff a0 04 LDY #$04 ; 4 . df01 c4 1c Ldf01: CPY Z1c df03 d0 03 BNE Ldf08 df05 c8 INY df06 80 12 BRA Ldf1a df08 b1 1a Ldf08: LDA (Z1a),Y df0a 18 CLC df0b 65 17 ADC Z17 df0d 85 17 STA Z17 df0f c8 INY df10 b1 1a LDA (Z1a),Y df12 65 18 ADC Z18 df14 85 18 STA Z18 df16 90 02 BCC Ldf1a df18 e6 19 INC Z19 df1a c8 Ldf1a: INY df1b c4 1d CPY Z1d df1d 90 e2 BCC Ldf01 df1f 58 CLI ; allow interrupts. df20 68 PLA df21 f0 0a BEQ Ldf2d df23 aa TAX df24 46 19 Ldf24: LSR Z19 df26 66 18 ROR Z18 df28 66 17 ROR Z17 df2a ca DEX df2b d0 f7 BNE Ldf24 df2d a5 17 Ldf2d: LDA Z17 df2f 7a PLY df30 fa PHX df31 99 27 00 STA Z27,Y df34 a5 19 LDA Z19 df36 f0 07 BEQ Ldf3f df38 a9 ff LDA #$ff ; 255 . df3a 99 27 00 STA Z27,Y df3d 80 0e BRA Ldf4d df3f a5 18 Ldf3f: LDA Z18 df41 80 0a BRA Ldf4d df43 78 Ldf43: SEI ; disable interrupts df44 b9 4a 00 LDA Z4a,Y df47 99 27 00 STA Z27,Y df4a b9 49 00 LDA Z49,Y df4d e4 79 Ldf4d: CPX Z79 df4f d0 16 BNE Ldf67 df51 48 PHA df52 a5 77 LDA Z77 df54 c5 78 CMP Z78 df56 f0 0e BEQ Ldf66 df58 85 78 STA Z78 df5a 68 PLA df5b 18 CLC df5c 69 04 ADC #$04 ; 4 . df5e c9 10 CMP #$10 ; 16 . df60 90 05 BCC Ldf67 df62 a9 0f LDA #$0f ; 15 . df64 80 01 BRA Ldf67 df66 68 Ldf66: PLA df67 88 Ldf67: DEY df68 99 27 00 STA Z27,Y df6b 58 CLI ; allow interrupts. df6c 88 DEY df6d c6 99 Ldf6d: DEC Z99 df6f ca DEX df70 ca DEX df71 ca DEX df72 ca DEX df73 30 03 BMI Ldf78 df75 4c c8 dd JMP Lddc8 df78 60 Ldf78: RTS df79 Ddf79: .byte $0e,$0d,$0c,$0b,$0a,$09,$08,$07 ; "........" df81 .byte $06,$05 ; ".." df83 5a Ldf83: PHY df84 da PHX df85 8a TXA df86 0a ASL df87 0a ASL df88 0a ASL df89 aa TAX df8a bd 00 03 LDA D0300,X df8d a8 TAY df8e 80 0b BRA Ldf9b df90 88 Ldf90: DEY df91 98 Ldf91: TYA df92 9d 00 03 STA D0300,X df95 b9 79 df LDA Ddf79,Y df98 20 54 e0 JSR Se054 df9b 20 fc df Ldf9b: JSR Sdffc df9e a5 17 LDA Z17 dfa0 85 19 STA Z19 dfa2 a5 18 LDA Z18 dfa4 f0 28 BEQ Ldfce dfa6 c9 0f CMP #$0f ; 15 . dfa8 f0 31 BEQ Ldfdb dfaa c0 00 CPY #$00 ; 0 . dfac f0 33 BEQ Ldfe1 dfae 85 1a STA Z1a dfb0 38 SEC dfb1 e9 08 SBC #$08 ; 8 . dfb3 10 0b BPL Ldfc0 dfb5 49 ff EOR #$ff ; 255 . dfb7 48 PHA dfb8 a5 19 LDA Z19 dfba 49 ff EOR #$ff ; 255 . dfbc 1a INC dfbd 85 19 STA Z19 dfbf 68 PLA dfc0 c9 03 Ldfc0: CMP #$03 ; 3 . dfc2 90 cc BCC Ldf90 dfc4 d0 1b BNE Ldfe1 dfc6 a5 19 LDA Z19 dfc8 c9 20 CMP #$20 ; 32 dfca 90 c4 BCC Ldf90 dfcc 80 13 BRA Ldfe1 dfce a5 17 Ldfce: LDA Z17 dfd0 c9 09 CMP #$09 ; 9 . dfd2 b0 0d BCS Ldfe1 dfd4 c0 09 Ldfd4: CPY #$09 ; 9 . dfd6 b0 09 BCS Ldfe1 dfd8 c8 INY dfd9 80 b6 BRA Ldf91 dfdb a5 17 Ldfdb: LDA Z17 dfdd c9 f7 CMP #$f7 ; 247 . dfdf b0 f3 BCS Ldfd4 dfe1 a5 04 Ldfe1: LDA Z04 dfe3 fa PHX dfe4 7a PLY dfe5 99 37 00 STA Z37,Y dfe8 a9 08 LDA #$08 ; 8 . dfea 99 36 00 STA Z36,Y dfed a5 17 LDA Z17 dfef 99 27 00 STA Z27,Y dff2 a5 18 LDA Z18 dff4 99 26 00 STA Z26,Y dff7 88 DEY dff8 88 DEY dff9 4c 6d df JMP Ldf6d dffc da Sdffc: PHX dffd 20 33 e0 JSR Se033 e000 a2 00 LDX #$00 ; 0 . e002 a5 17 Le002: LDA Z17 e004 85 19 STA Z19 e006 a5 18 LDA Z18 e008 85 1a STA Z1a e00a e8 INX e00b e0 c9 CPX #$c9 ; 201 . e00d b0 20 BCS Le02f e00f 20 33 e0 JSR Se033 e012 38 SEC e013 e5 19 SBC Z19 e015 48 PHA e016 a5 18 LDA Z18 e018 e5 1a SBC Z1a e01a f0 0e BEQ Le02a e01c c9 ff CMP #$ff ; 255 . e01e f0 03 BEQ Le023 e020 68 PLA e021 80 df BRA Le002 e023 68 Le023: PLA e024 c9 fb CMP #$fb ; 251 . e026 90 da BCC Le002 e028 80 05 BRA Le02f e02a 68 Le02a: PLA e02b c9 05 CMP #$05 ; 5 . e02d b0 d3 BCS Le002 e02f 86 04 Le02f: STX Z04 e031 fa PHX e032 60 RTS e033 78 Se033: SEI ; disable interrupts e034 b2 99 LDA (Z99) e036 8d 0c a0 STA Da00c e039 a9 04 LDA #$04 ; 4 . e03b 20 00 c0 JSR Sc000 ; delay e03e ad 16 a0 LDA Da016 ; hw16 e041 a9 04 LDA #$04 ; 4 . e043 20 00 c0 JSR Sc000 ; delay e046 ad 17 a0 LDA Da017 ; hw17 e049 29 0f AND #$0f ; 15 . e04b 85 18 STA Z18 e04d ad 16 a0 LDA Da016 ; hw16 e050 58 CLI ; allow interrupts. e051 85 17 STA Z17 e053 60 RTS e054 da Se054: PHX e055 5a PHY e056 85 01 STA Z01 e058 8a TXA e059 4a LSR e05a 4a LSR e05b 4a LSR e05c 4a LSR e05d 4a LSR e05e 85 03 STA Z03 e060 a9 03 LDA #$03 ; 3 . e062 85 02 STA Z02 e064 20 9c cf JSR Scf9c e067 7a PLY e068 fa PHX e069 60 RTS e06a a5 bb Se06a: LDA Zbb e06c 29 04 AND #$04 ; 4 . e06e f0 10 BEQ Le080 e070 a5 77 LDA Z77 e072 c5 76 CMP Z76 e074 d0 01 BNE Le077 e076 60 RTS e077 85 76 Le077: STA Z76 e079 45 a8 EOR Za8 e07b 29 40 AND #$40 ; 64 @ e07d d0 2b BNE Le0aa e07f 60 RTS e080 a6 75 Le080: LDX Z75 e082 b5 27 LDA Z27,X e084 29 0f AND #$0f ; 15 . e086 c5 a6 CMP Za6 e088 90 09 BCC Le093 e08a d0 12 BNE Le09e e08c e8 INX e08d b5 27 LDA Z27,X e08f c5 a5 CMP Za5 e091 b0 0b BCS Le09e e093 a5 76 Le093: LDA Z76 e095 f0 06 BEQ Le09d e097 64 76 STZ Z76 e099 a5 a7 LDA Za7 e09b d0 0d BNE Le0aa e09d 60 Le09d: RTS e09e a5 76 Le09e: LDA Z76 e0a0 d0 fb BNE Le09d e0a2 a9 ff LDA #$ff ; 255 . e0a4 85 76 STA Z76 e0a6 a5 a7 LDA Za7 e0a8 d0 f3 BNE Le09d e0aa 24 bb Le0aa: BIT Zbb e0ac 70 12 BVS Le0c0 e0ae a5 6d LDA Z6d e0b0 05 6e ORA Z6e e0b2 d0 03 BNE Le0b7 e0b4 4c 4d e1 JMP Le14d e0b7 a9 40 Le0b7: LDA #$40 ; 64 @ e0b9 85 6c STA Z6c e0bb a9 a1 LDA #$a1 ; 161 . e0bd 85 a2 STA Za2 e0bf 60 RTS e0c0 a5 62 Le0c0: LDA Z62 e0c2 38 SEC e0c3 e5 ca SBC Zca e0c5 85 6d STA Z6d e0c7 85 71 STA Z71 e0c9 a5 63 LDA Z63 e0cb e5 cb SBC Zcb e0cd 85 6e STA Z6e e0cf 85 72 STA Z72 e0d1 a5 49 LDA Z49 e0d3 4a LSR e0d4 3a DEC e0d5 aa TAX e0d6 f0 10 BEQ Le0e8 e0d8 a5 6d Le0d8: LDA Z6d e0da 18 CLC e0db 65 71 ADC Z71 e0dd 85 71 STA Z71 e0df a5 6e LDA Z6e e0e1 65 72 ADC Z72 e0e3 85 72 STA Z72 e0e5 ca DEX e0e6 d0 f0 BNE Le0d8 e0e8 06 71 Le0e8: ASL Z71 e0ea 26 72 ROL Z72 e0ec a5 6f LDA Z6f e0ee f0 26 BEQ Le116 e0f0 a5 5c LDA Z5c e0f2 38 SEC e0f3 e5 71 SBC Z71 e0f5 a5 5d LDA Z5d e0f7 e5 72 SBC Z72 e0f9 c5 0b CMP Z0b e0fb b0 19 BCS Le116 e0fd a5 bb LDA Zbb e0ff 6a ROR e100 90 01 BCC Le103 e102 60 RTS e103 a5 5c Le103: LDA Z5c e105 85 71 STA Z71 e107 a5 5d LDA Z5d e109 38 SEC e10a e5 0b SBC Z0b e10c 85 72 STA Z72 e10e a5 73 LDA Z73 e110 85 6d STA Z6d e112 a5 74 LDA Z74 e114 85 6e STA Z6e e116 a5 6d Le116: LDA Z6d e118 85 66 STA Z66 e11a a5 6e LDA Z6e e11c 85 67 STA Z67 e11e a5 62 LDA Z62 e120 38 SEC e121 e5 6d SBC Z6d e123 85 62 STA Z62 e125 a5 63 LDA Z63 e127 e5 6e SBC Z6e e129 85 63 STA Z63 e12b a5 71 LDA Z71 e12d 85 60 STA Z60 e12f a5 72 LDA Z72 e131 85 61 STA Z61 e133 a5 5c LDA Z5c e135 38 SEC e136 e5 71 SBC Z71 e138 85 5e STA Z5e e13a a5 5d LDA Z5d e13c e5 72 SBC Z72 e13e 85 5f STA Z5f e140 c5 0b CMP Z0b e142 b0 11 BCS Le155 e144 65 0c ADC Z0c e146 38 SEC e147 e5 0b SBC Z0b e149 85 5f STA Z5f e14b 80 08 BRA Le155 e14d a5 5c Le14d: LDA Z5c e14f 85 5e STA Z5e e151 a5 5d LDA Z5d e153 85 5f STA Z5f e155 a9 80 Le155: LDA #$80 ; 128 . e157 85 6c STA Z6c e159 a9 9c LDA #$9c ; 156 . e15b 85 a2 STA Za2 e15d 60 RTS e15e a5 64 Se15e: LDA Z64 e160 f0 09 BEQ Le16b e162 a5 61 LDA Z61 e164 c5 0d CMP Z0d e166 d0 03 BNE Le16b e168 4c fd e1 JMP Le1fd e16b a5 47 Le16b: LDA Z47 e16d 85 48 STA Z48 e16f e6 73 INC Z73 e171 d0 02 BNE Le175 e173 e6 74 INC Z74 e175 a5 77 Le175: LDA Z77 e177 29 40 AND #$40 ; 64 @ e179 92 5c STA e17b a5 61 LDA Z61 e17d 4a LSR e17e 4a LSR e17f 12 5c ORA e181 92 5c STA e183 e6 5c INC Z5c e185 ad d0 b7 LDA Db7d0 e188 92 5c STA e18a 20 cb e1 JSR Se1cb e18d a2 00 LDX #$00 ; 0 . e18f a0 ff LDY #$ff ; 255 . e191 b5 27 Le191: LDA Z27,X e193 92 5c STA e195 e6 5c INC Z5c e197 b5 28 LDA Z28,X e199 92 5c STA e19b 20 cb e1 JSR Se1cb e19e 46 48 LSR Z48 e1a0 90 0d BCC Le1af e1a2 b5 37 LDA Z37,X e1a4 92 5c STA e1a6 e6 5c INC Z5c e1a8 b5 38 LDA Z38,X e1aa 92 5c STA e1ac 20 cb e1 JSR Se1cb e1af e8 Le1af: INX e1b0 e8 INX e1b1 c8 INY e1b2 c4 0e CPY Z0e e1b4 d0 db BNE Le191 e1b6 a5 6c LDA Z6c e1b8 f0 10 BEQ Le1ca e1ba 30 22 BMI Le1de e1bc c6 6d DEC Z6d e1be a5 6d LDA Z6d e1c0 c9 ff CMP #$ff ; 255 . e1c2 d0 06 BNE Le1ca e1c4 a5 6e LDA Z6e e1c6 f0 85 BEQ Le14d e1c8 c6 6e DEC Z6e e1ca 60 Le1ca: RTS e1cb e6 5c Se1cb: INC Z5c e1cd d0 0e BNE Le1dd e1cf e6 5d INC Z5d e1d1 a5 5d LDA Z5d e1d3 c5 0c CMP Z0c e1d5 d0 06 BNE Le1dd e1d7 a5 0b LDA Z0b e1d9 85 5d STA Z5d e1db 64 6f STZ Z6f e1dd 60 Le1dd: RTS e1de a5 49 Le1de: LDA Z49 e1e0 18 CLC e1e1 65 60 ADC Z60 e1e3 85 60 STA Z60 e1e5 90 02 BCC Le1e9 e1e7 e6 61 INC Z61 e1e9 e6 66 Le1e9: INC Z66 e1eb d0 02 BNE Le1ef e1ed e6 67 INC Z67 e1ef c6 62 Le1ef: DEC Z62 e1f1 a5 62 LDA Z62 e1f3 c9 ff CMP #$ff ; 255 . e1f5 d0 02 BNE Le1f9 e1f7 c6 63 DEC Z63 e1f9 05 63 Le1f9: ORA Z63 e1fb d0 05 BNE Le202 e1fd a9 40 Le1fd: LDA #$40 ; 64 @ e1ff 8d 90 b3 STA Db390 e202 60 Le202: RTS e203 .byte $a6,$01,$20,$19,$e2,$20,$7a,$e7 ; ".. .. z." e20b .byte $4c,$a8,$e7,$a2,$ff,$20,$19,$e2 ; "L.... .." e213 .byte $20,$7a,$e7,$4c,$a8,$e7,$20,$53 ; " z.L.. S" e21b .byte $e3,$86,$01,$a2,$0f,$a9,$03,$e4 ; "........" e223 .byte $01,$d0,$02,$09,$10,$8d,$d0,$b3 ; "........" e22b .byte $20,$64,$e3,$09,$08,$8d,$d0,$b3 ; " d......" e233 .byte $20,$61,$e3,$29,$f7,$8d,$d0,$b3 ; " a.)...." e23b .byte $20,$64,$e3,$ca,$10,$df,$a9,$03 ; " d......" e243 .byte $8d,$d0,$b3,$20,$61,$e3,$60,$20 ; "... a.` " e24b .byte $65,$e2,$24,$93,$50,$09,$20,$10 ; "e.$.P. ." e253 .byte $ea,$20,$1a,$ea,$4c,$a8,$e7,$48 ; ". ..L..H" e25b .byte $20,$82,$e7,$68,$20,$92,$e6,$4c ; " ..h ..L" e263 .byte $a8,$e7,$20,$53,$e3,$20,$af,$e2 ; ".. S. .." e26b .byte $a5,$02,$18,$20,$d4,$e2,$48,$a5 ; "... ..H." e273 .byte $01,$20,$dd,$e2,$68,$4c,$c0,$e2 ; ". ..hL.." e27b .byte $20,$53,$e3,$20,$af,$e2,$a5,$01 ; " S. ...." e283 .byte $38,$20,$d4,$e2,$48,$20,$04,$e3 ; "8 ..H .." e28b .byte $20,$c0,$e2,$a8,$24,$93,$50,$0e ; " ...$.P." e293 .byte $98,$20,$10,$ea,$68,$20,$10,$ea ; ". ..h .." e29b .byte $20,$1a,$ea,$4c,$a8,$e7,$20,$82 ; " ..L.. ." e2a3 .byte $e7,$98,$20,$92,$e6,$68,$20,$92 ; ".. ..h ." e2ab .byte $e6,$4c,$a8,$e7,$a2,$03,$8e,$d0 ; ".L......" e2b3 .byte $b3,$20,$64,$e3,$a2,$01,$8e,$d0 ; ". d....." e2bb .byte $b3,$20,$64,$e3,$60,$20,$61,$e3 ; ". d.` a." e2c3 .byte $a2,$01,$8e,$d0,$b3,$20,$64,$e3 ; "..... d." e2cb .byte $a2,$03,$8e,$d0,$b3,$20,$64,$e3 ; "..... d." e2d3 .byte $60,$2a,$29,$0f,$09,$40,$20,$dd ; "`*)..@ ." e2db .byte $e2,$60,$a0,$08,$9c,$d0,$b3,$20 ; ".`..... " e2e3 .byte $64,$e3,$0a,$a2,$00,$90,$02,$a2 ; "d......." e2eb .byte $02,$8e,$d0,$b3,$20,$64,$e3,$e8 ; ".... d.." e2f3 .byte $8e,$d0,$b3,$20,$61,$e3,$ca,$8e ; "... a..." e2fb .byte $d0,$b3,$88,$d0,$e2,$20,$34,$e3 ; "..... 4." e303 .byte $60,$a0,$08,$a9,$1d,$8d,$d0,$b0 ; "`......." e30b .byte $a9,$04,$8d,$d0,$b3,$20,$61,$e3 ; "..... a." e313 .byte $a2,$05,$8e,$d0,$b3,$20,$61,$e3 ; "..... a." e31b .byte $0a,$aa,$ad,$d0,$b3,$29,$02,$f0 ; ".....).." e323 .byte $01,$e8,$8a,$a2,$04,$8e,$d0,$b3 ; "........" e32b .byte $88,$d0,$e2,$a8,$20,$34,$e3,$98 ; ".... 4.." e333 .byte $60,$20,$61,$e3,$a9,$05,$8d,$d0 ; "` a....." e33b .byte $b3,$a9,$1d,$8d,$d0,$b0,$20,$61 ; "...... a" e343 .byte $e3,$ad,$d0,$b3,$29,$02,$4a,$a2 ; "....).J." e34b .byte $1f,$8e,$d0,$b0,$9c,$d0,$b3,$60 ; ".......`" e353 .byte $ad,$10,$b3,$29,$fe,$8d,$10,$b3 ; "...)...." e35b .byte $a9,$1f,$8d,$d0,$b0,$60,$20,$64 ; ".....` d" e363 .byte $e3,$48,$20,$07,$c0,$68,$60,$b9 ; ".H ..h`." e36b .byte $94,$00,$8d,$0c,$a0,$a9,$14,$20 ; "....... " e373 .byte $00,$c0,$20,$c7,$d0,$ad,$16,$a0 ; ".. ....." e37b .byte $a9,$04,$20,$00,$c0,$ad,$17,$a0 ; ".. ....." e383 .byte $29,$0f,$85,$02,$ad,$16,$a0,$85 ; ")......." e38b .byte $01,$60 ; ".`" e38d 64 98 Se38d: STZ Z98 e38f c9 00 CMP #$00 ; 0 . e391 f0 30 BEQ Le3c3 e393 a9 88 LDA #$88 ; 136 . e395 85 9b STA Z9b e397 a2 0c LDX #$0c ; 12 . e399 b5 a9 Le399: LDA Za9,X e39b f0 1e BEQ Le3bb e39d b5 ac LDA Zac,X e39f 29 40 AND #$40 ; 64 @ e3a1 49 40 EOR #$40 ; 64 @ e3a3 f0 02 BEQ Le3a7 e3a5 a9 0f LDA #$0f ; 15 . e3a7 85 9c Le3a7: STA Z9c e3a9 b5 ac LDA Zac,X e3ab 29 20 AND #$20 ; 32 e3ad 49 20 EOR #$20 ; 32 e3af f0 02 BEQ Le3b3 e3b1 a9 f0 LDA #$f0 ; 240 . e3b3 05 9c Le3b3: ORA Z9c e3b5 25 9b AND Z9b e3b7 05 98 ORA Z98 e3b9 85 98 STA Z98 e3bb 46 9b Le3bb: LSR Z9b e3bd ca DEX e3be ca DEX e3bf ca DEX e3c0 ca DEX e3c1 10 d6 BPL Le399 e3c3 a5 98 Le3c3: LDA Z98 e3c5 8d 08 a0 STA Da008 e3c8 f0 05 BEQ Le3cf e3ca a9 ff LDA #$ff ; 255 . e3cc 20 0f c0 JSR Sc00f e3cf 60 Le3cf: RTS ; set up the IRQ handler in the zero page ; 3 bytes are used, set to 4c 49 ed ; This is a JMP $ed49 ; This is done once and for all here, so ; bouncing through the zero page address is ; really not necessary, but it does allow ; dynamic patching and screwing around. e3d0 78 Se3d0: SEI ; disable interrupts e3d1 a9 4c LDA #$4c ; 76 L e3d3 85 dd STA IRQ e3d5 a9 49 LDA #$49 ; 73 I e3d7 85 de STA Zde e3d9 a9 ed LDA #$ed ; 237 . e3db 85 df STA Zdf e3dd a9 ff Le3dd: LDA #$ff ; 255 . e3df 8d 50 b3 STA Db350 e3e2 58 CLI ; allow interrupts. e3e3 9c d0 b0 STZ Db0d0 e3e6 ad d0 b0 LDA Db0d0 e3e9 d0 7a BNE Le465 e3eb a9 7f LDA #$7f ; 127 . e3ed 8d 90 b3 STA Db390 e3f0 ad 90 b3 LDA Db390 e3f3 c9 80 CMP #$80 ; 128 . e3f5 d0 6e BNE Le465 e3f7 a9 40 LDA #$40 ; 64 @ e3f9 8d d0 b2 STA Db2d0 e3fc cd d0 b2 CMP Db2d0 e3ff d0 64 BNE Le465 e401 a9 30 LDA #$30 ; 48 0 e403 8d 90 b0 STA Db090 e406 cd 90 b0 CMP Db090 e409 d0 5a BNE Le465 e40b 8d 10 b0 STA Db010 e40e a5 b9 LDA Zb9 e410 c9 08 CMP #$08 ; 8 . e412 b0 09 BCS Le41d e414 a9 d0 LDA #$d0 ; 208 . e416 8d 10 b1 STA Db110 e419 a9 07 LDA #$07 ; 7 . e41b 80 07 BRA Le424 e41d a9 a0 Le41d: LDA #$a0 ; 160 . e41f 8d 10 b1 STA Db110 e422 a9 0f LDA #$0f ; 15 . e424 8d 50 b1 Le424: STA Db150 e427 a5 ce LDA Zce e429 29 20 AND #$20 ; 32 e42b 4a LSR e42c 4a LSR e42d 4a LSR e42e 4a LSR e42f 09 0c ORA #$0c ; 12 . e431 8d 10 b3 STA Db310 e434 a9 7f Le434: LDA #$7f ; 127 . e436 8d 90 b3 STA Db390 e439 ad 90 b3 LDA Db390 e43c c9 80 CMP #$80 ; 128 . e43e d0 2e BNE Le46e e440 a9 ff LDA #$ff ; 255 . e442 8d 50 b7 STA Db750 e445 9c d0 b4 STZ Db4d0 e448 ad d0 b4 LDA Db4d0 e44b d0 21 BNE Le46e e44d a9 ff LDA #$ff ; 255 . e44f 8d 90 b4 STA Db490 e452 ad 90 b4 LDA Db490 e455 c9 ff CMP #$ff ; 255 . e457 d0 15 BNE Le46e e459 a9 ff LDA #$ff ; 255 . e45b 8d 10 b4 STA Db410 e45e 9c 10 b7 STZ Db710 e461 9c d0 b6 STZ Db6d0 e464 60 RTS e465 ad 49 ee Le465: LDA Dee49 e468 20 2a ec JSR Sec2a e46b 4c dd e3 JMP Le3dd e46e ad 4d ee Le46e: LDA Dee4d e471 20 2a ec JSR Sec2a e474 80 be BRA Le434 e476 20 9e e4 Se476: JSR Se49e ; only called from one place (BONGO) e479 a9 21 Se479: LDA #$21 ; 33 ! e47b 20 ff e4 JSR Se4ff e47e 20 d0 e3 JSR Se3d0 e481 20 b8 e4 JSR Se4b8 e484 64 c0 STZ Zc0 ; zero a bunch of zero page things e486 64 a3 STZ Za3 e488 64 c1 STZ Zc1 e48a 64 cc STZ Zcc e48c 64 cd STZ Zcd e48e 64 bd STZ Zbd e490 ad 16 a0 LDA Da016 ; hw16 e493 a9 08 LDA #$08 ; 8 . e495 85 cd STA Zcd e497 20 b4 e5 JSR Se5b4 e49a 20 91 e7 JSR Se791 e49d 60 RTS e49e a9 03 Se49e: LDA #$03 ; 3 . e4a0 8d 10 a8 STA Da810 e4a3 ad 10 a8 LDA Da810 e4a6 29 f6 AND #$f6 ; 246 . e4a8 d0 06 BNE Le4b0 e4aa a5 cf LDA Zcf e4ac 8d 10 a8 STA Da810 e4af 60 RTS e4b0 ad 4a ee Le4b0: LDA Dee4a e4b3 20 2a ec JSR Sec2a e4b6 80 e6 BRA Se49e ; called from 2 places e4b8 64 ac Se4b8: STZ Zac e4ba 64 b0 STZ Zb0 e4bc 64 b4 STZ Zb4 e4be 64 b8 STZ Zb8 e4c0 9c 08 a0 STZ Da008 ; device. e4c3 a9 ff LDA #$ff e4c5 8d 09 a0 STA Da009 ; device. e4c8 a2 03 LDX #$03 e4ca a9 00 LDA #$00 e4cc 8d 0c a0 STA Da00c ; device. ; store zeros in Z94, Z95, Z96 (why not unroll?) e4cf 95 94 Le4cf: STA Z94,X e4d1 ca DEX e4d2 10 fb BPL Le4cf e4d4 a9 00 LDA #$00 ; 0 . e4d6 20 8d e3 JSR Se38d e4d9 a9 01 LDA #$01 ; 1 . e4db 85 9f STA Z9f e4dd 60 RTS e4de .byte $20,$7a,$e7,$a9,$01,$a6,$02,$f0 ; " z......" e4e6 .byte $0c,$a9,$21,$e0,$04,$f0,$06,$a9 ; "..!....." e4ee .byte $22,$e0,$16,$d0,$09,$a6,$01,$d0 ; ""......." e4f6 .byte $02,$09,$04,$20,$ff,$e4,$4c,$a8 ; "... ..L." e4fe .byte $e7 ; "." ; only called from one place. e4ff 29 27 Se4ff: AND #$27 ; 39 ' e501 48 PHA e502 29 03 AND #$03 ; 3 . e504 d0 06 BNE Le50c e506 68 PLA e507 09 01 ORA #$01 ; 1 . e509 48 PHA e50a 80 08 BRA Le514 e50c c9 03 Le50c: CMP #$03 ; 3 . e50e d0 04 BNE Le514 e510 68 PLA e511 29 fd AND #$fd ; 253 . e513 48 PHA ; loop indefinitely until either bit $08 or $02 gets set. e514 ad 10 a8 Le514: LDA Da810 e517 29 08 AND #$08 ; 8 . e519 d0 07 BNE Le522 e51b ad 10 a8 LDA Da810 e51e 29 02 AND #$02 ; 2 . e520 f0 f2 BEQ Le514 e522 a9 32 Le522: LDA #$32 ; 50 2 e524 20 0f c0 JSR Sc00f e527 68 PLA e528 85 ce STA Zce e52a 29 20 AND #$20 ; 32 e52c 4a LSR e52d 4a LSR e52e 4a LSR e52f 4a LSR e530 a9 01 LDA #$01 ; 1 . e532 09 0c ORA #$0c ; 12 . e534 8d 10 b3 STA Db310 e537 a5 ce LDA Zce e539 29 07 AND #$07 ; 7 . e53b 09 10 ORA #$10 ; 16 . e53d 85 cf STA Zcf e53f 8d 10 a8 STA Da810 e542 60 RTS e543 64 99 Se543: STZ Z99 e545 38 SEC e546 e9 04 SBC #$04 ; 4 . e548 a8 TAY e549 a2 0c LDX #$0c ; 12 . e54b 38 Le54b: SEC e54c b5 ac LDA Zac,X e54e 29 10 AND #$10 ; 16 . e550 d0 01 BNE Le553 e552 18 CLC e553 26 9b Le553: ROL Z9b e555 b5 ac LDA Zac,X e557 18 CLC e558 c8 INY e559 d0 03 BNE Le55e e55b 85 9c STA Z9c e55d 38 SEC e55e 26 99 Le55e: ROL Z99 e560 ca DEX e561 ca DEX e562 ca DEX e563 ca DEX e564 10 e5 BPL Le54b e566 a5 9f LDA Z9f e568 05 bd ORA Zbd e56a f0 2d BEQ Le599 e56c a0 00 LDY #$00 ; 0 . e56e a5 9c LDA Z9c e570 29 40 AND #$40 ; 64 @ e572 d0 02 BNE Le576 e574 a4 99 LDY Z99 e576 84 9a Le576: STY Z9a e578 a0 00 LDY #$00 ; 0 . e57a a5 9c LDA Z9c e57c 29 20 AND #$20 ; 32 e57e d0 02 BNE Le582 e580 a4 99 LDY Z99 e582 98 Le582: TYA e583 0a ASL e584 0a ASL e585 0a ASL e586 0a ASL e587 05 9a ORA Z9a e589 a8 TAY e58a a5 99 LDA Z99 e58c 0a ASL e58d 0a ASL e58e 0a ASL e58f 0a ASL e590 05 99 ORA Z99 e592 49 ff EOR #$ff ; 255 . e594 25 98 AND Z98 e596 85 98 STA Z98 e598 98 TYA e599 05 98 Le599: ORA Z98 e59b 85 98 STA Z98 e59d 8d 08 a0 STA Da008 e5a0 a5 9b LDA Z9b e5a2 8d 09 a0 STA Da009 e5a5 a5 9c LDA Z9c e5a7 29 0f AND #$0f ; 15 . e5a9 8d 0a a0 STA Da00a e5ac a5 99 LDA Z99 e5ae 49 ff EOR #$ff ; 255 . e5b0 8d 0b a0 STA Da00b e5b3 60 RTS e5b4 a6 c0 Se5b4: LDX Zc0 e5b6 bd 37 ee LDA Dee37,X e5b9 8d 0d a0 STA Da00d e5bc a5 cd LDA Zcd e5be 8d 13 a0 STA Da013 ; hw13 e5c1 a5 cc LDA Zcc e5c3 8d 12 a0 STA Da012 ; hw12 e5c6 60 RTS e5c7 .byte $a5,$bb,$29,$0c,$f0,$09,$a5,$be ; "..)....." e5cf .byte $0a,$0a,$0a,$0a,$85,$a8,$60,$a5 ; "......`." e5d7 .byte $be,$f0,$05,$a9,$00,$aa,$80,$04 ; "........" e5df .byte $a9,$ff,$a2,$0f,$85,$a7,$45,$c2 ; "......E." e5e7 .byte $18,$65,$c8,$85,$a5,$8a,$85,$a8 ; ".e......" e5ef .byte $45,$c3,$65,$c9,$85,$a6,$60,$ad ; "E.e...`." e5f7 .byte $10,$b0,$29,$cf,$85,$00,$a5,$bb ; "..)....." e5ff .byte $0a,$0a,$49,$30,$05,$00,$8d,$10 ; "..I0...." e607 .byte $b0,$a5,$bb,$29,$0c,$f0,$0f,$a5 ; "...)...." e60f .byte $be,$49,$01,$0a,$0a,$0a,$0a,$85 ; ".I......" e617 .byte $a8,$a9,$f0,$85,$a6,$60,$a9,$00 ; ".....`.." e61f .byte $a6,$bb,$f0,$17,$a6,$be,$f0,$02 ; "........" e627 .byte $a9,$ff,$aa,$85,$a7,$45,$c2,$85 ; ".....E.." e62f .byte $a5,$8a,$29,$0f,$85,$a8,$45,$c3 ; "..)...E." e637 .byte $85,$a6,$60,$85,$a8,$85,$a6,$60 ; "..`....`" e63f .byte $18,$ad,$10,$a8,$29,$01,$f0,$0b ; "....)..." e647 .byte $ad,$10,$a8,$29,$70,$d0,$05,$ad ; "...)p..." e64f .byte $30,$a8,$38,$60,$ad,$30,$a8,$4c ; "0.8`.0.L" e657 .byte $f1,$e6,$ad,$10,$a8,$29,$01,$f0 ; ".....).." e65f .byte $09,$ad,$10,$a8,$29,$70,$d0,$ec ; "....)p.." e667 .byte $a9,$ff,$60,$48,$ad,$10,$a8,$29 ; "..`H...)" e66f .byte $08,$d0,$10,$ad,$10,$a8,$29,$02 ; "......)." e677 .byte $f0,$06,$68,$8d,$30,$a8,$38,$60 ; "..h.0.8`" e67f .byte $68,$18,$60,$4c,$f1,$e6,$ad,$10 ; "h.`L...." e687 .byte $a8,$29,$08,$d0,$f6,$ad,$10,$a8 ; ".)......" e68f .byte $29,$02,$60 ; ").`" e692 48 Se692: PHA e693 ad 10 a8 Le693: LDA Da810 e696 29 08 AND #$08 ; 8 . e698 d0 0c BNE Le6a6 e69a ad 10 a8 LDA Da810 e69d 29 02 AND #$02 ; 2 . e69f f0 f2 BEQ Le693 e6a1 68 PLA e6a2 8d 30 a8 STA Da830 e6a5 60 RTS e6a6 68 Le6a6: PLA e6a7 4c f1 e6 JMP Le6f1 ; called as subroutine e6aa 64 9d Se6aa: STZ Z9d e6ac 64 9e STZ Z9e e6ae e6 9d Le6ae: INC Z9d e6b0 d0 04 BNE Le6b6 e6b2 e6 9e INC Z9e e6b4 f0 19 BEQ Le6cf e6b6 ad 10 a8 Le6b6: LDA Da810 e6b9 29 08 AND #$08 ; 8 . e6bb d0 34 BNE Le6f1 e6bd ad 10 a8 LDA Da810 e6c0 29 01 AND #$01 ; 1 . e6c2 f0 ea BEQ Le6ae e6c4 ad 10 a8 LDA Da810 e6c7 29 70 AND #$70 ; 112 p e6c9 d0 26 BNE Le6f1 e6cb ad 30 a8 LDA Da830 e6ce 60 RTS e6cf a5 9f Le6cf: LDA Z9f e6d1 f0 0d BEQ Le6e0 e6d3 c6 9f DEC Z9f e6d5 d0 09 BNE Le6e0 e6d7 a5 bd LDA Zbd e6d9 85 9f STA Z9f e6db d0 03 BNE Le6e0 e6dd 20 8d e3 JSR Se38d e6e0 a5 a2 Le6e0: LDA Za2 e6e2 4a LSR e6e3 d0 02 BNE Le6e7 e6e5 a9 20 LDA #$20 ; 32 e6e7 85 a2 Le6e7: STA Za2 e6e9 49 ff EOR #$ff ; flip all bits e6eb 8d 10 a0 STA Da010 ; 7seg e6ee 4c a5 e7 JMP Le7a5 ; Many people jump here from far away. ; in particular, RESET code jumps here once it is happy. ; first thing it does is to reinitialize the stack pointer ; for no good reason, I will call this "bongo" ; BONGO: e6f1 a2 ff Le6f1: LDX #$ff e6f3 9a TXS e6f4 20 79 e4 JSR Se479 e6f7 a5 cf LDA Zcf e6f9 09 40 ORA #$40 ; 64 @ e6fb 8d 10 a8 STA Da810 ; one jump comes here. e6fe a9 ff Le6fe: LDA #$ff e700 85 9d STA Z9d e702 85 9e STA Z9e e704 a2 ff Le704: LDX #$ff e706 9a TXS e707 86 d5 STX Zd5 e709 a2 64 LDX #$64 ; 100 d e70b ad 30 a8 LDA Da830 e70e 80 15 BRA Le725 ; folks jump here. e710 a2 64 Le710: LDX #$64 ; 100 d e712 24 93 Le712: BIT Z93 e714 10 15 BPL Le72b e716 ad 15 b8 LDA Db815 e719 29 10 AND #$10 ; 16 . e71b f0 0e BEQ Le72b e71d 20 fd e8 JSR Se8fd e720 90 03 BCC Le725 e722 4c 01 e8 JMP Le801 e725 a5 9e Le725: LDA Z9e e727 09 f8 ORA #$f8 ; 248 . e729 85 9e STA Z9e e72b e6 9d Le72b: INC Z9d e72d d0 04 BNE Le733 e72f e6 9e INC Z9e e731 f0 18 BEQ Le74b e733 ad 10 a8 Le733: LDA Da810 e736 29 08 AND #$08 ; 8 . e738 d0 d8 BNE Le712 e73a ad 10 a8 LDA Da810 e73d 29 01 AND #$01 ; 1 . e73f f0 d1 BEQ Le712 e741 ad 10 a8 LDA Da810 e744 29 70 AND #$70 ; 112 p e746 f0 17 BEQ Le75f e748 ad 30 a8 LDA Da830 e74b a0 ff Le74b: LDY #$ff e74d e6 a2 INC Za2 e74f a5 a2 LDA Za2 e751 29 01 AND #$01 ; 1 . e753 d0 02 BNE Le757 e755 a0 c0 LDY #$c0 ; 1100 0000 e757 98 Le757: TYA ; A = Y e758 8d 10 a0 STA Da010 ; 7seg e75b 64 9e STZ Z9e e75d 80 b1 BRA Le710 e75f ad 30 a8 Le75f: LDA Da830 e762 c9 0f CMP #$0f ; 15 . e764 d0 aa BNE Le710 e766 a9 bf LDA #$bf ; 1011 1111 e768 8d 10 a0 STA Da010 ; 7seg e76b 64 9d STZ Z9d e76d 64 9e STZ Z9e e76f ca DEX e770 d0 c1 BNE Le733 e772 ca DEX e773 a5 cf LDA Zcf e775 8d 10 a8 STA Da810 e778 80 2b BRA Le7a5 e77a 24 93 BIT Z93 e77c 50 08 BVC Le786 e77e 20 1a ea JSR Sea1a e781 60 RTS e782 .byte $24,$93,$70,$0a ; "$.p." e786 a5 d3 Le786: LDA Zd3 e788 1a INC e789 29 7f AND #$7f ; 127 . e78b 85 d3 STA Zd3 e78d 20 92 e6 JSR Se692 e790 60 RTS e791 a9 40 Se791: LDA #$40 ; 64 @ e793 85 da STA Zda e795 a9 f0 LDA #$f0 ; 240 . e797 85 db STA Zdb e799 a9 33 LDA #$33 ; 51 3 e79b 85 d0 STA Zd0 e79d 49 a5 EOR #$a5 ; 165 . e79f 85 e1 STA Ze1 e7a1 60 RTS e7a2 4c 10 e7 Le7a2: JMP Le710 e7a5 a6 d5 Le7a5: LDX Zd5 e7a7 9a TXS e7a8 ba Le7a8: TSX e7a9 86 d5 STX Zd5 e7ab a5 93 LDA Z93 e7ad 10 7a BPL Le829 e7af 29 bf AND #$bf ; 191 . e7b1 85 93 STA Z93 e7b3 a2 00 LDX #$00 ; 0 . e7b5 88 Le7b5: DEY e7b6 d0 2b BNE Le7e3 e7b8 ca DEX e7b9 d0 28 BNE Le7e3 e7bb e6 a2 INC Za2 e7bd a5 a2 LDA Za2 e7bf 29 07 AND #$07 ; 7 . e7c1 c9 06 CMP #$06 ; 6 . e7c3 90 02 BCC Le7c7 e7c5 a9 00 LDA #$00 ; 0 . e7c7 85 a2 Le7c7: STA Za2 ; fetch from table indexed by A, table looks like so: ; ; f0b3 Df0b3: .byte $df,$fe,$fd,$fb,$f7,$ef,$df,$ff ; ; value fetched goes to Da010 (7 seg display). e7c9 aa TAX ; X = A e7ca bd b3 f0 LDA Df0b3,X e7cd 8d 10 a0 STA Da010 ; 7seg e7d0 a2 00 LDX #$00 ; 0 . e7d2 a5 9f LDA Z9f e7d4 f0 0d BEQ Le7e3 e7d6 c6 9f DEC Z9f e7d8 d0 09 BNE Le7e3 e7da a5 bd LDA Zbd e7dc 85 9f STA Z9f e7de d0 03 BNE Le7e3 e7e0 20 8d e3 JSR Se38d e7e3 ad 15 b8 Le7e3: LDA Db815 e7e6 29 10 AND #$10 ; 16 . e7e8 d0 09 BNE Le7f3 e7ea ad 10 a8 LDA Da810 e7ed 29 01 AND #$01 ; 1 . e7ef d0 38 BNE Le829 e7f1 80 c2 BRA Le7b5 e7f3 20 fd e8 Le7f3: JSR Se8fd e7f6 90 aa BCC Le7a2 e7f8 a5 d3 LDA Zd3 e7fa 1a INC e7fb 29 7f AND #$7f ; 127 . e7fd 85 8a STA Z8a e7ff 85 d3 STA Zd3 e801 a5 a4 Le801: LDA Za4 e803 4a LSR e804 4a LSR e805 4a LSR e806 4a LSR e807 29 07 AND #$07 ; 7 . e809 d0 05 BNE Le810 e80b 20 1a ea JSR Sea1a e80e 80 98 Le80e: BRA Le7a8 ; An SEC followed by an SBC is the usual idiom ; for an 8 bit subtraction. ; It subtracts the memory value from A ; Here we put whatever is in A into Z99 (a generic temporary) ; Then subtract that value from 10, yielding a count for the copy ; loop that follows. e810 85 99 Le810: STA Z99 e812 38 SEC e813 a9 0a LDA #$0a ; 10 . e815 e5 99 SBC Z99 e817 aa TAX e818 a0 01 LDY #$01 ; 1 . e81a 80 07 BRA Le823 ; A copy loop - entered only from the above via ; the jump to Le823, jumps to Le843 when done. e81c b5 00 Le81c: LDA Z00,X e81e 99 00 00 STA Z00,Y e821 e8 INX e822 c8 INY e823 e0 09 Le823: CPX #$09 ; 9 . e825 d0 f5 BNE Le81c e827 80 1a BRA Le843 e829 20 aa e6 Le829: JSR Se6aa e82c 85 a4 STA Za4 e82e 4a LSR e82f 4a LSR e830 4a LSR e831 4a LSR e832 f0 da BEQ Le80e e834 29 07 AND #$07 ; 7 . e836 a8 TAY e837 88 DEY e838 f0 09 BEQ Le843 e83a 20 aa e6 Le83a: JSR Se6aa e83d 99 00 00 STA Z00,Y e840 88 DEY e841 d0 f7 BNE Le83a e843 20 5a e8 Le843: JSR Se85a e846 90 08 BCC Le850 e848 a9 bf LDA #$bf ; 1011 1111 e84a 8d 10 a0 STA Da010 ; 7seg e84d 6c 99 00 JMP (Z99) e850 24 93 Le850: BIT Z93 e852 50 03 BVC Le857 e854 20 1a ea JSR Sea1a e857 4c f1 e6 Le857: JMP Le6f1 e85a a5 d0 Se85a: LDA Zd0 e85c 45 e1 EOR Ze1 e85e c9 a5 CMP #$a5 ; 165 . e860 f0 03 BEQ Le865 e862 20 91 e7 JSR Se791 e865 a6 da Le865: LDX Zda e867 a5 db LDA Zdb e869 86 a0 Le869: STX Za0 e86b 85 a1 STA Za1 e86d a0 fd LDY #$fd ; 253 . e86f c8 Le86f: INY e870 c8 INY e871 c8 INY e872 b1 a0 LDA (Za0),Y e874 c9 fd CMP #$fd ; 253 . e876 f0 1e BEQ Le896 e878 c9 fe CMP #$fe ; 254 . e87a f0 15 BEQ Le891 e87c c9 ff CMP #$ff ; 255 . e87e f0 1c BEQ Le89c e880 c5 a4 CMP Za4 e882 d0 eb BNE Le86f e884 c8 Se884: INY e885 b1 a0 LDA (Za0),Y e887 85 99 STA Z99 e889 aa TAX e88a c8 INY e88b b1 a0 LDA (Za0),Y e88d 85 9a STA Z9a e88f 38 SEC e890 60 RTS e891 20 84 e8 Le891: JSR Se884 e894 80 d3 BRA Le869 e896 a2 40 Le896: LDX #$40 ; 64 @ e898 a9 f0 LDA #$f0 ; 240 . e89a 80 cd BRA Le869 e89c 18 Le89c: CLC e89d 60 RTS e89e 64 89 Se89e: STZ Z89 e8a0 64 8a STZ Z8a e8a2 64 92 STZ Z92 e8a4 a2 0a Se8a4: LDX #$0a ; 10 . e8a6 ad 14 b8 Le8a6: LDA Db814 e8a9 ca DEX e8aa d0 fa BNE Le8a6 e8ac 9c 11 b8 STZ Db811 e8af 9c 13 b8 STZ Db813 e8b2 a9 60 LDA #$60 ; 96 ` e8b4 8d 12 b8 STA Db812 e8b7 ad 12 b8 LDA Db812 e8ba 09 20 ORA #$20 ; 32 e8bc c9 60 CMP #$60 ; 96 ` e8be d0 16 BNE Le8d6 e8c0 ad 18 b8 LDA Db818 e8c3 49 ff EOR #$ff ; 255 . e8c5 29 07 AND #$07 ; 7 . e8c7 aa TAX e8c8 bd f5 e8 LDA De8f5,X e8cb 8d 14 b8 STA Db814 e8ce a9 80 LDA #$80 ; 128 . e8d0 85 93 STA Z93 e8d2 ad 17 b8 LDA Db817 e8d5 60 RTS e8d6 64 93 Le8d6: STZ Z93 e8d8 a9 01 LDA #$01 ; 1 . e8da 85 92 STA Z92 e8dc a9 06 LDA #$06 ; 0000 0110 e8de 8d 10 a0 STA Da010 ; 7seg e8e1 60 RTS ; read a status register at b818 ; flip all bits and mask to last 3 ; then run through 2 table lookups ; ed37 Ded37: .byte $00,$01,$02,$03,$04,$05,$06,$00 ; ee46 Dee46: .byte $c0 ; ee47 Dee47: .byte $f9 ; ee48 Dee48: .byte $a4 ; ee49 Dee49: .byte $b0 ; ee4a Dee4a: .byte $99 ; ee4b Dee4b: .byte $92 ; ee4c Dee4c: .byte $82 ; ee4d Dee4d: .byte $f8 e8e2 ad 18 b8 Se8e2: LDA Db818 e8e5 49 ff EOR #$ff ; 255 . e8e7 29 07 AND #$07 ; 7 . e8e9 aa TAX e8ea bd 37 ed LDA Ded37,X e8ed aa TAX e8ee bd 46 ee LDA Dee46,X e8f1 8d 10 a0 STA Da010 ; 7seg e8f4 60 RTS e8f5 De8f5: .byte $01,$02,$04,$08,$10,$20,$40,$01 ; "..... @." ; a bunch of manipulation of the registers in the Db810 group. e8fd 48 Se8fd: PHA e8fe da PHX e8ff 5a PHY e900 ad 10 b8 LDA Db810 e903 a2 09 LDX #$09 ; 9 . e905 a0 00 LDY #$00 ; 0 . e907 4a Le907: LSR e908 ca DEX e909 f0 05 BEQ Le910 e90b 90 fa BCC Le907 e90d c8 INY e90e 80 f7 BRA Le907 e910 c0 03 Le910: CPY #$03 ; 3 . e912 90 09 BCC Le91d e914 84 92 STY Z92 e916 20 a4 e8 JSR Se8a4 e919 18 CLC e91a 4c 33 ea JMP Lea33 e91d ad 14 b8 Le91d: LDA Db814 e920 29 02 AND #$02 ; 2 . e922 d0 1a BNE Le93e e924 ad 14 b8 LDA Db814 e927 30 07 BMI Le930 e929 ad 12 b8 LDA Db812 e92c c9 60 CMP #$60 ; 96 ` e92e f0 06 BEQ Le936 e930 20 a4 e8 Le930: JSR Se8a4 e933 4c 04 e7 JMP Le704 e936 a9 02 Le936: LDA #$02 ; 2 . e938 85 92 STA Z92 e93a 18 CLC e93b 4c 33 ea JMP Lea33 e93e a9 08 Le93e: LDA #$08 ; 8 . e940 8d 11 b8 STA Db811 e943 a9 02 LDA #$02 ; 2 . e945 8d 13 b8 STA Db813 e948 ad 12 b8 LDA Db812 e94b 09 02 ORA #$02 ; 2 . e94d 8d 12 b8 STA Db812 e950 8d 16 b8 STA Db816 e953 2c 15 b8 BIT Db815 e956 70 03 BVS Le95b e958 20 bd eb JSR Sebbd e95b ad 1c b8 Le95b: LDA Db81c e95e 85 88 STA Z88 e960 a0 03 LDY #$03 ; 3 . e962 c9 20 CMP #$20 ; 32 e964 90 02 BCC Le968 e966 a0 07 LDY #$07 ; 7 . e968 2c 15 b8 Le968: BIT Db815 e96b 70 03 BVS Le970 e96d 20 bd eb JSR Sebbd e970 ad 1c b8 Le970: LDA Db81c e973 85 a4 STA Za4 e975 2c 15 b8 Le975: BIT Db815 e978 70 03 BVS Le97d e97a 20 bd eb JSR Sebbd e97d ad 1c b8 Le97d: LDA Db81c e980 99 01 00 STA Z01,Y e983 88 DEY e984 d0 ef BNE Le975 e986 2c 15 b8 BIT Db815 e989 70 03 BVS Le98e e98b 20 bd eb JSR Sebbd e98e ad 12 b8 Le98e: LDA Db812 e991 29 fd AND #$fd ; 253 . e993 8d 12 b8 STA Db812 e996 ad 1c b8 LDA Db81c e999 85 01 STA Z01 e99b 20 a3 ea JSR Seaa3 e99e a5 88 LDA Z88 e9a0 d0 03 BNE Le9a5 e9a2 18 CLC e9a3 80 78 BRA Lea1d e9a5 c9 2a Le9a5: CMP #$2a ; 42 * e9a7 f0 04 BEQ Le9ad e9a9 c9 28 CMP #$28 ; 40 ( e9ab d0 07 BNE Le9b4 e9ad 38 Le9ad: SEC e9ae a9 c0 LDA #$c0 ; 192 . e9b0 85 93 STA Z93 e9b2 80 7f BRA Lea33 e9b4 c9 03 Le9b4: CMP #$03 ; 3 . e9b6 d0 18 BNE Le9d0 ; set up pointer to $e9cc e9b8 a9 cc LDA #$cc e9ba 85 8b STA Z8b e9bc a9 e9 LDA #$e9 e9be 85 8c STA Z8c e9c0 64 8e STZ Z8e e9c2 a9 04 LDA #$04 ; 4 . e9c4 85 8d STA Z8d e9c6 20 38 eb JSR Seb38 e9c9 18 CLC e9ca 80 51 BRA Lea1d e9cc 00 BRK ; maybe, more likely just a zero. e9cd .byte $00,$00,$00 ; "..." e9d0 c9 12 Le9d0: CMP #$12 ; 18 . e9d2 d0 39 BNE Lea0d ; set up pointer to $e9e8 e9d4 a9 e8 LDA #$e8 e9d6 85 8b STA Z8b e9d8 a9 e9 LDA #$e9 e9da 85 8c STA Z8c e9dc 64 8e STZ Z8e e9de a5 02 LDA Z02 e9e0 85 8d STA Z8d e9e2 20 38 eb JSR Seb38 e9e5 18 CLC e9e6 80 35 BRA Lea1d e9e8 .byte $03,$00,$01,$00,$21,$00,$00,$00 ; "....!..." e9f0 .byte $41,$44,$49,$20,$20,$20,$20,$20 ; "ADI " e9f8 .byte $4d,$61,$63,$4c,$61,$62,$2f,$34 ; "MacLab/4" ea00 .byte $20,$20,$20,$20,$20,$20,$20,$20 ; " " ea08 .byte $33,$2e,$32,$20,$00 ; "3.2 ." ea0d 18 Lea0d: CLC ea0e 80 0d BRA Lea1d ea10 5a PHY ea11 da PHX ea12 a2 01 LDX #$01 ; 1 . ea14 20 3a ea JSR Sea3a ea17 fa PHX ea18 7a PLY ea19 60 RTS ea1a 48 Sea1a: PHA ea1b da PHX ea1c 5a PHY ea1d 08 Lea1d: PHP ; push status ea1e a2 03 LDX #$03 ; 3 . ea20 a5 89 LDA Z89 ea22 20 3a ea JSR Sea3a ea25 a2 07 LDX #$07 ; 7 . ea27 a5 8a LDA Z8a ea29 20 3a ea JSR Sea3a ea2c 9c 11 b8 STZ Db811 ea2f 9c 13 b8 STZ Db813 ea32 28 PLP ; pop status ea33 ad 17 b8 Lea33: LDA Db817 ea36 7a PLY ea37 fa PHX ea38 68 PLA ea39 60 RTS ; subroutine, called from just above. ; lots of manipulation of b800 group registers ea3a a0 09 Sea3a: LDY #$09 ; 9 . ea3c 8c 11 b8 STY Db811 ea3f 8d 10 b8 STA Db810 ea42 8a TXA ea43 09 08 ORA #$08 ; 8 . ea45 8d 13 b8 STA Db813 ea48 ad 15 b8 LDA Db815 ea4b 6a ROR ea4c b0 03 BCS Lea51 ea4e 20 87 ea JSR Sea87 ea51 8e 13 b8 Lea51: STX Db813 ea54 ad 15 b8 LDA Db815 ea57 6a ROR ea58 90 03 BCC Lea5d ea5a 20 a3 ea JSR Seaa3 ea5d a9 08 Lea5d: LDA #$08 ; 8 . ea5f 8d 11 b8 STA Db811 ea62 60 Lea62: RTS ea63 .byte $8e,$13,$b8,$8a,$09,$08,$8d,$13 ; "........" ea6b .byte $b8,$ad,$15,$b8,$6a,$b0,$03,$20 ; "....j.. " ea73 .byte $87,$ea,$ad,$10,$b8,$48,$8e,$13 ; ".....H.." ea7b .byte $b8,$ad,$15,$b8,$6a,$90,$03,$20 ; "....j.. " ea83 .byte $a3,$ea,$68,$60 ; "..h`" ea87 64 91 Sea87: STZ Z91 ea89 ad 15 b8 Lea89: LDA Db815 ea8c 6a ROR ea8d b0 d3 BCS Lea62 ea8f e6 8f INC Z8f ea91 d0 f6 BNE Lea89 ea93 e6 90 INC Z90 ea95 d0 f2 BNE Lea89 ea97 e6 91 INC Z91 ea99 a5 91 LDA Z91 ea9b c9 0c CMP #$0c ; 12 . ea9d 90 ea BCC Lea89 ea9f a9 0a LDA #$0a ; 10 . eaa1 80 1a BRA Leabd ; subroutine eaa3 64 91 Seaa3: STZ Z91 eaa5 ad 15 b8 Leaa5: LDA Db815 eaa8 6a ROR eaa9 90 b7 BCC Lea62 eaab e6 8f INC Z8f eaad d0 f6 BNE Leaa5 eaaf e6 90 INC Z90 eab1 d0 f2 BNE Leaa5 eab3 e6 91 INC Z91 eab5 a5 91 LDA Z91 eab7 c9 0c CMP #$0c ; 12 . eab9 90 ea BCC Leaa5 eabb a9 09 LDA #$09 ; 9 . eabd 85 92 Leabd: STA Z92 eabf 20 a4 e8 JSR Se8a4 eac2 4c fe e6 JMP Le6fe eac5 .byte $48,$5a,$da,$a9,$00,$8d,$13,$b8 ; "HZ......" eacd .byte $ad,$12,$b8,$09,$02,$8d,$12,$b8 ; "........" ead5 .byte $8d,$16,$b8,$a0,$00,$a6,$8e,$c6 ; "........" eadd .byte $8d,$a5,$8d,$c9,$ff,$d0,$01,$ca ; "........" eae5 .byte $8a,$f0,$23,$2c,$15,$b8,$70,$03 ; "..#,..p." eaed .byte $20,$bd,$eb,$ad,$1c,$b8,$91,$8b ; " ......." eaf5 .byte $c8,$2c,$15,$b8,$70,$03,$20,$bd ; ".,..p. ." eafd .byte $eb,$ad,$1c,$b8,$91,$8b,$c8,$d0 ; "........" eb05 .byte $e2,$e6,$8c,$ca,$d0,$dd,$a5,$8d ; "........" eb0d .byte $f0,$12,$2c,$15,$b8,$70,$03,$20 ; "..,..p. " eb15 .byte $bd,$eb,$ad,$1c,$b8,$91,$8b,$c8 ; "........" eb1d .byte $c4,$8d,$d0,$ee,$20,$bd,$eb,$ad ; ".... ..." eb25 .byte $12,$b8,$29,$fd,$8d,$12,$b8,$ad ; "..)....." eb2d .byte $1c,$b8,$91,$8b,$20,$a3,$ea,$fa ; ".... ..." eb35 .byte $7a,$68,$60 ; "zh`" eb38 48 Seb38: PHA eb39 5a PHY eb3a da PHX eb3b a9 01 LDA #$01 ; 1 . eb3d 8d 13 b8 STA Db813 eb40 ad 12 b8 LDA Db812 eb43 09 02 ORA #$02 ; 2 . eb45 8d 12 b8 STA Db812 eb48 a9 09 LDA #$09 ; 9 . eb4a 8d 11 b8 STA Db811 eb4d a0 00 LDY #$00 ; 0 . eb4f 8d 15 b8 STA Db815 eb52 a6 8e LDX Z8e eb54 f0 51 BEQ Leba7 eb56 b1 8b Leb56: LDA (Z8b),Y eb58 2c 15 b8 BIT Db815 eb5b 70 03 BVS Leb60 eb5d 20 bd eb JSR Sebbd eb60 8d 1c b8 Leb60: STA Db81c eb63 c8 INY eb64 b1 8b LDA (Z8b),Y eb66 2c 15 b8 BIT Db815 eb69 70 03 BVS Leb6e eb6b 20 bd eb JSR Sebbd eb6e 8d 1c b8 Leb6e: STA Db81c eb71 c8 INY eb72 b1 8b LDA (Z8b),Y eb74 2c 15 b8 BIT Db815 eb77 70 03 BVS Leb7c eb79 20 bd eb JSR Sebbd eb7c 8d 1c b8 Leb7c: STA Db81c eb7f c8 INY eb80 b1 8b LDA (Z8b),Y eb82 2c 15 b8 BIT Db815 eb85 70 03 BVS Leb8a eb87 20 bd eb JSR Sebbd eb8a 8d 1c b8 Leb8a: STA Db81c eb8d c8 INY eb8e d0 c6 BNE Leb56 eb90 e6 8c INC Z8c eb92 ca DEX eb93 d0 c1 BNE Leb56 eb95 a5 8d LDA Z8d eb97 f0 12 BEQ Lebab eb99 b1 8b Leb99: LDA (Z8b),Y eb9b 2c 15 b8 BIT Db815 eb9e 70 03 BVS Leba3 eba0 20 bd eb JSR Sebbd eba3 8d 1c b8 Leba3: STA Db81c eba6 c8 INY eba7 c4 8d Leba7: CPY Z8d eba9 d0 ee BNE Leb99 ebab 20 bd eb Lebab: JSR Sebbd ebae ad 12 b8 LDA Db812 ebb1 29 fd AND #$fd ; 253 . ebb3 8d 12 b8 STA Db812 ebb6 20 a3 ea JSR Seaa3 ebb9 fa PHX ebba 7a PLY ebbb 68 PLA ebbc 60 Lebbc: RTS ebbd 2c 15 b8 Sebbd: BIT Db815 ebc0 70 fa BVS Lebbc ebc2 64 90 STZ Z90 ebc4 48 PHA ebc5 a9 06 LDA #$06 ; 6 . ebc7 85 91 STA Z91 ebc9 68 PLA ebca 2c 15 b8 Lebca: BIT Db815 ebcd 70 ed BVS Lebbc ebcf e6 8f INC Z8f ebd1 d0 f7 BNE Lebca ebd3 e6 90 INC Z90 ebd5 d0 f3 BNE Lebca ebd7 c6 91 DEC Z91 ebd9 d0 ef BNE Lebca ebdb a9 0b LDA #$0b ; 11 . ebdd 4c bd ea JMP Leabd ebe0 .byte $20,$1a,$ea,$a5,$a4,$c9,$0f,$f0 ; " ......." ebe8 .byte $04,$a9,$0c,$85,$92,$60 ; ".....`" ; cold start happens right here !! ebee 78 RESET: SEI ; no interrupts ebef d8 CLD ; clear the decimal mode flag ; never changed again. ebf0 a2 ff LDX #$ff ; 255 . ebf2 86 d3 STX Zd3 ebf4 9a TXS ; transfer X to stack (SP=X) ebf5 86 d5 STX Zd5 # The stack is at page 1 of memory (0x100 to 0x1ff) # Setting SP to 0xff (as is done above) means that the # next value pushed will go to 0x1ff and SP becomes 0xfe # SP points to the empty spot above the top of the stack. ; I am guessing that Da010 writes to the seven segment display. ebf7 a9 bf LDA #$bf ; 1011 1111 ebf9 8d 10 a0 STA Da010 ; 7seg ebfc a9 31 LDA #$31 ; 49 1 ebfe 85 cf STA Zcf ec00 64 a2 STZ Za2 ; store zeros ec02 64 93 STZ Z93 ec04 64 e0 STZ Ze0 ec06 a9 08 LDA #$08 ; 8 . ec08 8d 13 a0 STA Da013 ; hw13 ec0b 9c 12 a0 STZ Da012 ; hw12 ; Looks like a half hearted memory test, ; locks up in a hard loop if it fails. ; Tests the stack area. ; (after writing to IO address Da010) ec0e a9 00 LDA #$00 ; 0 . ec10 a2 ff LDX #$ff ; 255 . ec12 9d 00 01 Lec12: STA D0100,X ec15 dd 00 01 CMP D0100,X ec18 f0 07 BEQ Lec21 ; indicate memory error and lockup ec1a a9 86 LDA #$86 ; 1000 0110 ec1c 8d 10 a0 STA Da010 ; 7seg ec1f 80 fe Lec1f: BRA Lec1f ec21 3a Lec21: DEC ec22 ca DEX ec23 d0 ed BNE Lec12 ec25 20 b8 e4 JSR Se4b8 ec28 80 1b BRA Lec45 ; just below ; what the heck, toss a couple of subroutines in here ; and branch around them. ; they are referenced from not too far below. ec2a 48 Sec2a: PHA ec2b a9 86 LDA #$86 ; 134 . ec2d 20 3f ec JSR Sec3f ec30 a9 af LDA #$af ; 175 . ec32 20 3f ec JSR Sec3f ec35 a9 af LDA #$af ; 175 . ec37 20 3f ec JSR Sec3f ec3a 68 PLA ec3b 20 3f ec JSR Sec3f ec3e 60 RTS ; interesting trick on the second "call" ; when a subroutine ends with a call, an optimization is ; to just JMP rather than JSR followed by RTS ; called only from the above ec3f 20 08 ca Sec3f: JSR Sca08 ec42 4c 06 ca JMP Sca06 ; RESET code continues here. ; set up a 16 bit pointer to $c000 at Z99/Z9a ; the following will scan memory from $c000 to $ffff ec45 a9 c0 Lec45: LDA #$c0 ec47 85 9a STA Z9a ec49 a9 00 LDA #$00 ec4b 85 99 STA Z99 ec4d a8 TAY ; Y = 0 ec4e aa TAX ; X = 0 ec4f 18 Lec4f: CLC ec50 71 99 ADC (Z99),Y ec52 90 01 BCC Lec55 ec54 e8 INX ec55 c0 f7 Lec55: CPY #$f7 ; compare Y with memory ec57 d0 08 BNE Lec61 ec59 48 PHA ec5a a5 9a LDA Z9a ec5c c9 ff CMP #$ff ec5e f0 08 BEQ Lec68 ; done with this ec60 68 PLA ec61 c8 Lec61: INY ec62 d0 eb BNE Lec4f ec64 e6 9a INC Z9a ; bump page (msb of pointer) ec66 80 e7 BRA Lec4f ; compare against 2 bytes stored near the end of the PROM ; something like a checksum. ec68 ec f9 ff Lec68: CPX Dfff9 ec6b d0 06 BNE Lec73 ec6d 68 PLA ec6e cd f8 ff CMP Dfff8 ec71 f0 0e BEQ Lec81 ; bad checksum ... ec73 ad 47 ee Lec73: LDA Dee47 ; fetches $f9 ec76 20 2a ec JSR Sec2a ec79 80 ca BRA Lec45 ; branched to from below ec7b ad 48 ee Lec7b: LDA Dee48 ; fetches $a4 ec7e 20 2a ec JSR Sec2a ; checksum matches, on we go. ; Test memory address $8000, if it responds like RAM ; then store $a0, else store $80 into Zd4 ; (testing to see how much RAM is installed?) ec81 a0 00 Lec81: LDY #$00 ; 0 . ec83 a2 80 LDX #$80 ; 128 . ec85 8c 00 80 STY D8000 ec88 ac 00 80 LDY D8000 ec8b d0 0b BNE Lec98 ec8d 88 DEY ec8e 8c 00 80 STY D8000 ec91 cc 00 80 CPY D8000 ec94 d0 02 BNE Lec98 ec96 a2 a0 LDX #$a0 ; 160 . ec98 86 d4 Lec98: STX Zd4 ec9a 78 SEI ; disable interrupts. ec9b a0 ff LDY #$ff ; 255 . ec9d 84 03 STY Z03 ec9f c8 INY eca0 84 01 Leca0: STY Z01 eca2 a9 e2 LDA #$e2 ; 226 . eca4 85 00 STA Z00 eca6 18 Leca6: CLC eca7 69 61 ADC #$61 ; 97 a eca9 aa TAX ecaa 24 03 BIT Z03 ecac 30 0e BMI Lecbc ecae d1 00 CMP (Z00),Y ecb0 d0 c9 BNE Lec7b ecb2 49 ff EOR #$ff ; 255 . ecb4 91 00 STA (Z00),Y ecb6 d1 00 CMP (Z00),Y ecb8 d0 c1 BNE Lec7b ecba 51 00 EOR (Z00),Y ecbc 91 00 Lecbc: STA (Z00),Y ecbe d1 00 CMP (Z00),Y ecc0 d0 b9 BNE Lec7b ecc2 8a TXA ecc3 e6 00 INC Z00 ecc5 d0 df BNE Leca6 ecc7 18 CLC ecc8 69 35 ADC #$35 ; 53 5 ecca e6 01 INC Z01 eccc a6 01 LDX Z01 ecce e4 d4 CPX Zd4 ecd0 d0 d4 BNE Leca6 ecd2 e6 03 INC Z03 ecd4 f0 ca BEQ Leca0 ecd6 58 CLI ; allow interrupts ecd7 20 d0 e3 JSR Se3d0 ecda 20 9e e4 JSR Se49e ecdd 20 76 e4 JSR Se476 ece0 a9 60 Lece0: LDA #$60 ; 96 ` ece2 8d 12 b8 STA Db812 ece5 ad 12 b8 LDA Db812 ece8 09 20 ORA #$20 ; 32 ecea c9 60 CMP #$60 ; 96 ` ecec f0 08 BEQ Lecf6 ecee ad 4b ee LDA Dee4b ; fetches $92 (1001 0010) ecf1 20 2a ec JSR Sec2a ecf4 80 ea BRA Lece0 ecf6 a9 04 Lecf6: LDA #$04 ; 4 . ecf8 20 00 c0 JSR Sc000 ; delay ecfb ae 16 a0 LDX Da016 ; hw16 ecfe 20 00 c0 JSR Sc000 ; delay ed01 ad 17 a0 LDA Da017 ; hw17 ed04 29 0f AND #$0f ; 15 . ed06 c9 08 CMP #$08 ; 8 . ed08 f0 0c BEQ Led16 ed0a c9 07 CMP #$07 ; 7 . ed0c f0 08 BEQ Led16 ed0e ad 4c ee LDA Dee4c ; fetches $82 (1000 0010) ed11 20 2a ec JSR Sec2a ed14 80 e0 BRA Lecf6 ed16 a2 00 Led16: LDX #$00 ; 0 . ed18 64 e0 STZ Ze0 ed1a ad 10 b0 LDA Db010 ed1d 29 01 AND #$01 ; 1 . ed1f d0 0a BNE Led2b ed21 ad 10 b0 LDA Db010 ed24 29 0f AND #$0f ; 15 . ed26 4a LSR ed27 aa TAX ed28 e8 INX ed29 86 e0 STX Ze0 ed2b 20 9e e8 Led2b: JSR Se89e ed2e 20 e2 e8 JSR Se8e2 ed31 20 0b ca JSR Sca0b ed34 4c f1 e6 JMP Le6f1 ; go enter main code ed37 Ded37: .byte $00,$01,$02,$03,$04,$05,$06,$00 ; "........" ; ---- END OF RESET code ; The following is used only from the IRQ code below. ed3f a9 ac Led3f: LDA #$ac ; 172 . ed41 20 08 ca JSR Sca08 ed44 20 06 ca JSR Sca06 ed47 80 f6 BRA Led3f ; ****** IRQ ******* ; an IRQ jumps here from the zero page. ; the IRQ has pushed 3 bytes: PCH, PCL, P ; (so the status register is on top of the stack). ed49 85 d1 Ped49: STA Zd1 ; peek at status register ; it looks like the object of this is to detect if this ; is a BRK command. ed4b 68 PLA ed4c 48 PHA ed4d 29 10 AND #$10 ; 16 . ed4f d0 42 BNE Led93 ; look at Db350 (must be a device status register) to see if ; it interrupted, if so, ACK the interrupt by writing back to ; that register. The only other access to this register is at ; startup when it gets set to all ones. ed51 a9 40 LDA #$40 ; 64 @ ed53 2d 50 b3 AND Db350 ed56 f0 e7 BEQ Led3f ed58 8d 50 b3 STA Db350 ed5b a5 c1 LDA Zc1 ed5d 10 0f BPL Led6e ed5f a5 82 LDA Z82 ed61 10 0b BPL Led6e ed63 c6 7b DEC Z7b ed65 d0 07 BNE Led6e ed67 a5 7c LDA Z7c ed69 85 7b STA Z7b ed6b 20 79 db JSR Sdb79 ed6e 20 e9 d6 Led6e: JSR Sd6e9 ed71 c6 d6 DEC Zd6 ed73 d0 04 BNE Led79 ed75 c6 d7 DEC Zd7 ed77 f0 03 BEQ Led7c ed79 a5 d1 Led79: LDA Zd1 ed7b 40 RTI ed7c a5 d9 Led7c: LDA Zd9 ed7e 85 d7 STA Zd7 ed80 a5 d8 LDA Zd8 ed82 85 d6 STA Zd6 ed84 a5 a2 LDA Za2 ed86 49 80 EOR #$80 ; 1000 0000 ed88 8d 10 a0 STA Da010 ; 7seg ed8b 85 a2 STA Za2 ed8d a5 d1 LDA Zd1 ed8f 58 CLI ; allow interrupts. ed90 4c 27 dd JMP Ldd27 ; We end up here on a BRK command. ed93 68 Led93: PLA ed94 68 PLA ed95 38 SEC ed96 e9 02 SBC #$02 ; 2 . ed98 85 00 STA Z00 ed9a 68 PLA ed9b e9 00 SBC #$00 ; 0 . ed9d 85 01 STA Z01 ed9f ad 51 ee LDA Dee51 eda2 85 02 STA Z02 eda4 4c d1 c9 JMP Lc9d1 ; ******* NMI ******** eda7 48 NMI: PHA ; save A register eda8 8a TXA eda9 48 PHA ; save X register edaa 98 TYA edab 48 PHA ; save Y register edac a9 ab LDA #$ab edae 20 08 ca JSR Sca08 edb1 20 06 ca JSR Sca06 edb4 ba TSX edb5 bc 06 01 LDY D0106,X edb8 20 ed c9 JSR Sc9ed edbb ba TSX edbc bc 05 01 LDY D0105,X edbf 20 ed c9 JSR Sc9ed edc2 20 06 ca JSR Sca06 edc5 68 PLA edc6 a8 TAY ; restore Y edc7 68 PLA edc8 aa TAX ; restore X edc9 68 PLA ; restore A edca 40 RTI edcb .byte $00,$00,$00,$00,$ff,$00,$01,$00 ; "........" edd3 .byte $07,$00,$11,$00,$25,$00,$61,$00 ; "....%.a." eddb .byte $c5,$00,$00,$00,$00,$00,$00,$00 ; "........" ede3 .byte $01,$00,$07,$00,$11,$00,$25,$00 ; "......%." edeb .byte $61,$00,$c5,$00,$00,$00,$01,$00 ; "a......." edf3 .byte $03,$00,$07,$00,$13,$00,$27,$00 ; "......'." edfb .byte $4f,$00,$e3,$01,$e3,$03,$e3,$07 ; "O......." ee03 .byte $e3,$13,$e3,$27,$e3,$4f,$e3,$c7 ; "...'.O.." ee0b .byte $e3,$c7,$01,$00,$01,$00,$01,$00 ; "........" ee13 .byte $01,$00,$01,$00,$01,$00,$02,$00 ; "........" ee1b .byte $05,$00,$05,$00,$0a,$00,$19,$00 ; "........" ee23 .byte $32,$00,$64,$00,$fa,$00,$f4,$01 ; "2.d....." ee2b Dee2b: .byte $00,$01,$03,$04,$05,$07,$08,$09 ; "........" ee33 .byte $0b,$0c,$0d,$0f ; "...." ee37 Dee37: .byte $00,$02,$03,$04,$05,$06,$07 ; "......." ee3e Dee3e: .byte $0f,$0e,$0d,$0c,$8f,$8e,$8d,$8c ; "........" ; The following table is used for something or other. ee46 Dee46: .byte $c0 ; "." ee47 Dee47: .byte $f9 ; "." ee48 Dee48: .byte $a4 ; "." ee49 Dee49: .byte $b0 ; "." ee4a Dee4a: .byte $99 ; "." ee4b Dee4b: .byte $92 ; "." ee4c Dee4c: .byte $82 ; "." ee4d Dee4d: .byte $f8,$80,$98,$88 ; "...." ee51 Dee51: .byte $83,$c6,$a1,$86,$8e,$bf,$07,$83 ; "........" ee59 .byte $4d,$61,$63,$4c,$61,$62,$2f,$34 ; "MacLab/4" ee61 .byte $20,$49,$49,$49,$20,$52,$4f,$4d ; " III ROM" ee69 .byte $20,$62,$79,$20,$4d,$43,$4d,$20 ; " by MCM " ee71 .byte $26,$20,$4d,$4a,$41,$48,$20,$53 ; "& MJAH S" ee79 .byte $65,$70,$74,$20,$39,$31,$06,$03 ; "ept 91.." ee81 .byte $02,$0c,$0c,$04,$00,$01,$bb,$00 ; "........" ee89 .byte $00,$00,$00,$0f,$0f,$0f,$0f,$0f ; "........" ee91 .byte $0f,$0f,$0f,$0f,$0f,$0f,$0f,$00 ; "........" ee99 .byte $00,$00,$00,$00,$00,$00,$00,$00 ; "........" eea1 .byte $80,$80,$80,$80,$80,$80,$80,$00 ; "........" eea9 .byte $00,$00,$00,$00,$00,$00,$78,$7f ; "......x." eeb1 .byte $7f,$7f,$7f,$7f,$7f,$7f,$7f,$47 ; ".......G" eeb9 .byte $47,$47,$47,$47,$07,$00,$00,$00 ; "GGGG...." eec1 .byte $00,$00,$00,$00,$00,$00,$30,$11 ; "......0." eec9 .byte $0f,$00,$0f,$0f,$ff,$05,$00,$00 ; "........" eed1 .byte $00,$00,$00,$00,$00,$00,$00,$05 ; "........" eed9 .byte $05,$05,$05,$05,$05,$05,$05,$00 ; "........" eee1 .byte $00,$00,$00,$00,$00,$00,$00,$00 ; "........" eee9 .byte $00,$1f,$03,$01,$c8,$04,$14,$01 ; "........" eef1 .byte $02,$08,$70,$00,$03,$04,$00,$00 ; "..p....." eef9 .byte $00,$00,$00,$00,$00,$00,$00,$00 ; "........" ef01 .byte $00,$00,$00,$00,$0f,$11,$13,$15 ; "........" ef09 .byte $17,$18,$19,$1a,$1b,$1c,$1d,$1e ; "........" ef11 .byte $1f,$20,$94,$99,$9b,$9d,$9f,$a0 ; ". ......" ef19 .byte $a2,$a3,$a4,$a5,$a7,$a9,$aa,$ab ; "........" ef21 .byte $ac,$ad,$ae,$af,$b0,$b1,$b2,$b3 ; "........" ef29 .byte $b4,$b5,$b6,$b7,$b8,$b9,$ba,$bb ; "........" ef31 .byte $bc,$bd,$be,$bf,$c0,$c1,$c2,$c4 ; "........" ef39 .byte $c6,$c8,$ca,$cc,$d0,$d1,$d2,$d3 ; "........" ef41 .byte $d4,$d5,$d6,$d8,$da,$93,$92,$8b ; "........" ef49 .byte $8d,$8a,$89,$02,$03,$00,$00,$00 ; "........" ef51 .byte $00,$00,$00,$00,$00,$00,$00,$dd ; "........" ef59 .byte $de,$df,$e0,$d0,$07,$10,$b0,$50 ; ".......P" ef61 .byte $b0,$90,$b0,$d0,$b0,$10,$b1,$50 ; ".......P" ef69 .byte $b1,$90,$b1,$d0,$b1,$10,$b2,$50 ; ".......P" ef71 .byte $b2,$90,$b2,$d0,$b2,$10,$b3,$50 ; ".......P" ef79 .byte $b3,$90,$b3,$d0,$b3,$10,$b0,$10 ; "........" ef81 .byte $b0,$10,$a8,$10,$a8,$30,$a8,$30 ; ".....0.0" ef89 .byte $a8,$10,$a0,$13,$a0,$12,$a0,$16 ; "........" ef91 .byte $a0,$17,$a0,$00,$00,$0d,$a0,$0c ; "........" ef99 .byte $a0,$10,$a8,$10,$b0,$18,$b8,$11 ; "........" efa1 .byte $a0,$00,$c0,$00,$c0,$0f,$c0,$ed ; "........" efa9 .byte $c9,$06,$ca,$08,$ca,$0b,$ca,$16 ; "........" efb1 .byte $ca,$21,$c0,$91,$e7,$a5,$e7,$a8 ; ".!......" efb9 .byte $e7,$8d,$e3,$d0,$e3,$79,$e4,$36 ; ".....y.6" efc1 .byte $cc,$86,$cc,$9c,$cf,$43,$e5,$06 ; ".....C.." efc9 .byte $cf,$35,$cf,$b4,$e5,$81,$c4,$6b ; ".5.....k" efd1 .byte $cb,$c7,$e5,$f6,$e5,$00,$00,$92 ; "........" efd9 .byte $e6,$aa,$e6,$f1,$e6,$82,$e7,$6a ; ".......j" efe1 .byte $e3,$d1,$c9,$3f,$e6,$59,$e6,$6a ; "...?.Y.j" efe9 .byte $e6,$85,$e6,$49,$ed,$93,$ed,$ef ; "...I...." eff1 .byte $ed,$0d,$ee,$2b,$ee,$37,$ee,$3e ; "...+.7.>" eff9 .byte $ee,$46,$ee,$57,$ee,$40,$f0,$10 ; ".F.W.@.." f001 .byte $b8,$11,$b8,$12,$b8,$13,$b8,$14 ; "........" f009 .byte $b8,$14,$b8,$15,$b8,$15,$b8,$16 ; "........" f011 .byte $b8,$16,$b8,$17,$b8,$1c,$b8,$a4 ; "........" f019 .byte $e8,$fd,$e8,$1a,$ea,$10,$ea,$c5 ; "........" f021 .byte $ea,$38,$eb,$e0,$eb,$7a,$e7,$bd ; ".8...z.." f029 .byte $eb,$cd,$c8,$d6,$c8,$19,$e2,$af ; "........" f031 .byte $e2,$d4,$e2,$dd,$e2,$04,$e3,$34 ; ".......4" f039 .byte $e3,$53,$e3,$d0,$b7,$10,$b4,$10 ; ".S......" f041 .byte $80,$cc,$11,$36,$cc,$12,$40,$cc ; "...6..@." f049 .byte $13,$5d,$d2,$14,$74,$cc,$15,$7d ; ".]..t..}" f051 .byte $cc,$20,$86,$cc,$22,$aa,$cc,$24 ; ". .."..$" f059 .byte $ee,$cc,$26,$23,$cd,$29,$3b,$cd ; "..&#.);." f061 .byte $2a,$a3,$cd,$30,$83,$ce,$31,$8f ; "*..0..1." f069 .byte $ce,$32,$ba,$ce,$34,$fd,$ce,$35 ; ".2..4..5" f071 .byte $de,$e4,$40,$6f,$d2,$41,$35,$cf ; "..@o.A5." f079 .byte $43,$93,$cf,$50,$25,$d0,$51,$25 ; "C..P%.Q%" f081 .byte $d0,$16,$0e,$e2,$17,$00,$d1,$18 ; "........" f089 .byte $d2,$d0,$1b,$9c,$d0,$1f,$3c,$cc ; "......<." f091 .byte $21,$1c,$d1,$23,$f3,$d0,$25,$dd ; "!..#..%." f099 .byte $d1,$27,$7b,$e2,$28,$03,$e2,$33 ; ".'{.(..3" f0a1 .byte $4a,$e2,$61,$79,$d0,$54,$54,$cf ; "J.ay.TT." f0a9 .byte $60,$d8,$cb,$1a,$8e,$cb,$19,$2f ; "`....../" f0b1 .byte $c5,$ff ; ".." ; table here is indexed in one place to ... f0b3 Df0b3: .byte $df,$fe,$fd,$fb,$f7,$ef,$df,$ff ; "........" f0bb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f0c3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f0cb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f0d3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f0db .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f0e3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f0eb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f0f3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f0fb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f103 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f10b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f113 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f11b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f123 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f12b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f133 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f13b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f143 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f14b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f153 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f15b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f163 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f16b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f173 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f17b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f183 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f18b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f193 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f19b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f1a3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f1ab .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f1b3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f1bb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f1c3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f1cb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f1d3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f1db .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f1e3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f1eb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f1f3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f1fb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f203 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f20b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f213 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f21b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f223 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f22b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f233 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f23b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f243 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f24b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f253 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f25b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f263 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f26b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f273 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f27b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f283 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f28b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f293 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f29b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f2a3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f2ab .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f2b3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f2bb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f2c3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f2cb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f2d3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f2db .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f2e3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f2eb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f2f3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f2fb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f303 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f30b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f313 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f31b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f323 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f32b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f333 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f33b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f343 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f34b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f353 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f35b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f363 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f36b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f373 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f37b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f383 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f38b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f393 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f39b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f3a3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f3ab .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f3b3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f3bb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f3c3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f3cb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f3d3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f3db .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f3e3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f3eb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f3f3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f3fb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f403 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f40b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f413 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f41b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f423 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f42b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f433 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f43b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f443 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f44b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f453 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f45b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f463 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f46b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f473 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f47b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f483 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f48b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f493 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f49b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f4a3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f4ab .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f4b3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f4bb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f4c3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f4cb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f4d3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f4db .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f4e3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f4eb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f4f3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f4fb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f503 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f50b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f513 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f51b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f523 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f52b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f533 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f53b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f543 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f54b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f553 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f55b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f563 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f56b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f573 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f57b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f583 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f58b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f593 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f59b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f5a3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f5ab .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f5b3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f5bb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f5c3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f5cb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f5d3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f5db .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f5e3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f5eb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f5f3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f5fb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f603 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f60b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f613 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f61b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f623 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f62b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f633 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f63b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f643 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f64b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f653 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f65b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f663 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f66b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f673 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f67b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f683 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f68b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f693 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f69b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f6a3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f6ab .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f6b3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f6bb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f6c3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f6cb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f6d3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f6db .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f6e3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f6eb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f6f3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f6fb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f703 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f70b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f713 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f71b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f723 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f72b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f733 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f73b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f743 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f74b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f753 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f75b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f763 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f76b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f773 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f77b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f783 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f78b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f793 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f79b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f7a3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f7ab .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f7b3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f7bb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f7c3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f7cb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f7d3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f7db .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f7e3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f7eb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f7f3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f7fb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f803 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f80b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f813 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f81b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f823 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f82b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f833 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f83b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f843 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f84b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f853 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f85b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f863 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f86b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f873 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f87b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f883 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f88b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f893 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f89b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f8a3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f8ab .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f8b3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f8bb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f8c3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f8cb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f8d3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f8db .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f8e3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f8eb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f8f3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f8fb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f903 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f90b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f913 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f91b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f923 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f92b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f933 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f93b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f943 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f94b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f953 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f95b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f963 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f96b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f973 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f97b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f983 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f98b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f993 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f99b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f9a3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f9ab .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f9b3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f9bb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f9c3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f9cb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f9d3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f9db .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f9e3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f9eb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f9f3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" f9fb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fa03 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fa0b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fa13 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fa1b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fa23 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fa2b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fa33 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fa3b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fa43 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fa4b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fa53 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fa5b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fa63 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fa6b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fa73 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fa7b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fa83 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fa8b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fa93 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fa9b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" faa3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" faab .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fab3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fabb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fac3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" facb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fad3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fadb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fae3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" faeb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" faf3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fafb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fb03 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fb0b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fb13 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fb1b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fb23 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fb2b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fb33 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fb3b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fb43 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fb4b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fb53 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fb5b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fb63 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fb6b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fb73 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fb7b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fb83 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fb8b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fb93 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fb9b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fba3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fbab .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fbb3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fbbb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fbc3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fbcb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fbd3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fbdb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fbe3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fbeb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fbf3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fbfb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fc03 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fc0b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fc13 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fc1b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fc23 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fc2b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fc33 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fc3b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fc43 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fc4b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fc53 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fc5b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fc63 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fc6b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fc73 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fc7b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fc83 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fc8b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fc93 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fc9b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fca3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fcab .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fcb3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fcbb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fcc3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fccb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fcd3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fcdb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fce3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fceb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fcf3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fcfb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fd03 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fd0b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fd13 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fd1b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fd23 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fd2b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fd33 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fd3b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fd43 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fd4b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fd53 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fd5b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fd63 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fd6b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fd73 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fd7b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fd83 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fd8b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fd93 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fd9b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fda3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fdab .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fdb3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fdbb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fdc3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fdcb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fdd3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fddb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fde3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fdeb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fdf3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fdfb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fe03 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fe0b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fe13 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fe1b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fe23 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fe2b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fe33 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fe3b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fe43 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fe4b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fe53 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fe5b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fe63 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fe6b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fe73 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fe7b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fe83 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fe8b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fe93 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fe9b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fea3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" feab .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" feb3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" febb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fec3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fecb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fed3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fedb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fee3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" feeb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fef3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fefb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ff03 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ff0b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ff13 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ff1b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ff23 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ff2b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ff33 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ff3b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ff43 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ff4b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ff53 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ff5b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ff63 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ff6b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ff73 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ff7b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ff83 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ff8b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ff93 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ff9b .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ffa3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ffab .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ffb3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ffbb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ffc3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ffcb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ffd3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ffdb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ffe3 .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" ffeb .byte $ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff ; "........" fff3 .byte $ff,$ff,$ff,$ff,$fe ; "....." ; something like a checksum follows fff8 Dfff8: .byte $90 fff9 Dfff9: .byte $05 fffa .byte $a7, $ed ; NMI - to $eda7 (NMI) fffc .byte $ee, $eb ; RESET - to $ebee (RESET) fffe ..byte $dd, $00 ; IRQ - to $00dd (IRQ) ; note that the IRQ vector here jumps to 00dd in the zero page. ; initialization code stores a 3 byte jump there to $ed49 ------------------------------------------------------------------ ------------------------------------------------------------------ Cross References Symbol Value References D0100 0100 ec15 ec12 D0105 0105 edbc D0106 0106 edb5 D0200 0200 da4e da4b da3f da2a da1d da19 D0200 0200 db11 db0c db05 dafb daeb dae7 da92 da8d da89 da7b da71 da61 D0201 0201 dadc dad0 dabe dab2 da97 da7e da6a da46 da43 da27 da22 D0202 0202 dae1 dad5 dac3 dab7 da9c da74 da58 da32 D0203 0203 da64 da55 da2f D0300 0300 d819 cfb7 df92 df8a D0301 0301 d848 cfb1 D0302 0302 d8d3 d8cc d89d d896 d86b d850 d824 d821 D0303 0303 d8dc d8d6 d8a6 d8a0 d862 d855 d82b D0304 0304 d858 d831 d82e d7cd d745 D0305 0305 d85d d838 d7d3 d749 D0306 0306 d8d0 d89a D0307 0307 d8d9 d8a3 D0308 0308 d7ff d7fc D0309 0309 d83f d810 d807 d804 D030a 030a d84d d845 d842 d81e d816 d813 D030b 030b d755 d73c cfbf D030c 030c d8e1 d8a9 D030d 030d D030d 030d d97e d944 d8f9 d8eb db58 db4c d791 d78b decb debf de9d de7f D030e 030e d981 d93e d91f d8fc d8f1 db53 db43 d799 d794 dece dec5 dea0 D030e 030e de85 D030f 030f D030f 030f d984 d968 d919 d8bf d8b3 db3d db31 d79e deb5 deac de95 de8b D0310 0310 d987 d930 d8c2 d8b9 db38 db28 d7a3 deb8 deb2 de98 de91 D0311 0311 d98a d909 d8ee d8b6 d7b3 d7a6 d9c6 D0312 0312 d98d d90f d8f4 d8bc d7b0 d7ab d9c2 D0313 0313 d976 d96e d947 d936 d922 de66 D0314 0314 d97b d96b d941 d933 d91c de6c D0315 0315 d95d d90c de72 D0316 0316 d94a d925 d912 de78 D0410 0410 dc62 dba2 D0420 0420 dc59 dba8 D13dc 13dc dc43 D1adb 1adb dc2b D1add 1add dc4b D58db 58db dc37 D8000 8000 ec91 ec8e ec88 ec85 D88db 88db dc31 Da008 a008 e4c0 e3c5 e59d Da009 a009 e4c5 e5a2 Da00a a00a e5a9 Da00b a00b e5b0 Da00c a00c e4cc d75b e036 ddd6 Da00d a00d e5b9 Da010 a010 e8f1 ec1c ebf9 e768 e758 e7cd e6eb e8de e84a ca08 ed88 Da012 a012 ec0b dc6d e5c3 db96 dd6c Da013 a013 ec08 dc69 e5be db8e dd67 Da016 a016 ecfb e490 d772 d763 e04d e03e ddea ddde Da017 a017 ed01 d76b e046 dde6 Da810 a810 e53f e51b e514 e4ac e4a3 e4a0 e69a e693 e775 e741 e73a e733 Da810 a810 e7ea e6c4 e6bd e6b6 e6fb Da830 a830 e6a2 e75f e748 e6cb e70b Db010 b010 ed21 ed1a e40b d0cc d0c7 dd93 Db090 b090 e406 e403 Db0d0 b0d0 e3e6 e3e3 Db110 b110 e41f e416 Db150 b150 e424 Db210 b210 ddb0 dd9c Db250 b250 ddb3 dd9f Db2d0 b2d0 e3fc e3f9 Db310 b310 e534 e431 Db350 b350 e3df ed58 ed53 Db390 b390 e439 e436 e3f0 e3ed e1ff Db410 b410 e45b Db490 b490 e452 e44f Db4d0 b4d0 e448 e445 Db6d0 b6d0 e461 Db710 b710 e45e Db750 b750 e442 Db7d0 b7d0 d6eb ddb6 e185 Db810 b810 e900 ea3f Db811 b811 eb4a e940 e8ac ea5f ea3c ea2c Db812 b812 e8b4 Db812 b812 ece5 ece2 ebb3 ebae eb45 eb40 e993 e98e e94d e948 e929 e8b7 Db813 b813 eb3d e945 e8af ea51 ea45 ea2f Db814 b814 e924 e91d e8cb e8a6 c017 Db815 b815 e7e3 ea89 eaa5 ea54 ea48 e716 Db815 b815 ebca ebbd eb9b eb82 eb74 eb66 eb58 eb4f e986 e975 e968 e953 Db816 b816 e950 Db817 b817 e8d2 ea33 Db818 b818 e8e2 e8c0 Db81c b81c eba3 eb8a eb7c eb6e eb60 e996 e97d e970 e95b Dbcdc bcdc dc3f Ddc4d dc4d dc46 Ddf79 df79 df95 De8f5 e8f5 e8c8 Ded37 ed37 e8ea Dee2b ee2b cfee Dee37 ee37 e5b6 Dee3e ee3e d00a Dee46 ee46 e8ee ca00 c9f3 Dee47 ee47 ec73 Dee48 ee48 ec7b Dee49 ee49 e465 Dee4a ee4a e4b0 Dee4b ee4b ecee Dee4c ee4c ed0e Dee4d ee4d e46e Dee51 ee51 ed9f Df0b3 f0b3 e7ca Dfff8 fff8 ec6e Dfff9 fff9 ec68 IRQ 00dd e3d3 0000 Lc00c c00c c01a Lc01c c01c c015 Lc9d1 c9d1 eda4 c9eb dc26 Lca0d ca0d ca13 Lcfbb cfbb cfae Lcfc2 cfc2 cfbd Lcfc3 cfc3 cfa0 Lcfcb cfcb cfc5 Lcfdc cfdc cff1 d022 Lcfe4 cfe4 cfd4 Lcff4 cff4 cfd8 Ld000 d000 cff8 Ld00a d00a d004 Ld0cc d0cc d0cf Ld701 d701 d722 Ld70f d70f d7c7 d7bf d789 d753 d73a db23 da0e d9f2 d9e7 d9d1 Ld715 d715 d706 Ld727 d727 d70d Ld72e d72e d729 Ld755 d755 d736 d732 Ld787 d787 d780 Ld7a6 d7a6 d7a1 d79c Ld7b8 d7b8 d77c Ld7c2 d7c2 d7ba Ld7c4 d7c4 d785 Ld7ca d7ca d7c2 d7b6 d7ae d7a9 Ld7e0 d7e0 d7d6 Ld7e6 d7e6 d7e2 d7de d7da Ld82e d82e d829 Ld83d d83d d80c Ld858 d858 d853 Ld860 d860 d85b d84b d83b d836 d81c d80a Ld870 d870 d867 Ld87a d87a d875 Ld87e d87e d86e d865 Ld888 d888 d883 Ld88a d88a d87c Ld8c5 d8c5 d8b1 Ld8c9 d8c9 d88e Ld8cc d8cc d894 Ld8ff d8ff d8e9 Ld906 d906 d901 Ld92a d92a d92e Ld930 d930 d93a d928 Ld93e d93e d917 Ld95d d95d d94d Ld962 d962 d966 Ld968 d968 d972 d960 d95b d958 d953 Ld974 d974 d93c Ld97e d97e d979 d974 d963 d92b Ld991 d991 d903 Ld997 d997 d72b Ld9a9 d9a9 d999 Ld9b2 d9b2 d995 d9a3 Ld9b4 d9b4 d8c9 d9ae d9a7 Ld9d0 d9d0 d9ba Ld9d4 d9d4 d9be Ld9ea d9ea d9e1 Ld9f5 d9f5 d9dc Ld9fe d9fe d9fa Lda0e da0e da08 da02 d9f6 Lda11 da11 d9d8 Lda2d da2d da25 da20 Lda5b da5b da51 da49 Lda5c da5c da35 Lda71 da71 da6d Lda81 da81 da9f da9a da5d Lda84 da84 da15 Lda95 da95 da90 Lda97 da97 da85 Ldabc dabc daae Ldac8 dac8 daa8 Ldada dada dacc Ldae4 dae4 dad8 dac6 daba Ldaf9 daf9 daf5 Ldb05 db05 db01 Ldb21 db21 da81 Ldb23 db23 db1d Ldb36 db36 db2d Ldb40 db40 db34 db2b Ldb51 db51 db46 Ldb5b db5b db4f db48 Ldb6a db6a db66 Ldb83 db83 db7b Ldb84 db84 db7f Ldbab dbab db9b Ldbb6 dbb6 dc72 Ldbba dbba dbb4 Ldbbc dbbc dbb8 dbb2 db86 Ldbd1 dbd1 dbc2 Ldc1a dc1a dbd7 dbc6 Ldc65 dc65 dc56 Ldd1e dd1e dbe2 Ldd24 dd24 dd20 Ldd27 dd27 ed90 Ldd2e dd2e dd2a Ldd41 dd41 dd3c dd38 Ldd4a dd4a dd45 dd43 Ldd54 dd54 dd4f Ldd6f dd6f dd91 Ldd83 dd83 dd7f Ldd85 dd85 dd71 Ldd86 dd86 dd64 Ldd91 dd91 dd88 Lddac ddac dd9a Lddb6 ddb6 dda4 Lddc8 ddc8 df75 Lddcf ddcf ddca Lde0b de0b ddfd Lde0c de0c de09 de05 ddf6 Lde14 de14 ddd1 Lde26 de26 de1a Lde2c de2c de24 Lde34 de34 de2a de22 Lde3e de3e de16 Lde45 de45 de40 Lde50 de50 de4b de47 Lde57 de57 de52 Lde7e de7e de63 Ldea7 dea7 de5f Ldebe debe dea9 Lded3 ded3 debc dea5 de7c Lded7 ded7 de42 Ldf01 df01 df1d Ldf08 df08 df03 Ldf1a df1a df16 df06 Ldf24 df24 df2b Ldf2d df2d df21 Ldf3f df3f df36 Ldf43 df43 de4d dedb Ldf4d df4d ded4 df41 df3d de3b de31 Ldf66 df66 df56 Ldf67 df67 df64 df60 df4f Ldf6d df6d dff9 de11 ddcc Ldf78 df78 df73 Ldf83 df83 de54 Ldf90 df90 dfca dfc2 Ldf91 df91 dfd9 Ldf9b df9b df8e Ldfc0 dfc0 dfb3 Ldfce dfce dfa4 Ldfd4 dfd4 dfdf Ldfdb dfdb dfa8 Ldfe1 dfe1 dfd6 dfd2 dfcc dfc4 dfac Le002 e002 e02d e026 e021 Le023 e023 e01e Le02a e02a e01a Le02f e02f e028 e00d Le077 e077 e074 Le080 e080 e06e Le093 e093 e088 Le09d e09d e0a8 e0a0 e095 Le09e e09e e091 e08a Le0aa e0aa e09b e07d Le0b7 e0b7 e0b2 Le0c0 e0c0 e0ac Le0d8 e0d8 e0e6 Le0e8 e0e8 e0d6 Le103 e103 e100 Le116 e116 e0fb e0ee Le14d e14d e0b4 e1c6 Le155 e155 e14b e142 Le16b e16b e166 e160 Le175 e175 e171 Le191 e191 e1b4 Le1af e1af e1a0 Le1ca e1ca e1c2 e1b8 Le1dd e1dd e1d5 e1cd Le1de e1de e1ba Le1e9 e1e9 e1e5 Le1ef e1ef e1eb Le1f9 e1f9 e1f5 Le1fd e1fd e168 Le202 e202 e1fb Le399 e399 e3c1 Le3a7 e3a7 e3a3 Le3b3 e3b3 e3af Le3bb e3bb e39b Le3c3 e3c3 e391 Le3cf e3cf e3c8 Le3dd e3dd e46b Le41d e41d e412 Le424 e424 e41b Le434 e434 e474 Le465 e465 e409 e3ff e3f5 e3e9 Le46e e46e e457 e44b e43e Le4b0 e4b0 e4a8 Le4cf e4cf e4d2 Le50c e50c e504 Le514 e514 e520 e50e e50a Le522 e522 e519 Le54b e54b e564 Le553 e553 e550 Le55e e55e e559 Le576 e576 e572 Le582 e582 e57e Le599 e599 e56a Le693 e693 e69f Le6a6 e6a6 e698 Le6ae e6ae e6c2 Le6b6 e6b6 e6b0 Le6cf e6cf e6b4 Le6e0 e6e0 e6db e6d5 e6d1 Le6e7 e6e7 e6e3 Le6f1 e6f1 ed34 e6a7 e6c9 e6bb e857 c00c Le6fe e6fe eac2 Le704 e704 e933 Le710 e710 e764 e75d e7a2 Le712 e712 e73f e738 Le725 e725 e720 e70e Le72b e72b e71b e714 Le733 e733 e770 e72d Le74b e74b e731 Le757 e757 e753 Le75f e75f e746 Le786 e786 e77c Le7a2 e7a2 e7f6 Le7a5 e7a5 e778 e6ee Le7a8 e7a8 e80e Le7b5 e7b5 e7f1 Le7c7 e7c7 e7c3 Le7e3 e7e3 e7de e7d8 e7d4 e7b9 e7b6 Le7f3 e7f3 e7e8 Le801 e801 e722 Le80e e80e e832 Le810 e810 e809 Le81c e81c e825 Le823 e823 e81a Le829 e829 e7ef e7ad Le83a e83a e841 Le843 e843 e838 e827 Le850 e850 e846 Le857 e857 e852 Le865 e865 e860 Le869 e869 e89a e894 Le86f e86f e882 Le891 e891 e87a Le896 e896 e876 Le89c e89c e87e Le8a6 e8a6 e8aa Le8d6 e8d6 e8be Le907 e907 e90e e90b Le910 e910 e909 Le91d e91d e912 Le930 e930 e927 Le936 e936 e92e Le93e e93e e922 Le95b e95b e956 Le968 e968 e964 Le970 e970 e96b Le975 e975 e984 Le97d e97d e978 Le98e e98e e989 Le9a5 e9a5 e9a0 Le9ad e9ad e9a7 Le9b4 e9b4 e9ab Le9d0 e9d0 e9b6 Lea0d ea0d e9d2 Lea1d ea1d ea0e e9e6 e9ca e9a3 Lea33 ea33 e9b2 e93b e91a Lea51 ea51 ea4c Lea5d ea5d ea58 Lea62 ea62 ea8d eaa9 Lea89 ea89 ea9d ea95 ea91 Leaa5 eaa5 eab9 eab1 eaad Leabd eabd ebdd eaa1 Leb56 eb56 eb93 eb8e Leb60 eb60 eb5b Leb6e eb6e eb69 Leb7c eb7c eb77 Leb8a eb8a eb85 Leb99 eb99 eba9 Leba3 eba3 eb9e Leba7 eba7 eb54 Lebab ebab eb97 Lebbc ebbc ebcd ebc0 Lebca ebca ebd9 ebd5 ebd1 Lec12 ec12 ec23 Lec1f ec1f ec1f Lec21 ec21 ec18 Lec45 ec45 ec79 ec28 Lec4f ec4f ec66 ec62 Lec55 ec55 ec52 Lec61 ec61 ec57 Lec68 ec68 ec5e Lec73 ec73 ec6b Lec7b ec7b ecc0 ecb8 ecb0 Lec81 ec81 ec71 Lec98 ec98 ec94 ec8b Leca0 eca0 ecd4 Leca6 eca6 ecd0 ecc5 Lecbc ecbc ecac Lece0 ece0 ecf4 Lecf6 ecf6 ed14 ecec Led16 ed16 ed0c ed08 Led2b ed2b ed1f Led3f ed3f ed47 ed56 Led6e ed6e ed65 ed61 ed5d Led79 ed79 ed73 Led7c ed7c ed77 Led93 ed93 ed4f NMI eda7 0000 Pc006 c006 0000 Pdb5c db5c 0000 Ped49 ed49 0000 RESET ebee 0000 Sc000 c000 ecfe ecf8 c010 d768 d760 e043 e03b c003 dde3 dddb Sc00f c00f e524 e3cc c01e ca0e Sc9ed c9ed edbf edb8 c9e8 c9e3 Sca06 ca06 edc2 edb1 ed44 ec42 c9f9 c9de c9d1 Sca08 ca08 edae ed41 ec3f ca03 c9f6 c9db c9d6 Sca0b ca0b ed31 Scf9c cf9c e064 Sd0c7 d0c7 d0ca dd3e Sd6e9 d6e9 ed6e Sdb26 db26 d877 d7c4 Sdb41 db41 d885 d7bc d782 Sdb79 db79 ed6b Sdc29 dc29 dbdb Sdc35 dc35 dbce Sdd5d dd5d dd47 Sdd93 dd93 dd4a Sdffc dffc df9b Se033 e033 e00f dffd Se054 e054 df98 Se06a e06a dd51 Se15e e15e dd54 Se1cb e1cb e1ac e19b e18a Se38d e38d e4d6 e7e0 e6dd Se3d0 e3d0 ecd7 e47e Se476 e476 ecdd Se479 e479 e6f4 Se49e e49e ecda e4b6 e476 Se4b8 e4b8 ec25 e481 Se4ff e4ff e47b Se543 e543 cfe0 Se5b4 e5b4 e497 Se692 e692 e78d Se6aa e6aa e83a e829 Se791 e791 e49a e862 Se85a e85a e843 Se884 e884 e891 Se89e e89e ed2b Se8a4 e8a4 e930 e916 eabf Se8e2 e8e2 ed2e Se8fd e8fd e7f3 e71d Sea1a ea1a e77e e854 e80b Sea3a ea3a ea14 ea29 ea22 Sea87 ea87 ea4e Seaa3 eaa3 ebb6 e99b ea5a Seb38 eb38 e9e2 e9c6 Sebbd ebbd ebab eba0 eb87 eb79 eb6b eb5d e98b e97a e96d e958 Sec2a ec2a ed11 ecf1 ec7e ec76 e468 e4b3 e471 Sec3f ec3f ec3b ec37 ec32 ec2d Z00 0000 c9e6 dc24 Z00 0000 ecc3 ecbe ecbc ecba ecb6 ecb4 ecae eca4 ed98 e83d e81e e81c Z01 0001 d000 cffa cfda cfaa e056 Z01 0001 eccc ecca eca0 ed9d e999 e980 c9e1 dc20 cfe5 d020 d01a d012 Z02 0002 eda2 e9de c9d4 dc1c cfcf cfc9 cf9c e062 Z03 0003 ecd2 ecaa ec9d d00d cff4 cfde cfcb cfa2 e05e Z04 0004 e02f dfe1 Z0b 000b e147 e140 e10a e0f9 e1d7 Z0c 000c e144 e1d3 Z0d 000d e164 Z0e 000e d6f2 ddc3 e1b2 Z0f 000f d88c d9df d9b5 d9b2 d715 d6f9 Z10 0010 d6fb Z11 0011 d9a9 d99b d6ee Z12 0012 d890 d777 d72e db09 daf9 dae4 da95 da78 da5f da53 da3c da39 Z12 0012 da2d da11 d9c0 d71c d717 d6ff Z13 0013 d993 d8c5 d88a d74c db14 daee db21 d9c9 d713 d70f d701 Z14 0014 d869 d7ca db3b db2f db56 db4a d78f d775 Z15 0015 d860 d7d1 db36 db26 db51 db41 d797 d770 Z16 0016 d802 d7f9 d7f6 d7f3 d7f0 d7ed d7ea d7e6 db19 db0f Z17 0017 e051 e002 dfed dfdb dfce df9e df2d df28 df0d df0b deed Z18 0018 e04b e016 e006 dff2 dfa2 df3f df26 df14 df12 deef Z19 0019 e013 e004 dfc6 dfbd dfb8 dfa0 df34 df24 df18 def1 Z1a 001a e018 e008 dfae df10 df08 defb def6 dee7 Z1b 001b deeb Z1c 001c df01 defd Z1d 001d df1b def8 Z26 0026 dff4 Z27 0027 ddee e08d e082 e191 Z27 0027 dec2 deaf de8e de75 dfef df47 df3a df31 de36 df68 de2e de0d Z28 0028 e197 Z36 0036 de88 de6f dfea Z37 0037 de82 de69 dfe5 e1a2 Z38 0038 e1a8 Z47 0047 e16b Z48 0048 e19e e16d Z49 0049 Z49 0049 d74e db1f daf7 da0c da04 d9fc d9f0 d9e5 d9ce df4a e0d1 e1de Z4a 004a Z4a 004a d751 db1b db16 daf3 daf1 da0a d9fe d9f8 d9ec d9e3 d9cb df44 Z5a 005a dc22 dd1e dbd1 dbca dbbc dbb6 dbb0 dbab dba6 dba0 db92 db8a Z5a 005a dd8a dd6f dd6a dd5f dd5d Z5b 005b dc1e dd22 dbba dd8e dd83 dd7d dd7a Z5c 005c e133 e103 e0f0 e1cb e14d e1aa e1a6 e1a4 e199 e195 e193 e188 Z5c 005c e183 e181 e17f e179 Z5d 005d e13a e107 e0f5 e1d9 e1d1 e1cf e151 Z5e 005e e138 e14f Z5f 005f e149 e13e e153 Z60 0060 e12d e1e3 e1e1 Z61 0061 e131 e1e7 e17b e162 Z62 0062 e123 e11e e0c0 e1f1 e1ef Z63 0063 e129 e125 e0c9 e1f9 e1f7 Z64 0064 e15e Z66 0066 e118 e1e9 Z67 0067 e11c e1ed Z6c 006c e0b9 e157 e1b6 dd4d Z6d 006d e121 e116 e110 e0d8 e0c5 e0ae e1be e1bc Z6e 006e e127 e11a e114 e0df e0cd e0b0 e1c8 e1c4 Z6f 006f e0ec e1db Z71 0071 e136 e12b e105 e0f3 e0e8 e0dd e0db e0c7 Z72 0072 e13c e12f e10c e0f7 e0ea e0e3 e0e1 e0cf Z73 0073 e10e e16f Z74 0074 e112 e173 Z75 0075 e080 Z76 0076 e0a4 e09e e097 e093 e077 e072 Z77 0077 df52 ddf9 ddac dda6 dd98 e070 e175 Z78 0078 df58 df54 ddff ddfb ddaa Z79 0079 df4d ddf4 Z7a 007a dd5a dd30 dd28 Z7b 007b ed69 ed63 db6a Z7c 007c ed67 db6c Z7d 007d db79 db72 Z7e 007e db81 db7d db6e Z7f 007f dc67 dc65 db8c Z80 0080 dc5f dc5d dc51 dc4f db94 Z82 0082 dbe0 ed5f db5e Z83 0083 db74 Z84 0084 dc70 db99 db76 Z88 0088 e99e e95e Z89 0089 e89e ea20 Z8a 008a e8a0 e7fd ea27 Z8b 008b e9d6 eb99 eb80 eb72 eb64 eb56 e9ba Z8c 008c e9da eb90 e9be Z8d 008d e9e0 eba7 eb95 e9c4 Z8e 008e e9dc eb52 e9c0 Z8f 008f ebcf ea8f eaab Z90 0090 ebd3 ebc2 ea93 eaaf Z91 0091 ebd7 ebc7 ea99 ea97 ea87 eab5 eab3 eaa3 Z92 0092 e8a2 e938 e914 e8da eabd Z93 0093 ec02 e77a e9b0 e7b1 e7ab e8d6 e8d0 e850 e712 c013 Z94 0094 e4cf d759 d00f Z98 0098 e3c3 e3b9 e3b7 e38d e59b e599 e596 e594 Z99 0099 e034 ddd3 df6d ddbf Z99 0099 ec50 ec4b e887 e815 e810 e5ac e590 e58a e580 e574 e55e e543 Z9a 009a ec64 ec5a ec47 e88d e587 e576 ddc1 Z9b 009b e3bb e3b5 e395 e5a0 e553 de26 de1c ddb9 Z9c 009c e3b3 e3a7 e5a5 e57a e56e e55b Z9d 009d e76b e72b e6ae e6aa e700 Z9e 009e e76d e75b e72f e729 e725 e6b2 e6ac e702 Z9f 009f e4db e7dc e7d6 e7d2 e6d9 e6d3 e6cf e566 Za0 00a0 e88b e885 e872 e869 Za1 00a1 e86b Za2 00a2 Za2 00a2 ec00 e74f e74d e7c7 e7bd e7bb e6e7 e6e0 e0bd e15b ed8b ed84 Za3 00a3 e486 cffe dd3a Za4 00a4 e973 e880 e82c e801 Za5 00a5 e08f Za6 00a6 e086 Za7 00a7 e0a6 e099 Za8 00a8 e079 Za9 00a9 e399 d703 cfea d01c cfdc ddc8 Zaa 00aa d9ab d9a0 d99d de28 de20 de1e Zab 00ab d8e4 d8ac d87e d870 d779 daa1 d9b7 d708 ddcf Zac 00ac e4b8 e3a9 e39d e555 e54c Zb0 00b0 e4ba Zb4 00b4 e4bc Zb8 00b8 e4be Zb9 00b9 e40e dac8 daaa dd34 db62 Zba 00ba dd73 Zbb 00bb e0fd e0aa e06a Zbc 00bc cff6 Zbd 00bd e48e e7da e6d7 e568 Zbf 00bf dd8c dd76 Zc0 00c0 e5b4 e484 Zc1 00c1 e488 dd41 ed5b Zca 00ca e0c3 Zcb 00cb e0cb Zcc 00cc e5c1 e48a Zcd 00cd e5bc e495 e48c Zce 00ce e537 e528 e427 Zcf 00cf ebfe e53d e4aa e773 e6f7 Zd0 00d0 e79b e85a Zd1 00d1 ed8d ed79 ed49 Zd2 00d2 dd81 dd78 Zd3 00d3 ebf2 e78b e786 e7ff e7f8 Zd4 00d4 ecce ec98 Zd5 00d5 ebf5 e7a9 e7a5 e707 Zd6 00d6 ed82 ed71 Zd7 00d7 ed7e ed75 Zd8 00d8 ed80 Zd9 00d9 ed7c Zda 00da e793 e865 Zdb 00db e797 e867 dc2f Zdc 00dc dc49 dc3d dc3b Zde 00de e3d7 Zdf 00df e3db Ze0 00e0 ed29 ed18 ec04 Ze1 00e1 e79f e85c