QC
FILE INFORMATION
FILENAME(S): QC
FILE TYPE(S): PRG
FILE SIZE: 4K
FIRST SEEN: 2025-12-01 02:19:34
APPEARS ON: 1 disk(s)
FILE HASH
e34585e25956b8a8a4a2111dee4d35e0bcebf264a2ea4518961ed287c2f1f477
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 005A | QC | PRG | hedning, Ronny Veberod | 19 | 18 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 07 00 8F 20 13 1F 00 1A 08 08 00 8B |....... ........|
00000010: 20 53 52 B2 31 20 89 20 33 30 00 2E 08 09 00 97 | SR.1 . 30......|
00000020: 20 35 35 2C 30 3A 97 35 36 2C 32 38 3A 9C 00 37 | 55,0:.56,28:..7|
00000030: 08 0A 00 99 22 93 22 00 6A 08 0B 00 42 24 B2 22 |....".".j...B$."|
00000040: 20 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | . |
00000050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000060: 20 20 20 20 20 20 20 20 92 22 00 72 08 0C 00 99 | .".r....|
00000070: 42 24 00 A3 08 0D 00 99 22 20 12 20 20 20 20 20 |B$......" . |
00000080: 20 20 51 20 55 20 49 20 43 20 4B 20 43 20 4F 20 | Q U I C K C O |
00000090: 50 20 59 20 20 56 31 2E 30 20 20 20 20 20 20 20 |P Y V1.0 |
000000A0: 20 92 22 00 AB 08 0E 00 99 42 24 00 DC 08 0F 00 | ."......B$.....|
000000B0: 99 22 20 12 20 20 20 43 4F 50 59 52 49 47 48 54 |." . COPYRIGHT|
000000C0: 20 28 43 29 20 31 39 38 33 20 42 59 20 48 2E 47 | (C) 1983 BY H.G|
000000D0: 45 52 4C 4F 46 46 20 20 20 20 92 22 00 E4 08 11 |ERLOFF ."....|
000000E0: 00 99 42 24 00 15 09 12 00 99 22 20 12 20 20 20 |..B$......" . |
000000F0: 20 41 4E 20 49 4E 54 45 47 52 41 54 45 44 20 53 | AN INTEGRATED S|
00000100: 59 53 54 45 4D 53 20 50 52 4F 44 55 43 54 20 20 |YSTEMS PRODUCT |
00000110: 20 20 20 92 22 00 1D 09 14 00 99 42 24 00 27 09 | ."......B$.'.|
00000120: 15 00 42 24 B2 22 22 00 3D 09 19 00 53 52 B2 31 |..B$."".=...SR.1|
00000130: 3A 93 20 22 51 43 4F 50 22 2C 38 2C 31 00 5D 09 |:. "QCOP",8,1.].|
00000140: 1E 00 86 20 42 4D 25 28 33 35 2C 32 29 2C 4D 41 |... BM%(35,2),MA|
00000150: 25 28 32 30 29 2C 43 4E 24 28 33 35 29 00 69 09 |%(20),CN$(35).i.|
00000160: 23 00 97 38 32 39 2C 36 36 00 8C 09 28 00 59 24 |#..829,66...(.Y$|
00000170: B2 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 |."..............|
00000180: 11 11 11 11 11 11 11 11 11 11 11 22 00 BD 09 29 |..........."...)|
00000190: 00 58 24 B2 22 1D 1D 1D 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 22 00 CA 09 |............"...|
000001C0: 2C 00 81 20 53 B2 30 A4 32 30 00 E4 09 2D 00 4D |,.. S.0.20...-.M|
000001D0: 41 25 28 53 29 B2 32 AE 28 53 AB B5 28 53 AD 38 |A%(S).2.(S..(S.8|
000001E0: 29 AC 38 29 00 EA 09 2E 00 82 00 F7 09 2F 00 81 |).8)........./..|
000001F0: 20 49 B2 30 A4 33 35 00 15 0A 30 00 43 4E 24 28 | I.0.35...0.CN$(|
00000200: 49 29 B2 C9 28 22 30 22 AA CA 28 C4 28 49 29 2C |I)..("0"..(.(I),|
00000210: 32 29 2C 32 29 00 1B 0A 31 00 82 00 47 0A 32 00 |2),2)...1...G.2.|
00000220: 99 22 11 11 20 20 20 20 20 20 20 12 53 4F 55 52 |.".. .SOUR|
00000230: 43 45 92 20 20 44 45 56 49 43 45 20 38 20 20 44 |CE. DEVICE 8 D|
00000240: 52 49 56 45 20 30 22 00 71 0A 34 00 99 22 20 20 |RIVE 0".q.4.." |
00000250: 20 20 20 20 20 12 54 41 52 47 45 54 92 20 20 44 | .TARGET. D|
00000260: 45 56 49 43 45 20 38 20 20 44 52 49 56 45 20 30 |EVICE 8 DRIVE 0|
00000270: 22 00 9D 0A 36 00 99 22 11 20 20 20 20 20 4E 4F |"...6..". NO|
00000280: 52 4D 41 4C 20 4F 52 20 55 54 49 4C 49 54 59 20 |RMAL OR UTILITY |
00000290: 43 4F 50 59 20 28 4E 2F 55 29 20 4E 22 00 C6 0A |COPY (N/U) N"...|
000002A0: 37 00 99 22 20 20 20 20 20 20 20 46 4F 52 4D 41 |7.." FORMA|
000002B0: 54 20 54 41 52 47 45 54 20 44 49 53 4B 20 28 59 |T TARGET DISK (Y|
000002C0: 2F 4E 29 20 59 22 00 CC 0A 38 00 99 00 EE 0A 3A |/N) Y"...8.....:|
000002D0: 00 99 A3 38 29 22 B0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |...8)"..........|
000002E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 22 00 10 |............."..|
000002F0: 0B 3C 00 99 A3 38 29 22 C2 20 20 20 50 41 52 41 |.<...8)". PARA|
00000300: 4D 45 54 45 52 20 49 4E 50 55 54 20 20 20 C2 22 |METER INPUT ."|
00000310: 00 32 0B 3E 00 99 A3 38 29 22 C2 20 20 20 20 20 |.2.>...8)". |
00000320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000330: C2 22 00 54 0B 40 00 99 A3 38 29 22 C2 20 54 52 |.".T.@...8)". TR|
00000340: 41 43 4B 20 30 30 2C 20 53 45 43 54 4F 52 20 30 |ACK 00, SECTOR 0|
00000350: 30 20 C2 22 00 76 0B 42 00 99 A3 38 29 22 AD C0 |0 .".v.B...8)"..|
00000360: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000370: C0 C0 C0 C0 BD 22 00 96 0B 46 00 59 B2 31 31 3A |....."...F.Y.11:|
00000380: 58 B2 32 33 3A 44 24 B2 22 38 22 3A A1 49 24 3A |X.23:D$."8":.I$:|
00000390: 8D 20 31 30 30 30 00 B0 0B 47 00 8B 20 49 24 B3 |. 1000...G.. I$.|
000003A0: 22 30 22 B0 20 49 24 B1 22 39 22 20 89 20 37 30 |"0". I$."9" . 70|
000003B0: 00 BD 0B 48 00 55 53 B2 C5 28 49 24 29 00 D3 0B |...H.US..(I$)...|
000003C0: 4B 00 58 B2 33 32 3A 44 24 B2 22 30 22 3A 8D 31 |K.X.32:D$."0":.1|
000003D0: 30 30 30 00 EA 0B 4C 00 8B 20 49 24 B3 22 30 22 |000...L.. I$."0"|
000003E0: B0 49 24 B1 22 31 22 89 37 35 00 F7 0B 4D 00 44 |.I$."1".75...M.D|
000003F0: 53 B2 C5 28 49 24 29 00 13 0C 50 00 59 B2 31 32 |S..(I$)...P.Y.12|
00000400: 3A 58 B2 32 33 3A 44 24 B2 22 38 22 3A 8D 20 31 |:X.23:D$."8":. 1|
00000410: 30 30 30 00 2A 0C 51 00 8B 20 49 24 B3 22 30 22 |000.*.Q.. I$."0"|
00000420: B0 49 24 B1 22 39 22 89 38 30 00 37 0C 52 00 55 |.I$."9".80.7.R.U|
00000430: 54 B2 C5 28 49 24 29 00 4D 0C 55 00 58 B2 33 32 |T..(I$).M.U.X.32|
00000440: 3A 44 24 B2 22 30 22 3A 8D 31 30 30 30 00 64 0C |:D$."0":.1000.d.|
00000450: 56 00 8B 49 24 B3 22 30 22 B0 49 24 B1 22 31 22 |V..I$."0".I$."1"|
00000460: 20 89 38 35 00 71 0C 57 00 44 54 B2 C5 28 49 24 | .85.q.W.DT..(I$|
00000470: 29 00 93 0C 58 00 53 44 B2 31 3A 8B 20 55 53 B3 |)...X.SD.1:. US.|
00000480: B1 55 54 20 B0 20 44 53 B3 B1 44 54 20 A7 20 53 |.UT . DS..DT . S|
00000490: 44 B2 30 00 AE 0C 5A 00 59 B2 31 34 3A 58 B2 33 |D.0...Z.Y.14:X.3|
000004A0: 35 3A 44 24 B2 22 4E 22 3A 8D 31 30 30 30 00 CA |5:D$."N":.1000..|
000004B0: 0C 5B 00 8B 20 49 24 B3 B1 22 4E 22 20 AF 20 49 |.[.. I$.."N" . I|
000004C0: 24 B3 B1 22 55 22 20 89 39 30 00 E3 0C 5C 00 51 |$.."U" .90...\.Q|
000004D0: 43 B2 31 3A 8B 20 49 24 B2 22 55 22 20 A7 20 51 |C.1:. I$."U" . Q|
000004E0: 43 B2 30 00 FE 0C 5D 00 59 B2 31 35 3A 58 B2 33 |C.0...].Y.15:X.3|
000004F0: 33 3A 44 24 B2 22 59 22 3A 8D 31 30 30 30 00 1B |3:D$."Y":.1000..|
00000500: 0D 5E 00 8B 20 49 24 B3 B1 22 59 22 20 AF 20 49 |.^.. I$.."Y" . I|
00000510: 24 B3 B1 22 4E 22 20 89 20 39 33 00 34 0D 5F 00 |$.."N" . 93.4._.|
00000520: 46 4F B2 31 3A 8B 20 49 24 B2 22 4E 22 20 A7 20 |FO.1:. I$."N" . |
00000530: 46 4F B2 30 00 4B 0D 60 00 53 45 B2 31 3A 8B 20 |FO.0.K.`.SE.1:. |
00000540: 53 44 B2 30 20 A7 20 53 45 B2 33 00 56 0D 61 00 |SD.0 . SE.3.V.a.|
00000550: 8D 20 33 30 30 30 00 86 0D 65 00 9F 20 31 35 2C |. 3000...e.. 15,|
00000560: 55 53 2C 31 35 3A 98 31 35 2C 22 49 22 C4 28 44 |US,15:.15,"I".(D|
00000570: 53 29 3A 8D 20 32 30 30 30 3A 9F 20 32 2C 55 53 |S):. 2000:. 2,US|
00000580: 2C 32 2C 22 23 22 00 C3 0D 66 00 99 C8 28 59 24 |,2,"#"...f...(Y$|
00000590: 2C 31 38 29 3B C8 28 58 24 2C 31 30 29 3B 22 20 |,18);.(X$,10);" |
000005A0: 20 20 20 20 20 52 45 41 44 49 4E 47 20 20 20 20 | READING |
000005B0: 20 20 11 11 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D | ..............|
000005C0: 9D 22 3B 00 DB 0D 67 00 8B 20 51 43 B2 30 20 AF |.";...g.. QC.0 .|
000005D0: 20 46 4F B2 30 20 89 20 31 31 35 00 FE 0D 68 00 | FO.0 . 115...h.|
000005E0: 99 22 31 38 1D 1D 1D 1D 1D 1D 1D 1D 1D 30 30 9D |."18.........00.|
000005F0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 00 1C |............";..|
00000600: 0E 69 00 98 31 35 2C 22 55 31 3A 22 32 3B 44 53 |.i..15,"U1:"2;DS|
00000610: 3B 31 38 3B 30 3A 8D 20 32 30 30 30 00 3C 0E 6A |;18;0:. 2000.<.j|
00000620: 00 97 38 35 39 2C 32 38 3A 97 38 36 39 2C 31 37 |..859,28:.869,17|
00000630: 3A 97 38 37 33 2C 30 3A 9E 38 32 38 00 5A 0E 6B |:.873,0:.828.Z.k|
00000640: 00 49 44 24 B2 C7 28 C2 28 37 33 33 30 29 29 AA |.ID$..(.(7330)).|
00000650: C7 28 C2 28 37 33 33 31 29 29 00 6B 0E 6C 00 8B |.(.(7331)).k.l..|
00000660: 20 51 43 B2 30 20 89 20 31 31 35 00 78 0E 6D 00 | QC.0 . 115.x.m.|
00000670: 81 20 54 B2 31 A4 33 35 00 84 0E 6E 00 81 42 59 |. T.1.35...n..BY|
00000680: B2 30 A4 32 00 A5 0E 6F 00 42 4D 25 28 54 2C 42 |.0.2...o.BM%(T,B|
00000690: 59 29 B2 C2 28 37 31 37 33 AA 28 54 AB 31 29 AC |Y)..(7173.(T.1).|
000006A0: 34 AA 42 59 29 00 AD 0E 70 00 82 3A 82 00 B6 0E |4.BY)...p..:....|
000006B0: 73 00 46 49 B2 31 00 BF 0E 74 00 42 B2 32 38 00 |s.FI.1...t.B.28.|
000006C0: CD 0E 75 00 54 4C B2 31 3A 53 4C B2 30 00 DA 0E |..u.TL.1:SL.0...|
000006D0: 78 00 81 20 54 B2 31 A4 33 35 00 EF 0E 7A 00 8B |x.. T.1.35...z..|
000006E0: 20 54 B3 31 38 A7 4D B2 32 30 3A 89 31 32 39 00 | T.18.M.20:.129.|
000006F0: 04 0F 7C 00 8B 20 54 B3 32 35 A7 4D B2 31 38 3A |..|.. T.25.M.18:|
00000700: 89 31 32 39 00 19 0F 7E 00 8B 20 54 B3 33 31 A7 |.129...~.. T.31.|
00000710: 4D B2 31 37 3A 89 31 32 39 00 22 0F 80 00 4D B2 |M.17:.129."...M.|
00000720: 31 36 00 33 0F 81 00 8B 20 51 43 B2 30 20 89 20 |16.3.... QC.0 . |
00000730: 31 33 31 00 72 0F 82 00 8B 20 42 4D 25 28 54 2C |131.r.... BM%(T,|
00000740: 30 29 B2 32 35 35 20 AF 20 42 4D 25 28 54 2C 31 |0).255 . BM%(T,1|
00000750: 29 B2 32 35 35 20 AF 20 42 4D 25 28 54 2C 32 29 |).255 . BM%(T,2)|
00000760: B2 4D 41 25 28 4D AB 31 35 29 AB 31 20 89 20 32 |.MA%(M.15).1 . 2|
00000770: 31 31 00 7F 0F 83 00 81 20 53 B2 30 A4 20 4D 00 |11...... S.0. M.|
00000780: 90 0F 84 00 8B 20 51 43 B2 30 20 89 20 31 33 35 |..... QC.0 . 135|
00000790: 00 B6 0F 85 00 8B 28 4D 41 25 28 53 29 20 AF 20 |......(MA%(S) . |
000007A0: 42 4D 25 28 54 2C B5 28 53 AD 38 29 29 29 B3 B1 |BM%(T,.(S.8)))..|
000007B0: 30 20 89 32 31 30 00 E4 0F 87 00 99 20 43 4E 24 |0 .210...... CN$|
000007C0: 28 54 29 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 43 4E |(T)"........."CN|
000007D0: 24 28 53 29 22 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |$(S)"...........|
000007E0: 9D 9D 22 3B 00 FA 0F 8C 00 98 31 35 2C 22 55 31 |..";......15,"U1|
000007F0: 3A 22 32 3B 44 53 3B 54 3B 53 00 20 10 91 00 84 |:"2;DS;T;S. ....|
00000800: 31 35 2C 45 4E 2C 45 4D 24 2C 45 54 2C 45 53 3A |15,EN,EM$,ET,ES:|
00000810: 8B 20 45 4E B3 B1 30 20 A7 20 89 20 32 30 31 30 |. EN..0 . . 2010|
00000820: 00 3B 10 96 00 97 38 35 39 2C 42 3A 97 38 36 39 |.;....859,B:.869|
00000830: 2C 54 AB 31 3A 97 38 37 33 2C 53 00 45 10 9B 00 |,T.1:.873,S.E...|
00000840: 42 B2 42 AA 31 00 4F 10 A0 00 9E 20 38 32 38 00 |B.B.1.O.... 828.|
00000850: 62 10 AA 00 8B 20 42 B3 B2 32 35 35 20 89 20 32 |b.... B..255 . 2|
00000860: 31 30 00 7B 10 B4 00 8D 20 33 30 30 20 3A 8B 20 |10.{.... 300 :. |
00000870: 54 4C B2 33 36 20 89 20 32 31 30 00 94 10 BE 00 |TL.36 . 210.....|
00000880: 8B 20 53 44 B2 31 20 A7 20 53 45 B2 31 3A 8D 20 |. SD.1 . SE.1:. |
00000890: 33 30 30 30 00 B0 10 C8 00 9F 20 31 35 2C 55 53 |3000...... 15,US|
000008A0: 2C 31 35 3A 9F 20 32 2C 55 53 2C 32 2C 22 23 22 |,15:. 2,US,2,"#"|
000008B0: 00 ED 10 CD 00 99 C8 28 59 24 2C 31 38 29 3B C8 |.......(Y$,18);.|
000008C0: 28 58 24 2C 31 30 29 3B 22 20 20 20 20 20 20 52 |(X$,10);" R|
000008D0: 45 41 44 49 4E 47 20 20 20 20 20 20 11 11 9D 9D |EADING ....|
000008E0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 00 1D 11 |...........";...|
000008F0: CE 00 99 20 43 4E 24 28 54 4C 29 22 1D 1D 1D 1D |... CN$(TL)"....|
00000900: 1D 1D 1D 1D 1D 22 43 4E 24 28 53 4C 29 22 9D 9D |....."CN$(SL)"..|
00000910: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 00 23 11 |...........";.#.|
00000920: D2 00 82 00 29 11 D3 00 82 00 48 11 DC 00 8B 20 |....).....H.... |
00000930: 54 4C B3 B1 33 36 20 A7 20 54 B2 33 35 3A 53 B2 |TL..36 . T.35:S.|
00000940: 31 36 3A 8D 20 33 30 30 00 70 11 FA 00 9F 20 31 |16:. 300.p.... 1|
00000950: 35 2C 55 54 2C 31 35 3A 98 31 35 2C 22 49 22 C4 |5,UT,15:.15,"I".|
00000960: 28 44 54 29 3A 8D 20 32 30 30 30 3A A0 20 31 35 |(DT):. 2000:. 15|
00000970: 00 A0 11 22 01 99 C8 28 59 24 2C 32 33 29 3B 22 |..."...(Y$,23);"|
00000980: 20 20 20 20 20 20 20 20 20 20 41 4E 4F 54 48 45 | ANOTHE|
00000990: 52 20 43 4F 50 59 20 28 59 2F 4E 29 20 59 22 3B |R COPY (Y/N) Y";|
000009A0: 00 BC 11 23 01 59 B2 32 33 3A 58 B2 33 30 3A 44 |...#.Y.23:X.30:D|
000009B0: 24 B2 22 59 22 3A 8D 20 31 30 30 30 00 DA 11 24 |$."Y":. 1000...$|
000009C0: 01 8B 20 49 24 B3 B1 22 59 22 20 AF 20 49 24 B3 |.. I$.."Y" . I$.|
000009D0: B1 22 4E 22 20 89 20 32 39 31 00 0A 12 25 01 99 |."N" . 291...%..|
000009E0: C8 28 59 24 2C 32 33 29 3B 22 20 20 20 20 20 20 |.(Y$,23);" |
000009F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000A00: 20 20 20 20 20 20 20 20 22 3B 00 1C 12 26 01 8B | ";...&..|
00000A10: 20 49 24 B2 22 59 22 20 89 20 39 30 00 25 12 27 | I$."Y" . 90.%.'|
00000A20: 01 99 22 93 22 00 2B 12 29 01 A2 00 31 12 2A 01 |..".".+.)...1.*.|
00000A30: 80 00 3F 12 2C 01 A0 20 32 3A 20 A0 20 31 35 00 |..?.,.. 2: . 15.|
00000A40: 58 12 31 01 8B 20 53 44 B2 31 20 A7 20 53 45 B2 |X.1.. SD.1 . SE.|
00000A50: 32 3A 8D 20 33 30 30 30 00 67 12 36 01 9F 20 31 |2:. 3000.g.6.. 1|
00000A60: 35 2C 55 54 2C 31 35 00 78 12 38 01 8B 20 46 49 |5,UT,15.x.8.. FI|
00000A70: B2 30 20 89 20 33 32 30 00 99 12 3A 01 8B 20 53 |.0 . 320...:.. S|
00000A80: 44 B2 30 20 A7 20 98 31 35 2C 22 49 22 C4 28 44 |D.0 . .15,"I".(D|
00000A90: 54 29 3A 8D 20 32 30 30 30 00 AA 12 3B 01 8B 20 |T):. 2000...;.. |
00000AA0: 46 4F B2 30 20 89 20 33 31 39 00 E7 12 3C 01 99 |FO.0 . 319...<..|
00000AB0: C8 28 59 24 2C 31 38 29 3B C8 28 58 24 2C 31 30 |.(Y$,18);.(X$,10|
00000AC0: 29 3B 22 20 20 20 20 46 4F 52 4D 41 54 54 49 4E |);" FORMATTIN|
00000AD0: 47 20 20 20 20 20 11 11 9D 9D 9D 9D 9D 9D 9D 9D |G ..........|
00000AE0: 9D 9D 9D 9D 9D 22 3B 00 0A 13 3D 01 99 22 30 30 |.....";...=.."00|
00000AF0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 30 30 9D 9D 9D 9D 9D |.........00.....|
00000B00: 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 00 2D 13 3E 01 98 |........";.-.>..|
00000B10: 31 35 2C 22 4E 22 C4 28 44 54 29 22 3A 43 4F 50 |15,"N".(DT)":COP|
00000B20: 59 2C 22 49 44 24 3A 8D 20 32 30 30 30 00 36 13 |Y,"ID$:. 2000.6.|
00000B30: 3F 01 46 49 B2 30 00 47 13 40 01 9F 20 32 2C 55 |?.FI.0.G.@.. 2,U|
00000B40: 54 2C 32 2C 22 23 22 00 50 13 43 01 42 B2 32 38 |T,2,"#".P.C.B.28|
00000B50: 00 8D 13 45 01 99 C8 28 59 24 2C 31 38 29 3B C8 |...E...(Y$,18);.|
00000B60: 28 58 24 2C 31 30 29 3B 22 20 20 20 20 20 20 57 |(X$,10);" W|
00000B70: 52 49 54 49 4E 47 20 20 20 20 20 20 11 11 9D 9D |RITING ....|
00000B80: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 00 BD 13 |...........";...|
00000B90: 46 01 99 20 43 4E 24 28 54 4C 29 22 1D 1D 1D 1D |F.. CN$(TL)"....|
00000BA0: 1D 1D 1D 1D 1D 22 43 4E 24 28 53 4C 29 22 9D 9D |....."CN$(SL)"..|
00000BB0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 00 CA 13 |...........";...|
00000BC0: 4A 01 81 54 57 B2 54 4C A4 54 00 DF 13 4C 01 8B |J..TW.TL.T...L..|
00000BD0: 54 57 B3 31 38 A7 4D B2 32 30 3A 89 33 34 30 00 |TW.18.M.20:.340.|
00000BE0: F4 13 4E 01 8B 54 57 B3 32 35 A7 4D B2 31 38 3A |..N..TW.25.M.18:|
00000BF0: 89 33 34 30 00 09 14 50 01 8B 54 57 B3 33 31 A7 |.340...P..TW.31.|
00000C00: 4D B2 31 37 3A 89 33 34 30 00 12 14 52 01 4D B2 |M.17:.340...R.M.|
00000C10: 31 36 00 22 14 54 01 8B 51 43 B2 30 20 89 20 33 |16.".T..QC.0 . 3|
00000C20: 34 33 00 6A 14 55 01 8B 54 57 B3 B1 54 20 AF 20 |43.j.U..TW..T . |
00000C30: 42 4D 25 28 54 57 2C 30 29 B2 32 35 35 20 AF 20 |BM%(TW,0).255 . |
00000C40: 42 4D 25 28 54 57 2C 31 29 B2 32 35 35 20 AF 20 |BM%(TW,1).255 . |
00000C50: 42 4D 25 28 54 57 2C 32 29 B2 4D 41 25 28 4D AB |BM%(TW,2).MA%(M.|
00000C60: 31 35 29 AB 31 20 89 34 30 31 00 76 14 57 01 81 |15).1 .401.v.W..|
00000C70: 53 57 B2 30 A4 4D 00 91 14 59 01 8B 20 54 57 B2 |SW.0.M...Y.. TW.|
00000C80: 54 4C 20 AF 20 53 57 B2 30 20 A7 20 53 57 B2 53 |TL . SW.0 . SW.S|
00000C90: 4C 00 A1 14 5A 01 8B 51 43 B2 30 20 89 20 33 35 |L...Z..QC.0 . 35|
00000CA0: 30 00 CA 14 5C 01 8B 28 4D 41 25 28 53 57 29 20 |0...\..(MA%(SW) |
00000CB0: AF 20 42 4D 25 28 54 57 2C B5 28 53 57 AD 38 29 |. BM%(TW,.(SW.8)|
00000CC0: 29 29 B3 B1 30 20 89 33 39 35 00 FA 14 5E 01 99 |))..0 .395...^..|
00000CD0: 20 43 4E 24 28 54 57 29 22 1D 1D 1D 1D 1D 1D 1D | CN$(TW)".......|
00000CE0: 1D 1D 22 43 4E 24 28 53 57 29 22 9D 9D 9D 9D 9D |.."CN$(SW)".....|
00000CF0: 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 00 0C 15 63 01 98 |........";...c..|
00000D00: 31 35 2C 22 42 2D 50 3A 22 32 3B 30 00 29 15 68 |15,"B-P:"2;0.).h|
00000D10: 01 97 39 34 35 2C 42 3A 97 38 36 39 2C 54 57 AB |..945,B:.869,TW.|
00000D20: 31 3A 97 38 37 33 2C 53 57 00 33 15 72 01 42 B2 |1:.873,SW.3.r.B.|
00000D30: 42 AA 31 00 3D 15 7C 01 9E 20 38 33 31 00 55 15 |B.1.=.|.. 831.U.|
00000D40: 86 01 98 31 35 2C 22 55 32 3A 22 32 3B 44 54 3B |...15,"U2:"2;DT;|
00000D50: 54 57 3B 53 57 00 7B 15 87 01 84 31 35 2C 45 4E |TW;SW.{....15,EN|
00000D60: 2C 45 4D 24 2C 45 54 2C 45 53 3A 8B 20 45 4E B3 |,EM$,ET,ES:. EN.|
00000D70: B1 30 20 A7 20 89 20 32 30 31 30 00 93 15 8B 01 |.0 . . 2010.....|
00000D80: 8B 20 54 57 B2 54 20 AF 20 53 57 B2 53 20 89 20 |. TW.T . SW.S . |
00000D90: 34 31 30 00 99 15 90 01 82 00 9F 15 91 01 82 00 |410.............|
00000DA0: AC 15 9A 01 A0 20 32 3A A0 20 31 35 00 BC 15 9F |..... 2:. 15....|
00000DB0: 01 54 4C B2 54 3A 53 4C B2 53 AA 31 00 D6 15 A4 |.TL.T:SL.S.1....|
00000DC0: 01 8B 20 53 4C B1 4D 20 A7 20 54 4C B2 54 4C AA |.. SL.M . TL.TL.|
00000DD0: 31 3A 53 4C B2 30 00 DF 15 AE 01 42 B2 32 38 00 |1:SL.0.....B.28.|
00000DE0: E5 15 F4 01 8E 00 FD 15 E8 03 99 C8 28 59 24 2C |............(Y$,|
00000DF0: 59 29 3B C8 28 58 24 2C 58 AB 31 29 3B 00 0D 16 |Y);.(X$,X.1);...|
00000E00: F2 03 99 22 12 22 44 24 22 92 9D 22 3B 00 2D 16 |..."."D$"..";.-.|
00000E10: FC 03 81 49 B2 31 A4 34 30 3A A1 20 49 24 3A 8B |...I.1.40:. I$:.|
00000E20: 20 49 24 B3 B1 22 22 89 20 31 30 33 30 00 33 16 | I$.."". 1030.3.|
00000E30: FD 03 82 00 3F 16 FE 03 99 44 24 22 9D 22 3B 00 |....?....D$".";.|
00000E40: 5F 16 00 04 81 49 B2 31 A4 34 30 3A A1 20 49 24 |_....I.1.40:. I$|
00000E50: 3A 8B 20 49 24 B3 B1 22 22 89 20 31 30 33 30 00 |:. I$.."". 1030.|
00000E60: 65 16 01 04 82 00 70 16 02 04 89 20 31 30 31 30 |e.....p.... 1010|
00000E70: 00 87 16 06 04 8B 20 49 24 B2 C7 28 31 33 29 20 |...... I$..(13) |
00000E80: A7 20 49 24 B2 44 24 00 90 16 10 04 99 49 24 3B |. I$.D$......I$;|
00000E90: 00 96 16 4C 04 8E 00 B6 16 D0 07 84 31 35 2C 45 |...L........15,E|
00000EA0: 4E 2C 45 4D 24 2C 45 54 2C 45 53 3A 8B 20 45 4E |N,EM$,ET,ES:. EN|
00000EB0: B2 30 20 A7 20 8E 00 EA 16 DA 07 99 20 C8 28 59 |.0 . ....... .(Y|
00000EC0: 24 2C 32 33 29 3B 22 20 12 44 49 53 4B 20 45 52 |$,23);" .DISK ER|
00000ED0: 52 4F 52 92 22 45 4E 22 2C 20 22 45 4D 24 22 20 |ROR."EN", "EM$" |
00000EE0: 2C 22 45 54 22 2C 22 45 53 3B 00 F7 16 E4 07 A0 |,"ET","ES;......|
00000EF0: 20 32 3A A0 20 31 35 00 FD 16 EE 07 80 00 3D 17 | 2:. 15.......=.|
00000F00: B8 0B 8B 20 53 45 B2 31 20 A7 20 99 C8 28 59 24 |... SE.1 . ..(Y$|
00000F10: 2C 32 33 29 3B 22 20 20 49 4E 53 45 52 54 20 53 |,23);" INSERT S|
00000F20: 4F 55 52 43 45 20 44 49 53 4B 20 41 4E 44 20 50 |OURCE DISK AND P|
00000F30: 52 45 53 53 20 52 45 54 55 52 4E 22 3B 00 7D 17 |RESS RETURN";.}.|
00000F40: C2 0B 8B 20 53 45 B2 32 20 A7 20 99 C8 28 59 24 |... SE.2 . ..(Y$|
00000F50: 2C 32 33 29 3B 22 20 20 49 4E 53 45 52 54 20 54 |,23);" INSERT T|
00000F60: 41 52 47 45 54 20 44 49 53 4B 20 41 4E 44 20 50 |ARGET DISK AND P|
00000F70: 52 45 53 53 20 52 45 54 55 52 4E 22 3B 00 BD 17 |RESS RETURN";...|
00000F80: CC 0B 8B 20 53 45 B2 33 20 A7 20 99 C8 28 59 24 |... SE.3 . ..(Y$|
00000F90: 2C 32 33 29 3B 22 20 49 4E 53 45 52 54 20 53 4F |,23);" INSERT SO|
00000FA0: 55 52 43 45 20 26 20 54 41 52 47 45 54 2C 20 50 |URCE & TARGET, P|
00000FB0: 52 45 53 53 20 52 45 54 55 52 4E 22 3B 00 DC 17 |RESS RETURN";...|
00000FC0: D6 0B 59 B2 32 33 3A 58 B2 33 39 3A 44 24 B2 22 |..Y.23:X.39:D$."|
00000FD0: 20 22 3A A1 49 24 3A 8D 31 30 30 30 00 EF 17 E0 | ":.I$:.1000....|
00000FE0: 0B 8B 20 49 24 B3 B1 22 20 22 89 33 30 33 30 00 |.. I$.." ".3030.|
00000FF0: 26 18 EA 0B 99 C8 28 59 24 2C 32 33 29 3B 22 20 |&.....(Y$,23);" |
00001000: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001010: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001020: 20 20 20 20 22 3B 00 2C 18 F4 0B 8E 00 00 00 FF | ";.,........|
00001030: FF 49 00 |.I. |
....... ........ SR.1 . 30...... 55,0:.5
6,28:..7....".".J...B$." .
.".R....B$......
" . Q U I C K C O P Y V1.0
."......B$......" . COPYRIGHT (C) 198
3 BY H.GERLOFF ."......B$......" .
AN INTEGRATED SYSTEMS PRODUCT ."...
...B$.'...B$."".=...SR.1:. "QCOP",8,1.].
... BM%(35,2),MA%(20),CN$(35).I.#..829,6
6...(.Y$."........................."...)
.X$."...................................
....".J.,.. S.0.20...-.MA%(S).2.(S..(S.8
).8)........./.. I.0.35...0.CN$(I).I("0"
.J(D(I),2),2)...1...G.2..".. .SOUR
CE. DEVICE 8 DRIVE 0".Q.4.." .TA
RGET. DEVICE 8 DRIVE 0"...6..". NO
RMAL OR UTILITY COPY (N/U) N".F.7.."
FORMAT TARGET DISK (Y/N) Y".L.8.....:
...8)"......................."...<...8)"
B PARAMETER INPUT B".2.>...8)"B
B".T.@...8)"B TRACK 00,
SECTOR 00 B".V.B...8)"..................
....."...F.Y.11:X.23:D$."8":.I$:. 1000..
.G.. I$."0". I$."9" . 70...H.US.E(I$).S.
K.X.32:D$."0":.1000...L.. I$."0".I$."1".
75...M.DS.E(I$)...P.Y.12:X.23:D$."8":. 1
000.*.Q.. I$."0".I$."9".80.7.R.UT.E(I$).
M.U.X.32:D$."0":.1000.D.V..I$."0".I$."1"
.85.Q.W.DT.E(I$)...X.SD.1:. US..UT . DS
..DT . SD.0...Z.Y.14:X.35:D$."N":.1000.J
.[.. I$.."N" . I$.."U" .90...\.QC.1:. I$
."U" . QC.0...].Y.15:X.33:D$."Y":.1000..
.^.. I$.."Y" . I$.."N" . 93.4._.FO.1:. I
$."N" . FO.0.K.`.SE.1:. SD.0 . SE.3.V.A.
. 3000...E.. 15,US,15:.15,"I"D(DS):. 200
0:. 2,US,2,"#".C.F..H(Y$,18);H(X$,10);"
READING ...............";...G.
. QC.0 . FO.0 . 115...H.."18.........00.
............";...I..15,"U1:"2;DS;18;0:.
2000.<.J..859,28:.869,17:.873,0:.828.Z.K
.ID$.G(B(7330)).G(B(7331)).K.L.. QC.0 .
115.X.M.. T.1.35...N..BY.0.2...O.BM%(T,B
Y).B(7173.(T.1).4.BY)...P..:....S.FI.1..
.T.B.28.M.U.TL.1:SL.0.Z.X.. T.1.35...Z..
T.18.M.20:.129...|.. T.25.M.18:.129...~
.. T.31.M.17:.129."...M.16.3.... QC.0 .
131.R.... BM%(T,0).255 . BM%(T,1).255 .
BM%(T,2).MA%(M.15).1 . 211..... S.0. M.
..... QC.0 . 135......(MA%(S) . BM%(T,.(
S.8)))..0 .210...... CN$(T)"........."CN
$(S)".............";......15,"U1:"2;DS;T
;S. ....15,EN,EM$,ET,ES:. EN..0 . . 2010
.;....859,B:.869,T.1:.873,S.E...B.B.1.O.
.. 828.B.... B..255 . 210.{.... 300 :.
TL.36 . 210...... SD.1 . SE.1:. 3000...H
.. 15,US,15:. 2,US,2,"#"...M..H(Y$,18);H
(X$,10);" READING ............
...";...N.. CN$(TL)"........."CN$(SL)"..
...........";.#.R...).S...H.... TL..36 .
T.35:S.16:. 300.P.... 15,UT,15:.15,"I"D
(DT):. 2000: 15. ."..H(Y$,23);"
ANOTHER COPY (Y/N) Y";...#.Y.23:X.30:D
$."Y":. 1000.Z.$.. I$.."Y" . I$.."N" . 2
91...%..H(Y$,23);"
";...&.. I$."Y" . 90.%.'..".".+.
)...1.*...?.,. 2: 15.X.1.. SD.1 . SE.
2:. 3000.G.6.. 15,UT,15.X.8.. FI.0 . 320
...:.. SD.0 . .15,"I"D(DT):. 2000...;..
FO.0 . 319...<..H(Y$,18);H(X$,10);" F
ORMATTING ...............";...=.."00
.........00.............";.-.>..15,"N"D(
DT)":COPY,"ID$:. 2000.6.?.FI.0.G.@.. 2,U
T,2,"#".P.C.B.28...E..H(Y$,18);H(X$,10);
" WRITING ...............";...
F.. CN$(TL)"........."CN$(SL)"..........
...";.J.J..TW.TL.T...L..TW.18.M.20:.340.
..N..TW.25.M.18:.340...P..TW.31.M.17:.34
0...R.M.16.".T..QC.0 . 343.J.U..TW..T .
BM%(TW,0).255 . BM%(TW,1).255 . BM%(TW,2
).MA%(M.15).1 .401.V.W..SW.0.M...Y.. TW.
TL . SW.0 . SW.SL...Z..QC.0 . 350.J.\..(
MA%(SW) . BM%(TW,.(SW.8)))..0 .395...^..
CN$(TW)"........."CN$(SW)".............
";...C..15,"B-P:"2;0.).H..945,B:.869,TW.
1:.873,SW.3.R.B.B.1.=.|.. 831.U....15,"U
2:"2;DT;TW;SW.{....15,EN,EM$,ET,ES:. EN.
.0 . . 2010...... TW.T . SW.S . 410.....
............ 2: 15.....TL.T:SL.S.1.V..
.. SL.M . TL.TL.1:SL.0.....B.28.........
...H(Y$,Y);H(X$,X.1);......"."D$"..";.-.
...I.1.40:. I$:. I$.."". 1030.3.....?...
.D$".";._....I.1.40:. I$:. I$.."". 1030.
E.....P.... 1010...... I$.G(13) . I$.D$.
.....I$;...L.....P..15,EN,EM$,ET,ES:. EN
.0 . ....Z.. H(Y$,23);" .DISK ERROR."EN"
, "EM$" ,"ET","ES;..... 2: 15.......=.
... SE.1 . .H(Y$,23);" INSERT SOURCE DI
SK AND PRESS RETURN";.}.B.. SE.2 . .H(Y$
,23);" INSERT TARGET DISK AND PRESS RET
URN";...L.. SE.3 . .H(Y$,23);" INSERT SO
URCE & TARGET, PRESS RETURN";...V.Y.23:X
.39:D$." ":.I$:.1000...... I$.." ".3030.
&....H(Y$,23);"
";.,.........I.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL