TRIAGEINIT  .SRC
FILE INFORMATION
FILENAME(S): TRIAGEINIT  .SRC
FILE TYPE(S): SEQ
FILE SIZE: 11.2K
FIRST SEEN: 2025-12-02 00:17:57
APPEARS ON: 1 disk(s)
FILE HASH
109b1f64045c6047771daed5bcff1e3485b49e087b71dc32b142ba5acbc036d7
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SOURCES FOR REGI | TRIAGEINIT  .SRC | SEQ | Maestro | 14 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 0D 20 20 20 20 20 20 20 20 20 2A 3D 20 24 43 41 |. *= $CA| 00000010: 30 30 0D 0D 0D 54 45 4D 50 42 59 54 45 20 3D 20 |00...TEMPBYTE = | 00000020: 24 42 37 0D 0D 44 52 56 50 4F 53 20 20 20 3D 20 |$B7..DRVPOS = | 00000030: 24 30 33 30 30 0D 0D 49 4E 49 54 4C 4F 41 44 0D |$0300..INITLOAD.| 00000040: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 3C 44 | LDA #<D| 00000050: 52 56 43 4F 44 45 0D 20 20 20 20 20 20 20 20 20 |RVCODE. | 00000060: 4C 44 58 20 23 3E 44 52 56 43 4F 44 45 0D 20 20 |LDX #>DRVCODE. | 00000070: 20 20 20 20 20 20 20 53 54 41 20 4D 45 4D 50 4F | STA MEMPO| 00000080: 53 49 54 0D 20 20 20 20 20 20 20 20 20 53 54 58 |SIT. STX| 00000090: 20 4D 45 4D 50 4F 53 49 54 2B 31 0D 0D 20 20 20 | MEMPOSIT+1.. | 000000A0: 20 20 20 20 20 20 4C 44 41 20 23 3C 44 52 56 50 | LDA #<DRVP| 000000B0: 4F 53 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 |OS. LDX | 000000C0: 23 3E 44 52 56 50 4F 53 0D 20 20 20 20 20 20 20 |#>DRVPOS. | 000000D0: 20 20 53 54 41 20 43 49 4D 4C 4F 0D 20 20 20 20 | STA CIMLO. | 000000E0: 20 20 20 20 20 53 54 58 20 43 49 4D 48 49 0D 0D | STX CIMHI..| 000000F0: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 30 | LDA #$0| 00000100: 30 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 4E |0. STA N| 00000110: 45 4D 54 4F 4D 4D 49 0D 0D 20 20 20 20 20 20 20 |EMTOMMI.. | 00000120: 20 20 4C 44 41 20 23 24 30 31 0D 20 20 20 20 20 | LDA #$01. | 00000130: 20 20 20 20 4C 44 58 20 23 24 30 38 0D 20 20 20 | LDX #$08. | 00000140: 20 20 20 20 20 20 4C 44 59 20 23 24 30 32 0D 20 | LDY #$02. | 00000150: 20 20 20 20 20 20 20 20 4A 53 52 20 24 46 46 42 | JSR $FFB| 00000160: 41 20 20 20 20 20 20 20 3B 20 31 2C 38 2C 32 0D |A ; 1,8,2.| 00000170: 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 3C 4E | LDX #<N| 00000180: 45 56 50 41 52 0D 20 20 20 20 20 20 20 20 20 4C |EVPAR. L| 00000190: 44 59 20 23 3E 4E 45 56 50 41 52 0D 20 20 20 20 |DY #>NEVPAR. | 000001A0: 20 20 20 20 20 4C 44 41 20 23 24 30 33 0D 20 20 | LDA #$03. | 000001B0: 20 20 20 20 20 20 20 4A 53 52 20 24 46 46 42 44 | JSR $FFBD| 000001C0: 20 20 20 20 20 20 20 3B 20 22 23 30 22 0D 20 20 | ; "#0". | 000001D0: 20 20 20 20 20 20 20 4A 53 52 20 24 46 46 43 30 | JSR $FFC0| 000001E0: 20 20 20 20 20 20 20 3B 20 4F 50 45 4E 0D 20 20 | ; OPEN. | 000001F0: 20 20 20 20 20 20 20 4C 44 41 20 23 24 30 32 0D | LDA #$02.| 00000200: 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 24 30 | LDX #$0| 00000210: 38 0D 20 20 20 20 20 20 20 20 20 4C 44 59 20 23 |8. LDY #| 00000220: 24 30 46 0D 20 20 20 20 20 20 20 20 20 4A 53 52 |$0F. JSR| 00000230: 20 24 46 46 42 41 20 20 20 20 20 20 20 3B 20 32 | $FFBA ; 2| 00000240: 2C 38 2C 31 35 0D 20 20 20 20 20 20 20 20 20 4C |,8,15. L| 00000250: 44 41 20 23 24 30 30 0D 20 20 20 20 20 20 20 20 |DA #$00. | 00000260: 20 4A 53 52 20 24 46 46 42 44 20 20 20 20 20 20 | JSR $FFBD | 00000270: 20 3B 20 22 22 0D 20 20 20 20 20 20 20 20 20 4A | ; "". J| 00000280: 53 52 20 24 46 46 43 30 20 20 20 20 20 20 20 3B |SR $FFC0 ;| 00000290: 20 4F 50 45 4E 0D 53 32 44 30 30 31 20 20 20 4C | OPEN.S2D001 L| 000002A0: 44 58 20 23 24 35 37 20 20 20 20 20 20 20 20 3B |DX #$57 ;| 000002B0: 20 CD 2D D7 2C 24 32 33 0D 20 20 20 20 20 20 20 | .-.,$23. | 000002C0: 20 20 4C 44 59 20 23 24 32 33 0D 20 20 20 20 20 | LDY #$23. | 000002D0: 20 20 20 20 4A 53 52 20 4D 45 4D 32 44 52 56 0D | JSR MEM2DRV.| 000002E0: 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 24 |. LDX #$| 000002F0: 30 30 0D 53 32 44 30 30 32 0D 4D 45 4D 50 4F 53 |00.S2D002.MEMPOS| 00000300: 49 54 20 3D 20 2A 2B 31 0D 20 20 20 20 20 20 20 |IT = *+1. | 00000310: 20 20 4C 44 41 20 24 46 46 46 46 2C 58 0D 20 20 | LDA $FFFF,X. | 00000320: 20 20 20 20 20 20 20 4A 53 52 20 24 46 46 41 38 | JSR $FFA8| 00000330: 20 20 20 20 20 20 20 3B 20 49 45 43 4F 55 54 0D | ; IECOUT.| 00000340: 20 20 20 20 20 20 20 20 20 49 4E 58 0D 20 20 20 | INX. | 00000350: 20 20 20 20 20 20 43 50 58 20 23 24 32 33 0D 20 | CPX #$23. | 00000360: 20 20 20 20 20 20 20 20 42 4E 45 20 53 32 44 30 | BNE S2D0| 00000370: 30 32 0D 20 20 20 20 20 20 20 20 20 54 58 41 0D |02. TXA.| 00000380: 20 20 20 20 20 20 20 20 20 43 4C 43 0D 20 20 20 | CLC. | 00000390: 20 20 20 20 20 20 41 44 43 20 43 49 4D 4C 4F 0D | ADC CIMLO.| 000003A0: 20 20 20 20 20 20 20 20 20 53 54 41 20 43 49 4D | STA CIM| 000003B0: 4C 4F 0D 20 20 20 20 20 20 20 20 20 42 43 43 20 |LO. BCC | 000003C0: 53 32 44 30 30 33 0D 20 20 20 20 20 20 20 20 20 |S2D003. | 000003D0: 49 4E 43 20 43 49 4D 48 49 0D 53 32 44 30 30 33 |INC CIMHI.S2D003| 000003E0: 0D 20 20 20 20 20 20 20 20 20 54 58 41 0D 20 20 |. TXA. | 000003F0: 20 20 20 20 20 20 20 43 4C 43 0D 20 20 20 20 20 | CLC. | 00000400: 20 20 20 20 41 44 43 20 4D 45 4D 50 4F 53 49 54 | ADC MEMPOSIT| 00000410: 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 4D 45 |. STA ME| 00000420: 4D 50 4F 53 49 54 0D 20 20 20 20 20 20 20 20 20 |MPOSIT. | 00000430: 42 43 43 20 53 32 44 30 30 34 0D 20 20 20 20 20 |BCC S2D004. | 00000440: 20 20 20 20 49 4E 43 20 4D 45 4D 50 4F 53 49 54 | INC MEMPOSIT| 00000450: 2B 31 0D 53 32 44 30 30 34 20 20 20 4C 44 41 20 |+1.S2D004 LDA | 00000460: 23 24 30 38 0D 20 20 20 20 20 20 20 20 20 4A 53 |#$08. JS| 00000470: 52 20 24 46 46 41 45 20 20 20 20 20 20 3B 20 55 |R $FFAE ; U| 00000480: 4E 4C 49 53 54 45 4E 0D 20 20 20 20 20 20 20 20 |NLISTEN. | 00000490: 20 49 4E 43 20 4E 45 4D 54 4F 4D 4D 49 0D 20 20 | INC NEMTOMMI. | 000004A0: 20 20 20 20 20 20 20 4C 44 41 20 4E 45 4D 54 4F | LDA NEMTO| 000004B0: 4D 4D 49 0D 20 20 20 20 20 20 20 20 20 43 4D 50 |MMI. CMP| 000004C0: 20 23 24 30 33 0D 20 20 20 20 20 20 20 20 20 42 | #$03. B| 000004D0: 4E 45 20 53 32 44 30 30 31 0D 0D 20 20 20 20 20 |NE S2D001.. | 000004E0: 20 20 20 20 4C 44 41 20 23 3C 44 52 56 50 4F 53 | LDA #<DRVPOS| 000004F0: 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 3E |. LDX #>| 00000500: 44 52 56 50 4F 53 0D 20 20 20 20 20 20 20 20 20 |DRVPOS. | 00000510: 53 54 41 20 43 49 4D 4C 4F 0D 20 20 20 20 20 20 |STA CIMLO. | 00000520: 20 20 20 53 54 58 20 43 49 4D 48 49 0D 20 20 20 | STX CIMHI. | 00000530: 20 20 20 20 20 20 4C 44 41 20 23 24 30 31 0D 20 | LDA #$01. | 00000540: 20 20 20 20 20 20 20 20 4A 53 52 20 24 46 46 43 | JSR $FFC| 00000550: 33 20 20 20 20 20 20 20 20 20 20 3B 20 C3 4C 4F |3 ; .LO| 00000560: 53 45 20 23 31 0D 20 20 20 20 20 20 20 20 20 4C |SE #1. L| 00000570: 44 58 20 23 24 34 35 0D 20 20 20 20 20 20 20 20 |DX #$45. | 00000580: 20 4C 44 59 20 23 24 30 30 0D 20 20 20 20 20 20 | LDY #$00. | 00000590: 20 20 20 4A 53 52 20 4D 45 4D 32 44 52 56 20 20 | JSR MEM2DRV | 000005A0: 20 20 20 20 20 20 3B 20 CD 2D C5 20 24 30 33 30 | ; .-. $030| 000005B0: 30 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 |0. LDA #| 000005C0: 24 30 38 0D 20 20 20 20 20 20 20 20 20 4A 53 52 |$08. JSR| 000005D0: 20 24 46 46 41 45 20 20 20 20 20 20 20 20 20 20 | $FFAE | 000005E0: 3B 20 D5 4E 4C 49 53 54 45 4E 0D 0D 20 20 20 20 |; .NLISTEN.. | 000005F0: 20 20 20 20 20 4C 44 41 20 23 3C 44 56 43 32 0D | LDA #<DVC2.| 00000600: 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 3E 44 | LDX #>D| 00000610: 56 43 32 0D 20 20 20 20 20 20 20 20 20 53 54 41 |VC2. STA| 00000620: 20 4D 45 4D 50 4F 53 32 0D 20 20 20 20 20 20 20 | MEMPOS2. | 00000630: 20 20 53 54 58 20 4D 45 4D 50 4F 53 32 2B 31 0D | STX MEMPOS2+1.| 00000640: 0D 20 20 20 20 20 20 20 20 3B 2D 2D 2D 2D 2D 2D |. ;------| 00000650: 2D 2D 2D 2D 2D 2D 2D 0D 0D 20 20 20 20 20 20 20 |-------.. | 00000660: 20 20 4C 44 41 20 24 44 44 30 30 20 20 20 20 20 | LDA $DD00 | 00000670: 20 20 20 20 20 3B 20 49 4E 49 54 53 45 4E 44 0D | ; INITSEND.| 00000680: 20 20 20 20 20 20 20 20 20 41 4E 44 20 23 24 30 | AND #$0| 00000690: 33 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 53 |3. STA S| 000006A0: 44 52 56 30 30 33 2B 31 0D 20 20 20 20 20 20 20 |DRV003+1. | 000006B0: 20 20 4F 52 41 20 23 24 31 30 0D 20 20 20 20 20 | ORA #$10. | 000006C0: 20 20 20 20 53 54 41 20 53 45 4E 44 44 52 56 2B | STA SENDDRV+| 000006D0: 31 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 |1.. LDA | 000006E0: 24 44 44 30 30 0D 20 20 20 20 20 20 20 20 20 4F |$DD00. O| 000006F0: 52 41 20 23 24 30 38 0D 20 20 20 20 20 20 20 20 |RA #$08. | 00000700: 20 53 54 41 20 24 44 44 30 30 0D 49 53 45 4E 44 | STA $DD00.ISEND| 00000710: 30 30 31 20 4C 44 41 20 24 44 44 30 30 0D 20 20 |001 LDA $DD00. | 00000720: 20 20 20 20 20 20 20 42 50 4C 20 49 53 45 4E 44 | BPL ISEND| 00000730: 30 30 31 0D 20 20 20 20 20 20 20 20 20 41 4E 44 |001. AND| 00000740: 20 23 24 30 33 0D 20 20 20 20 20 20 20 20 20 53 | #$03. S| 00000750: 54 41 20 24 44 44 30 30 0D 49 53 45 4E 44 30 30 |TA $DD00.ISEND00| 00000760: 32 20 42 49 54 20 24 44 44 30 30 0D 20 20 20 20 |2 BIT $DD00. | 00000770: 20 20 20 20 20 42 56 43 20 49 53 45 4E 44 30 30 | BVC ISEND00| 00000780: 32 0D 20 20 20 20 20 20 20 20 20 42 50 4C 20 49 |2. BPL I| 00000790: 53 45 4E 44 30 30 32 0D 0D 20 20 20 20 20 20 20 |SEND002.. | 000007A0: 20 20 4C 44 41 20 23 24 30 34 0D 20 20 20 20 20 | LDA #$04. | 000007B0: 20 20 20 20 4A 53 52 20 53 45 4E 44 42 59 54 45 | JSR SENDBYTE| 000007C0: 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 |. LDA #$| 000007D0: 30 37 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 |07. JSR | 000007E0: 53 45 4E 44 42 59 54 45 0D 20 20 20 20 20 20 20 |SENDBYTE. | 000007F0: 20 20 4C 44 59 20 23 24 30 30 0D 53 32 44 30 30 | LDY #$00.S2D00| 00000800: 35 20 20 20 4C 44 58 20 23 24 30 30 0D 0D 4D 45 |5 LDX #$00..ME| 00000810: 4D 50 4F 53 32 20 20 3D 20 2A 2B 31 0D 53 32 44 |MPOS2 = *+1.S2D| 00000820: 30 30 36 20 20 20 4C 44 41 20 24 46 46 46 46 2C |006 LDA $FFFF,| 00000830: 58 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 53 |X. JSR S| 00000840: 45 4E 44 42 59 54 45 0D 20 20 20 20 20 20 20 20 |ENDBYTE. | 00000850: 20 49 4E 58 20 20 20 20 20 20 20 20 20 20 20 20 | INX | 00000860: 3B 20 4D 41 52 41 44 45 4B 0D 20 20 20 20 20 20 |; MARADEK. | 00000870: 20 20 20 42 4E 45 20 53 32 44 30 30 36 20 20 20 | BNE S2D006 | 00000880: 20 20 3B 20 4D 41 53 4F 4C 41 53 41 0D 20 20 20 | ; MASOLASA. | 00000890: 20 20 20 20 20 20 49 4E 43 20 4D 45 4D 50 4F 53 | INC MEMPOS| 000008A0: 32 2B 31 20 20 3B 20 54 55 52 42 4F 56 41 4C 2E |2+1 ; TURBOVAL.| 000008B0: 2E 2E 0D 20 20 20 20 20 20 20 20 20 49 4E 59 0D |... INY.| 000008C0: 20 20 20 20 20 20 20 20 20 43 50 59 20 23 24 30 | CPY #$0| 000008D0: 33 0D 20 20 20 20 20 20 20 20 20 42 4E 45 20 53 |3. BNE S| 000008E0: 32 44 30 30 35 0D 20 20 20 20 20 20 20 20 20 52 |2D005. R| 000008F0: 54 53 0D 0D 4E 45 4D 54 4F 4D 4D 49 20 2E 42 59 |TS..NEMTOMMI .BY| 00000900: 54 45 20 30 0D 0D 4D 45 4D 32 44 52 56 20 20 4C |TE 0..MEM2DRV L| 00000910: 44 41 20 23 24 30 38 0D 20 20 20 20 20 20 20 20 |DA #$08. | 00000920: 20 4A 53 52 20 24 46 46 42 31 20 20 20 20 20 20 | JSR $FFB1 | 00000930: 3B 20 4C 49 53 54 45 4E 20 23 38 0D 20 20 20 20 |; LISTEN #8. | 00000940: 20 20 20 20 20 4C 44 41 20 23 24 36 46 0D 20 20 | LDA #$6F. | 00000950: 20 20 20 20 20 20 20 4A 53 52 20 24 46 46 39 33 | JSR $FF93| 00000960: 20 20 20 20 20 20 3B 20 4C 49 53 54 45 4E 32 20 | ; LISTEN2 | 00000970: 23 31 35 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |#15. LDA| 00000980: 20 23 24 34 44 0D 20 20 20 20 20 20 20 20 20 4A | #$4D. J| 00000990: 53 52 20 24 46 46 41 38 20 20 20 20 20 20 3B 20 |SR $FFA8 ; | 000009A0: 53 45 4E 44 49 45 43 20 CD 0D 20 20 20 20 20 20 |SENDIEC .. | 000009B0: 20 20 20 4C 44 41 20 23 24 32 44 0D 20 20 20 20 | LDA #$2D. | 000009C0: 20 20 20 20 20 4A 53 52 20 24 46 46 41 38 20 20 | JSR $FFA8 | 000009D0: 20 20 20 20 3B 20 53 45 4E 44 49 45 43 20 2D 0D | ; SENDIEC -.| 000009E0: 20 20 20 20 20 20 20 20 20 54 58 41 0D 20 20 20 | TXA. | 000009F0: 20 20 20 20 20 20 4A 53 52 20 24 46 46 41 38 20 | JSR $FFA8 | 00000A00: 20 20 20 20 20 3B 20 53 45 4E 44 49 45 43 20 58 | ; SENDIEC X| 00000A10: 52 45 47 0D 0D 43 49 4D 4C 4F 20 20 20 20 3D 20 |REG..CIMLO = | 00000A20: 2A 2B 31 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |*+1. LDA| 00000A30: 20 23 24 30 30 0D 20 20 20 20 20 20 20 20 20 4A | #$00. J| 00000A40: 53 52 20 24 46 46 41 38 20 20 20 20 20 20 3B 20 |SR $FFA8 ; | 00000A50: 53 45 4E 44 49 45 43 20 43 49 4D 4C 4F 0D 43 49 |SENDIEC CIMLO.CI| 00000A60: 4D 48 49 20 20 20 20 3D 20 2A 2B 31 0D 20 20 20 |MHI = *+1. | 00000A70: 20 20 20 20 20 20 4C 44 41 20 23 24 30 30 0D 20 | LDA #$00. | 00000A80: 20 20 20 20 20 20 20 20 4A 53 52 20 24 46 46 41 | JSR $FFA| 00000A90: 38 20 20 20 20 20 20 3B 20 53 45 4E 44 49 45 43 |8 ; SENDIEC| 00000AA0: 20 43 49 4D 48 49 0D 0D 20 20 20 20 20 20 20 20 | CIMHI.. | 00000AB0: 20 54 59 41 0D 20 20 20 20 20 20 20 20 20 42 45 | TYA. BE| 00000AC0: 51 20 56 49 53 53 5A 41 20 20 20 20 20 3B 20 4A |Q VISSZA ; J| 00000AD0: 55 4D 50 20 49 46 20 CD 2D C5 0D 20 20 20 20 20 |UMP IF .-.. | 00000AE0: 20 20 20 20 4A 53 52 20 24 46 46 41 38 20 20 20 | JSR $FFA8 | 00000AF0: 20 20 20 3B 20 53 45 4E 44 49 45 43 20 44 41 54 | ; SENDIEC DAT| 00000B00: 41 0D 56 49 53 53 5A 41 20 20 20 52 54 53 0D 0D |A.VISSZA RTS..| 00000B10: 53 45 4E 44 42 59 54 45 20 53 54 41 20 54 45 4D |SENDBYTE STA TEM| 00000B20: 50 42 59 54 45 0D 20 20 20 20 20 20 20 20 20 4A |PBYTE. J| 00000B30: 53 52 20 53 45 4E 44 44 52 56 0D 20 20 20 20 20 |SR SENDDRV. | 00000B40: 20 20 20 20 4A 53 52 20 53 45 4E 44 44 52 56 0D | JSR SENDDRV.| 00000B50: 20 20 20 20 20 20 20 20 20 4A 53 52 20 53 45 4E | JSR SEN| 00000B60: 44 44 52 56 0D 20 20 20 20 20 20 20 20 20 4A 53 |DDRV. JS| 00000B70: 52 20 53 45 4E 44 44 52 56 0D 20 20 20 20 20 20 |R SENDDRV. | 00000B80: 20 20 20 52 54 53 0D 0D 53 45 4E 44 44 52 56 20 | RTS..SENDDRV | 00000B90: 20 4C 44 41 20 23 24 31 33 0D 20 20 20 20 20 20 | LDA #$13. | 00000BA0: 20 20 20 4C 53 52 20 54 45 4D 50 42 59 54 45 0D | LSR TEMPBYTE.| 00000BB0: 20 20 20 20 20 20 20 20 20 42 43 43 20 53 44 52 | BCC SDR| 00000BC0: 56 30 30 31 0D 20 20 20 20 20 20 20 20 20 4F 52 |V001. OR| 00000BD0: 41 20 23 24 32 30 0D 53 44 52 56 30 30 31 20 20 |A #$20.SDRV001 | 00000BE0: 53 54 41 20 24 44 44 30 30 0D 20 20 20 20 20 20 |STA $DD00. | 00000BF0: 20 20 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 20 | NOP. | 00000C00: 4E 4F 50 0D 20 20 20 20 20 20 20 20 20 4E 4F 50 |NOP. NOP| 00000C10: 0D 20 20 20 20 20 20 20 20 20 4E 4F 50 0D 53 44 |. NOP.SD| 00000C20: 52 56 30 30 33 0D 20 20 20 20 20 20 20 20 20 4C |RV003. L| 00000C30: 44 41 20 23 24 30 33 0D 20 20 20 20 20 20 20 20 |DA #$03. | 00000C40: 20 4C 53 52 20 54 45 4D 50 42 59 54 45 0D 20 20 | LSR TEMPBYTE. | 00000C50: 20 20 20 20 20 20 20 42 43 43 20 53 44 52 56 30 | BCC SDRV0| 00000C60: 30 32 0D 20 20 20 20 20 20 20 20 20 4F 52 41 20 |02. ORA | 00000C70: 23 24 32 30 0D 53 44 52 56 30 30 32 20 20 53 54 |#$20.SDRV002 ST| 00000C80: 41 20 24 44 44 30 30 0D 20 20 20 20 20 20 20 20 |A $DD00. | 00000C90: 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 20 4E 4F | NOP. NO| 00000CA0: 50 0D 20 20 20 20 20 20 20 20 20 52 54 53 0D 3B |P. RTS.;| 00000CB0: 0D 4E 45 56 50 41 52 20 20 20 2E 42 59 54 45 20 |.NEVPAR .BYTE | 00000CC0: 24 32 33 2C 24 33 30 20 20 20 20 20 20 3B 20 23 |$23,$30 ; #| 00000CD0: 30 0D 0D 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |0..;------------| 00000CE0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000CF0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D 46 43 42 |-----------..FCB| 00000D00: 20 20 20 20 20 20 3D 20 44 52 56 50 4F 53 0D 44 | = DRVPOS.D| 00000D10: 43 42 20 20 20 20 20 20 3D 20 24 30 34 30 30 0D |CB = $0400.| 00000D20: 0D 44 52 56 43 4F 44 45 20 20 20 20 20 20 20 20 |.DRVCODE | 00000D30: 20 20 20 20 20 20 20 20 3B 20 47 45 54 20 4D 41 | ; GET MA| 00000D40: 49 4E 20 43 4F 44 45 0D 20 20 20 20 20 20 20 20 |IN CODE. | 00000D50: 20 53 45 49 0D 20 20 20 20 20 20 20 20 20 4C 44 | SEI. LD| 00000D60: 41 20 23 24 30 41 0D 20 20 20 20 20 20 20 20 20 |A #$0A. | 00000D70: 53 54 41 20 24 31 38 30 30 0D 0D 44 43 4F 44 45 |STA $1800..DCODE| 00000D80: 30 30 31 20 42 49 54 20 24 31 38 30 30 0D 20 20 |001 BIT $1800. | 00000D90: 20 20 20 20 20 20 20 42 50 4C 20 44 43 4F 44 45 | BPL DCODE| 00000DA0: 30 30 31 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |001. LDA| 00000DB0: 20 23 24 31 38 0D 20 20 20 20 20 20 20 20 20 53 | #$18. S| 00000DC0: 54 41 20 24 31 38 30 30 0D 44 43 4F 44 45 30 30 |TA $1800.DCODE00| 00000DD0: 32 20 4C 44 41 20 24 31 38 30 30 0D 20 20 20 20 |2 LDA $1800. | 00000DE0: 20 20 20 20 20 42 4D 49 20 44 43 4F 44 45 30 30 | BMI DCODE00| 00000DF0: 32 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 |2. LDA #| 00000E00: 24 30 30 0D 20 20 20 20 20 20 20 20 20 53 54 41 |$00. STA| 00000E10: 20 24 31 38 30 30 0D 20 20 20 20 20 20 20 20 20 | $1800. | 00000E20: 4A 53 52 20 47 42 59 54 45 2D 44 52 56 43 4F 44 |JSR GBYTE-DRVCOD| 00000E30: 45 2B 46 43 42 0D 20 20 20 20 20 20 20 20 20 53 |E+FCB. S| 00000E40: 54 41 20 44 4D 45 4D 50 4F 53 0D 20 20 20 20 20 |TA DMEMPOS. | 00000E50: 20 20 20 20 4A 53 52 20 47 42 59 54 45 2D 44 52 | JSR GBYTE-DR| 00000E60: 56 43 4F 44 45 2B 46 43 42 0D 20 20 20 20 20 20 |VCODE+FCB. | 00000E70: 20 20 20 53 54 41 20 44 4D 45 4D 53 49 5A 45 0D | STA DMEMSIZE.| 00000E80: 44 43 4F 44 45 30 30 33 20 4C 44 58 20 23 24 30 |DCODE003 LDX #$0| 00000E90: 30 0D 44 43 4F 44 45 30 30 34 20 4A 53 52 20 47 |0.DCODE004 JSR G| 00000EA0: 42 59 54 45 2D 44 52 56 43 4F 44 45 2B 46 43 42 |BYTE-DRVCODE+FCB| 00000EB0: 0D 0D 44 4D 45 4D 50 4F 53 20 20 3D 20 2A 2D 44 |..DMEMPOS = *-D| 00000EC0: 52 56 43 4F 44 45 2B 46 43 42 2B 32 0D 20 20 20 |RVCODE+FCB+2. | 00000ED0: 20 20 20 20 20 20 53 54 41 20 24 30 31 30 30 2C | STA $0100,| 00000EE0: 58 0D 20 20 20 20 20 20 20 20 20 49 4E 58 0D 20 |X. INX. | 00000EF0: 20 20 20 20 20 20 20 20 42 4E 45 20 44 43 4F 44 | BNE DCOD| 00000F00: 45 30 30 34 0D 20 20 20 20 20 20 20 20 20 49 4E |E004. IN| 00000F10: 43 20 44 4D 45 4D 50 4F 53 0D 20 20 20 20 20 20 |C DMEMPOS. | 00000F20: 20 20 20 4C 44 41 20 44 4D 45 4D 50 4F 53 0D 44 | LDA DMEMPOS.D| 00000F30: 4D 45 4D 53 49 5A 45 20 3D 20 2A 2D 44 52 56 43 |MEMSIZE = *-DRVC| 00000F40: 4F 44 45 2B 46 43 42 2B 31 0D 20 20 20 20 20 20 |ODE+FCB+1. | 00000F50: 20 20 20 43 4D 50 20 23 24 30 30 0D 20 20 20 20 | CMP #$00. | 00000F60: 20 20 20 20 20 42 4E 45 20 44 43 4F 44 45 30 30 | BNE DCODE00| 00000F70: 33 0D 20 20 20 20 20 20 20 20 20 4A 4D 50 20 44 |3. JMP D| 00000F80: 52 56 53 54 41 52 54 2D 44 56 43 32 2B 44 43 42 |RVSTART-DVC2+DCB| 00000F90: 0D 0D 0D 47 42 59 54 45 20 20 20 20 20 20 20 20 |...GBYTE | 00000FA0: 20 20 20 20 20 20 20 20 3B 20 47 45 54 20 42 59 | ; GET BY| 00000FB0: 54 45 20 46 52 4F 4D 20 36 34 0D 20 20 20 20 20 |TE FROM 64. | 00000FC0: 20 20 20 20 4C 44 59 20 23 24 30 34 0D 47 42 59 | LDY #$04.GBY| 00000FD0: 54 45 30 30 31 20 4C 44 41 20 23 24 30 34 0D 47 |TE001 LDA #$04.G| 00000FE0: 42 59 54 45 30 30 32 20 42 49 54 20 24 31 38 30 |BYTE002 BIT $180| 00000FF0: 30 0D 20 20 20 20 20 20 20 20 20 42 45 51 20 47 |0. BEQ G| 00001000: 42 59 54 45 30 30 32 0D 20 20 20 20 20 20 20 20 |BYTE002. | 00001010: 20 4C 44 41 20 24 31 38 30 30 0D 20 20 20 20 20 | LDA $1800. | 00001020: 20 20 20 20 4C 53 52 20 41 0D 20 20 20 20 20 20 | LSR A. | 00001030: 20 20 20 52 4F 52 20 24 31 34 0D 20 20 20 20 20 | ROR $14. | 00001040: 20 20 20 20 4C 44 41 20 23 24 30 34 0D 47 42 59 | LDA #$04.GBY| 00001050: 54 45 30 30 33 20 42 49 54 20 24 31 38 30 30 0D |TE003 BIT $1800.| 00001060: 20 20 20 20 20 20 20 20 20 42 4E 45 20 47 42 59 | BNE GBY| 00001070: 54 45 30 30 33 0D 20 20 20 20 20 20 20 20 20 4C |TE003. L| 00001080: 44 41 20 24 31 38 30 30 0D 20 20 20 20 20 20 20 |DA $1800. | 00001090: 20 20 4C 53 52 20 41 0D 20 20 20 20 20 20 20 20 | LSR A. | 000010A0: 20 52 4F 52 20 24 31 34 0D 20 20 20 20 20 20 20 | ROR $14. | 000010B0: 20 20 44 45 59 0D 20 20 20 20 20 20 20 20 20 42 | DEY. B| 000010C0: 4E 45 20 47 42 59 54 45 30 30 31 0D 20 20 20 20 |NE GBYTE001. | 000010D0: 20 20 20 20 20 4C 44 41 20 24 31 34 0D 20 20 20 | LDA $14. | 000010E0: 20 20 20 20 20 20 52 54 53 0D 0D 3B 20 2D 2D 2D | RTS..; ---| 000010F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00001100: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00001110: 2D 2D 2D 0D 0D 44 56 43 32 0D 20 20 20 20 20 20 |---..DVC2. | 00001120: 20 20 20 4A 53 52 20 44 56 43 31 30 30 2D 44 56 | JSR DVC100-DV| 00001130: 43 32 2B 44 43 42 0D 20 20 20 20 20 20 20 20 20 |C2+DCB. | 00001140: 4C 44 41 20 23 24 46 46 0D 20 20 20 20 20 20 20 |LDA #$FF. | 00001150: 20 20 4C 44 59 20 24 30 39 0D 20 20 20 20 20 20 | LDY $09. | 00001160: 20 20 20 4C 44 58 20 24 30 38 0D 20 20 20 20 20 | LDX $08. | 00001170: 20 20 20 20 42 4E 45 20 44 56 43 31 30 31 0D 20 | BNE DVC101. | 00001180: 20 20 20 20 20 20 20 20 54 59 41 0D 0D 44 56 44 | TYA..DVD| 00001190: 30 39 39 20 20 20 3D 20 2A 2D 44 56 43 32 2B 44 |099 = *-DVC2+D| 000011A0: 43 42 2B 31 0D 44 56 43 31 30 31 20 20 20 4A 53 |CB+1.DVC101 JS| 000011B0: 52 20 44 56 43 31 31 31 2D 44 56 43 32 2B 44 43 |R DVC111-DVC2+DC| 000011C0: 42 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 |B.. LDA | 000011D0: 24 30 38 0D 20 20 20 20 20 20 20 20 20 42 45 51 |$08. BEQ| 000011E0: 20 44 56 43 31 30 32 0D 20 20 20 20 20 20 20 20 | DVC102. | 000011F0: 20 4A 4D 50 20 24 46 39 37 38 0D 44 56 43 31 30 | JMP $F978.DVC10| 00001200: 32 20 20 20 4A 4D 50 20 24 46 39 36 39 0D 0D 44 |2 JMP $F969..D| 00001210: 56 43 31 30 30 20 20 20 4A 53 52 20 44 56 53 30 |VC100 JSR DVS0| 00001220: 30 37 2D 44 56 43 32 2B 44 43 42 20 20 3B 20 45 |07-DVC2+DCB ; E| 00001230: 30 34 31 39 0D 0D 44 56 43 31 30 33 20 20 20 4C |0419..DVC103 L| 00001240: 44 41 20 24 31 43 30 30 0D 20 20 20 20 20 20 20 |DA $1C00. | 00001250: 20 20 42 4D 49 20 44 56 43 31 30 33 0D 20 20 20 | BMI DVC103. | 00001260: 20 20 20 20 20 20 4C 44 41 20 24 31 43 30 31 0D | LDA $1C01.| 00001270: 20 20 20 20 20 20 20 20 20 43 4C 56 0D 44 56 43 | CLV.DVC| 00001280: 31 30 34 20 20 20 42 56 43 20 44 56 43 31 30 34 |104 BVC DVC104| 00001290: 0D 20 20 20 20 20 20 20 20 20 43 4C 56 0D 20 20 |. CLV. | 000012A0: 20 20 20 20 20 20 20 4C 44 41 20 24 31 43 30 31 | LDA $1C01| 000012B0: 0D 20 20 20 20 20 20 20 20 20 43 4D 50 20 23 24 |. CMP #$| 000012C0: 35 32 0D 20 20 20 20 20 20 20 20 20 42 4E 45 20 |52. BNE | 000012D0: 44 56 43 31 30 33 0D 20 20 20 20 20 20 20 20 20 |DVC103. | 000012E0: 4C 44 58 20 23 24 30 32 0D 44 56 43 31 30 35 20 |LDX #$02.DVC105 | 000012F0: 20 20 42 56 43 20 44 56 43 31 30 35 0D 20 20 20 | BVC DVC105. | 00001300: 20 20 20 20 20 20 43 4C 56 0D 20 20 20 20 20 20 | CLV. | 00001310: 20 20 20 4C 44 41 20 24 31 43 30 31 0D 20 20 20 | LDA $1C01. | 00001320: 20 20 20 20 20 20 44 45 58 0D 20 20 20 20 20 20 | DEX. | 00001330: 20 20 20 42 50 4C 20 44 56 43 31 30 35 0D 20 20 | BPL DVC105. | 00001340: 20 20 20 20 20 20 20 41 4E 44 20 23 24 46 43 0D | AND #$FC.| 00001350: 44 56 44 30 39 38 20 20 20 3D 20 2A 2D 44 56 43 |DVD098 = *-DVC| 00001360: 32 2B 44 43 42 2B 31 0D 20 20 20 20 20 20 20 20 |2+DCB+1. | 00001370: 20 43 4D 50 20 23 24 30 30 0D 20 20 20 20 20 20 | CMP #$00. | 00001380: 20 20 20 42 4E 45 20 44 56 43 31 30 33 0D 44 56 | BNE DVC103.DV| 00001390: 43 31 30 36 20 20 20 4C 44 41 20 24 31 43 30 30 |C106 LDA $1C00| 000013A0: 0D 20 20 20 20 20 20 20 20 20 42 4D 49 20 44 56 |. BMI DV| 000013B0: 43 31 30 36 0D 20 20 20 20 20 20 20 20 20 4C 44 |C106. LD| 000013C0: 41 20 24 31 43 30 31 0D 20 20 20 20 20 20 20 20 |A $1C01. | 000013D0: 20 43 4C 56 0D 20 20 20 20 20 20 20 20 20 4C 44 | CLV. LD| 000013E0: 59 20 23 24 30 30 0D 44 56 43 31 30 37 20 20 20 |Y #$00.DVC107 | 000013F0: 42 56 43 20 44 56 43 31 30 37 0D 20 20 20 20 20 |BVC DVC107. | 00001400: 20 20 20 20 43 4C 56 0D 20 20 20 20 20 20 20 20 | CLV. | 00001410: 20 4C 44 41 20 24 31 43 30 31 0D 20 20 20 20 20 | LDA $1C01. | 00001420: 20 20 20 20 53 54 41 20 24 30 37 30 30 2C 59 0D | STA $0700,Y.| 00001430: 20 20 20 20 20 20 20 20 20 49 4E 59 0D 20 20 20 | INY. | 00001440: 20 20 20 20 20 20 42 4E 45 20 44 56 43 31 30 37 | BNE DVC107| 00001450: 0D 20 20 20 20 20 20 20 20 20 4C 44 59 20 23 24 |. LDY #$| 00001460: 42 44 0D 44 56 43 31 30 38 20 20 20 42 56 43 20 |BD.DVC108 BVC | 00001470: 44 56 43 31 30 38 0D 20 20 20 20 20 20 20 20 20 |DVC108. | 00001480: 43 4C 56 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |CLV. LDA| 00001490: 20 24 31 43 30 31 0D 20 20 20 20 20 20 20 20 20 | $1C01. | 000014A0: 53 54 41 20 24 30 31 30 30 2C 59 0D 20 20 20 20 |STA $0100,Y. | 000014B0: 20 20 20 20 20 49 4E 59 0D 20 20 20 20 20 20 20 | INY. | 000014C0: 20 20 42 4E 45 20 44 56 43 31 30 38 0D 20 20 20 | BNE DVC108. | 000014D0: 20 20 20 20 20 20 4C 44 59 20 23 24 30 30 0D 20 | LDY #$00. | 000014E0: 20 20 20 20 20 20 20 20 4A 53 52 20 24 46 37 45 | JSR $F7E| 000014F0: 38 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 24 |8. LDA $| 00001500: 35 33 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |53. STA | 00001510: 24 30 38 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |$08. LDA| 00001520: 20 24 35 34 0D 20 20 20 20 20 20 20 20 20 53 54 | $54. ST| 00001530: 41 20 24 30 39 0D 20 20 20 20 20 20 20 20 20 4C |A $09. L| 00001540: 44 41 20 24 35 35 0D 20 20 20 20 20 20 20 20 20 |DA $55. | 00001550: 53 54 41 20 24 30 37 30 32 0D 20 20 20 20 20 20 |STA $0702. | 00001560: 20 20 20 4C 44 41 20 23 24 30 33 0D 20 20 20 20 | LDA #$03. | 00001570: 20 20 20 20 20 53 54 41 20 44 56 44 31 30 30 0D | STA DVD100.| 00001580: 44 56 43 31 30 39 20 20 20 4A 53 52 20 24 46 37 |DVC109 JSR $F7| 00001590: 45 38 0D 44 56 44 31 30 30 20 20 20 3D 20 2A 2D |E8.DVD100 = *-| 000015A0: 44 56 43 32 2B 44 43 42 2B 31 0D 20 20 20 20 20 |DVC2+DCB+1. | 000015B0: 20 20 20 20 4C 44 58 20 23 24 30 33 0D 20 20 20 | LDX #$03. | 000015C0: 20 20 20 20 20 20 4C 44 41 20 24 35 32 0D 20 20 | LDA $52. | 000015D0: 20 20 20 20 20 20 20 53 54 41 20 24 30 37 30 30 | STA $0700| 000015E0: 2C 58 0D 20 20 20 20 20 20 20 20 20 49 4E 58 0D |,X. INX.| 000015F0: 20 20 20 20 20 20 20 20 20 42 45 51 20 44 56 43 | BEQ DVC| 00001600: 31 31 30 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |110. LDA| 00001610: 20 24 35 33 0D 20 20 20 20 20 20 20 20 20 53 54 | $53. ST| 00001620: 41 20 24 30 37 30 30 2C 58 0D 20 20 20 20 20 20 |A $0700,X. | 00001630: 20 20 20 49 4E 58 0D 20 20 20 20 20 20 20 20 20 | INX. | 00001640: 42 45 51 20 44 56 43 31 31 30 0D 20 20 20 20 20 |BEQ DVC110. | 00001650: 20 20 20 20 4C 44 41 20 24 35 34 0D 20 20 20 20 | LDA $54. | 00001660: 20 20 20 20 20 53 54 41 20 24 30 37 30 30 2C 58 | STA $0700,X| 00001670: 0D 20 20 20 20 20 20 20 20 20 49 4E 58 0D 20 20 |. INX. | 00001680: 20 20 20 20 20 20 20 42 45 51 20 44 56 43 31 31 | BEQ DVC11| 00001690: 30 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 24 |0. LDA $| 000016A0: 35 35 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |55. STA | 000016B0: 24 30 37 30 30 2C 58 0D 20 20 20 20 20 20 20 20 |$0700,X. | 000016C0: 20 49 4E 58 0D 20 20 20 20 20 20 20 20 20 53 54 | INX. ST| 000016D0: 58 20 44 56 44 31 30 30 0D 20 20 20 20 20 20 20 |X DVD100. | 000016E0: 20 20 42 4E 45 20 44 56 43 31 30 39 0D 44 56 43 | BNE DVC109.DVC| 000016F0: 31 31 30 20 20 20 52 54 53 0D 0D 44 56 43 31 31 |110 RTS..DVC11| 00001700: 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |1 | 00001710: 20 20 20 20 20 20 20 20 20 20 20 3B 30 34 41 35 | ;04A5| 00001720: 0D 20 20 20 20 20 20 20 20 20 4C 44 59 20 23 24 |. LDY #$| 00001730: 30 32 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |02. STA | 00001740: 44 56 44 31 30 31 0D 44 56 43 31 31 32 20 20 20 |DVD101.DVC112 | 00001750: 4C 44 41 20 24 30 37 30 30 2C 59 0D 20 20 20 20 |LDA $0700,Y. | 00001760: 20 20 20 20 20 4C 44 58 20 23 24 30 32 0D 20 20 | LDX #$02. | 00001770: 20 20 20 20 20 20 20 53 54 58 20 24 31 38 30 30 | STX $1800| 00001780: 0D 20 20 20 20 20 20 20 20 20 54 41 58 0D 20 20 |. TAX. | 00001790: 20 20 20 20 20 20 20 4C 53 52 20 41 0D 20 20 20 | LSR A. | 000017A0: 20 20 20 20 20 20 4C 53 52 20 41 0D 20 20 20 20 | LSR A. | 000017B0: 20 20 20 20 20 4C 53 52 20 41 0D 20 20 20 20 20 | LSR A. | 000017C0: 20 20 20 20 4C 53 52 20 41 0D 20 20 20 20 20 20 | LSR A. | 000017D0: 20 20 20 4F 52 41 20 23 24 46 30 0D 20 20 20 20 | ORA #$F0. | 000017E0: 20 20 20 20 20 53 54 41 20 44 56 44 31 30 32 0D | STA DVD102.| 000017F0: 20 20 20 20 20 20 20 20 20 54 58 41 0D 20 20 20 | TXA. | 00001800: 20 20 20 20 20 20 41 4E 44 20 23 24 30 46 0D 20 | AND #$0F. | 00001810: 20 20 20 20 20 20 20 20 54 41 58 0D 20 20 20 20 | TAX. | 00001820: 20 20 20 20 20 4C 44 41 20 53 45 43 54 41 42 4C | LDA SECTABL| 00001830: 45 2C 58 0D 44 56 43 31 31 33 20 20 20 42 49 54 |E,X.DVC113 BIT| 00001840: 20 24 31 38 30 30 0D 20 20 20 20 20 20 20 20 20 | $1800. | 00001850: 42 50 4C 20 44 56 43 31 31 33 0D 20 20 20 20 20 |BPL DVC113. | 00001860: 20 20 20 20 53 54 41 20 24 31 38 30 30 0D 20 20 | STA $1800. | 00001870: 20 20 20 20 20 20 20 41 53 4C 20 41 0D 20 20 20 | ASL A. | 00001880: 20 20 20 20 20 20 41 4E 44 20 23 24 30 46 0D 20 | AND #$0F. | 00001890: 20 20 20 20 20 20 20 20 53 54 41 20 24 31 38 30 | STA $180| 000018A0: 30 0D 44 56 44 31 30 32 20 20 20 3D 20 2A 2D 44 |0.DVD102 = *-D| 000018B0: 56 43 32 2B 44 43 42 2B 31 0D 20 20 20 20 20 20 |VC2+DCB+1. | 000018C0: 20 20 20 4C 44 41 20 53 45 43 54 41 42 4C 45 0D | LDA SECTABLE.| 000018D0: 20 20 20 20 20 20 20 20 20 53 54 41 20 24 31 38 | STA $18| 000018E0: 30 30 0D 20 20 20 20 20 20 20 20 20 41 53 4C 20 |00. ASL | 000018F0: 41 0D 20 20 20 20 20 20 20 20 20 41 4E 44 20 23 |A. AND #| 00001900: 24 30 46 0D 20 20 20 20 20 20 20 20 20 53 54 41 |$0F. STA| 00001910: 20 24 31 38 30 30 0D 44 56 44 31 30 31 20 20 20 | $1800.DVD101 | 00001920: 3D 20 2A 2D 44 56 43 32 2B 44 43 42 2B 31 0D 20 |= *-DVC2+DCB+1. | 00001930: 20 20 20 20 20 20 20 20 43 50 59 20 23 24 30 30 | CPY #$00| 00001940: 0D 20 20 20 20 20 20 20 20 20 49 4E 59 0D 20 20 |. INY. | 00001950: 20 20 20 20 20 20 20 42 43 43 20 44 56 43 31 31 | BCC DVC11| 00001960: 32 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 |2. LDA #| 00001970: 24 30 41 0D 20 20 20 20 20 20 20 20 20 53 54 41 |$0A. STA| 00001980: 20 24 31 38 30 30 0D 20 20 20 20 20 20 20 20 20 | $1800. | 00001990: 52 54 53 0D 0D 20 20 20 20 20 20 20 20 20 2E 42 |RTS.. .B| 000019A0: 59 54 45 20 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C |YTE 0,0,0,0,0,0,| 000019B0: 30 2C 30 0D 0D 53 45 43 54 41 42 4C 45 20 3D 20 |0,0..SECTABLE = | 000019C0: 2A 2D 44 56 43 32 2B 44 43 42 0D 20 20 20 20 20 |*-DVC2+DCB. | 000019D0: 20 20 20 20 2E 42 59 54 45 20 24 30 46 2C 24 30 | .BYTE $0F,$0| 000019E0: 37 2C 24 30 44 2C 24 30 35 3B 22 0F 07 2E 05 0D |7,$0D,$05;".....| 000019F0: 20 20 20 20 20 20 20 20 20 2E 42 59 54 45 20 24 | .BYTE $| 00001A00: 30 42 2C 24 30 33 2C 24 30 39 2C 24 30 31 3B 22 |0B,$03,$09,$01;"| 00001A10: 0B 03 09 01 0D 20 20 20 20 20 20 20 20 20 2E 42 |..... .B| 00001A20: 59 54 45 20 24 30 45 2C 24 30 36 2C 24 30 43 2C |YTE $0E,$06,$0C,| 00001A30: 24 30 34 3B 22 0E 06 0C 04 0D 20 20 20 20 20 20 |$04;"..... | 00001A40: 20 20 20 2E 42 59 54 45 20 24 30 41 2C 24 30 32 | .BYTE $0A,$02| 00001A50: 2C 24 30 38 2C 24 30 30 3B 22 0A 02 08 2E 0D 0D |,$08,$00;"......| 00001A60: 0D 44 52 56 53 54 41 52 54 0D 20 20 20 20 20 20 |.DRVSTART. | 00001A70: 20 20 20 4A 53 52 20 44 56 53 30 30 31 2D 44 56 | JSR DVS001-DV| 00001A80: 43 32 2B 44 43 42 0D 20 20 20 20 20 20 20 20 20 |C2+DCB. | 00001A90: 54 58 41 0D 20 20 20 20 20 20 20 20 20 43 4D 50 |TXA. CMP| 00001AA0: 20 23 24 30 31 0D 20 20 20 20 20 20 20 20 20 42 | #$01. B| 00001AB0: 4E 45 20 44 56 43 30 39 39 0D 0D 20 20 20 20 20 |NE DVC099.. | 00001AC0: 20 20 20 20 52 54 53 20 20 20 20 20 20 20 20 20 | RTS | 00001AD0: 3B 20 D5 4E 49 4E 53 54 41 4C 4C 20 28 3F 3A 29 |; .NINSTALL (?:)| 00001AE0: 0D 20 20 20 20 20 20 20 20 3B 4A 4D 50 20 28 24 |. ;JMP ($| 00001AF0: 46 46 46 43 29 0D 0D 44 56 43 30 39 39 20 20 20 |FFFC)..DVC099 | 00001B00: 54 58 41 0D 20 20 20 20 20 20 20 20 20 42 50 4C |TXA. BPL| 00001B10: 20 44 56 43 31 31 34 0D 0D 20 20 20 20 20 20 20 | DVC114.. | 00001B20: 20 20 4A 53 52 20 44 56 53 30 30 36 2D 44 56 43 | JSR DVS006-DVC| 00001B30: 32 2B 44 43 42 0D 44 56 43 31 31 34 20 20 20 4A |2+DCB.DVC114 J| 00001B40: 53 52 20 44 56 53 30 30 32 2D 44 56 43 32 2B 44 |SR DVS002-DVC2+D| 00001B50: 43 42 0D 0D 20 20 20 20 20 20 20 20 20 42 43 43 |CB.. BCC| 00001B60: 20 44 56 43 31 31 38 0D 44 56 43 30 39 38 20 20 | DVC118.DVC098 | 00001B70: 20 4C 44 58 20 23 24 31 38 0D 44 56 43 31 31 35 | LDX #$18.DVC115| 00001B80: 20 20 20 4C 44 41 20 23 24 30 30 20 20 20 20 20 | LDA #$00 | 00001B90: 20 20 20 20 20 20 20 20 20 3B 20 24 30 35 31 36 | ; $0516| 00001BA0: 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 31 |. STA $1| 00001BB0: 38 30 30 0D 44 56 43 31 31 36 20 20 20 42 49 54 |800.DVC116 BIT| 00001BC0: 20 24 31 38 30 30 0D 20 20 20 20 20 20 20 20 20 | $1800. | 00001BD0: 42 50 4C 20 44 56 43 31 31 36 0D 20 20 20 20 20 |BPL DVC116. | 00001BE0: 20 20 20 20 53 54 58 20 24 31 38 30 30 0D 44 56 | STX $1800.DV| 00001BF0: 43 31 31 37 20 20 20 42 49 54 20 24 31 38 30 30 |C117 BIT $1800| 00001C00: 0D 20 20 20 20 20 20 20 20 20 42 4D 49 20 44 56 |. BMI DV| 00001C10: 43 31 31 37 0D 44 56 44 31 30 33 20 20 20 3D 20 |C117.DVD103 = | 00001C20: 2A 2D 44 56 43 32 2B 44 43 42 2B 31 0D 20 20 20 |*-DVC2+DCB+1. | 00001C30: 20 20 20 20 20 20 4C 44 41 20 23 24 30 30 0D 20 | LDA #$00. | 00001C40: 20 20 20 20 20 20 20 20 42 45 51 20 44 52 56 53 | BEQ DRVS| 00001C50: 54 41 52 54 0D 20 20 20 20 20 20 20 20 20 52 54 |TART. RT| 00001C60: 53 0D 0D 44 56 44 31 30 34 20 20 20 3D 20 2A 2D |S..DVD104 = *-| 00001C70: 44 56 43 32 2B 44 43 42 2B 31 0D 44 56 43 31 31 |DVC2+DCB+1.DVC11| 00001C80: 38 20 20 20 4C 44 41 20 23 24 30 30 20 20 20 20 |8 LDA #$00 | 00001C90: 20 20 20 20 20 20 20 20 20 20 3B 20 24 30 35 32 | ; $052| 00001CA0: 44 0D 20 20 20 20 20 20 20 20 20 42 45 51 20 44 |D. BEQ D| 00001CB0: 56 43 31 31 39 0D 20 20 20 20 20 20 20 20 20 4C |VC119. L| 00001CC0: 44 58 20 23 24 31 41 0D 20 20 20 20 20 20 20 20 |DX #$1A. | 00001CD0: 20 42 45 51 20 44 56 43 31 31 35 0D 0D 44 56 44 | BEQ DVC115..DVD| 00001CE0: 31 30 35 20 20 20 3D 20 2A 2D 44 56 43 32 2B 44 |105 = *-DVC2+D| 00001CF0: 43 42 2B 31 0D 44 56 43 31 31 39 20 20 20 4C 44 |CB+1.DVC119 LD| 00001D00: 41 20 23 24 30 30 0D 20 20 20 20 20 20 20 20 20 |A #$00. | 00001D10: 42 4E 45 20 44 56 43 31 32 30 0D 20 20 20 20 20 |BNE DVC120. | 00001D20: 20 20 20 20 4A 53 52 20 44 56 53 30 30 35 2D 44 | JSR DVS005-D| 00001D30: 56 43 32 2B 44 43 42 0D 44 56 43 31 32 30 20 20 |VC2+DCB.DVC120 | 00001D40: 20 4C 44 41 20 24 30 37 30 31 2C 59 0D 20 20 20 | LDA $0701,Y. | 00001D50: 20 20 20 20 20 20 53 54 41 20 24 30 38 0D 20 20 | STA $08. | 00001D60: 20 20 20 20 20 20 20 4C 44 41 20 24 30 37 30 32 | LDA $0702| 00001D70: 2C 59 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |,Y. STA | 00001D80: 24 30 39 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |$09. LDA| 00001D90: 20 24 31 43 30 43 0D 20 20 20 20 20 20 20 20 20 | $1C0C. | 00001DA0: 4F 52 41 20 23 24 45 30 0D 20 20 20 20 20 20 20 |ORA #$E0. | 00001DB0: 20 20 53 54 41 20 24 31 43 30 43 0D 20 20 20 20 | STA $1C0C. | 00001DC0: 20 20 20 20 20 4C 44 41 20 23 24 30 30 0D 20 20 | LDA #$00. | 00001DD0: 20 20 20 20 20 20 20 53 54 41 20 24 31 43 30 33 | STA $1C03| 00001DE0: 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 |. LDA #$| 00001DF0: 45 30 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |E0. STA | 00001E00: 24 30 31 0D 20 20 20 20 20 20 20 20 20 43 4C 49 |$01. CLI| 00001E10: 0D 44 56 43 31 32 31 20 20 20 4C 44 41 20 24 30 |.DVC121 LDA $0| 00001E20: 31 0D 20 20 20 20 20 20 20 20 20 42 4D 49 20 44 |1. BMI D| 00001E30: 56 43 31 32 31 0D 20 20 20 20 20 20 20 20 20 53 |VC121. S| 00001E40: 45 49 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 |EI. LDX | 00001E50: 23 24 31 41 0D 20 20 20 20 20 20 20 20 20 43 4D |#$1A. CM| 00001E60: 50 20 23 24 30 32 0D 20 20 20 20 20 20 20 20 20 |P #$02. | 00001E70: 42 43 43 20 44 56 43 31 32 32 0D 20 20 20 20 20 |BCC DVC122. | 00001E80: 20 20 20 20 4C 44 58 20 23 24 31 38 0D 0D 44 56 | LDX #$18..DV| 00001E90: 43 31 32 32 20 20 20 4A 4D 50 20 44 56 43 31 31 |C122 JMP DVC11| 00001EA0: 35 2D 44 56 43 32 2B 44 43 42 0D 0D 0D 44 56 53 |5-DVC2+DCB...DVS| 00001EB0: 30 30 31 0D 20 20 20 20 20 20 20 20 20 53 45 49 |001. SEI| 00001EC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001ED0: 20 20 20 3B 30 35 36 38 0D 20 20 20 20 20 20 20 | ;0568. | 00001EE0: 20 20 4C 44 41 20 23 24 30 41 0D 20 20 20 20 20 | LDA #$0A. | 00001EF0: 20 20 20 20 53 54 41 20 24 31 38 30 30 0D 20 20 | STA $1800. | 00001F00: 20 20 20 20 20 20 20 4A 53 52 20 44 56 53 30 30 | JSR DVS00| 00001F10: 34 2D 44 56 43 32 2B 44 43 42 0D 44 56 43 31 32 |4-DVC2+DCB.DVC12| 00001F20: 33 20 20 20 42 49 54 20 24 31 38 30 30 0D 20 20 |3 BIT $1800. | 00001F30: 20 20 20 20 20 20 20 42 50 4C 20 44 56 43 31 32 | BPL DVC12| 00001F40: 33 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 |3. LDA #| 00001F50: 24 31 38 0D 20 20 20 20 20 20 20 20 20 53 54 41 |$18. STA| 00001F60: 20 24 31 38 30 30 0D 44 56 43 31 32 34 20 20 20 | $1800.DVC124 | 00001F70: 4C 44 41 20 24 31 38 30 30 0D 20 20 20 20 20 20 |LDA $1800. | 00001F80: 20 20 20 42 4D 49 20 44 56 43 31 32 34 0D 20 20 | BMI DVC124. | 00001F90: 20 20 20 20 20 20 20 4C 44 41 20 23 24 30 30 0D | LDA #$00.| 00001FA0: 20 20 20 20 20 20 20 20 20 53 54 41 20 24 31 38 | STA $18| 00001FB0: 30 30 0D 0D 20 20 20 20 20 20 20 20 20 4A 53 52 |00.. JSR| 00001FC0: 20 47 42 59 54 45 2D 44 52 56 43 4F 44 45 2B 46 | GBYTE-DRVCODE+F| 00001FD0: 43 42 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |CB. STA | 00001FE0: 44 56 44 30 36 30 0D 0D 20 20 20 20 20 20 20 20 |DVD060.. | 00001FF0: 20 4A 53 52 20 47 42 59 54 45 2D 44 52 56 43 4F | JSR GBYTE-DRVCO| 00002000: 44 45 2B 46 43 42 0D 20 20 20 20 20 20 20 20 20 |DE+FCB. | 00002010: 53 54 41 20 44 56 44 30 36 31 0D 0D 20 20 20 20 |STA DVD061.. | 00002020: 20 20 20 20 20 4A 53 52 20 47 42 59 54 45 2D 44 | JSR GBYTE-D| 00002030: 52 56 43 4F 44 45 2B 46 43 42 0D 20 20 20 20 20 |RVCODE+FCB. | 00002040: 20 20 20 20 54 41 58 0D 20 20 20 20 20 20 20 20 | TAX. | 00002050: 20 41 4E 44 20 23 24 32 30 0D 20 20 20 20 20 20 | AND #$20. | 00002060: 20 20 20 53 54 41 20 44 56 44 31 30 33 0D 20 20 | STA DVD103. | 00002070: 20 20 20 20 20 20 20 54 58 41 0D 20 20 20 20 20 | TXA. | 00002080: 20 20 20 20 41 4E 44 20 23 24 34 30 0D 20 20 20 | AND #$40. | 00002090: 20 20 20 20 20 20 53 54 41 20 44 56 44 31 30 34 | STA DVD104| 000020A0: 0D 20 20 20 20 20 20 20 20 20 54 58 41 0D 20 20 |. TXA. | 000020B0: 20 20 20 20 20 20 20 41 4E 44 20 23 24 30 38 0D | AND #$08.| 000020C0: 20 20 20 20 20 20 20 20 20 53 54 41 20 44 56 44 | STA DVD| 000020D0: 31 30 35 0D 20 20 20 20 20 20 20 20 20 54 58 41 |105. TXA| 000020E0: 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 24 |. LDX #$| 000020F0: 41 35 0D 20 20 20 20 20 20 20 20 20 4C 44 59 20 |A5. LDY | 00002100: 23 24 30 34 0D 20 20 20 20 20 20 20 20 20 41 4E |#$04. AN| 00002110: 44 20 23 24 31 30 0D 20 20 20 20 20 20 20 20 20 |D #$10. | 00002120: 42 45 51 20 44 56 43 31 32 35 0D 0D 20 20 20 20 |BEQ DVC125.. | 00002130: 20 20 20 20 20 4C 44 58 20 23 3C 44 56 44 30 35 | LDX #<DVD05| 00002140: 30 20 20 20 20 20 20 20 3B 20 21 21 21 21 21 0D |0 ; !!!!!.| 00002150: 20 20 20 20 20 20 20 20 20 4C 44 59 20 23 3E 44 | LDY #>D| 00002160: 56 44 30 35 30 20 20 20 20 20 20 20 3B 20 21 21 |VD050 ; !!| 00002170: 21 21 21 0D 44 56 43 31 32 35 20 20 20 53 54 58 |!!!.DVC125 STX| 00002180: 20 44 56 44 30 39 39 0D 20 20 20 20 20 20 20 20 | DVD099. | 00002190: 20 53 54 59 20 44 56 44 30 39 39 2B 31 0D 0D 44 | STY DVD099+1..D| 000021A0: 56 43 31 32 36 20 20 20 42 49 54 20 24 31 38 30 |VC126 BIT $180| 000021B0: 30 0D 20 20 20 20 20 20 20 20 20 42 50 4C 20 44 |0. BPL D| 000021C0: 56 43 31 32 36 0D 20 20 20 20 20 20 20 20 20 4C |VC126. L| 000021D0: 44 41 20 23 24 31 38 0D 20 20 20 20 20 20 20 20 |DA #$18. | 000021E0: 20 53 54 41 20 24 31 38 30 30 0D 20 20 20 20 20 | STA $1800. | 000021F0: 20 20 20 20 4C 44 58 20 24 31 34 0D 20 20 20 20 | LDX $14. | 00002200: 20 20 20 20 20 52 54 53 0D 0D 44 56 44 30 35 30 | RTS..DVD050| 00002210: 20 20 20 3D 20 2A 2D 44 56 43 32 2B 44 43 42 0D | = *-DVC2+DCB.| 00002220: 0D 20 20 20 20 20 20 20 20 20 4C 44 59 20 23 24 |. LDY #$| 00002230: 30 32 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |02. STA | 00002240: 44 56 44 30 35 31 0D 44 56 43 31 32 37 20 20 20 |DVD051.DVC127 | 00002250: 4C 44 41 20 24 30 37 30 30 2C 59 0D 20 20 20 20 |LDA $0700,Y. | 00002260: 20 20 20 20 20 54 41 58 0D 20 20 20 20 20 20 20 | TAX. | 00002270: 20 20 4C 53 52 20 41 0D 20 20 20 20 20 20 20 20 | LSR A. | 00002280: 20 4C 53 52 20 41 0D 20 20 20 20 20 20 20 20 20 | LSR A. | 00002290: 4C 53 52 20 41 0D 20 20 20 20 20 20 20 20 20 4C |LSR A. L| 000022A0: 53 52 20 41 0D 20 20 20 20 20 20 20 20 20 4F 52 |SR A. OR| 000022B0: 41 20 23 24 46 30 0D 20 20 20 20 20 20 20 20 20 |A #$F0. | 000022C0: 53 54 41 20 44 56 44 31 30 36 0D 20 20 20 20 20 |STA DVD106. | 000022D0: 20 20 20 20 54 58 41 0D 20 20 20 20 20 20 20 20 | TXA. | 000022E0: 20 41 4E 44 20 23 24 30 46 0D 20 20 20 20 20 20 | AND #$0F. | 000022F0: 20 20 20 54 41 58 0D 20 20 20 20 20 20 20 20 20 | TAX. | 00002300: 4C 44 41 20 24 30 34 46 30 2C 58 0D 20 20 20 20 |LDA $04F0,X. | 00002310: 20 20 20 20 20 4F 52 41 20 23 24 31 30 0D 20 20 | ORA #$10. | 00002320: 20 20 20 20 20 20 20 4C 44 58 20 23 24 30 32 0D | LDX #$02.| 00002330: 20 20 20 20 20 20 20 20 20 53 54 58 20 24 31 38 | STX $18| 00002340: 30 30 0D 44 56 43 31 32 38 20 20 20 42 49 54 20 |00.DVC128 BIT | 00002350: 24 31 38 30 30 0D 20 20 20 20 20 20 20 20 20 42 |$1800. B| 00002360: 50 4C 20 44 56 43 31 32 38 0D 20 20 20 20 20 20 |PL DVC128. | 00002370: 20 20 20 53 54 41 20 24 31 38 30 30 0D 20 20 20 | STA $1800. | 00002380: 20 20 20 20 20 20 41 53 4C 20 41 0D 20 20 20 20 | ASL A. | 00002390: 20 20 20 20 20 41 4E 44 20 23 24 30 46 0D 44 56 | AND #$0F.DV| 000023A0: 43 31 32 39 20 20 20 42 49 54 20 24 31 38 30 30 |C129 BIT $1800| 000023B0: 0D 20 20 20 20 20 20 20 20 20 42 4D 49 20 44 56 |. BMI DV| 000023C0: 43 31 32 39 0D 20 20 20 20 20 20 20 20 20 53 54 |C129. ST| 000023D0: 41 20 24 31 38 30 30 0D 44 56 44 31 30 36 20 20 |A $1800.DVD106 | 000023E0: 20 3D 20 2A 2D 44 56 43 32 2B 44 43 42 2B 31 0D | = *-DVC2+DCB+1.| 000023F0: 20 20 20 20 20 20 20 20 20 4C 44 41 20 53 45 43 | LDA SEC| 00002400: 54 41 42 4C 45 0D 20 20 20 20 20 20 20 20 20 4F |TABLE. O| 00002410: 52 41 20 23 24 31 30 0D 44 56 43 31 33 30 20 20 |RA #$10.DVC130 | 00002420: 20 42 49 54 20 24 31 38 30 30 0D 20 20 20 20 20 | BIT $1800. | 00002430: 20 20 20 20 42 50 4C 20 44 56 43 31 33 30 0D 20 | BPL DVC130. | 00002440: 20 20 20 20 20 20 20 20 53 54 41 20 24 31 38 30 | STA $180| 00002450: 30 0D 20 20 20 20 20 20 20 20 20 41 53 4C 20 41 |0. ASL A| 00002460: 0D 20 20 20 20 20 20 20 20 20 41 4E 44 20 23 24 |. AND #$| 00002470: 30 46 0D 44 56 43 31 33 31 20 20 20 42 49 54 20 |0F.DVC131 BIT | 00002480: 24 31 38 30 30 0D 20 20 20 20 20 20 20 20 20 42 |$1800. B| 00002490: 4D 49 20 44 56 43 31 33 31 0D 20 20 20 20 20 20 |MI DVC131. | 000024A0: 20 20 20 53 54 41 20 24 31 38 30 30 0D 20 20 20 | STA $1800. | 000024B0: 20 20 20 20 20 20 4C 44 41 20 23 24 31 38 0D 44 | LDA #$18.D| 000024C0: 56 43 31 33 32 20 20 20 42 49 54 20 24 31 38 30 |VC132 BIT $180| 000024D0: 30 0D 20 20 20 20 20 20 20 20 20 42 50 4C 20 44 |0. BPL D| 000024E0: 56 43 31 33 32 0D 20 20 20 20 20 20 20 20 20 53 |VC132. S| 000024F0: 54 41 20 24 31 38 30 30 0D 44 56 43 31 33 33 20 |TA $1800.DVC133 | 00002500: 20 20 42 49 54 20 24 31 38 30 30 0D 20 20 20 20 | BIT $1800. | 00002510: 20 20 20 20 20 42 4D 49 20 44 56 43 31 33 33 0D | BMI DVC133.| 00002520: 44 56 44 30 35 31 20 20 20 3D 20 2A 2D 44 56 43 |DVD051 = *-DVC| 00002530: 32 2B 44 43 42 2B 31 0D 20 20 20 20 20 20 20 20 |2+DCB+1. | 00002540: 20 43 50 59 20 23 24 30 30 0D 20 20 20 20 20 20 | CPY #$00. | 00002550: 20 20 20 49 4E 59 0D 20 20 20 20 20 20 20 20 20 | INY. | 00002560: 42 43 43 20 44 56 43 31 32 37 0D 20 20 20 20 20 |BCC DVC127. | 00002570: 20 20 20 20 52 54 53 0D 0D 44 56 53 30 30 32 20 | RTS..DVS002 | 00002580: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00002590: 20 20 20 3B 30 36 32 36 0D 20 20 20 20 20 20 20 | ;0626. | 000025A0: 20 20 4C 44 58 20 23 24 30 31 0D 44 56 43 31 33 | LDX #$01.DVC13| 000025B0: 34 20 20 20 4C 44 41 20 23 24 31 32 0D 20 20 20 |4 LDA #$12. | 000025C0: 20 20 20 20 20 20 53 54 41 20 24 30 45 0D 20 20 | STA $0E. | 000025D0: 20 20 20 20 20 20 20 53 54 58 20 24 30 46 0D 0D | STX $0F..| 000025E0: 20 20 20 20 20 20 20 20 20 4A 53 52 20 44 56 53 | JSR DVS| 000025F0: 30 30 33 2D 44 56 43 32 2B 44 43 42 0D 0D 20 20 |003-DVC2+DCB.. | 00002600: 20 20 20 20 20 20 20 4C 44 59 20 23 24 30 32 0D | LDY #$02.| 00002610: 44 56 43 31 33 35 20 20 20 4C 44 41 20 24 30 37 |DVC135 LDA $07| 00002620: 30 30 2C 59 0D 20 20 20 20 20 20 20 20 20 41 4E |00,Y. AN| 00002630: 44 20 23 24 38 33 0D 20 20 20 20 20 20 20 20 20 |D #$83. | 00002640: 43 4D 50 20 23 24 38 32 0D 20 20 20 20 20 20 20 |CMP #$82. | 00002650: 20 20 42 4E 45 20 44 56 43 31 33 36 0D 20 20 20 | BNE DVC136. | 00002660: 20 20 20 20 20 20 4C 44 41 20 24 30 37 30 33 2C | LDA $0703,| 00002670: 59 0D 44 56 44 30 36 30 20 20 20 3D 20 2A 2D 44 |Y.DVD060 = *-D| 00002680: 56 43 32 2B 44 43 42 2B 31 0D 20 20 20 20 20 20 |VC2+DCB+1. | 00002690: 20 20 20 43 4D 50 20 23 24 30 30 0D 20 20 20 20 | CMP #$00. | 000026A0: 20 20 20 20 20 42 4E 45 20 44 56 43 31 33 36 0D | BNE DVC136.| 000026B0: 20 20 20 20 20 20 20 20 20 4C 44 41 20 24 30 37 | LDA $07| 000026C0: 30 34 2C 59 0D 44 56 44 30 36 31 20 20 20 3D 20 |04,Y.DVD061 = | 000026D0: 2A 2D 44 56 43 32 2B 44 43 42 2B 31 0D 20 20 20 |*-DVC2+DCB+1. | 000026E0: 20 20 20 20 20 20 43 4D 50 20 23 24 30 30 0D 20 | CMP #$00. | 000026F0: 20 20 20 20 20 20 20 20 42 4E 45 20 44 56 43 31 | BNE DVC1| 00002700: 33 36 0D 20 20 20 20 20 20 20 20 20 43 4C 43 0D |36. CLC.| 00002710: 20 20 20 20 20 20 20 20 20 52 54 53 0D 0D 44 56 | RTS..DV| 00002720: 43 31 33 36 20 20 20 54 59 41 0D 20 20 20 20 20 |C136 TYA. | 00002730: 20 20 20 20 43 4C 43 0D 20 20 20 20 20 20 20 20 | CLC. | 00002740: 20 41 44 43 20 23 24 32 30 0D 20 20 20 20 20 20 | ADC #$20. | 00002750: 20 20 20 54 41 59 0D 20 20 20 20 20 20 20 20 20 | TAY. | 00002760: 42 43 43 20 44 56 43 31 33 35 0D 20 20 20 20 20 |BCC DVC135. | 00002770: 20 20 20 20 4C 44 58 20 24 30 37 30 31 0D 20 20 | LDX $0701. | 00002780: 20 20 20 20 20 20 20 42 50 4C 20 44 56 43 31 33 | BPL DVC13| 00002790: 34 0D 20 20 20 20 20 20 20 20 20 53 45 43 0D 20 |4. SEC. | 000027A0: 20 20 20 20 20 20 20 20 52 54 53 0D 0D 44 56 53 | RTS..DVS| 000027B0: 30 30 33 20 20 20 20 20 20 20 20 20 20 20 20 20 |003 | 000027C0: 20 20 20 20 20 20 20 20 3B 20 30 36 35 41 0D 0D | ; 065A..| 000027D0: 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 24 30 | LDX #$0| 000027E0: 35 0D 44 56 43 31 33 37 20 20 20 4C 44 41 20 23 |5.DVC137 LDA #| 000027F0: 24 38 30 0D 20 20 20 20 20 20 20 20 20 53 54 41 |$80. STA| 00002800: 20 24 30 34 0D 20 20 20 20 20 20 20 20 20 43 4C | $04. CL| 00002810: 49 0D 44 56 43 31 33 38 20 20 20 4C 44 41 20 24 |I.DVC138 LDA $| 00002820: 30 34 0D 20 20 20 20 20 20 20 20 20 42 4D 49 20 |04. BMI | 00002830: 44 56 43 31 33 38 0D 20 20 20 20 20 20 20 20 20 |DVC138. | 00002840: 43 4D 50 20 23 24 30 32 0D 20 20 20 20 20 20 20 |CMP #$02. | 00002850: 20 20 42 43 43 20 44 56 43 31 33 39 0D 20 20 20 | BCC DVC139. | 00002860: 20 20 20 20 20 20 44 45 58 0D 20 20 20 20 20 20 | DEX. | 00002870: 20 20 20 42 50 4C 20 44 56 43 31 33 37 0D 20 20 | BPL DVC137. | 00002880: 20 20 20 20 20 20 20 50 4C 41 0D 20 20 20 20 20 | PLA. | 00002890: 20 20 20 20 50 4C 41 0D 20 20 20 20 20 20 20 20 | PLA. | 000028A0: 20 4A 4D 50 20 44 56 43 30 39 38 2D 44 56 43 32 | JMP DVC098-DVC2| 000028B0: 2B 44 43 42 0D 0D 44 56 43 31 33 39 20 20 20 20 |+DCB..DVC139 | 000028C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000028D0: 20 20 3B 20 30 36 37 31 0D 20 20 20 20 20 20 20 | ; 0671. | 000028E0: 20 20 53 45 49 0D 20 20 20 20 20 20 20 20 20 52 | SEI. R| 000028F0: 54 53 0D 0D 44 56 53 30 30 37 0D 20 20 20 20 20 |TS..DVS007. | 00002900: 20 20 20 20 4C 44 41 20 23 24 30 31 0D 20 20 20 | LDA #$01. | 00002910: 20 20 20 20 20 20 53 54 41 20 24 34 45 0D 20 20 | STA $4E. | 00002920: 20 20 20 20 20 20 20 4C 44 41 20 23 24 42 44 0D | LDA #$BD.| 00002930: 20 20 20 20 20 20 20 20 20 53 54 41 20 24 34 46 | STA $4F| 00002940: 0D 20 20 20 20 20 20 20 20 20 4C 44 59 20 23 24 |. LDY #$| 00002950: 30 30 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 |00. LDX | 00002960: 23 24 30 37 0D 20 20 20 20 20 20 20 20 20 53 54 |#$07. ST| 00002970: 59 20 24 33 30 0D 20 20 20 20 20 20 20 20 20 53 |Y $30. S| 00002980: 54 58 20 24 33 31 0D 20 20 20 20 20 20 20 20 20 |TX $31. | 00002990: 4C 44 41 20 24 30 39 0D 20 20 20 20 20 20 20 20 |LDA $09. | 000029A0: 20 41 53 4C 20 41 0D 20 20 20 20 20 20 20 20 20 | ASL A. | 000029B0: 41 4E 44 20 23 24 32 30 0D 20 20 20 20 20 20 20 |AND #$20. | 000029C0: 20 20 54 41 59 0D 20 20 20 20 20 20 20 20 20 4C | TAY. L| 000029D0: 44 41 20 24 30 39 0D 20 20 20 20 20 20 20 20 20 |DA $09. | 000029E0: 41 4E 44 20 23 24 30 46 0D 20 20 20 20 20 20 20 |AND #$0F. | 000029F0: 20 20 54 41 58 0D 20 20 20 20 20 20 20 20 20 54 | TAX. T| 00002A00: 59 41 0D 20 20 20 20 20 20 20 20 20 4F 52 41 20 |YA. ORA | 00002A10: 24 46 37 37 46 2C 58 20 20 20 20 20 20 20 20 20 |$F77F,X | 00002A20: 3B 20 30 36 38 46 0D 20 20 20 20 20 20 20 20 20 |; 068F. | 00002A30: 41 53 4C 20 41 0D 20 20 20 20 20 20 20 20 20 41 |ASL A. A| 00002A40: 53 4C 20 41 0D 20 20 20 20 20 20 20 20 20 53 54 |SL A. ST| 00002A50: 41 20 44 56 44 30 39 38 0D 20 20 20 20 20 20 20 |A DVD098. | 00002A60: 20 20 52 54 53 0D 0D 44 56 53 30 30 34 0D 20 20 | RTS..DVS004. | 00002A70: 20 20 20 20 20 20 20 4C 44 41 20 24 31 43 30 30 | LDA $1C00| 00002A80: 20 20 20 20 20 20 20 20 20 20 20 3B 30 36 39 38 | ;0698| 00002A90: 0D 20 20 20 20 20 20 20 20 20 41 4E 44 20 23 24 |. AND #$| 00002AA0: 46 37 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |F7. STA | 00002AB0: 24 31 43 30 30 0D 20 20 20 20 20 20 20 20 20 52 |$1C00. R| 00002AC0: 54 53 0D 0D 44 56 53 30 30 35 0D 20 20 20 20 20 |TS..DVS005. | 00002AD0: 20 20 20 20 4C 44 41 20 24 31 43 30 30 20 20 20 | LDA $1C00 | 00002AE0: 20 20 20 20 20 20 20 20 3B 30 36 41 31 0D 20 20 | ;06A1. | 00002AF0: 20 20 20 20 20 20 20 4F 52 41 20 23 24 30 38 0D | ORA #$08.| 00002B00: 20 20 20 20 20 20 20 20 20 53 54 41 20 24 31 43 | STA $1C| 00002B10: 30 30 0D 20 20 20 20 20 20 20 20 20 52 54 53 0D |00. RTS.| 00002B20: 0D 44 56 53 30 30 36 20 20 20 20 20 20 20 20 20 |.DVS006 | 00002B30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3B 30 | ;0| 00002B40: 36 41 41 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |6AA. LDA| 00002B50: 20 23 24 31 32 0D 20 20 20 20 20 20 20 20 20 53 | #$12. S| 00002B60: 54 41 20 24 30 45 0D 20 20 20 20 20 20 20 20 20 |TA $0E. | 00002B70: 4C 44 41 20 23 24 30 31 0D 20 20 20 20 20 20 20 |LDA #$01. | 00002B80: 20 20 53 54 41 20 24 30 46 0D 44 56 43 31 34 30 | STA $0F.DVC140| 00002B90: 20 20 20 4C 44 41 20 23 24 42 30 0D 20 20 20 20 | LDA #$B0. | 00002BA0: 20 20 20 20 20 53 54 41 20 24 30 34 0D 20 20 20 | STA $04. | 00002BB0: 20 20 20 20 20 20 43 4C 49 0D 44 56 43 31 34 31 | CLI.DVC141| 00002BC0: 20 20 20 4C 44 41 20 24 30 34 0D 20 20 20 20 20 | LDA $04. | 00002BD0: 20 20 20 20 42 4D 49 20 44 56 43 31 34 31 0D 20 | BMI DVC141. | 00002BE0: 20 20 20 20 20 20 20 20 43 4D 50 20 23 24 30 32 | CMP #$02| 00002BF0: 0D 20 20 20 20 20 20 20 20 20 42 43 43 20 44 56 |. BCC DV| 00002C00: 43 31 34 30 0D 44 56 43 31 34 32 20 20 20 4C 44 |C140.DVC142 LD| 00002C10: 41 20 23 24 42 30 0D 20 20 20 20 20 20 20 20 20 |A #$B0. | 00002C20: 53 54 41 20 24 30 34 0D 20 20 20 20 20 20 20 20 |STA $04. | 00002C30: 20 43 4C 49 0D 44 56 43 31 34 33 20 20 20 4C 44 | CLI.DVC143 LD| 00002C40: 41 20 24 30 34 0D 20 20 20 20 20 20 20 20 20 42 |A $04. B| 00002C50: 4D 49 20 44 56 43 31 34 33 0D 20 20 20 20 20 20 |MI DVC143. | 00002C60: 20 20 20 43 4D 50 20 23 24 30 32 0D 20 20 20 20 | CMP #$02. | 00002C70: 20 20 20 20 20 42 43 53 20 44 56 43 31 34 32 0D | BCS DVC142.| 00002C80: 20 20 20 20 20 20 20 20 20 53 45 49 0D 20 20 20 | SEI. | 00002C90: 20 20 20 20 20 20 52 54 53 0D 0D 3B 20 2D 2D 2D | RTS..; ---| 00002CA0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00002CB0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00002CC0: 2D 2D 2D 0D 0D |---.. |
. *= $CA00...TEMPBYTE = $B7..DRV
POS = $0300..INITLOAD. LDA #<D
RVCODE. LDX #>DRVCODE. S
TA MEMPOSIT. STX MEMPOSIT+1..
LDA #<DRVPOS. LDX #>DRVPOS
. STA CIMLO. STX CIMHI..
LDA #$00. STA NEMTOMMI.
. LDA #$01. LDX #$08.
LDY #$02. JSR $FFBA
; 1,8,2. LDX #<NEVPAR. L
DY #>NEVPAR. LDA #$03. J
SR $FFBD ; "#0". JSR $FFC0
; OPEN. LDA #$02.
LDX #$08. LDY #$0F. JSR
$FFBA ; 2,8,15. LDA #$00.
JSR $FFBD ; "". J
SR $FFC0 ; OPEN.S2D001 LDX #$57
; M-W,$23. LDY #$23.
JSR MEM2DRV.. LDX #$00.S2D00
2.MEMPOSIT = *+1. LDA $FFFF,X.
JSR $FFA8 ; IECOUT.
INX. CPX #$23. BNE S2D0
02. TXA. CLC. AD
C CIMLO. STA CIMLO. BCC
S2D003. INC CIMHI.S2D003.
TXA. CLC. ADC MEMPOSIT
. STA MEMPOSIT. BCC S2D0
04. INC MEMPOSIT+1.S2D004 LDA
#$08. JSR $FFAE ; UNLISTEN.
INC NEMTOMMI. LDA NEMTO
MMI. CMP #$03. BNE S2D00
1.. LDA #<DRVPOS. LDX #>
DRVPOS. STA CIMLO. STX C
IMHI. LDA #$01. JSR $FFC
3 ; CLOSE #1. LDX #$45.
LDY #$00. JSR MEM2DRV
; M-E $0300. LDA #$08.
JSR $FFAE ; UNLISTEN..
LDA #<DVC2. LDX #>DVC2.
STA MEMPOS2. STX MEMPOS2+1.
. ;-------------.. LDA $D
D00 ; INITSEND. AND #$0
3. STA SDRV003+1. ORA #$
10. STA SENDDRV+1.. LDA
$DD00. ORA #$08. STA $DD
00.ISEND001 LDA $DD00. BPL ISEND
001. AND #$03. STA $DD00
.ISEND002 BIT $DD00. BVC ISEND00
2. BPL ISEND002.. LDA #$
04. JSR SENDBYTE. LDA #$
07. JSR SENDBYTE. LDY #$
00.S2D005 LDX #$00..MEMPOS2 = *+1.S2D
006 LDA $FFFF,X. JSR SENDBYTE.
INX ; MARADEK.
BNE S2D006 ; MASOLASA. IN
C MEMPOS2+1 ; TURBOVAL.... INY.
CPY #$03. BNE S2D005.
RTS..NEMTOMMI .BYTE 0..MEM2DRV L
DA #$08. JSR $FFB1 ; LISTEN
#8. LDA #$6F. JSR $FF93
; LISTEN2 #15. LDA #$4D.
JSR $FFA8 ; SENDIEC M.
LDA #$2D. JSR $FFA8 ; SE
NDIEC -. TXA. JSR $FFA8
; SENDIEC XREG..CIMLO = *+1.
LDA #$00. JSR $FFA8 ;
SENDIEC CIMLO.CIMHI = *+1. LD
A #$00. JSR $FFA8 ; SENDIEC
CIMHI.. TYA. BEQ VISSZA
; JUMP IF M-E. JSR $FFA8
; SENDIEC DATA.VISSZA RTS..SENDBYTE
STA TEMPBYTE. JSR SENDDRV.
JSR SENDDRV. JSR SENDDRV.
JSR SENDDRV. RTS..SENDDRV
LDA #$13. LSR TEMPBYTE.
BCC SDRV001. ORA #$20.SDRV001
STA $DD00. NOP. NOP.
NOP. NOP.SDRV003. L
DA #$03. LSR TEMPBYTE. B
CC SDRV002. ORA #$20.SDRV002 ST
A $DD00. NOP. NOP.
RTS.;.NEVPAR .BYTE $23,$30 ; #
0..;------------------------------------
---..FCB = DRVPOS.DCB = $0400.
.DRVCODE ; GET MAIN CODE.
SEI. LDA #$0A.
STA $1800..DCODE001 BIT $1800. B
PL DCODE001. LDA #$18. S
TA $1800.DCODE002 LDA $1800. BMI
DCODE002. LDA #$00. STA
$1800. JSR GBYTE-DRVCODE+FCB.
STA DMEMPOS. JSR GBYTE-DR
VCODE+FCB. STA DMEMSIZE.DCODE003
LDX #$00.DCODE004 JSR GBYTE-DRVCODE+FCB
..DMEMPOS = *-DRVCODE+FCB+2. ST
A $0100,X. INX. BNE DCOD
E004. INC DMEMPOS. LDA D
MEMPOS.DMEMSIZE = *-DRVCODE+FCB+1.
CMP #$00. BNE DCODE003.
JMP DRVSTART-DVC2+DCB...GBYTE
; GET BYTE FROM 64. LDY
#$04.GBYTE001 LDA #$04.GBYTE002 BIT $180
0. BEQ GBYTE002. LDA $18
00. LSR A. ROR $14.
LDA #$04.GBYTE003 BIT $1800.
BNE GBYTE003. LDA $1800.
LSR A. ROR $14. DEY.
BNE GBYTE001. LDA $14.
RTS..; ---------------------------
-----------..DVC2. JSR DVC100-DV
C2+DCB. LDA #$FF. LDY $0
9. LDX $08. BNE DVC101.
TYA..DVD099 = *-DVC2+DCB+1.DVC
101 JSR DVC111-DVC2+DCB.. LDA
$08. BEQ DVC102. JMP $F9
78.DVC102 JMP $F969..DVC100 JSR DVS0
07-DVC2+DCB ; E0419..DVC103 LDA $1C00
. BMI DVC103. LDA $1C01.
CLV.DVC104 BVC DVC104.
CLV. LDA $1C01. CMP #$
52. BNE DVC103. LDX #$02
.DVC105 BVC DVC105. CLV.
LDA $1C01. DEX. BPL D
VC105. AND #$FC.DVD098 = *-DVC
2+DCB+1. CMP #$00. BNE D
VC103.DVC106 LDA $1C00. BMI DV
C106. LDA $1C01. CLV.
LDY #$00.DVC107 BVC DVC107.
CLV. LDA $1C01. STA
$0700,Y. INY. BNE DVC107
. LDY #$BD.DVC108 BVC DVC108.
CLV. LDA $1C01.
STA $0100,Y. INY. BNE DV
C108. LDY #$00. JSR $F7E
8. LDA $53. STA $08.
LDA $54. STA $09. L
DA $55. STA $0702. LDA #
$03. STA DVD100.DVC109 JSR $F7
E8.DVD100 = *-DVC2+DCB+1. LDX
#$03. LDA $52. STA $0700
,X. INX. BEQ DVC110.
LDA $53. STA $0700,X.
INX. BEQ DVC110. LDA
$54. STA $0700,X. INX.
BEQ DVC110. LDA $55.
STA $0700,X. INX. ST
X DVD100. BNE DVC109.DVC110 RT
S..DVC111 ;04A5
. LDY #$02. STA DVD101.D
VC112 LDA $0700,Y. LDX #$02.
STX $1800. TAX. L
SR A. LSR A. LSR A.
LSR A. ORA #$F0. STA
DVD102. TXA. AND #$0F.
TAX. LDA SECTABLE,X.DVC1
13 BIT $1800. BPL DVC113.
STA $1800. ASL A. AN
D #$0F. STA $1800.DVD102 = *-D
VC2+DCB+1. LDA SECTABLE.
STA $1800. ASL A. AND #
$0F. STA $1800.DVD101 = *-DVC2
+DCB+1. CPY #$00. INY.
BCC DVC112. LDA #$0A.
STA $1800. RTS.. .B
YTE 0,0,0,0,0,0,0,0..SECTABLE = *-DVC2+D
CB. .BYTE $0F,$07,$0D,$05;".....
.BYTE $0B,$03,$09,$01;".....
.BYTE $0E,$06,$0C,$04;".....
.BYTE $0A,$02,$08,$00;".......DRVSTAR
T. JSR DVS001-DVC2+DCB.
TXA. CMP #$01. BNE DVC09
9.. RTS ; UNINSTALL (?:)
. ;JMP ($FFFC)..DVC099 TXA.
BPL DVC114.. JSR DVS006-DVC
2+DCB.DVC114 JSR DVS002-DVC2+DCB..
BCC DVC118.DVC098 LDX #$18.DVC115
LDA #$00 ; $0516.
STA $1800.DVC116 BIT $1800.
BPL DVC116. STX $1800.DVC117 B
IT $1800. BMI DVC117.DVD103 =
*-DVC2+DCB+1. LDA #$00.
BEQ DRVSTART. RTS..DVD104 = *-
DVC2+DCB+1.DVC118 LDA #$00
; $052D. BEQ DVC119. L
DX #$1A. BEQ DVC115..DVD105 =
*-DVC2+DCB+1.DVC119 LDA #$00.
BNE DVC120. JSR DVS005-DVC2+DCB.
DVC120 LDA $0701,Y. STA $08.
LDA $0702,Y. STA $09.
LDA $1C0C. ORA #$E0.
STA $1C0C. LDA #$00. S
TA $1C03. LDA #$E0. STA
$01. CLI.DVC121 LDA $01.
BMI DVC121. SEI. LDX
#$1A. CMP #$02. BCC DVC1
22. LDX #$18..DVC122 JMP DVC11
5-DVC2+DCB...DVS001. SEI
;0568. LDA #$0A.
STA $1800. JSR DVS004-DVC2+D
CB.DVC123 BIT $1800. BPL DVC12
3. LDA #$18. STA $1800.D
VC124 LDA $1800. BMI DVC124.
LDA #$00. STA $1800..
JSR GBYTE-DRVCODE+FCB. STA
DVD060.. JSR GBYTE-DRVCODE+FCB.
STA DVD061.. JSR GBYTE-D
RVCODE+FCB. TAX. AND #$2
0. STA DVD103. TXA.
AND #$40. STA DVD104.
TXA. AND #$08. STA DVD
105. TXA. LDX #$A5.
LDY #$04. AND #$10.
BEQ DVC125.. LDX #<DVD050
; !!!!!. LDY #>DVD050 ; !!
!!!.DVC125 STX DVD099. STY DVD
099+1..DVC126 BIT $1800. BPL D
VC126. LDA #$18. STA $18
00. LDX $14. RTS..DVD050
= *-DVC2+DCB.. LDY #$02.
STA DVD051.DVC127 LDA $0700,Y.
TAX. LSR A. LSR A.
LSR A. LSR A. OR
A #$F0. STA DVD106. TXA.
AND #$0F. TAX.
LDA $04F0,X. ORA #$10. L
DX #$02. STX $1800.DVC128 BIT
$1800. BPL DVC128. STA $
1800. ASL A. AND #$0F.DV
C129 BIT $1800. BMI DVC129.
STA $1800.DVD106 = *-DVC2+DCB+1.
LDA SECTABLE. ORA #$10.
DVC130 BIT $1800. BPL DVC130.
STA $1800. ASL A.
AND #$0F.DVC131 BIT $1800. B
MI DVC131. STA $1800. LD
A #$18.DVC132 BIT $1800. BPL D
VC132. STA $1800.DVC133 BIT $1
800. BMI DVC133.DVD051 = *-DVC
2+DCB+1. CPY #$00. INY.
BCC DVC127. RTS..DVS002
;0626. LDX #$
01.DVC134 LDA #$12. STA $0E.
STX $0F.. JSR DVS003-DVC2
+DCB.. LDY #$02.DVC135 LDA $07
00,Y. AND #$83. CMP #$82
. BNE DVC136. LDA $0703,
Y.DVD060 = *-DVC2+DCB+1. CMP #
$00. BNE DVC136. LDA $07
04,Y.DVD061 = *-DVC2+DCB+1. CM
P #$00. BNE DVC136. CLC.
RTS..DVC136 TYA. CLC.
ADC #$20. TAY.
BCC DVC135. LDX $0701. B
PL DVC134. SEC. RTS..DVS
003 ; 065A..
LDX #$05.DVC137 LDA #$80. STA
$04. CLI.DVC138 LDA $04.
BMI DVC138. CMP #$02.
BCC DVC139. DEX. BPL D
VC137. PLA. PLA.
JMP DVC098-DVC2+DCB..DVC139
; 0671. SEI. R
TS..DVS007. LDA #$01. ST
A $4E. LDA #$BD. STA $4F
. LDY #$00. LDX #$07.
STY $30. STX $31.
LDA $09. ASL A. AND #$20
. TAY. LDA $09.
AND #$0F. TAX. TYA.
ORA $F77F,X ; 068F.
ASL A. ASL A. STA DVD098
. RTS..DVS004. LDA $1C00
;0698. AND #$F7.
STA $1C00. RTS..DVS005.
LDA $1C00 ;06A1. O
RA #$08. STA $1C00. RTS.
.DVS006 ;06AA.
LDA #$12. STA $0E.
LDA #$01. STA $0F.DVC140 LDA #
$B0. STA $04. CLI.DVC141
LDA $04. BMI DVC141.
CMP #$02. BCC DVC140.DVC142 LD
A #$B0. STA $04. CLI.DVC
143 LDA $04. BMI DVC143.
CMP #$02. BCS DVC142.
SEI. RTS..; -------------------
-------------------..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL