DLOAD

FILE INFORMATION

FILENAME(S): DLOAD

FILE TYPE(S): PRG

FILE SIZE: 2.6K

FIRST SEEN: 2025-11-30 16:27:51

APPEARS ON: 1 disk(s)

FILE HASH

eb20c185ec9f281f90aeadc3cf24d8b3d10948af4499aaf235dda26f149fd136

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
SOCCER	DLOAD	PRG	BrainSkull, Wolfgang Bernhard	17	1	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 0D 08 0A 00 AC B2  24 43 30 30 30 00 18 08  |........$C000...|
00000010: 14 00 4C 44 41 20 23 30  00 26 08 1E 00 4A 53 52  |..LDA #0.&...JSR|
00000020: 20 24 46 46 39 30 00 31  08 28 00 4C 44 58 20 23  | $FF90.1.(.LDX #|
00000030: 30 00 3D 08 32 00 4C 44  41 20 23 33 33 00 54 08  |0.=.2.LDA #33.T.|
00000040: 3C 00 54 45 53 54 4C 4F  20 53 54 41 20 24 38 30  |<.TESTLO STA $80|
00000050: 30 30 2C 58 00 5C 08 46  00 49 4E 58 00 6B 08 50  |00,X.\.F.INX.k.P|
00000060: 00 42 4E 45 20 54 45 53  54 4C 4F 00 76 08 5A 00  |.BNE TESTLO.v.Z.|
00000070: 4C 44 58 20 23 30 00 8C  08 64 00 54 45 53 4C 4F  |LDX #0...d.TESLO|
00000080: 20 4C 44 41 20 24 38 30  30 30 2C 58 00 98 08 6E  | LDA $8000,X...n|
00000090: 00 43 4D 50 20 23 33 33  00 A7 08 78 00 42 45 51  |.CMP #33...x.BEQ|
000000A0: 20 54 45 53 4C 4F 31 00  B3 08 79 00 4C 44 41 20  | TESLO1...y.LDA |
000000B0: 23 32 37 00 C1 08 7A 00  53 54 41 20 35 33 32 36  |#27...z.STA 5326|
000000C0: 35 00 CC 08 7B 00 4C 44  41 20 23 30 00 DA 08 7C  |5...{.LDA #0...||
000000D0: 00 53 54 41 20 35 33 32  38 31 00 E6 08 82 00 4C  |.STA 53281.....L|
000000E0: 44 59 20 23 33 39 00 FA  08 8C 00 4D 45 53 20 4C  |DY #39.....MES L|
000000F0: 44 41 20 4D 45 53 53 41  2C 59 00 04 09 96 00 AF  |DA MESSA,Y......|
00000100: 20 23 36 33 00 17 09 A0  00 53 54 41 20 31 30 32  | #63.....STA 102|
00000110: 34 AA 34 30 30 2C 59 00  22 09 AA 00 4C 44 41 20  |4.400,Y."...LDA |
00000120: 23 31 00 36 09 B4 00 53  54 41 20 24 44 38 30 30  |#1.6...STA $D800|
00000130: AA 34 30 30 2C 59 00 3E  09 BE 00 44 45 59 00 4A  |.400,Y.>...DEY.J|
00000140: 09 C8 00 42 50 4C 20 4D  45 53 00 56 09 D2 00 4C  |...BPL MES.V...L|
00000150: 44 41 20 23 32 30 00 62  09 DC 00 53 54 41 20 32  |DA #20.b...STA 2|
00000160: 35 30 00 6D 09 E6 00 4C  44 58 20 23 30 00 78 09  |50.m...LDX #0.x.|
00000170: F0 00 4C 44 59 20 23 30  00 86 09 FA 00 44 45 4C  |..LDY #0.....DEL|
00000180: 41 59 20 44 45 58 00 94  09 04 01 42 4E 45 20 44  |AY DEX.....BNE D|
00000190: 45 4C 41 59 00 9C 09 0E  01 44 45 59 00 AA 09 18  |ELAY.....DEY....|
000001A0: 01 42 4E 45 20 44 45 4C  41 59 00 B6 09 22 01 44  |.BNE DELAY...".D|
000001B0: 45 43 20 32 35 30 00 C4  09 2C 01 42 4E 45 20 44  |EC 250...,.BNE D|
000001C0: 45 4C 41 59 00 D2 09 2D  01 4A 4D 50 20 52 45 53  |ELAY...-.JMP RES|
000001D0: 45 54 00 E1 09 36 01 54  45 53 4C 4F 31 20 49 4E  |ET...6.TESLO1 IN|
000001E0: 58 00 EF 09 40 01 42 4E  45 20 54 45 53 4C 4F 00  |X...@.BNE TESLO.|
000001F0: FC 09 4A 01 4C 44 41 20  23 31 39 32 00 0A 0A 54  |..J.LDA #192...T|
00000200: 01 53 54 41 20 35 36 35  37 36 00 16 0A 5E 01 4C  |.STA 56576...^.L|
00000210: 44 41 20 23 34 33 00 24  0A 68 01 53 54 41 20 35  |DA #43.$.h.STA 5|
00000220: 33 32 36 35 00 30 0A 72  01 4C 44 41 20 23 34 35  |3265.0.r.LDA #45|
00000230: 00 3E 0A 7C 01 53 54 41  20 35 33 32 37 32 00 4B  |.>.|.STA 53272.K|
00000240: 0A 86 01 4C 44 41 20 23  32 31 36 00 59 0A 90 01  |...LDA #216.Y...|
00000250: 53 54 41 20 35 33 32 37  30 00 68 0A 9A 01 4C 44  |STA 53270.h...LD|
00000260: 41 20 23 30 20 21 20 33  00 76 0A A4 01 53 54 41  |A #0 ! 3.v...STA|
00000270: 20 35 33 32 36 39 00 84  0A AE 01 53 54 41 20 35  | 53269.....STA 5|
00000280: 33 32 37 36 00 90 0A B8  01 4C 44 41 20 23 35 30  |3276.....LDA #50|
00000290: 00 9E 0A C2 01 53 54 41  20 35 33 32 34 39 00 AA  |.....STA 53249..|
000002A0: 0A CC 01 4C 44 41 20 23  32 34 00 B8 0A D6 01 53  |...LDA #24.....S|
000002B0: 54 41 20 35 33 32 34 38  00 C3 0A E0 01 4C 44 41  |TA 53248.....LDA|
000002C0: 20 23 31 00 D1 0A EA 01  53 54 41 20 35 33 32 38  | #1.....STA 5328|
000002D0: 35 00 DC 0A F4 01 4C 44  59 20 23 34 00 E7 0A FE  |5.....LDY #4....|
000002E0: 01 4C 44 58 20 23 30 00  EF 0A 08 02 54 58 41 00  |.LDX #0.....TXA.|
000002F0: FD 0A 12 02 53 54 58 20  35 33 32 38 30 00 0B 0B  |....STX 53280...|
00000300: 1C 02 53 54 58 20 35 33  32 38 31 00 20 0B 26 02  |..STX 53281. .&.|
00000310: 43 4C 53 42 20 53 54 41  20 24 43 38 30 30 2C 58  |CLSB STA $C800,X|
00000320: 00 28 0B 30 02 49 4E 58  00 35 0B 3A 02 42 4E 45  |.(.0.INX.5.:.BNE|
00000330: 20 43 4C 53 42 00 44 0B  44 02 49 4E 43 20 43 4C  | CLSB.D.D.INC CL|
00000340: 53 42 AA 32 00 4C 0B 4E  02 44 45 59 00 59 0B 58  |SB.2.L.N.DEY.Y.X|
00000350: 02 42 4E 45 20 43 4C 53  42 00 64 0B 62 02 4C 44  |.BNE CLSB.d.b.LD|
00000360: 59 20 23 34 00 6F 0B 6C  02 4C 44 58 20 23 30 00  |Y #4.o.l.LDX #0.|
00000370: 77 0B 76 02 54 58 41 00  8B 0B 80 02 43 4C 53 20  |w.v.TXA.....CLS |
00000380: 53 54 41 20 24 44 38 30  30 2C 58 00 93 0B 8A 02  |STA $D800,X.....|
00000390: 49 4E 58 00 9F 0B 94 02  42 4E 45 20 43 4C 53 00  |INX.....BNE CLS.|
000003A0: AD 0B 9E 02 49 4E 43 20  43 4C 53 AA 32 00 B5 0B  |....INC CLS.2...|
000003B0: A8 02 44 45 59 00 C1 0B  B2 02 42 4E 45 20 43 4C  |..DEY.....BNE CL|
000003C0: 53 00 CD 0B BC 02 4C 44  59 20 23 33 32 00 D9 0B  |S.....LDY #32...|
000003D0: C6 02 4C 44 41 20 23 38  35 00 EE 0B D0 02 43 4C  |..LDA #85.....CL|
000003E0: 53 31 20 53 54 41 20 24  45 30 30 30 2C 58 00 F6  |S1 STA $E000,X..|
000003F0: 0B DA 02 49 4E 58 00 03  0C E4 02 42 4E 45 20 43  |...INX.....BNE C|
00000400: 4C 53 31 00 12 0C EE 02  49 4E 43 20 43 4C 53 31  |LS1.....INC CLS1|
00000410: AA 32 00 1A 0C F8 02 44  45 59 00 27 0C 02 03 42  |.2.....DEY.'...B|
00000420: 4E 45 20 43 4C 53 31 00  34 0C 0C 03 4C 44 41 20  |NE CLS1.4...LDA |
00000430: 23 32 35 33 00 42 0C 16  03 53 54 41 20 35 32 32  |#253.B...STA 522|
00000440: 31 36 00 4E 0C 20 03 4C  44 41 20 23 35 39 00 5C  |16.N. .LDA #59.\|
00000450: 0C 2A 03 53 54 41 20 35  33 32 36 35 00 67 0C 34  |.*.STA 53265.g.4|
00000460: 03 4C 44 41 20 23 38 00  6F 0C 3E 03 54 41 58 00  |.LDA #8.o.>.TAX.|
00000470: 7A 0C 48 03 4C 44 59 20  23 30 00 88 0C 52 03 4A  |z.H.LDY #0...R.J|
00000480: 53 52 20 24 46 46 42 41  00 93 0C 5C 03 4C 44 41  |SR $FFBA...\.LDA|
00000490: 20 23 37 00 A2 0C 66 03  4C 44 58 20 23 B3 4E 41  | #7...f.LDX #.NA|
000004A0: 4D 45 00 B1 0C 70 03 4C  44 59 20 23 B1 4E 41 4D  |ME...p.LDY #.NAM|
000004B0: 45 00 BF 0C 7A 03 4A 53  52 20 24 46 46 42 44 00  |E...z.JSR $FFBD.|
000004C0: CA 0C 84 03 4C 44 41 20  23 30 00 D2 0C 8E 03 54  |....LDA #0.....T|
000004D0: 41 58 00 DF 0C 98 03 4C  44 59 20 23 24 34 30 00  |AX.....LDY #$40.|
000004E0: ED 0C A2 03 4A 53 52 20  24 46 46 44 35 00 F8 0C  |....JSR $FFD5...|
000004F0: AC 03 4C 44 41 20 23 38  00 00 0D B6 03 54 41 58  |..LDA #8.....TAX|
00000500: 00 0B 0D C0 03 4C 44 59  20 23 30 00 19 0D CA 03  |.....LDY #0.....|
00000510: 4A 53 52 20 24 46 46 42  41 00 24 0D D4 03 4C 44  |JSR $FFBA.$...LD|
00000520: 41 20 23 33 00 34 0D DE  03 4C 44 58 20 23 B3 4E  |A #3.4...LDX #.N|
00000530: 41 4D 45 34 00 44 0D E8  03 4C 44 59 20 23 B1 4E  |AME4.D...LDY #.N|
00000540: 41 4D 45 34 00 52 0D F2  03 4A 53 52 20 24 46 46  |AME4.R...JSR $FF|
00000550: 42 44 00 5D 0D FC 03 4C  44 41 20 23 30 00 6A 0D  |BD.]...LDA #0.j.|
00000560: 06 04 4C 44 58 20 23 24  31 30 00 77 0D 10 04 4C  |..LDX #$10.w...L|
00000570: 44 59 20 23 24 36 37 00  85 0D 1A 04 4A 53 52 20  |DY #$67.....JSR |
00000580: 24 46 46 44 35 00 91 0D  24 04 4C 44 59 20 23 33  |$FFD5...$.LDY #3|
00000590: 32 00 9C 0D 2E 04 4C 44  58 20 23 30 00 B0 0D 38  |2.....LDX #0...8|
000005A0: 04 51 49 54 20 4C 44 41  20 24 34 30 30 30 2C 58  |.QIT LDA $4000,X|
000005B0: 00 C5 0D 42 04 51 49 54  31 20 53 54 41 20 24 45  |...B.QIT1 STA $E|
000005C0: 30 30 30 2C 58 00 CD 0D  4C 04 49 4E 58 00 D9 0D  |000,X...L.INX...|
000005D0: 56 04 42 4E 45 20 51 49  54 00 E7 0D 60 04 49 4E  |V.BNE QIT...`.IN|
000005E0: 43 20 51 49 54 AA 32 00  F6 0D 6A 04 49 4E 43 20  |C QIT.2...j.INC |
000005F0: 51 49 54 31 AA 32 00 FE  0D 74 04 44 45 59 00 0A  |QIT1.2...t.DEY..|
00000600: 0E 7E 04 42 4E 45 20 51  49 54 00 15 0E 88 04 4C  |.~.BNE QIT.....L|
00000610: 44 59 20 23 34 00 29 0E  92 04 53 43 52 20 4C 44  |DY #4.)...SCR LD|
00000620: 41 20 24 35 46 34 30 2C  58 00 3E 0E 9C 04 53 43  |A $5F40,X.>...SC|
00000630: 52 31 20 53 54 41 20 24  43 38 30 30 2C 58 00 46  |R1 STA $C800,X.F|
00000640: 0E A6 04 49 4E 58 00 52  0E B0 04 42 4E 45 20 53  |...INX.R...BNE S|
00000650: 43 52 00 60 0E BA 04 49  4E 43 20 53 43 52 AA 32  |CR.`...INC SCR.2|
00000660: 00 6F 0E C4 04 49 4E 43  20 53 43 52 31 AA 32 00  |.o...INC SCR1.2.|
00000670: 77 0E CE 04 44 45 59 00  83 0E D8 04 42 4E 45 20  |w...DEY.....BNE |
00000680: 53 43 52 00 90 0E E2 04  4C 44 58 20 23 31 32 38  |SCR.....LDX #128|
00000690: 00 A6 0E EC 04 42 4C 4F  43 4B 20 4C 44 41 20 24  |.....BLOCK LDA $|
000006A0: 36 37 30 46 2C 58 00 B6  0E F6 04 53 54 41 20 24  |670F,X.....STA $|
000006B0: 46 46 33 46 2C 58 00 BE  0E 00 05 44 45 58 00 CC  |FF3F,X.....DEX..|
000006C0: 0E 0A 05 42 4E 45 20 42  4C 4F 43 4B 00 D7 0E 14  |...BNE BLOCK....|
000006D0: 05 4C 44 59 20 23 34 00  EC 0E 1E 05 54 43 4F 4C  |.LDY #4.....TCOL|
000006E0: 20 4C 44 41 20 24 36 33  32 38 2C 58 00 02 0F 28  | LDA $6328,X...(|
000006F0: 05 54 43 4F 4C 31 20 53  54 41 20 24 44 38 30 30  |.TCOL1 STA $D800|
00000700: 2C 58 00 0A 0F 32 05 49  4E 58 00 17 0F 3C 05 42  |,X...2.INX...<.B|
00000710: 4E 45 20 54 43 4F 4C 00  26 0F 46 05 49 4E 43 20  |NE TCOL.&.F.INC |
00000720: 54 43 4F 4C AA 32 00 36  0F 50 05 49 4E 43 20 54  |TCOL.2.6.P.INC T|
00000730: 43 4F 4C 31 AA 32 00 3E  0F 5A 05 44 45 59 00 4B  |COL1.2.>.Z.DEY.K|
00000740: 0F 64 05 42 4E 45 20 54  43 4F 4C 00 58 0F 6E 05  |.d.BNE TCOL.X.n.|
00000750: 4C 44 41 20 23 32 35 33  00 66 0F 78 05 53 54 41  |LDA #253.f.x.STA|
00000760: 20 35 32 32 31 36 00 72  0F 82 05 4C 44 41 20 23  | 52216.r...LDA #|
00000770: 34 38 00 80 0F 8C 05 53  54 41 20 35 33 32 34 38  |48.....STA 53248|
00000780: 00 8D 0F 96 05 4C 44 41  20 23 31 35 34 00 9B 0F  |.....LDA #154...|
00000790: A0 05 53 54 41 20 35 33  32 34 39 00 A8 0F AA 05  |..STA 53249.....|
000007A0: 4C 44 41 20 23 32 35 35  00 B2 0F B4 05 53 54 41  |LDA #255.....STA|
000007B0: 20 31 00 BD 0F BE 05 4C  44 41 20 23 38 00 C5 0F  | 1.....LDA #8...|
000007C0: C8 05 54 41 58 00 D2 0F  D2 05 4C 44 59 20 23 32  |..TAX.....LDY #2|
000007D0: 35 35 00 E0 0F DC 05 4A  53 52 20 24 46 46 42 41  |55.....JSR $FFBA|
000007E0: 00 EB 0F E6 05 4C 44 41  20 23 33 00 FB 0F F0 05  |.....LDA #3.....|
000007F0: 4C 44 58 20 23 B3 4E 41  4D 45 31 00 0B 10 FA 05  |LDX #.NAME1.....|
00000800: 4C 44 59 20 23 B1 4E 41  4D 45 31 00 19 10 04 06  |LDY #.NAME1.....|
00000810: 4A 53 52 20 24 46 46 42  44 00 24 10 0E 06 4C 44  |JSR $FFBD.$...LD|
00000820: 41 20 23 30 00 32 10 18  06 4A 53 52 20 24 46 46  |A #0.2...JSR $FF|
00000830: 44 35 00 3A 10 22 06 53  45 49 00 46 10 2C 06 4C  |D5.:.".SEI.F.,.L|
00000840: 44 41 20 23 34 39 00 52  10 36 06 53 54 41 20 37  |DA #49.R.6.STA 7|
00000850: 38 38 00 5F 10 40 06 4C  44 41 20 23 32 33 34 00  |88._.@.LDA #234.|
00000860: 6B 10 4A 06 53 54 41 20  37 38 39 00 73 10 54 06  |k.J.STA 789.s.T.|
00000870: 43 4C 49 00 80 10 5E 06  4C 44 41 20 23 31 39 39  |CLI...^.LDA #199|
00000880: 00 8E 10 68 06 53 54 41  20 35 36 35 37 36 00 9A  |...h.STA 56576..|
00000890: 10 72 06 4C 44 41 20 23  34 33 00 A8 10 7C 06 53  |.r.LDA #43...|.S|
000008A0: 54 41 20 35 33 32 36 35  00 B4 10 86 06 4C 44 41  |TA 53265.....LDA|
000008B0: 20 23 32 31 00 C2 10 90  06 53 54 41 20 35 33 32  | #21.....STA 532|
000008C0: 37 32 00 CF 10 9A 06 4A  4D 50 20 32 30 36 31 00  |72.....JMP 2061.|
000008D0: E6 10 A4 06 4E 41 4D 45  20 54 58 54 20 22 81 50  |....NAME TXT ".P|
000008E0: 49 43 20 43 2A 22 00 FA  10 AE 06 4E 41 4D 45 31  |IC C*".....NAME1|
000008F0: 20 54 58 54 20 22 58 59  5A 22 00 0E 11 B8 06 4E  | TXT "XYZ".....N|
00000900: 41 4D 45 34 20 54 58 54  20 22 53 50 52 22 00 47  |AME4 TXT "SPR".G|
00000910: 11 C2 06 4D 45 53 53 41  20 54 58 54 20 22 20 20  |...MESSA TXT "  |
00000920: 20 20 20 20 20 20 43 41  52 54 52 49 44 47 45 20  |      CARTRIDGE |
00000930: 49 4E 20 53 4C 4F 54 21  21 21 20 20 20 20 20 20  |IN SLOT!!!      |
00000940: 20 20 20 20 20 20 22 00  5E 11 C3 06 57 B0 20 30  |      ".^...W. 0|
00000950: 2C 30 2C 30 2C 30 2C 30  2C 30 2C 30 2C 30 00 75  |,0,0,0,0,0,0,0.u|
00000960: 11 C4 06 57 B0 20 30 2C  30 2C 30 2C 30 2C 30 2C  |...W. 0,0,0,0,0,|
00000970: 30 2C 30 2C 30 00 8C 11  C5 06 57 B0 20 30 2C 30  |0,0,0.....W. 0,0|
00000980: 2C 30 2C 30 2C 30 2C 30  2C 30 2C 30 00 A3 11 C6  |,0,0,0,0,0,0....|
00000990: 06 57 B0 20 30 2C 30 2C  30 2C 30 2C 30 2C 30 2C  |.W. 0,0,0,0,0,0,|
000009A0: 30 2C 30 00 BA 11 C7 06  57 B0 20 30 2C 30 2C 30  |0,0.....W. 0,0,0|
000009B0: 2C 30 2C 30 2C 30 2C 30  2C 30 00 D1 11 C8 06 57  |,0,0,0,0,0.....W|
000009C0: B0 20 30 2C 30 2C 30 2C  30 2C 30 2C 30 2C 30 2C  |. 0,0,0,0,0,0,0,|
000009D0: 30 00 E2 11 CC 06 52 45  53 45 54 20 4C 44 58 20  |0.....RESET LDX |
000009E0: 23 30 00 EA 11 D6 06 54  58 41 00 FE 11 E0 06 43  |#0.....TXA.....C|
000009F0: 4C 57 20 53 54 41 20 24  43 30 30 30 2C 58 00 0E  |LW STA $C000,X..|
00000A00: 12 E1 06 53 54 41 20 24  43 31 30 30 2C 58 00 16  |...STA $C100,X..|
00000A10: 12 EA 06 49 4E 58 00 22  12 F4 06 42 4E 45 20 43  |...INX."...BNE C|
00000A20: 4C 57 00 32 12 FE 06 4A  4D 50 20 28 24 46 46 46  |LW.2...JMP ($FFF|
00000A30: 43 29 00 38 12 08 07 80  00 54 12 12 07 9F 20 31  |C).8.....T.... 1|
00000A40: 35 2C 38 2C 31 35 3A 98  31 35 2C 22 53 3A 44 4C  |5,8,15:.15,"S:DL|
00000A50: 4F 41 44 22 00 66 12 1C  07 94 20 22 44 4C 4F 41  |OAD".f.... "DLOA|
00000A60: 44 22 2C 38 2C 31 00 78  12 26 07 95 20 22 44 4C  |D",8,1.x.&.. "DL|
00000A70: 4F 41 44 22 2C 38 2C 31  00 00 00 30 01           |OAD",8,1...0.   |

........$C000.....LDA #0.&...JSR $FF90.1
.(.LDX #0.=.2.LDA #33.T.<.TESTLO STA $80
00,X.\.F.INX.K.P.BNE TESTLO.V.Z.LDX #0..
.D.TESLO LDA $8000,X...N.CMP #33...X.BEQ
 TESLO1...Y.LDA #27.A.Z.STA 53265.L.{.LD
A #0.Z.|.STA 53281.....LDY #39.....MES L
DA MESSA,Y...... #63... .STA 1024.400,Y.
"...LDA #1.6...STA $D800.400,Y.>...DEY.J
.H.BPL MES.V.R.LDA #20.B...STA 250.M...L
DX #0.X...LDY #0.....DELAY DEX.....BNE D
ELAY.....DEY.....BNE DELAY...".DEC 250.D
.,.BNE DELAY.R.-.JMP RESET...6.TESLO1 IN
X...@.BNE TESLO...J.LDA #192...T.STA 565
76...^.LDA #43.$.H.STA 53265.0.R.LDA #45
.>.|.STA 53272.K...LDA #216.Y...STA 5327
0.H...LDA #0 ! 3.V...STA 53269.....STA 5
3276.....LDA #50...B.STA 53249...L.LDA #
24...V.STA 53248.C...LDA #1.Q...STA 5328
5.....LDY #4.....LDX #0.....TXA.....STX 
53280.....STX 53281. .&.CLSB STA $C800,X
.(.0.INX.5.:.BNE CLSB.D.D.INC CLSB.2.L.N
.DEY.Y.X.BNE CLSB.D.B.LDY #4.O.L.LDX #0.
W.V.TXA.....CLS STA $D800,X.....INX.....
BNE CLS.....INC CLS.2.....DEY.A...BNE CL
S.M...LDY #32.Y.F.LDA #85...P.CLS1 STA $
E000,X...Z.INX.....BNE CLS1.....INC CLS1
.2.....DEY.'...BNE CLS1.4...LDA #253.B..
.STA 52216.N. .LDA #59.\.*.STA 53265.G.4
.LDA #8.O.>.TAX.Z.H.LDY #0...R.JSR $FFBA
...\.LDA #7...F.LDX #.NAME...P.LDY #.NAM
E...Z.JSR $FFBD.J...LDA #0.R...TAX.....L
DY #$40.....JSR $FFD5.....LDA #8.....TAX
.....LDY #0...J.JSR $FFBA.$.T.LDA #3.4..
.LDX #.NAME4.D...LDY #.NAME4.R...JSR $FF
BD.]...LDA #0.J...LDX #$10.W...LDY #$67.
....JSR $FFD5...$.LDY #32.....LDX #0...8
.QIT LDA $4000,X.E.B.QIT1 STA $E000,X.M.
L.INX.Y.V.BNE QIT...`.INC QIT.2...J.INC 
QIT1.2...T.DEY...~.BNE QIT.....LDY #4.).
..SCR LDA $5F40,X.>...SCR1 STA $C800,X.F
...INX.R...BNE SCR.`...INC SCR.2.O.D.INC
 SCR1.2.W.N.DEY...X.BNE SCR.....LDX #128
.....BLOCK LDA $670F,X.....STA $FF3F,X..
...DEX.L...BNE BLOCK.W...LDY #4.....TCOL
 LDA $6328,X...(.TCOL1 STA $D800,X...2.I
NX...<.BNE TCOL.&.F.INC TCOL.2.6.P.INC T
COL1.2.>.Z.DEY.K.D.BNE TCOL.X.N.LDA #253
.F.X.STA 52216.R...LDA #48.....STA 53248
.....LDA #154... .STA 53249.....LDA #255
.....STA 1.....LDA #8.E.H.TAX.R.R.LDY #2
55.....JSR $FFBA.....LDA #3.....LDX #.NA
ME1.....LDY #.NAME1.....JSR $FFBD.$...LD
A #0.2...JSR $FFD5.:.".SEI.F.,.LDA #49.R
.6.STA 788._.@.LDA #234.K.J.STA 789.S.T.
CLI...^.LDA #199...H.STA 56576...R.LDA #
43...|.STA 53265.....LDA #21.B...STA 532
72.O...JMP 2061.....NAME TXT ".PIC C*"..
...NAME1 TXT "XYZ".....NAME4 TXT "SPR".G
.B.MESSA TXT "        CARTRIDGE IN SLOT!
!!            ".^.C.W. 0,0,0,0,0,0,0,0.U
.D.W. 0,0,0,0,0,0,0,0...E.W. 0,0,0,0,0,0
,0,0...F.W. 0,0,0,0,0,0,0,0...G.W. 0,0,0
,0,0,0,0,0.Q.H.W. 0,0,0,0,0,0,0,0...L.RE
SET LDX #0...V.TXA.....CLW STA $C000,X..
...STA $C100,X.....INX."...BNE CLW.2...J
MP ($FFFC).8.....T.... 15,8,15:.15,"S:DL
OAD".F.... "DLOAD",8,1.X.&.. "DLOAD",8,1
...0.

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL