MADROM LOAD .SRC
FILE INFORMATION
FILENAME(S): MADROM LOAD .SRC
FILE TYPE(S): SEQ
FILE SIZE: 13.8K
FIRST SEEN: 2025-12-02 00:17:57
APPEARS ON: 1 disk(s)
FILE HASH
15c91968aaae93d4b04068d0d784d0ceefa1c7bc091660ba651ced58350efec0
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SOURCES FOR REGI | MADROM LOAD .SRC | SEQ | Maestro | 22 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 0D 3B 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.; -------------| 00000010: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000020: 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 3B 20 2D 20 49 54 |---------.; - IT| 00000030: 54 45 4E 20 56 41 4C 41 20 41 5A 20 49 52 51 2D |TEN VALA AZ IRQ-| 00000040: 4C 4F 41 44 45 52 2E 2E 2E 0D 3B 20 2D 2D 2D 2D |LOADER....; ----| 00000050: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000060: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000070: 2D 2D 0D 3B 0D 3B 20 C8 49 21 0D 3B 20 C9 54 54 |--.;.; .I!.; .TT| 00000080: 45 4E 20 56 41 4C 41 20 41 5A 20 41 5A 20 C9 D2 |EN VALA AZ AZ ..| 00000090: D1 2D CC CF C1 C4 C5 D2 20 41 4D 49 54 0D 3B 20 |.-...... AMIT.; | 000000A0: 41 4D 49 54 20 45 43 53 45 54 45 4C 54 45 4D 20 |AMIT ECSETELTEM | 000000B0: 4E 45 4B 45 44 20 41 20 54 45 46 4C 4F 4E 42 41 |NEKED A TEFLONBA| 000000C0: 4E 2E 2E 2E 0D 3B 20 C8 41 20 4A 4F 4C 20 43 53 |N....; .A JOL CS| 000000D0: 41 4C 4F 44 4F 4D 2C 20 41 4B 4B 4F 52 20 45 5A |ALODOM, AKKOR EZ| 000000E0: 20 4D 41 52 20 4E 45 4D 20 42 55 47 2D 0D 3B 20 | MAR NEM BUG-.; | 000000F0: 5A 49 4B 20 4E 45 48 41 4E 59 20 54 4F 4C 54 45 |ZIK NEHANY TOLTE| 00000100: 53 20 55 54 41 4E 2C 20 4D 41 52 20 43 53 41 4B |S UTAN, MAR CSAK| 00000110: 20 41 5A 45 52 54 0D 3B 20 49 53 20 4E 45 4D 2C | AZERT.; IS NEM,| 00000120: 20 4D 45 52 54 20 4B 42 2E 20 36 20 4F 52 41 4E | MERT KB. 6 ORAN| 00000130: 20 4B 45 52 45 53 5A 54 55 4C 20 54 4F 4C 2D 0D | KERESZTUL TOL-.| 00000140: 3B 20 54 4F 54 54 20 41 20 CD 45 CD C2 45 D2 D3 |; TOTT A .E..E..| 00000150: D4 41 D4 55 D3 20 50 41 52 54 2E 2E 2E 20 3A 29 |.A.U. PART... :)| 00000160: 29 29 29 29 0D 3B 20 31 20 44 4F 4C 4F 47 52 41 |)))).; 1 DOLOGRA| 00000170: 20 46 49 47 59 45 4C 4A 20 3A 20 C8 C1 C7 D9 CA | FIGYELJ : .....| 00000180: 20 D3 DA D5 CE C5 D4 C5 D4 20 CB C5 D4 0D 3B 20 | ........ ....; | 00000190: C6 C9 CC C5 20 D4 CF CC D4 C5 D3 C5 20 CB CF DA |.... ....... ...| 000001A0: CF D4 D4 21 20 CB 42 2E 20 32 30 20 46 52 41 4D |...! .B. 20 FRAM| 000001B0: 45 20 45 4C 45 47 0D 3B 0D 3B 20 D5 4E 49 4E 53 |E ELEG.;.; .NINS| 000001C0: 54 41 4C 41 4C 4E 49 20 55 47 59 20 54 55 44 4F |TALALNI UGY TUDO| 000001D0: 44 2C 20 48 4F 47 59 20 41 20 54 4F 4C 54 45 53 |D, HOGY A TOLTES| 000001E0: 2D 0D 3B 20 4E 45 4C 20 41 5A 20 41 43 43 55 20 |-.; NEL AZ ACCU | 000001F0: 37 2E 20 42 49 54 4A 45 54 20 4D 41 47 41 53 52 |7. BITJET MAGASR| 00000200: 41 20 41 4C 4C 49 54 4F 44 21 0D 3B 0D 3B 20 D0 |A ALLITOD!.;.; .| 00000210: 4C 2E 20 3A 0D 3B 20 20 20 20 20 20 20 4C 44 41 |L. :.; LDA| 00000220: 20 23 25 31 30 30 30 30 30 30 30 0D 3B 20 20 20 | #%10000000.; | 00000230: 20 20 20 20 4A 53 52 20 4C 4F 41 44 0D 3B 0D 3B | JSR LOAD.;.;| 00000240: 0D 3B 20 CE 4F 52 4D 41 4C 20 49 52 51 20 4C 4F |.; .ORMAL IRQ LO| 00000250: 41 44 45 52 20 3A 0D 3B 0D 3B C0 C0 C0 C0 C0 C0 |ADER :.;.;......| 00000260: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000270: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000280: AE 0D 3B 49 52 51 2D 4C 4F 41 44 45 52 20 56 45 |..;IRQ-LOADER VE| 00000290: 52 53 49 4F 4E 20 56 32 2E 36 20 2F 20 32 33 2E |RSION V2.6 / 23.| 000002A0: 38 2E 31 39 39 35 20 20 20 DD 0D 3B C0 C0 C0 C0 |8.1995 ..;....| 000002B0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 000002C0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 000002D0: C0 C0 B3 0D 3B 28 43 29 43 4F 50 59 52 49 47 48 |....;(C)COPYRIGH| 000002E0: 54 20 42 59 20 4D 41 44 52 4F 4D 20 4F 46 20 43 |T BY MADROM OF C| 000002F0: 52 45 41 4D 20 31 39 39 35 20 20 DD 0D 3B C0 C0 |REAM 1995 ..;..| 00000300: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000310: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000320: C0 C0 C0 C0 BD 0D 3B 0D 3B 4A 53 52 20 49 4E 49 |......;.;JSR INI| 00000330: 54 20 20 3B 49 4E 49 54 0D 3B 4C 44 41 20 23 30 |T ;INIT.;LDA #0| 00000340: 20 4F 52 20 23 31 20 3B 49 46 20 41 2E 3D 31 20 | OR #1 ;IF A.=1 | 00000350: 54 48 45 4E 20 49 4E 20 58 2E 41 4E 44 20 59 2E |THEN IN X.AND Y.| 00000360: 0D 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 3B |.; ;| 00000370: 4D 55 53 54 20 42 45 20 54 48 45 20 4E 45 57 20 |MUST BE THE NEW | 00000380: 4C 4F 41 44 0D 3B 20 20 20 20 20 20 20 20 20 20 |LOAD.; | 00000390: 20 20 20 3B 41 44 52 45 53 53 0D 3B 4A 53 52 20 | ;ADRESS.;JSR | 000003A0: 53 45 54 41 44 52 0D 0D 3B 4C 44 41 20 23 30 20 |SETADR..;LDA #0 | 000003B0: 4F 52 20 23 31 20 3B 49 46 20 41 2E 3D 30 20 54 |OR #1 ;IF A.=0 T| 000003C0: 48 45 4E 20 49 4E 20 58 2E 20 41 4E 44 0D 3B 20 |HEN IN X. AND.; | 000003D0: 20 20 20 20 20 20 20 20 20 20 20 20 3B 59 2E 20 | ;Y. | 000003E0: 4D 55 53 54 20 42 45 20 54 48 45 20 46 49 52 53 |MUST BE THE FIRS| 000003F0: 54 20 32 0D 3B 20 20 20 20 20 20 20 20 20 20 20 |T 2.; | 00000400: 20 20 3B 43 48 41 52 53 20 4F 46 20 54 48 45 20 | ;CHARS OF THE | 00000410: 46 49 4C 45 20 4E 41 4D 45 0D 3B 20 20 20 20 20 |FILE NAME.; | 00000420: 20 20 20 20 20 20 20 20 3B 49 46 20 41 2E 3D 31 | ;IF A.=1| 00000430: 20 54 48 45 4E 20 49 4E 20 58 2E 20 41 4E 44 0D | THEN IN X. AND.| 00000440: 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 3B 59 |; ;Y| 00000450: 2E 20 4D 55 53 54 20 42 45 20 54 48 45 20 53 54 |. MUST BE THE ST| 00000460: 41 52 54 0D 3B 20 20 20 20 20 20 20 20 20 20 20 |ART.; | 00000470: 20 20 3B 54 52 41 43 4B 20 41 4E 44 20 53 45 43 | ;TRACK AND SEC| 00000480: 54 4F 52 0D 3B 4C 44 58 20 23 22 54 22 20 20 20 |TOR.;LDX #"T" | 00000490: 20 20 3B 31 2E 20 43 48 41 52 20 4F 46 20 46 49 | ;1. CHAR OF FI| 000004A0: 4C 45 4E 41 4D 45 0D 3B 20 20 20 20 20 20 20 20 |LENAME.; | 000004B0: 20 20 20 20 20 3B 4F 52 20 54 52 41 43 4B 20 4E | ;OR TRACK N| 000004C0: 4F 2E 0D 3B 4C 44 59 20 23 22 43 22 20 20 20 20 |O..;LDY #"C" | 000004D0: 20 3B 32 2E 20 43 48 41 52 20 4F 46 20 46 49 4C | ;2. CHAR OF FIL| 000004E0: 45 4E 41 4D 45 0D 3B 20 20 20 20 20 20 20 20 20 |ENAME.; | 000004F0: 20 20 20 20 3B 4F 52 20 53 45 43 54 4F 52 20 4E | ;OR SECTOR N| 00000500: 4F 2E 0D 3B 4A 53 52 20 4C 4F 41 44 0D 3B 42 43 |O..;JSR LOAD.;BC| 00000510: 53 20 45 52 52 4F 52 20 20 20 20 3B 49 46 20 43 |S ERROR ;IF C| 00000520: 41 52 52 59 3D 2E 53 45 43 20 54 48 45 4E 20 45 |ARRY=.SEC THEN E| 00000530: 52 52 4F 52 0D 3B 52 54 53 0D 3B 0D 3B 54 48 49 |RROR.;RTS.;.;THI| 00000540: 53 20 56 45 52 53 49 4F 4E 20 43 41 4E 20 4C 4F |S VERSION CAN LO| 00000550: 41 44 20 45 56 45 52 59 20 46 49 4C 45 20 54 59 |AD EVERY FILE TY| 00000560: 50 45 0D 3B 28 50 52 47 2C 53 45 51 2C 55 53 45 |PE.;(PRG,SEQ,USE| 00000570: 2C 44 45 4C 2C 52 45 4C 2C 2E 2E 2E 29 0D 3B 0D |,DEL,REL,...).;.| 00000580: 3B 0D 3B C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |;.;.............| 00000590: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 000005A0: C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 0D 3B 49 52 51 2D |...........;IRQ-| 000005B0: 4C 4F 41 44 45 52 20 56 45 52 53 49 4F 4E 20 56 |LOADER VERSION V| 000005C0: 32 2E 36 20 2F 20 32 35 2E 38 2E 31 39 39 35 20 |2.6 / 25.8.1995 | 000005D0: 20 20 DD 0D 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ..;-----------| 000005E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000005F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D DD 0D 3B 44 45 |-----------..;DE| 00000600: 43 52 55 53 48 49 4E 47 20 57 48 49 4C 45 20 4C |CRUSHING WHILE L| 00000610: 4F 41 44 49 4E 47 20 57 49 54 48 20 53 50 45 45 |OADING WITH SPEE| 00000620: 44 2F 58 20 DD 0D 3B 41 4C 4C 20 43 52 55 4E 43 |D/X ..;ALL CRUNC| 00000630: 48 20 53 50 45 45 44 53 20 28 31 2D 36 29 20 41 |H SPEEDS (1-6) A| 00000640: 52 45 20 41 4C 4C 4F 57 45 44 20 21 20 DD 0D 3B |RE ALLOWED ! ..;| 00000650: 4F 4E 4C 59 20 54 4F 20 55 53 45 20 57 49 54 48 |ONLY TO USE WITH| 00000660: 20 4C 45 56 45 4C 2D 43 52 55 53 48 45 52 20 42 | LEVEL-CRUSHER B| 00000670: 59 20 4D 4D 53 20 DD 0D 3B 2D 2D 2D 2D 2D 2D 2D |Y MMS ..;-------| 00000680: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000690: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D DD |---------------.| 000006A0: 0D 3B 28 43 29 43 4F 50 59 52 49 47 48 54 20 42 |.;(C)COPYRIGHT B| 000006B0: 59 20 4D 41 44 52 4F 4D 20 4F 46 20 43 52 45 41 |Y MADROM OF CREA| 000006C0: 4D 20 31 39 39 35 20 20 DD 0D 3B 44 45 43 52 55 |M 1995 ..;DECRU| 000006D0: 53 48 45 52 20 52 4F 55 54 49 4E 45 20 43 4F 44 |SHER ROUTINE COD| 000006E0: 45 44 20 42 59 20 4D 4D 53 2F 54 41 42 4F 4F 20 |ED BY MMS/TABOO | 000006F0: 20 DD 0D 3B C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 | ..;............| 00000700: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000710: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 BD 0D 3B 0D 3B 0D |............;.;.| 00000720: 3B 4C 44 41 20 23 31 20 2D 20 23 36 20 20 3B 53 |;LDA #1 - #6 ;S| 00000730: 45 54 20 53 50 45 45 44 20 57 49 54 48 20 54 48 |ET SPEED WITH TH| 00000740: 45 20 46 49 4C 45 0D 3B 4A 53 52 20 53 45 54 53 |E FILE.;JSR SETS| 00000750: 50 44 20 20 20 3B 57 41 53 20 43 52 55 4E 43 48 |PD ;WAS CRUNCH| 00000760: 45 44 20 28 31 2D 36 29 0D 3B 0D 3B 4C 44 41 20 |ED (1-6).;.;LDA | 00000770: 23 30 20 4F 52 20 23 31 20 3B 49 46 20 41 2E 3D |#0 OR #1 ;IF A.=| 00000780: 30 20 54 48 45 4E 20 49 4E 20 58 2E 20 41 4E 44 |0 THEN IN X. AND| 00000790: 0D 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 3B |.; ;| 000007A0: 59 2E 20 4D 55 53 54 20 42 45 20 54 48 45 20 46 |Y. MUST BE THE F| 000007B0: 49 52 53 54 20 32 0D 3B 20 20 20 20 20 20 20 20 |IRST 2.; | 000007C0: 20 20 20 20 20 3B 43 48 41 52 53 20 4F 46 20 54 | ;CHARS OF T| 000007D0: 48 45 20 46 49 4C 45 20 4E 41 4D 45 0D 3B 20 20 |HE FILE NAME.; | 000007E0: 20 20 20 20 20 20 20 20 20 20 20 3B 49 46 20 41 | ;IF A| 000007F0: 2E 3D 31 20 54 48 45 4E 20 49 4E 20 58 2E 20 41 |.=1 THEN IN X. A| 00000800: 4E 44 0D 3B 20 20 20 20 20 20 20 20 20 20 20 20 |ND.; | 00000810: 20 3B 59 2E 20 4D 55 53 54 20 42 45 20 54 48 45 | ;Y. MUST BE THE| 00000820: 20 53 54 41 52 54 0D 3B 20 20 20 20 20 20 20 20 | START.; | 00000830: 20 20 20 20 20 3B 54 52 41 43 4B 20 41 4E 44 20 | ;TRACK AND | 00000840: 53 45 43 54 4F 52 0D 3B 4C 44 58 20 23 22 54 22 |SECTOR.;LDX #"T"| 00000850: 20 20 20 20 20 3B 31 2E 20 43 48 41 52 20 4F 46 | ;1. CHAR OF| 00000860: 20 46 49 4C 45 4E 41 4D 45 0D 3B 20 20 20 20 20 | FILENAME.; | 00000870: 20 20 20 20 20 20 20 20 3B 4F 52 20 54 52 41 43 | ;OR TRAC| 00000880: 4B 20 4E 4F 2E 0D 3B 4C 44 59 20 23 22 43 22 20 |K NO..;LDY #"C" | 00000890: 20 20 20 20 3B 32 2E 20 43 48 41 52 20 4F 46 20 | ;2. CHAR OF | 000008A0: 46 49 4C 45 4E 41 4D 45 0D 3B 20 20 20 20 20 20 |FILENAME.; | 000008B0: 20 20 20 20 20 20 20 3B 4F 52 20 53 45 43 54 4F | ;OR SECTO| 000008C0: 52 20 4E 4F 2E 0D 3B 4A 53 52 20 4C 4F 41 44 44 |R NO..;JSR LOADD| 000008D0: 43 52 0D 3B 42 43 53 20 45 52 52 4F 52 20 20 20 |CR.;BCS ERROR | 000008E0: 20 3B 49 46 20 43 41 52 52 59 3D 2E 53 45 43 20 | ;IF CARRY=.SEC | 000008F0: 54 48 45 4E 20 45 52 52 4F 52 0D 3B 52 54 53 0D |THEN ERROR.;RTS.| 00000900: 3B 0D 3B 54 48 49 53 20 56 45 52 53 49 4F 4E 20 |;.;THIS VERSION | 00000910: 43 41 4E 20 4C 4F 41 44 20 45 56 45 52 59 20 46 |CAN LOAD EVERY F| 00000920: 49 4C 45 20 54 59 50 45 0D 3B 28 50 52 47 2C 53 |ILE TYPE.;(PRG,S| 00000930: 45 51 2C 55 53 45 2C 44 45 4C 2C 52 45 4C 2C 2E |EQ,USE,DEL,REL,.| 00000940: 2E 2E 29 0D 3B 0D 3B 0D 0D 49 4C 31 20 20 20 20 |..).;.;..IL1 | 00000950: 20 20 3D 20 24 42 32 0D 49 4C 32 20 20 20 20 20 | = $B2.IL2 | 00000960: 20 3D 20 24 42 33 0D 49 4C 33 20 20 20 20 20 20 | = $B3.IL3 | 00000970: 3D 20 24 42 34 0D 49 4C 34 20 20 20 20 20 20 3D |= $B4.IL4 =| 00000980: 20 24 42 35 0D 49 4C 35 20 20 20 20 20 20 3D 20 | $B5.IL5 = | 00000990: 24 42 36 0D 0D 4C 4F 41 44 0D 20 20 20 20 20 20 |$B6..LOAD. | 000009A0: 20 20 20 53 54 58 20 24 42 42 0D 20 20 20 20 20 | STX $BB. | 000009B0: 20 20 20 20 53 54 59 20 24 42 43 0D 20 20 20 20 | STY $BC. | 000009C0: 20 20 20 20 20 53 54 41 20 4C 4F 41 44 4D 4F 44 | STA LOADMOD| 000009D0: 45 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 24 |E. LDA $| 000009E0: 44 44 30 30 0D 20 20 20 20 20 20 20 20 20 41 4E |DD00. AN| 000009F0: 44 20 23 24 30 46 0D 20 20 20 20 20 20 20 20 20 |D #$0F. | 00000A00: 53 54 41 20 49 4C 31 0D 20 20 20 20 20 20 20 20 |STA IL1. | 00000A10: 20 4C 44 58 20 23 30 0D 4C 41 44 32 0D 20 20 20 | LDX #0.LAD2. | 00000A20: 20 20 20 20 20 20 45 4F 52 20 49 4C 54 41 42 2C | EOR ILTAB,| 00000A30: 58 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 49 |X. STA I| 00000A40: 4C 32 2C 58 0D 20 20 20 20 20 20 20 20 20 49 4E |L2,X. IN| 00000A50: 58 0D 20 20 20 20 20 20 20 20 20 43 50 58 20 23 |X. CPX #| 00000A60: 34 0D 20 20 20 20 20 20 20 20 20 42 4E 45 20 4C |4. BNE L| 00000A70: 41 44 32 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 |AD2.. LD| 00000A80: 41 20 49 4C 33 0D 20 20 20 20 20 20 20 20 20 53 |A IL3. S| 00000A90: 54 41 20 24 44 44 30 30 0D 20 20 20 20 20 20 20 |TA $DD00. | 00000AA0: 20 20 4A 53 52 20 4E 57 41 49 54 0D 20 20 20 20 | JSR NWAIT. | 00000AB0: 20 20 20 20 20 4C 44 41 20 24 42 42 0D 20 20 20 | LDA $BB. | 00000AC0: 20 20 20 20 20 20 4A 53 52 20 53 45 4E 44 42 0D | JSR SENDB.| 00000AD0: 20 20 20 20 20 20 20 20 20 4C 44 41 20 24 42 43 | LDA $BC| 00000AE0: 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 53 45 |. JSR SE| 00000AF0: 4E 44 42 0D 4C 4F 41 44 4D 4F 44 45 20 3D 20 2A |NDB.LOADMODE = *| 00000B00: 2B 31 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 |+1. LDA | 00000B10: 23 30 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 |#0. JSR | 00000B20: 53 45 4E 44 42 0D 0D 20 20 20 20 20 20 20 20 20 |SENDB.. | 00000B30: 42 49 54 20 4C 4F 41 44 4D 4F 44 45 0D 20 20 20 |BIT LOADMODE. | 00000B40: 20 20 20 20 20 20 42 4D 49 20 46 49 4C 45 45 4E | BMI FILEEN| 00000B50: 44 0D 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 |D.. JSR | 00000B60: 4E 57 41 49 54 0D 20 20 20 20 20 20 20 20 20 4A |NWAIT. J| 00000B70: 53 52 20 47 45 54 42 59 54 45 0D 41 44 52 4C 4F |SR GETBYTE.ADRLO| 00000B80: 57 20 20 20 53 54 41 20 24 41 45 0D 20 20 20 20 |W STA $AE. | 00000B90: 20 20 20 20 20 4A 53 52 20 47 45 54 42 59 54 45 | JSR GETBYTE| 00000BA0: 0D 41 44 52 48 49 47 48 20 20 53 54 41 20 24 41 |.ADRHIGH STA $A| 00000BB0: 46 0D 4E 45 58 54 42 59 54 45 0D 20 20 20 20 20 |F.NEXTBYTE. | 00000BC0: 20 20 20 20 4A 53 52 20 47 45 54 42 59 54 45 0D | JSR GETBYTE.| 00000BD0: 20 20 20 20 20 20 20 20 20 43 4D 50 20 23 24 39 | CMP #$9| 00000BE0: 39 0D 20 20 20 20 20 20 20 20 20 42 4E 45 20 53 |9. BNE S| 00000BF0: 45 54 42 59 54 45 41 0D 20 20 20 20 20 20 20 20 |ETBYTEA. | 00000C00: 20 4A 53 52 20 47 45 54 42 59 54 45 0D 20 20 20 | JSR GETBYTE. | 00000C10: 20 20 20 20 20 20 43 4D 50 20 23 24 39 39 0D 20 | CMP #$99. | 00000C20: 20 20 20 20 20 20 20 20 42 45 51 20 53 45 54 42 | BEQ SETB| 00000C30: 59 54 45 41 0D 20 20 20 20 20 20 20 20 20 43 4D |YTEA. CM| 00000C40: 50 20 23 24 46 46 0D 20 20 20 20 20 20 20 20 20 |P #$FF. | 00000C50: 42 45 51 20 46 49 4C 45 45 4E 44 0D 20 20 20 20 |BEQ FILEEND. | 00000C60: 20 20 20 20 20 43 4D 50 20 23 24 46 45 0D 20 20 | CMP #$FE. | 00000C70: 20 20 20 20 20 20 20 42 45 51 20 44 52 56 45 52 | BEQ DRVER| 00000C80: 52 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 4E |R. JSR N| 00000C90: 57 41 49 54 0D 20 20 20 20 20 20 20 20 20 4A 4D |WAIT. JM| 00000CA0: 50 20 4E 45 58 54 42 59 54 45 0D 44 52 56 45 52 |P NEXTBYTE.DRVER| 00000CB0: 52 0D 20 20 20 20 20 20 20 20 20 53 45 43 0D 20 |R. SEC. | 00000CC0: 20 20 20 20 20 20 20 20 52 54 53 0D 53 45 54 42 | RTS.SETB| 00000CD0: 59 54 45 41 0D 20 20 20 20 20 20 20 20 20 4C 44 |YTEA. LD| 00000CE0: 59 20 23 30 0D 20 20 20 20 20 20 20 20 20 53 54 |Y #0. ST| 00000CF0: 41 20 28 24 41 45 29 2C 59 0D 0D 20 20 20 20 20 |A ($AE),Y.. | 00000D00: 20 20 20 20 49 4E 43 20 24 41 45 0D 20 20 20 20 | INC $AE. | 00000D10: 20 20 20 20 20 42 4E 45 20 53 45 54 42 32 41 0D | BNE SETB2A.| 00000D20: 20 20 20 20 20 20 20 20 20 49 4E 43 20 24 41 46 | INC $AF| 00000D30: 0D 53 45 54 42 32 41 20 20 20 42 4E 45 20 4E 45 |.SETB2A BNE NE| 00000D40: 58 54 42 59 54 45 0D 46 49 4C 45 45 4E 44 0D 20 |XTBYTE.FILEEND. | 00000D50: 20 20 20 20 20 20 20 20 43 4C 43 0D 20 20 20 20 | CLC. | 00000D60: 20 20 20 20 20 52 54 53 0D 0D 3B 20 2D 2D 2D 2D | RTS..; ----| 00000D70: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000D80: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000D90: 2D 2D 0D 3B 20 2D 20 C9 4E 4E 45 4E 54 4F 4C 20 |--.; - .NNENTOL | 00000DA0: 56 41 4E 20 4B 42 2E 20 41 20 36 34 2D 42 45 4E |VAN KB. A 64-BEN| 00000DB0: 20 46 55 54 4F 20 52 45 53 5A 0D 3B 20 2D 20 4C | FUTO RESZ.; - L| 00000DC0: 45 4C 4B 45 2E 2E 2E 0D 3B 20 2D 2D 2D 2D 2D 2D |ELKE....; ------| 00000DD0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000DE0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000DF0: 0D 0D 4E 57 41 49 54 20 20 20 20 4C 44 58 20 23 |..NWAIT LDX #| 00000E00: 24 33 38 20 20 20 20 3B 20 C9 54 54 20 56 4F 4C |$38 ; .TT VOL| 00000E10: 54 20 41 20 48 49 42 41 21 0D 4E 57 31 20 20 20 |T A HIBA!.NW1 | 00000E20: 20 20 20 44 45 58 20 20 20 20 20 20 20 20 20 3B | DEX ;| 00000E30: 20 D4 55 4C 20 4B 45 56 45 53 20 56 4F 4C 54 20 | .UL KEVES VOLT | 00000E40: 41 0D 20 20 20 20 20 20 20 20 20 42 4E 45 20 4E |A. BNE N| 00000E50: 57 31 20 20 20 20 20 3B 20 56 41 52 41 4B 4F 5A |W1 ; VARAKOZ| 00000E60: 41 53 2E 2E 2E 0D 4E 57 32 20 20 20 20 20 20 42 |AS....NW2 B| 00000E70: 49 54 20 24 44 44 30 30 20 20 20 3B 20 31 20 28 |IT $DD00 ; 1 (| 00000E80: 21 29 20 43 49 4B 4C 55 53 53 41 4C 0D 20 20 20 |!) CIKLUSSAL. | 00000E90: 20 20 20 20 20 20 42 56 43 20 4E 57 32 20 20 20 | BVC NW2 | 00000EA0: 20 20 3B 20 4B 45 56 45 53 45 42 42 2C 20 41 4D | ; KEVESEBB, AM| 00000EB0: 49 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 |I. LDX #| 00000EC0: 24 30 38 20 20 20 20 3B 20 43 53 41 4B 20 4E 45 |$08 ; CSAK NE| 00000ED0: 48 41 20 4A 4F 54 54 0D 4E 57 33 20 20 20 20 20 |HA JOTT.NW3 | 00000EE0: 20 44 45 58 20 20 20 20 20 20 20 20 20 3B 20 4B | DEX ; K| 00000EF0: 49 2E 2E 2E 20 CE 45 20 54 55 44 44 20 4D 45 47 |I... .E TUDD MEG| 00000F00: 0D 20 20 20 20 20 20 20 20 20 42 4E 45 20 4E 57 |. BNE NW| 00000F10: 33 20 20 20 20 20 3B 20 4D 49 52 45 20 52 41 4A |3 ; MIRE RAJ| 00000F20: 4F 54 54 45 4D 2E 2E 2E 0D 20 20 20 20 20 20 20 |OTTEM.... | 00000F30: 20 20 52 54 53 20 20 20 20 20 20 20 20 20 3B 20 | RTS ; | 00000F40: CD 4F 53 54 20 45 47 59 20 50 49 43 49 54 0D 20 |.OST EGY PICIT. | 00000F50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000F60: 20 20 20 20 3B 20 54 4F 42 42 45 54 20 4B 45 4C | ; TOBBET KEL| 00000F70: 4C 20 56 41 52 4E 49 0D 20 20 20 20 20 20 20 20 |L VARNI. | 00000F80: 20 20 20 20 20 20 20 20 20 20 20 20 20 3B 20 4D | ; M| 00000F90: 45 52 54 20 41 54 49 52 54 41 4D 20 41 0D 20 20 |ERT ATIRTAM A. | 00000FA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000FB0: 20 20 20 3B 20 44 52 49 56 45 42 41 4E 20 46 55 | ; DRIVEBAN FU| 00000FC0: 54 4F 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |TO. | 00000FD0: 20 20 20 20 20 20 20 20 3B 20 52 45 53 5A 54 21 | ; RESZT!| 00000FE0: 21 21 0D 0D 53 45 54 41 44 52 0D 20 20 20 20 20 |!!..SETADR. | 00000FF0: 20 20 20 20 42 4E 45 20 53 45 54 41 44 52 4E 45 | BNE SETADRNE| 00001000: 55 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 |U. LDA #| 00001010: 24 38 35 0D 20 20 20 20 20 20 20 20 20 53 54 41 |$85. STA| 00001020: 20 41 44 52 4C 4F 57 0D 20 20 20 20 20 20 20 20 | ADRLOW. | 00001030: 20 53 54 41 20 41 44 52 48 49 47 48 0D 20 20 20 | STA ADRHIGH. | 00001040: 20 20 20 20 20 20 52 54 53 0D 53 45 54 41 44 52 | RTS.SETADR| 00001050: 4E 45 55 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |NEU. LDA| 00001060: 20 23 24 32 34 20 3B 42 49 54 0D 20 20 20 20 20 | #$24 ;BIT. | 00001070: 20 20 20 20 53 54 41 20 41 44 52 4C 4F 57 0D 20 | STA ADRLOW. | 00001080: 20 20 20 20 20 20 20 20 53 54 41 20 41 44 52 48 | STA ADRH| 00001090: 49 47 48 0D 20 20 20 20 20 20 20 20 20 53 54 58 |IGH. STX| 000010A0: 20 24 41 45 0D 20 20 20 20 20 20 20 20 20 53 54 | $AE. ST| 000010B0: 59 20 24 41 46 0D 20 20 20 20 20 20 20 20 20 52 |Y $AF. R| 000010C0: 54 53 0D 0D 49 4E 49 54 0D 20 20 20 20 20 20 20 |TS..INIT. | 000010D0: 20 20 4C 44 41 20 23 3C 44 52 56 50 52 47 0D 20 | LDA #<DRVPRG. | 000010E0: 20 20 20 20 20 20 20 20 4C 44 58 20 23 3E 44 52 | LDX #>DR| 000010F0: 56 50 52 47 0D 20 20 20 20 20 20 20 20 20 53 54 |VPRG. ST| 00001100: 41 20 24 46 42 0D 20 20 20 20 20 20 20 20 20 53 |A $FB. S| 00001110: 54 58 20 24 46 43 0D 20 20 20 20 20 20 20 20 20 |TX $FC. | 00001120: 4C 44 41 20 23 3C 24 30 34 30 30 0D 20 20 20 20 |LDA #<$0400. | 00001130: 20 20 20 20 20 4C 44 58 20 23 3E 24 30 34 30 30 | LDX #>$0400| 00001140: 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 41 |. STA $A| 00001150: 39 0D 20 20 20 20 20 20 20 20 20 53 54 58 20 24 |9. STX $| 00001160: 41 41 0D 49 4E 49 54 32 0D 20 20 20 20 20 20 20 |AA.INIT2. | 00001170: 20 20 4A 53 52 20 44 52 56 4D 4F 44 0D 20 20 20 | JSR DRVMOD. | 00001180: 20 20 20 20 20 20 4C 44 41 20 23 22 57 22 0D 20 | LDA #"W". | 00001190: 20 20 20 20 20 20 20 20 4C 44 58 20 24 41 39 0D | LDX $A9.| 000011A0: 20 20 20 20 20 20 20 20 20 4C 44 59 20 24 41 41 | LDY $AA| 000011B0: 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 42 59 |. JSR BY| 000011C0: 54 53 33 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |TS3. LDA| 000011D0: 20 23 24 32 30 0D 20 20 20 20 20 20 20 20 20 4A | #$20. J| 000011E0: 53 52 20 24 45 44 44 44 0D 20 20 20 20 20 20 20 |SR $EDDD. | 000011F0: 20 20 54 41 58 0D 20 20 20 20 20 20 20 20 20 44 | TAX. D| 00001200: 45 58 0D 20 20 20 20 20 20 20 20 20 4C 44 59 20 |EX. LDY | 00001210: 23 24 30 30 0D 4D 57 31 20 20 20 20 20 20 4C 44 |#$00.MW1 LD| 00001220: 41 20 28 24 46 42 29 2C 59 0D 20 20 20 20 20 20 |A ($FB),Y. | 00001230: 20 20 20 4A 53 52 20 24 45 44 44 44 0D 20 20 20 | JSR $EDDD. | 00001240: 20 20 20 20 20 20 49 4E 43 20 24 46 42 0D 20 20 | INC $FB. | 00001250: 20 20 20 20 20 20 20 42 4E 45 20 4D 57 32 0D 20 | BNE MW2. | 00001260: 20 20 20 20 20 20 20 20 49 4E 43 20 24 46 43 0D | INC $FC.| 00001270: 4D 57 32 20 20 20 20 20 20 44 45 58 0D 20 20 20 |MW2 DEX. | 00001280: 20 20 20 20 20 20 42 50 4C 20 4D 57 31 0D 20 20 | BPL MW1. | 00001290: 20 20 20 20 20 20 20 4A 53 52 20 24 45 44 46 45 | JSR $EDFE| 000012A0: 0D 20 20 20 20 20 20 20 20 20 43 4C 43 0D 20 20 |. CLC. | 000012B0: 20 20 20 20 20 20 20 4C 44 41 20 24 41 39 0D 20 | LDA $A9. | 000012C0: 20 20 20 20 20 20 20 20 41 44 43 20 23 24 32 30 | ADC #$20| 000012D0: 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 41 |. STA $A| 000012E0: 39 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 24 |9. LDA $| 000012F0: 41 41 0D 20 20 20 20 20 20 20 20 20 41 44 43 20 |AA. ADC | 00001300: 23 30 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |#0. STA | 00001310: 24 41 41 0D 20 20 20 20 20 20 20 20 20 43 4D 50 |$AA. CMP| 00001320: 20 23 24 30 38 0D 20 20 20 20 20 20 20 20 20 42 | #$08. B| 00001330: 4E 45 20 49 4E 49 54 32 0D 20 20 20 20 20 20 20 |NE INIT2. | 00001340: 20 20 4A 53 52 20 44 52 56 4D 4F 44 0D 20 20 20 | JSR DRVMOD. | 00001350: 20 20 20 20 20 20 4C 44 41 20 23 22 45 22 0D 20 | LDA #"E". | 00001360: 20 20 20 20 20 20 20 20 4C 44 58 20 23 3C 24 30 | LDX #<$0| 00001370: 34 30 30 0D 20 20 20 20 20 20 20 20 20 4C 44 59 |400. LDY| 00001380: 20 23 3E 24 30 34 30 30 0D 20 20 20 20 20 20 20 | #>$0400. | 00001390: 20 20 4A 53 52 20 42 59 54 53 33 0D 20 20 20 20 | JSR BYTS3. | 000013A0: 20 20 20 20 20 4A 53 52 20 24 45 44 46 45 0D 57 | JSR $EDFE.W| 000013B0: 41 49 54 45 52 0D 20 20 20 20 20 20 20 20 20 4C |AITER. L| 000013C0: 44 41 20 23 24 43 37 0D 20 20 20 20 20 20 20 20 |DA #$C7. | 000013D0: 20 53 54 41 20 24 44 44 30 30 0D 20 20 20 20 20 | STA $DD00. | 000013E0: 20 20 20 20 54 41 58 0D 57 41 49 54 31 0D 20 20 | TAX.WAIT1. | 000013F0: 20 20 20 20 20 20 20 50 48 41 0D 20 20 20 20 20 | PHA. | 00001400: 20 20 20 20 50 4C 41 0D 20 20 20 20 20 20 20 20 | PLA. | 00001410: 20 44 45 58 0D 20 20 20 20 20 20 20 20 20 42 4E | DEX. BN| 00001420: 45 20 57 41 49 54 31 0D 20 20 20 20 20 20 20 20 |E WAIT1. | 00001430: 20 52 54 53 0D 44 52 56 4D 4F 44 0D 20 20 20 20 | RTS.DRVMOD. | 00001440: 20 20 20 20 20 4C 44 41 20 23 38 0D 20 20 20 20 | LDA #8. | 00001450: 20 20 20 20 20 4A 53 52 20 24 45 44 30 43 0D 20 | JSR $ED0C. | 00001460: 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 36 46 | LDA #$6F| 00001470: 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 24 45 |. JSR $E| 00001480: 44 42 39 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |DB9. LDA| 00001490: 20 23 22 4D 22 0D 20 20 20 20 20 20 20 20 20 4C | #"M". L| 000014A0: 44 59 20 23 22 2D 22 0D 20 20 20 20 20 20 20 20 |DY #"-". | 000014B0: 20 4A 4D 50 20 42 59 54 53 32 0D 42 59 54 53 33 | JMP BYTS2.BYTS3| 000014C0: 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 24 45 |. JSR $E| 000014D0: 44 44 44 0D 20 20 20 20 20 20 20 20 20 54 58 41 |DDD. TXA| 000014E0: 0D 42 59 54 53 32 0D 20 20 20 20 20 20 20 20 20 |.BYTS2. | 000014F0: 4A 53 52 20 24 45 44 44 44 0D 20 20 20 20 20 20 |JSR $EDDD. | 00001500: 20 20 20 54 59 41 0D 20 20 20 20 20 20 20 20 20 | TYA. | 00001510: 4A 4D 50 20 24 45 44 44 44 0D 0D 47 45 54 42 59 |JMP $EDDD..GETBY| 00001520: 54 45 0D 20 20 20 20 20 20 20 20 20 4C 44 59 20 |TE. LDY | 00001530: 23 33 0D 0D 49 4C 34 42 20 20 20 20 20 4C 44 58 |#3..IL4B LDX| 00001540: 20 49 4C 34 0D 20 20 20 20 20 20 20 20 20 4C 44 | IL4. LD| 00001550: 41 20 24 44 44 30 30 0D 20 20 20 20 20 20 20 20 |A $DD00. | 00001560: 20 53 54 58 20 24 44 44 30 30 0D 20 20 20 20 20 | STX $DD00. | 00001570: 20 20 20 20 41 53 4C 20 41 0D 20 20 20 20 20 20 | ASL A. | 00001580: 20 20 20 4C 44 58 20 23 37 0D 49 4C 34 43 0D 20 | LDX #7.IL4C. | 00001590: 20 20 20 20 20 20 20 20 44 45 58 0D 20 20 20 20 | DEX. | 000015A0: 20 20 20 20 20 42 4E 45 20 49 4C 34 43 0D 20 20 | BNE IL4C. | 000015B0: 20 20 20 20 20 20 20 52 4F 52 20 24 42 44 0D 20 | ROR $BD. | 000015C0: 20 20 20 20 20 20 20 20 4C 44 58 20 49 4C 35 0D | LDX IL5.| 000015D0: 20 20 20 20 20 20 20 20 20 4C 44 41 20 24 44 44 | LDA $DD| 000015E0: 30 30 0D 20 20 20 20 20 20 20 20 20 53 54 58 20 |00. STX | 000015F0: 24 44 44 30 30 0D 20 20 20 20 20 20 20 20 20 41 |$DD00. A| 00001600: 53 4C 20 41 0D 20 20 20 20 20 20 20 20 20 52 4F |SL A. RO| 00001610: 52 20 24 42 44 0D 20 20 20 20 20 20 20 20 20 44 |R $BD. D| 00001620: 45 59 0D 20 20 20 20 20 20 20 20 20 42 50 4C 20 |EY. BPL | 00001630: 49 4C 34 42 0D 20 20 20 20 20 20 20 20 20 4C 44 |IL4B. LD| 00001640: 41 20 24 42 44 0D 20 20 20 20 20 20 20 20 20 52 |A $BD. R| 00001650: 54 53 0D 53 45 4E 44 42 0D 20 20 20 20 20 20 20 |TS.SENDB. | 00001660: 20 20 53 54 41 20 24 42 44 0D 20 20 20 20 20 20 | STA $BD. | 00001670: 20 20 20 4C 44 59 20 23 33 0D 53 45 4E 44 42 32 | LDY #3.SENDB2| 00001680: 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 49 4C |. JSR IL| 00001690: 32 42 0D 20 20 20 20 20 20 20 20 20 44 45 59 0D |2B. DEY.| 000016A0: 20 20 20 20 20 20 20 20 20 42 50 4C 20 53 45 4E | BPL SEN| 000016B0: 44 42 32 0D 20 20 20 20 20 20 20 20 20 52 54 53 |DB2. RTS| 000016C0: 0D 0D 49 4C 32 42 20 20 20 20 20 4C 44 41 20 49 |..IL2B LDA I| 000016D0: 4C 32 0D 20 20 20 20 20 20 20 20 20 4C 53 52 20 |L2. LSR | 000016E0: 24 42 44 0D 20 20 20 20 20 20 20 20 20 42 43 43 |$BD. BCC| 000016F0: 20 49 4C 32 43 0D 20 20 20 20 20 20 20 20 20 4F | IL2C. O| 00001700: 52 41 20 23 24 32 30 0D 49 4C 32 43 20 20 20 20 |RA #$20.IL2C | 00001710: 20 53 54 41 20 24 44 44 30 30 0D 20 20 20 20 20 | STA $DD00. | 00001720: 20 20 20 20 4C 44 41 20 49 4C 31 0D 20 20 20 20 | LDA IL1. | 00001730: 20 20 20 20 20 4C 53 52 20 24 42 44 0D 20 20 20 | LSR $BD. | 00001740: 20 20 20 20 20 20 42 43 43 20 49 4C 32 44 0D 20 | BCC IL2D. | 00001750: 20 20 20 20 20 20 20 20 4F 52 41 20 23 24 32 30 | ORA #$20| 00001760: 0D 49 4C 32 44 20 20 20 20 20 53 54 41 20 24 44 |.IL2D STA $D| 00001770: 44 30 30 0D 20 20 20 20 20 20 20 20 20 52 54 53 |D00. RTS| 00001780: 0D 49 4C 54 41 42 0D 20 20 20 20 20 20 20 20 20 |.ILTAB. | 00001790: 2E 42 59 54 45 20 24 31 30 2C 24 33 30 2C 24 42 |.BYTE $10,$30,$B| 000017A0: 30 2C 24 35 30 0D 0D 3B 20 2D 2D 2D 2D 2D 2D 2D |0,$50..; -------| 000017B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000017C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D |---------------.| 000017D0: 3B 20 2D 20 45 5A 20 49 54 54 45 4E 20 41 20 44 |; - EZ ITTEN A D| 000017E0: 52 49 56 45 42 41 4E 20 46 55 54 4F 20 52 45 53 |RIVEBAN FUTO RES| 000017F0: 5A 2C 20 45 47 59 0D 3B 20 2D 20 50 49 43 49 54 |Z, EGY.; - PICIT| 00001800: 20 41 54 49 52 56 41 2E 2E 2E 20 28 D0 4C 2E 20 | ATIRVA... (.L. | 00001810: D5 4E 49 4E 53 54 41 4C 4C 29 0D 3B 20 2D 2D 2D |.NINSTALL).; ---| 00001820: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00001830: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00001840: 2D 2D 2D 0D 3B 20 2D 20 45 5A 20 4D 49 4E 44 49 |---.; - EZ MINDI| 00001850: 47 28 21 29 20 55 47 59 41 4E 41 5A 2C 20 4C 4F |G(!) UGYANAZ, LO| 00001860: 41 44 4E 41 4C 20 45 53 0D 3B 20 2D 20 44 45 43 |ADNAL ES.; - DEC| 00001870: 52 55 4E 43 48 4E 41 4C 20 49 53 21 0D 3B 20 2D |RUNCHNAL IS!.; -| 00001880: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00001890: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000018A0: 2D 2D 2D 2D 2D 0D 0D 44 52 56 50 52 47 0D 44 56 |-----..DRVPRG.DV| 000018B0: 50 31 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 |P1. LDA | 000018C0: 24 31 43 30 30 0D 20 20 20 20 20 20 20 20 20 41 |$1C00. A| 000018D0: 4E 44 20 23 24 46 37 0D 20 20 20 20 20 20 20 20 |ND #$F7. | 000018E0: 20 53 54 41 20 24 31 43 30 30 0D 3B 44 56 50 31 | STA $1C00.;DVP1| 000018F0: 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 24 31 |. LDA $1| 00001900: 38 30 30 0D 20 20 20 20 20 20 20 20 20 41 4E 44 |800. AND| 00001910: 20 23 35 0D 20 20 20 20 20 20 20 20 20 42 4E 45 | #5. BNE| 00001920: 20 44 56 50 31 0D 0D 20 20 20 20 20 20 20 20 20 | DVP1.. | 00001930: 4A 53 52 20 44 56 50 38 42 2D 44 52 56 50 52 47 |JSR DVP8B-DRVPRG| 00001940: 2B 24 30 34 30 30 0D 0D 3B C0 C0 C0 3E 20 53 45 |+$0400..;...> SE| 00001950: 41 52 43 48 20 49 4E 20 44 49 52 20 46 4F 52 20 |ARCH IN DIR FOR | 00001960: 46 49 4C 45 4E 41 4D 45 0D 0D 20 20 20 20 20 20 |FILENAME.. | 00001970: 20 20 20 4C 44 59 20 23 31 0D 44 56 50 32 20 20 | LDY #1.DVP2 | 00001980: 20 20 20 4C 44 58 20 23 31 38 0D 20 20 20 20 20 | LDX #18. | 00001990: 20 20 20 20 53 54 58 20 36 0D 20 20 20 20 20 20 | STX 6. | 000019A0: 20 20 20 53 54 59 20 37 0D 20 20 20 20 20 20 20 | STY 7. | 000019B0: 20 20 4A 53 52 20 44 56 50 39 42 2D 44 52 56 50 | JSR DVP9B-DRVP| 000019C0: 52 47 2B 24 30 34 30 30 0D 0D 20 20 20 20 20 20 |RG+$0400.. | 000019D0: 20 20 20 4C 44 59 20 23 32 0D 44 56 50 33 20 20 | LDY #2.DVP3 | 000019E0: 20 20 20 4C 44 41 20 24 30 33 30 33 2C 59 20 3B | LDA $0303,Y ;| 000019F0: 43 4F 4D 50 41 52 45 20 31 53 54 20 43 48 41 52 |COMPARE 1ST CHAR| 00001A00: 0D 43 4D 50 42 31 20 20 20 20 3D 20 2A 2B 31 0D |.CMPB1 = *+1.| 00001A10: 20 20 20 20 20 20 20 20 20 43 4D 50 20 23 30 0D | CMP #0.| 00001A20: 20 20 20 20 20 20 20 20 20 42 4E 45 20 44 56 50 | BNE DVP| 00001A30: 34 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 |4.. LDA | 00001A40: 24 30 33 30 34 2C 59 20 3B 43 4F 4D 50 41 52 45 |$0304,Y ;COMPARE| 00001A50: 20 32 4E 44 20 43 48 41 52 0D 43 4D 50 42 32 20 | 2ND CHAR.CMPB2 | 00001A60: 20 20 20 3D 20 2A 2B 31 0D 20 20 20 20 20 20 20 | = *+1. | 00001A70: 20 20 43 4D 50 20 23 30 0D 20 20 20 20 20 20 20 | CMP #0. | 00001A80: 20 20 42 4E 45 20 44 56 50 34 0D 0D 3B 4F 4B 2E | BNE DVP4..;OK.| 00001A90: 20 46 49 4C 45 4E 41 4D 45 20 46 4F 55 4E 44 20 | FILENAME FOUND | 00001AA0: 2E 2E 2E 0D 0D 20 20 20 20 20 20 20 20 20 4A 4D |..... JM| 00001AB0: 50 20 44 56 50 34 43 2D 44 52 56 50 52 47 2B 24 |P DVP4C-DRVPRG+$| 00001AC0: 30 34 30 30 0D 0D 3B C0 C0 C0 3E 20 52 45 41 44 |0400..;...> READ| 00001AD0: 20 4E 45 58 54 20 53 45 43 54 4F 52 0D 3B 41 4E | NEXT SECTOR.;AN| 00001AE0: 44 20 43 4F 4E 54 49 4E 55 45 20 53 45 41 52 43 |D CONTINUE SEARC| 00001AF0: 48 49 4E 47 0D 0D 44 56 50 34 20 20 20 20 20 54 |HING..DVP4 T| 00001B00: 59 41 0D 20 20 20 20 20 20 20 20 20 43 4C 43 0D |YA. CLC.| 00001B10: 20 20 20 20 20 20 20 20 20 41 44 43 20 23 24 32 | ADC #$2| 00001B20: 30 0D 20 20 20 20 20 20 20 20 20 54 41 59 0D 20 |0. TAY. | 00001B30: 20 20 20 20 20 20 20 20 42 43 43 20 44 56 50 33 | BCC DVP3| 00001B40: 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 59 20 24 |.. LDY $| 00001B50: 30 33 30 31 0D 20 20 20 20 20 20 20 20 20 42 50 |0301. BP| 00001B60: 4C 20 44 56 50 32 0D 44 56 50 34 42 0D 20 20 20 |L DVP2.DVP4B. | 00001B70: 20 20 20 20 20 20 4A 53 52 20 44 56 50 32 38 2D | JSR DVP28-| 00001B80: 44 52 56 50 52 47 2B 24 30 34 30 30 0D 20 20 20 |DRVPRG+$0400. | 00001B90: 20 20 20 20 20 20 4C 44 58 20 23 30 0D 20 20 20 | LDX #0. | 00001BA0: 20 20 20 20 20 20 4A 53 52 20 53 45 4E 44 42 59 | JSR SENDBY| 00001BB0: 54 2D 44 52 56 50 52 47 2B 24 30 34 30 30 0D 0D |T-DRVPRG+$0400..| 00001BC0: 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 30 0D | LDX #0.| 00001BD0: 20 20 20 20 20 20 20 20 20 4A 53 52 20 53 45 4E | JSR SEN| 00001BE0: 44 42 59 54 2D 44 52 56 50 52 47 2B 24 30 34 30 |DBYT-DRVPRG+$040| 00001BF0: 30 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 |0.. LDX | 00001C00: 23 24 39 39 0D 20 20 20 20 20 20 20 20 20 4A 53 |#$99. JS| 00001C10: 52 20 53 45 4E 44 42 59 54 2D 44 52 56 50 52 47 |R SENDBYT-DRVPRG| 00001C20: 2B 24 30 34 30 30 0D 0D 20 20 20 20 20 20 20 20 |+$0400.. | 00001C30: 20 4C 44 58 20 23 24 46 45 0D 20 20 20 20 20 20 | LDX #$FE. | 00001C40: 20 20 20 4A 53 52 20 53 45 4E 44 42 59 54 2D 44 | JSR SENDBYT-D| 00001C50: 52 56 50 52 47 2B 24 30 34 30 30 0D 0D 20 20 20 |RVPRG+$0400.. | 00001C60: 20 20 20 20 20 20 4A 4D 50 20 24 43 31 30 30 0D | JMP $C100.| 00001C70: 44 56 50 34 43 0D 20 20 20 20 20 20 20 20 20 4C |DVP4C. L| 00001C80: 44 41 20 24 30 33 30 31 2C 59 0D 20 20 20 20 20 |DA $0301,Y. | 00001C90: 20 20 20 20 53 54 41 20 36 0D 20 20 20 20 20 20 | STA 6. | 00001CA0: 20 20 20 4C 44 41 20 24 30 33 30 32 2C 59 0D 20 | LDA $0302,Y. | 00001CB0: 20 20 20 20 20 20 20 20 53 54 41 20 37 0D 44 56 | STA 7.DV| 00001CC0: 50 34 44 0D 20 20 20 20 20 20 20 20 20 4A 53 52 |P4D. JSR| 00001CD0: 20 44 56 50 39 42 2D 44 52 56 50 52 47 2B 24 30 | DVP9B-DRVPRG+$0| 00001CE0: 34 30 30 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 |400.. LD| 00001CF0: 59 20 23 30 0D 20 20 20 20 20 20 20 20 20 4C 44 |Y #0. LD| 00001D00: 41 20 24 30 33 30 30 0D 20 20 20 20 20 20 20 20 |A $0300. | 00001D10: 20 53 54 41 20 36 0D 20 20 20 20 20 20 20 20 20 | STA 6. | 00001D20: 42 4E 45 20 44 56 50 35 0D 0D 20 20 20 20 20 20 |BNE DVP5.. | 00001D30: 20 20 20 4C 44 59 20 24 30 33 30 31 0D 20 20 20 | LDY $0301. | 00001D40: 20 20 20 20 20 20 49 4E 59 0D 44 56 50 35 20 20 | INY.DVP5 | 00001D50: 20 20 20 53 54 59 20 24 30 31 31 38 0D 20 20 20 | STY $0118. | 00001D60: 20 20 20 20 20 20 4C 44 41 20 24 30 33 30 31 0D | LDA $0301.| 00001D70: 20 20 20 20 20 20 20 20 20 53 54 41 20 37 0D 20 | STA 7. | 00001D80: 20 20 20 20 20 20 20 20 4C 44 59 20 23 32 0D 20 | LDY #2. | 00001D90: 20 20 20 20 20 20 20 20 4A 53 52 20 44 56 50 32 | JSR DVP2| 00001DA0: 38 2D 44 52 56 50 52 47 2B 24 30 34 30 30 0D 44 |8-DRVPRG+$0400.D| 00001DB0: 56 50 36 20 20 20 20 20 4C 44 58 20 24 30 33 30 |VP6 LDX $030| 00001DC0: 30 2C 59 0D 20 20 20 20 20 20 20 20 20 43 50 58 |0,Y. CPX| 00001DD0: 20 23 24 39 39 0D 20 20 20 20 20 20 20 20 20 42 | #$99. B| 00001DE0: 4E 45 20 44 56 50 37 0D 0D 20 20 20 20 20 20 20 |NE DVP7.. | 00001DF0: 20 20 4A 53 52 20 53 45 4E 44 42 59 54 2D 44 52 | JSR SENDBYT-DR| 00001E00: 56 50 52 47 2B 24 30 34 30 30 0D 0D 20 20 20 20 |VPRG+$0400.. | 00001E10: 20 20 20 20 20 4C 44 58 20 23 24 39 39 0D 44 56 | LDX #$99.DV| 00001E20: 50 37 20 20 20 20 20 4A 53 52 20 53 45 4E 44 42 |P7 JSR SENDB| 00001E30: 59 54 2D 44 52 56 50 52 47 2B 24 30 34 30 30 0D |YT-DRVPRG+$0400.| 00001E40: 0D 20 20 20 20 20 20 20 20 20 49 4E 59 0D 20 20 |. INY. | 00001E50: 20 20 20 20 20 20 20 43 50 59 20 24 30 31 31 38 | CPY $0118| 00001E60: 0D 20 20 20 20 20 20 20 20 20 42 4E 45 20 44 56 |. BNE DV| 00001E70: 50 36 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |P6.. LDA| 00001E80: 20 24 30 33 30 30 0D 20 20 20 20 20 20 20 20 20 | $0300. | 00001E90: 42 45 51 20 44 56 50 38 0D 0D 20 20 20 20 20 20 |BEQ DVP8.. | 00001EA0: 20 20 20 4C 44 58 20 23 24 39 39 0D 20 20 20 20 | LDX #$99. | 00001EB0: 20 20 20 20 20 4A 53 52 20 53 45 4E 44 42 59 54 | JSR SENDBYT| 00001EC0: 2D 44 52 56 50 52 47 2B 24 30 34 30 30 0D 0D 20 |-DRVPRG+$0400.. | 00001ED0: 20 20 20 20 20 20 20 20 4C 44 58 20 23 24 43 33 | LDX #$C3| 00001EE0: 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 53 45 |. JSR SE| 00001EF0: 4E 44 42 59 54 2D 44 52 56 50 52 47 2B 24 30 34 |NDBYT-DRVPRG+$04| 00001F00: 30 30 0D 0D 20 20 20 20 20 20 20 20 20 4A 53 52 |00.. JSR| 00001F10: 20 44 56 50 32 37 2D 44 52 56 50 52 47 2B 24 30 | DVP27-DRVPRG+$0| 00001F20: 34 30 30 0D 0D 20 20 20 20 20 20 20 20 20 4A 4D |400.. JM| 00001F30: 50 20 44 56 50 34 44 2D 44 52 56 50 52 47 2B 24 |P DVP4D-DRVPRG+$| 00001F40: 30 34 30 30 0D 0D 44 56 50 38 20 20 20 20 20 4C |0400..DVP8 L| 00001F50: 44 58 20 23 24 39 39 0D 20 20 20 20 20 20 20 20 |DX #$99. | 00001F60: 20 4A 53 52 20 53 45 4E 44 42 59 54 2D 44 52 56 | JSR SENDBYT-DRV| 00001F70: 50 52 47 2B 24 30 34 30 30 0D 0D 20 20 20 20 20 |PRG+$0400.. | 00001F80: 20 20 20 20 4C 44 58 20 23 24 46 46 0D 20 20 20 | LDX #$FF. | 00001F90: 20 20 20 20 20 20 4A 53 52 20 53 45 4E 44 42 59 | JSR SENDBY| 00001FA0: 54 2D 44 52 56 50 52 47 2B 24 30 34 30 30 0D 0D |T-DRVPRG+$0400..| 00001FB0: 20 20 20 20 20 20 20 20 20 4A 4D 50 20 44 56 50 | JMP DVP| 00001FC0: 31 2D 44 52 56 50 52 47 2B 24 30 34 30 30 0D 44 |1-DRVPRG+$0400.D| 00001FD0: 56 50 38 42 0D 20 20 20 20 20 20 20 20 20 4A 53 |VP8B. JS| 00001FE0: 52 20 44 56 50 32 37 2D 44 52 56 50 52 47 2B 24 |R DVP27-DRVPRG+$| 00001FF0: 30 34 30 30 0D 20 20 20 20 20 20 20 20 20 43 4C |0400. CL| 00002000: 49 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 |I. LDA #| 00002010: 31 0D 44 56 50 39 20 20 20 20 20 42 49 54 20 24 |1.DVP9 BIT $| 00002020: 31 38 30 30 0D 20 20 20 20 20 20 20 20 20 42 45 |1800. BE| 00002030: 51 20 44 56 50 39 0D 0D 20 20 20 20 20 20 20 20 |Q DVP9.. | 00002040: 20 53 45 49 0D 20 20 20 20 20 20 20 20 20 4C 44 | SEI. LD| 00002050: 41 20 23 30 0D 20 20 20 20 20 20 20 20 20 53 54 |A #0. ST| 00002060: 41 20 24 31 38 30 30 0D 0D 3B C0 C0 C0 3E 20 52 |A $1800..;...> R| 00002070: 45 41 44 20 42 59 54 45 53 20 46 52 4F 4D 20 43 |EAD BYTES FROM C| 00002080: 36 34 0D 3B 52 45 41 44 20 31 53 54 20 43 48 41 |64.;READ 1ST CHA| 00002090: 52 20 4F 46 20 46 49 4C 45 4E 41 4D 45 0D 0D 20 |R OF FILENAME.. | 000020A0: 20 20 20 20 20 20 20 20 4A 53 52 20 44 56 50 32 | JSR DVP2| 000020B0: 33 42 2D 44 52 56 50 52 47 2B 24 30 34 30 30 0D |3B-DRVPRG+$0400.| 000020C0: 20 20 20 20 20 20 20 20 20 53 54 41 20 43 4D 50 | STA CMP| 000020D0: 42 31 2D 44 52 56 50 52 47 2B 24 30 34 30 30 0D |B1-DRVPRG+$0400.| 000020E0: 0D 3B 52 45 41 44 20 32 4E 44 20 43 48 41 52 20 |.;READ 2ND CHAR | 000020F0: 4F 46 20 46 49 4C 45 4E 41 4D 45 0D 0D 20 20 20 |OF FILENAME.. | 00002100: 20 20 20 20 20 20 4A 53 52 20 44 56 50 32 33 42 | JSR DVP23B| 00002110: 2D 44 52 56 50 52 47 2B 24 30 34 30 30 0D 20 20 |-DRVPRG+$0400. | 00002120: 20 20 20 20 20 20 20 53 54 41 20 43 4D 50 42 32 | STA CMPB2| 00002130: 2D 44 52 56 50 52 47 2B 24 30 34 30 30 0D 0D 3B |-DRVPRG+$0400..;| 00002140: 52 45 41 44 20 43 4F 4E 54 52 4F 4C 20 42 59 54 |READ CONTROL BYT| 00002150: 45 20 28 44 49 52 20 4F 52 20 54 52 41 43 4B 2D |E (DIR OR TRACK-| 00002160: 4C 4F 41 44 45 52 29 0D 0D 20 20 20 20 20 20 20 |LOADER).. | 00002170: 20 20 4A 53 52 20 44 56 50 32 33 42 2D 44 52 56 | JSR DVP23B-DRV| 00002180: 50 52 47 2B 24 30 34 30 30 0D 20 20 20 20 20 20 |PRG+$0400. | 00002190: 20 20 20 54 41 58 0D 20 20 20 20 20 20 20 20 20 | TAX. | 000021A0: 4A 53 52 20 44 56 50 32 37 2D 44 52 56 50 52 47 |JSR DVP27-DRVPRG| 000021B0: 2B 24 30 34 30 30 0D 20 20 20 20 20 20 20 20 20 |+$0400. | 000021C0: 54 58 41 0D 20 20 20 20 20 20 20 20 20 42 45 51 |TXA. BEQ| 000021D0: 20 44 56 50 39 43 20 3B 54 52 41 43 4B 2D 4C 4F | DVP9C ;TRACK-LO| 000021E0: 41 44 45 52 0D 20 20 20 20 20 20 20 20 20 42 4D |ADER. BM| 000021F0: 49 20 44 56 50 39 44 20 3B 44 49 53 41 42 4C 45 |I DVP9D ;DISABLE| 00002200: 20 4C 4F 41 44 45 52 0D 0D 3B 53 54 41 52 54 20 | LOADER..;START | 00002210: 54 52 41 43 4B 2C 53 45 43 54 4F 52 20 4C 4F 41 |TRACK,SECTOR LOA| 00002220: 44 49 4E 47 20 2E 2E 2E 0D 0D 20 20 20 20 20 20 |DING ..... | 00002230: 20 20 20 4C 44 41 20 43 4D 50 42 31 2D 44 52 56 | LDA CMPB1-DRV| 00002240: 50 52 47 2B 24 30 34 30 30 0D 20 20 20 20 20 20 |PRG+$0400. | 00002250: 20 20 20 53 54 41 20 36 0D 20 20 20 20 20 20 20 | STA 6. | 00002260: 20 20 4C 44 41 20 43 4D 50 42 32 2D 44 52 56 50 | LDA CMPB2-DRVP| 00002270: 52 47 2B 24 30 34 30 30 0D 20 20 20 20 20 20 20 |RG+$0400. | 00002280: 20 20 53 54 41 20 37 0D 20 20 20 20 20 20 20 20 | STA 7. | 00002290: 20 4A 4D 50 20 44 56 50 34 44 2D 44 52 56 50 52 | JMP DVP4D-DRVPR| 000022A0: 47 2B 24 30 34 30 30 0D 44 56 50 39 43 0D 20 20 |G+$0400.DVP9C. | 000022B0: 20 20 20 20 20 20 20 52 54 53 0D 44 56 50 39 44 | RTS.DVP9D| 000022C0: 0D 20 20 20 20 20 20 20 20 20 4A 4D 50 20 28 24 |. JMP ($| 000022D0: 46 46 46 43 29 0D 44 56 50 39 42 0D 20 20 20 20 |FFFC).DVP9B. | 000022E0: 20 20 20 20 20 4C 44 59 20 23 24 30 41 0D 20 20 | LDY #$0A. | 000022F0: 20 20 20 20 20 20 20 53 54 59 20 24 38 42 0D 44 | STY $8B.D| 00002300: 56 50 31 30 20 20 20 20 43 4C 49 0D 20 20 20 20 |VP10 CLI. | 00002310: 20 20 20 20 20 4C 44 41 20 23 24 38 30 0D 20 20 | LDA #$80. | 00002320: 20 20 20 20 20 20 20 53 54 41 20 30 0D 44 56 50 | STA 0.DVP| 00002330: 31 31 20 20 20 20 4C 44 41 20 30 0D 20 20 20 20 |11 LDA 0. | 00002340: 20 20 20 20 20 42 4D 49 20 44 56 50 31 31 0D 20 | BMI DVP11. | 00002350: 20 20 20 20 20 20 20 20 43 4D 50 20 23 31 0D 20 | CMP #1. | 00002360: 20 20 20 20 20 20 20 20 42 45 51 20 44 56 50 31 | BEQ DVP1| 00002370: 35 0D 20 20 20 20 20 20 20 20 20 44 45 43 20 24 |5. DEC $| 00002380: 38 42 0D 20 20 20 20 20 20 20 20 20 4C 44 59 20 |8B. LDY | 00002390: 24 38 42 0D 20 20 20 20 20 20 20 20 20 42 4D 49 |$8B. BMI| 000023A0: 20 44 56 50 31 34 0D 20 20 20 20 20 20 20 20 20 | DVP14. | 000023B0: 43 50 59 20 23 32 0D 20 20 20 20 20 20 20 20 20 |CPY #2. | 000023C0: 42 4E 45 20 44 56 50 31 32 0D 0D 20 20 20 20 20 |BNE DVP12.. | 000023D0: 20 20 20 20 4C 44 41 20 23 24 43 30 0D 20 20 20 | LDA #$C0. | 000023E0: 20 20 20 20 20 20 53 54 41 20 30 0D 44 56 50 31 | STA 0.DVP1| 000023F0: 32 20 20 20 20 4C 44 41 20 24 31 36 0D 20 20 20 |2 LDA $16. | 00002400: 20 20 20 20 20 20 53 54 41 20 24 31 32 0D 20 20 | STA $12. | 00002410: 20 20 20 20 20 20 20 4C 44 41 20 24 31 37 0D 20 | LDA $17. | 00002420: 20 20 20 20 20 20 20 20 53 54 41 20 24 31 33 0D | STA $13.| 00002430: 44 56 50 31 33 20 20 20 20 4C 44 41 20 30 0D 20 |DVP13 LDA 0. | 00002440: 20 20 20 20 20 20 20 20 42 4D 49 20 44 56 50 31 | BMI DVP1| 00002450: 33 0D 0D 20 20 20 20 20 20 20 20 20 42 50 4C 20 |3.. BPL | 00002460: 44 56 50 31 30 0D 44 56 50 31 34 20 20 20 20 50 |DVP10.DVP14 P| 00002470: 4C 41 0D 20 20 20 20 20 20 20 20 20 50 4C 41 0D |LA. PLA.| 00002480: 20 20 20 20 20 20 20 20 20 4A 4D 50 20 44 56 50 | JMP DVP| 00002490: 34 42 2D 44 52 56 50 52 47 2B 24 30 34 30 30 0D |4B-DRVPRG+$0400.| 000024A0: 0D 44 56 50 31 35 20 20 20 20 53 45 49 0D 20 20 |.DVP15 SEI. | 000024B0: 20 20 20 20 20 20 20 52 54 53 0D 0D 3B C0 C0 C0 | RTS..;...| 000024C0: 3E 20 53 45 4E 44 20 41 20 42 59 54 45 20 54 4F |> SEND A BYTE TO| 000024D0: 20 43 36 34 0D 0D 53 45 4E 44 42 59 54 0D 20 20 | C64..SENDBYT. | 000024E0: 20 20 20 20 20 20 20 53 54 58 20 24 31 34 0D 0D | STX $14..| 000024F0: 20 20 20 20 20 20 20 20 20 4C 44 41 20 24 31 43 | LDA $1C| 00002500: 30 30 0D 20 20 20 20 20 20 20 20 20 45 4F 52 20 |00. EOR | 00002510: 23 24 30 38 0D 20 20 20 20 20 20 20 20 20 53 54 |#$08. ST| 00002520: 41 20 24 31 43 30 30 0D 0D 20 20 20 20 20 20 20 |A $1C00.. | 00002530: 20 20 4C 44 41 20 23 34 0D 20 20 20 20 20 20 20 | LDA #4. | 00002540: 20 20 4A 53 52 20 53 42 59 54 32 2D 44 52 56 50 | JSR SBYT2-DRVP| 00002550: 52 47 2B 24 30 34 30 30 0D 20 20 20 20 20 20 20 |RG+$0400. | 00002560: 20 20 4A 53 52 20 53 42 59 54 32 2D 44 52 56 50 | JSR SBYT2-DRVP| 00002570: 52 47 2B 24 30 34 30 30 0D 20 20 20 20 20 20 20 |RG+$0400. | 00002580: 20 20 4A 53 52 20 53 42 59 54 32 2D 44 52 56 50 | JSR SBYT2-DRVP| 00002590: 52 47 2B 24 30 34 30 30 0D 53 42 59 54 32 0D 20 |RG+$0400.SBYT2. | 000025A0: 20 20 20 20 20 20 20 20 4C 53 52 20 24 31 34 0D | LSR $14.| 000025B0: 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 32 0D | LDX #2.| 000025C0: 20 20 20 20 20 20 20 20 20 42 43 43 20 44 56 50 | BCC DVP| 000025D0: 31 36 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 |16. LDX | 000025E0: 23 30 0D 44 56 50 31 36 20 20 20 20 42 49 54 20 |#0.DVP16 BIT | 000025F0: 24 31 38 30 30 0D 20 20 20 20 20 20 20 20 20 42 |$1800. B| 00002600: 4E 45 20 44 56 50 31 36 0D 20 20 20 20 20 20 20 |NE DVP16. | 00002610: 20 20 53 54 58 20 24 31 38 30 30 0D 20 20 20 20 | STX $1800. | 00002620: 20 20 20 20 20 4C 53 52 20 24 31 34 0D 20 20 20 | LSR $14. | 00002630: 20 20 20 20 20 20 4C 44 58 20 23 32 0D 20 20 20 | LDX #2. | 00002640: 20 20 20 20 20 20 42 43 43 20 44 56 50 31 37 0D | BCC DVP17.| 00002650: 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 30 0D | LDX #0.| 00002660: 44 56 50 31 37 20 20 20 20 42 49 54 20 24 31 38 |DVP17 BIT $18| 00002670: 30 30 0D 20 20 20 20 20 20 20 20 20 42 45 51 20 |00. BEQ | 00002680: 44 56 50 31 37 0D 20 20 20 20 20 20 20 20 20 53 |DVP17. S| 00002690: 54 58 20 24 31 38 30 30 0D 20 20 20 20 20 20 20 |TX $1800. | 000026A0: 20 20 52 54 53 0D 0D 3B C0 C0 C0 3E 20 52 45 41 | RTS..;...> REA| 000026B0: 44 20 41 20 42 59 54 45 20 46 52 4F 4D 20 43 36 |D A BYTE FROM C6| 000026C0: 34 0D 0D 44 56 50 32 33 42 0D 20 20 20 20 20 20 |4..DVP23B. | 000026D0: 20 20 20 4C 44 59 20 23 34 0D 44 56 50 32 34 20 | LDY #4.DVP24 | 000026E0: 20 20 20 4C 44 41 20 23 34 0D 44 56 50 32 35 20 | LDA #4.DVP25 | 000026F0: 20 20 20 42 49 54 20 24 31 38 30 30 0D 20 20 20 | BIT $1800. | 00002700: 20 20 20 20 20 20 42 45 51 20 44 56 50 32 35 0D | BEQ DVP25.| 00002710: 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 24 31 |. LDA $1| 00002720: 38 30 30 0D 20 20 20 20 20 20 20 20 20 4C 53 52 |800. LSR| 00002730: 20 41 0D 20 20 20 20 20 20 20 20 20 52 4F 52 20 | A. ROR | 00002740: 24 31 34 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |$14. LDA| 00002750: 20 23 34 0D 44 56 50 32 36 20 20 20 20 42 49 54 | #4.DVP26 BIT| 00002760: 20 24 31 38 30 30 0D 20 20 20 20 20 20 20 20 20 | $1800. | 00002770: 42 4E 45 20 44 56 50 32 36 0D 0D 20 20 20 20 20 |BNE DVP26.. | 00002780: 20 20 20 20 4C 44 41 20 24 31 38 30 30 0D 20 20 | LDA $1800. | 00002790: 20 20 20 20 20 20 20 4C 53 52 20 41 0D 20 20 20 | LSR A. | 000027A0: 20 20 20 20 20 20 52 4F 52 20 24 31 34 0D 20 20 | ROR $14. | 000027B0: 20 20 20 20 20 20 20 44 45 59 0D 20 20 20 20 20 | DEY. | 000027C0: 20 20 20 20 42 4E 45 20 44 56 50 32 34 0D 0D 20 | BNE DVP24.. | 000027D0: 20 20 20 20 20 20 20 20 4C 44 41 20 24 31 34 0D | LDA $14.| 000027E0: 20 20 20 20 20 20 20 20 20 52 54 53 0D 44 56 50 | RTS.DVP| 000027F0: 32 37 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 |27. LDA | 00002800: 23 38 0D 20 20 20 20 20 20 20 20 20 2E 42 59 54 |#8. .BYT| 00002810: 45 20 24 32 43 0D 44 56 50 32 38 0D 20 20 20 20 |E $2C.DVP28. | 00002820: 20 20 20 20 20 4C 44 41 20 23 30 0D 20 20 20 20 | LDA #0. | 00002830: 20 20 20 20 20 53 54 41 20 24 31 38 30 30 0D 20 | STA $1800. | 00002840: 20 20 20 20 20 20 20 20 52 54 53 0D 0D 3B 45 4E | RTS..;EN| 00002850: 44 20 4F 46 20 49 52 51 2D 4C 4F 41 44 45 52 0D |D OF IRQ-LOADER.| 00002860: 0D 0D 3B 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |..; ------------| 00002870: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00002880: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 3B 20 2D 20 49 |----------.; - I| 00002890: 54 54 45 4E 20 56 41 4E 20 41 20 44 45 43 52 55 |TTEN VAN A DECRU| 000028A0: 4E 43 48 45 52 2E 2E 2E 0D 3B 20 2D 2D 2D 2D 2D |NCHER....; -----| 000028B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000028C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000028D0: 2D 0D 0D 41 30 31 20 20 20 20 20 20 3D 20 24 30 |-..A01 = $0| 000028E0: 31 0D 41 39 30 20 20 20 20 20 20 3D 20 24 39 30 |1.A90 = $90| 000028F0: 0D 41 46 39 20 20 20 20 20 20 3D 20 24 46 39 0D |.AF9 = $F9.| 00002900: 41 46 41 20 20 20 20 20 20 3D 20 24 46 41 0D 41 |AFA = $FA.A| 00002910: 46 42 20 20 20 20 20 20 3D 20 24 41 45 0D 41 46 |FB = $AE.AF| 00002920: 43 20 20 20 20 20 20 3D 20 24 41 46 0D 41 46 44 |C = $AF.AFD| 00002930: 20 20 20 20 20 20 3D 20 24 46 44 0D 41 46 45 20 | = $FD.AFE | 00002940: 20 20 20 20 20 3D 20 24 46 45 0D 0D 50 46 42 20 | = $FE..PFB | 00002950: 20 20 20 20 20 3D 20 24 41 45 0D 50 46 44 20 20 | = $AE.PFD | 00002960: 20 20 20 20 3D 20 24 46 44 0D 0D 0D 4C 4F 41 44 | = $FD...LOAD| 00002970: 44 43 52 0D 20 20 20 20 20 20 20 20 20 53 54 58 |DCR. STX| 00002980: 20 24 42 42 0D 20 20 20 20 20 20 20 20 20 53 54 | $BB. ST| 00002990: 59 20 24 42 43 0D 20 20 20 20 20 20 20 20 20 53 |Y $BC. S| 000029A0: 54 41 20 4C 4F 41 44 4D 4F 44 45 32 0D 20 20 20 |TA LOADMODE2. | 000029B0: 20 20 20 20 20 20 4C 44 41 20 24 44 44 30 30 0D | LDA $DD00.| 000029C0: 20 20 20 20 20 20 20 20 20 41 4E 44 20 23 24 30 | AND #$0| 000029D0: 46 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 49 |F. STA I| 000029E0: 4C 31 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 |L1. LDX | 000029F0: 23 30 0D 4C 41 44 32 32 0D 20 20 20 20 20 20 20 |#0.LAD22. | 00002A00: 20 20 45 4F 52 20 49 4C 54 41 42 2C 58 0D 20 20 | EOR ILTAB,X. | 00002A10: 20 20 20 20 20 20 20 53 54 41 20 49 4C 32 2C 58 | STA IL2,X| 00002A20: 0D 20 20 20 20 20 20 20 20 20 49 4E 58 0D 20 20 |. INX. | 00002A30: 20 20 20 20 20 20 20 43 50 58 20 23 34 0D 20 20 | CPX #4. | 00002A40: 20 20 20 20 20 20 20 42 4E 45 20 4C 41 44 32 32 | BNE LAD22| 00002A50: 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 49 |.. LDA I| 00002A60: 4C 33 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |L3. STA | 00002A70: 24 44 44 30 30 0D 20 20 20 20 20 20 20 20 20 4A |$DD00. J| 00002A80: 53 52 20 4E 57 41 49 54 0D 20 20 20 20 20 20 20 |SR NWAIT. | 00002A90: 20 20 4C 44 41 20 24 42 42 0D 20 20 20 20 20 20 | LDA $BB. | 00002AA0: 20 20 20 4A 53 52 20 53 45 4E 44 42 0D 20 20 20 | JSR SENDB. | 00002AB0: 20 20 20 20 20 20 4C 44 41 20 24 42 43 0D 20 20 | LDA $BC. | 00002AC0: 20 20 20 20 20 20 20 4A 53 52 20 53 45 4E 44 42 | JSR SENDB| 00002AD0: 0D 4C 4F 41 44 4D 4F 44 45 32 20 3D 20 2A 2B 31 |.LOADMODE2 = *+1| 00002AE0: 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 30 |. LDA #0| 00002AF0: 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 53 45 |. JSR SE| 00002B00: 4E 44 42 0D 0D 20 20 20 20 20 20 20 20 20 4A 53 |NDB.. JS| 00002B10: 52 20 4E 57 41 49 54 0D 20 20 20 20 20 20 20 20 |R NWAIT. | 00002B20: 20 4A 53 52 20 44 45 43 52 55 53 48 45 52 0D 20 | JSR DECRUSHER. | 00002B30: 20 20 20 20 20 20 20 20 52 54 53 0D 0D 53 45 54 | RTS..SET| 00002B40: 42 59 54 45 0D 20 20 20 20 20 20 20 20 20 4C 44 |BYTE. LD| 00002B50: 59 20 23 30 0D 20 20 20 20 20 20 20 20 20 53 54 |Y #0. ST| 00002B60: 41 20 28 24 41 45 29 2C 59 0D 20 20 20 20 20 20 |A ($AE),Y. | 00002B70: 20 20 20 49 4E 43 20 24 41 45 0D 20 20 20 20 20 | INC $AE. | 00002B80: 20 20 20 20 42 4E 45 20 53 45 54 42 32 0D 20 20 | BNE SETB2. | 00002B90: 20 20 20 20 20 20 20 49 4E 43 20 24 41 46 0D 53 | INC $AF.S| 00002BA0: 45 54 42 32 0D 20 20 20 20 20 20 20 20 20 52 54 |ETB2. RT| 00002BB0: 53 0D 0D 44 45 43 52 55 53 48 45 52 0D 49 31 38 |S..DECRUSHER.I18| 00002BC0: 20 20 20 20 20 20 4A 53 52 20 4E 45 58 54 42 59 | JSR NEXTBY| 00002BD0: 54 45 32 0D 20 20 20 20 20 20 20 20 20 53 54 41 |TE2. STA| 00002BE0: 20 41 46 42 0D 20 20 20 20 20 20 20 20 20 4A 53 | AFB. JS| 00002BF0: 52 20 4E 45 58 54 42 59 54 45 32 0D 20 20 20 20 |R NEXTBYTE2. | 00002C00: 20 20 20 20 20 53 54 41 20 41 46 43 0D 0D 20 20 | STA AFC.. | 00002C10: 20 20 20 20 20 20 20 4C 44 58 20 23 30 0D 20 20 | LDX #0. | 00002C20: 20 20 20 20 20 20 20 53 54 58 20 41 46 39 0D 49 | STX AF9.I| 00002C30: 32 36 20 20 20 20 20 20 53 54 58 20 41 46 45 0D |26 STX AFE.| 00002C40: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 31 0D | LDA #1.| 00002C50: 20 20 20 20 20 20 20 20 20 4A 53 52 20 49 43 45 | JSR ICE| 00002C60: 0D 20 20 20 20 20 20 20 20 20 42 43 53 20 49 35 |. BCS I5| 00002C70: 42 0D 49 32 46 20 20 20 20 20 20 4A 53 52 20 49 |B.I2F JSR I| 00002C80: 43 45 0D 20 20 20 20 20 20 20 20 20 42 43 53 20 |CE. BCS | 00002C90: 49 33 43 0D 20 20 20 20 20 20 20 20 20 4A 53 52 |I3C. JSR| 00002CA0: 20 49 43 45 0D 20 20 20 20 20 20 20 20 20 52 4F | ICE. RO| 00002CB0: 4C 20 41 0D 20 20 20 20 20 20 20 20 20 52 4F 4C |L A. ROL| 00002CC0: 20 41 46 45 0D 20 20 20 20 20 20 20 20 20 42 50 | AFE. BP| 00002CD0: 4C 20 49 32 46 0D 49 33 43 20 20 20 20 20 20 54 |L I2F.I3C T| 00002CE0: 41 58 0D 20 20 20 20 20 20 20 20 20 42 45 51 20 |AX. BEQ | 00002CF0: 49 35 33 0D 49 33 46 20 20 20 20 20 20 4A 53 52 |I53.I3F JSR| 00002D00: 20 4E 45 58 54 42 59 54 45 32 0D 20 20 20 20 20 | NEXTBYTE2. | 00002D10: 20 20 20 20 4C 44 59 20 23 30 0D 20 20 20 20 20 | LDY #0. | 00002D20: 20 20 20 20 53 54 41 20 28 50 46 42 29 2C 59 0D | STA (PFB),Y.| 00002D30: 20 20 20 20 20 20 20 20 20 49 4E 43 20 41 46 42 | INC AFB| 00002D40: 0D 20 20 20 20 20 20 20 20 20 42 4E 45 20 49 35 |. BNE I5| 00002D50: 30 0D 20 20 20 20 20 20 20 20 20 49 4E 43 20 41 |0. INC A| 00002D60: 46 43 0D 49 35 30 20 20 20 20 20 20 44 45 58 0D |FC.I50 DEX.| 00002D70: 20 20 20 20 20 20 20 20 20 42 4E 45 20 49 33 46 | BNE I3F| 00002D80: 0D 49 35 33 20 20 20 20 20 20 43 50 58 20 41 46 |.I53 CPX AF| 00002D90: 45 0D 20 20 20 20 20 20 20 20 20 44 45 43 20 41 |E. DEC A| 00002DA0: 46 45 0D 20 20 20 20 20 20 20 20 20 42 43 43 20 |FE. BCC | 00002DB0: 49 33 46 0D 20 20 20 20 20 20 20 20 20 53 54 58 |I3F. STX| 00002DC0: 20 41 46 45 0D 49 35 42 20 20 20 20 20 20 4C 44 | AFE.I5B LD| 00002DD0: 41 20 23 31 0D 20 20 20 20 20 20 20 20 20 4A 53 |A #1. JS| 00002DE0: 52 20 49 43 45 0D 20 20 20 20 20 20 20 20 20 42 |R ICE. B| 00002DF0: 43 43 20 49 36 46 0D 49 36 32 20 20 20 20 20 20 |CC I6F.I62 | 00002E00: 4A 53 52 20 49 43 45 0D 20 20 20 20 20 20 20 20 |JSR ICE. | 00002E10: 20 42 43 53 20 49 37 30 0D 20 20 20 20 20 20 20 | BCS I70. | 00002E20: 20 20 4A 53 52 20 49 43 45 0D 20 20 20 20 20 20 | JSR ICE. | 00002E30: 20 20 20 52 4F 4C 20 41 0D 20 20 20 20 20 20 20 | ROL A. | 00002E40: 20 20 42 43 43 20 49 36 32 0D 20 20 20 20 20 20 | BCC I62. | 00002E50: 20 20 20 42 43 53 20 49 31 38 0D 49 36 46 20 20 | BCS I18.I6F | 00002E60: 20 20 20 20 49 4E 58 0D 49 37 30 20 20 20 20 20 | INX.I70 | 00002E70: 20 41 44 43 20 23 31 0D 20 20 20 20 20 20 20 20 | ADC #1. | 00002E80: 20 53 54 41 20 41 46 41 0D 20 20 20 20 20 20 20 | STA AFA. | 00002E90: 20 20 54 58 41 0D 20 20 20 20 20 20 20 20 20 4A | TXA. J| 00002EA0: 53 52 20 49 43 45 0D 20 20 20 20 20 20 20 20 20 |SR ICE. | 00002EB0: 52 4F 4C 20 41 0D 20 20 20 20 20 20 20 20 20 4A |ROL A. J| 00002EC0: 53 52 20 49 43 45 0D 20 20 20 20 20 20 20 20 20 |SR ICE. | 00002ED0: 52 4F 4C 20 41 0D 20 20 20 20 20 20 20 20 20 54 |ROL A. T| 00002EE0: 41 59 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 |AY. LDA | 00002EF0: 23 30 0D 49 38 30 20 20 20 20 20 20 4C 44 58 20 |#0.I80 LDX | 00002F00: 46 46 32 2C 59 0D 49 38 33 20 20 20 20 20 20 4A |FF2,Y.I83 J| 00002F10: 53 52 20 49 43 45 0D 20 20 20 20 20 20 20 20 20 |SR ICE. | 00002F20: 52 4F 4C 20 41 0D 20 20 20 20 20 20 20 20 20 52 |ROL A. R| 00002F30: 4F 4C 20 41 46 45 0D 20 20 20 20 20 20 20 20 20 |OL AFE. | 00002F40: 44 45 58 0D 20 20 20 20 20 20 20 20 20 42 4E 45 |DEX. BNE| 00002F50: 20 49 38 33 0D 20 20 20 20 20 20 20 20 20 44 45 | I83. DE| 00002F60: 59 0D 20 20 20 20 20 20 20 20 20 42 4D 49 20 49 |Y. BMI I| 00002F70: 39 44 0D 20 20 20 20 20 20 20 20 20 43 50 59 20 |9D. CPY | 00002F80: 23 33 0D 20 20 20 20 20 20 20 20 20 42 45 51 20 |#3. BEQ | 00002F90: 49 39 43 0D 20 20 20 20 20 20 20 20 20 43 4C 43 |I9C. CLC| 00002FA0: 0D 20 20 20 20 20 20 20 20 20 41 44 43 20 23 31 |. ADC #1| 00002FB0: 0D 20 20 20 20 20 20 20 20 20 42 43 43 20 49 38 |. BCC I8| 00002FC0: 30 0D 20 20 20 20 20 20 20 20 20 49 4E 43 20 41 |0. INC A| 00002FD0: 46 45 0D 20 20 20 20 20 20 20 20 20 42 43 53 20 |FE. BCS | 00002FE0: 49 38 30 0D 49 39 43 20 20 20 20 20 20 43 4C 43 |I80.I9C CLC| 00002FF0: 0D 49 39 44 20 20 20 20 20 20 41 44 43 20 41 46 |.I9D ADC AF| 00003000: 41 0D 20 20 20 20 20 20 20 20 20 42 43 43 20 49 |A. BCC I| 00003010: 41 33 0D 20 20 20 20 20 20 20 20 20 49 4E 43 20 |A3. INC | 00003020: 41 46 45 0D 49 41 33 20 20 20 20 20 20 43 4C 43 |AFE.IA3 CLC| 00003030: 0D 20 20 20 20 20 20 20 20 20 53 42 43 20 41 46 |. SBC AF| 00003040: 42 0D 20 20 20 20 20 20 20 20 20 45 4F 52 20 23 |B. EOR #| 00003050: 24 46 46 0D 20 20 20 20 20 20 20 20 20 53 54 41 |$FF. STA| 00003060: 20 41 46 44 0D 20 20 20 20 20 20 20 20 20 4C 44 | AFD. LD| 00003070: 41 20 41 46 45 0D 20 20 20 20 20 20 20 20 20 53 |A AFE. S| 00003080: 42 43 20 41 46 43 0D 20 20 20 20 20 20 20 20 20 |BC AFC. | 00003090: 45 4F 52 20 23 24 46 46 0D 20 20 20 20 20 20 20 |EOR #$FF. | 000030A0: 20 20 53 54 41 20 41 46 45 0D 20 20 20 20 20 20 | STA AFE. | 000030B0: 20 20 20 4C 44 59 20 23 24 30 30 0D 49 42 36 20 | LDY #$00.IB6 | 000030C0: 20 20 20 20 20 4C 44 41 20 28 50 46 44 29 2C 59 | LDA (PFD),Y| 000030D0: 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 28 50 |. STA (P| 000030E0: 46 42 29 2C 59 0D 20 20 20 20 20 20 20 20 20 49 |FB),Y. I| 000030F0: 4E 59 0D 20 20 20 20 20 20 20 20 20 43 50 59 20 |NY. CPY | 00003100: 41 46 41 0D 20 20 20 20 20 20 20 20 20 42 4E 45 |AFA. BNE| 00003110: 20 49 42 36 0D 20 20 20 20 20 20 20 20 20 54 59 | IB6. TY| 00003120: 41 0D 20 20 20 20 20 20 20 20 20 43 4C 43 0D 20 |A. CLC. | 00003130: 20 20 20 20 20 20 20 20 41 44 43 20 41 46 42 0D | ADC AFB.| 00003140: 20 20 20 20 20 20 20 20 20 53 54 41 20 41 46 42 | STA AFB| 00003150: 0D 20 20 20 20 20 20 20 20 20 42 43 43 20 49 43 |. BCC IC| 00003160: 42 0D 20 20 20 20 20 20 20 20 20 49 4E 43 20 41 |B. INC A| 00003170: 46 43 0D 49 43 42 20 20 20 20 20 20 4A 4D 50 20 |FC.ICB JMP | 00003180: 49 32 36 0D 49 43 45 20 20 20 20 20 20 41 53 4C |I26.ICE ASL| 00003190: 20 41 46 39 0D 20 20 20 20 20 20 20 20 20 42 45 | AF9. BE| 000031A0: 51 20 49 44 33 0D 20 20 20 20 20 20 20 20 20 52 |Q ID3. R| 000031B0: 54 53 0D 49 44 33 20 20 20 20 20 20 53 54 41 20 |TS.ID3 STA | 000031C0: 42 59 54 41 0D 20 20 20 20 20 20 20 20 20 4A 53 |BYTA. JS| 000031D0: 52 20 4E 45 58 54 42 59 54 45 32 0D 20 20 20 20 |R NEXTBYTE2. | 000031E0: 20 20 20 20 20 53 45 43 0D 20 20 20 20 20 20 20 | SEC. | 000031F0: 20 20 52 4F 4C 20 41 0D 20 20 20 20 20 20 20 20 | ROL A. | 00003200: 20 53 54 41 20 41 46 39 0D 20 20 20 20 20 20 20 | STA AF9. | 00003210: 20 20 4C 44 41 20 42 59 54 41 0D 49 31 30 44 43 | LDA BYTA.I10DC| 00003220: 20 20 20 20 52 54 53 0D 0D 44 52 56 45 52 52 32 | RTS..DRVERR2| 00003230: 0D 20 20 20 20 20 20 20 20 20 53 45 43 0D 20 20 |. SEC. | 00003240: 20 20 20 20 20 20 20 50 4C 41 0D 20 20 20 20 20 | PLA. | 00003250: 20 20 20 20 50 4C 41 0D 20 20 20 20 20 20 20 20 | PLA. | 00003260: 20 52 54 53 0D 46 49 4C 45 45 4E 44 32 0D 20 20 | RTS.FILEEND2. | 00003270: 20 20 20 20 20 20 20 43 4C 43 0D 20 20 20 20 20 | CLC. | 00003280: 20 20 20 20 50 4C 41 0D 20 20 20 20 20 20 20 20 | PLA. | 00003290: 20 50 4C 41 0D 20 20 20 20 20 20 20 20 20 52 54 | PLA. RT| 000032A0: 53 0D 4E 45 58 54 42 59 54 45 32 0D 20 20 20 20 |S.NEXTBYTE2. | 000032B0: 20 20 20 20 20 53 54 58 20 42 59 54 58 0D 20 20 | STX BYTX. | 000032C0: 20 20 20 20 20 20 20 53 54 59 20 42 59 54 59 0D | STY BYTY.| 000032D0: 20 20 20 20 20 20 20 20 20 4A 53 52 20 47 45 54 | JSR GET| 000032E0: 42 59 54 45 0D 20 20 20 20 20 20 20 20 20 43 4D |BYTE. CM| 000032F0: 50 20 23 24 39 39 0D 20 20 20 20 20 20 20 20 20 |P #$99. | 00003300: 42 4E 45 20 53 45 54 42 59 54 45 32 0D 20 20 20 |BNE SETBYTE2. | 00003310: 20 20 20 20 20 20 4A 53 52 20 47 45 54 42 59 54 | JSR GETBYT| 00003320: 45 0D 20 20 20 20 20 20 20 20 20 43 4D 50 20 23 |E. CMP #| 00003330: 24 39 39 0D 20 20 20 20 20 20 20 20 20 42 45 51 |$99. BEQ| 00003340: 20 53 45 54 42 59 54 45 32 0D 20 20 20 20 20 20 | SETBYTE2. | 00003350: 20 20 20 43 4D 50 20 23 24 46 46 0D 20 20 20 20 | CMP #$FF. | 00003360: 20 20 20 20 20 42 45 51 20 46 49 4C 45 45 4E 44 | BEQ FILEEND| 00003370: 32 0D 20 20 20 20 20 20 20 20 20 43 4D 50 20 23 |2. CMP #| 00003380: 24 46 45 0D 20 20 20 20 20 20 20 20 20 42 45 51 |$FE. BEQ| 00003390: 20 44 52 56 45 52 52 32 0D 20 20 20 20 20 20 20 | DRVERR2. | 000033A0: 20 20 4A 53 52 20 4E 57 41 49 54 0D 20 20 20 20 | JSR NWAIT. | 000033B0: 20 20 20 20 20 4C 44 58 20 42 59 54 58 0D 20 20 | LDX BYTX. | 000033C0: 20 20 20 20 20 20 20 4C 44 59 20 42 59 54 59 0D | LDY BYTY.| 000033D0: 20 20 20 20 20 20 20 20 20 4A 4D 50 20 4E 45 58 | JMP NEX| 000033E0: 54 42 59 54 45 32 0D 53 45 54 42 59 54 45 32 0D |TBYTE2.SETBYTE2.| 000033F0: 20 20 20 20 20 20 20 20 20 4C 44 58 20 42 59 54 | LDX BYT| 00003400: 58 0D 20 20 20 20 20 20 20 20 20 4C 44 59 20 42 |X. LDY B| 00003410: 59 54 59 0D 20 20 20 20 20 20 20 20 20 52 54 53 |YTY. RTS| 00003420: 0D 53 45 54 53 50 32 0D 20 20 20 20 20 20 20 20 |.SETSP2. | 00003430: 20 4C 44 58 20 23 36 0D 20 20 20 20 20 20 20 20 | LDX #6. | 00003440: 20 4A 4D 50 20 53 45 54 50 30 0D 53 45 54 53 50 | JMP SETP0.SETSP| 00003450: 31 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 |1. LDX #| 00003460: 31 0D 20 20 20 20 20 20 20 20 20 4A 4D 50 20 53 |1. JMP S| 00003470: 45 54 50 30 0D 53 45 54 53 50 44 0D 20 20 20 20 |ETP0.SETSPD. | 00003480: 20 20 20 20 20 54 41 58 0D 20 20 20 20 20 20 20 | TAX. | 00003490: 20 20 43 50 58 20 23 30 0D 20 20 20 20 20 20 20 | CPX #0. | 000034A0: 20 20 42 45 51 20 53 45 54 53 50 31 0D 20 20 20 | BEQ SETSP1. | 000034B0: 20 20 20 20 20 20 43 50 58 20 23 36 0D 20 20 20 | CPX #6. | 000034C0: 20 20 20 20 20 20 42 43 53 20 53 45 54 53 50 32 | BCS SETSP2| 000034D0: 0D 53 45 54 50 30 0D 20 20 20 20 20 20 20 20 20 |.SETP0. | 000034E0: 4C 44 59 20 23 24 46 38 0D 53 45 54 50 31 0D 20 |LDY #$F8.SETP1. | 000034F0: 20 20 20 20 20 20 20 20 54 59 41 0D 20 20 20 20 | TYA. | 00003500: 20 20 20 20 20 43 4C 43 0D 20 20 20 20 20 20 20 | CLC. | 00003510: 20 20 41 44 43 20 23 38 0D 20 20 20 20 20 20 20 | ADC #8. | 00003520: 20 20 54 41 59 0D 20 20 20 20 20 20 20 20 20 44 | TAY. D| 00003530: 45 58 0D 20 20 20 20 20 20 20 20 20 42 4E 45 20 |EX. BNE | 00003540: 53 45 54 50 31 0D 20 20 20 20 20 20 20 20 20 4C |SETP1. L| 00003550: 44 58 20 23 30 0D 53 45 54 50 32 0D 20 20 20 20 |DX #0.SETP2. | 00003560: 20 20 20 20 20 4C 44 41 20 53 50 45 45 44 53 2C | LDA SPEEDS,| 00003570: 59 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 46 |Y. STA F| 00003580: 46 32 2C 58 0D 20 20 20 20 20 20 20 20 20 49 4E |F2,X. IN| 00003590: 59 0D 20 20 20 20 20 20 20 20 20 49 4E 58 0D 20 |Y. INX. | 000035A0: 20 20 20 20 20 20 20 20 43 50 58 20 23 38 0D 20 | CPX #8. | 000035B0: 20 20 20 20 20 20 20 20 42 4E 45 20 53 45 54 50 | BNE SETP| 000035C0: 32 0D 20 20 20 20 20 20 20 20 20 52 54 53 0D 0D |2. RTS..| 000035D0: 42 59 54 41 20 20 20 20 20 2E 42 59 54 45 20 30 |BYTA .BYTE 0| 000035E0: 0D 42 59 54 58 20 20 20 20 20 2E 42 59 54 45 20 |.BYTX .BYTE | 000035F0: 30 0D 42 59 54 59 20 20 20 20 20 2E 42 59 54 45 |0.BYTY .BYTE| 00003600: 20 30 0D 0D 46 46 32 20 20 20 20 20 20 2E 42 59 | 0..FF2 .BY| 00003610: 54 45 20 24 30 31 2C 24 30 32 2C 24 30 33 2C 24 |TE $01,$02,$03,$| 00003620: 30 34 0D 20 20 20 20 20 20 20 20 20 2E 42 59 54 |04. .BYT| 00003630: 45 20 24 30 35 2C 24 30 36 2C 24 30 37 2C 24 30 |E $05,$06,$07,$0| 00003640: 38 0D 53 50 45 45 44 53 0D 20 20 20 20 20 20 20 |8.SPEEDS. | 00003650: 20 20 2E 42 59 54 45 20 33 2C 31 2C 32 2C 32 2C | .BYTE 3,1,2,2,| 00003660: 33 2C 31 2C 32 2C 32 0D 20 20 20 20 20 20 20 20 |3,1,2,2. | 00003670: 20 2E 42 59 54 45 20 33 2C 32 2C 32 2C 32 2C 33 | .BYTE 3,2,2,2,3| 00003680: 2C 32 2C 32 2C 32 0D 20 20 20 20 20 20 20 20 20 |,2,2,2. | 00003690: 2E 42 59 54 45 20 34 2C 32 2C 32 2C 32 2C 34 2C |.BYTE 4,2,2,2,4,| 000036A0: 32 2C 32 2C 32 0D 20 20 20 20 20 20 20 20 20 2E |2,2,2. .| 000036B0: 42 59 54 45 20 34 2C 32 2C 32 2C 33 2C 34 2C 32 |BYTE 4,2,2,3,4,2| 000036C0: 2C 32 2C 32 0D 20 20 20 20 20 20 20 20 20 2E 42 |,2,2. .B| 000036D0: 59 54 45 20 34 2C 32 2C 33 2C 33 2C 34 2C 32 2C |YTE 4,2,3,3,4,2,| 000036E0: 32 2C 32 0D 20 20 20 20 20 20 20 20 20 2E 42 59 |2,2. .BY| 000036F0: 54 45 20 34 2C 33 2C 33 2C 33 2C 34 2C 32 2C 32 |TE 4,3,3,3,4,2,2| 00003700: 2C 32 0D 0D |,2.. |
.; -------------------------------------
-.; - ITTEN VALA AZ IRQ-LOADER....; ----
----------------------------------.;.; H
I!.; ITTEN VALA AZ AZ IRQ-LOADER AMIT.;
AMIT ECSETELTEM NEKED A TEFLONBAN....; H
A JOL CSALODOM, AKKOR EZ MAR NEM BUG-.;
ZIK NEHANY TOLTES UTAN, MAR CSAK AZERT.;
IS NEM, MERT KB. 6 ORAN KERESZTUL TOL-.
; TOTT A MEMBERSTATUS PART... :))))).; 1
DOLOGRA FIGYELJ : HAGYJ SZUNETET KET.;
FILE TOLTESE KOZOTT! KB. 20 FRAME ELEG.;
.; UNINSTALALNI UGY TUDOD, HOGY A TOLTES
-.; NEL AZ ACCU 7. BITJET MAGASRA ALLITO
D!.;.; PL. :.; LDA #%10000000.;
JSR LOAD.;.;.; NORMAL IRQ LOADER :.;
.;......................................
..;IRQ-LOADER VERSION V2.6 / 23.8.1995
..;....................................
....;(C)COPYRIGHT BY MADROM OF CREAM 199
5 ..;..................................
......;.;JSR INIT ;INIT.;LDA #0 OR #1 ;
IF A.=1 THEN IN X.AND Y..; ;
MUST BE THE NEW LOAD.; ;ADRE
SS.;JSR SETADR..;LDA #0 OR #1 ;IF A.=0 T
HEN IN X. AND.; ;Y. MUST BE
THE FIRST 2.; ;CHARS OF THE
FILE NAME.; ;IF A.=1 THEN IN
X. AND.; ;Y. MUST BE THE ST
ART.; ;TRACK AND SECTOR.;LDX
#"T" ;1. CHAR OF FILENAME.;
;OR TRACK NO..;LDY #"C" ;2. CHA
R OF FILENAME.; ;OR SECTOR N
O..;JSR LOAD.;BCS ERROR ;IF CARRY=.SE
C THEN ERROR.;RTS.;.;THIS VERSION CAN LO
AD EVERY FILE TYPE.;(PRG,SEQ,USE,DEL,REL
,...).;.;.;.............................
...........;IRQ-LOADER VERSION V2.6 / 25
.8.1995 ..;---------------------------
-----------..;DECRUSHING WHILE LOADING W
ITH SPEED/X ..;ALL CRUNCH SPEEDS (1-6) A
RE ALLOWED ! ..;ONLY TO USE WITH LEVEL-C
RUSHER BY MMS ..;-----------------------
---------------..;(C)COPYRIGHT BY MADROM
OF CREAM 1995 ..;DECRUSHER ROUTINE COD
ED BY MMS/TABOO ..;....................
....................;.;.;LDA #1 - #6 ;S
ET SPEED WITH THE FILE.;JSR SETSPD ;WA
S CRUNCHED (1-6).;.;LDA #0 OR #1 ;IF A.=
0 THEN IN X. AND.; ;Y. MUST
BE THE FIRST 2.; ;CHARS OF T
HE FILE NAME.; ;IF A.=1 THEN
IN X. AND.; ;Y. MUST BE THE
START.; ;TRACK AND SECTOR.;
LDX #"T" ;1. CHAR OF FILENAME.;
;OR TRACK NO..;LDY #"C" ;2.
CHAR OF FILENAME.; ;OR SECTO
R NO..;JSR LOADDCR.;BCS ERROR ;IF CAR
RY=.SEC THEN ERROR.;RTS.;.;THIS VERSION
CAN LOAD EVERY FILE TYPE.;(PRG,SEQ,USE,D
EL,REL,...).;.;..IL1 = $B2.IL2
= $B3.IL3 = $B4.IL4 = $B5.IL5
= $B6..LOAD. STX $BB.
STY $BC. STA LOADMODE.
LDA $DD00. AND #$0F.
STA IL1. LDX #0.LAD2. EO
R ILTAB,X. STA IL2,X. IN
X. CPX #4. BNE LAD2..
LDA IL3. STA $DD00.
JSR NWAIT. LDA $BB. JS
R SENDB. LDA $BC. JSR SE
NDB.LOADMODE = *+1. LDA #0.
JSR SENDB.. BIT LOADMODE.
BMI FILEEND.. JSR NWAIT.
JSR GETBYTE.ADRLOW STA $AE.
JSR GETBYTE.ADRHIGH STA $AF.NEXTBY
TE. JSR GETBYTE. CMP #$9
9. BNE SETBYTEA. JSR GET
BYTE. CMP #$99. BEQ SETB
YTEA. CMP #$FF. BEQ FILE
END. CMP #$FE. BEQ DRVER
R. JSR NWAIT. JMP NEXTBY
TE.DRVERR. SEC. RTS.SETB
YTEA. LDY #0. STA ($AE),
Y.. INC $AE. BNE SETB2A.
INC $AF.SETB2A BNE NEXTBYTE.F
ILEEND. CLC. RTS..; ----
----------------------------------.; - I
NNENTOL VAN KB. A 64-BEN FUTO RESZ.; - L
ELKE....; ------------------------------
--------..NWAIT LDX #$38 ; ITT VOL
T A HIBA!.NW1 DEX ; TUL KEV
ES VOLT A. BNE NW1 ; VARAKOZ
AS....NW2 BIT $DD00 ; 1 (!) CIKLU
SSAL. BVC NW2 ; KEVESEBB, AM
I. LDX #$08 ; CSAK NEHA JOTT.
NW3 DEX ; KI... NE TUDD MEG
. BNE NW3 ; MIRE RAJOTTEM...
. RTS ; MOST EGY PICIT.
; TOBBET KELL VARNI.
; MERT ATIRTAM A.
; DRIVEBAN FUTO.
; RESZT!!!..SETADR.
BNE SETADRNEU. LDA #$85.
STA ADRLOW. STA ADRHIGH.
RTS.SETADRNEU. LDA #$24 ;B
IT. STA ADRLOW. STA ADRH
IGH. STX $AE. STY $AF.
RTS..INIT. LDA #<DRVPRG.
LDX #>DRVPRG. STA $FB.
STX $FC. LDA #<$0400.
LDX #>$0400. STA $A9.
STX $AA.INIT2. JSR DRVMOD.
LDA #"W". LDX $A9.
LDY $AA. JSR BYTS3. LDA
#$20. JSR $EDDD. TAX.
DEX. LDY #$00.MW1 LD
A ($FB),Y. JSR $EDDD. IN
C $FB. BNE MW2. INC $FC.
MW2 DEX. BPL MW1. J
SR $EDFE. CLC. LDA $A9.
ADC #$20. STA $A9.
LDA $AA. ADC #0. STA
$AA. CMP #$08. BNE INIT2
. JSR DRVMOD. LDA #"E".
LDX #<$0400. LDY #>$0400
. JSR BYTS3. JSR $EDFE.W
AITER. LDA #$C7. STA $DD
00. TAX.WAIT1. PHA.
PLA. DEX. BNE WAIT1.
RTS.DRVMOD. LDA #8.
JSR $ED0C. LDA #$6F.
JSR $EDB9. LDA #"M". L
DY #"-". JMP BYTS2.BYTS3.
JSR $EDDD. TXA.BYTS2.
JSR $EDDD. TYA. JMP $EDD
D..GETBYTE. LDY #3..IL4B LDX
IL4. LDA $DD00. STX $DD
00. ASL A. LDX #7.IL4C.
DEX. BNE IL4C. R
OR $BD. LDX IL5. LDA $DD
00. STX $DD00. ASL A.
ROR $BD. DEY. BPL
IL4B. LDA $BD. RTS.SENDB
. STA $BD. LDY #3.SENDB2
. JSR IL2B. DEY.
BPL SENDB2. RTS..IL2B LDA I
L2. LSR $BD. BCC IL2C.
ORA #$20.IL2C STA $DD00.
LDA IL1. LSR $BD. BC
C IL2D. ORA #$20.IL2D STA $D
D00. RTS.ILTAB. .BYTE $1
0,$30,$B0,$50..; -----------------------
---------------.; - EZ ITTEN A DRIVEBAN
FUTO RESZ, EGY.; - PICIT ATIRVA... (PL.
UNINSTALL).; ---------------------------
-----------.; - EZ MINDIG(!) UGYANAZ, LO
ADNAL ES.; - DECRUNCHNAL IS!.; ---------
-----------------------------..DRVPRG.DV
P1. LDA $1C00. AND #$F7.
STA $1C00.;DVP1. LDA $1
800. AND #5. BNE DVP1..
JSR DVP8B-DRVPRG+$0400..;...> SE
ARCH IN DIR FOR FILENAME.. LDY #
1.DVP2 LDX #18. STX 6.
STY 7. JSR DVP9B-DRVPRG+$0400
.. LDY #2.DVP3 LDA $0303,Y ;
COMPARE 1ST CHAR.CMPB1 = *+1.
CMP #0. BNE DVP4.. LDA
$0304,Y ;COMPARE 2ND CHAR.CMPB2 = *+1
. CMP #0. BNE DVP4..;OK.
FILENAME FOUND ..... JMP DVP4C-
DRVPRG+$0400..;...> READ NEXT SECTOR.;AN
D CONTINUE SEARCHING..DVP4 TYA.
CLC. ADC #$20. TAY.
BCC DVP3.. LDY $0301.
BPL DVP2.DVP4B. JSR DVP28-
DRVPRG+$0400. LDX #0. JS
R SENDBYT-DRVPRG+$0400.. LDX #0.
JSR SENDBYT-DRVPRG+$0400..
LDX #$99. JSR SENDBYT-DRVPRG
+$0400.. LDX #$FE. JSR S
ENDBYT-DRVPRG+$0400.. JMP $C100.
DVP4C. LDA $0301,Y. STA
6. LDA $0302,Y. STA 7.DV
P4D. JSR DVP9B-DRVPRG+$0400..
LDY #0. LDA $0300.
STA 6. BNE DVP5.. LDY $
0301. INY.DVP5 STY $0118.
LDA $0301. STA 7.
LDY #2. JSR DVP28-DRVPRG+$0400.D
VP6 LDX $0300,Y. CPX #$99.
BNE DVP7.. JSR SENDBYT-DR
VPRG+$0400.. LDX #$99.DVP7 J
SR SENDBYT-DRVPRG+$0400.. INY.
CPY $0118. BNE DVP6..
LDA $0300. BEQ DVP8..
LDX #$99. JSR SENDBYT-DRVPRG+
$0400.. LDX #$C3. JSR SE
NDBYT-DRVPRG+$0400.. JSR DVP27-D
RVPRG+$0400.. JMP DVP4D-DRVPRG+$
0400..DVP8 LDX #$99. JSR SEN
DBYT-DRVPRG+$0400.. LDX #$FF.
JSR SENDBYT-DRVPRG+$0400..
JMP DVP1-DRVPRG+$0400.DVP8B. JS
R DVP27-DRVPRG+$0400. CLI.
LDA #1.DVP9 BIT $1800. BE
Q DVP9.. SEI. LDA #0.
STA $1800..;...> READ BYTES FROM C
64.;READ 1ST CHAR OF FILENAME..
JSR DVP23B-DRVPRG+$0400. STA CMP
B1-DRVPRG+$0400..;READ 2ND CHAR OF FILEN
AME.. JSR DVP23B-DRVPRG+$0400.
STA CMPB2-DRVPRG+$0400..;READ CON
TROL BYTE (DIR OR TRACK-LOADER)..
JSR DVP23B-DRVPRG+$0400. TAX.
JSR DVP27-DRVPRG+$0400.
TXA. BEQ DVP9C ;TRACK-LOADER.
BMI DVP9D ;DISABLE LOADER..;START
TRACK,SECTOR LOADING ..... LDA C
MPB1-DRVPRG+$0400. STA 6.
LDA CMPB2-DRVPRG+$0400. STA 7.
JMP DVP4D-DRVPRG+$0400.DVP9C.
RTS.DVP9D. JMP ($FFFC).DV
P9B. LDY #$0A. STY $8B.D
VP10 CLI. LDA #$80. S
TA 0.DVP11 LDA 0. BMI DVP11.
CMP #1. BEQ DVP15.
DEC $8B. LDY $8B. BMI
DVP14. CPY #2. BNE DVP1
2.. LDA #$C0. STA 0.DVP1
2 LDA $16. STA $12. L
DA $17. STA $13.DVP13 LDA 0.
BMI DVP13.. BPL DVP10.DV
P14 PLA. PLA. JMP DVP
4B-DRVPRG+$0400..DVP15 SEI. R
TS..;...> SEND A BYTE TO C64..SENDBYT.
STX $14.. LDA $1C00.
EOR #$08. STA $1C00..
LDA #4. JSR SBYT2-DRVPRG+$0400
. JSR SBYT2-DRVPRG+$0400.
JSR SBYT2-DRVPRG+$0400.SBYT2.
LSR $14. LDX #2. BCC DVP
16. LDX #0.DVP16 BIT $1800.
BNE DVP16. STX $1800.
LSR $14. LDX #2. BC
C DVP17. LDX #0.DVP17 BIT $18
00. BEQ DVP17. STX $1800
. RTS..;...> READ A BYTE FROM C6
4..DVP23B. LDY #4.DVP24 LDA #
4.DVP25 BIT $1800. BEQ DVP25.
. LDA $1800. LSR A.
ROR $14. LDA #4.DVP26 BIT
$1800. BNE DVP26.. LDA
$1800. LSR A. ROR $14.
DEY. BNE DVP24..
LDA $14. RTS.DVP27. LDA
#8. .BYTE $2C.DVP28. LDA
#0. STA $1800. RTS..;EN
D OF IRQ-LOADER...; --------------------
------------------.; - ITTEN VAN A DECRU
NCHER....; -----------------------------
---------..A01 = $01.A90 = $90
.AF9 = $F9.AFA = $FA.AFB
= $AE.AFC = $AF.AFD = $FD.AFE
= $FE..PFB = $AE.PFD = $F
D...LOADDCR. STX $BB. ST
Y $BC. STA LOADMODE2. LD
A $DD00. AND #$0F. STA I
L1. LDX #0.LAD22. EOR IL
TAB,X. STA IL2,X. INX.
CPX #4. BNE LAD22..
LDA IL3. STA $DD00. J
SR NWAIT. LDA $BB. JSR S
ENDB. LDA $BC. JSR SENDB
.LOADMODE2 = *+1. LDA #0.
JSR SENDB.. JSR NWAIT.
JSR DECRUSHER. RTS..SETBYTE.
LDY #0. STA ($AE),Y.
INC $AE. BNE SETB2. I
NC $AF.SETB2. RTS..DECRUSHER.I18
JSR NEXTBYTE2. STA AFB.
JSR NEXTBYTE2. STA AFC..
LDX #0. STX AF9.I26
STX AFE. LDA #1. JSR ICE
. BCS I5B.I2F JSR ICE.
BCS I3C. JSR ICE. RO
L A. ROL AFE. BPL I2F.I3
C TAX. BEQ I53.I3F JSR
NEXTBYTE2. LDY #0. STA
(PFB),Y. INC AFB. BNE I5
0. INC AFC.I50 DEX.
BNE I3F.I53 CPX AFE. DEC A
FE. BCC I3F. STX AFE.I5B
LDA #1. JSR ICE. B
CC I6F.I62 JSR ICE. BCS I70
. JSR ICE. ROL A.
BCC I62. BCS I18.I6F INX.
I70 ADC #1. STA AFA.
TXA. JSR ICE. ROL A.
JSR ICE. ROL A. T
AY. LDA #0.I80 LDX FF2,Y.I8
3 JSR ICE. ROL A. R
OL AFE. DEX. BNE I83.
DEY. BMI I9D. CPY
#3. BEQ I9C. CLC.
ADC #1. BCC I80. INC A
FE. BCS I80.I9C CLC.I9D
ADC AFA. BCC IA3. INC
AFE.IA3 CLC. SBC AFB.
EOR #$FF. STA AFD. LD
A AFE. SBC AFC. EOR #$FF
. STA AFE. LDY #$00.IB6
LDA (PFD),Y. STA (PFB),Y.
INY. CPY AFA. BNE
IB6. TYA. CLC.
ADC AFB. STA AFB. BCC IC
B. INC AFC.ICB JMP I26.ICE
ASL AF9. BEQ ID3. R
TS.ID3 STA BYTA. JSR NEXTBY
TE2. SEC. ROL A.
STA AF9. LDA BYTA.I10DC RTS.
.DRVERR2. SEC. PLA.
PLA. RTS.FILEEND2. C
LC. PLA. PLA. RT
S.NEXTBYTE2. STX BYTX. S
TY BYTY. JSR GETBYTE. CM
P #$99. BNE SETBYTE2. JS
R GETBYTE. CMP #$99. BEQ
SETBYTE2. CMP #$FF. BEQ
FILEEND2. CMP #$FE. BEQ
DRVERR2. JSR NWAIT. LDX
BYTX. LDY BYTY. JMP NEX
TBYTE2.SETBYTE2. LDX BYTX.
LDY BYTY. RTS.SETSP2.
LDX #6. JMP SETP0.SETSP1.
LDX #1. JMP SETP0.SETSPD.
TAX. CPX #0. BEQ SE
TSP1. CPX #6. BCS SETSP2
.SETP0. LDY #$F8.SETP1.
TYA. CLC. ADC #8.
TAY. DEX. BNE SETP1.
LDX #0.SETP2. LDA SPEEDS,
Y. STA FF2,X. INY.
INX. CPX #8. BNE SETP
2. RTS..BYTA .BYTE 0.BYTX
.BYTE 0.BYTY .BYTE 0..FF2 .BY
TE $01,$02,$03,$04. .BYTE $05,$0
6,$07,$08.SPEEDS. .BYTE 3,1,2,2,
3,1,2,2. .BYTE 3,2,2,2,3,2,2,2.
.BYTE 4,2,2,2,4,2,2,2. .
BYTE 4,2,2,3,4,2,2,2. .BYTE 4,2,
3,3,4,2,2,2. .BYTE 4,3,3,3,4,2,2
,2..
> CLICK IMAGE PREVIEW FOR FULL MODAL