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

S-COPY

FILE INFORMATION

FILENAME(S): S-COPY

FILE TYPE(S): PRG

FILE SIZE: 2.4K

FIRST SEEN: 2025-12-02 23:21:47

APPEARS ON: 1 disk(s)

FILE HASH

d27a2531cabee1ceffdf30e86c5e5b5616af97b4dc20e28928bc4330cf7b1ccb

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
HILFSPROGRAMME S-COPY PRG swasti, dinkel 11 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 13 08 64 00 8F 20  49 4E 49 54 20 53 2D 43  |....d.. INIT S-C|
00000010: 4F 50 59 00 49 08 6E 00  97 35 36 2C C2 28 34 36  |OPY.I.n..56,.(46|
00000020: 29 AA 31 34 3A 9C 3A 52  42 B2 32 35 35 AB C2 28  |).14:.:RB.255..(|
00000030: 35 36 29 3A 50 41 B2 31  3A 41 4E B2 30 3A 42 4C  |56):PA.1:AN.0:BL|
00000040: B2 30 3A 4E 46 24 B2 22  22 00 7C 08 78 00 50 45  |.0:NF$."".|.x.PE|
00000050: B2 C2 28 34 35 29 AA 32  35 36 AC C2 28 34 36 29  |..(45).256..(46)|
00000060: 3A 4D 52 B2 50 45 AB 31  33 35 3A 4D 57 B2 50 45  |:MR.PE.135:MW.PE|
00000070: AB 37 39 3A 4D 44 B2 50  45 AB 32 34 00 B3 08 82  |.79:MD.PE.24....|
00000080: 00 86 4E 46 24 28 31 34  30 29 2C 43 46 25 28 31  |..NF$(140),CF%(1|
00000090: 34 30 29 2C 42 4C 25 28  31 34 30 29 2C 50 25 28  |40),BL%(140),P%(|
000000A0: 31 30 29 2C 41 4C 25 28  39 30 29 2C 41 48 25 28  |10),AL%(90),AH%(|
000000B0: 39 30 29 00 D7 08 8C 00  50 25 28 30 29 B2 30 3A  |90).....P%(0).0:|
000000C0: 41 4C 25 28 30 29 B2 30  3A 41 48 25 28 30 29 B2  |AL%(0).0:AH%(0).|
000000D0: C2 28 35 36 29 AB 31 00  E3 08 A0 00 8F 20 4D 45  |.(56).1...... ME|
000000E0: 4E 55 45 00 08 09 AA 00  99 22 93 11 22 A3 39 29  |NUE......"..".9)|
000000F0: 22 2A 2A 2A 2A 2A 20 44  49 53 4B 20 43 4F 50 59  |"***** DISK COPY|
00000100: 20 2A 2A 2A 2A 2A 11 22  00 23 09 B4 00 99 22 11  | *****.".#....".|
00000110: 11 11 11 1D 1D 31 2E 20  20 44 49 52 45 43 54 4F  |.....1.  DIRECTO|
00000120: 52 59 22 00 3A 09 BE 00  99 22 11 1D 1D 32 2E 20  |RY".:...."...2. |
00000130: 20 4B 4F 50 49 45 52 45  4E 22 00 54 09 C8 00 99  | KOPIEREN".T....|
00000140: 22 11 1D 1D 33 2E 20 20  46 4F 52 4D 41 54 49 45  |"...3.  FORMATIE|
00000150: 52 45 4E 22 00 68 09 D2  00 99 22 11 1D 1D 34 2E  |REN".h...."...4.|
00000160: 20 20 45 4E 44 45 4E 22  00 87 09 DC 00 99 A6 32  |  ENDEN".......2|
00000170: 31 32 29 22 12 42 49 54  54 45 20 57 41 45 48 4C  |12)".BITTE WAEHL|
00000180: 45 4E 20 53 49 45 22 00  A9 09 E6 00 A1 44 43 24  |EN SIE"......DC$|
00000190: 3A 44 43 B2 C5 28 44 43  24 29 3A 8B 44 43 B3 31  |:DC..(DC$):.DC.1|
000001A0: B0 44 43 B1 34 A7 32 33  30 00 C1 09 F0 00 91 44  |.DC.4.230......D|
000001B0: 43 89 39 31 30 2C 32 37  30 2C 37 30 30 2C 36 37  |C.910,270,700,67|
000001C0: 30 00 D0 09 04 01 8F 20  4B 4F 50 49 45 52 45 4E  |0...... KOPIEREN|
000001D0: 00 F0 09 0E 01 99 22 93  11 12 4F 52 49 47 49 4E  |......"...ORIGIN|
000001E0: 41 4C 44 49 53 4B 20 45  49 4E 4C 45 47 45 4E 22  |ALDISK EINLEGEN"|
000001F0: 00 F9 09 18 01 8D 39 39  30 00 0E 0A 22 01 8F 20  |......990...".. |
00000200: 46 49 4C 45 53 20 45 49  4E 4C 45 53 45 4E 00 1E  |FILES EINLESEN..|
00000210: 0A 2C 01 9F 31 2C 38 2C  30 2C 22 24 30 22 00 34  |.,..1,8,0,"$0".4|
00000220: 0A 36 01 8D 37 36 30 3A  8B 4E 46 24 B3 B1 22 22  |.6..760:.NF$..""|
00000230: A7 33 34 30 00 42 0A 40  01 8B 53 54 B2 30 A7 33  |.340.B.@..ST.0.3|
00000240: 31 30 00 4B 0A 4A 01 89  33 35 30 00 89 0A 54 01  |10.K.J..350...T.|
00000250: 42 4C 25 28 41 4E 29 B2  C6 28 42 4C 24 AA C7 28  |BL%(AN)..(BL$..(|
00000260: 30 29 29 3A 4E 46 24 28  41 4E 29 B2 4E 46 24 3A  |0)):NF$(AN).NF$:|
00000270: 8B 53 54 B2 30 A7 41 4E  B2 41 4E AA 31 3A 4E 46  |.ST.0.AN.AN.1:NF|
00000280: 24 B2 22 22 3A 89 33 31  30 00 BB 0A 5E 01 A0 31  |$."":.310...^..1|
00000290: 3A 41 4E B2 41 4E AB 31  3A 8B 41 4E B2 30 A7 99  |:AN.AN.1:.AN.0..|
000002A0: 22 11 11 12 4C 45 45 52  45 20 44 49 53 4B 45 54  |"...LEERE DISKET|
000002B0: 54 45 92 22 3A 8D 39 39  30 3A 8A 00 CF 0A 68 01  |TE.":.990:....h.|
000002C0: 8F 20 4B 4F 50 49 45 52  41 55 53 57 41 48 4C 00  |. KOPIERAUSWAHL.|
000002D0: EF 0A 72 01 99 22 93 11  41 4E 54 57 4F 52 54 45  |..r.."..ANTWORTE|
000002E0: 4E 20 53 49 45 20 4D 49  54 20 4A 2F 4E 11 22 00  |N SIE MIT J/N.".|
000002F0: 1C 0B 7C 01 81 49 B2 31  A4 41 4E 3A 99 42 4C 25  |..|..I.1.AN:.BL%|
00000300: 28 49 29 3B A3 35 29 3B  4E 46 24 28 49 29 3B 22  |(I);.5);NF$(I);"|
00000310: 20 3F 20 22 3B 3A 97 31  39 38 2C 30 00 5D 0B 86  | ? ";:.198,0.]..|
00000320: 01 92 31 39 38 2C 31 3A  A1 41 24 3A 8B 41 24 B2  |..198,1:.A$:.A$.|
00000330: 22 4A 22 A7 43 46 25 28  49 29 B2 AB 31 3A 42 4C  |"J".CF%(I)..1:BL|
00000340: B2 42 4C AA 42 4C 25 28  49 29 3A 99 A3 33 30 29  |.BL.BL%(I):..30)|
00000350: 22 12 20 4A 41 20 92 22  3A 89 34 32 30 00 77 0B  |". JA .":.420.w.|
00000360: 90 01 43 46 25 28 49 29  B2 30 3A 8B 41 24 B3 B1  |..CF%(I).0:.A$..|
00000370: 22 4E 22 A7 33 39 30 00  87 0B 9A 01 99 A3 33 30  |"N".390.......30|
00000380: 29 22 4E 45 49 4E 22 00  AF 0B A4 01 8B 42 4C B1  |)"NEIN"......BL.|
00000390: 52 42 A7 50 25 28 50 41  29 B2 49 AB 31 3A 50 41  |RB.P%(PA).I.1:PA|
000003A0: B2 50 41 AA 31 3A 42 4C  B2 42 4C 25 28 49 29 00  |.PA.1:BL.BL%(I).|
000003B0: C0 0B AE 01 82 49 3A 50  25 28 50 41 29 B2 41 4E  |.....I:P%(PA).AN|
000003C0: 00 CE 0B B8 01 8B 42 4C  B2 30 A7 36 34 30 00 DA  |......BL.0.640..|
000003D0: 0B C2 01 8F 20 4B 4F 50  49 45 00 F4 0B CC 01 99  |.... KOPIE......|
000003E0: 22 93 12 4B 4F 50 49 45  20 49 4E 20 41 52 42 45  |"..KOPIE IN ARBE|
000003F0: 49 54 11 22 00 00 0C D6  01 81 49 B2 31 A4 50 41  |IT."......I.1.PA|
00000400: 00 33 0C E0 01 81 52 57  B2 30 A4 31 3A 4E 52 B2  |.3....RW.0.1:NR.|
00000410: 30 3A 8B 52 57 B2 31 A7  99 22 12 11 5A 49 45 4C  |0:.RW.1.."..ZIEL|
00000420: 44 49 53 4B 20 45 49 4E  4C 45 47 45 4E 22 3A 8D  |DISK EINLEGEN":.|
00000430: 39 39 30 00 4A 0C EA 01  81 4A B2 50 25 28 49 AB  |990.J....J.P%(I.|
00000440: 31 29 AA 31 A4 50 25 28  49 29 00 5F 0C F4 01 8B  |1).1.P%(I)._....|
00000450: A8 43 46 25 28 4A 29 A7  82 4A 3A 89 35 34 30 00  |.CF%(J)..J:.540.|
00000460: 93 0C FE 01 4E 46 24 B2  4E 46 24 28 4A 29 3A 99  |....NF$.NF$(J):.|
00000470: 42 4C 25 28 4A 29 3B A3  35 29 3B 4E 46 24 3A 8D  |BL%(J);.5);NF$:.|
00000480: 35 37 30 3A 8B 53 54 B2  30 B0 53 54 B2 36 34 A7  |570:.ST.0.ST.64.|
00000490: 35 33 30 00 9E 0C 08 02  8D 38 38 30 3A 8A 00 A5  |530......880:...|
000004A0: 0C 12 02 82 4A 00 B7 0C  1C 02 82 52 57 3A 8B 49  |....J......RW:.I|
000004B0: B2 50 41 A7 36 34 30 00  DB 0C 26 02 99 22 12 11  |.PA.640...&.."..|
000004C0: 4F 52 49 47 49 4E 41 4C  44 49 53 4B 20 45 49 4E  |ORIGINALDISK EIN|
000004D0: 4C 45 47 45 4E 22 3A 8D  39 39 30 00 E4 0C 30 02  |LEGEN":.990...0.|
000004E0: 82 49 3A 8A 00 F2 0C 3A  02 8B 52 57 B2 31 A7 36  |.I:....:..RW.1.6|
000004F0: 31 30 00 1C 0D 44 02 9F  31 2C 38 2C 35 2C 4E 46  |10...D..1,8,5,NF|
00000500: 24 AA 22 2C 52 22 3A 97  32 35 32 2C 30 3A 97 32  |$.",R":.252,0:.2|
00000510: 35 33 2C 41 48 25 28 4E  52 29 AA 31 00 4A 0D 4E  |53,AH%(NR).1.J.N|
00000520: 02 9E 4D 52 3A 4E 52 B2  4E 52 AA 31 3A 41 4C 25  |..MR:NR.NR.1:AL%|
00000530: 28 4E 52 29 B2 C2 28 32  35 34 29 3A 41 48 25 28  |(NR)..(254):AH%(|
00000540: 4E 52 29 B2 C2 28 32 35  35 29 00 53 0D 58 02 A0  |NR)..(255).S.X..|
00000550: 31 3A 8E 00 7D 0D 62 02  9F 31 2C 38 2C 35 2C 4E  |1:..}.b..1,8,5,N|
00000560: 46 24 AA 22 2C 57 22 3A  97 32 35 32 2C 30 3A 97  |F$.",W":.252,0:.|
00000570: 32 35 33 2C 41 48 25 28  4E 52 29 AA 31 00 A3 0D  |253,AH%(NR).1...|
00000580: 6C 02 97 32 35 34 2C 41  4C 25 28 4E 52 AA 31 29  |l..254,AL%(NR.1)|
00000590: 3A 97 32 35 35 2C 41 48  25 28 4E 52 AA 31 29 3A  |:.255,AH%(NR.1):|
000005A0: 9E 4D 57 00 B4 0D 76 02  4E 52 B2 4E 52 AA 31 3A  |.MW...v.NR.NR.1:|
000005B0: A0 31 3A 8E 00 CE 0D 80  02 99 22 11 11 11 12 4B  |.1:......."....K|
000005C0: 4F 50 49 45 20 46 45 52  54 49 47 20 21 22 00 DA  |OPIE FERTIG !"..|
000005D0: 0D 8A 02 8D 39 39 30 3A  3A 8A 00 E5 0D 94 02 8F  |....990::.......|
000005E0: 20 45 4E 44 45 00 F5 0D  9E 02 97 35 36 2C 31 36  | ENDE......56,16|
000005F0: 30 3A 9C 3A 80 00 07 0E  B2 02 8F 20 46 4F 52 4D  |0:.:....... FORM|
00000600: 41 54 49 45 52 45 4E 00  4B 0E BC 02 85 22 93 11  |ATIEREN.K...."..|
00000610: 11 11 44 49 53 4B 4E 41  4D 45 22 3B 46 4F 24 3A  |..DISKNAME";FO$:|
00000620: 49 44 24 B2 22 22 3A 85  22 11 44 49 53 4B 2D 49  |ID$."":.".DISK-I|
00000630: 44 22 3B 49 44 24 3A 8B  49 44 24 B3 B1 22 22 A7  |D";ID$:.ID$.."".|
00000640: 49 44 24 B2 22 2C 22 AA  49 44 24 00 5B 0E C6 02  |ID$.",".ID$.[...|
00000650: 46 4F 24 B2 46 4F 24 AA  49 44 24 00 80 0E D0 02  |FO$.FO$.ID$.....|
00000660: 99 22 11 12 42 49 54 54  45 20 5A 49 45 4C 44 49  |."..BITTE ZIELDI|
00000670: 53 4B 45 54 54 45 20 45  49 4E 4C 45 47 45 4E 22  |SKETTE EINLEGEN"|
00000680: 00 89 0E DA 02 8D 39 39  30 00 A1 0E E4 02 9F 31  |......990......1|
00000690: 2C 38 2C 31 35 2C 22 4E  3A 22 AA 46 4F 24 3A A0  |,8,15,"N:".FO$:.|
000006A0: 31 00 AF 0E EE 02 8D 38  38 30 3A 89 31 37 30 00  |1......880:.170.|
000006B0: C8 0E F8 02 8F 20 44 49  52 45 43 54 4F 52 59 20  |..... DIRECTORY |
000006C0: 45 49 4E 4C 45 53 45 4E  00 D6 0E 02 03 A1 23 31  |EINLESEN......#1|
000006D0: 2C 41 24 2C 42 24 00 E5  0E 0C 03 A1 23 31 2C 42  |,A$,B$......#1,B|
000006E0: 4C 24 2C 42 24 00 F0 0E  16 03 A1 23 31 2C 41 24  |L$,B$......#1,A$|
000006F0: 00 04 0F 20 03 A1 23 31  2C 42 24 3A 8B 53 54 B3  |... ..#1,B$:.ST.|
00000700: B1 30 A7 8E 00 17 0F 2A  03 8B 42 24 B3 B1 C7 28  |.0.....*..B$...(|
00000710: 33 34 29 A7 38 30 30 00  3D 0F 34 03 A1 23 31 2C  |34).800.=.4..#1,|
00000720: 42 24 3A 8B 42 24 B3 B1  C7 28 33 34 29 A7 4E 46  |B$:.B$...(34).NF|
00000730: 24 B2 4E 46 24 AA 42 24  3A 89 38 32 30 00 56 0F  |$.NF$.B$:.820.V.|
00000740: 3E 03 A1 23 31 2C 42 24  3A 8B 42 24 B2 C7 28 33  |>..#1,B$:.B$..(3|
00000750: 32 29 A7 38 33 30 00 84  0F 48 03 4E 46 24 B2 4E  |2).830...H.NF$.N|
00000760: 46 24 AA 22 2C 22 AA 42  24 3A 81 49 B2 30 A4 31  |F$.",".B$:.I.0.1|
00000770: 3A A1 23 31 2C 42 24 3A  4E 46 24 B2 4E 46 24 AA  |:.#1,B$:NF$.NF$.|
00000780: 42 24 3A 82 00 9B 0F 52  03 A1 23 31 2C 42 24 3A  |B$:....R..#1,B$:|
00000790: 8B 42 24 B3 B1 22 22 A7  38 35 30 00 A1 0F 5C 03  |.B$.."".850...\.|
000007A0: 8E 00 B5 0F 66 03 8F 20  46 45 48 4C 45 52 41 55  |....f.. FEHLERAU|
000007B0: 53 47 41 42 45 00 E4 0F  70 03 9F 31 35 2C 38 2C  |SGABE...p..15,8,|
000007C0: 31 35 3A 84 31 35 2C 41  2C 42 24 2C 43 2C 44 3A  |15:.15,A,B$,C,D:|
000007D0: 99 41 3B 42 24 3B 43 3B  44 3A A0 31 35 3A 8D 39  |.A;B$;C;D:.15:.9|
000007E0: 39 30 3A 8E 00 F4 0F 84  03 8F 20 44 49 52 45 43  |90:....... DIREC|
000007F0: 54 4F 52 59 00 FD 0F 8E  03 99 22 93 22 00 17 10  |TORY......"."...|
00000800: 98 03 9F 33 2C 38 2C 30  2C 22 24 30 22 3A A1 23  |...3,8,0,"$0":.#|
00000810: 33 2C 41 24 2C 41 24 00  2D 10 A2 03 A1 23 33 2C  |3,A$,A$.-....#3,|
00000820: 41 24 2C 41 24 2C 42 4C  24 2C 42 48 24 00 40 10  |A$,A$,BL$,BH$.@.|
00000830: AC 03 8B 41 24 B2 22 22  A7 A0 33 3A 89 39 38 30  |...A$.""..3:.980|
00000840: 00 5E 10 B6 03 42 4C 24  B2 42 4C 24 AA C7 28 30  |.^...BL$.BL$..(0|
00000850: 29 3A 42 48 24 B2 42 48  24 AA C7 28 30 29 00 76  |):BH$.BH$..(0).v|
00000860: 10 C0 03 99 C6 28 42 48  24 29 AC 32 35 36 AA C6  |.....(BH$).256..|
00000870: 28 42 4C 24 29 3B 00 83  10 CA 03 9E 4D 44 3A 89  |(BL$);......MD:.|
00000880: 39 33 30 00 91 10 D4 03  8D 39 39 30 3A 89 31 37  |930......990:.17|
00000890: 30 00 B7 10 DE 03 99 A6  36 39 29 22 A4 A4 A4 A4  |0.......69)"....|
000008A0: A4 A4 A4 22 3A 99 A6 32  39 29 3B 22 12 2A 52 45  |...":..29);".*RE|
000008B0: 54 55 52 4E 2A 92 22 00  DD 10 E8 03 97 31 39 38  |TURN*."......198|
000008C0: 2C 30 3A 92 31 39 38 2C  31 3A A1 41 24 3A 8B 41  |,0:.198,1:.A$:.A|
000008D0: 24 B3 B1 C7 28 31 33 29  A7 31 30 30 30 00 E3 10  |$...(13).1000...|
000008E0: F2 03 8E 00 00 00 A2 01  20 C6 FF A0 00 20 CF FF  |........ .... ..|
000008F0: 78 AA A5 01 29 FC 85 01  8A 91 FC A5 01 09 03 85  |x...)...........|
00000900: 01 58 20 B7 FF C9 40 F0  0B C9 00 D0 07 C8 D0 DD  |.X ...@.........|
00000910: E6 FD D0 D9 20 CC FF 84  FE A5 FD 85 FF 60 A2 01  |.... ........`..|
00000920: 20 C9 FF A0 00 78 A5 01  29 FC 85 01 B1 FC AA A5  | ....x..).......|
00000930: 01 09 03 85 01 58 8A 20  D2 FF 20 B7 FF C9 00 D0  |.....X. .. .....|
00000940: 11 C8 D0 02 E6 FD A5 FF  C5 FD D0 D9 C4 FE 90 D5  |................|
00000950: F0 D3 4C CC FF A2 03 20  C6 FF 20 CF FF 20 D2 FF  |..L.... .. .. ..|
00000960: D0 F8 A9 0D 20 D2 FF 4C  CC FF 00 00 00 A5 FF     |.... ..L....... |
....D.. INIT S-COPY.I.N..56,B(46).14:.:R
B.255.B(56):PA.1:AN.0:BL.0:NF$."".|.X.PE
.B(45).256.B(46):MR.PE.135:MW.PE.79:MD.P
E.24......NF$(140),CF%(140),BL%(140),P%(
10),AL%(90),AH%(90).W...P%(0).0:AL%(0).0
:AH%(0).B(56).1... .. MENUE......"..".9)
"***** DISK COPY *****.".#...."......1. 
 DIRECTORY".:...."...2.  KOPIEREN".T.H..
"...3.  FORMATIEREN".H.R.."...4.  ENDEN"
.......212)".BITTE WAEHLEN SIE"......DC$
:DC.E(DC$):.DC.1.DC.4.230.A....DC.910,27
0,700,670.P.... KOPIEREN......"...ORIGIN
ALDISK EINLEGEN"......990...".. FILES EI
NLESEN...,..1,8,0,"$0".4.6..760:.NF$..""
.340.B.@..ST.0.310.K.J..350...T.BL%(AN).
F(BL$.G(0)):NF$(AN).NF$:.ST.0.AN.AN.1:NF
$."":.310...^. 1:AN.AN.1:.AN.0.."...LEER
E DISKETTE.":.990:..O.H.. KOPIERAUSWAHL.
..R.."..ANTWORTEN SIE MIT J/N."...|..I.1
.AN:.BL%(I);.5);NF$(I);" ? ";:.198,0.]..
..198,1:.A$:.A$."J".CF%(I)..1:BL.BL.BL%(
I):..30)". JA .":.420.W...CF%(I).0:.A$..
"N".390.......30)"NEIN"......BL.RB.P%(PA
).I.1:PA.PA.1:BL.BL%(I)......I:P%(PA).AN
.N....BL.0.640.Z.B.. KOPIE...L.."..KOPIE
 IN ARBEIT."...V..I.1.PA.3....RW.0.1:NR.
0:.RW.1.."..ZIELDISK EINLEGEN":.990.J...
.J.P%(I.1).1.P%(I)._.....CF%(J)..J:.540.
....NF$.NF$(J):.BL%(J);.5);NF$:.570:.ST.
0.ST.64.530......880:.......J......RW:.I
.PA.640...&.."..ORIGINALDISK EINLEGEN":.
990...0..I:....:..RW.1.610...D..1,8,5,NF
$.",R":.252,0:.253,AH%(NR).1.J.N..MR:NR.
NR.1:AL%(NR).B(254):AH%(NR).B(255).S.X. 
1:..}.B..1,8,5,NF$.",W":.252,0:.253,AH%(
NR).1...L..254,AL%(NR.1):.255,AH%(NR.1):
.MW...V.NR.NR.1: 1:..N...."....KOPIE FER
TIG !".Z....990::....... ENDE......56,16
0:.:....... FORMATIEREN.K...."....DISKNA
ME";FO$:ID$."":.".DISK-ID";ID$:.ID$.."".
ID$.",".ID$.[.F.FO$.FO$.ID$...P.."..BITT
E ZIELDISKETTE EINLEGEN"...Z..990......1
,8,15,"N:".FO$: 1......880:.170.H.... DI
RECTORY EINLESEN.V....#1,A$,B$......#1,B
L$,B$......#1,A$... ..#1,B$:.ST..0.....*
..B$..G(34).800.=.4..#1,B$:.B$..G(34).NF
$.NF$.B$:.820.V.>..#1,B$:.B$.G(32).830..
.H.NF$.NF$.",".B$:.I.0.1:.#1,B$:NF$.NF$.
B$:....R..#1,B$:.B$.."".850...\.....F.. 
FEHLERAUSGABE...P..15,8,15:.15,A,B$,C,D:
.A;B$;C;D: 15:.990:....... DIRECTORY....
.."."......3,8,0,"$0":.#3,A$,A$.-....#3,
A$,A$,BL$,BH$.@....A$."". 3:.980.^...BL$
.BL$.G(0):BH$.BH$.G(0).V....F(BH$).256.F
(BL$);...J..MD:.930...T..990:.170.......
69)".......":..29);".*RETURN*."......198
,0:.198,1:.A$:.A$..G(13).1000...........
 F. . O.X...)............X ..I@..I.P.HP.
..PY L.......`.. I. .X..)............X. 
R. ..I.P.HP.....E.PYD..U.SLL... F. O. R.
P... R.LL......
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL