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

PM/PS DUAL

FILE INFORMATION

FILENAME(S): PM/PS DUAL

FILE TYPE(S): PRG

FILE SIZE: 5.4K

FIRST SEEN: 2025-10-20 14:31:10

APPEARS ON: 2 disk(s)

FILE HASH

7bdc729743969f903519e29d73690e765422dedc6aacfe70a2dd298d8847e3d7

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
PB DOMAIN 0019GR PM/PS DUAL PRG Treasure Chest - Klaus Der Suhler 6 1 DOWNLOAD FILE
PB DOMAIN 0019GR PM/PS DUAL PRG UK CD 6 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 26 08 0A 00 97 35  33 32 38 30 2C 31 35 3A  |..&....53280,15:|
00000010: 97 35 33 32 38 31 2C 31  3A 99 22 93 22 C7 28 31  |.53281,1:.".".(1|
00000020: 34 29 C7 28 38 29 00 32  08 14 00 8F 20 2A 2A 20  |4).(8).2.... ** |
00000030: 53 45 00 44 08 1E 00 99  22 93 11 11 11 11 11 11  |SE.D....".......|
00000040: 11 11 11 22 00 6F 08 28  00 99 22 1D 1D 1D 1D 1D  |...".o.(..".....|
00000050: 1D 1D 1D 12 D0 D2 C9 CE  D4 D3 C8 CF D0 A0 3C 3D  |..............<=|
00000060: 3E A0 D0 D2 C9 CE D4 CD  C1 D3 D4 C5 D2 92 22 00  |>.............".|
00000070: 95 08 32 00 99 3A 99 22  11 1D 1D 1D 1D 1D 1D 1D  |..2..:."........|
00000080: 1D 1D 1D 1D 1D 1D 1D 12  D2 CF C7 C5 D2 A0 CA CF  |................|
00000090: CE C5 D3 92 22 00 C7 08  3C 00 99 3A 99 22 11 1D  |...."...<..:."..|
000000A0: 1D 1D 1D 1D 95 12 C3 CF  CD CD CF C4 CF D2 C5 A0  |................|
000000B0: D5 D3 C5 D2 D3 A0 CF C6  A0 C2 C1 D2 D4 CC C5 D3  |................|
000000C0: D6 C9 CC CC C5 90 22 00  E4 08 46 00 81 57 57 B2  |......"...F..WW.|
000000D0: 38 32 38 A4 39 32 33 3A  87 59 59 3A 97 57 57 2C  |828.923:.YY:.WW,|
000000E0: 59 59 3A 82 00 F7 08 50  00 97 35 35 2C 30 3A 97  |YY:....P..55,0:.|
000000F0: 35 36 2C 34 30 3A 9C 00  0F 09 5A 00 50 47 B2 34  |56,40:....Z.PG.4|
00000100: 30 3A 4D 58 B2 34 30 3A  99 22 11 11 11 11 11 00  |0:MX.40:."......|
00000110: 53 09 64 00 53 24 B2 22  20 D3 C8 CF D0 20 22 3A  |S.d.S$." .... ":|
00000120: 44 24 B2 22 20 CD C1 D3  D4 C5 D2 20 22 3A 99 22  |D$." ...... ":."|
00000130: 90 C5 4E 54 45 52 20 12  53 92 20 46 4F 52 20 D0  |..NTER .S. FOR .|
00000140: D2 C9 CE D4 22 53 24 22  54 4F 20 D0 D2 C9 CE D4  |...."S$"TO .....|
00000150: 22 44 24 00 7D 09 6E 00  99 22 11 20 20 20 4F 52  |"D$.}.n..".   OR|
00000160: 20 12 4D 92 20 46 4F 52  20 D0 D2 C9 CE D4 22 44  | .M. FOR ....."D|
00000170: 24 22 54 4F 20 D0 D2 C9  CE D4 22 53 24 00 9A 09  |$"TO ....."S$...|
00000180: 78 00 85 43 24 3A 8B 43  24 B3 B1 22 4D 22 AF 43  |x..C$:.C$.."M".C|
00000190: 24 B3 B1 22 53 22 A7 31  30 30 00 D5 09 82 00 5A  |$.."S".100.....Z|
000001A0: 24 B2 C7 28 30 29 3A 51  24 B2 C7 28 33 34 29 3A  |$..(0):Q$..(34):|
000001B0: 43 4C 24 B2 22 9D 9D 9D  9D 9D 9D 9D 9D 9D 9D 9D  |CL$."...........|
000001C0: 9D 9D 9D 9D 9D 9D 9D 9D  9D 9D 22 3A 43 B2 32 3A  |..........":C.2:|
000001D0: 4D 4E B2 31 31 00 FD 09  8C 00 8B 43 24 B2 22 4D  |MN.11......C$."M|
000001E0: 22 A7 41 24 B2 53 24 3A  53 24 B2 44 24 3A 44 24  |".A$.S$:S$.D$:D$|
000001F0: B2 41 24 3A 43 B2 30 3A  4D 4E B2 31 36 00 2B 0A  |.A$:C.0:MN.16.+.|
00000200: 96 00 86 46 24 28 4D 58  29 2C 46 28 4D 58 29 2C  |...F$(MX),F(MX),|
00000210: 54 28 4D 58 29 2C 4E 46  24 28 4D 58 29 3A 97 32  |T(MX),NF$(MX):.2|
00000220: 2C 43 3A 44 31 B2 38 3A  A0 31 35 00 57 0A A0 00  |,C:D1.8:.15.W...|
00000230: 99 22 11 D3 4F 55 52 43  45 20 44 52 49 56 45 23  |."..OURCE DRIVE#|
00000240: 20 22 44 31 22 9D 9D 9D  9D 22 3B 3A 8B 44 31 B1  | "D1"....";:.D1.|
00000250: 39 A7 99 22 9D 22 3B 00  92 0A AA 00 85 44 31 3A  |9..".";......D1:|
00000260: 8B 44 31 B3 38 B0 44 31  B1 31 32 A7 99 22 11 12  |.D1.8.D1.12.."..|
00000270: 20 23 20 4D 55 53 54 20  42 45 20 42 45 54 57 45  | # MUST BE BETWE|
00000280: 45 4E 20 38 20 41 4E 44  20 31 32 2E 22 3A 89 31  |EN 8 AND 12.":.1|
00000290: 36 30 00 CA 0A B4 00 9F  31 35 2C 44 31 2C 31 35  |60......15,D1,15|
000002A0: 3A A0 31 35 3A 8B 53 54  A7 99 22 11 12 C4 52 49  |:.15:.ST.."...RI|
000002B0: 56 45 22 44 31 22 9D 20  4E 4F 54 20 50 52 45 53  |VE"D1". NOT PRES|
000002C0: 45 4E 54 2E 22 3A 89 31  36 30 00 DF 0A BE 00 44  |ENT.":.160.....D|
000002D0: 32 B2 39 3A 8B 44 31 B2  44 32 A7 44 32 B2 38 00  |2.9:.D1.D2.D2.8.|
000002E0: FB 0A C8 00 9F 31 35 2C  44 32 2C 31 35 3A A0 31  |.....15,D2,15:.1|
000002F0: 35 3A 8B 53 54 A7 44 32  B2 44 31 00 2C 0B D2 00  |5:.ST.D2.D1.,...|
00000300: 99 22 11 C4 45 53 54 49  4E 41 54 49 4F 4E 20 44  |."..ESTINATION D|
00000310: 52 49 56 45 23 20 22 44  32 22 9D 9D 9D 9D 22 3B  |RIVE# "D2"....";|
00000320: 3A 8B 44 32 B1 39 A7 99  22 9D 22 3B 00 67 0B DC  |:.D2.9..".";.g..|
00000330: 00 85 44 32 3A 8B 44 32  B3 38 B0 44 32 B1 31 32  |..D2:.D2.8.D2.12|
00000340: A7 99 22 11 12 20 23 20  4D 55 53 54 20 42 45 20  |..".. # MUST BE |
00000350: 42 45 54 57 45 45 4E 20  38 20 41 4E 44 20 31 32  |BETWEEN 8 AND 12|
00000360: 2E 22 3A 89 32 31 30 00  9F 0B E6 00 9F 31 35 2C  |.":.210......15,|
00000370: 44 32 2C 31 35 3A A0 31  35 3A 8B 53 54 A7 99 22  |D2,15:.15:.ST.."|
00000380: 11 12 C4 52 49 56 45 22  44 32 22 9D 20 4E 4F 54  |...RIVE"D2". NOT|
00000390: 20 50 52 45 53 45 4E 54  2E 22 3A 89 32 31 30 00  | PRESENT.":.210.|
000003A0: D8 0B F0 00 85 22 11 C5  4E 54 45 52 20 12 C1 92  |....."..NTER ...|
000003B0: 20 46 4F 52 20 C1 D5 D4  CF 20 43 4F 50 59 20 28  | FOR .... COPY (|
000003C0: 4E 4F 20 50 52 4F 4D 50  54 49 4E 47 29 20 20 41  |NO PROMPTING)  A|
000003D0: 9D 9D 9D 22 3B 41 55 24  00 EA 0B FA 00 8B 44 31  |...";AU$......D1|
000003E0: B3 B1 44 32 A7 8D 31 35  31 30 00 17 0C 04 01 99  |..D2..1510......|
000003F0: 22 93 11 D0 D2 C9 CE D4  22 53 24 22 D4 CF 20 D0  |"......."S$".. .|
00000400: D2 C9 CE D4 22 44 24 22  C6 C9 CC C5 20 C3 CF CE  |...."D$".... ...|
00000410: D6 C5 D2 D3 CE 22 3B 00  4D 0C 0E 01 99 22 A3 A3  |.....";.M...."..|
00000420: A3 A3 A3 A3 A3 A3 A3 A3  A3 A3 A3 A3 A3 A3 A3 A3  |................|
00000430: A3 A3 A3 A3 A3 A3 A3 A3  A3 A3 A3 A3 A3 A3 A3 A3  |................|
00000440: A3 A3 A3 A3 A3 A3 22 3B  3A 53 30 B2 30 00 71 0C  |......";:S0.0.q.|
00000450: 13 01 8F 20 20 50 4F 4B  45 38 30 38 2C 32 33 39  |...  POKE808,239|
00000460: 3A 52 45 4D 20 44 49 53  41 42 4C 45 20 53 54 4F  |:REM DISABLE STO|
00000470: 50 00 86 0C 18 01 8B 53  31 B1 30 AF 44 31 B3 B1  |P......S1.0.D1..|
00000480: 44 32 A7 33 32 30 00 BD  0C 22 01 99 22 11 C9 4E  |D2.320...".."..N|
00000490: 53 45 52 54 20 D0 D2 C9  CE D4 22 53 24 22 1C D3  |SERT ....."S$"..|
000004A0: CF D5 D2 C3 C5 90 20 44  49 53 4B 22 3A 99 22 20  |...... DISK":." |
000004B0: 20 20 49 4E 20 C4 52 49  56 45 22 44 31 00 DD 0C  |  IN .RIVE"D1...|
000004C0: 2C 01 99 22 11 54 48 45  4E 20 50 52 45 53 53 20  |,..".THEN PRESS |
000004D0: 12 D2 C5 D4 D5 D2 CE 92  20 4B 45 59 22 00 FA 0C  |........ KEY"...|
000004E0: 36 01 8D 31 34 38 30 3A  A1 41 24 3A 8B 41 24 B3  |6..1480:.A$:.A$.|
000004F0: B1 C7 28 31 33 29 A7 33  31 30 00 1F 0D 40 01 A0  |..(13).310...@..|
00000500: 31 35 3A 9F 31 35 2C 44  31 2C 31 35 2C 22 49 30  |15:.15,D1,15,"I0|
00000510: 22 3A 8D 31 33 35 30 3A  8B 45 89 31 33 31 30 00  |":.1350:.E.1310.|
00000520: 2D 0D 4A 01 8B 53 31 B1  30 A7 33 36 30 00 53 0D  |-.J..S1.0.360.S.|
00000530: 54 01 85 22 11 20 C6 49  4C 45 4E 41 4D 45 53 20  |T..". .ILENAMES |
00000540: 54 4F 20 4D 41 54 43 48  20 3F 20 2A 9D 9D 9D 22  |TO MATCH ? *..."|
00000550: 3B 47 24 00 6F 0D 5E 01  8B C9 28 47 24 2C 31 29  |;G$.o.^...(G$,1)|
00000560: B3 B1 22 2A 22 A7 47 24  B2 47 24 AA 22 2A 22 00  |.."*".G$.G$."*".|
00000570: 8A 0D 68 01 9F 31 2C 44  31 2C 30 2C 22 24 30 3A  |..h..1,D1,0,"$0:|
00000580: 22 AA 47 24 3A 8D 31 33  35 30 00 BA 0D 72 01 8B  |".G$:.1350...r..|
00000590: 45 A7 99 22 11 1D 1D 1D  1D 12 9A 20 C3 41 4E 4E  |E.."....... .ANN|
000005A0: 4F 54 20 52 45 41 44 20  44 49 52 45 43 54 4F 52  |OT READ DIRECTOR|
000005B0: 59 20 92 22 3A 89 31 33  31 30 00 C4 0D 7C 01 8D  |Y .":.1310...|..|
000005C0: 31 34 36 30 00 E0 0D 86  01 A1 23 31 2C 41 24 2C  |1460......#1,A$,|
000005D0: 42 24 3A 4E B2 30 3A 41  44 B2 50 47 AC 32 35 36  |B$:N.0:AD.PG.256|
000005E0: 00 13 0E 90 01 97 37 38  31 2C 31 3A 9E 36 35 34  |......781,1:.654|
000005F0: 37 38 3A 8F 20 53 45 45  20 52 55 4E 20 53 50 45  |78:. SEE RUN SPE|
00000600: 43 49 41 4C 20 45 44 20  31 39 38 36 20 20 50 2E  |CIAL ED 1986  P.|
00000610: 31 32 37 00 36 0E 9A 01  A1 41 24 2C 42 24 3A 8B  |127.6....A$,B$:.|
00000620: 42 24 B2 22 22 A7 9E 36  35 34 38 34 3A 53 30 B2  |B$.""..65484:S0.|
00000630: 30 3A 89 37 34 30 00 47  0E A4 01 A1 41 24 2C 42  |0:.740.G....A$,B|
00000640: 24 3A 46 24 B2 22 22 00  64 0E AE 01 53 5A B2 C6  |$:F$."".d...SZ..|
00000650: 28 41 24 AA 5A 24 29 AA  C6 28 42 24 AA 5A 24 29  |(A$.Z$)..(B$.Z$)|
00000660: AC 32 35 36 00 84 0E B8  01 A1 41 24 3A 8B 36 34  |.256......A$:.64|
00000670: AF 53 54 A7 9E 36 35 34  38 34 3A 53 30 B2 30 3A  |.ST..65484:S0.0:|
00000680: 89 37 34 30 00 94 0E C2  01 8B 41 24 B3 B1 51 24  |.740......A$..Q$|
00000690: 89 34 34 30 00 B2 0E CC  01 A1 41 24 3A 8B 41 24  |.440......A$:.A$|
000006A0: B3 B1 51 24 A7 46 24 B2  46 24 AA 41 24 3A 89 34  |..Q$.F$.F$.A$:.4|
000006B0: 36 30 00 C7 0E D6 01 A1  41 24 3A 8B 41 24 B3 B1  |60......A$:.A$..|
000006C0: 22 20 22 89 34 37 30 00  DB 0E E0 01 A1 54 24 3A  |" ".470......T$:|
000006D0: 8B 54 24 B2 22 20 22 89  34 38 30 00 EF 0E EA 01  |.T$." ".480.....|
000006E0: A1 41 24 3A 8B 41 24 B3  B1 22 22 89 34 39 30 00  |.A$:.A$.."".490.|
000006F0: 05 0F F4 01 9E 36 35 34  38 34 3A 20 8F 20 50 52  |.....65484: . PR|
00000700: 49 4E 54 46 24 00 1C 0F  FE 01 8B 53 5A B3 B1 33  |INTF$......SZ..3|
00000710: B0 54 24 B3 B1 22 50 22  89 34 30 30 00 36 0F 08  |.T$.."P".400.6..|
00000720: 02 8B 43 AF C9 28 46 24  2C 34 29 B2 22 2E 47 52  |..C..(F$,4).".GR|
00000730: 41 22 89 34 30 30 00 53  0F 12 02 8B 43 B2 30 AF  |A".400.S....C.0.|
00000740: C9 28 46 24 2C 34 29 B3  B1 22 2E 47 52 41 22 89  |.(F$,4)..".GRA".|
00000750: 34 30 30 00 6A 0F 1C 02  53 30 B2 53 30 AA 31 3A  |400.j...S0.S0.1:|
00000760: 8B 53 31 B1 53 30 A7 34  30 30 00 82 0F 26 02 99  |.S1.S0.400...&..|
00000770: 22 20 22 3B 51 24 3B 46  24 3B 51 24 3B A3 32 34  |" ";Q$;F$;Q$;.24|
00000780: 29 3B 00 A2 0F 30 02 99  22 5F 20 12 43 3A 52 3A  |);...0.."_ .C:R:|
00000790: 41 3A 42 3A 51 3F 92 22  3A 99 22 91 22 A3 32 34  |A:B:Q?.":.".".24|
000007A0: 29 3B 00 BE 0F 3A 02 A1  41 24 3A 8B 41 24 B2 22  |);...:..A$:.A$."|
000007B0: 22 AF 41 55 24 B3 B1 22  41 22 A7 35 37 30 00 E8  |".AU$.."A".570..|
000007C0: 0F 44 02 99 22 20 20 20  20 20 20 20 20 20 20 20  |.D.."           |
000007D0: 20 22 3A 99 22 91 9A 22  A3 32 32 29 3B 3A 8B 41  | ":."..".22);:.A|
000007E0: 24 B2 22 22 A7 36 35 30  00 12 10 4E 02 8B 41 24  |$."".650...N..A$|
000007F0: B2 22 41 22 A7 99 22 C1  55 54 4F 20 43 4F 50 59  |."A"..".UTO COPY|
00000800: 20 CF CE 90 22 3A 41 55  24 B2 22 41 22 3A 89 35  | ...":AU$."A":.5|
00000810: 35 30 00 38 10 58 02 41  55 24 B2 22 22 3A 8B 41  |50.8.X.AU$."":.A|
00000820: 24 B2 22 52 22 A7 99 22  20 D2 C5 CA C5 C3 D4 C5  |$."R".." .......|
00000830: C4 90 22 3A 89 34 30 30  00 61 10 62 02 8B 41 24  |..":.400.a.b..A$|
00000840: B2 22 42 22 A7 99 22 20  C2 45 47 49 4E 20 C3 4F  |."B".." .EGIN .O|
00000850: 50 59 90 22 3A 53 30 B2  53 30 AB 31 3A 89 37 34  |PY.":S0.S0.1:.74|
00000860: 30 00 82 10 6C 02 8B 41  24 B2 22 51 22 A7 99 22  |0...l..A$."Q".."|
00000870: 20 D1 D5 C9 D4 20 43 4F  50 59 90 22 3A 89 31 32  | .... COPY.":.12|
00000880: 33 30 00 9D 10 76 02 8B  41 24 B3 B1 22 43 22 A7  |30...v..A$.."C".|
00000890: 3A 99 3A 8D 31 34 36 30  3A 89 35 35 30 00 B0 10  |:.:.1460:.550...|
000008A0: 80 02 99 22 20 C3 CF D0  D9 20 46 49 4C 45 90 22  |..." .... FILE."|
000008B0: 00 C3 10 8A 02 4E B2 4E  AA 31 3A 46 24 28 4E 29  |.....N.N.1:F$(N)|
000008C0: B2 46 24 00 DE 10 94 02  8B 43 B2 30 A7 20 46 24  |.F$......C.0. F$|
000008D0: B2 C8 28 46 24 2C C3 28  46 24 29 AB 34 29 00 FC  |..(F$,.(F$).4)..|
000008E0: 10 96 02 8B 43 A7 20 8B  C3 28 46 24 29 B1 31 31  |....C. ..(F$).11|
000008F0: A7 46 24 B2 C8 28 46 24  2C 31 31 29 00 15 11 9E  |.F$..(F$,11)....|
00000900: 02 4E 46 24 28 4E 29 B2  22 22 3A 81 49 B2 31 A4  |.NF$(N)."":.I.1.|
00000910: C3 28 46 24 29 00 43 11  A0 02 8B 43 A7 20 8B CA  |.(F$).C....C. ..|
00000920: 28 46 24 2C 49 2C 31 29  B2 22 20 22 A7 4E 46 24  |(F$,I,1)." ".NF$|
00000930: 28 4E 29 B2 4E 46 24 28  4E 29 AA 22 2D 22 3A 89  |(N).NF$(N)."-":.|
00000940: 37 30 30 00 76 11 A2 02  8B C6 28 CA 28 46 24 2C  |700.v.....(.(F$,|
00000950: 49 2C 31 29 29 B3 39 31  20 A7 4E 46 24 28 4E 29  |I,1)).91 .NF$(N)|
00000960: B2 4E 46 24 28 4E 29 AA  CA 28 46 24 2C 49 2C 31  |.NF$(N)..(F$,I,1|
00000970: 29 3A 89 37 30 30 00 B2  11 A4 02 8B C6 28 CA 28  |):.700.......(.(|
00000980: 46 24 2C 49 2C 31 29 29  B3 31 32 33 A7 4E 46 24  |F$,I,1)).123.NF$|
00000990: 28 4E 29 B2 4E 46 24 28  4E 29 AA C7 28 C6 28 CA  |(N).NF$(N)..(.(.|
000009A0: 28 46 24 2C 49 2C 31 29  29 AB 33 32 29 3A 89 37  |(F$,I,1)).32):.7|
000009B0: 30 30 00 DC 11 A8 02 8B  C6 28 CA 28 46 24 2C 49  |00.......(.(F$,I|
000009C0: 2C 31 29 29 B3 31 39 32  B0 C6 28 CA 28 46 2C 49  |,1)).192..(.(F,I|
000009D0: 2C 31 29 29 B1 32 32 33  A7 37 30 30 00 01 12 B2  |,1)).223.700....|
000009E0: 02 4E 46 24 28 4E 29 B2  4E 46 24 28 4E 29 AA C7  |.NF$(N).NF$(N)..|
000009F0: 28 C6 28 CA 28 46 24 2C  49 2C 31 29 29 AB 39 36  |(.(.(F$,I,1)).96|
00000A00: 29 00 1C 12 BC 02 82 49  3A 8B 41 55 24 B3 B1 22  |)......I:.AU$.."|
00000A10: 41 22 A7 49 B2 4E 3A 8D  31 34 30 30 00 37 12 C6  |A".I.N:.1400.7..|
00000A20: 02 8B 41 55 24 B2 22 41  22 A7 99 22 1E 22 4E 46  |..AU$."A".."."NF|
00000A30: 24 28 4E 29 22 90 22 00  52 12 D0 02 41 44 B2 41  |$(N)".".R...AD.A|
00000A40: 44 AA 53 5A AC 32 35 36  3A 8B 4E B3 4D 58 89 34  |D.SZ.256:.N.MX.4|
00000A50: 30 30 00 73 12 DA 02 99  22 11 20 12 CD 41 58 49  |00.s....". ..AXI|
00000A60: 4D 55 4D 20 4F 46 22 3B  4D 58 3B 22 46 49 4C 45  |MUM OF";MX;"FILE|
00000A70: 53 2E 22 00 97 12 E4 02  A0 31 3A 99 22 11 22 3B  |S."......1:.".";|
00000A80: A6 31 31 29 3B 4E 3B 22  46 49 4C 45 53 20 54 4F  |.11);N;"FILES TO|
00000A90: 20 52 45 41 44 11 22 00  AF 12 EE 02 41 44 B2 50  | READ.".....AD.P|
00000AA0: 47 AC 32 35 36 3A 8B 4E  B2 30 89 31 32 36 30 00  |G.256:.N.0.1260.|
00000AB0: CD 12 F8 02 81 49 B2 31  A4 4E 3A 99 51 24 3B 46  |.....I.1.N:.Q$;F|
00000AC0: 24 28 49 29 3B 51 24 3B  A3 32 30 29 3B 00 DE 12  |$(I);Q$;.20);...|
00000AD0: 02 03 53 5A B2 B5 28 41  44 AD 32 35 36 29 00 F9  |..SZ..(AD.256)..|
00000AE0: 12 0C 03 97 32 35 31 2C  41 44 AB 53 5A AC 32 35  |....251,AD.SZ.25|
00000AF0: 36 3A 97 32 35 32 2C 53  5A 00 1B 13 16 03 9F 31  |6:.252,SZ......1|
00000B00: 2C 44 31 2C 32 2C 22 30  3A 22 AA 46 24 28 49 29  |,D1,2,"0:".F$(I)|
00000B10: AA 22 2C 50 22 3A 8D 31  33 35 30 00 33 13 20 03  |.",P":.1350.3. .|
00000B20: 8B 45 B2 37 34 A7 A0 31  3A 4E B2 49 AB 31 3A 89  |.E.74..1:N.I.1:.|
00000B30: 39 33 30 00 4B 13 2A 03  8B 45 A7 A0 31 3A 46 24  |930.K.*..E..1:F$|
00000B40: 28 49 29 B2 22 22 3A 89  39 32 30 00 72 13 34 03  |(I)."":.920.r.4.|
00000B50: A1 23 31 2C 59 24 2C 58  24 3A 8B 43 B2 30 A7 20  |.#1,Y$,X$:.C.0. |
00000B60: A1 23 31 2C 58 24 2C 59  24 2C 59 24 2C 59 24 2C  |.#1,X$,Y$,Y$,Y$,|
00000B70: 59 24 00 83 13 3E 03 8B  58 24 B2 22 22 A7 58 24  |Y$...>..X$."".X$|
00000B80: B2 5A 24 00 A5 13 48 03  8B 58 24 B3 B1 22 58 22  |.Z$...H..X$.."X"|
00000B90: A7 45 53 B2 31 3A 8F 20  50 52 49 4E 54 41 53 43  |.ES.1:. PRINTASC|
00000BA0: 28 58 24 29 3B 00 C8 13  52 03 9E 38 33 31 3A 8D  |(X$);...R..831:.|
00000BB0: 31 33 35 30 3A A0 31 3A  8B 45 B2 37 34 A7 4E B2  |1350:.1:.E.74.N.|
00000BC0: 49 AB 31 3A 89 39 33 30  00 DD 13 5C 03 8B 45 A7  |I.1:.930...\..E.|
00000BD0: 46 24 28 49 29 B2 22 22  3A 89 39 32 30 00 0A 14  |F$(I)."":.920...|
00000BE0: 66 03 8B C2 28 32 35 32  29 B2 31 36 30 A7 46 24  |f...(252).160.F$|
00000BF0: 28 49 29 B2 22 22 3A 99  22 12 D4 CF CF 20 CC C1  |(I)."":.".... ..|
00000C00: D2 C7 C5 92 22 3A 89 39  32 30 00 33 14 70 03 46  |....":.920.3.p.F|
00000C10: 28 49 29 B2 41 44 3A 41  44 B2 C2 28 32 35 31 29  |(I).AD:AD..(251)|
00000C20: AA C2 28 32 35 32 29 AC  32 35 36 3A 54 28 49 29  |..(252).256:T(I)|
00000C30: B2 41 44 00 53 14 7A 03  53 5A B2 54 28 49 29 AB  |.AD.S.z.SZ.T(I).|
00000C40: 46 28 49 29 AA 32 3A 8B  43 B2 30 A7 53 5A B2 53  |F(I).2:.C.0.SZ.S|
00000C50: 5A AA 35 00 79 14 84 03  99 C9 28 22 20 20 20 22  |Z.5.y.....("   "|
00000C60: AA C4 28 53 5A 29 2C 35  29 3B 22 20 42 59 54 45  |..(SZ),5);" BYTE|
00000C70: 53 20 4F 46 20 4D 45 4D  22 00 AE 14 8E 03 8B 45  |S OF MEM"......E|
00000C80: 53 A7 99 22 9C D4 48 49  53 20 4D 41 59 20 4E 4F  |S.."..HIS MAY NO|
00000C90: 54 20 42 45 20 41 20 D0  D2 C9 CE D4 22 53 24 22  |T BE A ....."S$"|
00000CA0: 46 49 4C 45 21 21 90 11  22 3A 45 53 B2 30 00 B5  |FILE!!..":ES.0..|
00000CB0: 14 98 03 82 49 00 C3 14  A2 03 8B 4E B2 30 89 31  |....I......N.0.1|
00000CC0: 33 31 30 00 E2 14 AC 03  A0 31 35 3A 9F 31 35 2C  |310......15:.15,|
00000CD0: 44 32 2C 31 35 3A 8B 44  31 B2 44 32 A7 8D 31 35  |D2,15:.D1.D2..15|
00000CE0: 31 30 00 06 15 B6 03 99  22 11 1C 20 D7 52 49 54  |10......".. .RIT|
00000CF0: 49 4E 47 20 D0 D2 C9 CE  D4 22 44 24 22 46 49 4C  |ING ....."D$"FIL|
00000D00: 45 53 2E 90 11 22 00 11  15 C0 03 81 49 B2 31 A4  |ES..."......I.1.|
00000D10: 4E 00 2B 15 CA 03 46 24  B2 4E 46 24 28 49 29 3A  |N.+...F$.NF$(I):|
00000D20: 8B 46 24 B2 22 22 A7 31  32 32 30 00 3F 15 D4 03  |.F$."".1220.?...|
00000D30: 8B 43 A7 46 24 B2 46 24  AA 22 2E 47 52 41 22 00  |.C.F$.F$.".GRA".|
00000D40: 53 15 DE 03 99 51 24 3B  46 24 3B 51 24 3B A3 32  |S....Q$;F$;Q$;.2|
00000D50: 30 29 3B 00 8C 15 E8 03  8B 46 24 B3 B1 46 24 28  |0);......F$..F$(|
00000D60: 49 29 A7 99 22 9C 22 AA  46 24 28 49 29 AA C8 28  |I)..".".F$(I)..(|
00000D70: 43 4C 24 2C C3 28 46 24  28 49 29 29 AA 34 29 22  |CL$,.(F$(I)).4)"|
00000D80: 90 22 3A 99 22 91 22 A3  32 30 29 3B 00 A2 15 F2  |.":.".".20);....|
00000D90: 03 9F 31 2C 44 32 2C 32  2C 46 24 AA 22 2C 50 2C  |..1,D2,2,F$.",P,|
00000DA0: 57 22 00 B6 15 FC 03 8D  31 33 35 30 3A 8B 45 B2  |W"......1350:.E.|
00000DB0: 30 89 31 31 30 30 00 CD  15 06 04 A0 31 3A 8F 20  |0.1100......1:. |
00000DC0: 49 46 45 3D 36 33 54 48  45 4E 37 33 30 00 13 16  |IFE=63THEN730...|
00000DD0: 10 04 99 22 1C 20 20 20  20 20 C6 C9 CC C5 20 C5  |...".     .... .|
00000DE0: D8 C9 D3 D4 D3 20 20 20  22 3A 99 22 20 1C D2 90  |.....   ":." ...|
00000DF0: 20 2D 52 45 50 4C 41 43  45 20 1C CE 90 20 2D 4E  | -REPLACE ... -N|
00000E00: 45 57 20 4E 41 4D 45 20  1C C2 90 20 2D 42 59 50  |EW NAME ... -BYP|
00000E10: 41 53 53 00 2D 16 1A 04  8D 31 34 38 30 3A A1 41  |ASS.-....1480:.A|
00000E20: 24 3A 8B 41 24 B2 22 22  A7 31 30 35 30 00 44 16  |$:.A$."".1050.D.|
00000E30: 24 04 8B 41 24 B2 22 4E  22 A7 8D 31 34 30 30 3A  |$..A$."N"..1400:|
00000E40: 89 39 37 30 00 55 16 2E  04 8B 41 24 B2 22 42 22  |.970.U....A$."B"|
00000E50: 89 31 32 32 30 00 67 16  38 04 8B 41 24 B3 B1 22  |.1220.g.8..A$.."|
00000E60: 52 22 89 31 30 35 30 00  8A 16 42 04 99 22 D2 C5  |R".1050...B.."..|
00000E70: D0 CC C1 C3 C9 CE C7 22  3A 98 31 35 2C 22 53 30  |.......":.15,"S0|
00000E80: 3A 22 AA 46 24 3A 89 39  39 30 00 9D 16 4C 04 53  |:".F$:.990...L.S|
00000E90: 5A B2 B5 28 46 28 49 29  AD 32 35 36 29 00 C9 16  |Z..(F(I).256)...|
00000EA0: 56 04 97 32 35 31 2C 46  28 49 29 AB 53 5A AC 32  |V..251,F(I).SZ.2|
00000EB0: 35 36 3A 97 32 35 32 2C  53 5A 3A 8B 43 A7 54 28  |56:.252,SZ:.C.T(|
00000EC0: 49 29 B2 54 28 49 29 AB  35 00 DC 16 60 04 53 5A  |I).T(I).5...`.SZ|
00000ED0: B2 B5 28 54 28 49 29 AD  32 35 36 29 00 F9 16 6A  |..(T(I).256)...j|
00000EE0: 04 97 32 35 33 2C 54 28  49 29 AB 53 5A AC 32 35  |..253,T(I).SZ.25|
00000EF0: 36 3A 97 32 35 34 2C 53  5A 00 12 17 74 04 8B 43  |6:.254,SZ...t..C|
00000F00: B2 30 A7 98 31 2C 5A 24  22 58 22 3B 3A 89 31 31  |.0..1,Z$"X";:.11|
00000F10: 36 30 00 3A 17 7E 04 98  31 2C C7 28 38 30 29 C7  |60.:.~..1,.(80).|
00000F20: 28 31 31 39 29 C7 28 38  38 29 5A 24 C7 28 35 32  |(119).(88)Z$.(52|
00000F30: 29 5A 24 C7 28 31 38 30  29 3B 00 5D 17 88 04 9E  |)Z$.(180);.]....|
00000F40: 38 32 38 3A 8D 31 33 35  30 3A 8B 43 B2 30 A7 98  |828:.1350:.C.0..|
00000F50: 31 2C 5A 24 5A 24 5A 24  5A 24 5A 24 3B 00 74 17  |1,Z$Z$Z$Z$Z$;.t.|
00000F60: 92 04 A0 31 3A 8B 45 B2  37 32 B0 45 B2 37 34 89  |...1:.E.72.E.74.|
00000F70: 31 32 33 30 00 80 17 9C  04 8B 45 89 31 32 32 30  |1230......E.1220|
00000F80: 00 9D 17 A6 04 53 5A B2  54 28 49 29 AB 46 28 49  |.....SZ.T(I).F(I|
00000F90: 29 3A 8B 43 A7 53 5A B2  53 5A AA 35 39 00 AF 17  |):.C.SZ.SZ.59...|
00000FA0: B0 04 8B 43 B2 30 A7 53  5A B2 53 5A AB 34 35 00  |...C.0.SZ.SZ.45.|
00000FB0: D6 17 BA 04 99 C9 28 22  20 20 20 22 AA C4 28 53  |......("   "..(S|
00000FC0: 5A 29 2C 35 29 3B 22 20  42 59 54 45 53 20 4F 46  |Z),5);" BYTES OF|
00000FD0: 20 4D 45 4D 20 22 00 DD  17 C4 04 82 49 00 E8 17  | MEM "......I...|
00000FE0: CE 04 A0 31 3A A0 31 35  00 0C 18 D8 04 53 31 B2  |...1:.15.....S1.|
00000FF0: 30 3A 8B 41 55 24 B2 22  41 22 AF 53 30 B1 30 A7  |0:.AU$."A".S0.0.|
00001000: 53 31 B2 53 30 AA 31 3A  89 32 36 30 00 3E 18 E2  |S1.S0.1:.260.>..|
00001010: 04 99 22 11 CD 4F 52 45  20 D0 D2 C9 CE D4 22 53  |.."..ORE ....."S|
00001020: 24 22 46 49 4C 45 53 20  54 4F 20 43 4F 4E 56 45  |$"FILES TO CONVE|
00001030: 52 54 3F 20 59 9D 9D 9D  22 3B 3A 85 41 24 00 50  |RT? Y...";:.A$.P|
00001040: 18 EC 04 8B 41 24 B3 B1  22 59 22 A7 31 33 31 30  |....A$.."Y".1310|
00001050: 00 5E 18 F6 04 8B 53 30  B3 31 A7 32 36 30 00 8F  |.^....S0.1.260..|
00001060: 18 00 05 99 22 11 D3 54  41 52 54 20 57 49 54 48  |...."..TART WITH|
00001070: 20 4C 41 53 54 20 D0 D2  C9 CE D4 22 53 24 22 46  | LAST ....."S$"F|
00001080: 49 4C 45 3F 20 59 9D 9D  9D 22 3B 3A 85 41 24 00  |ILE? Y...";:.A$.|
00001090: A3 18 0A 05 8B 41 24 B2  22 59 22 A7 53 31 B2 53  |.....A$."Y".S1.S|
000010A0: 30 AA 31 00 AC 18 14 05  89 32 36 30 00 C4 18 1E  |0.1......260....|
000010B0: 05 99 A3 31 34 29 22 11  C5 CE C4 20 CF C6 20 C3  |...14)".... .. .|
000010C0: CF D0 D9 22 00 EA 18 28  05 99 A3 37 29 22 11 1C  |..."...(...7)"..|
000010D0: D0 4C 45 41 53 45 20 52  45 4D 4F 56 45 20 54 48  |.LEASE REMOVE TH|
000010E0: 45 20 44 49 53 4B 28 53  29 22 00 0A 19 32 05 99  |E DISK(S)"...2..|
000010F0: A3 31 31 29 22 46 52 4F  4D 20 54 48 45 20 44 49  |.11)"FROM THE DI|
00001100: 53 4B 20 44 52 49 56 45  90 22 00 37 19 3C 05 99  |SK DRIVE.".7.<..|
00001110: C7 28 39 29 3B 3A 97 35  36 2C 31 36 30 3A 97 38  |.(9);:.56,160:.8|
00001120: 30 38 2C 32 33 37 3A 80  3A 20 8F 20 45 4E 41 42  |08,237:.: . ENAB|
00001130: 4C 45 20 53 54 4F 50 00  4A 19 46 05 84 31 35 2C  |LE STOP.J.F..15,|
00001140: 45 2C 45 24 2C 45 31 2C  45 32 00 55 19 50 05 8B  |E,E$,E1,E2.U.P..|
00001150: 45 B2 30 A7 8E 00 85 19  5A 05 45 45 24 B2 CA 28  |E.0.....Z.EE$..(|
00001160: C4 28 45 29 2C 32 29 3A  45 31 24 B2 CA 28 C4 28  |.(E),2):E1$..(.(|
00001170: 45 31 29 2C 32 29 3A 45  32 24 B2 CA 28 C4 28 45  |E1),2):E2$..(.(E|
00001180: 32 29 2C 32 29 00 91 19  64 05 8B 45 B2 36 33 A7  |2),2)...d..E.63.|
00001190: 8E 00 C2 19 6E 05 99 3A  99 22 11 1D 1D 1D 1D 1D  |....n..:."......|
000011A0: 1D 1D 1D 1D 1D 1C 22 3B  45 45 24 3B 22 2C 22 3B  |......";EE$;",";|
000011B0: 45 24 3B 22 2C 22 3B 45  31 24 3B 22 2C 22 3B 45  |E$;",";E1$;",";E|
000011C0: 32 24 00 F1 19 78 05 99  22 20 1C CE C5 D7 20 CE  |2$...x.." .... .|
000011D0: C1 CD C5 90 20 20 20 22  4E 46 24 28 49 29 C8 28  |....   "NF$(I).(|
000011E0: 43 4C 24 2C C3 28 4E 46  24 28 49 29 29 AA 32 29  |CL$,.(NF$(I)).2)|
000011F0: 3B 00 25 1A 82 05 85 46  24 3A 8B C3 28 46 24 29  |;.%....F$:..(F$)|
00001200: B1 4D 4E A7 99 22 CD 41  58 49 4D 55 4D 20 4E 41  |.MN..".AXIMUM NA|
00001210: 4D 45 20 4C 45 4E 47 54  48 20 49 53 22 4D 4E 3A  |ME LENGTH IS"MN:|
00001220: 89 31 34 30 30 00 3E 1A  8C 05 41 B2 31 3A 4E 46  |.1400.>...A.1:NF|
00001230: 24 28 49 29 B2 46 24 3A  8B 43 B2 30 A7 8E 00 76  |$(I).F$:.C.0...v|
00001240: 1A 96 05 8B CA 28 46 24  2C 41 2C 31 29 B2 22 20  |.....(F$,A,1)." |
00001250: 22 A7 99 22 4E 41 4D 45  20 43 41 4E 4E 4F 54 20  |".."NAME CANNOT |
00001260: 43 4F 4E 54 41 49 4E 20  53 50 41 43 45 53 2E 22  |CONTAIN SPACES."|
00001270: 3A 89 31 34 30 30 00 8F  1A A0 05 41 B2 41 AA 31  |:.1400.....A.A.1|
00001280: 3A 8B 41 B3 B2 C3 28 46  24 29 A7 31 34 33 30 00  |:.A...(F$).1430.|
00001290: 95 1A AA 05 8E 00 C7 1A  B4 05 99 22 11 20 27 1C  |...........". '.|
000012A0: C3 90 27 20 2D C3 4F 50  59 20 20 20 27 1C D2 90  |..' -.OPY   '...|
000012B0: 27 20 2D D2 45 4A 45 43  54 20 20 20 27 1C C1 90  |' -.EJECT   '...|
000012C0: 27 20 2D C1 55 54 4F 00  EC 1A BE 05 99 22 20 27  |' -.UTO......" '|
000012D0: 1C C2 90 27 20 2D C2 45  47 49 4E 20 20 27 1C D1  |...' -.EGIN  '..|
000012E0: 90 27 20 2D D1 55 49 54  11 22 3A 8E 00 FA 1A C8  |.' -.UIT.":.....|
000012F0: 05 97 35 34 32 39 36 2C  31 35 00 29 1B D2 05 97  |..54296,15.)....|
00001300: 35 34 32 37 33 2C 37 30  3A 97 35 34 32 37 38 2C  |54273,70:.54278,|
00001310: 32 34 39 3A 97 35 34 32  37 36 2C 31 37 3A 81 51  |249:.54276,17:.Q|
00001320: 51 B2 31 A4 34 30 30 3A  82 00 4A 1B DC 05 81 51  |Q.1.400:..J....Q|
00001330: 51 B2 35 34 32 39 36 A4  35 34 32 37 32 A9 AB 31  |Q.54296.54272..1|
00001340: 3A 97 51 51 2C 30 3A 82  3A 8E 00 85 1B E6 05 99  |:.QQ,0:.:.......|
00001350: 22 11 C9 4E 53 45 52 54  20 D0 D2 C9 CE D4 22 44  |"..NSERT ....."D|
00001360: 24 22 1C C4 C5 D3 D4 C9  CE C1 D4 C9 CF CE 90 20  |$"............. |
00001370: 44 49 53 4B 22 3A 99 22  20 20 49 4E 20 C4 52 49  |DISK":."  IN .RI|
00001380: 56 45 22 44 32 00 BA 1B  F0 05 8D 31 34 38 30 3A  |VE"D2......1480:|
00001390: 85 22 11 1D 1D 1D 1D 1D  1D 1D 1C C6 CF D2 CD C1  |."..............|
000013A0: D4 90 20 54 48 49 53 20  44 49 53 4B 45 54 54 45  |.. THIS DISKETTE|
000013B0: 20 20 4E 9D 9D 9D 22 3B  41 24 00 CE 1B FA 05 A0  |  N...";A$......|
000013C0: 31 35 3A 9F 31 35 2C 44  32 2C 31 35 3A 99 00 EA  |15:.15,D2,15:...|
000013D0: 1B 04 06 8B 41 24 B3 B1  22 59 22 A7 98 31 35 2C  |....A$.."Y"..15,|
000013E0: 22 49 30 22 3A 89 31 35  37 30 00 05 1C 0E 06 85  |"I0":.1570......|
000013F0: 22 20 C4 49 53 4B 20 4E  41 4D 45 2C 49 44 22 3B  |" .ISK NAME,ID";|
00001400: 46 24 2C 54 24 00 1D 1C  18 06 98 31 35 2C 22 4E  |F$,T$......15,"N|
00001410: 30 3A 22 AA 46 24 AA 22  2C 22 AA 54 24 00 36 1C  |0:".F$.",".T$.6.|
00001420: 22 06 8D 31 33 35 30 3A  8B 45 A7 8D 31 34 38 30  |"..1350:.E..1480|
00001430: 3A 89 31 35 31 30 00 3C  1C 2C 06 8E 00 77 1C 36  |:.1510.<.,...w.6|
00001440: 06 83 37 36 2C 39 36 2C  33 2C 31 36 32 2C 31 2C  |..76,96,3,162,1,|
00001450: 33 32 2C 31 39 38 2C 32  35 35 2C 33 32 2C 32 32  |32,198,255,32,22|
00001460: 38 2C 32 35 35 2C 31 36  30 2C 30 2C 31 34 35 2C  |8,255,160,0,145,|
00001470: 32 35 31 2C 32 33 30 00  B6 1C 40 06 83 32 35 31  |251,230...@..251|
00001480: 2C 32 30 38 2C 38 2C 32  33 30 2C 32 35 32 2C 31  |,208,8,230,252,1|
00001490: 36 35 2C 32 35 32 2C 32  30 31 2C 31 36 30 2C 32  |65,252,201,160,2|
000014A0: 34 30 2C 36 2C 31 36 35  2C 31 34 34 2C 34 31 2C  |40,6,165,144,41,|
000014B0: 36 34 2C 32 34 30 00 F3  1C 4A 06 83 32 33 31 2C  |64,240...J..231,|
000014C0: 37 36 2C 32 30 34 2C 32  35 35 2C 31 36 32 2C 31  |76,204,255,162,1|
000014D0: 2C 33 32 2C 32 30 31 2C  32 35 35 2C 31 36 30 2C  |,32,201,255,160,|
000014E0: 30 2C 31 36 32 2C 31 31  2C 32 32 34 2C 31 31 2C  |0,162,11,224,11,|
000014F0: 31 34 34 00 2E 1D 54 06  83 31 37 2C 31 36 35 2C  |144...T..17,165,|
00001500: 32 2C 32 30 38 2C 36 2C  32 32 34 2C 31 31 2C 32  |2,208,6,224,11,2|
00001510: 34 30 2C 31 34 2C 31 37  36 2C 35 2C 31 36 39 2C  |40,14,176,5,169,|
00001520: 31 33 39 2C 33 32 2C 32  31 30 2C 32 35 35 00 6E  |139,32,210,255.n|
00001530: 1D 5E 06 83 31 36 32 2C  30 2C 31 37 37 2C 32 35  |.^..162,0,177,25|
00001540: 31 2C 33 32 2C 32 31 30  2C 32 35 35 2C 32 33 32  |1,32,210,255,232|
00001550: 2C 32 33 30 2C 32 35 31  2C 32 30 38 2C 32 2C 32  |,230,251,208,2,2|
00001560: 33 30 2C 32 35 32 2C 31  36 35 2C 32 35 31 00 AC  |30,252,165,251..|
00001570: 1D 68 06 83 31 39 37 2C  32 35 33 2C 32 30 38 2C  |.h..197,253,208,|
00001580: 32 31 37 2C 31 36 35 2C  32 35 32 2C 31 39 37 2C  |217,165,252,197,|
00001590: 32 35 34 2C 32 30 38 2C  32 31 31 2C 37 36 2C 32  |254,208,211,76,2|
000015A0: 30 34 2C 32 35 35 2C 30  2C 30 2C 30 00 00 00     |04,255,0,0,0... |
..&....53280,15:.53281,1:."."G(14)G(8).2
.... ** SE.D...."..........".O.(..".....
....PRINTSHOP <=> PRINTMASTER."...2..:."
................ROGER JONES.".G.<..:."..
......COMMODORE USERS OF BARTLESVILLE.".
..F..WW.828.923:.YY:.WW,YY:....P..55,0:.
56,40:....Z.PG.40:MX.40:."......S.D.S$."
 SHOP ":D$." MASTER ":.".ENTER .S. FOR P
RINT"S$"TO PRINT"D$.}.N..".   OR .M. FOR
 PRINT"D$"TO PRINT"S$...X..C$:.C$.."M".C
$.."S".100.U...Z$.G(0):Q$.G(34):CL$."...
..................":C.2:MN.11......C$."M
".A$.S$:S$.D$:D$.A$:C.0:MN.16.+....F$(MX
),F(MX),T(MX),NF$(MX):.2,C:D1.8: 15.W. .
.".SOURCE DRIVE# "D1"....";:.D1.9..".";.
.....D1:.D1.8.D1.12..".. # MUST BE BETWE
EN 8 AND 12.":.160.J....15,D1,15: 15:.ST
.."..DRIVE"D1". NOT PRESENT.":.160.....D
2.9:.D1.D2.D2.8...H..15,D2,15: 15:.ST.D2
.D1.,.R..".DESTINATION DRIVE# "D2"....";
:.D2.9..".";.G....D2:.D2.8.D2.12..".. # 
MUST BE BETWEEN 8 AND 12.":.210......15,
D2,15: 15:.ST.."..DRIVE"D2". NOT PRESENT
.":.210.X....".ENTER .A. FOR AUTO COPY (
NO PROMPTING)  A...";AU$......D1..D2..15
10......"..PRINT"S$"TO PRINT"D$"FILE CON
VERSN";.M...."..........................
..............";:S0.0.Q....  POKE808,239
:REM DISABLE STOP......S1.0.D1..D2.320..
."..".INSERT PRINT"S$".SOURCE. DISK":." 
  IN DRIVE"D1...,..".THEN PRESS .RETURN.
 KEY"...6..1480:.A$:.A$..G(13).310...@. 
15:.15,D1,15,"I0":.1350:.E.1310.-.J..S1.
0.360.S.T..". FILENAMES TO MATCH ? *..."
;G$.O.^..I(G$,1).."*".G$.G$."*"...H..1,D
1,0,"$0:".G$:.1350...R..E.."....... CANN
OT READ DIRECTORY .":.1310.D.|..1460....
..#1,A$,B$:N.0:AD.PG.256......781,1:.654
78:. SEE RUN SPECIAL ED 1986  P.127.6...
.A$,B$:.B$.""..65484:S0.0:.740.G....A$,B
$:F$."".D...SZ.F(A$.Z$).F(B$.Z$).256....
..A$:.64.ST..65484:S0.0:.740...B..A$..Q$
.440...L..A$:.A$..Q$.F$.F$.A$:.460.G.V..
A$:.A$.." ".470......T$:.T$." ".480.....
.A$:.A$.."".490......65484: . PRINTF$...
...SZ..3.T$.."P".400.6....C.I(F$,4).".GR
A".400.S....C.0.I(F$,4)..".GRA".400.J...
S0.S0.1:.S1.S0.400...&.." ";Q$;F$;Q$;.24
);...0.."_ .C:R:A:B:Q?.":.".".24);...:..
A$:.A$."".AU$.."A".570...D.."           
 ":."..".22);:.A$."".650...N..A$."A".."A
UTO COPY ON.":AU$."A":.550.8.X.AU$."":.A
$."R".." REJECTED.":.400.A.B..A$."B".." 
BEGIN COPY.":S0.S0.1:.740...L..A$."Q".."
 QUIT COPY.":.1230...V..A$.."C".:.:.1460
:.550......" COPY FILE.".C...N.N.1:F$(N)
.F$......C.0. F$.H(F$,C(F$).4)......C. .
C(F$).11.F$.H(F$,11).....NF$(N)."":.I.1.
C(F$).C. ..C. .J(F$,I,1)." ".NF$(N).NF$(
N)."-":.700.V....F(J(F$,I,1)).91 .NF$(N)
.NF$(N).J(F$,I,1):.700......F(J(F$,I,1))
.123.NF$(N).NF$(N).G(F(J(F$,I,1)).32):.7
00......F(J(F$,I,1)).192.F(J(F,I,1)).223
.700.....NF$(N).NF$(N).G(F(J(F$,I,1)).96
)......I:.AU$.."A".I.N:.1400.7.F..AU$."A
".."."NF$(N)".".R.P.AD.AD.SZ.256:.N.MX.4
00.S.Z..". .MAXIMUM OF";MX;"FILES.".....
 1:.".";.11);N;"FILES TO READ.".....AD.P
G.256:.N.0.1260.M....I.1.N:.Q$;F$(I);Q$;
.20);.....SZ..(AD.256)......251,AD.SZ.25
6:.252,SZ......1,D1,2,"0:".F$(I).",P":.1
350.3. ..E.74. 1:N.I.1:.930.K.*..E. 1:F$
(I)."":.920.R.4..#1,Y$,X$:.C.0. .#1,X$,Y
$,Y$,Y$,Y$...>..X$."".X$.Z$...H..X$.."X"
.ES.1:. PRINTASC(X$);.H.R..831:.1350: 1:
.E.74.N.I.1:.930...\..E.F$(I)."":.920...
F..B(252).160.F$(I)."":.".TOO LARGE.":.9
20.3.P.F(I).AD:AD.B(251).B(252).256:T(I)
.AD.S.Z.SZ.T(I).F(I).2:.C.0.SZ.SZ.5.Y...
.I("   ".D(SZ),5);" BYTES OF MEM"......E
S..".THIS MAY NOT BE A PRINT"S$"FILE!!..
":ES.0......I.C....N.0.1310..... 15:.15,
D2,15:.D1.D2..1510......".. WRITING PRIN
T"D$"FILES..."......I.1.N.+.J.F$.NF$(I):
.F$."".1220.?.T..C.F$.F$.".GRA".S....Q$;
F$;Q$;.20);......F$..F$(I)..".".F$(I).H(
CL$,C(F$(I)).4)".":.".".20);......1,D2,2
,F$.",P,W"......1350:.E.0.1100.M... 1:. 
IFE=63THEN730......".     FILE EXISTS   
":." .R. -REPLACE .N. -NEW NAME .B. -BYP
ASS.-....1480:.A$:.A$."".1050.D.$..A$."N
"..1400:.970.U....A$."B".1220.G.8..A$.."
R".1050...B.."REPLACING":.15,"S0:".F$:.9
90...L.SZ..(F(I).256).I.V..251,F(I).SZ.2
56:.252,SZ:.C.T(I).T(I).5...`.SZ..(T(I).
256)...J..253,T(I).SZ.256:.254,SZ...T..C
.0..1,Z$"X";:.1160.:.~..1,G(80)G(119)G(8
8)Z$G(52)Z$G(180);.]....828:.1350:.C.0..
1,Z$Z$Z$Z$Z$;.T... 1:.E.72.E.74.1230....
..E.1220.....SZ.T(I).F(I):.C.SZ.SZ.59...
...C.0.SZ.SZ.45.V....I("   ".D(SZ),5);" 
BYTES OF MEM "...D..I...N. 1: 15...X.S1.
0:.AU$."A".S0.0.S1.S0.1:.260.>....".MORE
 PRINT"S$"FILES TO CONVERT? Y...";:.A$.P
....A$.."Y".1310.^....S0.1.260......".ST
ART WITH LAST PRINT"S$"FILE? Y...";:.A$.
.....A$."Y".S1.S0.1......260.D.....14)".
END OF COPY"...(...7)"..PLEASE REMOVE TH
E DISK(S)"...2...11)"FROM THE DISK DRIVE
.".7.<..G(9);:.56,160:.808,237:.: . ENAB
LE STOP.J.F..15,E,E$,E1,E2.U.P..E.0.....
Z.EE$.J(D(E),2):E1$.J(D(E1),2):E2$.J(D(E
2),2)...D..E.63...B.N..:."............";
EE$;",";E$;",";E1$;",";E2$...X.." .NEW N
AME.   "NF$(I)H(CL$,C(NF$(I)).2);.%....F
$:.C(F$).MN.."MAXIMUM NAME LENGTH IS"MN:
.1400.>...A.1:NF$(I).F$:.C.0...V....J(F$
,A,1)." ".."NAME CANNOT CONTAIN SPACES."
:.1400... .A.A.1:.A..C(F$).1430.......G.
...". '.C.' -COPY   '.R.' -REJECT   '.A.
' -AUTO......" '.B.' -BEGIN  '.Q.' -QUIT
.":....H..54296,15.).R..54273,70:.54278,
249:.54276,17:.QQ.1.400:..J....QQ.54296.
54272..1:.QQ,0:.:.......".INSERT PRINT"D
$".DESTINATION. DISK":."  IN DRIVE"D2...
...1480:.".........FORMAT. THIS DISKETTE
  N...";A$.N... 15:.15,D2,15:.......A$..
"Y"..15,"I0":.1570......" DISK NAME,ID";
F$,T$......15,"N0:".F$.",".T$.6."..1350:
.E..1480:.1510.<.,...W.6..76,96,3,162,1,
32,198,255,32,228,255,160,0,145,251,230.
..@..251,208,8,230,252,165,252,201,160,2
40,6,165,144,41,64,240...J..231,76,204,2
55,162,1,32,201,255,160,0,162,11,224,11,
144...T..17,165,2,208,6,224,11,240,14,17
6,5,169,139,32,210,255.N.^..162,0,177,25
1,32,210,255,232,230,251,208,2,230,252,1
65,251...H..197,253,208,217,165,252,197,
254,208,211,76,204,255,0,0,0...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL