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 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL