COPY
FILE INFORMATION
FILENAME(S): COPY
FILE TYPE(S): PRG
FILE SIZE: 3.7K
FIRST SEEN: 2025-11-30 16:15:14
APPEARS ON: 1 disk(s)
FILE HASH
19cc16dea143bec11c85eddee66e526ab7370f0c8c1099e2a0e6f432ffd5fa13
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| KOPIERPROGRAMME | COPY | PRG | BrainSkull, Andraes Maurer | 13 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0E 08 08 00 8B 53 52 B2 31 89 33 30 00 26 |.......SR.1.30.&|
00000010: 08 09 00 97 35 35 2C 30 3A 97 35 36 2C 32 38 3A |....55,0:.56,28:|
00000020: 9C 3A 99 22 93 22 00 5D 08 0A 00 42 24 B2 22 20 |.:.".".]...B$." |
00000030: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000050: 20 20 20 20 20 20 20 92 22 3A 99 42 24 00 92 08 | .":.B$...|
00000060: 0B 00 99 22 20 12 20 20 20 20 20 20 20 51 20 55 |..." . Q U|
00000070: 20 49 20 43 20 4B 20 43 20 4F 20 50 20 59 20 20 | I C K C O P Y |
00000080: 56 31 2E 30 20 20 20 20 20 20 20 20 92 22 3A 99 |V1.0 .":.|
00000090: 42 24 00 C7 08 0C 00 99 22 20 12 20 20 20 43 4F |B$......" . CO|
000000A0: 50 59 52 49 47 48 54 20 28 43 29 20 31 39 38 33 |PYRIGHT (C) 1983|
000000B0: 20 42 59 20 48 2E 47 45 52 4C 4F 46 46 20 20 20 | BY H.GERLOFF |
000000C0: 20 92 22 3A 99 42 24 00 FC 08 0D 00 99 22 20 12 | .":.B$......" .|
000000D0: 20 20 20 20 41 4E 20 49 4E 54 45 47 52 41 54 45 | AN INTEGRATE|
000000E0: 44 20 53 59 53 54 45 4D 53 20 50 52 4F 44 55 43 |D SYSTEMS PRODUC|
000000F0: 54 20 20 20 20 20 92 22 3A 99 42 24 00 17 09 0F |T .":.B$....|
00000100: 00 42 24 B2 22 22 3A 53 52 B2 31 3A 93 22 51 43 |.B$."":SR.1:."QC|
00000110: 4F 50 22 2C 38 2C 31 00 4A 09 1E 00 86 42 4D 25 |OP",8,1.J....BM%|
00000120: 28 33 35 2C 32 29 2C 4D 41 25 28 32 30 29 2C 43 |(35,2),MA%(20),C|
00000130: 4E 24 28 33 35 29 3A 9F 31 35 2C 38 2C 31 35 3A |N$(35):.15,8,15:|
00000140: 9F 32 2C 38 2C 32 2C 22 23 22 00 6C 09 1F 00 98 |.2,8,2,"#".l....|
00000150: 31 35 2C 22 55 31 3A 22 32 3B 30 3B 31 38 3B 30 |15,"U1:"2;0;18;0|
00000160: 3A 9E 39 36 30 3A A0 32 3A A0 31 35 00 8F 09 23 |:.960:.2:.15...#|
00000170: 00 59 24 B2 22 13 11 11 11 11 11 11 11 11 11 11 |.Y$."...........|
00000180: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 00 |..............".|
00000190: C0 09 24 00 58 24 B2 22 1D 1D 1D 1D 1D 1D 1D 1D |..$.X$."........|
000001A0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000001B0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 |..............."|
000001C0: 00 E2 09 25 00 81 53 B2 30 A4 32 30 3A 4D 41 25 |...%..S.0.20:MA%|
000001D0: 28 53 29 B2 32 AE 28 53 AB B5 28 53 AD 38 29 AC |(S).2.(S..(S.8).|
000001E0: 38 29 00 0C 0A 2E 00 82 3A 81 49 B2 30 A4 33 35 |8)......:.I.0.35|
000001F0: 3A 43 4E 24 28 49 29 B2 C9 28 22 30 22 AA CA 28 |:CN$(I)..("0"..(|
00000200: C4 28 49 29 2C 32 29 2C 32 29 3A 82 00 38 0A 32 |.(I),2),2):..8.2|
00000210: 00 99 22 11 11 20 20 20 20 20 20 20 12 53 4F 55 |..".. .SOU|
00000220: 52 43 45 92 20 20 44 45 56 49 43 45 20 38 20 20 |RCE. DEVICE 8 |
00000230: 44 52 49 56 45 20 30 22 00 62 0A 33 00 99 22 20 |DRIVE 0".b.3.." |
00000240: 20 20 20 20 20 20 12 54 41 52 47 45 54 92 20 20 | .TARGET. |
00000250: 44 45 56 49 43 45 20 38 20 20 44 52 49 56 45 20 |DEVICE 8 DRIVE |
00000260: 30 22 00 8E 0A 34 00 99 22 11 20 20 20 20 20 4E |0"...4..". N|
00000270: 4F 52 4D 41 4C 20 4F 52 20 55 54 49 4C 49 54 59 |ORMAL OR UTILITY|
00000280: 20 43 4F 50 59 20 28 4E 2F 55 29 20 4E 22 00 B9 | COPY (N/U) N"..|
00000290: 0A 35 00 99 22 20 20 20 20 20 20 20 46 4F 52 4D |.5.." FORM|
000002A0: 41 54 20 54 41 52 47 45 54 20 44 49 53 4B 20 28 |AT TARGET DISK (|
000002B0: 59 2F 4E 29 20 59 22 3A 99 00 E0 0A 36 00 99 22 |Y/N) Y":....6.."|
000002C0: 20 20 20 20 20 20 20 20 B0 C0 C0 C0 C0 C0 C0 C0 | ........|
000002D0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 22 |..............."|
000002E0: 00 07 0B 37 00 99 22 20 20 20 20 20 20 20 20 C2 |...7.." .|
000002F0: 20 20 20 50 41 52 41 4D 45 54 45 52 20 49 4E 50 | PARAMETER INP|
00000300: 55 54 20 20 20 C2 22 00 2E 0B 38 00 99 22 20 20 |UT ."...8.." |
00000310: 20 20 20 20 20 20 C2 20 20 20 20 20 20 20 20 20 | . |
00000320: 20 20 20 20 20 20 20 20 20 20 20 20 C2 22 00 55 | .".U|
00000330: 0B 39 00 99 22 20 20 20 20 20 20 20 20 C2 20 54 |.9.." . T|
00000340: 52 41 43 4B 20 30 30 2C 20 53 45 43 54 4F 52 20 |RACK 00, SECTOR |
00000350: 30 30 20 C2 22 00 7C 0B 3A 00 99 22 20 20 20 20 |00 .".|.:.." |
00000360: 20 20 20 20 AD C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 | ............|
00000370: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 BD 22 00 AD 0B 46 |..........."...F|
00000380: 00 59 B2 31 31 3A 58 B2 32 33 3A 44 24 B2 22 38 |.Y.11:X.23:D$."8|
00000390: 22 3A A1 49 24 3A 8D 31 30 30 30 3A 8B 49 24 B3 |":.I$:.1000:.I$.|
000003A0: 22 30 22 B0 49 24 B1 22 39 22 89 37 30 00 BA 0B |"0".I$."9".70...|
000003B0: 48 00 55 53 B2 C5 28 49 24 29 00 E2 0B 4B 00 58 |H.US..(I$)...K.X|
000003C0: B2 33 32 3A 44 24 B2 22 30 22 3A 8D 31 30 30 30 |.32:D$."0":.1000|
000003D0: 3A 8B 49 24 B3 22 30 22 B0 49 24 B1 22 31 22 89 |:.I$."0".I$."1".|
000003E0: 37 35 00 EF 0B 4D 00 44 53 B2 C5 28 49 24 29 00 |75...M.DS..(I$).|
000003F0: 1C 0C 50 00 59 B2 31 32 3A 58 B2 32 33 3A 44 24 |..P.Y.12:X.23:D$|
00000400: B2 22 38 22 3A 8D 31 30 30 30 3A 8B 49 24 B3 22 |."8":.1000:.I$."|
00000410: 30 22 B0 49 24 B1 22 39 22 89 38 30 00 29 0C 52 |0".I$."9".80.).R|
00000420: 00 55 54 B2 C5 28 49 24 29 00 51 0C 55 00 58 B2 |.UT..(I$).Q.U.X.|
00000430: 33 32 3A 44 24 B2 22 30 22 3A 8D 31 30 30 30 3A |32:D$."0":.1000:|
00000440: 8B 49 24 B3 22 30 22 B0 49 24 B1 22 31 22 89 38 |.I$."0".I$."1".8|
00000450: 35 00 77 0C 57 00 44 54 B2 C5 28 49 24 29 3A 53 |5.w.W.DT..(I$):S|
00000460: 44 B2 31 3A 8B 55 53 B3 B1 55 54 B0 44 53 B3 B1 |D.1:.US..UT.DS..|
00000470: 44 54 A7 53 44 B2 30 00 A6 0C 5A 00 59 B2 31 34 |DT.SD.0...Z.Y.14|
00000480: 3A 58 B2 33 35 3A 44 24 B2 22 4E 22 3A 8D 31 30 |:X.35:D$."N":.10|
00000490: 30 30 3A 8B 49 24 B3 B1 22 4E 22 AF 49 24 B3 B1 |00:.I$.."N".I$..|
000004A0: 22 55 22 89 39 30 00 BC 0C 5C 00 51 43 B2 31 3A |"U".90...\.QC.1:|
000004B0: 8B 49 24 B2 22 55 22 A7 51 43 B2 30 00 EB 0C 5D |.I$."U".QC.0...]|
000004C0: 00 59 B2 31 35 3A 58 B2 33 33 3A 44 24 B2 22 59 |.Y.15:X.33:D$."Y|
000004D0: 22 3A 8D 31 30 30 30 3A 8B 49 24 B3 B1 22 59 22 |":.1000:.I$.."Y"|
000004E0: AF 49 24 B3 B1 22 4E 22 89 39 33 00 01 0D 5F 00 |.I$.."N".93..._.|
000004F0: 46 4F B2 31 3A 8B 49 24 B2 22 4E 22 A7 46 4F B2 |FO.1:.I$."N".FO.|
00000500: 30 00 15 0D 60 00 53 45 B2 31 3A 8B 53 44 B2 30 |0...`.SE.1:.SD.0|
00000510: A7 53 45 B2 33 00 48 0D 61 00 8D 33 30 30 30 3A |.SE.3.H.a..3000:|
00000520: 9F 31 35 2C 55 53 2C 31 35 3A 98 31 35 2C 22 49 |.15,US,15:.15,"I|
00000530: 22 C4 28 44 53 29 3A 8D 32 30 30 30 3A 9F 32 2C |".(DS):.2000:.2,|
00000540: 55 53 2C 32 2C 22 23 22 00 85 0D 62 00 99 C8 28 |US,2,"#"...b...(|
00000550: 59 24 2C 31 38 29 3B C8 28 58 24 2C 31 30 29 3B |Y$,18);.(X$,10);|
00000560: 22 20 20 20 20 20 20 52 45 41 44 49 4E 47 20 20 |" READING |
00000570: 20 20 20 20 11 11 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D | ............|
00000580: 9D 9D 9D 22 3B 00 99 0D 63 00 8B 51 43 B2 30 AF |...";...c..QC.0.|
00000590: 46 4F B2 30 A7 89 31 31 35 00 D5 0D 68 00 99 22 |FO.0..115...h.."|
000005A0: 31 38 1D 1D 1D 1D 1D 1D 1D 1D 1D 30 30 9D 9D 9D |18.........00...|
000005B0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 3A 98 31 35 |..........";:.15|
000005C0: 2C 22 55 31 3A 22 32 3B 44 53 3B 31 38 3B 30 3A |,"U1:"2;DS;18;0:|
000005D0: 8D 32 30 30 30 00 F5 0D 69 00 97 38 35 39 2C 32 |.2000...i..859,2|
000005E0: 38 3A 97 38 36 39 2C 31 37 3A 97 38 37 33 2C 30 |8:.869,17:.873,0|
000005F0: 3A 9E 38 32 38 00 1D 0E 6A 00 49 44 24 B2 C7 28 |:.828...j.ID$..(|
00000600: C2 28 37 33 33 30 29 29 AA C7 28 C2 28 37 33 33 |.(7330))..(.(733|
00000610: 31 29 29 3A 8B 51 43 B2 30 A7 31 31 35 00 52 0E |1)):.QC.0.115.R.|
00000620: 6D 00 81 54 B2 31 A4 33 35 3A 81 42 59 B2 30 A4 |m..T.1.35:.BY.0.|
00000630: 32 3A 42 4D 25 28 54 2C 42 59 29 B2 C2 28 37 31 |2:BM%(T,BY)..(71|
00000640: 37 33 AA 28 54 AB 31 29 AC 34 AA 42 59 29 3A 82 |73.(T.1).4.BY):.|
00000650: 3A 82 00 82 0E 73 00 46 49 B2 31 3A 42 B2 32 38 |:....s.FI.1:B.28|
00000660: 3A 54 4C B2 31 3A 53 4C B2 30 3A 81 54 B2 31 A4 |:TL.1:SL.0:.T.1.|
00000670: 33 35 3A 8B 54 B3 31 38 A7 4D B2 32 30 3A 89 31 |35:.T.18.M.20:.1|
00000680: 32 39 00 96 0E 7C 00 8B 54 B3 32 35 A7 4D B2 31 |29...|..T.25.M.1|
00000690: 38 3A 89 31 32 39 00 AA 0E 7E 00 8B 54 B3 33 31 |8:.129...~..T.31|
000006A0: A7 4D B2 31 37 3A 89 31 32 39 00 B3 0E 80 00 4D |.M.17:.129.....M|
000006B0: B2 31 36 00 C1 0E 81 00 8B 51 43 B2 30 89 31 33 |.16......QC.0.13|
000006C0: 31 00 F9 0E 82 00 8B 42 4D 25 28 54 2C 30 29 B2 |1......BM%(T,0).|
000006D0: 32 35 35 AF 42 4D 25 28 54 2C 31 29 B2 32 35 35 |255.BM%(T,1).255|
000006E0: AF 42 4D 25 28 54 2C 32 29 B2 4D 41 25 28 4D AB |.BM%(T,2).MA%(M.|
000006F0: 31 35 29 AB 31 89 32 31 31 00 0E 0F 83 00 81 53 |15).1.211......S|
00000700: B2 30 A4 4D 3A 8B 51 43 B2 30 89 31 33 35 00 31 |.0.M:.QC.0.135.1|
00000710: 0F 85 00 8B 28 4D 41 25 28 53 29 AF 42 4D 25 28 |....(MA%(S).BM%(|
00000720: 54 2C B5 28 53 AD 38 29 29 29 B3 B1 30 89 32 31 |T,.(S.8)))..0.21|
00000730: 30 00 70 0F 87 00 99 43 4E 24 28 54 29 22 1D 1D |0.p....CN$(T)"..|
00000740: 1D 1D 1D 1D 1D 1D 1D 22 43 4E 24 28 53 29 22 9D |......."CN$(S)".|
00000750: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 3A 98 |............";:.|
00000760: 31 35 2C 22 55 31 3A 22 32 3B 44 53 3B 54 3B 53 |15,"U1:"2;DS;T;S|
00000770: 00 92 0F 88 00 84 31 35 2C 45 4E 2C 45 4D 24 2C |......15,EN,EM$,|
00000780: 45 54 2C 45 53 3A 8B 45 4E B3 B1 30 A7 89 32 30 |ET,ES:.EN..0..20|
00000790: 31 30 00 C4 0F 96 00 97 38 35 39 2C 42 3A 97 38 |10......859,B:.8|
000007A0: 36 39 2C 54 AB 31 3A 97 38 37 33 2C 53 3A 42 B2 |69,T.1:.873,S:B.|
000007B0: 42 AA 31 3A 9E 38 32 38 3A 8B 42 B3 B2 32 35 35 |B.1:.828:.B..255|
000007C0: 89 32 31 30 00 D8 0F B4 00 8D 33 30 30 3A 8B 54 |.210......300:.T|
000007D0: 4C B2 33 36 89 32 31 30 00 ED 0F BE 00 8B 53 44 |L.36.210......SD|
000007E0: B2 31 A7 53 45 B2 31 3A 8D 33 30 30 30 00 07 10 |.1.SE.1:.3000...|
000007F0: C8 00 9F 31 35 2C 55 53 2C 31 35 3A 9F 32 2C 55 |...15,US,15:.2,U|
00000800: 53 2C 32 2C 22 23 22 00 3E 10 CD 00 99 C8 28 59 |S,2,"#".>.....(Y|
00000810: 24 2C 31 38 29 3B C8 28 58 24 2C 31 30 29 3B 22 |$,18);.(X$,10);"|
00000820: 20 20 20 20 20 20 52 45 41 44 49 4E 47 20 20 20 | READING |
00000830: 11 11 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 00 6D |............";.m|
00000840: 10 CE 00 99 43 4E 24 28 54 4C 29 22 1D 1D 1D 1D |....CN$(TL)"....|
00000850: 1D 1D 1D 1D 1D 22 43 4E 24 28 53 4C 29 22 9D 9D |....."CN$(SL)"..|
00000860: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 00 73 10 |...........";.s.|
00000870: D2 00 82 00 90 10 D3 00 82 3A 8B 54 4C B3 B1 33 |.........:.TL..3|
00000880: 36 A7 54 B2 33 35 3A 53 B2 31 36 3A 8D 33 30 30 |6.T.35:S.16:.300|
00000890: 00 B5 10 FA 00 9F 31 35 2C 55 54 2C 31 35 3A 98 |......15,UT,15:.|
000008A0: 31 35 2C 22 49 22 C4 28 44 54 29 3A 8D 32 30 30 |15,"I".(DT):.200|
000008B0: 30 3A A0 31 35 00 E5 10 FF 00 99 C8 28 59 24 2C |0:.15.......(Y$,|
000008C0: 32 33 29 3B 22 20 20 20 20 20 20 20 20 20 20 41 |23);" A|
000008D0: 4E 4F 54 48 45 52 20 43 4F 50 59 20 28 59 2F 4E |NOTHER COPY (Y/N|
000008E0: 29 20 59 22 3B 00 15 11 23 01 59 B2 32 33 3A 58 |) Y";...#.Y.23:X|
000008F0: B2 33 30 3A 44 24 B2 22 59 22 3A 8D 31 30 30 30 |.30:D$."Y":.1000|
00000900: 3A 8B 49 24 B3 B1 22 59 22 AF 49 24 B3 B1 22 4E |:.I$.."Y".I$.."N|
00000910: 22 89 32 39 31 00 50 11 25 01 99 C8 28 59 24 2C |".291.P.%...(Y$,|
00000920: 32 33 29 3B 22 20 20 20 20 20 20 20 20 20 20 20 |23);" |
00000930: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000940: 20 20 20 22 3B 3A 8B 49 24 B2 22 59 22 89 39 30 | ";:.I$."Y".90|
00000950: 00 5D 11 27 01 99 22 93 22 3A A2 3A 80 00 79 11 |.].'..".":.:..y.|
00000960: 2C 01 A0 32 3A A0 31 35 3A 8B 53 44 B2 31 A7 53 |,..2:.15:.SD.1.S|
00000970: 45 B2 32 3A 8D 33 30 30 30 00 91 11 36 01 9F 31 |E.2:.3000...6..1|
00000980: 35 2C 55 54 2C 31 35 3A 8B 46 49 B2 30 89 33 32 |5,UT,15:.FI.0.32|
00000990: 30 00 AE 11 3A 01 8B 53 44 B2 30 A7 98 31 35 2C |0...:..SD.0..15,|
000009A0: 22 49 22 C4 28 44 54 29 3A 8D 32 30 30 30 00 BC |"I".(DT):.2000..|
000009B0: 11 3B 01 8B 46 4F B2 30 89 33 31 39 00 F9 11 3C |.;..FO.0.319...<|
000009C0: 01 99 C8 28 59 24 2C 31 38 29 3B C8 28 58 24 2C |...(Y$,18);.(X$,|
000009D0: 31 30 29 3B 22 20 20 20 20 46 4F 52 4D 41 54 54 |10);" FORMATT|
000009E0: 49 4E 47 20 20 20 20 20 11 11 9D 9D 9D 9D 9D 9D |ING ........|
000009F0: 9D 9D 9D 9D 9D 9D 9D 22 3B 00 34 12 3D 01 99 22 |.......";.4.=.."|
00000A00: 30 30 1D 1D 1D 1D 1D 1D 1D 1D 1D 30 30 9D 9D 9D |00.........00...|
00000A10: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 3A 98 31 35 |..........";:.15|
00000A20: 2C 22 4E 22 C4 28 44 54 29 22 3A 43 4F 50 59 2C |,"N".(DT)":COPY,|
00000A30: 22 49 44 24 00 3E 12 3E 01 8D 32 30 30 30 00 47 |"ID$.>.>..2000.G|
00000A40: 12 3F 01 46 49 B2 30 00 5C 12 40 01 9F 32 2C 55 |.?.FI.0.\.@..2,U|
00000A50: 54 2C 32 2C 22 23 22 3A 42 B2 32 38 00 99 12 41 |T,2,"#":B.28...A|
00000A60: 01 99 C8 28 59 24 2C 31 38 29 3B C8 28 58 24 2C |...(Y$,18);.(X$,|
00000A70: 31 30 29 3B 22 20 20 20 20 20 20 57 52 49 54 49 |10);" WRITI|
00000A80: 4E 47 20 20 20 20 20 20 11 11 9D 9D 9D 9D 9D 9D |NG ........|
00000A90: 9D 9D 9D 9D 9D 9D 9D 22 3B 00 C8 12 42 01 99 43 |.......";...B..C|
00000AA0: 4E 24 28 54 4C 29 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |N$(TL)".........|
00000AB0: 22 43 4E 24 28 53 4C 29 22 9D 9D 9D 9D 9D 9D 9D |"CN$(SL)".......|
00000AC0: 9D 9D 9D 9D 9D 9D 22 3B 00 E6 12 43 01 81 54 57 |......";...C..TW|
00000AD0: B2 54 4C A4 54 3A 8B 54 57 B3 31 38 A7 4D B2 32 |.TL.T:.TW.18.M.2|
00000AE0: 30 3A 89 33 34 30 00 FB 12 4E 01 8B 54 57 B3 32 |0:.340...N..TW.2|
00000AF0: 35 A7 4D B2 31 38 3A 89 33 34 30 00 10 13 50 01 |5.M.18:.340...P.|
00000B00: 8B 54 57 B3 33 31 A7 4D B2 31 37 3A 89 33 34 30 |.TW.31.M.17:.340|
00000B10: 00 19 13 52 01 4D B2 31 36 00 27 13 54 01 8B 51 |...R.M.16.'.T..Q|
00000B20: 43 B2 30 89 33 34 33 00 68 13 55 01 8B 54 57 B3 |C.0.343.h.U..TW.|
00000B30: B1 54 AF 42 4D 25 28 54 57 2C 30 29 B2 32 35 35 |.T.BM%(TW,0).255|
00000B40: AF 42 4D 25 28 54 57 2C 31 29 B2 32 35 35 AF 42 |.BM%(TW,1).255.B|
00000B50: 4D 25 28 54 57 2C 32 29 B2 4D 41 25 28 4D AB 31 |M%(TW,2).MA%(M.1|
00000B60: 35 29 AB 31 89 34 30 31 00 86 13 57 01 81 53 57 |5).1.401...W..SW|
00000B70: B2 30 A4 4D 3A 8B 54 57 B2 54 4C AF 53 57 B2 30 |.0.M:.TW.TL.SW.0|
00000B80: A7 53 57 B2 53 4C 00 94 13 5A 01 8B 51 43 B2 30 |.SW.SL...Z..QC.0|
00000B90: 89 33 35 30 00 BA 13 5C 01 8B 28 4D 41 25 28 53 |.350...\..(MA%(S|
00000BA0: 57 29 AF 42 4D 25 28 54 57 2C B5 28 53 57 AD 38 |W).BM%(TW,.(SW.8|
00000BB0: 29 29 29 B3 B1 30 89 33 39 35 00 F7 13 5E 01 99 |)))..0.395...^..|
00000BC0: 43 4E 24 28 54 57 29 22 1D 1D 1D 1D 1D 1D 1D 1D |CN$(TW)"........|
00000BD0: 1D 22 43 4E 24 28 53 57 29 22 9D 9D 9D 9D 9D 9D |."CN$(SW)"......|
00000BE0: 9D 9D 9D 9D 9D 9D 9D 22 3B 3A 98 31 35 2C 22 42 |.......";:.15,"B|
00000BF0: 2D 50 3A 22 32 3B 30 00 33 14 5F 01 97 39 34 35 |-P:"2;0.3._..945|
00000C00: 2C 42 3A 97 38 36 39 2C 54 57 AB 31 3A 97 38 37 |,B:.869,TW.1:.87|
00000C10: 33 2C 53 57 3A 42 B2 42 AA 31 3A 9E 38 33 31 3A |3,SW:B.B.1:.831:|
00000C20: 98 31 35 2C 22 55 32 3A 22 32 3B 44 54 3B 54 57 |.15,"U2:"2;DT;TW|
00000C30: 3B 53 57 00 55 14 60 01 84 31 35 2C 45 4E 2C 45 |;SW.U.`..15,EN,E|
00000C40: 4D 24 2C 45 54 2C 45 53 3A 8B 45 4E B3 B1 30 A7 |M$,ET,ES:.EN..0.|
00000C50: 89 32 30 31 30 00 68 14 8B 01 8B 54 57 B2 54 AF |.2010.h....TW.T.|
00000C60: 53 57 B2 53 89 34 31 30 00 6E 14 90 01 82 00 74 |SW.S.410.n.....t|
00000C70: 14 91 01 82 00 9E 14 9A 01 A0 32 3A A0 31 35 3A |..........2:.15:|
00000C80: 54 4C B2 54 3A 53 4C B2 53 AA 31 3A 8B 53 4C B1 |TL.T:SL.S.1:.SL.|
00000C90: 4D A7 54 4C B2 54 4C AA 31 3A 53 4C B2 30 00 A9 |M.TL.TL.1:SL.0..|
00000CA0: 14 AE 01 42 B2 32 38 3A 8E 00 C1 14 E8 03 99 C8 |...B.28:........|
00000CB0: 28 59 24 2C 59 29 3B C8 28 58 24 2C 58 AB 31 29 |(Y$,Y);.(X$,X.1)|
00000CC0: 3B 00 EA 14 F2 03 99 22 12 22 44 24 22 92 9D 22 |;......"."D$".."|
00000CD0: 3B 3A 81 49 B2 31 A4 34 30 3A A1 49 24 3A 8B 49 |;:.I.1.40:.I$:.I|
00000CE0: 24 B3 B1 22 22 89 31 30 33 30 00 11 15 FD 03 82 |$.."".1030......|
00000CF0: 3A 99 44 24 22 9D 22 3B 3A 81 49 B2 31 A4 34 30 |:.D$".";:.I.1.40|
00000D00: 3A A1 49 24 3A 8B 49 24 B3 B1 22 22 89 31 30 33 |:.I$:.I$.."".103|
00000D10: 30 00 1D 15 01 04 82 3A 89 31 30 31 30 00 31 15 |0......:.1010.1.|
00000D20: 06 04 8B 49 24 B2 C7 28 31 33 29 A7 49 24 B2 44 |...I$..(13).I$.D|
00000D30: 24 00 3C 15 10 04 99 49 24 3B 3A 8E 00 59 15 D0 |$.<....I$;:..Y..|
00000D40: 07 84 31 35 2C 45 4E 2C 45 4D 24 2C 45 54 2C 45 |..15,EN,EM$,ET,E|
00000D50: 53 3A 8B 45 4E B2 30 A7 8E 00 95 15 DA 07 99 C8 |S:.EN.0.........|
00000D60: 28 59 24 2C 32 33 29 3B 22 20 12 44 49 53 4B 20 |(Y$,23);" .DISK |
00000D70: 45 52 52 4F 52 92 22 45 4E 22 2C 20 22 45 4D 24 |ERROR."EN", "EM$|
00000D80: 22 20 2C 22 45 54 22 2C 22 45 53 3B 3A A0 32 3A |" ,"ET","ES;:.2:|
00000D90: A0 31 35 3A 80 00 D2 15 B8 0B 8B 53 45 B2 31 A7 |.15:.......SE.1.|
00000DA0: 99 C8 28 59 24 2C 32 33 29 3B 22 20 20 49 4E 53 |..(Y$,23);" INS|
00000DB0: 45 52 54 20 53 4F 55 52 43 45 20 44 49 53 4B 20 |ERT SOURCE DISK |
00000DC0: 41 4E 44 20 50 52 45 53 53 20 52 45 54 55 52 4E |AND PRESS RETURN|
00000DD0: 22 3B 00 0F 16 C2 0B 8B 53 45 B2 32 A7 99 C8 28 |";......SE.2...(|
00000DE0: 59 24 2C 32 33 29 3B 22 20 20 49 4E 53 45 52 54 |Y$,23);" INSERT|
00000DF0: 20 54 41 52 47 45 54 20 44 49 53 4B 20 41 4E 44 | TARGET DISK AND|
00000E00: 20 50 52 45 53 53 20 52 45 54 55 52 4E 22 3B 00 | PRESS RETURN";.|
00000E10: 4C 16 CC 0B 8B 53 45 B2 33 A7 99 C8 28 59 24 2C |L....SE.3...(Y$,|
00000E20: 32 33 29 3B 22 20 49 4E 53 45 52 54 20 53 4F 55 |23);" INSERT SOU|
00000E30: 52 43 45 20 26 20 54 41 52 47 45 54 2C 20 50 52 |RCE & TARGET, PR|
00000E40: 45 53 53 20 52 45 54 55 52 4E 22 3B 00 79 16 D6 |ESS RETURN";.y..|
00000E50: 0B 59 B2 32 33 3A 58 B2 33 39 3A 44 24 B2 22 20 |.Y.23:X.39:D$." |
00000E60: 22 3A A1 49 24 3A 8D 31 30 30 30 3A 8B 49 24 B3 |":.I$:.1000:.I$.|
00000E70: B1 22 20 22 89 33 30 33 30 00 B2 16 EA 0B 99 C8 |." ".3030.......|
00000E80: 28 59 24 2C 32 33 29 3B 22 20 20 20 20 20 20 20 |(Y$,23);" |
00000E90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000EA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3B | ";|
00000EB0: 3A 8E 00 00 00 00 |:..... |
.......SR.1.30.&....55,0:.56,28:.:.".".]
...B$." .
.":.B$......" . Q U I C K C
O P Y V1.0 .":.B$.G...." . CO
PYRIGHT (C) 1983 BY H.GERLOFF .":.B$.
....." . AN INTEGRATED SYSTEMS PRODUC
T .":.B$.....B$."":SR.1:."QCOP",8,1.
J....BM%(35,2),MA%(20),CN$(35):.15,8,15:
.2,8,2,"#".L....15,"U1:"2;0;18;0:.960: 2
: 15...#.Y$.".........................".
..$.X$."................................
......."...%..S.0.20:MA%(S).2.(S..(S.8).
8)......:.I.0.35:CN$(I).I("0".J(D(I),2),
2):..8.2..".. .SOURCE. DEVICE 8
DRIVE 0".B.3.." .TARGET. DEVICE 8
DRIVE 0"...4..". NORMAL OR UTILITY
COPY (N/U) N"...5.." FORMAT TARGE
T DISK (Y/N) Y":....6.." ........
..............."...7.." B PARAM
ETER INPUT B"...8.." B
B".U.9.." B TRACK 00,
SECTOR 00 B".|.:.." ............
..........."...F.Y.11:X.23:D$."8":.I$:.1
000:.I$."0".I$."9".70...H.US.E(I$)...K.X
.32:D$."0":.1000:.I$."0".I$."1".75...M.D
S.E(I$)...P.Y.12:X.23:D$."8":.1000:.I$."
0".I$."9".80.).R.UT.E(I$).Q.U.X.32:D$."0
":.1000:.I$."0".I$."1".85.W.W.DT.E(I$):S
D.1:.US..UT.DS..DT.SD.0...Z.Y.14:X.35:D$
."N":.1000:.I$.."N".I$.."U".90...\.QC.1:
.I$."U".QC.0...].Y.15:X.33:D$."Y":.1000:
.I$.."Y".I$.."N".93..._.FO.1:.I$."N".FO.
0...`.SE.1:.SD.0.SE.3.H.A..3000:.15,US,1
5:.15,"I"D(DS):.2000:.2,US,2,"#"...B..H(
Y$,18);H(X$,10);" READING ....
...........";...C..QC.0.FO.0..115.U.H.."
18.........00.............";:.15,"U1:"2;
DS;18;0:.2000...I..859,28:.869,17:.873,0
:.828...J.ID$.G(B(7330)).G(B(7331)):.QC.
0.115.R.M..T.1.35:.BY.0.2:BM%(T,BY).B(71
73.(T.1).4.BY):.:....S.FI.1:B.28:TL.1:SL
.0:.T.1.35:.T.18.M.20:.129...|..T.25.M.1
8:.129...~..T.31.M.17:.129.....M.16.A...
.QC.0.131......BM%(T,0).255.BM%(T,1).255
.BM%(T,2).MA%(M.15).1.211......S.0.M:.QC
.0.135.1....(MA%(S).BM%(T,.(S.8)))..0.21
0.P....CN$(T)"........."CN$(S)".........
....";:.15,"U1:"2;DS;T;S......15,EN,EM$,
ET,ES:.EN..0..2010.D....859,B:.869,T.1:.
873,S:B.B.1:.828:.B..255.210.X....300:.T
L.36.210......SD.1.SE.1:.3000...H..15,US
,15:.2,US,2,"#".>.M..H(Y$,18);H(X$,10);"
READING ............";.M.N..CN$(
TL)"........."CN$(SL)".............";.S.
R.....S..:.TL..36.T.35:S.16:.300......15
,UT,15:.15,"I"D(DT):.2000: 15......H(Y$,
23);" ANOTHER COPY (Y/N) Y";...
#.Y.23:X.30:D$."Y":.1000:.I$.."Y".I$.."N
".291.P.%..H(Y$,23);"
";:.I$."Y".90.].'..".":.:..Y.
,. 2: 15:.SD.1.SE.2:.3000...6..15,UT,15:
.FI.0.320...:..SD.0..15,"I"D(DT):.2000..
.;..FO.0.319...<..H(Y$,18);H(X$,10);"
FORMATTING ...............";.4.=.."
00.........00.............";:.15,"N"D(DT
)":COPY,"ID$.>.>..2000.G.?.FI.0.\.@..2,U
T,2,"#":B.28...A..H(Y$,18);H(X$,10);"
WRITING ...............";.H.B..C
N$(TL)"........."CN$(SL)".............";
...C..TW.TL.T:.TW.18.M.20:.340...N..TW.2
5.M.18:.340...P..TW.31.M.17:.340...R.M.1
6.'.T..QC.0.343.H.U..TW..T.BM%(TW,0).255
.BM%(TW,1).255.BM%(TW,2).MA%(M.15).1.401
...W..SW.0.M:.TW.TL.SW.0.SW.SL...Z..QC.0
.350...\..(MA%(SW).BM%(TW,.(SW.8)))..0.3
95...^..CN$(TW)"........."CN$(SW)"......
.......";:.15,"B-P:"2;0.3._..945,B:.869,
TW.1:.873,SW:B.B.1:.831:.15,"U2:"2;DT;TW
;SW.U.`..15,EN,EM$,ET,ES:.EN..0..2010.H.
...TW.T.SW.S.410.N.....T......... 2: 15:
TL.T:SL.S.1:.SL.M.TL.TL.1:SL.0.....B.28:
..A....H(Y$,Y);H(X$,X.1);......"."D$".."
;:.I.1.40:.I$:.I$.."".1030......:.D$".";
:.I.1.40:.I$:.I$.."".1030......:.1010.1.
...I$.G(13).I$.D$.<....I$;:..Y.P..15,EN,
EM$,ET,ES:.EN.0.....Z..H(Y$,23);" .DISK
ERROR."EN", "EM$" ,"ET","ES;: 2: 15:..R.
...SE.1..H(Y$,23);" INSERT SOURCE DISK
AND PRESS RETURN";...B..SE.2..H(Y$,23);"
INSERT TARGET DISK AND PRESS RETURN";.
L.L..SE.3..H(Y$,23);" INSERT SOURCE & TA
RGET, PRESS RETURN";.Y.V.Y.23:X.39:D$."
":.I$:.1000:.I$.." ".3030......H(Y$,23);
" ";
:.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL