00000000: 01 04 0B 04 64 00 9E 20 37 30 30 00 2D 04 6E 00 |....d.. 700.-.n.|
00000010: 3B 20 20 20 20 20 87 20 54 48 45 20 44 49 53 4B |; . THE DISK|
00000020: 20 45 52 52 B0 20 43 48 41 4E 4E 45 4C 00 52 04 | ERR. CHANNEL.R.|
00000030: 78 00 3B 20 20 55 BF 47 20 54 48 45 20 53 59 4D |x.; U.G THE SYM|
00000040: 41 53 53 20 33 2E 31 33 20 41 53 53 45 4D 42 4C |ASS 3.13 ASSEMBL|
00000050: 45 52 00 60 04 82 00 AC 20 B2 20 24 30 33 33 43 |ER.`.... . $033C|
00000060: 00 66 04 8C 00 3B 00 88 04 96 00 4C 44 41 20 23 |.f...;.....LDA #|
00000070: 31 35 20 20 20 20 20 20 20 20 20 3B 20 46 49 4C |15 ; FIL|
00000080: 45 20 4E 55 4D 42 45 52 00 AC 04 A0 00 4C 44 58 |E NUMBER.....LDX|
00000090: 20 44 52 56 4E 52 20 20 20 20 20 20 20 3B 20 44 | DRVNR ; D|
000000A0: 45 56 49 43 45 20 4E 55 4D 42 45 52 00 D3 04 AA |EVICE NUMBER....|
000000B0: 00 4C 44 59 20 23 31 35 20 20 20 20 20 20 20 20 |.LDY #15 |
000000C0: 20 3B 20 53 45 43 91 44 41 52 59 20 41 44 44 52 | ; SEC.DARY ADDR|
000000D0: 45 53 53 00 F8 04 B4 00 4A 53 52 20 24 46 46 42 |ESS.....JSR $FFB|
000000E0: 41 20 20 20 20 20 20 20 3B 20 53 45 54 20 50 41 |A ; SET PA|
000000F0: 52 41 4D 45 54 45 52 53 00 FE 04 BE 00 3B 00 23 |RAMETERS.....;.#|
00000100: 05 C8 00 4C 44 41 20 23 30 20 20 20 20 20 20 20 |...LDA #0 |
00000110: 20 20 20 3B 20 C3 47 54 48 20 4F 46 20 46 49 C3 | ; .GTH OF FI.|
00000120: 41 4D 45 00 44 05 D2 00 4A 53 52 20 24 46 46 42 |AME.D...JSR $FFB|
00000130: 44 20 20 20 20 20 20 20 3B 20 53 45 54 20 46 49 |D ; SET FI|
00000140: C3 41 4D 45 00 61 05 DC 00 4A 53 52 20 24 46 46 |.AME.a...JSR $FF|
00000150: 43 30 20 20 20 20 20 20 20 3B 20 9F 20 46 49 4C |C0 ; . FIL|
00000160: 45 00 67 05 E6 00 3B 00 8B 05 F0 00 4C 44 58 20 |E.g...;.....LDX |
00000170: 23 31 35 20 20 20 20 20 20 20 20 20 3B 20 23 31 |#15 ; #1|
00000180: 35 AB 45 52 52 B0 20 46 49 4C 45 00 B0 05 FA 00 |5.ERR. FILE.....|
00000190: 4A 53 52 20 24 46 46 43 36 20 20 20 20 20 20 20 |JSR $FFC6 |
000001A0: 3B 20 85 20 46 52 4F 4D 20 46 49 4C 45 20 31 35 |; . FROM FILE 15|
000001B0: 00 D3 05 04 01 4A 53 52 20 24 46 46 45 34 20 20 |.....JSR $FFE4 |
000001C0: 20 20 20 20 20 3B 20 A1 20 46 49 52 53 54 20 43 | ; . FIRST C|
000001D0: 48 41 52 00 F3 05 0E 01 53 54 41 20 54 45 4D 50 |HAR.....STA TEMP|
000001E0: 31 20 20 20 20 20 20 20 3B 20 8F 45 4D 42 45 52 |1 ; .EMBER|
000001F0: 20 49 54 00 16 06 18 01 4A 53 52 20 24 46 46 45 | IT.....JSR $FFE|
00000200: 34 20 20 20 20 20 20 20 3B 20 A1 20 53 45 43 91 |4 ; . SEC.|
00000210: 44 20 43 48 41 52 00 36 06 22 01 53 54 41 20 54 |D CHAR.6.".STA T|
00000220: 45 4D 50 32 20 20 20 20 20 20 20 3B 20 8F 45 4D |EMP2 ; .EM|
00000230: 42 45 52 20 49 54 00 5C 06 2C 01 43 4D 50 20 54 |BER IT.\.,.CMP T|
00000240: 45 4D 50 31 20 20 20 20 20 20 20 3B 20 43 4F 4D |EMP1 ; COM|
00000250: 50 41 52 45 20 23 31 20 A4 20 23 32 00 83 06 36 |PARE #1 . #2...6|
00000260: 01 42 4E 45 20 50 52 4E 54 45 52 52 20 20 20 20 |.BNE PRNTERR |
00000270: 20 3B 20 8B 20 A8 20 B2 20 99 20 45 52 52 B0 20 | ; . . . . ERR. |
00000280: 4D 53 47 00 A8 06 40 01 AF 20 23 24 30 46 20 20 |MSG...@.. #$0F |
00000290: 20 20 20 20 20 20 3B 20 4D 41 53 4B 20 48 49 47 | ; MASK HIG|
000002A0: 48 20 4E 59 42 42 4C 45 00 CF 06 4A 01 42 4E 45 |H NYBBLE...J.BNE|
000002B0: 20 50 52 4E 54 45 52 52 20 20 20 20 20 3B 20 8B | PRNTERR ; .|
000002C0: 20 A8 20 5A 45 52 4F 20 A7 20 99 20 45 52 52 00 | . ZERO . . ERR.|
000002D0: F6 06 54 01 4E 4F 45 52 52 20 4A 53 52 20 24 46 |..T.NOERR JSR $F|
000002E0: 46 45 34 20 3B 20 4E 4F 20 45 52 52 B0 20 53 4F |FE4 ; NO ERR. SO|
000002F0: 20 9A 49 4E 55 45 00 18 07 5E 01 43 4D 50 20 23 | .INUE...^.CMP #|
00000300: 24 30 44 20 20 20 20 20 20 20 20 3B 20 43 4F 4D |$0D ; COM|
00000310: 50 41 52 45 20 A4 20 8E 00 26 07 68 01 42 4E 45 |PARE . ..&.h.BNE|
00000320: 20 4E 4F 45 52 52 00 32 07 72 01 4A 4D 50 20 44 | NOERR.2.r.JMP D|
00000330: 91 45 00 38 07 7C 01 3B 00 4D 07 86 01 3B 20 99 |.E.8.|.;.M...; .|
00000340: 20 45 52 52 B0 20 52 4F 55 54 49 4E 45 00 63 07 | ERR. ROUTINE.c.|
00000350: 90 01 50 52 4E 54 45 52 52 20 4C 44 41 20 54 45 |..PRNTERR LDA TE|
00000360: 4D 50 31 00 71 07 9A 01 4A 53 52 20 24 46 46 44 |MP1.q...JSR $FFD|
00000370: 32 00 7F 07 A4 01 4C 44 41 20 54 45 4D 50 32 00 |2.....LDA TEMP2.|
00000380: 8D 07 AE 01 4A 53 52 20 24 46 46 44 32 00 AF 07 |....JSR $FFD2...|
00000390: B8 01 4C 4F 4F 50 20 4A 53 52 20 24 46 46 45 34 |..LOOP JSR $FFE4|
000003A0: 20 20 3B 20 A1 20 43 48 41 52 41 43 54 45 52 00 | ; . CHARACTER.|
000003B0: D0 07 C2 01 4A 53 52 20 24 46 46 44 32 20 20 20 |....JSR $FFD2 |
000003C0: 20 20 20 20 3B 20 99 20 A4 20 53 43 52 45 45 4E | ; . . SCREEN|
000003D0: 00 EE 07 CC 01 43 4D 50 20 23 24 30 44 20 20 20 |.....CMP #$0D |
000003E0: 20 20 20 20 20 3B 20 49 53 20 49 54 20 8E 00 0E | ; IS IT ...|
000003F0: 08 D6 01 42 4E 45 20 4C 4F 4F 50 20 20 20 20 20 |...BNE LOOP |
00000400: 20 20 20 3B 20 4E 4F 20 A7 20 4C 4F 4F 50 00 14 | ; NO . LOOP..|
00000410: 08 E0 01 3B 00 33 08 EA 01 44 91 45 20 4A 53 52 |...;.3...D.E JSR|
00000420: 20 24 46 46 43 43 20 20 3B 20 52 45 53 45 54 20 | $FFCC ; RESET |
00000430: 49 AD 4F 00 52 08 F4 01 4C 44 41 20 23 31 35 20 |I.O.R...LDA #15 |
00000440: 20 20 20 20 20 20 20 20 3B 20 46 49 4C 45 20 23 | ; FILE #|
00000450: 31 35 00 73 08 FE 01 4A 53 52 20 24 46 46 43 33 |15.s...JSR $FFC3|
00000460: 20 20 20 20 20 20 20 3B 20 A0 20 54 48 45 20 46 | ; . THE F|
00000470: 49 4C 45 00 9A 08 08 02 4A 4D 50 20 24 45 33 37 |ILE.....JMP $E37|
00000480: 42 20 20 20 20 20 20 20 3B 20 42 41 53 49 43 20 |B ; BASIC |
00000490: 57 41 52 4D 20 53 54 41 52 54 00 A8 08 12 02 54 |WARM START.....T|
000004A0: 45 4D 50 31 20 4E 4F 50 00 B6 08 1C 02 54 45 4D |EMP1 NOP.....TEM|
000004B0: 50 32 20 4E 4F 50 00 D9 08 26 02 44 52 56 4E 52 |P2 NOP...&.DRVNR|
000004C0: 20 2E 42 59 54 45 20 38 20 20 20 3B 20 45 49 54 | .BYTE 8 ; EIT|
000004D0: 48 45 52 20 38 20 B0 20 39 00 E0 08 30 02 2E 80 |HER 8 . 9...0...|
000004E0: 00 00 00 |... |
....D.. 700.-.N.; . THE DISK ERR. CH
ANNEL.R.X.; U.G THE SYMASS 3.13 ASSEMBL
ER.`.... . $033C.F...;.....LDA #15
; FILE NUMBER... .LDX DRVNR ; D
EVICE NUMBER.S...LDY #15 ; SEC.D
ARY ADDRESS.....JSR $FFBA ; SET PA
RAMETERS.....;.#.H.LDA #0 ; CGT
H OF FICAME.D.R.JSR $FFBD ; SET FI
CAME.A...JSR $FFC0 ; . FILE.G...;.
....LDX #15 ; #15.ERR. FILE.....
JSR $FFC6 ; . FROM FILE 15.S...JSR
$FFE4 ; . FIRST CHAR.....STA TEMP
1 ; .EMBER IT.....JSR $FFE4
; . SEC.D CHAR.6.".STA TEMP2 ; .EM
BER IT.\.,.CMP TEMP1 ; COMPARE #1
. #2...6.BNE PRNTERR ; . . . . ERR.
MSG...@.. #$0F ; MASK HIGH NYBBLE
.O.J.BNE PRNTERR ; . . ZERO . . ERR.
..T.NOERR JSR $FFE4 ; NO ERR. SO .INUE..
.^.CMP #$0D ; COMPARE . ..&.H.BNE
NOERR.2.R.JMP D.E.8.|.;.M...; . ERR. RO
UTINE.C...PRNTERR LDA TEMP1.Q...JSR $FFD
2....LDA TEMP2.....JSR $FFD2.....LOOP J
SR $FFE4 ; . CHARACTER.P.B.JSR $FFD2
; . . SCREEN...L.CMP #$0D ; I
S IT ....V.BNE LOOP ; NO . LOOP..
...;.3...D.E JSR $FFCC ; RESET I.O.R...
LDA #15 ; FILE #15.S...JSR $FFC3
; THE FILE.....JMP $E37B
; BASIC WARM START.....TEMP1 NOP.....TEM
P2 NOP.Y.&.DRVNR .BYTE 8 ; EITHER 8 .
9...0......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL