SD PS/PM CONV
FILE INFORMATION
FILENAME(S): SD PS/PM CONV
FILE TYPE(S): PRG
FILE SIZE: 5.2K
FIRST SEEN: 2025-11-30 18:12:59
APPEARS ON: 1 disk(s)
FILE HASH
7550996897b80d92e9c59002dee4d9f0e87898c0f85f780fa47d5729aec1b56e
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PRINTER CONVERTS | SD PS/PM CONV | PRG | Sailor, Ganheden | 14 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 26 08 02 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 64 00 8F 20 2A 2A 20 |4).(8).2.d.. ** |
00000030: 53 45 00 44 08 6E 00 99 22 93 11 11 11 11 11 11 |SE.D.n..".......|
00000040: 11 11 11 22 00 6F 08 78 00 99 22 1D 1D 1D 1D 1D |...".o.x..".....|
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 82 00 99 3A 99 22 11 1D 1D 1D 1D 1D 1D 1D |.....:."........|
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 8C 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 D8 08 96 00 81 57 57 B2 |......"......WW.|
000000D0: 31 A4 35 30 30 30 3A 82 00 E9 08 A0 00 99 22 11 |1.5000:.......".|
000000E0: 11 11 11 11 11 11 11 11 11 00 0E 09 AA 00 20 8F |.............. .|
000000F0: 20 20 20 50 52 49 4E 54 20 53 48 4F 50 20 3C 3D | PRINT SHOP <=|
00000100: 3E 20 50 52 49 4E 54 20 4D 41 53 54 45 52 00 23 |> PRINT MASTER.#|
00000110: 09 B4 00 20 8F 20 20 20 52 4F 47 45 52 20 4A 4F |... . ROGER JO|
00000120: 4E 45 53 00 4C 09 BE 00 20 8F 20 20 20 43 4F 4D |NES.L... . COM|
00000130: 4D 4F 44 4F 52 45 20 55 53 45 52 53 20 4F 46 20 |MODORE USERS OF |
00000140: 42 41 52 54 4C 45 53 56 49 4C 4C 45 00 53 09 C8 |BARTLESVILLE.S..|
00000150: 00 20 8F 00 73 09 D2 00 81 57 57 B2 38 32 36 20 |. ..s....WW.826 |
00000160: A4 20 39 32 31 3A 87 20 59 59 3A 97 57 57 2C 59 |. 921:. YY:.WW,Y|
00000170: 59 3A 82 00 8F 09 DC 00 83 20 37 36 2C 20 39 36 |Y:....... 76, 96|
00000180: 2C 20 33 2C 20 31 36 32 2C 20 31 2C 20 33 32 00 |, 3, 162, 1, 32.|
00000190: B1 09 E6 00 83 20 31 39 38 2C 20 32 35 35 2C 20 |..... 198, 255, |
000001A0: 33 32 2C 20 32 32 38 2C 20 32 35 35 2C 20 31 36 |32, 228, 255, 16|
000001B0: 30 00 D2 09 F0 00 83 20 30 2C 20 31 34 35 2C 20 |0...... 0, 145, |
000001C0: 32 35 31 2C 20 32 33 30 2C 20 32 35 31 2C 20 32 |251, 230, 251, 2|
000001D0: 30 38 00 F3 09 FA 00 83 20 38 2C 20 32 33 30 2C |08...... 8, 230,|
000001E0: 20 32 35 32 2C 20 31 36 35 2C 20 32 35 32 2C 20 | 252, 165, 252, |
000001F0: 32 30 31 00 13 0A 04 01 83 20 31 36 30 2C 20 32 |201...... 160, 2|
00000200: 34 30 2C 20 36 2C 20 31 36 35 2C 20 31 34 34 2C |40, 6, 165, 144,|
00000210: 20 34 31 00 34 0A 0E 01 83 20 36 34 2C 20 32 34 | 41.4.... 64, 24|
00000220: 30 2C 20 32 33 31 2C 20 37 36 2C 20 32 30 34 2C |0, 231, 76, 204,|
00000230: 20 32 35 35 00 54 0A 18 01 83 20 31 36 32 2C 20 | 255.T.... 162, |
00000240: 31 2C 20 33 32 2C 20 32 30 31 2C 20 32 35 35 2C |1, 32, 201, 255,|
00000250: 20 31 36 30 00 73 0A 22 01 83 20 30 2C 20 31 36 | 160.s.".. 0, 16|
00000260: 32 2C 20 31 31 2C 20 32 32 34 2C 20 31 31 2C 20 |2, 11, 224, 11, |
00000270: 31 34 34 00 91 0A 2C 01 83 20 31 37 2C 20 31 36 |144...,.. 17, 16|
00000280: 35 2C 20 32 2C 20 32 30 38 2C 20 36 2C 20 32 32 |5, 2, 208, 6, 22|
00000290: 34 00 B0 0A 36 01 83 20 31 31 2C 20 32 34 30 2C |4...6.. 11, 240,|
000002A0: 20 31 34 2C 20 31 37 36 2C 20 35 2C 20 31 36 39 | 14, 176, 5, 169|
000002B0: 00 D0 0A 40 01 83 20 31 33 39 2C 20 33 32 2C 20 |...@.. 139, 32, |
000002C0: 32 31 30 2C 20 32 35 35 2C 20 31 36 32 2C 20 30 |210, 255, 162, 0|
000002D0: 00 F2 0A 4A 01 83 20 31 37 37 2C 20 32 35 31 2C |...J.. 177, 251,|
000002E0: 20 33 32 2C 20 32 31 30 2C 20 32 35 35 2C 20 32 | 32, 210, 255, 2|
000002F0: 33 32 00 13 0B 54 01 83 20 32 33 30 2C 20 32 35 |32...T.. 230, 25|
00000300: 31 2C 20 32 30 38 2C 20 32 2C 20 32 33 30 2C 20 |1, 208, 2, 230, |
00000310: 32 35 32 00 36 0B 5E 01 83 20 31 36 35 2C 20 32 |252.6.^.. 165, 2|
00000320: 35 31 2C 20 31 39 37 2C 20 32 35 33 2C 20 32 30 |51, 197, 253, 20|
00000330: 38 2C 20 32 31 37 00 59 0B 68 01 83 20 31 36 35 |8, 217.Y.h.. 165|
00000340: 2C 20 32 35 32 2C 20 31 39 37 2C 20 32 35 34 2C |, 252, 197, 254,|
00000350: 20 32 30 38 2C 20 32 31 31 00 75 0B 72 01 83 20 | 208, 211.u.r.. |
00000360: 37 36 2C 20 32 30 34 2C 20 32 35 35 2C 20 30 2C |76, 204, 255, 0,|
00000370: 20 30 2C 20 30 00 88 0B 7C 01 97 35 35 2C 30 3A | 0, 0...|..55,0:|
00000380: 97 35 36 2C 34 30 3A 9C 00 98 0B 86 01 50 47 B2 |.56,40:......PG.|
00000390: 34 30 3A 4D 58 B2 34 30 00 DC 0B 90 01 53 24 B2 |40:MX.40.....S$.|
000003A0: 22 20 D3 C8 CF D0 20 22 3A 44 24 B2 22 20 CD C1 |" .... ":D$." ..|
000003B0: D3 D4 C5 D2 20 22 3A 99 22 90 C5 4E 54 45 52 20 |.... ":."..NTER |
000003C0: 12 53 92 20 46 4F 52 20 D0 D2 C9 CE D4 22 53 24 |.S. FOR ....."S$|
000003D0: 22 54 4F 20 D0 D2 C9 CE D4 22 44 24 00 06 0C 9A |"TO ....."D$....|
000003E0: 01 99 22 11 20 20 20 4F 52 20 12 4D 92 20 46 4F |..". OR .M. FO|
000003F0: 52 20 D0 D2 C9 CE D4 22 44 24 22 54 4F 20 D0 D2 |R ....."D$"TO ..|
00000400: C9 CE D4 22 53 24 00 23 0C A4 01 85 43 24 3A 8B |..."S$.#....C$:.|
00000410: 43 24 B3 B1 22 4D 22 AF 43 24 B3 B1 22 53 22 A7 |C$.."M".C$.."S".|
00000420: 34 30 30 00 5E 0C AE 01 5A 24 B2 C7 28 30 29 3A |400.^...Z$..(0):|
00000430: 51 24 B2 C7 28 33 34 29 3A 43 4C 24 B2 22 9D 9D |Q$..(34):CL$."..|
00000440: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
00000450: 9D 9D 9D 22 3A 43 B2 32 3A 4D 4E B2 31 31 00 86 |...":C.2:MN.11..|
00000460: 0C B8 01 8B 43 24 B2 22 4D 22 A7 41 24 B2 53 24 |....C$."M".A$.S$|
00000470: 3A 53 24 B2 44 24 3A 44 24 B2 41 24 3A 43 B2 30 |:S$.D$:D$.A$:C.0|
00000480: 3A 4D 4E B2 31 36 00 AB 0C C2 01 86 46 24 28 4D |:MN.16......F$(M|
00000490: 58 29 2C 46 28 4D 58 29 2C 54 28 4D 58 29 2C 4E |X),F(MX),T(MX),N|
000004A0: 46 24 28 4D 58 29 3A 97 32 2C 43 00 D8 0C CC 01 |F$(MX):.2,C.....|
000004B0: 99 22 93 11 D0 D2 C9 CE D4 22 53 24 22 D4 CF 20 |."......."S$".. |
000004C0: D0 D2 C9 CE D4 22 44 24 22 C6 C9 CC C5 20 C3 CF |....."D$".... ..|
000004D0: CE D6 C5 D2 D3 CE 22 3B 00 0E 0D D6 01 99 22 A3 |......";......".|
000004E0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000004F0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000500: A3 A3 A3 A3 A3 A3 A3 22 3B 3A 53 30 B2 30 00 34 |.......";:S0.0.4|
00000510: 0D E0 01 99 22 11 C9 4E 53 45 52 54 20 D0 D2 C9 |...."..NSERT ...|
00000520: CE D4 22 53 24 22 1C D3 CF D5 D2 C3 C5 90 20 44 |.."S$"........ D|
00000530: 49 53 4B 2E 00 65 0D EA 01 99 22 54 48 45 20 44 |ISK..e...."THE D|
00000540: 49 53 4B 20 44 52 49 56 45 20 41 4E 44 20 50 52 |ISK DRIVE AND PR|
00000550: 45 53 53 20 54 48 45 20 12 D2 C5 D4 D5 D2 CE 92 |ESS THE ........|
00000560: 20 4B 45 59 22 00 7C 0D F4 01 A1 41 24 3A 8B 41 | KEY".|....A$:.A|
00000570: 24 B3 B1 C7 28 31 33 29 A7 35 30 30 00 9C 0D FE |$...(13).500....|
00000580: 01 9F 31 35 2C 38 2C 31 35 2C 22 49 30 22 3A 8D |..15,8,15,"I0":.|
00000590: 31 36 34 30 3A 8B 45 89 31 36 30 30 00 AA 0D 08 |1640:.E.1600....|
000005A0: 02 8B 53 31 B1 30 A7 35 35 30 00 D0 0D 12 02 85 |..S1.0.550......|
000005B0: 22 11 20 C6 49 4C 45 4E 41 4D 45 53 20 54 4F 20 |". .ILENAMES TO |
000005C0: 4D 41 54 43 48 20 3F 20 2A 9D 9D 9D 22 3B 47 24 |MATCH ? *...";G$|
000005D0: 00 EC 0D 1C 02 8B C9 28 47 24 2C 31 29 B3 B1 22 |.......(G$,1).."|
000005E0: 2A 22 A7 47 24 B2 47 24 AA 22 2A 22 00 06 0E 26 |*".G$.G$."*"...&|
000005F0: 02 9F 31 2C 38 2C 30 2C 22 24 30 3A 22 AA 47 24 |..1,8,0,"$0:".G$|
00000600: 3A 8D 31 36 34 30 00 36 0E 30 02 8B 45 A7 99 22 |:.1640.6.0..E.."|
00000610: 11 1D 1D 1D 1D 12 9A 20 C3 41 4E 4E 4F 54 20 52 |....... .ANNOT R|
00000620: 45 41 44 20 44 49 52 45 43 54 4F 52 59 20 92 22 |EAD DIRECTORY ."|
00000630: 3A 89 31 36 30 30 00 69 0E 3A 02 99 22 20 11 27 |:.1600.i.:.." .'|
00000640: 1C C3 90 27 20 54 4F 20 43 4F 50 59 20 46 49 4C |...' TO COPY FIL|
00000650: 45 20 20 20 20 27 1C D2 90 27 20 54 4F 20 52 45 |E '...' TO RE|
00000660: 4A 45 43 54 20 46 49 4C 45 00 9C 0E 44 02 99 22 |JECT FILE...D.."|
00000670: 20 27 1C C2 90 27 20 54 4F 20 42 45 47 49 4E 20 | '...' TO BEGIN |
00000680: 43 4F 50 59 20 20 20 27 1C C1 90 27 20 54 4F 20 |COPY '...' TO |
00000690: 41 42 4F 52 54 20 43 4F 50 59 11 22 00 B8 0E 4E |ABORT COPY."...N|
000006A0: 02 A1 23 31 2C 41 24 2C 42 24 3A 4E B2 30 3A 41 |..#1,A$,B$:N.0:A|
000006B0: 44 B2 50 47 AC 32 35 36 00 EB 0E 58 02 97 37 38 |D.PG.256...X..78|
000006C0: 31 2C 31 3A 9E 36 35 34 37 38 3A 8F 20 53 45 45 |1,1:.65478:. SEE|
000006D0: 20 52 55 4E 20 53 50 45 43 49 41 4C 20 45 44 20 | RUN SPECIAL ED |
000006E0: 31 39 38 36 20 20 50 2E 31 32 37 00 0E 0F 62 02 |1986 P.127...b.|
000006F0: A1 41 24 2C 42 24 3A 8B 42 24 B2 22 22 A7 9E 36 |.A$,B$:.B$.""..6|
00000700: 35 34 38 34 3A 53 30 B2 30 3A 89 39 30 30 00 1F |5484:S0.0:.900..|
00000710: 0F 6C 02 A1 41 24 2C 42 24 3A 46 24 B2 22 22 00 |.l..A$,B$:F$."".|
00000720: 3C 0F 76 02 53 5A B2 C6 28 41 24 AA 5A 24 29 AA |<.v.SZ..(A$.Z$).|
00000730: C6 28 42 24 AA 5A 24 29 AC 32 35 36 00 5C 0F 80 |.(B$.Z$).256.\..|
00000740: 02 A1 41 24 3A 8B 36 34 AF 53 54 A7 9E 36 35 34 |..A$:.64.ST..654|
00000750: 38 34 3A 53 30 B2 30 3A 89 39 30 30 00 6C 0F 8A |84:S0.0:.900.l..|
00000760: 02 8B 41 24 B3 B1 51 24 89 36 34 30 00 8A 0F 94 |..A$..Q$.640....|
00000770: 02 A1 41 24 3A 8B 41 24 B3 B1 51 24 A7 46 24 B2 |..A$:.A$..Q$.F$.|
00000780: 46 24 AA 41 24 3A 89 36 36 30 00 9F 0F 9E 02 A1 |F$.A$:.660......|
00000790: 41 24 3A 8B 41 24 B3 B1 22 20 22 89 36 37 30 00 |A$:.A$.." ".670.|
000007A0: B3 0F A8 02 A1 54 24 3A 8B 54 24 B2 22 20 22 89 |.....T$:.T$." ".|
000007B0: 36 38 30 00 C7 0F B2 02 A1 41 24 3A 8B 41 24 B3 |680......A$:.A$.|
000007C0: B1 22 22 89 36 39 30 00 DD 0F BC 02 9E 36 35 34 |."".690......654|
000007D0: 38 34 3A 20 8F 20 50 52 49 4E 54 46 24 00 F4 0F |84: . PRINTF$...|
000007E0: C6 02 8B 53 5A B3 B1 33 B0 54 24 B3 B1 22 50 22 |...SZ..3.T$.."P"|
000007F0: 89 36 30 30 00 0E 10 D0 02 8B 43 AF C9 28 46 24 |.600......C..(F$|
00000800: 2C 34 29 B2 22 2E 47 52 41 22 89 36 30 30 00 2B |,4).".GRA".600.+|
00000810: 10 DA 02 8B 43 B2 30 AF C9 28 46 24 2C 34 29 B3 |....C.0..(F$,4).|
00000820: B1 22 2E 47 52 41 22 89 36 30 30 00 42 10 E4 02 |.".GRA".600.B...|
00000830: 53 30 B2 53 30 AA 31 3A 8B 53 31 B1 53 30 A7 36 |S0.S0.1:.S1.S0.6|
00000840: 30 30 00 64 10 EE 02 99 53 5A 3B A3 35 29 3B 54 |00.d....SZ;.5);T|
00000850: 24 3B 22 20 22 3B 51 24 3B 46 24 3B 51 24 3B A3 |$;" ";Q$;F$;Q$;.|
00000860: 32 36 29 3B 00 83 10 F8 02 99 22 5F 20 12 43 3A |26);......"_ .C:|
00000870: 52 3A 42 3A 41 3F 92 9D 9D 9D 9D 9D 9D 9D 9D 9D |R:B:A?..........|
00000880: 9D 22 3B 00 96 10 02 03 A1 41 24 3A 8B 41 24 B2 |.";......A$:.A$.|
00000890: 22 22 89 37 37 30 00 B8 10 0C 03 8B 41 24 B2 22 |"".770......A$."|
000008A0: 52 22 A7 99 22 9A 52 45 4A 45 43 54 20 46 49 4C |R"..".REJECT FIL|
000008B0: 45 90 22 3A 89 36 30 30 00 E1 10 16 03 8B 41 24 |E.":.600......A$|
000008C0: B2 22 42 22 A7 99 22 9A 42 45 47 49 4E 20 43 4F |."B"..".BEGIN CO|
000008D0: 50 59 90 22 3A 53 30 B2 53 30 AB 31 3A 89 39 30 |PY.":S0.S0.1:.90|
000008E0: 30 00 03 11 20 03 8B 41 24 B2 22 41 22 A7 99 22 |0... ..A$."A".."|
000008F0: 9A 41 42 4F 52 54 20 43 4F 50 59 90 22 3A 89 31 |.ABORT COPY.":.1|
00000900: 35 33 30 00 14 11 2A 03 8B 41 24 B3 B1 22 43 22 |530...*..A$.."C"|
00000910: A7 37 37 30 00 37 11 34 03 4E B2 4E AA 31 3A 46 |.770.7.4.N.N.1:F|
00000920: 24 28 4E 29 B2 46 24 3A 99 22 9A 43 4F 50 59 20 |$(N).F$:.".COPY |
00000930: 46 49 4C 45 90 20 22 00 5A 11 3E 03 8B 43 B2 30 |FILE. ".Z.>..C.0|
00000940: A7 4E 46 24 28 4E 29 B2 C8 28 46 24 2C C3 28 46 |.NF$(N)..(F$,.(F|
00000950: 24 29 AB 34 29 3A 89 38 37 30 00 99 11 48 03 4E |$).4):.870...H.N|
00000960: 46 24 28 4E 29 B2 22 22 3A 81 49 B2 31 A4 C3 28 |F$(N)."":.I.1..(|
00000970: 46 24 29 3A 8B CA 28 46 24 2C 49 2C 31 29 B2 22 |F$):..(F$,I,1)."|
00000980: 20 22 A7 4E 46 24 28 4E 29 B2 4E 46 24 28 4E 29 | ".NF$(N).NF$(N)|
00000990: AA 22 2D 22 3A 89 38 36 30 00 B5 11 52 03 4E 46 |."-":.860...R.NF|
000009A0: 24 28 4E 29 B2 4E 46 24 28 4E 29 AA CA 28 46 24 |$(N).NF$(N)..(F$|
000009B0: 2C 49 2C 31 29 00 DE 11 5C 03 82 49 3A 8B C3 28 |,I,1)...\..I:..(|
000009C0: 4E 46 24 28 4E 29 29 B1 31 31 A7 4E 46 24 28 4E |NF$(N)).11.NF$(N|
000009D0: 29 B2 C8 28 4E 46 24 28 4E 29 2C 31 31 29 00 EC |)..(NF$(N),11)..|
000009E0: 11 66 03 49 B2 4E 3A 8D 31 36 39 30 00 07 12 70 |.f.I.N:.1690...p|
000009F0: 03 41 44 B2 41 44 AA 53 5A AC 32 35 36 3A 8B 4E |.AD.AD.SZ.256:.N|
00000A00: B3 4D 58 89 36 30 30 00 28 12 7A 03 99 22 11 20 |.MX.600.(.z..". |
00000A10: 12 CD 41 58 49 4D 55 4D 20 4F 46 22 3B 4D 58 3B |..AXIMUM OF";MX;|
00000A20: 22 46 49 4C 45 53 2E 22 00 4C 12 84 03 A0 31 3A |"FILES.".L....1:|
00000A30: 99 22 11 22 3B A6 31 31 29 3B 4E 3B 22 46 49 4C |.".";.11);N;"FIL|
00000A40: 45 53 20 54 4F 20 52 45 41 44 11 22 00 64 12 8E |ES TO READ.".d..|
00000A50: 03 41 44 B2 50 47 AC 32 35 36 3A 8B 4E B2 30 89 |.AD.PG.256:.N.0.|
00000A60: 31 35 33 30 00 73 12 98 03 8B 4E B1 31 A7 8D 31 |1530.s....N.1..1|
00000A70: 37 35 30 00 91 12 A2 03 81 49 B2 31 A4 4E 3A 99 |750......I.1.N:.|
00000A80: 51 24 3B 46 24 28 49 29 3B 51 24 3B A3 32 30 29 |Q$;F$(I);Q$;.20)|
00000A90: 3B 00 A2 12 AC 03 53 5A B2 B5 28 41 44 AD 32 35 |;.....SZ..(AD.25|
00000AA0: 36 29 00 BD 12 B6 03 97 32 35 31 2C 41 44 AB 53 |6)......251,AD.S|
00000AB0: 5A AC 32 35 36 3A 97 32 35 32 2C 53 5A 00 DE 12 |Z.256:.252,SZ...|
00000AC0: C0 03 9F 31 2C 38 2C 32 2C 22 30 3A 22 AA 46 24 |...1,8,2,"0:".F$|
00000AD0: 28 49 29 AA 22 2C 50 22 3A 8D 31 36 34 30 00 F7 |(I).",P":.1640..|
00000AE0: 12 CA 03 8B 45 B2 37 34 A7 A0 31 3A 4E B2 49 AB |....E.74..1:N.I.|
00000AF0: 31 3A 89 31 31 31 30 00 10 13 D4 03 8B 45 A7 A0 |1:.1110......E..|
00000B00: 31 3A 46 24 28 49 29 B2 22 22 3A 89 31 31 30 30 |1:F$(I)."":.1100|
00000B10: 00 2B 13 DE 03 A1 23 31 2C 59 24 2C 58 24 3A 8B |.+....#1,Y$,X$:.|
00000B20: 59 24 B2 22 22 A7 59 24 B2 5A 24 00 3C 13 E8 03 |Y$."".Y$.Z$.<...|
00000B30: 8B 58 24 B2 22 22 A7 58 24 B2 5A 24 00 6C 13 F2 |.X$."".X$.Z$.l..|
00000B40: 03 8B 28 43 AF 58 24 B3 B1 22 58 22 29 B0 28 43 |..(C.X$.."X").(C|
00000B50: B2 30 AF 59 24 B3 B1 22 50 22 29 A7 45 53 B2 31 |.0.Y$.."P").ES.1|
00000B60: 3A 99 C6 28 59 24 29 C6 28 58 24 29 00 88 13 FC |:..(Y$).(X$)....|
00000B70: 03 8B 43 B2 30 A7 A1 23 31 2C 59 24 2C 59 24 2C |..C.0..#1,Y$,Y$,|
00000B80: 59 24 2C 59 24 2C 59 24 00 AC 13 06 04 9E 38 33 |Y$,Y$,Y$......83|
00000B90: 31 3A 8D 31 36 34 30 3A A0 31 3A 8B 45 B2 37 34 |1:.1640:.1:.E.74|
00000BA0: A7 4E B2 49 AB 31 3A 89 31 31 31 30 00 C2 13 10 |.N.I.1:.1110....|
00000BB0: 04 8B 45 A7 46 24 28 49 29 B2 22 22 3A 89 31 31 |..E.F$(I)."":.11|
00000BC0: 30 30 00 F0 13 1A 04 8B C2 28 32 35 32 29 B2 31 |00.......(252).1|
00000BD0: 36 30 A7 46 24 28 49 29 B2 22 22 3A 99 22 12 D4 |60.F$(I)."":."..|
00000BE0: CF CF 20 CC C1 D2 C7 C5 92 22 3A 89 31 31 30 30 |.. ......":.1100|
00000BF0: 00 19 14 24 04 46 28 49 29 B2 41 44 3A 41 44 B2 |...$.F(I).AD:AD.|
00000C00: C2 28 32 35 31 29 AA C2 28 32 35 32 29 AC 32 35 |.(251)..(252).25|
00000C10: 36 3A 54 28 49 29 B2 41 44 00 39 14 2E 04 53 5A |6:T(I).AD.9...SZ|
00000C20: B2 54 28 49 29 AB 46 28 49 29 AA 32 3A 8B 43 B2 |.T(I).F(I).2:.C.|
00000C30: 30 A7 53 5A B2 53 5A AA 35 00 5F 14 38 04 99 C9 |0.SZ.SZ.5._.8...|
00000C40: 28 22 20 20 20 22 AA C4 28 53 5A 29 2C 35 29 3B |(" "..(SZ),5);|
00000C50: 22 20 42 59 54 45 53 20 4F 46 20 4D 45 4D 22 00 |" BYTES OF MEM".|
00000C60: 92 14 42 04 8B 45 53 A7 99 22 11 D4 48 49 53 20 |..B..ES.."..HIS |
00000C70: 4D 41 59 20 4E 4F 54 20 42 45 20 41 20 D0 D2 C9 |MAY NOT BE A ...|
00000C80: CE D4 22 53 24 22 46 49 4C 45 21 21 22 3A 45 53 |.."S$"FILE!!":ES|
00000C90: B2 30 00 99 14 4C 04 82 49 00 A7 14 56 04 8B 4E |.0...L..I...V..N|
00000CA0: B2 30 89 31 36 30 30 00 B4 14 60 04 81 51 51 B2 |.0.1600...`..QQ.|
00000CB0: 31 A4 33 30 00 EB 14 6A 04 97 35 34 32 37 33 2C |1.30...j..54273,|
00000CC0: 37 30 3A 97 35 34 32 37 38 2C 32 34 39 3A 97 35 |70:.54278,249:.5|
00000CD0: 34 32 39 36 2C 31 35 3A 97 35 34 32 37 36 2C 31 |4296,15:.54276,1|
00000CE0: 37 3A 97 35 34 32 37 36 2C 31 36 00 F1 14 74 04 |7:.54276,16...t.|
00000CF0: 82 00 1C 15 7E 04 99 22 11 C9 4E 53 45 52 54 20 |....~.."..NSERT |
00000D00: D0 D2 C9 CE D4 22 44 24 22 1C C4 C5 D3 D4 C9 CE |....."D$".......|
00000D10: C1 D4 C9 CF CE 90 20 44 49 53 4B 2E 00 4B 15 88 |...... DISK..K..|
00000D20: 04 85 22 11 1D 1D 1D 1D 1D 1D 1D 1C C6 CF D2 CD |..".............|
00000D30: C1 D4 90 20 54 48 49 53 20 44 49 53 4B 45 54 54 |... THIS DISKETT|
00000D40: 45 20 20 4E 9D 9D 9D 22 3B 41 24 00 51 15 92 04 |E N...";A$.Q...|
00000D50: 99 00 6D 15 9C 04 8B 41 24 B3 B1 22 59 22 A7 98 |..m....A$.."Y"..|
00000D60: 31 35 2C 22 49 30 22 3A 89 31 32 31 30 00 88 15 |15,"I0":.1210...|
00000D70: A6 04 85 22 20 C4 49 53 4B 20 4E 41 4D 45 2C 49 |..." .ISK NAME,I|
00000D80: 44 22 3B 46 24 2C 54 24 00 A0 15 B0 04 98 31 35 |D";F$,T$......15|
00000D90: 2C 22 4E 30 3A 22 AA 46 24 AA 22 2C 22 AA 54 24 |,"N0:".F$.",".T$|
00000DA0: 00 B2 15 BA 04 8D 31 36 34 30 3A 8B 45 89 31 31 |......1640:.E.11|
00000DB0: 31 30 00 BD 15 C4 04 81 49 B2 31 A4 4E 00 D1 15 |10......I.1.N...|
00000DC0: CE 04 8B 4E 46 24 28 49 29 B2 22 22 89 31 34 37 |...NF$(I)."".147|
00000DD0: 30 00 E9 15 D8 04 99 51 24 3B 4E 46 24 28 49 29 |0......Q$;NF$(I)|
00000DE0: 3B 51 24 3B A3 32 30 29 3B 00 26 16 E2 04 8B 4E |;Q$;.20);.&....N|
00000DF0: 46 24 28 49 29 B3 B1 46 24 28 49 29 A7 99 22 9C |F$(I)..F$(I)..".|
00000E00: 22 AA 46 24 28 49 29 AA C8 28 43 4C 24 2C C3 28 |".F$(I)..(CL$,.(|
00000E10: 46 24 28 49 29 29 AA 34 29 22 90 22 3A 99 22 91 |F$(I)).4)".":.".|
00000E20: 22 A3 32 30 29 3B 00 3F 16 EC 04 9F 31 2C 38 2C |".20);.?....1,8,|
00000E30: 32 2C 4E 46 24 28 49 29 AA 22 2C 50 2C 57 22 00 |2,NF$(I).",P,W".|
00000E40: 53 16 F6 04 8D 31 36 34 30 3A 8B 45 B2 30 89 31 |S....1640:.E.0.1|
00000E50: 33 35 30 00 6A 16 00 05 A0 31 3A 8F 20 49 46 45 |350.j....1:. IFE|
00000E60: 3D 36 33 54 48 45 4E 37 33 30 00 B0 16 0A 05 99 |=63THEN730......|
00000E70: 22 1C 20 20 20 20 20 C6 C9 CC C5 20 C5 D8 C9 D3 |". .... ....|
00000E80: D4 D3 20 20 20 22 3A 99 22 20 1C D2 90 20 2D 52 |.. ":." ... -R|
00000E90: 45 50 4C 41 43 45 20 1C CE 90 20 2D 4E 45 57 20 |EPLACE ... -NEW |
00000EA0: 4E 41 4D 45 20 1C C2 90 20 2D 42 59 50 41 53 53 |NAME ... -BYPASS|
00000EB0: 00 C4 16 14 05 A1 41 24 3A 8B 41 24 B2 22 22 A7 |......A$:.A$."".|
00000EC0: 31 33 30 30 00 DC 16 1E 05 8B 41 24 B2 22 4E 22 |1300......A$."N"|
00000ED0: A7 8D 31 36 39 30 3A 89 31 32 33 30 00 ED 16 28 |..1690:.1230...(|
00000EE0: 05 8B 41 24 B2 22 42 22 89 31 34 37 30 00 FF 16 |..A$."B".1470...|
00000EF0: 32 05 8B 41 24 B3 B1 22 52 22 89 31 33 30 30 00 |2..A$.."R".1300.|
00000F00: 27 17 3C 05 99 22 D2 C5 D0 CC C1 C3 C9 CE C7 22 |'.<.."........."|
00000F10: 3A 98 31 35 2C 22 53 30 3A 22 AA 4E 46 24 28 49 |:.15,"S0:".NF$(I|
00000F20: 29 3A 89 31 32 34 30 00 3A 17 46 05 53 5A B2 B5 |):.1240.:.F.SZ..|
00000F30: 28 46 28 49 29 AD 32 35 36 29 00 66 17 50 05 97 |(F(I).256).f.P..|
00000F40: 32 35 31 2C 46 28 49 29 AB 53 5A AC 32 35 36 3A |251,F(I).SZ.256:|
00000F50: 97 32 35 32 2C 53 5A 3A 8B 43 A7 54 28 49 29 B2 |.252,SZ:.C.T(I).|
00000F60: 54 28 49 29 AB 35 00 79 17 5A 05 53 5A B2 B5 28 |T(I).5.y.Z.SZ..(|
00000F70: 54 28 49 29 AD 32 35 36 29 00 96 17 64 05 97 32 |T(I).256)...d..2|
00000F80: 35 33 2C 54 28 49 29 AB 53 5A AC 32 35 36 3A 97 |53,T(I).SZ.256:.|
00000F90: 32 35 34 2C 53 5A 00 AF 17 6E 05 8B 43 B2 30 A7 |254,SZ...n..C.0.|
00000FA0: 98 31 2C 5A 24 22 58 22 3B 3A 89 31 34 31 30 00 |.1,Z$"X";:.1410.|
00000FB0: D7 17 78 05 98 31 2C C7 28 38 30 29 C7 28 31 31 |..x..1,.(80).(11|
00000FC0: 39 29 C7 28 38 38 29 5A 24 C7 28 35 32 29 5A 24 |9).(88)Z$.(52)Z$|
00000FD0: C7 28 31 38 30 29 3B 00 FA 17 82 05 9E 38 32 38 |.(180);......828|
00000FE0: 3A 8D 31 36 34 30 3A 8B 43 B2 30 A7 98 31 2C 5A |:.1640:.C.0..1,Z|
00000FF0: 24 5A 24 5A 24 5A 24 5A 24 3B 00 11 18 8C 05 A0 |$Z$Z$Z$Z$;......|
00001000: 31 3A 8B 45 B2 37 32 B0 45 B2 37 34 89 31 35 31 |1:.E.72.E.74.151|
00001010: 30 00 1D 18 96 05 8B 45 89 31 34 37 30 00 3A 18 |0......E.1470.:.|
00001020: A0 05 53 5A B2 54 28 49 29 AB 46 28 49 29 3A 8B |..SZ.T(I).F(I):.|
00001030: 43 A7 53 5A B2 53 5A AA 35 39 00 4C 18 AA 05 8B |C.SZ.SZ.59.L....|
00001040: 43 B2 30 A7 53 5A B2 53 5A AB 34 35 00 73 18 B4 |C.0.SZ.SZ.45.s..|
00001050: 05 99 C9 28 22 20 20 20 22 AA C4 28 53 5A 29 2C |...(" "..(SZ),|
00001060: 35 29 3B 22 20 42 59 54 45 53 20 4F 46 20 4D 45 |5);" BYTES OF ME|
00001070: 4D 20 22 00 7A 18 BE 05 82 49 00 87 18 C8 05 81 |M ".z....I......|
00001080: 51 51 B2 31 A4 33 30 00 BE 18 D2 05 97 35 34 32 |QQ.1.30......542|
00001090: 37 33 2C 37 30 3A 97 35 34 32 37 38 2C 32 34 39 |73,70:.54278,249|
000010A0: 3A 97 35 34 32 39 36 2C 31 35 3A 97 35 34 32 37 |:.54296,15:.5427|
000010B0: 36 2C 31 37 3A 97 35 34 32 37 36 2C 31 36 00 C4 |6,17:.54276,16..|
000010C0: 18 DC 05 82 00 F6 18 E6 05 99 22 11 D3 41 56 45 |.........."..AVE|
000010D0: 20 53 41 4D 45 20 D0 D2 C9 CE D4 22 44 24 22 46 | SAME ....."D$"F|
000010E0: 49 4C 45 53 20 41 47 41 49 4E 3F 20 4E 9D 9D 9D |ILES AGAIN? N...|
000010F0: 22 3B 3A 85 41 24 00 07 19 F0 05 8B 41 24 B2 22 |";:.A$......A$."|
00001100: 59 22 89 31 31 31 30 00 12 19 FA 05 A0 31 3A A0 |Y".1110......1:.|
00001110: 31 35 00 41 19 04 06 99 22 11 CD 4F 52 45 20 D0 |15.A...."..ORE .|
00001120: D2 C9 CE D4 22 53 24 22 46 49 4C 45 53 20 54 4F |...."S$"FILES TO|
00001130: 20 43 4F 50 59 3F 20 59 9D 9D 9D 22 3B 3A 85 41 | COPY? Y...";:.A|
00001140: 24 00 53 19 0E 06 8B 41 24 B3 B1 22 59 22 A7 31 |$.S....A$.."Y".1|
00001150: 36 30 30 00 66 19 18 06 53 31 B2 30 3A 8B 53 30 |600.f...S1.0:.S0|
00001160: B3 31 A7 34 36 30 00 97 19 22 06 99 22 11 D3 54 |.1.460...".."..T|
00001170: 41 52 54 20 57 49 54 48 20 4C 41 53 54 20 D0 D2 |ART WITH LAST ..|
00001180: C9 CE D4 22 53 24 22 46 49 4C 45 3F 20 59 9D 9D |..."S$"FILE? Y..|
00001190: 9D 22 3B 3A 85 41 24 00 AB 19 2C 06 8B 41 24 B2 |.";:.A$...,..A$.|
000011A0: 22 59 22 A7 53 31 B2 53 30 AA 31 00 B4 19 36 06 |"Y".S1.S0.1...6.|
000011B0: 89 34 36 30 00 CC 19 40 06 99 A3 31 34 29 22 11 |.460...@...14)".|
000011C0: C5 CE C4 20 CF C6 20 C3 CF D0 D9 22 00 F3 19 4A |... .. ...."...J|
000011D0: 06 99 A3 37 29 22 11 1C D0 4C 45 41 53 45 20 52 |...7)"...LEASE R|
000011E0: 45 4D 4F 56 45 20 54 48 45 20 44 49 53 4B 45 54 |EMOVE THE DISKET|
000011F0: 54 45 22 00 13 1A 54 06 99 A3 31 31 29 22 46 52 |TE"...T...11)"FR|
00001200: 4F 4D 20 54 48 45 20 44 49 53 4B 20 44 52 49 56 |OM THE DISK DRIV|
00001210: 45 90 22 00 28 1A 5E 06 99 C7 28 39 29 3B 3A 97 |E.".(.^...(9);:.|
00001220: 35 36 2C 31 36 30 3A 80 00 3B 1A 68 06 84 31 35 |56,160:..;.h..15|
00001230: 2C 45 2C 45 24 2C 45 31 2C 45 32 00 46 1A 72 06 |,E,E$,E1,E2.F.r.|
00001240: 8B 45 B2 30 A7 8E 00 76 1A 7C 06 45 45 24 B2 CA |.E.0...v.|.EE$..|
00001250: 28 C4 28 45 29 2C 32 29 3A 45 31 24 B2 CA 28 C4 |(.(E),2):E1$..(.|
00001260: 28 45 31 29 2C 32 29 3A 45 32 24 B2 CA 28 C4 28 |(E1),2):E2$..(.(|
00001270: 45 32 29 2C 32 29 00 82 1A 86 06 8B 45 B2 36 33 |E2),2)......E.63|
00001280: A7 8E 00 B3 1A 90 06 99 3A 99 22 11 1D 1D 1D 1D |........:.".....|
00001290: 1D 1D 1D 1D 1D 1D 1C 22 3B 45 45 24 3B 22 2C 22 |.......";EE$;","|
000012A0: 3B 45 24 3B 22 2C 22 3B 45 31 24 3B 22 2C 22 3B |;E$;",";E1$;",";|
000012B0: 45 32 24 00 E2 1A 9A 06 99 22 20 1C CE C5 D7 20 |E2$......" .... |
000012C0: CE C1 CD C5 90 20 20 20 22 4E 46 24 28 49 29 C8 |..... "NF$(I).|
000012D0: 28 43 4C 24 2C C3 28 4E 46 24 28 49 29 29 AA 32 |(CL$,.(NF$(I)).2|
000012E0: 29 3B 00 18 1B A4 06 85 46 24 3A 8B C3 28 46 24 |);......F$:..(F$|
000012F0: 29 B1 4D 4E A7 99 22 CC 45 4E 47 54 48 20 4D 55 |).MN..".ENGTH MU|
00001300: 53 54 20 42 45 20 4C 45 53 53 20 54 48 41 4E 22 |ST BE LESS THAN"|
00001310: 4D 4E 3A 89 31 36 39 30 00 31 1B AE 06 41 B2 31 |MN:.1690.1...A.1|
00001320: 3A 8B 43 B2 30 A7 4E 46 24 28 49 29 B2 46 24 3A |:.C.0.NF$(I).F$:|
00001330: 8E 00 69 1B B8 06 8B CA 28 46 24 2C 41 2C 31 29 |..i.....(F$,A,1)|
00001340: B2 22 20 22 A7 99 22 4E 41 4D 45 20 43 41 4E 4E |." ".."NAME CANN|
00001350: 4F 54 20 43 4F 4E 54 41 49 4E 20 53 50 41 43 45 |OT CONTAIN SPACE|
00001360: 53 2E 22 3A 89 31 36 39 30 00 82 1B C2 06 41 B2 |S.":.1690.....A.|
00001370: 41 AA 31 3A 8B 41 B3 B2 C3 28 46 24 29 A7 31 37 |A.1:.A...(F$).17|
00001380: 33 30 00 99 1B CC 06 4E 46 24 28 49 29 B2 46 24 |30.....NF$(I).F$|
00001390: AA 22 2E 47 52 41 22 3A 8E 00 CF 1B D6 06 85 22 |.".GRA":......."|
000013A0: 1C C3 C8 C1 CE C7 C5 90 20 C3 CF D0 D9 20 D3 C5 |........ .... ..|
000013B0: D1 D5 C5 CE C3 C5 20 20 4E 9D 9D 9D 22 3B 41 24 |...... N...";A$|
000013C0: 3A 8B C8 28 41 24 2C 31 29 B2 22 4E 22 A7 8E 00 |:..(A$,1)."N"...|
000013D0: E7 1B E0 06 81 49 B2 31 A4 4E 3A 99 49 3B 4E 46 |.....I.1.N:.I;NF|
000013E0: 24 28 49 29 3A 82 49 00 12 1C EA 06 99 22 C5 4E |$(I):.I......".N|
000013F0: 54 45 52 20 23 20 54 4F 20 4D 4F 56 45 2C 20 50 |TER # TO MOVE, P|
00001400: 4F 53 49 54 49 4F 4E 20 54 4F 20 4D 4F 56 45 20 |OSITION TO MOVE |
00001410: 54 4F 00 3D 1C F4 06 85 22 20 20 20 30 2C 30 20 |TO.=...." 0,0 |
00001420: 2D 54 4F 20 53 54 41 52 54 20 43 4F 50 59 22 3B |-TO START COPY";|
00001430: 49 31 2C 49 32 3A 8B 49 31 B2 30 A7 8E 00 6F 1C |I1,I2:.I1.0...o.|
00001440: FE 06 4E 46 24 28 30 29 B2 4E 46 24 28 49 32 29 |..NF$(0).NF$(I2)|
00001450: 3A 4E 46 24 28 49 32 29 B2 4E 46 24 28 49 31 29 |:NF$(I2).NF$(I1)|
00001460: 3A 4E 46 24 28 49 31 29 B2 4E 46 24 28 30 29 00 |:NF$(I1).NF$(0).|
00001470: A1 1C 08 07 46 24 28 30 29 B2 46 24 28 49 32 29 |....F$(0).F$(I2)|
00001480: 3A 46 24 28 49 32 29 B2 46 24 28 49 31 29 3A 46 |:F$(I2).F$(I1):F|
00001490: 24 28 49 31 29 B2 46 24 28 30 29 3A 89 31 37 36 |$(I1).F$(0):.176|
000014A0: 30 00 00 00 |0... |
..&....53280,15:.53281,1:."."G(14)G(8).2
.D.. ** SE.D.N.."..........".O.X..".....
....PRINTSHOP <=> PRINTMASTER."......:."
................ROGER JONES.".G....:."..
......COMMODORE USERS OF BARTLESVILLE.".
X....WW.1.5000:.... .."............... .
PRINT SHOP <=> PRINT MASTER.#... .
ROGER JONES.L... . COMMODORE USERS OF
BARTLESVILLE.S.H. ..S.R..WW.826 . 921:.
YY:.WW,YY:....... 76, 96, 3, 162, 1, 32.
..... 198, 255, 32, 228, 255, 160.R....
0, 145, 251, 230, 251, 208...... 8, 230,
252, 165, 252, 201...... 160, 240, 6, 1
65, 144, 41.4.... 64, 240, 231, 76, 204,
255.T.... 162, 1, 32, 201, 255, 160.S."
.. 0, 162, 11, 224, 11, 144...,.. 17, 16
5, 2, 208, 6, 224...6.. 11, 240, 14, 176
, 5, 169.P.@.. 139, 32, 210, 255, 162, 0
...J.. 177, 251, 32, 210, 255, 232...T..
230, 251, 208, 2, 230, 252.6.^.. 165, 2
51, 197, 253, 208, 217.Y.H.. 165, 252, 1
97, 254, 208, 211.U.R.. 76, 204, 255, 0,
0, 0...|..55,0:.56,40:......PG.40:MX.40
.....S$." SHOP ":D$." MASTER ":.".ENTER
.S. FOR PRINT"S$"TO PRINT"D$......". O
R .M. FOR PRINT"D$"TO PRINT"S$.#....C$:.
C$.."M".C$.."S".400.^...Z$.G(0):Q$.G(34)
:CL$.".....................":C.2:MN.11..
....C$."M".A$.S$:S$.D$:D$.A$:C.0:MN.16..
.B..F$(MX),F(MX),T(MX),NF$(MX):.2,C.X.L.
."..PRINT"S$"TO PRINT"D$"FILE CONVERSN";
...V..".................................
.......";:S0.0.4....".INSERT PRINT"S$".S
OURCE. DISK..E...."THE DISK DRIVE AND PR
ESS THE .RETURN. KEY".|....A$:.A$..G(13)
.500......15,8,15,"I0":.1640:.E.1600....
..S1.0.550.P....". FILENAMES TO MATCH ?
*...";G$......I(G$,1).."*".G$.G$."*"...&
..1,8,0,"$0:".G$:.1640.6.0..E..".......
CANNOT READ DIRECTORY .":.1600.I.:.." .'
.C.' TO COPY FILE '.R.' TO REJECT FIL
E...D.." '.B.' TO BEGIN COPY '.A.' TO
ABORT COPY."...N..#1,A$,B$:N.0:AD.PG.256
...X..781,1:.65478:. SEE RUN SPECIAL ED
1986 P.127...B..A$,B$:.B$.""..65484:S0.
0:.900...L..A$,B$:F$."".<.V.SZ.F(A$.Z$).
F(B$.Z$).256.\....A$:.64.ST..65484:S0.0:
.900.L....A$..Q$.640......A$:.A$..Q$.F$.
F$.A$:.660......A$:.A$.." ".670......T$:
.T$." ".680.G....A$:.A$.."".690......654
84: . PRINTF$...F..SZ..3.T$.."P".600...P
..C.I(F$,4).".GRA".600.+.Z..C.0.I(F$,4).
.".GRA".600.B...S0.S0.1:.S1.S0.600.D....
SZ;.5);T$;" ";Q$;F$;Q$;.26);......"_ .C:
R:B:A?...........";......A$:.A$."".770..
....A$."R"..".REJECT FILE.":.600......A$
."B"..".BEGIN COPY.":S0.S0.1:.900... ..A
$."A"..".ABORT COPY.":.1530...*..A$.."C"
.770.7.4.N.N.1:F$(N).F$:.".COPY FILE. ".
Z.>..C.0.NF$(N).H(F$,C(F$).4):.870...H.N
F$(N)."":.I.1.C(F$):.J(F$,I,1)." ".NF$(N
).NF$(N)."-":.860...R.NF$(N).NF$(N).J(F$
,I,1)...\..I:.C(NF$(N)).11.NF$(N).H(NF$(
N),11)...F.I.N:.1690...P.AD.AD.SZ.256:.N
.MX.600.(.Z..". .MAXIMUM OF";MX;"FILES."
.L... 1:.".";.11);N;"FILES TO READ.".D..
.AD.PG.256:.N.0.1530.S....N.1..1750.....
.I.1.N:.Q$;F$(I);Q$;.20);.....SZ..(AD.25
6)......251,AD.SZ.256:.252,SZ......1,8,2
,"0:".F$(I).",P":.1640...J..E.74. 1:N.I.
1:.1110...T..E. 1:F$(I)."":.1100.+....#1
,Y$,X$:.Y$."".Y$.Z$.<....X$."".X$.Z$.L..
..(C.X$.."X").(C.0.Y$.."P").ES.1:.F(Y$)F
(X$)......C.0..#1,Y$,Y$,Y$,Y$,Y$......83
1:.1640: 1:.E.74.N.I.1:.1110.B....E.F$(I
)."":.1100......B(252).160.F$(I)."":.".T
OO LARGE.":.1100...$.F(I).AD:AD.B(251).B
(252).256:T(I).AD.9...SZ.T(I).F(I).2:.C.
0.SZ.SZ.5._.8..I(" ".D(SZ),5);" BYTES
OF MEM"...B..ES..".THIS MAY NOT BE A PRI
NT"S$"FILE!!":ES.0...L..I...V..N.0.1600.
..`..QQ.1.30...J..54273,70:.54278,249:.5
4296,15:.54276,17:.54276,16...T.....~.."
.INSERT PRINT"D$".DESTINATION. DISK..K..
..".........FORMAT. THIS DISKETTE N..."
;A$.Q.....M....A$.."Y"..15,"I0":.1210...
..." DISK NAME,ID";F$,T$. ....15,"N0:".F
$.",".T$......1640:.E.1110...D..I.1.N.Q.
N..NF$(I)."".1470...X..Q$;NF$(I);Q$;.20)
;.&....NF$(I)..F$(I)..".".F$(I).H(CL$,C(
F$(I)).4)".":.".".20);.?....1,8,2,NF$(I)
.",P,W".S....1640:.E.0.1350.J... 1:. IFE
=63THEN730......". FILE EXISTS ":.
" .R. -REPLACE .N. -NEW NAME .B. -BYPASS
.D....A$:.A$."".1300......A$."N"..1690:.
1230...(..A$."B".1470...2..A$.."R".1300.
'.<.."REPLACING":.15,"S0:".NF$(I):.1240.
:.F.SZ..(F(I).256).F.P..251,F(I).SZ.256:
.252,SZ:.C.T(I).T(I).5.Y.Z.SZ..(T(I).256
)...D..253,T(I).SZ.256:.254,SZ...N..C.0.
.1,Z$"X";:.1410.W.X..1,G(80)G(119)G(88)Z
$G(52)Z$G(180);......828:.1640:.C.0..1,Z
$Z$Z$Z$Z$;..... 1:.E.72.E.74.1510......E
.1470.:. .SZ.T(I).F(I):.C.SZ.SZ.59.L....
C.0.SZ.SZ.45.S....I(" ".D(SZ),5);" BYT
ES OF MEM ".Z....I...H..QQ.1.30...R..542
73,70:.54278,249:.54296,15:.54276,17:.54
276,16.D..........".SAVE SAME PRINT"D$"F
ILES AGAIN? N...";:.A$......A$."Y".1110.
.... 1: 15.A....".MORE PRINT"S$"FILES TO
COPY? Y...";:.A$.S....A$.."Y".1600.F...
S1.0:.S0.1.460..."..".START WITH LAST PR
INT"S$"FILE? Y...";:.A$...,..A$."Y".S1.S
0.1...6..460.L.@...14)".END OF COPY"...J
...7)"..PLEASE REMOVE THE DISKETTE"...T.
..11)"FROM THE DISK DRIVE.".(.^..G(9);:.
56,160:..;.H..15,E,E$,E1,E2.F.R..E.0...V
.|.EE$.J(D(E),2):E1$.J(D(E1),2):E2$.J(D(
E2),2)......E.63........:."............"
;EE$;",";E$;",";E1$;",";E2$......" .NEW
NAME. "NF$(I)H(CL$,C(NF$(I)).2);......
F$:.C(F$).MN.."LENGTH MUST BE LESS THAN"
MN:.1690.1...A.1:.C.0.NF$(I).F$:..I....J
(F$,A,1)." ".."NAME CANNOT CONTAIN SPACE
S.":.1690...B.A.A.1:.A..C(F$).1730...L.N
F$(I).F$.".GRA":..O.V..".CHANGE. COPY SE
QUENCE N...";A$:.H(A$,1)."N"........I.1
.N:.I;NF$(I):.I......"ENTER # TO MOVE, P
OSITION TO MOVE TO.=...." 0,0 -TO STAR
T COPY";I1,I2:.I1.0...O...NF$(0).NF$(I2)
:NF$(I2).NF$(I1):NF$(I1).NF$(0).....F$(0
).F$(I2):F$(I2).F$(I1):F$(I1).F$(0):.176
0...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL