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

IRQ.SQ.Z    .IRQ

FILE INFORMATION

FILENAME(S): IRQ.SQ.Z    .IRQ

FILE TYPE(S): SEQ

FILE SIZE: 7.4K

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

APPEARS ON: 1 disk(s)

FILE HASH

b83b4fa65e55ef5897b653e5f5ed10a8799b34ee3e1f78cddbbed89e46e0da4d

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
LOADER DISK BY IRQ.SQ.Z    .IRQ SEQ Maestro 25 4 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 30 20 20  20 20 20 20 20 3D 20 24  |---.Z0       = $|
000001C0: 30 36 20 20 20 20 3B CF  43 43 55 50 49 45 53 20  |06    ;.CCUPIES |
000001D0: 5A 30 2E 2E 5A 30 2B 31  31 0D 20 20 20 20 20 20  |Z0..Z0+11.      |
000001E0: 20 20 20 20 20 20 20 20  20 20 20 20 3B 20 20 20  |            ;   |
000001F0: 20 20 20 20 20 28 5A 30  2E 2E 5A 30 2B 24 30 42  |     (Z0..Z0+$0B|
00000200: 29 0D 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |).              |
00000210: 20 20 20 20 3B 53 45 4C  45 43 54 41 42 4C 45 0D  |    ;SELECTABLE.|
00000220: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000230: 20 20 3B 5A 45 52 4F 50  41 47 45 20 41 44 44 52  |  ;ZEROPAGE ADDR|
00000240: 45 53 53 45 53 0D 3B 2D  2D 2D 2D 2D 2D 2D 2D 2D  |ESSES.;---------|
00000250: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000260: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 3B 0D 3B  |-------------;.;|
00000270: 20 D8 2C D9 3D C6 49 4C  45 4E 41 4D 45 2E 2E 2E  | .,.=.ILENAME...|
00000280: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000290: 20 20 20 20 20 20 3B 0D  3B 2D 2D 2D 2D 2D 2D 2D  |      ;.;-------|
000002A0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000002B0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 3B  |---------------;|
000002C0: 0D 4C 4F 41 44 20 20 20  20 20 4C 44 41 20 23 24  |.LOAD     LDA #$|
000002D0: 33 35 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |35.         STA |
000002E0: 31 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 24  |1.         LDA $|
000002F0: 44 44 30 30 0D 20 20 20  20 20 20 20 20 20 41 4E  |DD00.         AN|
00000300: 44 20 23 24 30 46 0D 20  20 20 20 20 20 20 20 20  |D #$0F.         |
00000310: 53 54 41 20 46 35 2B 31  0D 20 20 20 20 20 20 20  |STA F5+1.       |
00000320: 20 20 45 4F 52 20 23 24  31 30 0D 20 20 20 20 20  |  EOR #$10.     |
00000330: 20 20 20 20 53 54 41 20  46 34 2B 31 0D 20 20 20  |    STA F4+1.   |
00000340: 20 20 20 20 20 20 45 4F  52 20 23 24 33 30 0D 20  |      EOR #$30. |
00000350: 20 20 20 20 20 20 20 20  53 54 41 20 46 31 2B 31  |        STA F1+1|
00000360: 0D 20 20 20 20 20 20 20  20 20 45 4F 52 20 23 24  |.         EOR #$|
00000370: 42 30 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |B0.         STA |
00000380: 46 32 2B 31 0D 20 20 20  20 20 20 20 20 20 45 4F  |F2+1.         EO|
00000390: 52 20 23 24 35 30 0D 20  20 20 20 20 20 20 20 20  |R #$50.         |
000003A0: 53 54 41 20 46 33 2B 31  0D 20 20 20 20 20 20 20  |STA F3+1.       |
000003B0: 20 20 53 54 41 20 46 36  2B 31 0D 20 20 20 20 20  |  STA F6+1.     |
000003C0: 20 20 20 20 4A 53 52 20  53 45 4E 44 4E 41 4D 45  |    JSR SENDNAME|
000003D0: 0D 20 20 20 20 20 20 20  20 20 4A 53 52 20 57 41  |.         JSR WA|
000003E0: 49 54 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |IT.         LDA |
000003F0: 23 30 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |#0.         STA |
00000400: 5A 30 2B 31 0D 53 54 41  52 54 20 20 20 20 4C 44  |Z0+1.START    LD|
00000410: 58 20 23 34 0D 4C 30 20  20 20 20 20 20 20 4A 53  |X #4.L0       JS|
00000420: 52 20 58 42 59 54 45 0D  20 20 20 20 20 20 20 20  |R XBYTE.        |
00000430: 20 4C 44 59 20 5A 30 2B  31 0D 20 20 20 20 20 20  | LDY Z0+1.      |
00000440: 20 20 20 42 4E 45 20 4C  31 0D 20 20 20 20 20 20  |   BNE L1.      |
00000450: 20 20 20 53 54 41 20 5A  30 2B 37 2C 58 0D 20 20  |   STA Z0+7,X.  |
00000460: 20 20 20 20 20 20 20 44  45 58 0D 20 20 20 20 20  |       DEX.     |
00000470: 20 20 20 20 42 50 4C 20  4C 30 0D 20 20 20 20 20  |    BPL L0.     |
00000480: 20 20 20 20 4C 44 41 20  5A 30 2B 38 0D 20 20 20  |    LDA Z0+8.   |
00000490: 20 20 20 20 20 20 53 54  41 20 44 4F 4D 31 34 2B  |      STA DOM14+|
000004A0: 31 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 5A  |1.         LDA Z|
000004B0: 30 2B 39 0D 20 20 20 20  20 20 20 20 20 53 54 41  |0+9.         STA|
000004C0: 20 44 4F 4D 31 34 2B 32  0D 20 20 20 20 20 20 20  | DOM14+2.       |
000004D0: 20 20 4C 44 59 20 5A 30  2B 31 0D 20 20 20 20 20  |  LDY Z0+1.     |
000004E0: 20 20 20 20 42 4E 45 20  4C 31 0D 20 20 20 20 20  |    BNE L1.     |
000004F0: 20 20 20 20 4C 44 41 20  23 24 33 34 0D 20 20 20  |    LDA #$34.   |
00000500: 20 20 20 20 20 20 53 54  41 20 31 0D 20 20 20 20  |      STA 1.    |
00000510: 20 20 20 20 20 4A 53 52  20 49 31 30 33 36 0D 4C  |     JSR I1036.L|
00000520: 41 58 46 49 5A 4B 20 20  4A 53 52 20 44 45 5A 49  |AXFIZK  JSR DEZI|
00000530: 50 50 0D 20 20 20 20 20  20 20 20 20 49 4E 43 20  |PP.         INC |
00000540: 31 0D 20 20 20 20 20 20  20 20 20 42 4E 45 20 53  |1.         BNE S|
00000550: 54 41 52 54 0D 4C 31 20  20 20 20 20 20 20 43 4C  |TART.L1       CL|
00000560: 43 20 20 20 20 20 20 20  20 20 20 3B C9 46 20 53  |C          ;.F S|
00000570: 45 43 20 54 48 45 4E 20  42 55 47 21 0D 20 20 20  |EC THEN BUG!.   |
00000580: 20 20 20 20 20 20 52 54  53 0D 3B 2D 2D 2D 2D 2D  |      RTS.;-----|
00000590: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000005A0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000005B0: 2D 3B 0D 3B C9 46 20 54  48 45 20 52 4F 55 54 49  |-;.;.F THE ROUTI|
000005C0: 4E 45 20 52 45 54 55 52  4E 53 20 57 49 54 48 20  |NE RETURNS WITH |
000005D0: 43 41 52 52 59 20 53 45  54 20 3B 0D 3B 54 48 45  |CARRY SET ;.;THE|
000005E0: 52 45 20 48 41 53 20 42  45 45 4E 20 41 20 4C 4F  |RE HAS BEEN A LO|
000005F0: 41 44 49 4E 47 20 45 52  52 4F 52 2E 20 C1 4C 57  |ADING ERROR. .LW|
00000600: 41 59 53 3B 0D 3B 48 41  56 45 20 41 20 57 4F 52  |AYS;.;HAVE A WOR|
00000610: 4B 49 4E 47 20 45 52 52  4F 52 50 41 54 48 2C 20  |KING ERRORPATH, |
00000620: C9 20 41 4C 57 41 59 53  20 20 20 20 3B 0D 3B 54  |. ALWAYS    ;.;T|
00000630: 52 59 20 54 4F 20 53 48  4F 57 20 4D 59 20 41 44  |RY TO SHOW MY AD|
00000640: 44 52 45 53 53 20 53 4F  20 54 48 41 54 20 50 45  |DRESS SO THAT PE|
00000650: 4F 50 4C 45 20 3B 0D 3B  4B 4E 4F 57 20 57 48 45  |OPLE ;.;KNOW WHE|
00000660: 52 45 20 54 4F 20 47 45  54 20 41 20 57 4F 52 4B  |RE TO GET A WORK|
00000670: 49 4E 47 20 43 4F 50 59  21 20 20 20 20 20 3B 0D  |ING COPY!     ;.|
00000680: 3B C5 47 3A 20 20 20 20  20 20 20 20 20 20 20 20  |;.G:            |
00000690: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000006A0: 20 20 20 20 20 20 20 3B  0D 3B 20 20 20 20 20 20  |       ;.;      |
000006B0: 20 20 20 20 20 20 CC C4  D8 20 23 24 34 31 20 20  |      ... #$41  |
000006C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000006D0: 3B 0D 3B 20 20 20 20 20  20 20 20 20 20 20 20 CC  |;.;            .|
000006E0: C4 D9 20 23 24 34 32 20  20 20 20 20 20 20 20 20  |.. #$42         |
000006F0: 20 20 20 20 20 20 20 20  20 3B 0D 3B 20 20 20 20  |         ;.;    |
00000700: 20 20 20 20 20 20 20 20  CA D3 D2 20 4C 4F 41 44  |        ... LOAD|
00000710: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000720: 20 20 3B 0D 3B 20 20 20  20 20 20 20 20 20 20 20  |  ;.;           |
00000730: 20 C2 C3 D3 20 45 52 52  4F 52 52 4F 55 54 49 4E  | ... ERRORROUTIN|
00000740: 45 20 20 20 20 20 20 20  20 20 20 3B 0D 3B 20 20  |E          ;.;  |
00000750: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000760: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000770: 20 20 20 20 3B 0D 3B 2D  2D 2D 2D 2D 2D 2D 2D 2D  |    ;.;---------|
00000780: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000790: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 3B 0D 49  |-------------;.I|
000007A0: 31 30 33 36 20 20 20 20  54 59 41 0D 20 20 20 20  |1036    TYA.    |
000007B0: 20 20 20 20 20 53 54 41  20 5A 30 2B 32 0D 20 20  |     STA Z0+2.  |
000007C0: 20 20 20 20 20 20 20 53  54 59 20 5A 30 2B 34 0D  |       STY Z0+4.|
000007D0: 49 31 30 33 42 20 20 20  20 4A 53 52 20 49 31 30  |I103B    JSR I10|
000007E0: 41 37 0D 20 20 20 20 20  20 20 20 20 52 4F 4C 20  |A7.         ROL |
000007F0: 41 0D 20 20 20 20 20 20  20 20 20 42 4E 45 20 49  |A.         BNE I|
00000800: 31 30 34 33 0D 20 20 20  20 20 20 20 20 20 42 43  |1043.         BC|
00000810: 43 20 49 31 30 34 46 0D  49 31 30 34 33 20 20 20  |C I104F.I1043   |
00000820: 20 52 4F 4C 20 5A 30 2B  34 0D 20 20 20 20 20 20  | ROL Z0+4.      |
00000830: 20 20 20 4A 53 52 20 49  31 30 41 37 0D 20 20 20  |   JSR I10A7.   |
00000840: 20 20 20 20 20 20 42 43  53 20 49 31 30 33 42 0D  |      BCS I103B.|
00000850: 20 20 20 20 20 20 20 20  20 53 54 41 20 5A 30 2B  |         STA Z0+|
00000860: 33 0D 20 20 20 20 20 20  20 20 20 4A 53 52 20 49  |3.         JSR I|
00000870: 31 30 43 33 0D 49 31 30  34 46 20 20 20 20 54 59  |10C3.I104F    TY|
00000880: 41 0D 20 20 20 20 20 20  20 20 20 53 54 59 20 5A  |A.         STY Z|
00000890: 30 2B 35 0D 20 20 20 20  20 20 20 20 20 53 54 59  |0+5.         STY|
000008A0: 20 5A 30 2B 36 0D 49 31  30 35 34 20 20 20 20 4A  | Z0+6.I1054    J|
000008B0: 53 52 20 49 31 30 41 37  0D 20 20 20 20 20 20 20  |SR I10A7.       |
000008C0: 20 20 52 4F 4C 20 41 0D  20 20 20 20 20 20 20 20  |  ROL A.        |
000008D0: 20 42 45 51 20 49 31 30  36 33 0D 20 20 20 20 20  | BEQ I1063.     |
000008E0: 20 20 20 20 42 4D 49 20  49 31 30 36 31 0D 20 20  |    BMI I1061.  |
000008F0: 20 20 20 20 20 20 20 4A  53 52 20 49 31 30 41 37  |       JSR I10A7|
00000900: 0D 20 20 20 20 20 20 20  20 20 42 43 53 20 49 31  |.         BCS I1|
00000910: 30 35 34 0D 49 31 30 36  31 20 20 20 20 49 4E 43  |054.I1061    INC|
00000920: 20 5A 30 2B 32 0D 49 31  30 36 33 20 20 20 20 41  | Z0+2.I1063    A|
00000930: 44 43 20 23 32 0D 20 20  20 20 20 20 20 20 20 53  |DC #2.         S|
00000940: 54 41 20 5A 30 2B 33 0D  20 20 20 20 20 20 20 20  |TA Z0+3.        |
00000950: 20 4C 44 58 20 23 32 0D  49 31 30 36 39 20 20 20  | LDX #2.I1069   |
00000960: 20 4A 53 52 20 49 31 30  41 37 0D 20 20 20 20 20  | JSR I10A7.     |
00000970: 20 20 20 20 52 4F 4C 20  5A 30 2B 32 0D 20 20 20  |    ROL Z0+2.   |
00000980: 20 20 20 20 20 20 44 45  58 0D 20 20 20 20 20 20  |      DEX.      |
00000990: 20 20 20 42 4E 45 20 49  31 30 36 39 0D 49 31 30  |   BNE I1069.I10|
000009A0: 37 31 20 20 20 20 4C 44  58 20 5A 30 2B 32 0D 20  |71    LDX Z0+2. |
000009B0: 20 20 20 20 20 20 20 20  4C 44 41 20 4C 41 42 41  |        LDA LABA|
000009C0: 4E 2C 58 0D 20 20 20 20  20 20 20 20 20 54 41 58  |N,X.         TAX|
000009D0: 0D 20 20 20 20 20 20 20  20 20 42 45 51 20 49 31  |.         BEQ I1|
000009E0: 30 38 33 0D 49 31 30 37  39 20 20 20 20 4A 53 52  |083.I1079    JSR|
000009F0: 20 49 31 30 41 37 0D 20  20 20 20 20 20 20 20 20  | I10A7.         |
00000A00: 52 4F 4C 20 5A 30 2B 35  0D 20 20 20 20 20 20 20  |ROL Z0+5.       |
00000A10: 20 20 52 4F 4C 20 5A 30  2B 36 0D 20 20 20 20 20  |  ROL Z0+6.     |
00000A20: 20 20 20 20 44 45 58 0D  20 20 20 20 20 20 20 20  |    DEX.        |
00000A30: 20 42 4E 45 20 49 31 30  37 39 0D 49 31 30 38 33  | BNE I1079.I1083|
00000A40: 20 20 20 20 4C 44 41 20  5A 30 2B 32 0D 20 20 20  |    LDA Z0+2.   |
00000A50: 20 20 20 20 20 20 41 4E  44 20 23 33 0D 20 20 20  |      AND #3.   |
00000A60: 20 20 20 20 20 20 42 45  51 20 49 31 30 39 33 0D  |      BEQ I1093.|
00000A70: 20 20 20 20 20 20 20 20  20 49 4E 43 20 5A 30 2B  |         INC Z0+|
00000A80: 35 0D 20 20 20 20 20 20  20 20 20 42 4E 45 20 49  |5.         BNE I|
00000A90: 31 30 38 46 0D 20 20 20  20 20 20 20 20 20 49 4E  |108F.         IN|
00000AA0: 43 20 5A 30 2B 36 0D 49  31 30 38 46 20 20 20 20  |C Z0+6.I108F    |
00000AB0: 44 45 43 20 5A 30 2B 32  0D 20 20 20 20 20 20 20  |DEC Z0+2.       |
00000AC0: 20 20 42 50 4C 20 49 31  30 37 31 0D 49 31 30 39  |  BPL I1071.I109|
00000AD0: 33 20 20 20 20 43 4C 43  0D 20 20 20 20 20 20 20  |3    CLC.       |
00000AE0: 20 20 4C 44 41 20 5A 30  2B 38 0D 20 20 20 20 20  |  LDA Z0+8.     |
00000AF0: 20 20 20 20 41 44 43 20  5A 30 2B 35 0D 20 20 20  |    ADC Z0+5.   |
00000B00: 20 20 20 20 20 20 53 54  41 20 5A 30 2B 35 0D 20  |      STA Z0+5. |
00000B10: 20 20 20 20 20 20 20 20  4C 44 41 20 5A 30 2B 39  |        LDA Z0+9|
00000B20: 0D 20 20 20 20 20 20 20  20 20 41 44 43 20 5A 30  |.         ADC Z0|
00000B30: 2B 36 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |+6.         STA |
00000B40: 5A 30 2B 36 0D 20 20 20  20 20 20 20 20 20 49 4E  |Z0+6.         IN|
00000B50: 43 20 5A 30 2B 32 0D 20  20 20 20 20 20 20 20 20  |C Z0+2.         |
00000B60: 4A 53 52 20 49 31 30 44  36 0D 20 20 20 20 20 20  |JSR I10D6.      |
00000B70: 20 20 20 42 45 51 20 49  31 30 33 36 0D 49 31 30  |   BEQ I1036.I10|
00000B80: 41 37 20 20 20 20 41 53  4C 20 5A 30 2B 37 0D 20  |A7    ASL Z0+7. |
00000B90: 20 20 20 20 20 20 20 20  42 4E 45 20 49 31 30 43  |        BNE I10C|
00000BA0: 32 0D 20 20 20 20 20 20  20 20 20 43 50 59 20 5A  |2.         CPY Z|
00000BB0: 30 2B 31 30 0D 20 20 20  20 20 20 20 20 20 42 4E  |0+10.         BN|
00000BC0: 45 20 49 31 30 42 35 0D  20 20 20 20 20 20 20 20  |E I10B5.        |
00000BD0: 20 43 50 59 20 5A 30 2B  31 31 0D 20 20 20 20 20  | CPY Z0+11.     |
00000BE0: 20 20 20 20 42 45 51 20  49 31 30 43 30 0D 20 20  |    BEQ I10C0.  |
00000BF0: 20 20 20 20 20 20 20 44  45 43 20 5A 30 2B 31 31  |       DEC Z0+11|
00000C00: 0D 49 31 30 42 35 20 20  20 20 44 45 43 20 5A 30  |.I10B5    DEC Z0|
00000C10: 2B 31 30 0D 20 20 20 20  20 20 20 20 20 50 48 41  |+10.         PHA|
00000C20: 0D 20 20 20 20 20 20 20  20 20 4A 53 52 20 49 31  |.         JSR I1|
00000C30: 30 46 46 0D 20 20 20 20  20 20 20 20 20 53 45 43  |0FF.         SEC|
00000C40: 0D 20 20 20 20 20 20 20  20 20 52 4F 4C 20 41 0D  |.         ROL A.|
00000C50: 20 20 20 20 20 20 20 20  20 53 54 41 20 5A 30 2B  |         STA Z0+|
00000C60: 37 0D 20 20 20 20 20 20  20 20 20 2E 42 59 54 45  |7.         .BYTE|
00000C70: 20 24 32 34 0D 49 31 30  43 30 20 20 20 20 50 4C  | $24.I10C0    PL|
00000C80: 41 0D 20 20 20 20 20 20  20 20 20 50 4C 41 0D 49  |A.         PLA.I|
00000C90: 31 30 43 32 20 20 20 20  52 54 53 0D 49 31 30 43  |10C2    RTS.I10C|
00000CA0: 33 20 20 20 20 53 45 43  0D 20 20 20 20 20 20 20  |3    SEC.       |
00000CB0: 20 20 4C 44 41 20 5A 30  2B 31 30 0D 20 20 20 20  |  LDA Z0+10.    |
00000CC0: 20 20 20 20 20 53 42 43  20 5A 30 2B 33 0D 20 20  |     SBC Z0+3.  |
00000CD0: 20 20 20 20 20 20 20 53  54 41 20 5A 30 2B 35 0D  |       STA Z0+5.|
00000CE0: 20 20 20 20 20 20 20 20  20 53 54 41 20 5A 30 2B  |         STA Z0+|
00000CF0: 31 30 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |10.         LDA |
00000D00: 5A 30 2B 31 31 0D 20 20  20 20 20 20 20 20 20 53  |Z0+11.         S|
00000D10: 42 43 20 23 30 0D 20 20  20 20 20 20 20 20 20 53  |BC #0.         S|
00000D20: 54 41 20 5A 30 2B 36 0D  20 20 20 20 20 20 20 20  |TA Z0+6.        |
00000D30: 20 53 42 43 20 5A 30 2B  34 0D 20 20 20 20 20 20  | SBC Z0+4.      |
00000D40: 20 20 20 53 54 41 20 5A  30 2B 31 31 0D 49 31 30  |   STA Z0+11.I10|
00000D50: 44 36 20 20 20 20 4C 44  59 20 5A 30 2B 33 0D 20  |D6    LDY Z0+3. |
00000D60: 20 20 20 20 20 20 20 20  42 45 51 20 49 31 30 45  |        BEQ I10E|
00000D70: 44 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 5A  |D.         LDA Z|
00000D80: 30 2B 38 0D 20 20 20 20  20 20 20 20 20 53 45 43  |0+8.         SEC|
00000D90: 0D 20 20 20 20 20 20 20  20 20 53 42 43 20 5A 30  |.         SBC Z0|
00000DA0: 2B 33 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |+3.         STA |
00000DB0: 5A 30 2B 38 0D 20 20 20  20 20 20 20 20 20 42 43  |Z0+8.         BC|
00000DC0: 53 20 49 31 30 45 35 0D  49 31 30 45 33 20 20 20  |S I10E5.I10E3   |
00000DD0: 20 44 45 43 20 5A 30 2B  39 0D 49 31 30 45 35 20  | DEC Z0+9.I10E5 |
00000DE0: 20 20 20 4A 53 52 20 49  31 30 46 38 0D 20 20 20  |   JSR I10F8.   |
00000DF0: 20 20 20 20 20 20 53 54  41 20 28 5A 30 2B 38 29  |      STA (Z0+8)|
00000E00: 2C 59 0D 20 20 20 20 20  20 20 20 20 44 45 59 0D  |,Y.         DEY.|
00000E10: 20 20 20 20 20 20 20 20  20 42 4E 45 20 49 31 30  |         BNE I10|
00000E20: 45 35 0D 49 31 30 45 44  20 20 20 20 43 50 59 20  |E5.I10ED    CPY |
00000E30: 5A 30 2B 34 0D 20 20 20  20 20 20 20 20 20 42 45  |Z0+4.         BE|
00000E40: 51 20 49 31 30 46 37 0D  20 20 20 20 20 20 20 20  |Q I10F7.        |
00000E50: 20 44 45 43 20 5A 30 2B  36 0D 20 20 20 20 20 20  | DEC Z0+6.      |
00000E60: 20 20 20 44 45 43 20 5A  30 2B 34 0D 20 20 20 20  |   DEC Z0+4.    |
00000E70: 20 20 20 20 20 42 50 4C  20 49 31 30 45 33 0D 49  |     BPL I10E3.I|
00000E80: 31 30 46 37 20 20 20 20  52 54 53 0D 49 31 30 46  |10F7    RTS.I10F|
00000E90: 38 20 20 20 20 4C 44 41  20 5A 30 2B 32 0D 20 20  |8    LDA Z0+2.  |
00000EA0: 20 20 20 20 20 20 20 42  45 51 20 49 31 30 46 46  |       BEQ I10FF|
00000EB0: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 28 5A  |.         LDA (Z|
00000EC0: 30 2B 35 29 2C 59 0D 20  20 20 20 20 20 20 20 20  |0+5),Y.         |
00000ED0: 52 54 53 0D 49 31 30 46  46 20 20 20 20 49 4E 43  |RTS.I10FF    INC|
00000EE0: 20 31 0D 20 20 20 20 20  20 20 20 20 4A 53 52 20  | 1.         JSR |
00000EF0: 58 42 59 54 45 0D 20 20  20 20 20 20 20 20 20 44  |XBYTE.         D|
00000F00: 45 43 20 31 0D 20 20 20  20 20 20 20 20 20 52 54  |EC 1.         RT|
00000F10: 53 0D 3B 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |S.;-------------|
00000F20: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000F30: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 0D 4C 41 42 41 4E  |----------.LABAN|
00000F40: 20 20 20 20 2E 42 59 54  45 20 34 2C 32 2C 32 2C  |    .BYTE 4,2,2,|
00000F50: 32 2C 35 2C 32 2C 32 2C  33 0D 3B 2D 2D 2D 2D 2D  |2,5,2,2,3.;-----|
00000F60: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000F70: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000F80: 2D 2D 0D 44 45 5A 49 50  50 0D 20 20 20 20 20 20  |--.DEZIPP.      |
00000F90: 20 20 20 4A 53 52 20 44  4F 4D 31 34 0D 20 20 20  |   JSR DOM14.   |
00000FA0: 20 20 20 20 20 20 53 54  41 20 44 4F 4D 35 2B 31  |      STA DOM5+1|
00000FB0: 0D 20 20 20 20 20 20 20  20 20 4A 53 52 20 44 4F  |.         JSR DO|
00000FC0: 4D 31 30 0D 20 20 20 20  20 20 20 20 20 53 54 41  |M10.         STA|
00000FD0: 20 44 4F 4D 34 2B 31 0D  20 20 20 20 20 20 20 20  | DOM4+1.        |
00000FE0: 20 4A 53 52 20 44 4F 4D  31 30 0D 20 20 20 20 20  | JSR DOM10.     |
00000FF0: 20 20 20 20 53 54 41 20  44 4F 4D 33 2B 31 0D 20  |    STA DOM3+1. |
00001000: 20 20 20 20 20 20 20 20  4A 53 52 20 44 4F 4D 31  |        JSR DOM1|
00001010: 30 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 44  |0.         STA D|
00001020: 4F 4D 32 2B 31 0D 20 20  20 20 20 20 20 20 20 4A  |OM2+1.         J|
00001030: 53 52 20 44 4F 4D 31 30  0D 20 20 20 20 20 20 20  |SR DOM10.       |
00001040: 20 20 53 54 41 20 44 4F  4D 37 2B 32 0D 20 20 20  |  STA DOM7+2.   |
00001050: 20 20 20 20 20 20 4A 53  52 20 44 4F 4D 31 30 0D  |      JSR DOM10.|
00001060: 20 20 20 20 20 20 20 20  20 53 54 41 20 44 4F 4D  |         STA DOM|
00001070: 37 2B 31 0D 20 20 20 20  20 20 20 20 20 4A 53 52  |7+1.         JSR|
00001080: 20 44 4F 4D 31 30 0D 20  20 20 20 20 20 20 20 20  | DOM10.         |
00001090: 53 54 41 20 44 4F 4D 31  33 2B 31 0D 20 20 20 20  |STA DOM13+1.    |
000010A0: 20 20 20 20 20 4A 53 52  20 44 4F 4D 31 30 0D 20  |     JSR DOM10. |
000010B0: 20 20 20 20 20 20 20 20  53 54 41 20 44 4F 4D 31  |        STA DOM1|
000010C0: 32 2B 31 0D 20 20 20 20  20 20 20 20 20 4C 44 58  |2+1.         LDX|
000010D0: 20 23 30 0D 20 20 20 20  20 20 20 20 20 4C 44 59  | #0.         LDY|
000010E0: 20 23 34 0D 44 4F 4D 31  20 20 20 20 20 49 4E 58  | #4.DOM1     INX|
000010F0: 0D 20 20 20 20 20 20 20  20 20 4A 53 52 20 44 4F  |.         JSR DO|
00001100: 4D 31 30 0D 44 4F 4D 32  20 20 20 20 20 43 4D 50  |M10.DOM2     CMP|
00001110: 20 23 30 0D 20 20 20 20  20 20 20 20 20 42 45 51  | #0.         BEQ|
00001120: 20 44 4F 4D 31 35 0D 44  4F 4D 33 20 20 20 20 20  | DOM15.DOM3     |
00001130: 43 4D 50 20 23 30 0D 20  20 20 20 20 20 20 20 20  |CMP #0.         |
00001140: 42 45 51 20 44 4F 4D 31  37 0D 44 4F 4D 34 20 20  |BEQ DOM17.DOM4  |
00001150: 20 20 20 43 4D 50 20 23  30 0D 20 20 20 20 20 20  |   CMP #0.      |
00001160: 20 20 20 42 45 51 20 44  4F 4D 31 39 0D 44 4F 4D  |   BEQ DOM19.DOM|
00001170: 35 20 20 20 20 20 43 4D  50 20 23 30 0D 20 20 20  |5     CMP #0.   |
00001180: 20 20 20 20 20 20 42 45  51 20 44 4F 4D 32 30 0D  |      BEQ DOM20.|
00001190: 44 4F 4D 36 20 20 20 20  20 44 45 59 0D 44 4F 4D  |DOM6     DEY.DOM|
000011A0: 37 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |7.         STA $|
000011B0: 31 30 30 30 2C 59 0D 20  20 20 20 20 20 20 20 20  |1000,Y.         |
000011C0: 42 4E 45 20 44 4F 4D 38  0D 20 20 20 20 20 20 20  |BNE DOM8.       |
000011D0: 20 20 44 45 43 20 44 4F  4D 37 2B 32 0D 44 4F 4D  |  DEC DOM7+2.DOM|
000011E0: 38 20 20 20 20 20 44 45  58 0D 20 20 20 20 20 20  |8     DEX.      |
000011F0: 20 20 20 42 4E 45 20 44  4F 4D 36 0D 20 20 20 20  |   BNE DOM6.    |
00001200: 20 20 20 20 20 42 45 51  20 44 4F 4D 31 0D 44 4F  |     BEQ DOM1.DO|
00001210: 4D 39 0D 20 20 20 20 20  20 20 20 20 50 4C 41 0D  |M9.         PLA.|
00001220: 20 20 20 20 20 20 20 20  20 50 4C 41 0D 20 20 20  |         PLA.   |
00001230: 20 20 20 20 20 20 52 54  53 0D 3B 2D 2D 2D 2D 2D  |      RTS.;-----|
00001240: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001250: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001260: 2D 2D 0D 44 4F 4D 31 30  0D 20 20 20 20 20 20 20  |--.DOM10.       |
00001270: 20 20 4C 44 41 20 44 4F  4D 31 34 2B 31 0D 20 20  |  LDA DOM14+1.  |
00001280: 20 20 20 20 20 20 20 42  4E 45 20 44 4F 4D 31 31  |       BNE DOM11|
00001290: 0D 20 20 20 20 20 20 20  20 20 44 45 43 20 44 4F  |.         DEC DO|
000012A0: 4D 31 34 2B 32 0D 44 4F  4D 31 31 20 20 20 20 44  |M14+2.DOM11    D|
000012B0: 45 43 20 44 4F 4D 31 34  2B 31 0D 20 20 20 20 20  |EC DOM14+1.     |
000012C0: 20 20 20 20 4C 44 41 20  44 4F 4D 31 34 2B 31 0D  |    LDA DOM14+1.|
000012D0: 44 4F 4D 31 32 20 20 20  20 43 4D 50 20 23 30 0D  |DOM12    CMP #0.|
000012E0: 20 20 20 20 20 20 20 20  20 42 4E 45 20 44 4F 4D  |         BNE DOM|
000012F0: 31 34 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |14.         LDA |
00001300: 44 4F 4D 31 34 2B 32 0D  44 4F 4D 31 33 20 20 20  |DOM14+2.DOM13   |
00001310: 20 43 4D 50 20 23 30 0D  20 20 20 20 20 20 20 20  | CMP #0.        |
00001320: 20 42 45 51 20 44 4F 4D  39 0D 44 4F 4D 31 34 20  | BEQ DOM9.DOM14 |
00001330: 20 20 20 4C 44 41 20 24  31 30 30 30 0D 20 20 20  |   LDA $1000.   |
00001340: 20 20 20 20 20 20 52 54  53 0D 44 4F 4D 31 35 0D  |      RTS.DOM15.|
00001350: 20 20 20 20 20 20 20 20  20 4A 53 52 20 44 4F 4D  |         JSR DOM|
00001360: 31 30 0D 20 20 20 20 20  20 20 20 20 54 41 58 0D  |10.         TAX.|
00001370: 44 4F 4D 31 36 20 20 20  20 4A 53 52 20 44 4F 4D  |DOM16    JSR DOM|
00001380: 31 30 0D 20 20 20 20 20  20 20 20 20 4A 4D 50 20  |10.         JMP |
00001390: 44 4F 4D 36 0D 44 4F 4D  31 37 0D 20 20 20 20 20  |DOM6.DOM17.     |
000013A0: 20 20 20 20 4A 53 52 20  44 4F 4D 31 30 0D 20 20  |    JSR DOM10.  |
000013B0: 20 20 20 20 20 20 20 54  41 58 0D 44 4F 4D 31 38  |       TAX.DOM18|
000013C0: 20 20 20 20 4C 44 41 20  23 24 30 30 0D 20 20 20  |    LDA #$00.   |
000013D0: 20 20 20 20 20 20 42 45  51 20 44 4F 4D 36 0D 44  |      BEQ DOM6.D|
000013E0: 4F 4D 31 39 0D 20 20 20  20 20 20 20 20 20 49 4E  |OM19.         IN|
000013F0: 58 0D 20 20 20 20 20 20  20 20 20 42 4E 45 20 44  |X.         BNE D|
00001400: 4F 4D 31 38 0D 44 4F 4D  32 30 20 20 20 20 4C 44  |OM18.DOM20    LD|
00001410: 58 20 23 33 0D 20 20 20  20 20 20 20 20 20 42 4E  |X #3.         BN|
00001420: 45 20 44 4F 4D 31 36 0D  3B 2D 2D 2D 2D 2D 2D 2D  |E DOM16.;-------|
00001430: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001440: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001450: 0D 58 42 59 54 45 20 20  20 20 53 54 58 20 50 4C  |.XBYTE    STX PL|
00001460: 4F 2B 31 0D 58 58 20 20  20 20 20 20 20 4A 53 52  |O+1.XX       JSR|
00001470: 20 54 41 4B 45 42 59 0D  20 20 20 20 20 20 20 20  | TAKEBY.        |
00001480: 20 43 4D 50 20 23 24 39  39 0D 20 20 20 20 20 20  | CMP #$99.      |
00001490: 20 20 20 42 4E 45 20 50  4C 4F 0D 20 20 20 20 20  |   BNE PLO.     |
000014A0: 20 20 20 20 4A 53 52 20  54 41 4B 45 42 59 0D 20  |    JSR TAKEBY. |
000014B0: 20 20 20 20 20 20 20 20  43 4D 50 20 23 24 39 39  |        CMP #$99|
000014C0: 0D 20 20 20 20 20 20 20  20 20 42 45 51 20 50 4C  |.         BEQ PL|
000014D0: 4F 0D 20 20 20 20 20 20  20 20 20 43 4D 50 20 23  |O.         CMP #|
000014E0: 24 46 46 0D 20 20 20 20  20 20 20 20 20 42 45 51  |$FF.         BEQ|
000014F0: 20 53 4C 55 54 0D 20 20  20 20 20 20 20 20 20 43  | SLUT.         C|
00001500: 4D 50 20 23 24 46 45 0D  20 20 20 20 20 20 20 20  |MP #$FE.        |
00001510: 20 42 45 51 20 46 45 4C  0D 20 20 20 20 20 20 20  | BEQ FEL.       |
00001520: 20 20 4A 53 52 20 57 41  49 54 0D 20 20 20 20 20  |  JSR WAIT.     |
00001530: 20 20 20 20 42 45 51 20  58 58 0D 50 4C 4F 20 20  |    BEQ XX.PLO  |
00001540: 20 20 20 20 4C 44 58 20  23 30 0D 20 20 20 20 20  |    LDX #0.     |
00001550: 20 20 20 20 52 54 53 0D  53 4C 55 54 20 20 20 20  |    RTS.SLUT    |
00001560: 20 49 4E 43 20 5A 30 2B  31 0D 20 20 20 20 20 20  | INC Z0+1.      |
00001570: 20 20 20 42 4E 45 20 50  4C 4F 0D 46 45 4C 20 20  |   BNE PLO.FEL  |
00001580: 20 20 20 20 4C 44 41 20  23 24 36 30 20 20 20 20  |    LDA #$60    |
00001590: 20 3B CE 4F 20 4D 4F 52  45 20 4C 4F 41 44 21 0D  | ;.O MORE LOAD!.|
000015A0: 20 20 20 20 20 20 20 20  20 53 54 41 20 58 42 59  |         STA XBY|
000015B0: 54 45 20 20 20 20 3B CF  4D 45 47 41 42 55 47 2E  |TE    ;.MEGABUG.|
000015C0: 2E 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 23  |..         LDA #|
000015D0: 24 33 38 20 20 20 20 20  3B CD 45 53 53 41 47 45  |$38     ;.ESSAGE|
000015E0: 2E 2E 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |...         STA |
000015F0: 4C 31 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |L1.         LDA |
00001600: 23 24 32 43 20 20 20 20  20 3B CE 4F 20 44 45 5A  |#$2C     ;.O DEZ|
00001610: 49 50 50 0D 20 20 20 20  20 20 20 20 20 53 54 41  |IPP.         STA|
00001620: 20 4C 41 58 46 49 5A 4B  0D 20 20 20 20 20 20 20  | LAXFIZK.       |
00001630: 20 20 49 4E 43 20 5A 30  2B 31 20 20 20 20 20 3B  |  INC Z0+1     ;|
00001640: C4 55 4D 4D 59 0D 20 20  20 20 20 20 20 20 20 4C  |.UMMY.         L|
00001650: 44 41 20 23 30 20 20 20  20 20 20 20 3B C3 41 4E  |DA #0       ;.AN|
00001660: 43 45 4C 20 4C 4F 41 44  0D 20 20 20 20 20 20 20  |CEL LOAD.       |
00001670: 20 20 53 54 41 20 5A 30  2B 31 30 0D 20 20 20 20  |  STA Z0+10.    |
00001680: 20 20 20 20 20 53 54 41  20 5A 30 2B 31 31 0D 20  |     STA Z0+11. |
00001690: 20 20 20 20 20 20 20 20  42 45 51 20 50 4C 4F 0D  |        BEQ PLO.|
000016A0: 3B 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |;---------------|
000016B0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000016C0: 2D 2D 2D 2D 2D 2D 2D 3B  0D 53 45 4E 44 4E 41 4D  |-------;.SENDNAM|
000016D0: 45 0D 20 20 20 20 20 20  20 20 20 53 54 58 20 4E  |E.         STX N|
000016E0: 41 4D 45 31 2B 31 0D 20  20 20 20 20 20 20 20 20  |AME1+1.         |
000016F0: 53 54 59 20 4E 41 4D 45  32 2B 31 0D 46 31 20 20  |STY NAME2+1.F1  |
00001700: 20 20 20 20 20 4C 44 41  20 23 24 32 30 0D 20 20  |     LDA #$20.  |
00001710: 20 20 20 20 20 20 20 53  54 41 20 24 44 44 30 30  |       STA $DD00|
00001720: 0D 20 20 20 20 20 20 20  20 20 4A 53 52 20 57 41  |.         JSR WA|
00001730: 49 54 0D 4E 41 4D 45 31  20 20 20 20 4C 44 41 20  |IT.NAME1    LDA |
00001740: 23 24 30 30 0D 20 20 20  20 20 20 20 20 20 4A 53  |#$00.         JS|
00001750: 52 20 53 45 4E 44 42 59  0D 4E 41 4D 45 32 20 20  |R SENDBY.NAME2  |
00001760: 20 20 4C 44 41 20 23 24  30 30 0D 20 20 20 20 20  |  LDA #$00.     |
00001770: 20 20 20 20 4A 53 52 20  53 45 4E 44 42 59 0D 20  |    JSR SENDBY. |
00001780: 20 20 20 20 20 20 20 20  52 54 53 0D 3B 2D 2D 2D  |        RTS.;---|
00001790: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000017A0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000017B0: 2D 2D 2D 2D 0D 54 41 4B  45 42 59 20 20 20 4A 53  |----.TAKEBY   JS|
000017C0: 52 20 54 41 4B 45 32 42  0D 20 20 20 20 20 20 20  |R TAKE2B.       |
000017D0: 20 20 4A 53 52 20 54 41  4B 45 32 42 0D 20 20 20  |  JSR TAKE2B.   |
000017E0: 20 20 20 20 20 20 4A 53  52 20 54 41 4B 45 32 42  |      JSR TAKE2B|
000017F0: 0D 20 20 20 20 20 20 20  20 20 4A 53 52 20 54 41  |.         JSR TA|
00001800: 4B 45 32 42 0D 20 20 20  20 20 20 20 20 20 4A 53  |KE2B.         JS|
00001810: 52 20 4E 4F 54 48 49 4E  47 0D 20 20 20 20 20 20  |R NOTHING.      |
00001820: 20 20 20 4C 44 41 20 5A  30 0D 4E 4F 54 48 49 4E  |   LDA Z0.NOTHIN|
00001830: 47 20 20 52 54 53 0D 3B  2D 2D 2D 2D 2D 2D 2D 2D  |G  RTS.;--------|
00001840: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001850: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 0D  |---------------.|
00001860: 54 41 4B 45 32 42 0D 46  32 20 20 20 20 20 20 20  |TAKE2B.F2       |
00001870: 4C 44 58 20 23 24 39 30  0D 20 20 20 20 20 20 20  |LDX #$90.       |
00001880: 20 20 4C 44 41 20 24 44  44 30 30 0D 20 20 20 20  |  LDA $DD00.    |
00001890: 20 20 20 20 20 53 54 58  20 24 44 44 30 30 0D 20  |     STX $DD00. |
000018A0: 20 20 20 20 20 20 20 20  41 53 4C 20 41 0D 20 20  |        ASL A.  |
000018B0: 20 20 20 20 20 20 20 52  4F 52 20 5A 30 0D 20 20  |       ROR Z0.  |
000018C0: 20 20 20 20 20 20 20 50  48 41 0D 20 20 20 20 20  |       PHA.     |
000018D0: 20 20 20 20 50 4C 41 0D  20 20 20 20 20 20 20 20  |    PLA.        |
000018E0: 20 50 48 41 0D 20 20 20  20 20 20 20 20 20 50 4C  | PHA.         PL|
000018F0: 41 0D 46 33 20 20 20 20  20 20 20 4C 44 58 20 23  |A.F3       LDX #|
00001900: 24 43 30 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |$C0.         LDA|
00001910: 20 24 44 44 30 30 0D 20  20 20 20 20 20 20 20 20  | $DD00.         |
00001920: 53 54 58 20 24 44 44 30  30 0D 20 20 20 20 20 20  |STX $DD00.      |
00001930: 20 20 20 41 53 4C 20 41  0D 20 20 20 20 20 20 20  |   ASL A.       |
00001940: 20 20 52 4F 52 20 5A 30  0D 20 20 20 20 20 20 20  |  ROR Z0.       |
00001950: 20 20 52 54 53 0D 3B 2D  2D 2D 2D 2D 2D 2D 2D 2D  |  RTS.;---------|
00001960: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001970: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 0D 53  |--------------.S|
00001980: 45 4E 44 42 59 20 20 20  53 54 41 20 5A 30 0D 20  |ENDBY   STA Z0. |
00001990: 20 20 20 20 20 20 20 20  4A 53 52 20 53 45 4E 44  |        JSR SEND|
000019A0: 32 42 0D 20 20 20 20 20  20 20 20 20 4A 53 52 20  |2B.         JSR |
000019B0: 53 45 4E 44 32 42 0D 20  20 20 20 20 20 20 20 20  |SEND2B.         |
000019C0: 4A 53 52 20 53 45 4E 44  32 42 0D 20 20 20 20 20  |JSR SEND2B.     |
000019D0: 20 20 20 20 4A 53 52 20  53 45 4E 44 32 42 0D 20  |    JSR SEND2B. |
000019E0: 20 20 20 20 20 20 20 20  52 54 53 0D 3B 2D 2D 2D  |        RTS.;---|
000019F0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001A00: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001A10: 2D 2D 2D 2D 0D 53 45 4E  44 32 42 0D 46 34 20 20  |----.SEND2B.F4  |
00001A20: 20 20 20 20 20 4C 44 41  20 23 24 31 30 0D 20 20  |     LDA #$10.  |
00001A30: 20 20 20 20 20 20 20 4C  53 52 20 5A 30 0D 20 20  |       LSR Z0.  |
00001A40: 20 20 20 20 20 20 20 42  43 43 20 48 49 50 0D 20  |       BCC HIP. |
00001A50: 20 20 20 20 20 20 20 20  4F 52 41 20 23 24 32 30  |        ORA #$20|
00001A60: 0D 48 49 50 20 20 20 20  20 20 53 54 41 20 24 44  |.HIP      STA $D|
00001A70: 44 30 30 0D 20 20 20 20  20 20 20 20 20 4E 4F 50  |D00.         NOP|
00001A80: 0D 20 20 20 20 20 20 20  20 20 4E 4F 50 0D 20 20  |.         NOP.  |
00001A90: 20 20 20 20 20 20 20 4E  4F 50 0D 20 20 20 20 20  |       NOP.     |
00001AA0: 20 20 20 20 4E 4F 50 0D  46 35 20 20 20 20 20 20  |    NOP.F5      |
00001AB0: 20 4C 44 41 20 23 24 30  30 0D 20 20 20 20 20 20  | LDA #$00.      |
00001AC0: 20 20 20 4C 53 52 20 5A  30 0D 20 20 20 20 20 20  |   LSR Z0.      |
00001AD0: 20 20 20 42 43 43 20 48  4F 50 0D 20 20 20 20 20  |   BCC HOP.     |
00001AE0: 20 20 20 20 4F 52 41 20  23 24 32 30 0D 48 4F 50  |    ORA #$20.HOP|
00001AF0: 20 20 20 20 20 20 53 54  41 20 24 44 44 30 30 0D  |      STA $DD00.|
00001B00: 20 20 20 20 20 20 20 20  20 4E 4F 50 0D 20 20 20  |         NOP.   |
00001B10: 20 20 20 20 20 20 4E 4F  50 0D 20 20 20 20 20 20  |      NOP.      |
00001B20: 20 20 20 52 54 53 0D 3B  2D 2D 2D 2D 2D 2D 2D 2D  |   RTS.;--------|
00001B30: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001B40: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 0D  |---------------.|
00001B50: 57 41 49 54 20 20 20 20  20 4C 44 58 20 23 24 33  |WAIT     LDX #$3|
00001B60: 32 0D 4A 31 20 20 20 20  20 20 20 44 45 58 0D 20  |2.J1       DEX. |
00001B70: 20 20 20 20 20 20 20 20  42 4E 45 20 4A 31 0D 4A  |        BNE J1.J|
00001B80: 32 20 20 20 20 20 20 20  4C 44 41 20 24 44 44 30  |2       LDA $DD0|
00001B90: 30 0D 20 20 20 20 20 20  20 20 20 41 4E 44 20 23  |0.         AND #|
00001BA0: 24 34 30 0D 20 20 20 20  20 20 20 20 20 42 45 51  |$40.         BEQ|
00001BB0: 20 4A 32 0D 46 36 20 20  20 20 20 20 20 4C 44 41  | J2.F6       LDA|
00001BC0: 20 23 24 43 30 0D 20 20  20 20 20 20 20 20 20 53  | #$C0.         S|
00001BD0: 54 41 20 24 44 44 30 30  0D 20 20 20 20 20 20 20  |TA $DD00.       |
00001BE0: 20 20 4E 4F 50 0D 20 20  20 20 20 20 20 20 20 4E  |  NOP.         N|
00001BF0: 4F 50 0D 20 20 20 20 20  20 20 20 20 4E 4F 50 0D  |OP.         NOP.|
00001C00: 20 20 20 20 20 20 20 20  20 4C 44 58 20 23 24 30  |         LDX #$0|
00001C10: 35 0D 4A 33 20 20 20 20  20 20 20 44 45 58 0D 20  |5.J3       DEX. |
00001C20: 20 20 20 20 20 20 20 20  42 4E 45 20 4A 33 0D 20  |        BNE J3. |
00001C30: 20 20 20 20 20 20 20 20  52 54 53 0D 3B 2D 2D 2D  |        RTS.;---|
00001C40: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001C50: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001C60: 2D 2D 2D 2D 0D 20 20 20  20 20 20 20 20 20 2E 42  |----.         .B|
00001C70: 59 54 45 20 24 30 39 2C  24 32 30 2C 24 30 43 2C  |YTE $09,$20,$0C,|
00001C80: 24 30 46 2C 24 31 36 2C  24 30 35 0D 20 20 20 20  |$0F,$16,$05.    |
00001C90: 20 20 20 20 20 2E 42 59  54 45 20 24 32 30 2C 24  |     .BYTE $20,$|
00001CA0: 31 39 2C 24 30 46 2C 24  31 35 2C 24 32 30 2C 24  |19,$0F,$15,$20,$|
00001CB0: 31 34 0D 20 20 20 20 20  20 20 20 20 2E 42 59 54  |14.         .BYT|
00001CC0: 45 20 24 30 46 2C 24 30  46 2C 24 32 43 2C 24 32  |E $0F,$0F,$2C,$2|
00001CD0: 30 2C 24 31 33 2C 24 30  45 0D 20 20 20 20 20 20  |0,$13,$0E.      |
00001CE0: 20 20 20 2E 42 59 54 45  20 24 30 35 2C 24 30 31  |   .BYTE $05,$01|
00001CF0: 2C 24 30 42 2C 24 30 35  2C 24 31 32 2C 24 32 45  |,$0B,$05,$12,$2E|
00001D00: 0D 20 20 20 20 20 20 20  20 20 2E 42 59 54 45 20  |.         .BYTE |
00001D10: 24 32 45 2C 24 32 30 2C  24 32 46 2C 24 30 42 2C  |$2E,$20,$2F,$0B,|
00001D20: 24 30 36 0D 3B 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |$06.;-----------|
00001D30: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001D40: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 3B 0D 3B D7 48  |-----------;.;.H|
00001D50: 4F 3F 20 2D 20 C9 20 44  4F 4E 27 54 20 4B 4E 4F  |O? - . DON'T KNO|
00001D60: 57 2E 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |W.              |
00001D70: 20 20 20 20 3B 0D 3B 20  20 20 20 20 20 20 41 42  |    ;.;       AB|
00001D80: 53 4F 4C 55 54 45 4C 59  20 4E 4F 20 49 44 45 41  |SOLUTELY NO IDEA|
00001D90: 2E 20 20 20 20 20 20 20  20 20 20 20 20 3B 0D 3B  |.            ;.;|
00001DA0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001DB0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00001DC0: 2D 2D 2D 2D 2D 2D 3B 0D  0D                       |------;..       |
;--------------------------------------;
.;                                      
;.;              LOADER (C)             
 ;.;                                    
  ;.;           KUNG OF MUST INC.       
   ;.;                                  
    ;.;THIS VERSION SPECIALLY LICENSED T
O JFK;.;                                
      ;.;-------------------------------
-------;.         *= $0800 ;ORIGIN.;----
-----------------------------------.Z0  
     = $06    ;OCCUPIES Z0..Z0+11.      
            ;        (Z0..Z0+$0B).      
            ;SELECTABLE.                
  ;ZEROPAGE ADDRESSES.;-----------------
---------------------;.; X,Y=FILENAME...
                      ;.;---------------
-----------------------;.LOAD     LDA #$
35.         STA 1.         LDA $DD00.   
      AND #$0F.         STA F5+1.       
  EOR #$10.         STA F4+1.         EO
R #$30.         STA F1+1.         EOR #$
B0.         STA F2+1.         EOR #$50. 
        STA F3+1.         STA F6+1.     
    JSR SENDNAME.         JSR WAIT.     
    LDA #0.         STA Z0+1.START    LD
X #4.L0       JSR XBYTE.         LDY Z0+
1.         BNE L1.         STA Z0+7,X.  
       DEX.         BPL L0.         LDA 
Z0+8.         STA DOM14+1.         LDA Z
0+9.         STA DOM14+2.         LDY Z0
+1.         BNE L1.         LDA #$34.   
      STA 1.         JSR I1036.LAXFIZK  
JSR DEZIPP.         INC 1.         BNE S
TART.L1       CLC          ;IF SEC THEN 
BUG!.         RTS.;---------------------
-----------------;.;IF THE ROUTINE RETUR
NS WITH CARRY SET ;.;THERE HAS BEEN A LO
ADING ERROR. ALWAYS;.;HAVE A WORKING ERR
ORPATH, I ALWAYS    ;.;TRY TO SHOW MY AD
DRESS SO THAT PEOPLE ;.;KNOW WHERE TO GE
T A WORKING COPY!     ;.;EG:            
                       ;.;            LD
X #$41                  ;.;            L
DY #$42                  ;.;            
JSR LOAD                  ;.;           
 BCS ERRORROUTINE          ;.;          
                            ;.;---------
-----------------------------;.I1036    
TYA.         STA Z0+2.         STY Z0+4.
I103B    JSR I10A7.         ROL A.      
   BNE I1043.         BCC I104F.I1043   
 ROL Z0+4.         JSR I10A7.         BC
S I103B.         STA Z0+3.         JSR I
10C3.I104F    TYA.         STY Z0+5.    
     STY Z0+6.I1054    JSR I10A7.       
  ROL A.         BEQ I1063.         BMI 
I1061.         JSR I10A7.         BCS I1
054.I1061    INC Z0+2.I1063    ADC #2.  
       STA Z0+3.         LDX #2.I1069   
 JSR I10A7.         ROL Z0+2.         DE
X.         BNE I1069.I1071    LDX Z0+2. 
        LDA LABAN,X.         TAX.       
  BEQ I1083.I1079    JSR I10A7.         
ROL Z0+5.         ROL Z0+6.         DEX.
         BNE I1079.I1083    LDA Z0+2.   
      AND #3.         BEQ I1093.        
 INC Z0+5.         BNE I108F.         IN
C Z0+6.I108F    DEC Z0+2.         BPL I1
071.I1093    CLC.         LDA Z0+8.     
    ADC Z0+5.         STA Z0+5.         
LDA Z0+9.         ADC Z0+6.         STA 
Z0+6.         INC Z0+2.         JSR I10D
6.         BEQ I1036.I10A7    ASL Z0+7. 
        BNE I10C2.         CPY Z0+10.   
      BNE I10B5.         CPY Z0+11.     
    BEQ I10C0.         DEC Z0+11.I10B5  
  DEC Z0+10.         PHA.         JSR I1
0FF.         SEC.         ROL A.        
 STA Z0+7.         .BYTE $24.I10C0    PL
A.         PLA.I10C2    RTS.I10C3    SEC
.         LDA Z0+10.         SBC Z0+3.  
       STA Z0+5.         STA Z0+10.     
    LDA Z0+11.         SBC #0.         S
TA Z0+6.         SBC Z0+4.         STA Z
0+11.I10D6    LDY Z0+3.         BEQ I10E
D.         LDA Z0+8.         SEC.       
  SBC Z0+3.         STA Z0+8.         BC
S I10E5.I10E3    DEC Z0+9.I10E5    JSR I
10F8.         STA (Z0+8),Y.         DEY.
         BNE I10E5.I10ED    CPY Z0+4.   
      BEQ I10F7.         DEC Z0+6.      
   DEC Z0+4.         BPL I10E3.I10F7    
RTS.I10F8    LDA Z0+2.         BEQ I10FF
.         LDA (Z0+5),Y.         RTS.I10F
F    INC 1.         JSR XBYTE.         D
EC 1.         RTS.;---------------------
------------------.LABAN    .BYTE 4,2,2,
2,5,2,2,3.;-----------------------------
----------.DEZIPP.         JSR DOM14.   
      STA DOM5+1.         JSR DOM10.    
     STA DOM4+1.         JSR DOM10.     
    STA DOM3+1.         JSR DOM10.      
   STA DOM2+1.         JSR DOM10.       
  STA DOM7+2.         JSR DOM10.        
 STA DOM7+1.         JSR DOM10.         
STA DOM13+1.         JSR DOM10.         
STA DOM12+1.         LDX #0.         LDY
 #4.DOM1     INX.         JSR DOM10.DOM2
     CMP #0.         BEQ DOM15.DOM3     
CMP #0.         BEQ DOM17.DOM4     CMP #
0.         BEQ DOM19.DOM5     CMP #0.   
      BEQ DOM20.DOM6     DEY.DOM7.      
   STA $1000,Y.         BNE DOM8.       
  DEC DOM7+2.DOM8     DEX.         BNE D
OM6.         BEQ DOM1.DOM9.         PLA.
         PLA.         RTS.;-------------
--------------------------.DOM10.       
  LDA DOM14+1.         BNE DOM11.       
  DEC DOM14+2.DOM11    DEC DOM14+1.     
    LDA DOM14+1.DOM12    CMP #0.        
 BNE DOM14.         LDA DOM14+2.DOM13   
 CMP #0.         BEQ DOM9.DOM14    LDA $
1000.         RTS.DOM15.         JSR DOM
10.         TAX.DOM16    JSR DOM10.     
    JMP DOM6.DOM17.         JSR DOM10.  
       TAX.DOM18    LDA #$00.         BE
Q DOM6.DOM19.         INX.         BNE D
OM18.DOM20    LDX #3.         BNE DOM16.
;---------------------------------------
.XBYTE    STX PLO+1.XX       JSR TAKEBY.
         CMP #$99.         BNE PLO.     
    JSR TAKEBY.         CMP #$99.       
  BEQ PLO.         CMP #$FF.         BEQ
 SLUT.         CMP #$FE.         BEQ FEL
.         JSR WAIT.         BEQ XX.PLO  
    LDX #0.         RTS.SLUT     INC Z0+
1.         BNE PLO.FEL      LDA #$60    
 ;NO MORE LOAD!.         STA XBYTE    ;O
MEGABUG...         LDA #$38     ;MESSAGE
...         STA L1.         LDA #$2C    
 ;NO DEZIPP.         STA LAXFIZK.       
  INC Z0+1     ;DUMMY.         LDA #0   
    ;CANCEL LOAD.         STA Z0+10.    
     STA Z0+11.         BEQ PLO.;-------
-------------------------------;.SENDNAM
E.         STX NAME1+1.         STY NAME
2+1.F1       LDA #$20.         STA $DD00
.         JSR WAIT.NAME1    LDA #$00.   
      JSR SENDBY.NAME2    LDA #$00.     
    JSR SENDBY.         RTS.;-----------
----------------------------.TAKEBY   JS
R TAKE2B.         JSR TAKE2B.         JS
R TAKE2B.         JSR TAKE2B.         JS
R NOTHING.         LDA Z0.NOTHING  RTS.;
---------------------------------------.
TAKE2B.F2       LDX #$90.         LDA $D
D00.         STX $DD00.         ASL A.  
       ROR Z0.         PHA.         PLA.
         PHA.         PLA.F3       LDX #
$C0.         LDA $DD00.         STX $DD0
0.         ASL A.         ROR Z0.       
  RTS.;---------------------------------
------.SENDBY   STA Z0.         JSR SEND
2B.         JSR SEND2B.         JSR SEND
2B.         JSR SEND2B.         RTS.;---
------------------------------------.SEN
D2B.F4       LDA #$10.         LSR Z0.  
       BCC HIP.         ORA #$20.HIP    
  STA $DD00.         NOP.         NOP.  
       NOP.         NOP.F5       LDA #$0
0.         LSR Z0.         BCC HOP.     
    ORA #$20.HOP      STA $DD00.        
 NOP.         NOP.         RTS.;--------
-------------------------------.WAIT    
 LDX #$32.J1       DEX.         BNE J1.J
2       LDA $DD00.         AND #$40.    
     BEQ J2.F6       LDA #$C0.         S
TA $DD00.         NOP.         NOP.     
    NOP.         LDX #$05.J3       DEX. 
        BNE J3.         RTS.;-----------
----------------------------.         .B
YTE $09,$20,$0C,$0F,$16,$05.         .BY
TE $20,$19,$0F,$15,$20,$14.         .BYT
E $0F,$0F,$2C,$20,$13,$0E.         .BYTE
 $05,$01,$0B,$05,$12,$2E.         .BYTE 
$2E,$20,$2F,$0B,$06.;-------------------
-------------------;.;WHO? - I DON'T KNO
W.                  ;.;       ABSOLUTELY
 NO IDEA.            ;.;----------------
----------------------;..
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL