> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 01 00 9E 39 39 39 00 13 08 0A 00 2E |.......999......|
00000010: 4D 45 4D 00 1F 08 14 00 AC B2 24 43 30 30 30 00 |MEM.......$C000.|
00000020: 54 08 1E 00 53 54 41 52 54 20 20 4A 53 52 20 9F |T...START JSR .|
00000030: 3A 4C 44 41 20 23 B3 44 52 56 3A 53 54 41 20 24 |:LDA #.DRV:STA $|
00000040: 39 45 3A 4C 44 41 20 23 B1 44 52 56 3A 53 54 41 |9E:LDA #.DRV:STA|
00000050: 20 24 39 46 00 95 08 28 00 4D 31 20 4C 44 41 20 | $9F...(.M1 LDA |
00000060: 24 39 45 3A 53 45 43 3A 53 42 43 20 23 B3 44 52 |$9E:SEC:SBC #.DR|
00000070: 56 31 3A 53 54 41 20 9D AA 33 3A 4C 44 41 20 24 |V1:STA ..3:LDA $|
00000080: 39 46 3A 53 42 43 20 23 B1 44 52 56 31 3A 53 54 |9F:SBC #.DRV1:ST|
00000090: 41 20 9D AA 34 00 A8 08 32 00 4C 44 58 20 23 30 |A ..4...2.LDX #0|
000000A0: 3A 4A 53 52 20 43 4F 4D 00 D7 08 3C 00 AB 20 4C |:JSR COM...<.. L|
000000B0: 44 41 20 28 24 39 45 29 2C 59 3A 4A 53 52 20 24 |DA ($9E),Y:JSR $|
000000C0: 46 46 44 32 3A 49 4E 59 3A 43 50 59 20 23 24 31 |FFD2:INY:CPY #$1|
000000D0: 30 3A 42 4E 45 20 AB 00 12 09 46 00 4A 53 52 20 |0:BNE ....F.JSR |
000000E0: A0 3A 4A 53 52 20 9F 3A 4C 44 41 20 24 39 45 3A |.:JSR .:LDA $9E:|
000000F0: 43 4C 43 3A 41 44 43 20 23 24 31 30 3A 53 54 41 |CLC:ADC #$10:STA|
00000100: 20 24 39 45 3A 42 43 43 20 AA 3A 49 4E 43 20 24 | $9E:BCC .:INC $|
00000110: 39 46 00 37 09 50 00 AA 20 43 4D 50 20 23 B3 80 |9F.7.P.. CMP #..|
00000120: 3A 4C 44 41 20 24 39 46 3A 53 42 43 20 23 B1 80 |:LDA $9F:SBC #..|
00000130: 3A 42 43 43 20 4D 31 00 50 09 5A 00 4C 44 58 20 |:BCC M1.P.Z.LDX |
00000140: 23 36 3A 4A 53 52 20 43 4F 4D 3A 4A 53 52 20 A0 |#6:JSR COM:JSR .|
00000150: 00 84 09 64 00 4C 44 41 20 23 24 43 37 3A 53 54 |...d.LDA #$C7:ST|
00000160: 41 20 24 44 44 30 30 3A 4C 44 58 20 23 30 3A AB |A $DD00:LDX #0:.|
00000170: 20 44 45 59 3A 42 4E 45 20 AB 3A 44 45 58 3A 42 | DEY:BNE .:DEX:B|
00000180: 4E 45 20 AB 00 8C 09 6E 00 52 54 53 00 CA 09 E8 |NE ....n.RTS....|
00000190: 03 9F 20 4C 44 58 20 23 38 3A 4C 44 41 20 23 24 |.. LDX #8:LDA #$|
000001A0: 46 3A 54 41 59 3A 4A 53 52 20 24 46 46 42 41 3A |F:TAY:JSR $FFBA:|
000001B0: 4C 44 41 20 23 30 3A 4A 53 52 20 24 46 46 42 44 |LDA #0:JSR $FFBD|
000001C0: 3A 4A 53 52 20 24 46 46 43 30 00 E0 09 F2 03 4C |:JSR $FFC0.....L|
000001D0: 44 58 20 23 24 46 3A 4A 4D 50 20 24 46 46 43 39 |DX #$F:JMP $FFC9|
000001E0: 00 15 0A FC 03 43 4F 4D 20 4C 44 59 20 23 36 3A |.....COM LDY #6:|
000001F0: AB 20 4C 44 41 20 9D 2C 58 3A 4A 53 52 20 24 46 |. LDA .,X:JSR $F|
00000200: 46 44 32 3A 49 4E 58 3A 44 45 59 3A 42 4E 45 20 |FD2:INX:DEY:BNE |
00000210: AB 3A 52 54 53 00 34 0A 06 04 9D 20 2E 42 59 54 |.:RTS.4.... .BYT|
00000220: 20 22 4D 22 2C 22 2D 22 2C 22 57 22 2C 30 2C 30 | "M","-","W",0,0|
00000230: 2C 24 31 30 00 50 0A 10 04 2E 42 59 54 20 22 4D |,$10.P....BYT "M|
00000240: 22 2C 22 2D 22 2C 22 45 22 2C 30 2C 35 2C 24 44 |","-","E",0,5,$D|
00000250: 00 72 0A 1A 04 A0 20 4A 53 52 20 24 46 46 43 43 |.r.... JSR $FFCC|
00000260: 3A 4C 44 41 20 23 24 46 3A 4A 4D 50 20 24 46 46 |:LDA #$F:JMP $FF|
00000270: 43 33 00 81 0A 24 04 44 52 56 20 2E 42 55 46 20 |C3...$.DRV .BUF |
00000280: 30 00 A0 0A 2E 04 44 52 56 31 20 B2 20 44 52 56 |0.....DRV1 . DRV|
00000290: AB 24 35 30 30 3A 20 2E 4F 46 46 20 24 35 30 30 |.$500: .OFF $500|
000002A0: 00 DF 0A D0 07 44 52 56 32 20 53 45 49 3A 43 4C |.....DRV2 SEI:CL|
000002B0: 44 3A 4C 44 41 20 23 24 31 30 3A 54 41 59 3A 44 |D:LDA #$10:TAY:D|
000002C0: 31 20 53 54 41 20 24 31 38 30 30 3A AB 20 44 45 |1 STA $1800:. DE|
000002D0: 58 3A 42 4E 45 20 AB 3A 45 B0 20 23 24 31 30 00 |X:BNE .:E. #$10.|
000002E0: EE 0A DA 07 44 45 59 3A 42 4E 45 20 44 31 00 25 |....DEY:BNE D1.%|
000002F0: 0B E4 07 44 32 20 4C 44 41 20 23 38 3A 53 54 41 |...D2 LDA #8:STA|
00000300: 20 24 31 38 30 30 3A 4C 44 41 20 24 31 43 30 30 | $1800:LDA $1C00|
00000310: 3A AF 20 23 24 46 37 3A 53 54 41 20 24 31 43 30 |:. #$F7:STA $1C0|
00000320: 30 3A 43 4C 49 00 66 0B EE 07 4C 44 41 20 23 31 |0:CLI.f...LDA #1|
00000330: 3A AB 20 42 49 54 20 24 31 38 30 30 3A 42 45 51 |:. BIT $1800:BEQ|
00000340: 20 AB 3A 53 45 49 3A 4C 44 41 20 23 30 3A 53 54 | .:SEI:LDA #0:ST|
00000350: 41 20 24 31 38 30 30 3A 4A 53 52 20 52 44 3A 53 |A $1800:JSR RD:S|
00000360: 54 41 20 24 31 30 00 A4 0B F8 07 4A 53 52 20 52 |TA $10.....JSR R|
00000370: 44 3A 53 54 41 20 24 31 31 3A 4C 44 41 20 23 38 |D:STA $11:LDA #8|
00000380: 3A 53 54 41 20 24 31 38 30 30 3A 4C 44 41 20 24 |:STA $1800:LDA $|
00000390: 31 43 30 30 3A B0 41 20 23 38 3A 53 54 41 20 24 |1C00:.A #8:STA $|
000003A0: 31 43 30 30 00 D3 0B 02 08 4C 44 59 20 23 31 3A |1C00.....LDY #1:|
000003B0: 44 33 20 4C 44 58 20 23 24 31 32 3A 53 54 58 20 |D3 LDX #$12:STX |
000003C0: 24 45 3A 53 54 59 20 24 46 3A 4A 53 52 20 52 44 |$E:STY $F:JSR RD|
000003D0: 53 45 43 00 1A 0C 0C 08 4C 44 59 20 23 32 3A AB |SEC.....LDY #2:.|
000003E0: 20 4C 44 41 20 24 37 30 30 2C 59 3A AF 20 23 24 | LDA $700,Y:. #$|
000003F0: 38 33 3A 43 4D 50 20 23 24 38 32 3A 42 4E 45 20 |83:CMP #$82:BNE |
00000400: AA 3A 4C 44 41 20 24 37 30 33 2C 59 3A 43 4D 50 |.:LDA $703,Y:CMP|
00000410: 20 24 31 30 3A 42 4E 45 20 AA 00 38 0C 16 08 4C | $10:BNE ..8...L|
00000420: 44 41 20 24 37 30 34 2C 59 3A 43 4D 50 20 24 31 |DA $704,Y:CMP $1|
00000430: 31 3A 42 45 51 20 44 34 00 69 0C 20 08 AA 20 54 |1:BEQ D4.i. .. T|
00000440: 59 41 3A 43 4C 43 3A 41 44 43 20 23 24 32 30 3A |YA:CLC:ADC #$20:|
00000450: 54 41 59 3A 42 43 43 20 AB 3A 4C 44 59 20 24 37 |TAY:BCC .:LDY $7|
00000460: 30 31 3A 42 50 4C 20 44 33 00 A5 0C 2A 08 44 35 |01:BPL D3...*.D5|
00000470: 20 4C 44 41 20 23 30 3A 53 54 41 20 24 31 38 30 | LDA #0:STA $180|
00000480: 30 3A 4A 53 52 20 53 4E 44 31 3A 4C 44 58 20 23 |0:JSR SND1:LDX #|
00000490: 24 46 37 3A 44 36 20 4A 53 52 20 53 4E 44 3A 4A |$F7:D6 JSR SND:J|
000004A0: 4D 50 20 44 32 00 D0 0C 34 08 44 34 20 4C 44 41 |MP D2...4.D4 LDA|
000004B0: 20 24 37 30 31 2C 59 3A 53 54 41 20 24 45 3A 4C | $701,Y:STA $E:L|
000004C0: 44 41 20 24 37 30 32 2C 59 3A 53 54 41 20 24 46 |DA $702,Y:STA $F|
000004D0: 00 0B 0D 3E 08 44 37 20 4A 53 52 20 52 44 53 45 |...>.D7 JSR RDSE|
000004E0: 43 3A 4C 44 59 20 23 30 3A 4C 44 41 20 24 37 30 |C:LDY #0:LDA $70|
000004F0: 30 3A 53 54 41 20 24 45 3A 42 4E 45 20 AA 3A 4C |0:STA $E:BNE .:L|
00000500: 44 59 20 24 37 30 31 3A 49 4E 59 00 41 0D 48 08 |DY $701:INY.A.H.|
00000510: AA 20 53 54 59 20 24 31 30 3A 4C 44 41 20 24 37 |. STY $10:LDA $7|
00000520: 30 31 3A 53 54 41 20 24 46 3A 4C 44 59 20 23 32 |01:STA $F:LDY #2|
00000530: 3A 4C 44 41 20 23 30 3A 53 54 41 20 24 31 38 30 |:LDA #0:STA $180|
00000540: 30 00 7C 0D 52 08 AB 20 4C 44 58 20 24 37 30 30 |0.|.R.. LDX $700|
00000550: 2C 59 3A 43 50 58 20 23 24 41 43 3A 42 4E 45 20 |,Y:CPX #$AC:BNE |
00000560: AA 3A 4A 53 52 20 53 4E 44 3A 4C 44 58 20 23 24 |.:JSR SND:LDX #$|
00000570: 41 43 3A AA 20 4A 53 52 20 53 4E 44 00 92 0D 5C |AC:. JSR SND...\|
00000580: 08 49 4E 59 3A 43 50 59 20 24 31 30 3A 42 4E 45 |.INY:CPY $10:BNE|
00000590: 20 AB 00 D5 0D 66 08 4C 44 41 20 24 45 3A 42 45 | ....f.LDA $E:BE|
000005A0: 51 20 AA 3A 4A 53 52 20 53 4E 44 31 3A 4C 44 58 |Q .:JSR SND1:LDX|
000005B0: 20 23 24 43 33 3A 4A 53 52 20 53 4E 44 3A 4C 44 | #$C3:JSR SND:LD|
000005C0: 41 20 23 38 3A 53 54 41 20 24 31 38 30 30 3A 42 |A #8:STA $1800:B|
000005D0: 4E 45 20 44 37 00 F4 0D 70 08 AA 20 4A 53 52 20 |NE D7...p.. JSR |
000005E0: 53 4E 44 31 3A 4C 44 58 20 23 24 46 46 3A 42 4E |SND1:LDX #$FF:BN|
000005F0: 45 20 44 36 00 1F 0E 84 08 52 44 53 45 43 20 43 |E D6.....RDSEC C|
00000600: 4C 49 3A 4C 44 41 20 23 24 38 30 3A 53 54 41 20 |LI:LDA #$80:STA |
00000610: 34 3A AB 20 4C 44 41 20 34 3A 42 4D 49 20 AB 00 |4:. LDA 4:BMI ..|
00000620: 3C 0E 8E 08 43 4D 50 20 23 31 3A 42 4E 45 20 52 |<...CMP #1:BNE R|
00000630: 44 53 45 43 3A 53 45 49 3A 52 54 53 00 4E 0E B6 |DSEC:SEI:RTS.N..|
00000640: 08 53 4E 44 31 20 4C 44 58 20 23 24 41 43 00 7A |.SND1 LDX #$AC.z|
00000650: 0E C0 08 53 4E 44 20 53 54 58 20 24 31 34 3A 4C |...SND STX $14:L|
00000660: 44 41 20 23 34 3A 4A 53 52 20 53 31 3A 4A 53 52 |DA #4:JSR S1:JSR|
00000670: 20 53 31 3A 4A 53 52 20 53 31 00 C4 0E CA 08 53 | S1:JSR S1.....S|
00000680: 31 20 4C 53 52 20 24 31 34 3A 4C 44 58 20 23 32 |1 LSR $14:LDX #2|
00000690: 3A 42 43 43 20 53 32 3A 4C 44 58 20 23 30 3A 53 |:BCC S2:LDX #0:S|
000006A0: 32 20 42 49 54 20 24 31 38 30 30 3A 42 4E 45 20 |2 BIT $1800:BNE |
000006B0: 53 32 3A 53 54 58 20 24 31 38 30 30 3A 4C 53 52 |S2:STX $1800:LSR|
000006C0: 20 24 31 34 00 FF 0E D4 08 4C 44 58 20 23 32 3A | $14.....LDX #2:|
000006D0: 42 43 43 20 53 33 3A 4C 44 58 20 23 30 3A 53 33 |BCC S3:LDX #0:S3|
000006E0: 20 42 49 54 20 24 31 38 30 30 3A 42 45 51 20 53 | BIT $1800:BEQ S|
000006F0: 33 3A 53 54 58 20 24 31 38 30 30 3A 52 54 53 00 |3:STX $1800:RTS.|
00000700: 0D 0F DE 08 52 44 20 4C 44 59 20 23 34 00 4A 0F |....RD LDY #4.J.|
00000710: E8 08 52 44 31 20 4C 44 41 20 23 34 3A AB 20 42 |..RD1 LDA #4:. B|
00000720: 49 54 20 24 31 38 30 30 3A 42 45 51 20 AB 3A 4C |IT $1800:BEQ .:L|
00000730: 44 41 20 24 31 38 30 30 3A 4C 53 52 3A 52 B0 20 |DA $1800:LSR:R. |
00000740: 24 31 34 3A 4C 44 41 20 23 34 00 8D 0F F2 08 AB |$14:LDA #4......|
00000750: 20 42 49 54 20 24 31 38 30 30 3A 42 4E 45 20 AB | BIT $1800:BNE .|
00000760: 3A 4C 44 41 20 24 31 38 30 30 3A 4C 53 52 3A 52 |:LDA $1800:LSR:R|
00000770: B0 20 24 31 34 3A 44 45 59 3A 42 4E 45 20 52 44 |. $14:DEY:BNE RD|
00000780: 31 3A 4C 44 41 20 24 31 34 3A 52 54 53 00 AA 0F |1:LDA $14:RTS...|
00000790: 0F 27 80 31 20 2E 42 55 46 20 30 3A 80 20 B2 80 |.'.1 .BUF 0:. ..|
000007A0: 31 AB 44 52 56 32 AA 44 52 56 00 00 00 |1.DRV2.DRV... |
.......999......MEM.......$C000.T...STAR
T JSR .:LDA #.DRV:STA $9E:LDA #.DRV:STA
$9F...(.M1 LDA $9E:SEC:SBC #.DRV1:STA .
.3:LDA $9F:SBC #.DRV1:STA ..4...2.LDX #0
:JSR COM.W.<.. LDA ($9E),Y:JSR $FFD2:INY
:CPY #$10:BNE ....F.JSR :JSR .:LDA $9E:
CLC:ADC #$10:STA $9E:BCC .:INC $9F.7.P..
CMP #..:LDA $9F:SBC #..:BCC M1.P.Z.LDX
#6:JSR COM:JSR ...D.LDA #$C7:STA $DD00:
LDX #0:. DEY:BNE .:DEX:BNE ....N.RTS.J..
.. LDX #8:LDA #$F:TAY:JSR $FFBA:LDA #0:J
SR $FFBD:JSR $FFC0.....LDX #$F:JMP $FFC9
.....COM LDY #6:. LDA .,X:JSR $FFD2:INX:
DEY:BNE .:RTS.4.... .BYT "M","-","W",0,0
,$10.P....BYT "M","-","E",0,5,$D.R... J
SR $FFCC:LDA #$F:JMP $FFC3...$.DRV .BUF
0. ...DRV1 . DRV.$500: .OFF $500...P.DRV
2 SEI:CLD:LDA #$10:TAY:D1 STA $1800:. DE
X:BNE .:E. #$10...Z.DEY:BNE D1.%...D2 LD
A #8:STA $1800:LDA $1C00:. #$F7:STA $1C0
0:CLI.F...LDA #1:. BIT $1800:BEQ .:SEI:L
DA #0:STA $1800:JSR RD:STA $10.....JSR R
D:STA $11:LDA #8:STA $1800:LDA $1C00:.A
#8:STA $1C00.S...LDY #1:D3 LDX #$12:STX
$E:STY $F:JSR RDSEC.....LDY #2:. LDA $70
0,Y:. #$83:CMP #$82:BNE .:LDA $703,Y:CMP
$10:BNE ..8...LDA $704,Y:CMP $11:BEQ D4
.I. .. TYA:CLC:ADC #$20:TAY:BCC .:LDY $7
01:BPL D3...*.D5 LDA #0:STA $1800:JSR SN
D1:LDX #$F7:D6 JSR SND:JMP D2.P.4.D4 LDA
$701,Y:STA $E:LDA $702,Y:STA $F...>.D7
JSR RDSEC:LDY #0:LDA $700:STA $E:BNE .:L
DY $701:INY.A.H.. STY $10:LDA $701:STA $
F:LDY #2:LDA #0:STA $1800.|.R.. LDX $700
,Y:CPX #$AC:BNE .:JSR SND:LDX #$AC:. JSR
SND...\.INY:CPY $10:BNE ..U.F.LDA $E:BE
Q .:JSR SND1:LDX #$C3:JSR SND:LDA #8:STA
$1800:BNE D7...P.. JSR SND1:LDX #$FF:BN
E D6.....RDSEC CLI:LDA #$80:STA 4:. LDA
4:BMI ..<...CMP #1:BNE RDSEC:SEI:RTS.N..
.SND1 LDX #$AC.Z...SND STX $14:LDA #4:JS
R S1:JSR S1:JSR S1.D.J.S1 LSR $14:LDX #2
:BCC S2:LDX #0:S2 BIT $1800:BNE S2:STX $
1800:LSR $14...T.LDX #2:BCC S3:LDX #0:S3
BIT $1800:BEQ S3:STX $1800:RTS.....RD L
DY #4.J...RD1 LDA #4:. BIT $1800:BEQ .:L
DA $1800:LSR:R. $14:LDA #4...... BIT $18
00:BNE .:LDA $1800:LSR:R. $14:DEY:BNE RD
1:LDA $14:RTS....'.1 .BUF 0:. ..1.DRV2.D
RV...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL