COPYMAT.1
FILE INFORMATION
FILENAME(S): COPYMAT.1
FILE TYPE(S): PRG
FILE SIZE: 3K
FIRST SEEN: 2025-11-30 16:28:47
APPEARS ON: 1 disk(s)
FILE HASH
6f2a0d403fa611885b62e3ec1d84a3a9c0c22b964aaa6113a848839f20c7c3c6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| RED WOLFGANG 01 | COPYMAT.1 | PRG | BrainSkull, Wolfgang Red | 21 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 64 00 8F 20 2A 2A 2A 20 49 4E 49 54 |....d.. *** INIT| 00000010: 49 41 4C 49 53 49 45 52 45 4E 20 2A 2A 2A 00 54 |IALISIEREN ***.T| 00000020: 08 6E 00 97 35 36 2C C2 28 34 36 29 AA 31 34 3A |.n..56,.(46).14:| 00000030: 9C 3A 52 42 B2 32 35 35 AB C2 28 35 36 29 3A 50 |.:RB.255..(56):P| 00000040: 41 B2 31 3A 41 4E B2 30 3A 4E 4C B2 30 3A 4E 46 |A.1:AN.0:NL.0:NF| 00000050: 24 B2 22 22 00 87 08 78 00 50 45 B2 C2 28 34 35 |$.""...x.PE..(45| 00000060: 29 AA 32 35 36 AC C2 28 34 36 29 3A 4D 52 B2 50 |).256..(46):MR.P| 00000070: 45 AB 31 33 35 3A 4D 57 B2 50 45 AB 37 39 3A 4D |E.135:MW.PE.79:M| 00000080: 44 B2 50 45 AB 32 34 00 BE 08 82 00 86 4E 46 24 |D.PE.24......NF$| 00000090: 28 31 34 30 29 2C 43 46 25 28 31 34 30 29 2C 42 |(140),CF%(140),B| 000000A0: 4C 25 28 31 34 30 29 2C 50 25 28 31 30 29 2C 41 |L%(140),P%(10),A| 000000B0: 4C 25 28 39 30 29 2C 41 48 25 28 39 30 29 00 E2 |L%(90),AH%(90)..| 000000C0: 08 8C 00 50 25 28 30 29 B2 30 3A 41 4C 25 28 30 |...P%(0).0:AL%(0| 000000D0: 29 B2 30 3A 41 48 25 28 30 29 B2 C2 28 35 36 29 |).0:AH%(0)..(56)| 000000E0: AB 31 00 E8 08 96 00 3A 00 FC 08 A0 00 8F 20 2A |.1.....:...... *| 000000F0: 2A 2A 20 4D 45 4E 55 45 20 2A 2A 2A 00 36 09 AA |** MENUE ***.6..| 00000100: 00 99 22 93 11 22 A3 31 33 29 22 1F 46 49 4C 45 |.."..".13)".FILE| 00000110: 43 4F 50 59 20 56 31 2E 30 22 3A 99 A3 31 34 29 |COPY V1.0":..14)| 00000120: 22 11 42 59 20 20 1F 43 9A 4F 9F 4C 05 49 9E 42 |".BY .C.O.L.I.B| 00000130: 81 52 1C 49 20 22 00 51 09 B4 00 99 22 11 11 11 |.R.I ".Q...."...| 00000140: 11 1D 1D 1F 31 2E 20 20 44 49 52 45 43 54 4F 52 |....1. DIRECTOR| 00000150: 59 00 69 09 BE 00 99 22 11 1D 1D 32 2E 20 20 43 |Y.i...."...2. C| 00000160: 4F 50 59 20 46 49 4C 45 53 00 82 09 C8 00 99 22 |OPY FILES......"| 00000170: 11 1D 1D 33 2E 20 20 46 4F 52 4D 41 54 20 44 49 |...3. FORMAT DI| 00000180: 53 4B 00 A0 09 D2 00 99 22 11 1D 1D 34 2E 20 20 |SK......"...4. | 00000190: 4D 4F 44 49 46 59 20 4E 41 4D 45 20 26 20 49 44 |MODIFY NAME & ID| 000001A0: 00 B1 09 D7 00 99 22 11 1D 1D 35 2E 20 20 45 4E |......"...5. EN| 000001B0: 44 00 CD 09 DC 00 99 A6 32 31 31 29 22 54 41 4B |D.......211)"TAK| 000001C0: 45 20 59 4F 55 52 20 43 48 4F 49 43 45 00 EF 09 |E YOUR CHOICE...| 000001D0: E6 00 A1 44 43 24 3A 44 43 B2 C5 28 44 43 24 29 |...DC$:DC..(DC$)| 000001E0: 3A 8B 44 43 B3 31 B0 44 43 B1 35 A7 32 33 30 00 |:.DC.1.DC.5.230.| 000001F0: 0F 0A F0 00 91 20 44 43 20 89 20 39 31 30 2C 32 |..... DC . 910,2| 00000200: 37 30 2C 37 30 30 2C 31 30 31 30 2C 36 37 30 00 |70,700,1010,670.| 00000210: 15 0A FA 00 3A 00 2C 0A 04 01 8F 20 2A 2A 2A 20 |....:.,.... *** | 00000220: 4B 4F 50 49 45 52 45 4E 20 2A 2A 2A 00 59 0A 0E |KOPIEREN ***.Y..| 00000230: 01 99 22 93 11 9A 20 49 4E 53 45 52 54 20 1C 53 |.."... INSERT .S| 00000240: 4F 55 52 43 45 9A 20 44 49 53 4B 20 49 4E 54 4F |OURCE. DISK INTO| 00000250: 20 44 52 49 56 45 1F 11 22 00 63 0A 18 01 8D 20 | DRIVE..".c.... | 00000260: 39 39 30 00 80 0A 22 01 8F 20 2A 2A 2A 20 46 49 |990...".. *** FI| 00000270: 4C 45 53 20 45 49 4E 4C 45 53 45 4E 20 2A 2A 2A |LES EINLESEN ***| 00000280: 00 90 0A 2C 01 9F 31 2C 38 2C 30 2C 22 24 30 22 |...,..1,8,0,"$0"| 00000290: 00 A6 0A 36 01 8D 37 36 30 3A 8B 4E 46 24 B3 B1 |...6..760:.NF$..| 000002A0: 22 22 A7 33 34 30 00 B4 0A 40 01 8B 53 54 B2 30 |"".340...@..ST.0| 000002B0: A7 33 31 30 00 BD 0A 4A 01 89 33 35 30 00 FB 0A |.310...J..350...| 000002C0: 54 01 42 4C 25 28 41 4E 29 B2 C6 28 42 4C 24 AA |T.BL%(AN)..(BL$.| 000002D0: C7 28 30 29 29 3A 4E 46 24 28 41 4E 29 B2 4E 46 |.(0)):NF$(AN).NF| 000002E0: 24 3A 8B 53 54 B2 30 A7 41 4E B2 41 4E AA 31 3A |$:.ST.0.AN.AN.1:| 000002F0: 4E 46 24 B2 22 22 3A 89 33 31 30 00 2A 0B 5E 01 |NF$."":.310.*.^.| 00000300: A0 31 3A 41 4E B2 41 4E AB 31 3A 8B 41 4E B2 30 |.1:AN.AN.1:.AN.0| 00000310: A7 99 22 11 11 20 1C 45 4D 50 54 59 20 44 49 53 |..".. .EMPTY DIS| 00000320: 4B 1F 22 3A 8D 39 39 30 3A 8A 00 46 0B 68 01 8F |K.":.990:..F.h..| 00000330: 20 2A 2A 2A 20 4B 4F 50 49 45 52 41 55 53 57 41 | *** KOPIERAUSWA| 00000340: 48 4C 20 2A 2A 2A 00 76 0B 72 01 99 22 93 11 9A |HL ***.v.r.."...| 00000350: 50 4C 45 41 53 45 20 54 59 50 45 20 59 20 46 4F |PLEASE TYPE Y FO| 00000360: 52 20 59 45 53 20 4F 52 20 4E 20 46 4F 52 20 4E |R YES OR N FOR N| 00000370: 4F 20 21 1F 11 22 00 A1 0B 7C 01 81 49 B2 31 A4 |O !.."...|..I.1.| 00000380: 41 4E 3A 99 42 4C 25 28 49 29 3B A3 35 29 4E 46 |AN:.BL%(I);.5)NF| 00000390: 24 28 49 29 22 20 3F 20 22 3B 3A 97 31 39 38 2C |$(I)" ? ";:.198,| 000003A0: 30 00 AC 0B 86 01 92 31 39 38 2C 31 00 E7 0B 8B |0......198,1....| 000003B0: 01 A1 41 24 3A 8B 41 24 B2 22 59 22 A7 43 46 25 |..A$:.A$."Y".CF%| 000003C0: 28 49 29 B2 AB 31 3A 42 4C B2 42 4C AA 42 4C 25 |(I)..1:BL.BL.BL%| 000003D0: 28 49 29 3A 99 A3 33 30 29 22 1C 59 45 53 21 1F |(I):..30)".YES!.| 000003E0: 22 3A 89 20 34 32 30 00 01 0C 90 01 43 46 25 28 |":. 420.....CF%(| 000003F0: 49 29 B2 30 3A 8B 41 24 B3 B1 22 4E 22 A7 33 39 |I).0:.A$.."N".39| 00000400: 30 00 11 0C 9A 01 99 A3 33 30 29 22 2A 4E 4F 2A |0.......30)"*NO*| 00000410: 22 00 39 0C A4 01 8B 42 4C B1 52 42 A7 50 25 28 |".9....BL.RB.P%(| 00000420: 50 41 29 B2 49 AB 31 3A 50 41 B2 50 41 AA 31 3A |PA).I.1:PA.PA.1:| 00000430: 42 4C B2 42 4C 25 28 49 29 00 4A 0C AE 01 82 49 |BL.BL%(I).J....I| 00000440: 3A 50 25 28 50 41 29 B2 41 4E 00 58 0C B8 01 8B |:P%(PA).AN.X....| 00000450: 42 4C B2 30 A7 36 34 30 00 6C 0C C2 01 8F 20 2A |BL.0.640.l.... *| 00000460: 2A 2A 20 4B 4F 50 49 45 20 2A 2A 2A 00 84 0C CC |** KOPIE ***....| 00000470: 01 99 22 93 9A 20 43 4F 50 59 49 4E 47 2E 2E 2E |..".. COPYING...| 00000480: 1F 11 11 22 00 91 0C D6 01 81 20 49 B2 31 A4 50 |..."...... I.1.P| 00000490: 41 00 CF 0C E0 01 81 52 57 B2 30 A4 31 3A 4E 52 |A......RW.0.1:NR| 000004A0: B2 30 3A 8B 52 57 B2 31 A7 99 22 11 9A 20 49 4E |.0:.RW.1..".. IN| 000004B0: 53 45 52 54 20 1C 44 45 53 54 49 4E 41 54 49 4F |SERT .DESTINATIO| 000004C0: 4E 9A 20 44 49 53 4B 1F 11 22 3A 8D 39 39 30 00 |N. DISK..":.990.| 000004D0: E6 0C EA 01 81 4A B2 50 25 28 49 AB 31 29 AA 31 |.....J.P%(I.1).1| 000004E0: A4 50 25 28 49 29 00 FC 0C F4 01 8B A8 43 46 25 |.P%(I).......CF%| 000004F0: 28 4A 29 A7 82 4A 3A 89 20 35 34 30 00 2F 0D FE |(J)..J:. 540./..| 00000500: 01 4E 46 24 B2 4E 46 24 28 4A 29 3A 99 42 4C 25 |.NF$.NF$(J):.BL%| 00000510: 28 4A 29 3B A3 35 29 4E 46 24 3A 8D 35 37 30 3A |(J);.5)NF$:.570:| 00000520: 8B 53 54 B2 30 B0 53 54 B2 36 34 A7 35 33 30 00 |.ST.0.ST.64.530.| 00000530: 3A 0D 08 02 8D 38 38 30 3A 8A 00 41 0D 12 02 82 |:....880:..A....| 00000540: 4A 00 53 0D 1C 02 82 52 57 3A 8B 49 B2 50 41 A7 |J.S....RW:.I.PA.| 00000550: 36 34 30 00 78 0D 26 02 99 22 9A 20 49 4E 53 45 |640.x.&..". INSE| 00000560: 52 54 20 1C 53 4F 55 52 43 45 9A 20 44 49 53 4B |RT .SOURCE. DISK| 00000570: 1F 11 22 3A 8D 39 39 30 00 81 0D 30 02 82 49 3A |..":.990...0..I:| 00000580: 8A 00 8F 0D 3A 02 8B 52 57 B2 31 A7 36 31 30 00 |....:..RW.1.610.| 00000590: B9 0D 44 02 9F 31 2C 38 2C 35 2C 4E 46 24 AA 22 |..D..1,8,5,NF$."| 000005A0: 2C 52 22 3A 97 32 35 32 2C 30 3A 97 32 35 33 2C |,R":.252,0:.253,| 000005B0: 41 48 25 28 4E 52 29 AA 31 00 E7 0D 4E 02 9E 4D |AH%(NR).1...N..M| 000005C0: 52 3A 4E 52 B2 4E 52 AA 31 3A 41 4C 25 28 4E 52 |R:NR.NR.1:AL%(NR| 000005D0: 29 B2 C2 28 32 35 34 29 3A 41 48 25 28 4E 52 29 |)..(254):AH%(NR)| 000005E0: B2 C2 28 32 35 35 29 00 F0 0D 58 02 A0 31 3A 8E |..(255)...X..1:.| 000005F0: 00 1A 0E 62 02 9F 31 2C 38 2C 35 2C 4E 46 24 AA |...b..1,8,5,NF$.| 00000600: 22 2C 57 22 3A 97 32 35 32 2C 30 3A 97 32 35 33 |",W":.252,0:.253| 00000610: 2C 41 48 25 28 4E 52 29 AA 31 00 40 0E 6C 02 97 |,AH%(NR).1.@.l..| 00000620: 32 35 34 2C 41 4C 25 28 4E 52 AA 31 29 3A 97 32 |254,AL%(NR.1):.2| 00000630: 35 35 2C 41 48 25 28 4E 52 AA 31 29 3A 9E 4D 57 |55,AH%(NR.1):.MW| 00000640: 00 51 0E 76 02 4E 52 B2 4E 52 AA 31 3A A0 31 3A |.Q.v.NR.NR.1:.1:| 00000650: 8E 00 6C 0E 80 02 99 22 11 11 11 1C 20 45 4E 44 |..l....".... END| 00000660: 20 4F 46 20 43 4F 50 59 20 21 1F 22 00 77 0E 8A | OF COPY !.".w..| 00000670: 02 8D 39 39 30 3A 8A 00 8A 0E 94 02 8F 20 2A 2A |..990:....... **| 00000680: 2A 20 45 4E 44 45 20 2A 2A 2A 00 9E 0E 9E 02 97 |* ENDE ***......| 00000690: 35 36 2C 31 36 30 3A 3A 97 37 37 37 2C 31 00 A4 |56,160::.777,1..| 000006A0: 0E A8 02 3A 00 BE 0E B2 02 8F 20 2A 2A 2A 20 46 |...:...... *** F| 000006B0: 4F 52 4D 41 54 49 45 52 45 4E 20 2A 2A 2A 00 02 |ORMATIEREN ***..| 000006C0: 0F BC 02 85 22 93 11 11 11 44 49 53 4B 4E 41 4D |...."....DISKNAM| 000006D0: 45 22 3B 46 4F 24 3A 49 44 24 B2 22 22 3A 85 22 |E";FO$:ID$."":."| 000006E0: 11 44 49 53 4B 2D 49 44 22 3B 49 44 24 3A 8B 49 |.DISK-ID";ID$:.I| 000006F0: 44 24 B3 B1 22 22 A7 49 44 24 B2 22 2C 22 AA 49 |D$.."".ID$.",".I| 00000700: 44 24 00 12 0F C6 02 46 4F 24 B2 46 4F 24 AA 49 |D$.....FO$.FO$.I| 00000710: 44 24 00 32 0F D0 02 99 22 11 20 49 4E 53 45 52 |D$.2....". INSER| 00000720: 54 20 44 49 53 4B 20 49 4E 54 4F 20 44 52 49 56 |T DISK INTO DRIV| 00000730: 45 22 00 3B 0F DA 02 8D 39 39 30 00 53 0F E4 02 |E".;....990.S...| 00000740: 9F 31 2C 38 2C 31 35 2C 22 4E 3A 22 AA 46 4F 24 |.1,8,15,"N:".FO$| 00000750: 3A A0 31 00 61 0F EE 02 8D 38 38 30 3A 89 31 37 |:.1.a....880:.17| 00000760: 30 00 81 0F F8 02 8F 20 2A 2A 2A 20 64 4A 45 43 |0...... *** dJEC| 00000770: 54 4F 52 59 20 45 49 4E 4C 45 53 45 4E 20 2A 2A |TORY EINLESEN **| 00000780: 2A 00 8F 0F 02 03 A1 23 31 2C 41 24 2C 42 24 00 |*......#1,A$,B$.| 00000790: 9E 0F 0C 03 A1 23 31 2C 42 4C 24 2C 42 24 00 A9 |.....#1,BL$,B$..| 000007A0: 0F 16 03 A1 23 31 2C 41 24 00 BD 0F 20 03 A1 23 |....#1,A$... ..#| 000007B0: 31 2C 42 24 3A 8B 53 54 B3 B1 30 A7 8E 00 D0 0F |1,B$:.ST..0.....| 000007C0: 2A 03 8B 42 24 B3 B1 C7 28 33 34 29 A7 38 30 30 |*..B$...(34).800| 000007D0: 00 F6 0F 34 03 A1 23 31 2C 42 24 3A 8B 42 24 B3 |...4..#1,B$:.B$.| 000007E0: B1 C7 28 33 34 29 A7 4E 46 24 B2 4E 46 24 AA 42 |..(34).NF$.NF$.B| 000007F0: 24 3A 89 38 32 30 00 0F 10 3E 03 A1 23 31 2C 42 |$:.820...>..#1,B| 00000800: 24 3A 8B 42 24 B2 C7 28 33 32 29 A7 38 33 30 00 |$:.B$..(32).830.| 00000810: 3D 10 48 03 4E 46 24 B2 4E 46 24 AA 22 2C 22 AA |=.H.NF$.NF$.",".| 00000820: 42 24 3A 81 49 B2 30 A4 31 3A A1 23 31 2C 42 24 |B$:.I.0.1:.#1,B$| 00000830: 3A 4E 46 24 B2 4E 46 24 AA 42 24 3A 82 00 54 10 |:NF$.NF$.B$:..T.| 00000840: 52 03 A1 23 31 2C 42 24 3A 8B 42 24 B3 B1 22 22 |R..#1,B$:.B$..""| 00000850: A7 38 35 30 00 5A 10 5C 03 8E 00 77 10 66 03 8F |.850.Z.\...w.f..| 00000860: 20 2A 2A 2A 20 46 45 48 4C 45 52 2D 41 55 53 47 | *** FEHLER-AUSG| 00000870: 41 42 45 20 2A 2A 2A 00 A7 10 70 03 9F 20 31 35 |ABE ***...p.. 15| 00000880: 2C 38 2C 31 35 3A 84 31 35 2C 41 2C 42 24 2C 43 |,8,15:.15,A,B$,C| 00000890: 2C 44 3A 99 41 3B 42 24 3B 43 3B 44 3A A0 31 35 |,D:.A;B$;C;D:.15| 000008A0: 3A 8D 39 39 30 3A 8E 00 AD 10 7A 03 3A 00 C5 10 |:.990:....z.:...| 000008B0: 84 03 8F 20 2A 2A 2A 20 44 49 52 45 43 54 4F 52 |... *** DIRECTOR| 000008C0: 59 20 2A 2A 2A 00 CE 10 8E 03 99 22 93 22 00 E8 |Y ***......"."..| 000008D0: 10 98 03 9F 33 2C 38 2C 30 2C 22 24 30 22 3A A1 |....3,8,0,"$0":.| 000008E0: 23 33 2C 41 24 2C 41 24 00 FE 10 A2 03 A1 23 33 |#3,A$,A$......#3| 000008F0: 2C 41 24 2C 41 24 2C 42 4C 24 2C 42 48 24 00 12 |,A$,A$,BL$,BH$..| 00000900: 11 AC 03 8B 20 41 24 B2 22 22 A7 A0 33 3A 89 39 |.... A$.""..3:.9| 00000910: 38 30 00 30 11 B6 03 42 4C 24 B2 42 4C 24 AA C7 |80.0...BL$.BL$..| 00000920: 28 30 29 3A 42 48 24 B2 42 48 24 AA C7 28 30 29 |(0):BH$.BH$..(0)| 00000930: 00 48 11 C0 03 99 32 35 36 AC C6 28 42 48 24 29 |.H....256..(BH$)| 00000940: AA C6 28 42 4C 24 29 3B 00 55 11 CA 03 9E 4D 44 |..(BL$);.U....MD| 00000950: 3A 89 39 33 30 00 65 11 D4 03 8D 20 39 39 30 3A |:.930.e.... 990:| 00000960: 89 20 31 37 30 00 7D 11 DE 03 97 31 39 38 2C 30 |. 170.}....198,0| 00000970: 3A 92 31 39 38 2C 31 3A A1 41 24 3A 8E 00 95 11 |:.198,1:.A$:....| 00000980: E8 03 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A |...198,0:.198,1:| 00000990: A1 41 24 3A 8E 00 B7 11 F2 03 8F 20 2A 2A 2A 20 |.A$:....... *** | 000009A0: 4E 41 4D 45 20 55 4E 44 20 49 44 20 41 45 4E 44 |NAME UND ID AEND| 000009B0: 45 52 4E 20 2A 2A 2A 00 D3 11 FC 03 85 22 93 11 |ERN ***......"..| 000009C0: 20 4E 45 57 20 44 49 53 4B 4E 41 4D 45 20 22 3B | NEW DISKNAME ";| 000009D0: 4E 41 24 00 EA 11 06 04 8B 20 C3 28 4E 41 24 29 |NA$...... .(NA$)| 000009E0: B1 31 36 20 A7 20 31 30 32 30 00 12 12 10 04 8B |.16 . 1020......| 000009F0: 20 C3 28 4E 41 24 29 B3 31 38 20 A7 20 4E 41 24 | .(NA$).18 . NA$| 00000A00: B2 4E 41 24 AA C7 28 31 36 30 29 3A 89 20 31 30 |.NA$..(160):. 10| 00000A10: 34 30 00 2E 12 1A 04 85 22 11 11 20 4E 45 57 20 |40......".. NEW | 00000A20: 49 44 20 20 20 20 20 20 20 22 3B 49 44 24 00 3E |ID ";ID$.>| 00000A30: 12 24 04 4E 41 24 B2 4E 41 24 AA 49 44 24 00 5B |.$.NA$.NA$.ID$.[| 00000A40: 12 2E 04 9F 31 35 2C 38 2C 31 35 2C 22 49 30 22 |....15,8,15,"I0"| 00000A50: 3A 9F 35 2C 38 2C 35 2C 22 23 22 00 71 12 38 04 |:.5,8,5,"#".q.8.| 00000A60: 98 31 35 2C 22 55 31 22 3B 35 3B 30 3B 31 38 3B |.15,"U1";5;0;18;| 00000A70: 30 00 85 12 42 04 98 31 35 2C 22 42 2D 50 22 3B |0...B..15,"B-P";| 00000A80: 35 3B 31 34 34 00 91 12 4C 04 98 35 2C 4E 41 24 |5;144...L..5,NA$| 00000A90: 3B 00 A7 12 56 04 98 31 35 2C 22 55 32 22 3B 35 |;...V..15,"U2";5| 00000AA0: 3B 30 3B 31 38 3B 30 00 BC 12 60 04 84 31 35 2C |;0;18;0...`..15,| 00000AB0: 46 31 2C 46 32 24 2C 46 33 2C 46 34 00 E0 12 6A |F1,F2$,F3,F4...j| 00000AC0: 04 99 22 11 1C 20 45 52 52 4F 52 20 22 3B 46 31 |..".. ERROR ";F1| 00000AD0: 3B 46 32 24 3B 46 33 3B 46 34 3B 3A 99 22 1F 22 |;F2$;F3;F4;:."."| 00000AE0: 00 F4 12 74 04 A0 35 3A 98 31 35 2C 22 49 30 22 |...t..5:.15,"I0"| 00000AF0: 3A A0 31 35 00 0C 13 7E 04 8B 46 31 B3 B1 30 A7 |:.15...~..F1..0.| 00000B00: 20 8D 20 39 39 30 3A 89 20 31 37 30 00 1C 13 83 | . 990:. 170....| 00000B10: 04 8D 20 39 39 30 3A 89 20 31 37 30 00 00 00 A2 |.. 990:. 170....| 00000B20: 01 20 C6 FF A0 00 20 CF FF 78 AA A5 01 29 FC 85 |. .... ..x...)..| 00000B30: 01 8A 91 FC A5 01 09 03 85 01 58 20 B7 FF C9 40 |..........X ...@| 00000B40: F0 0B C9 00 D0 07 C8 D0 DD E6 FD D0 D9 20 CC FF |............. ..| 00000B50: 84 FE A5 FD 85 FF 60 A2 01 20 C9 FF A0 00 78 A5 |......`.. ....x.| 00000B60: 01 29 FC 85 01 B1 FC AA A5 01 09 03 85 01 58 8A |.)............X.| 00000B70: 20 D2 FF 20 B7 FF C9 00 D0 11 C8 D0 02 E6 FD A5 | .. ............| 00000B80: FF C5 FD D0 D9 C4 FE 90 D5 F0 D3 4C CC FF A2 03 |...........L....| 00000B90: 20 C6 FF 20 CF FF 20 D2 FF D0 F8 A9 0D 20 D2 FF | .. .. ...... ..| 00000BA0: 4C CC FF 00 00 00 A2 01 20 C6 FF A0 00 20 CF FF |L....... .... ..| 00000BB0: 78 AA A5 01 29 FC 85 01 8A 91 FC A5 01 09 03 85 |x...)...........| 00000BC0: 01 58 20 B7 FF C9 40 F0 0B C9 00 D0 07 C8 D0 DD |.X ...@.........| 00000BD0: E6 FD D0 D9 20 CC FF 84 FE A5 FD 85 FF 60 A2 01 |.... ........`..| 00000BE0: 20 C9 FF A0 00 78 A5 01 29 FC 85 01 B1 FC AA A5 | ....x..).......| 00000BF0: 01 09 03 85 01 58 8A 20 D2 FF 20 B7 FF C9 00 D0 |.....X. .. .....| 00000C00: 11 C8 D0 02 E6 FD A5 FF C5 FD D0 D9 C4 FE 90 D5 |................| 00000C10: F0 D3 4C CC FF A2 03 20 C6 FF 20 CF FF 20 D2 FF |..L.... .. .. ..| 00000C20: D0 F8 A9 0D 20 D2 FF 4C CC FF 00 00 00 |.... ..L..... |
....D.. *** INITIALISIEREN ***.T.N..56,B (46).14:.:RB.255.B(56):PA.1:AN.0:NL.0:NF $.""...X.PE.B(45).256.B(46):MR.PE.135:MW .PE.79:MD.PE.24......NF$(140),CF%(140),B L%(140),P%(10),AL%(90),AH%(90).....P%(0) .0:AL%(0).0:AH%(0).B(56).1.....:... .. * ** MENUE ***.6...."..".13)".FILECOPY V1. 0":..14)".BY .C.O.L.I.B.R.I ".Q...."... ....1. DIRECTORY.I...."...2. COPY FILE S...H.."...3. FORMAT DISK. .R.."...4. MODIFY NAME & ID...W.."...5. END.M..... 211)"TAKE YOUR CHOICE......DC$:DC.E(DC$) :.DC.1.DC.5.230...... DC . 910,270,700,1 010,670.....:.,.... *** KOPIEREN ***.Y.. .."... INSERT .SOURCE. DISK INTO DRIVE.. ".C.... 990...".. *** FILES EINLESEN *** ...,..1,8,0,"$0"...6..760:.NF$.."".340.. .@..ST.0.310...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..".. .EMPTY DIS K.":.990:..F.H.. *** KOPIERAUSWAHL ***.V .R.."...PLEASE TYPE Y FOR YES OR N FOR N O !.."...|..I.1.AN:.BL%(I);.5)NF$(I)" ? ";:.198,0......198,1......A$:.A$."Y".CF% (I)..1:BL.BL.BL%(I):..30)".YES!.":. 420. ....CF%(I).0:.A$.."N".390.......30)"*NO* ".9....BL.RB.P%(PA).I.1:PA.PA.1:BL.BL%(I ).J....I:P%(PA).AN.X....BL.0.640.L.B.. * ** KOPIE ***...L..".. COPYING......"...V .. I.1.PA.O....RW.0.1:NR.0:.RW.1..".. IN SERT .DESTINATION. DISK..":.990......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:..A....J.S....RW:.I.PA. 640.X.&..". INSERT .SOURCE. DISK..":.990 ...0..I:....:..RW.1.610...D..1,8,5,NF$." ,R":.252,0:.253,AH%(NR).1...N..MR:NR.NR. 1:AL%(NR).B(254):AH%(NR).B(255)...X. 1:. ...B..1,8,5,NF$.",W":.252,0:.253,AH%(NR) .1.@.L..254,AL%(NR.1):.255,AH%(NR.1):.MW .Q.V.NR.NR.1: 1:..L....".... END OF COPY !.".W....990:....... *** ENDE ***...... 56,160::.777,1.....:...... *** FORMATIER EN ***......"....DISKNAME";FO$:ID$."":." .DISK-ID";ID$:.ID$.."".ID$.",".ID$...F.F O$.FO$.ID$.2.P..". INSERT DISK INTO DRIV E".;.Z..990.S....1,8,15,"N:".FO$: 1.A... .880:.170...... *** DJECTORY EINLESEN ** *......#1,A$,B$......#1,BL$,B$......#1,A $... ..#1,B$:.ST..0...P.*..B$..G(34).800 ...4..#1,B$:.B$..G(34).NF$.NF$.B$:.820.. .>..#1,B$:.B$.G(32).830.=.H.NF$.NF$.",". B$:.I.0.1:.#1,B$:NF$.NF$.B$:..T.R..#1,B$ :.B$.."".850.Z.\...W.F.. *** FEHLER-AUSG ABE ***...P.. 15,8,15:.15,A,B$,C,D:.A;B$ ;C;D: 15:.990:....Z.:.E.... *** DIRECTOR Y ***.N...."."......3,8,0,"$0":.#3,A$,A$ ......#3,A$,A$,BL$,BH$...... A$."". 3:.9 80.0...BL$.BL$.G(0):BH$.BH$.G(0).H....25 6.F(BH$).F(BL$);.U.J..MD:.930.E.T.. 990: . 170.}....198,0:.198,1:.A$:.......198,0 :.198,1:.A$:....... *** NAME UND ID AEND ERN ***.S....".. NEW DISKNAME ";NA$..... . C(NA$).16 . 1020...... C(NA$).18 . NA$ .NA$.G(160):. 1040......".. NEW ID ";ID$.>.$.NA$.NA$.ID$.[....15,8,15,"I0" :.5,8,5,"#".Q.8..15,"U1";5;0;18;0...B..1 5,"B-P";5;144...L..5,NA$;...V..15,"U2";5 ;0;18;0...`..15,F1,F2$,F3,F4...J..".. ER ROR ";F1;F2$;F3;F4;:."."...T. 5:.15,"I0" : 15...~..F1..0. . 990:. 170...... 990:. 170..... 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...... 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 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL