_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

IRQ.AB      .IRQ

FILE INFORMATION

FILENAME(S): IRQ.AB      .IRQ

FILE TYPE(S): SEQ

FILE SIZE: 6.5K

FIRST SEEN: 2025-12-02 00:16:37

APPEARS ON: 1 disk(s)

FILE HASH

d1c32a7b34d605454aa7201126aa1f5ccc7a426343940fd75b7f55b236375d4f

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
LOADER DISK BY IRQ.AB      .IRQ SEQ Maestro 10 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 3B 2D 2D 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 3B  0D 3B 20 20 20 20 20 20  |-------;.;      |
00000030: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000040: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000050: 3B 0D 3B 20 20 20 20 20  20 20 20 20 20 20 20 20  |;.;             |
00000060: 20 CC CF C1 C4 C5 D2 20  28 C3 29 20 20 20 20 20  | ...... (.)     |
00000070: 20 20 20 20 20 20 20 20  20 3B 0D 3B 20 20 20 20  |         ;.;    |
00000080: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000090: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000A0: 20 20 3B 0D 3B 20 20 20  20 20 20 20 20 20 20 20  |  ;.;           |
000000B0: CB 55 4E 47 20 4F 46 20  4D 55 53 54 20 49 4E 43  |.UNG OF MUST INC|
000000C0: 2E 20 20 20 20 20 20 20  20 20 20 3B 0D 3B 20 20  |.          ;.;  |
000000D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000F0: 20 20 20 20 3B 0D 3B D4  48 49 53 20 56 45 52 53  |    ;.;.HIS VERS|
00000100: 49 4F 4E 20 53 50 45 43  49 41 4C 4C 59 20 4C 49  |ION SPECIALLY LI|
00000110: 43 45 4E 53 45 44 20 54  4F 20 CA C6 CB 3B 0D 3B  |CENSED TO ...;.;|
00000120: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000130: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000140: 20 20 20 20 20 20 3B 0D  3B 2D 2D 2D 2D 2D 2D 2D  |      ;.;-------|
00000150: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000160: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 3B  |---------------;|
00000170: 0D 20 20 20 20 20 20 20  20 20 2A 3D 20 24 30 38  |.         *= $08|
00000180: 30 30 20 3B CF 52 49 47  49 4E 0D 3B 2D 2D 2D 2D  |00 ;.RIGIN.;----|
00000190: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000001A0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000001B0: 2D 2D 2D 0D 5A 5A 30 20  20 20 20 20 20 3D 20 24  |---.ZZ0      = $|
000001C0: 30 37 20 20 20 20 3B CF  43 43 55 50 49 45 53 20  |07    ;.CCUPIES |
000001D0: 5A 5A 30 2E 2E 5A 5A 30  2B 35 0D 20 20 20 20 20  |ZZ0..ZZ0+5.     |
000001E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 3B 53 45  |             ;SE|
000001F0: 4C 45 43 54 41 42 4C 45  0D 20 20 20 20 20 20 20  |LECTABLE.       |
00000200: 20 20 20 20 20 20 20 20  20 20 20 3B 5A 45 52 4F  |           ;ZERO|
00000210: 50 41 47 45 20 41 44 44  52 45 53 53 45 53 0D 3B  |PAGE ADDRESSES.;|
00000220: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000230: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000240: 2D 2D 2D 2D 2D 2D 3B 0D  3B 20 D8 2C D9 3D C6 49  |------;.; .,.=.I|
00000250: 4C 45 4E 41 4D 45 2E 2E  2E 20 20 20 20 20 20 20  |LENAME...       |
00000260: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 3B  |               ;|
00000270: 0D 3B 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |.;--------------|
00000280: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000290: 2D 2D 2D 2D 2D 2D 2D 2D  3B 0D 4C 4F 41 44 20 20  |--------;.LOAD  |
000002A0: 20 20 20 53 54 58 20 4E  41 4D 45 31 2B 31 0D 20  |   STX NAME1+1. |
000002B0: 20 20 20 20 20 20 20 20  53 54 59 20 4E 41 4D 45  |        STY NAME|
000002C0: 32 2B 31 0D 20 20 20 20  20 20 20 20 20 54 53 58  |2+1.         TSX|
000002D0: 0D 20 20 20 20 20 20 20  20 20 53 54 58 20 53 54  |.         STX ST|
000002E0: 41 43 4B 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |ACK.         LDA|
000002F0: 20 23 24 33 35 0D 20 20  20 20 20 20 20 20 20 53  | #$35.         S|
00000300: 54 41 20 31 0D 20 20 20  20 20 20 20 20 20 4C 44  |TA 1.         LD|
00000310: 41 20 24 44 44 30 30 0D  20 20 20 20 20 20 20 20  |A $DD00.        |
00000320: 20 41 4E 44 20 23 24 30  46 0D 20 20 20 20 20 20  | AND #$0F.      |
00000330: 20 20 20 53 54 41 20 46  35 2B 31 0D 20 20 20 20  |   STA F5+1.    |
00000340: 20 20 20 20 20 45 4F 52  20 23 24 31 30 0D 20 20  |     EOR #$10.  |
00000350: 20 20 20 20 20 20 20 53  54 41 20 46 34 2B 31 0D  |       STA F4+1.|
00000360: 20 20 20 20 20 20 20 20  20 45 4F 52 20 23 24 33  |         EOR #$3|
00000370: 30 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 46  |0.         STA F|
00000380: 31 2B 31 0D 20 20 20 20  20 20 20 20 20 45 4F 52  |1+1.         EOR|
00000390: 20 23 24 42 30 0D 20 20  20 20 20 20 20 20 20 53  | #$B0.         S|
000003A0: 54 41 20 46 32 2B 31 0D  20 20 20 20 20 20 20 20  |TA F2+1.        |
000003B0: 20 45 4F 52 20 23 24 35  30 0D 20 20 20 20 20 20  | EOR #$50.      |
000003C0: 20 20 20 53 54 41 20 46  33 2B 31 0D 20 20 20 20  |   STA F3+1.    |
000003D0: 20 20 20 20 20 53 54 41  20 46 36 2B 31 0D 20 20  |     STA F6+1.  |
000003E0: 20 20 20 20 20 20 20 4A  53 52 20 53 45 4E 44 4E  |       JSR SENDN|
000003F0: 41 4D 45 0D 20 20 20 20  20 20 20 20 20 4A 53 52  |AME.         JSR|
00000400: 20 57 41 49 54 0D 3B 2D  2D 2D 2D 2D 2D 2D 2D 2D  | WAIT.;---------|
00000410: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000420: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 0D 20  |--------------. |
00000430: 20 20 20 20 20 20 20 20  4A 53 52 20 58 42 59 54  |        JSR XBYT|
00000440: 45 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 42  |E.         STA B|
00000450: 42 47 2B 31 0D 20 20 20  20 20 20 20 20 20 4A 53  |BG+1.         JS|
00000460: 52 20 58 42 59 54 45 0D  20 20 20 20 20 20 20 20  |R XBYTE.        |
00000470: 20 53 54 41 20 42 42 47  2B 32 0D 20 20 20 20 20  | STA BBG+2.     |
00000480: 20 20 20 20 4A 53 52 20  58 42 59 54 45 0D 20 20  |    JSR XBYTE.  |
00000490: 20 20 20 20 20 20 20 53  54 41 20 42 42 43 0D 20  |       STA BBC. |
000004A0: 20 20 20 20 20 20 20 20  4A 53 52 20 58 42 59 54  |        JSR XBYT|
000004B0: 45 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 42  |E.         STA B|
000004C0: 42 38 2B 31 0D 20 20 20  20 20 20 20 20 20 4C 44  |B8+1.         LD|
000004D0: 59 20 23 30 0D 20 20 20  20 20 20 20 20 20 53 54  |Y #0.         ST|
000004E0: 59 20 42 42 31 2B 31 0D  42 42 30 20 20 20 20 20  |Y BB1+1.BB0     |
000004F0: 20 4A 53 52 20 58 42 59  54 45 0D 42 42 31 20 20  | JSR XBYTE.BB1  |
00000500: 20 20 20 20 4C 44 59 20  23 30 0D 20 20 20 20 20  |    LDY #0.     |
00000510: 20 20 20 20 53 54 41 20  42 55 46 46 45 52 2C 59  |    STA BUFFER,Y|
00000520: 0D 20 20 20 20 20 20 20  20 20 49 4E 43 20 42 42  |.         INC BB|
00000530: 31 2B 31 0D 20 20 20 20  20 20 20 20 20 43 50 59  |1+1.         CPY|
00000540: 20 23 24 36 32 0D 20 20  20 20 20 20 20 20 20 42  | #$62.         B|
00000550: 4E 45 20 42 42 30 0D 20  20 20 20 20 20 20 20 20  |NE BB0.         |
00000560: 4C 44 41 20 23 24 33 34  0D 20 20 20 20 20 20 20  |LDA #$34.       |
00000570: 20 20 53 54 41 20 31 0D  20 20 20 20 20 20 20 20  |  STA 1.        |
00000580: 20 4C 44 58 20 23 30 0D  42 42 32 20 20 20 20 20  | LDX #0.BB2     |
00000590: 20 4A 53 52 20 42 42 4F  0D 20 20 20 20 20 20 20  | JSR BBO.       |
000005A0: 20 20 54 41 59 0D 42 42  33 20 20 20 20 20 20 4A  |  TAY.BB3      J|
000005B0: 53 52 20 42 42 44 0D 20  20 20 20 20 20 20 20 20  |SR BBD.         |
000005C0: 4A 53 52 20 42 42 47 0D  20 20 20 20 20 20 20 20  |JSR BBG.        |
000005D0: 20 44 45 59 0D 20 20 20  20 20 20 20 20 20 42 4E  | DEY.         BN|
000005E0: 45 20 42 42 33 0D 20 20  20 20 20 20 20 20 20 4A  |E BB3.         J|
000005F0: 53 52 20 42 42 50 0D 20  20 20 20 20 20 20 20 20  |SR BBP.         |
00000600: 53 54 41 20 5A 5A 30 0D  42 42 34 20 20 20 20 20  |STA ZZ0.BB4     |
00000610: 20 4C 44 59 20 23 24 32  30 0D 20 20 20 20 20 20  | LDY #$20.      |
00000620: 20 20 20 4A 53 52 20 42  42 50 0D 20 20 20 20 20  |   JSR BBP.     |
00000630: 20 20 20 20 50 48 41 0D  20 20 20 20 20 20 20 20  |    PHA.        |
00000640: 20 54 41 59 0D 20 20 20  20 20 20 20 20 20 43 50  | TAY.         CP|
00000650: 59 20 23 32 0D 20 20 20  20 20 20 20 20 20 42 4E  |Y #2.         BN|
00000660: 45 20 42 42 35 0D 20 20  20 20 20 20 20 20 20 44  |E BB5.         D|
00000670: 45 58 0D 42 42 35 20 20  20 20 20 20 4A 53 52 20  |EX.BB5      JSR |
00000680: 42 42 49 0D 20 20 20 20  20 20 20 20 20 44 45 59  |BBI.         DEY|
00000690: 0D 20 20 20 20 20 20 20  20 20 42 45 51 20 42 42  |.         BEQ BB|
000006A0: 41 0D 20 20 20 20 20 20  20 20 20 44 45 59 0D 20  |A.         DEY. |
000006B0: 20 20 20 20 20 20 20 20  42 4E 45 20 42 42 36 0D  |        BNE BB6.|
000006C0: 20 20 20 20 20 20 20 20  20 41 44 43 20 23 39 0D  |         ADC #9.|
000006D0: 42 42 36 20 20 20 20 20  20 54 41 59 0D 42 42 37  |BB6      TAY.BB7|
000006E0: 20 20 20 20 20 20 4C 44  58 20 42 55 46 46 45 52  |      LDX BUFFER|
000006F0: 2B 24 34 30 2C 59 0D 20  20 20 20 20 20 20 20 20  |+$40,Y.         |
00000700: 4A 53 52 20 42 42 4B 0D  20 20 20 20 20 20 20 20  |JSR BBK.        |
00000710: 20 41 44 43 20 42 55 46  46 45 52 2B 24 34 44 2C  | ADC BUFFER+$4D,|
00000720: 59 0D 20 20 20 20 20 20  20 20 20 54 41 58 0D 20  |Y.         TAX. |
00000730: 20 20 20 20 20 20 20 20  4C 44 41 20 5A 5A 30 2B  |        LDA ZZ0+|
00000740: 32 0D 20 20 20 20 20 20  20 20 20 41 44 43 20 23  |2.         ADC #|
00000750: 30 0D 20 20 20 20 20 20  20 20 20 43 50 59 20 23  |0.         CPY #|
00000760: 39 0D 20 20 20 20 20 20  20 20 20 42 43 53 20 42  |9.         BCS B|
00000770: 42 39 0D 20 20 20 20 20  20 20 20 20 41 44 43 20  |B9.         ADC |
00000780: 42 55 46 46 45 52 2B 24  35 41 2C 59 0D 20 20 20  |BUFFER+$5A,Y.   |
00000790: 20 20 20 20 20 20 42 4E  45 20 42 42 39 0D 20 20  |      BNE BB9.  |
000007A0: 20 20 20 20 20 20 20 4C  44 59 20 23 38 0D 42 42  |       LDY #8.BB|
000007B0: 38 20 20 20 20 20 20 43  50 58 20 23 30 0D 20 20  |8      CPX #0.  |
000007C0: 20 20 20 20 20 20 20 42  45 51 20 42 42 37 0D 42  |       BEQ BB7.B|
000007D0: 42 39 20 20 20 20 20 20  54 41 59 0D 20 20 20 20  |B9      TAY.    |
000007E0: 20 20 20 20 20 54 58 41  0D 42 42 41 20 20 20 20  |     TXA.BBA    |
000007F0: 20 20 53 45 43 0D 20 20  20 20 20 20 20 20 20 41  |  SEC.         A|
00000800: 44 43 20 42 42 47 2B 31  0D 20 20 20 20 20 20 20  |DC BBG+1.       |
00000810: 20 20 53 54 41 20 5A 5A  30 2B 33 0D 20 20 20 20  |  STA ZZ0+3.    |
00000820: 20 20 20 20 20 54 59 41  0D 20 20 20 20 20 20 20  |     TYA.       |
00000830: 20 20 41 44 43 20 42 42  47 2B 32 0D 20 20 20 20  |  ADC BBG+2.    |
00000840: 20 20 20 20 20 53 54 41  20 5A 5A 30 2B 34 0D 20  |     STA ZZ0+4. |
00000850: 20 20 20 20 20 20 20 20  50 4C 41 0D 20 20 20 20  |        PLA.    |
00000860: 20 20 20 20 20 54 41 58  0D 20 20 20 20 20 20 20  |     TAX.       |
00000870: 20 20 4C 44 59 20 23 30  0D 20 20 20 20 20 20 20  |  LDY #0.       |
00000880: 20 20 4C 44 41 20 28 5A  5A 30 2B 33 29 2C 59 0D  |  LDA (ZZ0+3),Y.|
00000890: 20 20 20 20 20 20 20 20  20 44 45 43 20 5A 5A 30  |         DEC ZZ0|
000008A0: 2B 34 0D 42 42 42 20 20  20 20 20 20 4A 53 52 20  |+4.BBB      JSR |
000008B0: 42 42 47 0D 20 20 20 20  20 20 20 20 20 44 45 59  |BBG.         DEY|
000008C0: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 28 5A  |.         LDA (Z|
000008D0: 5A 30 2B 33 29 2C 59 0D  20 20 20 20 20 20 20 20  |Z0+3),Y.        |
000008E0: 20 44 45 58 0D 20 20 20  20 20 20 20 20 20 42 4E  | DEX.         BN|
000008F0: 45 20 42 42 42 0D 20 20  20 20 20 20 20 20 20 44  |E BBB.         D|
00000900: 45 43 20 5A 5A 30 0D 20  20 20 20 20 20 20 20 20  |EC ZZ0.         |
00000910: 42 4E 45 20 42 42 34 0D  20 20 20 20 20 20 20 20  |BNE BB4.        |
00000920: 20 42 45 51 20 42 42 32  0D 42 42 43 20 20 20 20  | BEQ BB2.BBC    |
00000930: 20 20 42 52 4B 0D 42 42  44 20 20 20 20 20 20 50  |  BRK.BBD      P|
00000940: 48 50 0D 20 20 20 20 20  20 20 20 20 49 4E 43 20  |HP.         INC |
00000950: 31 0D 20 20 20 20 20 20  20 20 20 4A 53 52 20 58  |1.         JSR X|
00000960: 42 59 54 45 0D 20 20 20  20 20 20 20 20 20 44 45  |BYTE.         DE|
00000970: 43 20 31 0D 20 20 20 20  20 20 20 20 20 50 4C 50  |C 1.         PLP|
00000980: 0D 20 20 20 20 20 20 20  20 20 52 54 53 0D 42 42  |.         RTS.BB|
00000990: 47 20 20 20 20 20 20 53  54 41 20 24 46 46 46 46  |G      STA $FFFF|
000009A0: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 42 42  |.         LDA BB|
000009B0: 47 2B 31 0D 20 20 20 20  20 20 20 20 20 42 4E 45  |G+1.         BNE|
000009C0: 20 42 42 48 0D 20 20 20  20 20 20 20 20 20 44 45  | BBH.         DE|
000009D0: 43 20 42 42 47 2B 32 0D  42 42 48 20 20 20 20 20  |C BBG+2.BBH     |
000009E0: 20 44 45 43 20 42 42 47  2B 31 0D 20 20 20 20 20  | DEC BBG+1.     |
000009F0: 20 20 20 20 52 54 53 0D  42 42 49 20 20 20 20 20  |    RTS.BBI     |
00000A00: 20 49 4E 58 0D 20 20 20  20 20 20 20 20 20 49 4E  | INX.         IN|
00000A10: 58 0D 42 42 4A 20 20 20  20 20 20 49 4E 58 0D 42  |X.BBJ      INX.B|
00000A20: 42 4B 20 20 20 20 20 20  4C 44 41 20 23 30 0D 20  |BK      LDA #0. |
00000A30: 20 20 20 20 20 20 20 20  53 54 41 20 5A 5A 30 2B  |        STA ZZ0+|
00000A40: 31 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 5A  |1.         STA Z|
00000A50: 5A 30 2B 32 0D 20 20 20  20 20 20 20 20 20 54 58  |Z0+2.         TX|
00000A60: 41 0D 20 20 20 20 20 20  20 20 20 42 45 51 20 42  |A.         BEQ B|
00000A70: 42 4E 0D 42 42 4C 20 20  20 20 20 20 41 53 4C 20  |BN.BBL      ASL |
00000A80: 42 42 43 0D 20 20 20 20  20 20 20 20 20 42 4E 45  |BBC.         BNE|
00000A90: 20 42 42 4D 0D 20 20 20  20 20 20 20 20 20 4A 53  | BBM.         JS|
00000AA0: 52 20 42 42 44 0D 20 20  20 20 20 20 20 20 20 52  |R BBD.         R|
00000AB0: 4F 4C 20 41 0D 20 20 20  20 20 20 20 20 20 53 54  |OL A.         ST|
00000AC0: 41 20 42 42 43 0D 42 42  4D 20 20 20 20 20 20 52  |A BBC.BBM      R|
00000AD0: 4F 4C 20 5A 5A 30 2B 31  0D 20 20 20 20 20 20 20  |OL ZZ0+1.       |
00000AE0: 20 20 52 4F 4C 20 5A 5A  30 2B 32 0D 20 20 20 20  |  ROL ZZ0+2.    |
00000AF0: 20 20 20 20 20 44 45 58  0D 20 20 20 20 20 20 20  |     DEX.       |
00000B00: 20 20 42 4E 45 20 42 42  4C 0D 20 20 20 20 20 20  |  BNE BBL.      |
00000B10: 20 20 20 4C 44 41 20 5A  5A 30 2B 31 0D 42 42 4E  |   LDA ZZ0+1.BBN|
00000B20: 20 20 20 20 20 20 52 54  53 0D 42 42 4F 20 20 20  |      RTS.BBO   |
00000B30: 20 20 20 4C 44 59 20 23  30 0D 42 42 50 20 20 20  |   LDY #0.BBP   |
00000B40: 20 20 20 49 4E 59 0D 20  20 20 20 20 20 20 20 20  |   INY.         |
00000B50: 4A 53 52 20 42 42 4A 0D  20 20 20 20 20 20 20 20  |JSR BBJ.        |
00000B60: 20 42 45 51 20 42 42 50  0D 20 20 20 20 20 20 20  | BEQ BBP.       |
00000B70: 20 20 43 50 59 20 23 24  33 31 0D 20 20 20 20 20  |  CPY #$31.     |
00000B80: 20 20 20 20 42 45 51 20  42 42 51 0D 20 20 20 20  |    BEQ BBQ.    |
00000B90: 20 20 20 20 20 4C 44 58  20 42 55 46 46 45 52 2D  |     LDX BUFFER-|
00000BA0: 31 2C 59 0D 20 20 20 20  20 20 20 20 20 4A 53 52  |1,Y.         JSR|
00000BB0: 20 42 42 4B 0D 20 20 20  20 20 20 20 20 20 41 44  | BBK.         AD|
00000BC0: 43 20 42 55 46 46 45 52  2B 24 30 46 2C 59 0D 20  |C BUFFER+$0F,Y. |
00000BD0: 20 20 20 20 20 20 20 20  52 54 53 0D 42 42 51 20  |        RTS.BBQ |
00000BE0: 20 20 20 20 20 50 4C 41  0D 20 20 20 20 20 20 20  |     PLA.       |
00000BF0: 20 20 50 4C 41 0D 20 20  20 20 20 20 20 20 20 4C  |  PLA.         L|
00000C00: 44 41 20 23 24 33 35 0D  20 20 20 20 20 20 20 20  |DA #$35.        |
00000C10: 20 53 54 41 20 31 0D 20  20 20 20 20 20 20 20 20  | STA 1.         |
00000C20: 4A 53 52 20 58 42 59 54  45 0D 20 20 20 20 20 20  |JSR XBYTE.      |
00000C30: 20 20 20 43 4C 43 0D 20  20 20 20 20 20 20 20 20  |   CLC.         |
00000C40: 52 54 53 0D 3B 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |RTS.;-----------|
00000C50: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000C60: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 0D 42 55 46  |------------.BUF|
00000C70: 46 45 52 0D 20 20 20 20  20 20 20 20 20 2E 42 59  |FER.         .BY|
00000C80: 54 45 20 24 30 30 2C 24  30 30 2C 24 30 30 2C 24  |TE $00,$00,$00,$|
00000C90: 30 30 2C 24 30 30 2C 24  30 30 0D 20 20 20 20 20  |00,$00,$00.     |
00000CA0: 20 20 20 20 2E 42 59 54  45 20 24 30 30 2C 24 30  |    .BYTE $00,$0|
00000CB0: 30 2C 24 30 30 2C 24 30  30 2C 24 30 30 2C 24 30  |0,$00,$00,$00,$0|
00000CC0: 30 0D 20 20 20 20 20 20  20 20 20 2E 42 59 54 45  |0.         .BYTE|
00000CD0: 20 24 30 30 2C 24 30 30  2C 24 30 30 2C 24 30 30  | $00,$00,$00,$00|
00000CE0: 2C 24 30 30 2C 24 30 30  0D 20 20 20 20 20 20 20  |,$00,$00.       |
00000CF0: 20 20 2E 42 59 54 45 20  24 30 30 2C 24 30 30 2C  |  .BYTE $00,$00,|
00000D00: 24 30 30 2C 24 30 30 2C  24 30 30 2C 24 30 30 0D  |$00,$00,$00,$00.|
00000D10: 20 20 20 20 20 20 20 20  20 2E 42 59 54 45 20 24  |         .BYTE $|
00000D20: 30 30 2C 24 30 30 2C 24  30 30 2C 24 30 30 2C 24  |00,$00,$00,$00,$|
00000D30: 30 30 2C 24 30 30 0D 20  20 20 20 20 20 20 20 20  |00,$00.         |
00000D40: 2E 42 59 54 45 20 24 30  30 2C 24 30 30 2C 24 30  |.BYTE $00,$00,$0|
00000D50: 30 2C 24 30 30 2C 24 30  30 2C 24 30 30 0D 20 20  |0,$00,$00,$00.  |
00000D60: 20 20 20 20 20 20 20 2E  42 59 54 45 20 24 30 30  |       .BYTE $00|
00000D70: 2C 24 30 30 2C 24 30 30  2C 24 30 30 2C 24 30 30  |,$00,$00,$00,$00|
00000D80: 2C 24 30 30 0D 20 20 20  20 20 20 20 20 20 2E 42  |,$00.         .B|
00000D90: 59 54 45 20 24 30 30 2C  24 30 30 2C 24 30 30 2C  |YTE $00,$00,$00,|
00000DA0: 24 30 30 2C 24 30 30 2C  24 30 30 0D 20 20 20 20  |$00,$00,$00.    |
00000DB0: 20 20 20 20 20 2E 42 59  54 45 20 24 30 30 2C 24  |     .BYTE $00,$|
00000DC0: 30 30 2C 24 30 30 2C 24  30 30 2C 24 30 30 2C 24  |00,$00,$00,$00,$|
00000DD0: 30 30 0D 20 20 20 20 20  20 20 20 20 2E 42 59 54  |00.         .BYT|
00000DE0: 45 20 24 30 30 2C 24 30  30 2C 24 30 30 2C 24 30  |E $00,$00,$00,$0|
00000DF0: 30 2C 24 30 30 2C 24 30  30 0D 20 20 20 20 20 20  |0,$00,$00.      |
00000E00: 20 20 20 2E 42 59 54 45  20 24 30 30 2C 24 30 30  |   .BYTE $00,$00|
00000E10: 2C 24 30 30 2C 24 30 30  2C 24 30 30 2C 24 30 30  |,$00,$00,$00,$00|
00000E20: 0D 20 20 20 20 20 20 20  20 20 2E 42 59 54 45 20  |.         .BYTE |
00000E30: 24 30 30 2C 24 30 30 2C  24 30 30 2C 24 30 30 2C  |$00,$00,$00,$00,|
00000E40: 24 30 30 2C 24 30 30 0D  20 20 20 20 20 20 20 20  |$00,$00.        |
00000E50: 20 2E 42 59 54 45 20 24  30 30 2C 24 30 30 2C 24  | .BYTE $00,$00,$|
00000E60: 30 30 2C 24 30 30 2C 24  30 30 2C 24 30 30 0D 20  |00,$00,$00,$00. |
00000E70: 20 20 20 20 20 20 20 20  2E 42 59 54 45 20 24 30  |        .BYTE $0|
00000E80: 30 2C 24 30 30 2C 24 30  30 2C 24 30 30 2C 24 30  |0,$00,$00,$00,$0|
00000E90: 30 2C 24 30 30 0D 20 20  20 20 20 20 20 20 20 2E  |0,$00.         .|
00000EA0: 42 59 54 45 20 24 30 30  2C 24 30 30 2C 24 30 30  |BYTE $00,$00,$00|
00000EB0: 2C 24 30 30 2C 24 30 30  2C 24 30 30 0D 20 20 20  |,$00,$00,$00.   |
00000EC0: 20 20 20 20 20 20 2E 42  59 54 45 20 24 30 30 2C  |      .BYTE $00,|
00000ED0: 24 30 30 2C 24 30 30 2C  24 30 30 2C 24 30 30 2C  |$00,$00,$00,$00,|
00000EE0: 24 30 30 0D 20 20 20 20  20 20 20 20 20 2E 42 59  |$00.         .BY|
00000EF0: 54 45 20 24 30 30 2C 24  30 30 2C 24 30 30 0D 3B  |TE $00,$00,$00.;|
00000F00: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000F10: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000F20: 2D 2D 2D 2D 2D 2D 2D 0D  3B 2D 2D 2D 2D 2D 2D 2D  |-------.;-------|
00000F30: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000F40: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 3B  |---------------;|
00000F50: 0D 3B C9 46 20 54 48 45  20 52 4F 55 54 49 4E 45  |.;.F THE ROUTINE|
00000F60: 20 52 45 54 55 52 4E 53  20 57 49 54 48 20 43 41  | RETURNS WITH CA|
00000F70: 52 52 59 20 53 45 54 20  3B 0D 3B 54 48 45 52 45  |RRY SET ;.;THERE|
00000F80: 20 48 41 53 20 42 45 45  4E 20 41 20 4C 4F 41 44  | HAS BEEN A LOAD|
00000F90: 49 4E 47 20 45 52 52 4F  52 2E 20 C1 4C 57 41 59  |ING ERROR. .LWAY|
00000FA0: 53 3B 0D 3B 48 41 56 45  20 41 20 57 4F 52 4B 49  |S;.;HAVE A WORKI|
00000FB0: 4E 47 20 45 52 52 4F 52  50 41 54 48 2C 20 C9 20  |NG ERRORPATH, . |
00000FC0: 41 4C 57 41 59 53 20 20  20 20 3B 0D 3B 54 52 59  |ALWAYS    ;.;TRY|
00000FD0: 20 54 4F 20 53 48 4F 57  20 4D 59 20 41 44 44 52  | TO SHOW MY ADDR|
00000FE0: 45 53 53 20 53 4F 20 54  48 41 54 20 50 45 4F 50  |ESS SO THAT PEOP|
00000FF0: 4C 45 20 3B 0D 3B 4B 4E  4F 57 20 57 48 45 52 45  |LE ;.;KNOW WHERE|
00001000: 20 54 4F 20 47 45 54 20  41 20 57 4F 52 4B 49 4E  | TO GET A WORKIN|
00001010: 47 20 43 4F 50 59 21 20  20 20 20 20 3B 0D 3B C5  |G COPY!     ;.;.|
00001020: 47 3A 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |G:              |
00001030: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001040: 20 20 20 20 20 3B 0D 3B  20 20 20 20 20 20 20 20  |     ;.;        |
00001050: 20 20 20 20 CC C4 D8 20  23 24 34 31 20 20 20 20  |    ... #$41    |
00001060: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 3B 0D  |              ;.|
00001070: 3B 20 20 20 20 20 20 20  20 20 20 20 20 CC C4 D9  |;            ...|
00001080: 20 23 24 34 32 20 20 20  20 20 20 20 20 20 20 20  | #$42           |
00001090: 20 20 20 20 20 20 20 3B  0D 3B 20 20 20 20 20 20  |       ;.;      |
000010A0: 20 20 20 20 20 20 CA D3  D2 20 4C 4F 41 44 20 20  |      ... LOAD  |
000010B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000010C0: 3B 0D 3B 20 20 20 20 20  20 20 20 20 20 20 20 C2  |;.;            .|
000010D0: C3 D3 20 45 52 52 4F 52  52 4F 55 54 49 4E 45 20  |.. ERRORROUTINE |
000010E0: 20 20 20 20 20 20 20 20  20 3B 0D 3B 20 20 20 20  |         ;.;    |
000010F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001100: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001110: 20 20 3B 0D 3B 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |  ;.;-----------|
00001120: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001130: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 3B 0D 58 42 59  |-----------;.XBY|
00001140: 54 45 20 20 20 20 53 54  58 20 50 4C 4F 2B 31 0D  |TE    STX PLO+1.|
00001150: 58 58 20 20 20 20 20 20  20 4A 53 52 20 54 41 4B  |XX       JSR TAK|
00001160: 45 42 59 0D 20 20 20 20  20 20 20 20 20 43 4D 50  |EBY.         CMP|
00001170: 20 23 24 39 39 0D 20 20  20 20 20 20 20 20 20 42  | #$99.         B|
00001180: 4E 45 20 50 4C 4F 0D 20  20 20 20 20 20 20 20 20  |NE PLO.         |
00001190: 4A 53 52 20 54 41 4B 45  42 59 0D 20 20 20 20 20  |JSR TAKEBY.     |
000011A0: 20 20 20 20 43 4D 50 20  23 24 39 39 0D 20 20 20  |    CMP #$99.   |
000011B0: 20 20 20 20 20 20 42 45  51 20 50 4C 4F 0D 20 20  |      BEQ PLO.  |
000011C0: 20 20 20 20 20 20 20 43  4D 50 20 23 24 46 46 0D  |       CMP #$FF.|
000011D0: 20 20 20 20 20 20 20 20  20 42 45 51 20 50 4C 4F  |         BEQ PLO|
000011E0: 0D 20 20 20 20 20 20 20  20 20 43 4D 50 20 23 24  |.         CMP #$|
000011F0: 46 45 0D 20 20 20 20 20  20 20 20 20 42 45 51 20  |FE.         BEQ |
00001200: 46 45 4C 0D 20 20 20 20  20 20 20 20 20 4A 53 52  |FEL.         JSR|
00001210: 20 57 41 49 54 0D 20 20  20 20 20 20 20 20 20 42  | WAIT.         B|
00001220: 45 51 20 58 58 0D 50 4C  4F 20 20 20 20 20 20 4C  |EQ XX.PLO      L|
00001230: 44 58 20 23 30 0D 20 20  20 20 20 20 20 20 20 52  |DX #0.         R|
00001240: 54 53 0D 46 45 4C 20 20  20 20 20 20 4C 44 41 20  |TS.FEL      LDA |
00001250: 23 24 36 30 20 20 20 20  20 3B CE 4F 20 4D 4F 52  |#$60     ;.O MOR|
00001260: 45 20 4C 4F 41 44 21 0D  20 20 20 20 20 20 20 20  |E LOAD!.        |
00001270: 20 53 54 41 20 4C 4F 41  44 20 20 20 20 20 3B CF  | STA LOAD     ;.|
00001280: 4D 45 47 41 42 55 47 2E  2E 0D 20 20 20 20 20 20  |MEGABUG...      |
00001290: 20 20 20 4C 44 58 20 53  54 41 43 4B 0D 20 20 20  |   LDX STACK.   |
000012A0: 20 20 20 20 20 20 54 58  53 0D 20 20 20 20 20 20  |      TXS.      |
000012B0: 20 20 20 4C 44 41 20 23  24 33 35 0D 20 20 20 20  |   LDA #$35.    |
000012C0: 20 20 20 20 20 53 54 41  20 31 0D 20 20 20 20 20  |     STA 1.     |
000012D0: 20 20 20 20 53 45 43 0D  20 20 20 20 20 20 20 20  |    SEC.        |
000012E0: 20 52 54 53 0D 53 54 41  43 4B 20 20 20 20 2E 42  | RTS.STACK    .B|
000012F0: 59 54 45 20 30 0D 3B 2D  2D 2D 2D 2D 2D 2D 2D 2D  |YTE 0.;---------|
00001300: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001310: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 3B 0D 53  |-------------;.S|
00001320: 45 4E 44 4E 41 4D 45 0D  46 31 20 20 20 20 20 20  |ENDNAME.F1      |
00001330: 20 4C 44 41 20 23 24 32  30 0D 20 20 20 20 20 20  | LDA #$20.      |
00001340: 20 20 20 53 54 41 20 24  44 44 30 30 0D 20 20 20  |   STA $DD00.   |
00001350: 20 20 20 20 20 20 4A 53  52 20 57 41 49 54 0D 4E  |      JSR WAIT.N|
00001360: 41 4D 45 31 20 20 20 20  4C 44 41 20 23 24 30 30  |AME1    LDA #$00|
00001370: 0D 20 20 20 20 20 20 20  20 20 4A 53 52 20 53 45  |.         JSR SE|
00001380: 4E 44 42 59 0D 4E 41 4D  45 32 20 20 20 20 4C 44  |NDBY.NAME2    LD|
00001390: 41 20 23 24 30 30 0D 20  20 20 20 20 20 20 20 20  |A #$00.         |
000013A0: 4A 53 52 20 53 45 4E 44  42 59 0D 20 20 20 20 20  |JSR SENDBY.     |
000013B0: 20 20 20 20 52 54 53 0D  3B 2D 2D 2D 2D 2D 2D 2D  |    RTS.;-------|
000013C0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000013D0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000013E0: 0D 54 41 4B 45 42 59 20  20 20 4A 53 52 20 54 41  |.TAKEBY   JSR TA|
000013F0: 4B 45 32 42 0D 20 20 20  20 20 20 20 20 20 4A 53  |KE2B.         JS|
00001400: 52 20 54 41 4B 45 32 42  0D 20 20 20 20 20 20 20  |R TAKE2B.       |
00001410: 20 20 4A 53 52 20 54 41  4B 45 32 42 0D 20 20 20  |  JSR TAKE2B.   |
00001420: 20 20 20 20 20 20 4A 53  52 20 54 41 4B 45 32 42  |      JSR TAKE2B|
00001430: 0D 20 20 20 20 20 20 20  20 20 4A 53 52 20 4E 4F  |.         JSR NO|
00001440: 54 48 49 4E 47 0D 20 20  20 20 20 20 20 20 20 4C  |THING.         L|
00001450: 44 41 20 5A 5A 30 2B 35  0D 4E 4F 54 48 49 4E 47  |DA ZZ0+5.NOTHING|
00001460: 20 20 52 54 53 0D 3B 2D  2D 2D 2D 2D 2D 2D 2D 2D  |  RTS.;---------|
00001470: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001480: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 0D 54  |--------------.T|
00001490: 41 4B 45 32 42 0D 46 32  20 20 20 20 20 20 20 4C  |AKE2B.F2       L|
000014A0: 44 58 20 23 24 39 30 0D  20 20 20 20 20 20 20 20  |DX #$90.        |
000014B0: 20 4C 44 41 20 24 44 44  30 30 0D 20 20 20 20 20  | LDA $DD00.     |
000014C0: 20 20 20 20 53 54 58 20  24 44 44 30 30 0D 20 20  |    STX $DD00.  |
000014D0: 20 20 20 20 20 20 20 41  53 4C 20 41 0D 20 20 20  |       ASL A.   |
000014E0: 20 20 20 20 20 20 52 4F  52 20 5A 5A 30 2B 35 0D  |      ROR ZZ0+5.|
000014F0: 20 20 20 20 20 20 20 20  20 50 48 41 0D 20 20 20  |         PHA.   |
00001500: 20 20 20 20 20 20 50 4C  41 0D 20 20 20 20 20 20  |      PLA.      |
00001510: 20 20 20 50 48 41 0D 20  20 20 20 20 20 20 20 20  |   PHA.         |
00001520: 50 4C 41 0D 46 33 20 20  20 20 20 20 20 4C 44 58  |PLA.F3       LDX|
00001530: 20 23 24 43 30 0D 20 20  20 20 20 20 20 20 20 4C  | #$C0.         L|
00001540: 44 41 20 24 44 44 30 30  0D 20 20 20 20 20 20 20  |DA $DD00.       |
00001550: 20 20 53 54 58 20 24 44  44 30 30 0D 20 20 20 20  |  STX $DD00.    |
00001560: 20 20 20 20 20 41 53 4C  20 41 0D 20 20 20 20 20  |     ASL A.     |
00001570: 20 20 20 20 52 4F 52 20  5A 5A 30 2B 35 0D 20 20  |    ROR ZZ0+5.  |
00001580: 20 20 20 20 20 20 20 52  54 53 0D 3B 2D 2D 2D 2D  |       RTS.;----|
00001590: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000015A0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000015B0: 2D 2D 2D 0D 53 45 4E 44  42 59 20 20 20 53 54 41  |---.SENDBY   STA|
000015C0: 20 5A 5A 30 2B 35 0D 20  20 20 20 20 20 20 20 20  | ZZ0+5.         |
000015D0: 4A 53 52 20 53 45 4E 44  32 42 0D 20 20 20 20 20  |JSR SEND2B.     |
000015E0: 20 20 20 20 4A 53 52 20  53 45 4E 44 32 42 0D 20  |    JSR SEND2B. |
000015F0: 20 20 20 20 20 20 20 20  4A 53 52 20 53 45 4E 44  |        JSR SEND|
00001600: 32 42 0D 20 20 20 20 20  20 20 20 20 4A 53 52 20  |2B.         JSR |
00001610: 53 45 4E 44 32 42 0D 20  20 20 20 20 20 20 20 20  |SEND2B.         |
00001620: 52 54 53 0D 3B 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |RTS.;-----------|
00001630: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001640: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 0D 53 45 4E  |------------.SEN|
00001650: 44 32 42 0D 46 34 20 20  20 20 20 20 20 4C 44 41  |D2B.F4       LDA|
00001660: 20 23 24 31 30 0D 20 20  20 20 20 20 20 20 20 4C  | #$10.         L|
00001670: 53 52 20 5A 5A 30 2B 35  0D 20 20 20 20 20 20 20  |SR ZZ0+5.       |
00001680: 20 20 42 43 43 20 48 49  50 0D 20 20 20 20 20 20  |  BCC HIP.      |
00001690: 20 20 20 4F 52 41 20 23  24 32 30 0D 48 49 50 20  |   ORA #$20.HIP |
000016A0: 20 20 20 20 20 53 54 41  20 24 44 44 30 30 0D 20  |     STA $DD00. |
000016B0: 20 20 20 20 20 20 20 20  4E 4F 50 0D 20 20 20 20  |        NOP.    |
000016C0: 20 20 20 20 20 4E 4F 50  0D 20 20 20 20 20 20 20  |     NOP.       |
000016D0: 20 20 4E 4F 50 0D 20 20  20 20 20 20 20 20 20 4E  |  NOP.         N|
000016E0: 4F 50 0D 46 35 20 20 20  20 20 20 20 4C 44 41 20  |OP.F5       LDA |
000016F0: 23 24 30 30 0D 20 20 20  20 20 20 20 20 20 4C 53  |#$00.         LS|
00001700: 52 20 5A 5A 30 2B 35 0D  20 20 20 20 20 20 20 20  |R ZZ0+5.        |
00001710: 20 42 43 43 20 48 4F 50  0D 20 20 20 20 20 20 20  | BCC HOP.       |
00001720: 20 20 4F 52 41 20 23 24  32 30 0D 48 4F 50 20 20  |  ORA #$20.HOP  |
00001730: 20 20 20 20 53 54 41 20  24 44 44 30 30 0D 20 20  |    STA $DD00.  |
00001740: 20 20 20 20 20 20 20 4E  4F 50 0D 20 20 20 20 20  |       NOP.     |
00001750: 20 20 20 20 4E 4F 50 0D  20 20 20 20 20 20 20 20  |    NOP.        |
00001760: 20 52 54 53 0D 3B 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  | RTS.;----------|
00001770: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001780: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 0D 57 41  |-------------.WA|
00001790: 49 54 20 20 20 20 20 4C  44 58 20 23 24 33 32 0D  |IT     LDX #$32.|
000017A0: 4A 31 20 20 20 20 20 20  20 44 45 58 0D 20 20 20  |J1       DEX.   |
000017B0: 20 20 20 20 20 20 42 4E  45 20 4A 31 0D 4A 32 20  |      BNE J1.J2 |
000017C0: 20 20 20 20 20 20 4C 44  41 20 24 44 44 30 30 0D  |      LDA $DD00.|
000017D0: 20 20 20 20 20 20 20 20  20 41 4E 44 20 23 24 34  |         AND #$4|
000017E0: 30 0D 20 20 20 20 20 20  20 20 20 42 45 51 20 4A  |0.         BEQ J|
000017F0: 32 0D 46 36 20 20 20 20  20 20 20 4C 44 41 20 23  |2.F6       LDA #|
00001800: 24 43 30 0D 20 20 20 20  20 20 20 20 20 53 54 41  |$C0.         STA|
00001810: 20 24 44 44 30 30 0D 20  20 20 20 20 20 20 20 20  | $DD00.         |
00001820: 4E 4F 50 0D 20 20 20 20  20 20 20 20 20 4E 4F 50  |NOP.         NOP|
00001830: 0D 20 20 20 20 20 20 20  20 20 4E 4F 50 0D 20 20  |.         NOP.  |
00001840: 20 20 20 20 20 20 20 4C  44 58 20 23 24 30 35 0D  |       LDX #$05.|
00001850: 4A 33 20 20 20 20 20 20  20 44 45 58 0D 20 20 20  |J3       DEX.   |
00001860: 20 20 20 20 20 20 42 4E  45 20 4A 33 0D 20 20 20  |      BNE J3.   |
00001870: 20 20 20 20 20 20 52 54  53 0D 3B 2D 2D 2D 2D 2D  |      RTS.;-----|
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 0D 20 20 20 20 20  20 20 20 20 2E 42 59 54  |--.         .BYT|
000018B0: 45 20 24 30 39 2C 24 32  30 2C 24 30 43 2C 24 30  |E $09,$20,$0C,$0|
000018C0: 46 2C 24 31 36 2C 24 30  35 0D 20 20 20 20 20 20  |F,$16,$05.      |
000018D0: 20 20 20 2E 42 59 54 45  20 24 32 30 2C 24 31 39  |   .BYTE $20,$19|
000018E0: 2C 24 30 46 2C 24 31 35  2C 24 32 30 2C 24 31 34  |,$0F,$15,$20,$14|
000018F0: 0D 20 20 20 20 20 20 20  20 20 2E 42 59 54 45 20  |.         .BYTE |
00001900: 24 30 46 2C 24 30 46 2C  24 32 43 2C 24 32 30 2C  |$0F,$0F,$2C,$20,|
00001910: 24 31 33 2C 24 30 45 0D  20 20 20 20 20 20 20 20  |$13,$0E.        |
00001920: 20 2E 42 59 54 45 20 24  30 35 2C 24 30 31 2C 24  | .BYTE $05,$01,$|
00001930: 30 42 2C 24 30 35 2C 24  31 32 2C 24 32 45 0D 20  |0B,$05,$12,$2E. |
00001940: 20 20 20 20 20 20 20 20  2E 42 59 54 45 20 24 32  |        .BYTE $2|
00001950: 45 2C 24 32 30 2C 24 32  46 2C 24 30 42 2C 24 30  |E,$20,$2F,$0B,$0|
00001960: 36 0D 3B 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |6.;-------------|
00001970: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001980: 2D 2D 2D 2D 2D 2D 2D 2D  2D 3B 0D 3B D7 48 4F 3F  |---------;.;.HO?|
00001990: 20 2D 20 C9 20 44 4F 4E  27 54 20 4B 4E 4F 57 2E  | - . DON'T KNOW.|
000019A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000019B0: 20 20 3B 0D 3B 20 20 20  20 20 20 20 41 42 53 4F  |  ;.;       ABSO|
000019C0: 4C 55 54 45 4C 59 20 4E  4F 20 49 44 45 41 2E 20  |LUTELY NO IDEA. |
000019D0: 20 20 20 20 20 20 20 20  20 20 20 3B 0D 3B 2D 2D  |           ;.;--|
000019E0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000019F0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001A00: 2D 2D 2D 2D 3B 0D 0D                              |----;..         |
;--------------------------------------;
.;                                      
;.;              LOADER (C)             
 ;.;                                    
  ;.;           KUNG OF MUST INC.       
   ;.;                                  
    ;.;THIS VERSION SPECIALLY LICENSED T
O JFK;.;                                
      ;.;-------------------------------
-------;.         *= $0800 ;ORIGIN.;----
-----------------------------------.ZZ0 
     = $07    ;OCCUPIES ZZ0..ZZ0+5.     
             ;SELECTABLE.               
   ;ZEROPAGE ADDRESSES.;----------------
----------------------;.; X,Y=FILENAME..
.                      ;.;--------------
------------------------;.LOAD     STX N
AME1+1.         STY NAME2+1.         TSX
.         STX STACK.         LDA #$35.  
       STA 1.         LDA $DD00.        
 AND #$0F.         STA F5+1.         EOR
 #$10.         STA F4+1.         EOR #$3
0.         STA F1+1.         EOR #$B0.  
       STA F2+1.         EOR #$50.      
   STA F3+1.         STA F6+1.         J
SR SENDNAME.         JSR WAIT.;---------
------------------------------.         
JSR XBYTE.         STA BBG+1.         JS
R XBYTE.         STA BBG+2.         JSR 
XBYTE.         STA BBC.         JSR XBYT
E.         STA BB8+1.         LDY #0.   
      STY BB1+1.BB0      JSR XBYTE.BB1  
    LDY #0.         STA BUFFER,Y.       
  INC BB1+1.         CPY #$62.         B
NE BB0.         LDA #$34.         STA 1.
         LDX #0.BB2      JSR BBO.       
  TAY.BB3      JSR BBD.         JSR BBG.
         DEY.         BNE BB3.         J
SR BBP.         STA ZZ0.BB4      LDY #$2
0.         JSR BBP.         PHA.        
 TAY.         CPY #2.         BNE BB5.  
       DEX.BB5      JSR BBI.         DEY
.         BEQ BBA.         DEY.         
BNE BB6.         ADC #9.BB6      TAY.BB7
      LDX BUFFER+$40,Y.         JSR BBK.
         ADC BUFFER+$4D,Y.         TAX. 
        LDA ZZ0+2.         ADC #0.      
   CPY #9.         BCS BB9.         ADC 
BUFFER+$5A,Y.         BNE BB9.         L
DY #8.BB8      CPX #0.         BEQ BB7.B
B9      TAY.         TXA.BBA      SEC.  
       ADC BBG+1.         STA ZZ0+3.    
     TYA.         ADC BBG+2.         STA
 ZZ0+4.         PLA.         TAX.       
  LDY #0.         LDA (ZZ0+3),Y.        
 DEC ZZ0+4.BBB      JSR BBG.         DEY
.         LDA (ZZ0+3),Y.         DEX.   
      BNE BBB.         DEC ZZ0.         
BNE BB4.         BEQ BB2.BBC      BRK.BB
D      PHP.         INC 1.         JSR X
BYTE.         DEC 1.         PLP.       
  RTS.BBG      STA $FFFF.         LDA BB
G+1.         BNE BBH.         DEC BBG+2.
BBH      DEC BBG+1.         RTS.BBI     
 INX.         INX.BBJ      INX.BBK      
LDA #0.         STA ZZ0+1.         STA Z
Z0+2.         TXA.         BEQ BBN.BBL  
    ASL BBC.         BNE BBM.         JS
R BBD.         ROL A.         STA BBC.BB
M      ROL ZZ0+1.         ROL ZZ0+2.    
     DEX.         BNE BBL.         LDA Z
Z0+1.BBN      RTS.BBO      LDY #0.BBP   
   INY.         JSR BBJ.         BEQ BBP
.         CPY #$31.         BEQ BBQ.    
     LDX BUFFER-1,Y.         JSR BBK.   
      ADC BUFFER+$0F,Y.         RTS.BBQ 
     PLA.         PLA.         LDA #$35.
         STA 1.         JSR XBYTE.      
   CLC.         RTS.;-------------------
--------------------.BUFFER.         .BY
TE $00,$00,$00,$00,$00,$00.         .BYT
E $00,$00,$00,$00,$00,$00.         .BYTE
 $00,$00,$00,$00,$00,$00.         .BYTE 
$00,$00,$00,$00,$00,$00.         .BYTE $
00,$00,$00,$00,$00,$00.         .BYTE $0
0,$00,$00,$00,$00,$00.         .BYTE $00
,$00,$00,$00,$00,$00.         .BYTE $00,
$00,$00,$00,$00,$00.         .BYTE $00,$
00,$00,$00,$00,$00.         .BYTE $00,$0
0,$00,$00,$00,$00.         .BYTE $00,$00
,$00,$00,$00,$00.         .BYTE $00,$00,
$00,$00,$00,$00.         .BYTE $00,$00,$
00,$00,$00,$00.         .BYTE $00,$00,$0
0,$00,$00,$00.         .BYTE $00,$00,$00
,$00,$00,$00.         .BYTE $00,$00,$00,
$00,$00,$00.         .BYTE $00,$00,$00.;
---------------------------------------.
;--------------------------------------;
.;IF THE ROUTINE RETURNS WITH CARRY SET 
;.;THERE HAS BEEN A LOADING ERROR. ALWAY
S;.;HAVE A WORKING ERRORPATH, I ALWAYS  
  ;.;TRY TO SHOW MY ADDRESS SO THAT PEOP
LE ;.;KNOW WHERE TO GET A WORKING COPY! 
    ;.;EG:                              
     ;.;            LDX #$41            
      ;.;            LDY #$42           
       ;.;            JSR LOAD          
        ;.;            BCS ERRORROUTINE 
         ;.;                            
          ;.;---------------------------
-----------;.XBYTE    STX PLO+1.XX      
 JSR TAKEBY.         CMP #$99.         B
NE PLO.         JSR TAKEBY.         CMP 
#$99.         BEQ PLO.         CMP #$FF.
         BEQ PLO.         CMP #$FE.     
    BEQ FEL.         JSR WAIT.         B
EQ XX.PLO      LDX #0.         RTS.FEL  
    LDA #$60     ;NO MORE LOAD!.        
 STA LOAD     ;OMEGABUG...         LDX S
TACK.         TXS.         LDA #$35.    
     STA 1.         SEC.         RTS.STA
CK    .BYTE 0.;-------------------------
-------------;.SENDNAME.F1       LDA #$2
0.         STA $DD00.         JSR WAIT.N
AME1    LDA #$00.         JSR SENDBY.NAM
E2    LDA #$00.         JSR SENDBY.     
    RTS.;-------------------------------
--------.TAKEBY   JSR TAKE2B.         JS
R TAKE2B.         JSR TAKE2B.         JS
R TAKE2B.         JSR NOTHING.         L
DA ZZ0+5.NOTHING  RTS.;-----------------
----------------------.TAKE2B.F2       L
DX #$90.         LDA $DD00.         STX 
$DD00.         ASL A.         ROR ZZ0+5.
         PHA.         PLA.         PHA. 
        PLA.F3       LDX #$C0.         L
DA $DD00.         STX $DD00.         ASL
 A.         ROR ZZ0+5.         RTS.;----
-----------------------------------.SEND
BY   STA ZZ0+5.         JSR SEND2B.     
    JSR SEND2B.         JSR SEND2B.     
    JSR SEND2B.         RTS.;-----------
----------------------------.SEND2B.F4  
     LDA #$10.         LSR ZZ0+5.       
  BCC HIP.         ORA #$20.HIP      STA
 $DD00.         NOP.         NOP.       
  NOP.         NOP.F5       LDA #$00.   
      LSR ZZ0+5.         BCC HOP.       
  ORA #$20.HOP      STA $DD00.         N
OP.         NOP.         RTS.;----------
-----------------------------.WAIT     L
DX #$32.J1       DEX.         BNE J1.J2 
      LDA $DD00.         AND #$40.      
   BEQ J2.F6       LDA #$C0.         STA
 $DD00.         NOP.         NOP.       
  NOP.         LDX #$05.J3       DEX.   
      BNE J3.         RTS.;-------------
--------------------------.         .BYT
E $09,$20,$0C,$0F,$16,$05.         .BYTE
 $20,$19,$0F,$15,$20,$14.         .BYTE 
$0F,$0F,$2C,$20,$13,$0E.         .BYTE $
05,$01,$0B,$05,$12,$2E.         .BYTE $2
E,$20,$2F,$0B,$06.;---------------------
-----------------;.;WHO? - I DON'T KNOW.
                  ;.;       ABSOLUTELY N
O IDEA.            ;.;------------------
--------------------;..
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL