SUPER MONO COPY
FILE INFORMATION
FILENAME(S): SUPER MONO COPY
FILE TYPE(S): PRG
FILE SIZE: 2.9K
FIRST SEEN: 2025-11-30 21:05:35
APPEARS ON: 1 disk(s)
FILE HASH
445a8f14b7a74137fd6735cd80d24847a64ab11957ff9f44fc63d718426be53d
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| UTILITIE | SUPER MONO COPY | PRG | DuncanTwain | 16 | 11 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0E 08 0A 00 97 35 36 2C 33 32 3A 9C 00 29 |.......56,32:..)| 00000010: 08 14 00 81 49 B2 36 37 39 A4 37 34 36 3A 87 41 |....I.679.746:.A| 00000020: 25 3A 97 49 2C 41 25 3A 82 00 44 08 1E 00 81 49 |%:.I,A%:..D....I| 00000030: B2 38 33 32 A4 39 31 34 3A 87 41 25 3A 97 49 2C |.832.914:.A%:.I,| 00000040: 41 25 3A 82 00 61 08 28 00 86 41 24 28 31 35 30 |A%:..a.(..A$(150| 00000050: 29 2C 41 25 28 31 35 30 29 2C 43 25 28 31 35 30 |),A%(150),C%(150| 00000060: 29 00 9E 08 32 00 8D 36 37 30 3A 99 22 08 11 20 |)...2..670:.".. | 00000070: 48 4F 57 20 4D 41 4E 59 20 43 4F 50 59 27 53 20 |HOW MANY COPY'S | 00000080: 44 4F 20 59 4F 55 20 57 49 53 48 20 54 4F 20 4D |DO YOU WISH TO M| 00000090: 41 4B 45 22 3B 3A 85 41 43 3A 8D 36 37 30 00 B5 |AKE";:.AC:.670..| 000000A0: 08 37 00 8B 41 43 B3 31 B0 41 43 B3 B1 B5 28 41 |.7..AC.1.AC...(A| 000000B0: 43 29 A7 35 30 00 E6 08 3C 00 99 22 11 11 1D 50 |C).50...<.."...P| 000000C0: 4C 41 43 45 20 54 48 45 20 53 4F 55 52 43 45 20 |LACE THE SOURCE | 000000D0: 44 49 53 4B 20 41 4E 44 20 54 59 50 45 20 27 53 |DISK AND TYPE 'S| 000000E0: 50 41 43 45 27 22 00 08 09 46 00 97 31 39 38 2C |PACE'"...F..198,| 000000F0: 30 3A 92 31 39 38 2C 31 3A A1 43 24 3A 8B 43 24 |0:.198,1:.C$:.C$| 00000100: B3 B1 22 20 22 A7 37 30 00 4F 09 50 00 99 22 13 |.." ".70.O.P..".| 00000110: 11 11 11 11 11 11 11 11 20 20 20 20 20 20 20 20 |........ | 00000120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "| 00000140: 3A 9F 31 2C 38 2C 31 35 2C 22 49 22 3A A0 31 00 |:.1,8,15,"I":.1.| 00000150: 74 09 5A 00 9F 31 35 2C 38 2C 31 35 3A 9F 31 2C |t.Z..15,8,15:.1,| 00000160: 38 2C 30 2C 22 24 30 22 3A 8B 53 54 B3 B1 30 A7 |8,0,"$0":.ST..0.| 00000170: 8D 36 33 30 00 A5 09 64 00 99 22 91 91 20 4F 4E |.630...d..".. ON| 00000180: 45 20 4D 4F 4D 45 4E 54 20 50 4C 45 41 53 45 20 |E MOMENT PLEASE | 00000190: 21 20 52 45 41 44 49 4E 47 20 44 49 52 45 43 54 |! READING DIRECT| 000001A0: 4F 52 59 2E 22 00 BF 09 6E 00 A1 23 31 2C 41 24 |ORY."...n..#1,A$| 000001B0: 2C 41 24 2C 41 24 2C 41 24 3A 42 24 B2 22 22 00 |,A$,A$,A$:B$."".| 000001C0: DB 09 78 00 81 49 B2 31 A4 32 34 3A A1 23 31 2C |..x..I.1.24:.#1,| 000001D0: 41 24 3A 8B 41 24 B2 22 22 A7 82 00 F4 09 82 00 |A$:.A$."".......| 000001E0: 8B 41 24 B2 C7 28 33 34 29 B0 41 24 B2 C7 28 31 |.A$..(34).A$..(1| 000001F0: 38 29 A7 82 00 04 0A 8C 00 42 24 B2 42 24 AA 41 |8).......B$.B$.A| 00000200: 24 3A 82 49 00 1B 0A 96 00 99 22 11 20 44 49 53 |$:.I......". DIS| 00000210: 4B 20 4E 41 4D 45 3A 20 22 42 24 00 37 0A A0 00 |K NAME: "B$.7...| 00000220: 99 22 11 20 43 4F 52 52 45 43 54 20 44 49 53 4B |.". CORRECT DISK| 00000230: 20 3F 20 59 2F 4E 22 00 60 0A AA 00 97 31 39 38 | ? Y/N".`....198| 00000240: 2C 30 3A 92 31 39 38 2C 31 3A A1 43 24 3A 8B 43 |,0:.198,1:.C$:.C| 00000250: 24 B2 22 4E 22 A7 A0 31 3A A0 31 35 3A 89 35 30 |$."N"..1:.15:.50| 00000260: 00 71 0A B4 00 8B 43 24 B3 B1 22 59 22 A7 31 37 |.q....C$.."Y".17| 00000270: 30 00 7F 0A BE 00 4E B2 30 3A 42 24 B2 22 22 00 |0.....N.0:B$."".| 00000280: 96 0A C8 00 A1 23 31 2C 41 24 3A 8B 41 24 B3 B1 |.....#1,A$:.A$..| 00000290: 22 22 A7 32 30 30 00 BA 0A D2 00 A1 23 31 2C 41 |"".200......#1,A| 000002A0: 24 2C 41 24 3A A1 23 31 2C 41 24 3A 8B 41 24 B2 |$,A$:.#1,A$:.A$.| 000002B0: 22 22 A7 41 24 B2 C7 28 30 29 00 DC 0A DC 00 43 |"".A$..(0).....C| 000002C0: B2 C6 28 41 24 29 3A A1 23 31 2C 41 24 3A 8B 41 |..(A$):.#1,A$:.A| 000002D0: 24 B2 22 22 A7 41 24 B2 C7 28 30 29 00 F6 0A E6 |$."".A$..(0)....| 000002E0: 00 43 B2 43 AA C6 28 41 24 29 AC 32 35 36 3A 41 |.C.C..(A$).256:A| 000002F0: 25 28 4E 29 B2 43 00 15 0B F0 00 81 49 B2 31 A4 |%(N).C......I.1.| 00000300: 32 35 3A A1 23 31 2C 41 24 3A 8B 41 24 B2 C7 28 |25:.#1,A$:.A$..(| 00000310: 33 34 29 A7 82 00 27 0B FA 00 8B 49 B3 34 AF 41 |34)...'....I.4.A| 00000320: 24 B2 22 20 22 A7 82 00 3C 0B 04 01 8B 49 B2 32 |$." "...<....I.2| 00000330: 35 AF 41 24 B2 22 20 22 A7 32 38 30 00 60 0B 0E |5.A$." ".280.`..| 00000340: 01 42 24 B2 42 24 AA 41 24 3A 8B 42 24 B2 22 42 |.B$.B$.A$:.B$."B| 00000350: 4C 4F 43 4B 53 20 46 52 45 45 2E 22 A7 33 31 30 |LOCKS FREE.".310| 00000360: 00 72 0B 18 01 82 3A 8B 53 54 B3 B1 30 A7 8D 36 |.r....:.ST..0..6| 00000370: 33 30 00 8C 0B 22 01 8B C3 28 42 24 29 B1 32 30 |30..."...(B$).20| 00000380: A7 42 24 B2 C8 28 42 24 2C 32 30 29 00 D5 0B 2C |.B$..(B$,20)...,| 00000390: 01 41 24 28 4E 29 B2 42 24 3A 42 24 B2 22 22 3A |.A$(N).B$:B$."":| 000003A0: 99 22 11 11 1D 20 20 20 20 20 9D 9D 9D 9D 9D 22 |."... ....."| 000003B0: 3B 41 25 28 4E 29 3B 22 20 22 3B 41 24 28 4E 29 |;A%(N);" ";A$(N)| 000003C0: 3B 22 20 20 20 20 91 91 91 22 3A 4E B2 4E AA 31 |;" ...":N.N.1| 000003D0: 3A 89 32 30 30 00 E9 0B 36 01 41 24 28 4E 29 B2 |:.200...6.A$(N).| 000003E0: 42 24 3A A0 31 3A A0 31 35 00 1C 0C 40 01 99 22 |B$:.1:.15...@.."| 000003F0: 1D 11 11 11 11 11 22 41 25 28 4E 29 22 42 4C 4F |......"A%(N)"BLO| 00000400: 43 4B 53 20 46 52 45 45 2E 22 3A 81 51 51 B2 31 |CKS FREE.":.QQ.1| 00000410: A4 32 30 30 30 3A 82 3A 8D 36 37 30 00 3B 0C 4A |.2000:.:.670.;.J| 00000420: 01 99 22 11 41 4E 53 57 45 52 20 59 45 53 20 4F |..".ANSWER YES O| 00000430: 52 20 4E 4F 20 20 20 59 2F 4E 22 00 65 0C 54 01 |R NO Y/N".e.T.| 00000440: 81 49 B2 30 A4 4E AB 31 3A 8B 41 25 28 49 29 B1 |.I.0.N.1:.A%(I).| 00000450: 32 32 35 A7 99 22 11 22 3B 41 25 28 49 29 3B 41 |225..".";A%(I);A| 00000460: 24 28 49 29 3B 00 86 0C 5E 01 8B 41 25 28 49 29 |$(I);...^..A%(I)| 00000470: B3 B2 32 32 35 A7 99 22 11 22 41 25 28 49 29 3B |..225.."."A%(I);| 00000480: 41 24 28 49 29 3B 00 B9 0C 68 01 97 31 39 38 2C |A$(I);...h..198,| 00000490: 30 3A 92 31 39 38 2C 31 3A A1 43 24 3A 8B 43 24 |0:.198,1:.C$:.C$| 000004A0: B2 22 4E 22 A7 43 25 28 49 29 B2 30 3A 99 A3 33 |."N".C%(I).0:..3| 000004B0: 30 29 43 24 3A 89 33 39 30 00 DA 0C 72 01 8B 43 |0)C$:.390...r..C| 000004C0: 24 B2 22 59 22 A7 43 25 28 49 29 B2 31 3A 99 A3 |$."Y".C%(I).1:..| 000004D0: 33 30 29 43 24 3A 89 33 39 30 00 E3 0C 7C 01 89 |30)C$:.390...|..| 000004E0: 33 36 30 00 F1 0C 86 01 82 3A 49 B2 30 3A 43 B2 |360......:I.0:C.| 000004F0: 30 00 FC 0C 90 01 8D 36 37 30 3A 99 00 21 0D 9A |0......670:..!..| 00000500: 01 8B 43 25 28 49 29 B2 31 AF 41 25 28 49 29 B3 |..C%(I).1.A%(I).| 00000510: B2 32 32 35 A7 43 B2 43 AA 31 3A 8D 34 37 30 3A |.225.C.C.1:.470:| 00000520: 99 00 2B 0D A4 01 49 B2 49 AA 31 00 3D 0D AE 01 |..+...I.I.1.=...| 00000530: 8B 43 B2 39 A7 43 B2 30 3A 89 34 30 30 00 4B 0D |.C.9.C.0:.400.K.| 00000540: B8 01 8B 49 B3 B2 4E A7 34 31 30 00 6D 0D C2 01 |...I..N.410.m...| 00000550: 99 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............| 00000560: 1D 1D 1D 1D 46 49 4E 49 53 48 45 44 22 00 89 0D |....FINISHED"...| 00000570: CC 01 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A |...198,0:.198,1:| 00000580: A1 43 24 3A 9C 3A 8A 34 30 00 C2 0D D6 01 81 58 |.C$:.:.40......X| 00000590: B2 C3 28 41 24 28 49 29 29 AB 34 A4 31 A9 AB 31 |..(A$(I)).4.1..1| 000005A0: 3A 8B CA 28 41 24 28 49 29 2C 58 2C 31 29 B2 22 |:..(A$(I),X,1)."| 000005B0: 20 22 A7 58 24 B2 C8 28 41 24 28 49 29 2C 58 AB | ".X$..(A$(I),X.| 000005C0: 31 29 00 ED 0D E0 01 8B CA 28 41 24 28 49 29 2C |1).......(A$(I),| 000005D0: 58 2C 31 29 B1 C7 28 33 32 29 A7 58 24 B2 C8 28 |X,1)..(32).X$..(| 000005E0: 41 24 28 49 29 2C 58 29 3A 89 35 30 30 00 F3 0D |A$(I),X):.500...| 000005F0: EA 01 82 00 30 0E F4 01 43 4F B2 30 3A 9F 31 35 |....0...CO.0:.15| 00000600: 2C 38 2C 31 35 3A 9F 31 2C 38 2C 32 2C 58 24 AA |,8,15:.1,8,2,X$.| 00000610: 22 2C 22 AA C9 28 41 24 28 49 29 2C 33 29 AA 22 |","..(A$(I),3)."| 00000620: 2C 52 22 3A 8D 36 33 30 3A 8B 45 46 A7 34 37 30 |,R":.630:.EF.470| 00000630: 00 52 0E FE 01 99 22 20 52 45 41 44 49 4E 47 20 |.R...." READING | 00000640: 22 3B 41 24 28 49 29 3B 22 20 20 20 22 41 25 28 |";A$(I);" "A%(| 00000650: 49 29 00 68 0E 08 02 9E 36 37 39 3A 8D 36 33 30 |I).h....679:.630| 00000660: 3A 8B 45 46 A7 34 37 30 00 7C 0E 0D 02 A0 31 3A |:.EF.470.|....1:| 00000670: A0 31 35 3A 81 43 4F B2 31 A4 41 43 00 BE 0E 12 |.15:.CO.1.AC....| 00000680: 02 99 22 50 4C 41 43 45 20 44 45 53 54 49 4E 41 |.."PLACE DESTINA| 00000690: 54 49 4F 4E 20 44 49 53 4B 20 23 22 43 4F 22 2C |TION DISK #"CO",| 000006A0: 54 59 50 45 20 53 50 41 43 45 91 22 3A 97 31 39 |TYPE SPACE.":.19| 000006B0: 38 2C 30 3A 92 31 39 38 2C 31 3A A1 43 24 00 CF |8,0:.198,1:.C$..| 000006C0: 0E 1C 02 8B 43 24 B3 B1 22 20 22 A7 35 33 30 00 |....C$.." ".530.| 000006D0: 07 0F 26 02 99 22 20 20 20 20 20 20 20 20 20 20 |..&.." | 000006E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000006F0: 20 20 20 20 20 20 20 20 20 20 20 20 91 22 3A 9F | .":.| 00000700: 31 35 2C 38 2C 31 35 00 3E 0F 30 02 9F 31 2C 38 |15,8,15.>.0..1,8| 00000710: 2C 32 2C 58 24 AA 22 2C 22 AA C9 28 41 24 28 49 |,2,X$.","..(A$(I| 00000720: 29 2C 33 29 AA 22 2C 57 22 3A 8D 36 33 30 3A 8B |),3).",W":.630:.| 00000730: 45 46 A7 43 4F B2 43 4F AB 31 3A 82 43 4F 00 56 |EF.CO.CO.1:.CO.V| 00000740: 0F 3A 02 99 22 91 20 57 52 49 54 49 4E 47 20 22 |.:..". WRITING "| 00000750: 3B 41 24 28 49 29 00 74 0F 44 02 9E 38 33 32 3A |;A$(I).t.D..832:| 00000760: 8D 36 33 30 3A 8B 45 46 A7 43 4F B2 43 4F AB 31 |.630:.EF.CO.CO.1| 00000770: 3A 82 43 4F 00 A6 0F 4E 02 99 22 91 20 43 4F 50 |:.CO...N..". COP| 00000780: 49 45 44 20 22 3B 41 24 28 49 29 3B 22 20 20 22 |IED ";A$(I);" "| 00000790: 3A A0 31 35 3A A0 31 3A 82 43 4F 3A 8B 49 B2 4E |:.15:.1:.CO:.I.N| 000007A0: AB 31 A7 36 32 30 00 E4 0F 58 02 99 22 50 4C 41 |.1.620...X.."PLA| 000007B0: 43 45 20 53 4F 55 52 43 45 20 44 49 53 4B 2C 54 |CE SOURCE DISK,T| 000007C0: 48 45 4E 20 54 59 50 45 20 27 53 50 41 43 45 27 |HEN TYPE 'SPACE'| 000007D0: 91 22 3A 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 |.":.198,0:.198,1| 000007E0: 3A A1 43 24 00 12 10 62 02 99 22 20 20 20 20 20 |:.C$...b.." | 000007F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000800: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000810: 91 22 00 18 10 6C 02 8E 00 3B 10 76 02 45 46 B2 |."...l...;.v.EF.| 00000820: 30 3A 84 31 35 2C 45 4E 2C 45 52 24 2C 45 54 2C |0:.15,EN,ER$,ET,| 00000830: 45 53 3A 8B 45 4E B3 32 30 A7 8E 00 77 10 80 02 |ES:.EN.20...w...| 00000840: 99 22 12 44 49 53 4B 20 45 52 52 4F 52 20 23 22 |.".DISK ERROR #"| 00000850: 3B 45 4E 3B 22 9D 20 20 9D 22 3B 45 52 24 3B 45 |;EN;". .";ER$;E| 00000860: 54 3B 22 9D 22 45 53 3B 22 92 22 3A 45 46 B2 31 |T;"."ES;".":EF.1| 00000870: 3A A0 31 3A A0 31 35 00 BB 10 8B 02 8B 43 4F B2 |:.1:.15......CO.| 00000880: 30 A7 99 22 50 4C 41 43 45 20 53 4F 55 52 43 45 |0.."PLACE SOURCE| 00000890: 20 44 49 53 4B 2C 54 48 45 4E 20 54 59 50 45 20 | DISK,THEN TYPE | 000008A0: 27 53 50 41 43 45 27 91 22 3A 97 31 39 38 2C 30 |'SPACE'.":.198,0| 000008B0: 3A 92 31 39 38 2C 31 3A A1 43 24 00 EA 10 8D 02 |:.198,1:.C$.....| 000008C0: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." | 000008D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000008E0: 20 20 20 20 20 20 20 22 3A 8E 00 0E 11 9E 02 99 | ":.......| 000008F0: 22 93 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 53 55 |".............SU| 00000900: 50 45 52 20 4D 4F 4E 4F 20 43 4F 50 59 22 00 36 |PER MONO COPY".6| 00000910: 11 A8 02 99 22 11 1D 1D 1D 1D 1D 1D 1D 1D 2A 2A |....".........**| 00000920: 2A 2A 2A 20 20 20 56 43 2D 31 35 34 31 20 20 20 |*** VC-1541 | 00000930: 2A 2A 2A 2A 2A 22 00 67 11 B2 02 99 22 11 20 20 |*****".g....". | 00000940: 4D 41 58 49 4D 55 4D 20 46 49 4C 45 20 4C 45 4E |MAXIMUM FILE LEN| 00000950: 47 48 54 3A 32 32 35 20 42 4C 4F 43 4B 53 20 28 |GHT:225 BLOCKS (| 00000960: 35 36 4B 29 22 3A 8E 00 B0 11 BC 02 83 31 36 32 |56K)":.......162| 00000970: 2C 31 2C 33 32 2C 31 39 38 2C 32 35 35 2C 31 36 |,1,32,198,255,16| 00000980: 39 2C 30 2C 31 33 33 2C 32 35 31 2C 31 36 39 2C |9,0,133,251,169,| 00000990: 33 32 2C 31 33 33 2C 32 35 32 2C 31 36 32 2C 30 |32,133,252,162,0| 000009A0: 2C 31 36 39 2C 31 35 39 2C 31 39 37 2C 32 35 32 |,169,159,197,252| 000009B0: 00 F6 11 C6 02 83 31 34 34 2C 32 33 2C 33 32 2C |......144,23,32,| 000009C0: 31 36 35 2C 32 35 35 2C 31 32 39 2C 32 35 31 2C |165,255,129,251,| 000009D0: 33 32 2C 31 38 33 2C 32 35 35 2C 32 30 38 2C 39 |32,183,255,208,9| 000009E0: 2C 32 33 30 2C 32 35 31 2C 32 30 38 2C 32 2C 32 |,230,251,208,2,2| 000009F0: 33 30 2C 32 35 32 00 40 12 D0 02 83 37 36 2C 31 |30,252.@....76,1| 00000A00: 38 30 2C 32 2C 33 32 2C 32 30 34 2C 32 35 35 2C |80,2,32,204,255,| 00000A10: 39 36 2C 33 32 2C 31 36 35 2C 32 35 35 2C 31 34 |96,32,165,255,14| 00000A20: 31 2C 36 30 2C 33 2C 31 32 30 2C 31 36 39 2C 35 |1,60,3,120,169,5| 00000A30: 32 2C 31 33 33 2C 31 2C 31 37 33 2C 36 30 2C 33 |2,133,1,173,60,3| 00000A40: 00 66 12 DA 02 83 31 32 39 2C 32 35 31 2C 31 36 |.f....129,251,16| 00000A50: 39 2C 35 35 2C 31 33 33 2C 31 2C 38 38 2C 37 36 |9,55,133,1,88,76| 00000A60: 2C 31 39 33 2C 32 00 AF 12 E4 02 83 31 36 32 2C |,193,2......162,| 00000A70: 31 2C 33 32 2C 32 30 31 2C 32 35 35 2C 31 36 39 |1,32,201,255,169| 00000A80: 2C 30 2C 31 33 33 2C 32 35 33 2C 31 36 39 2C 33 |,0,133,253,169,3| 00000A90: 32 2C 31 33 33 2C 32 35 34 2C 31 36 32 2C 30 2C |2,133,254,162,0,| 00000AA0: 31 36 39 2C 31 35 39 2C 31 39 37 2C 32 35 34 00 |169,159,197,254.| 00000AB0: F7 12 EE 02 83 31 34 34 2C 33 38 2C 31 36 31 2C |.....144,38,161,| 00000AC0: 32 35 33 2C 33 32 2C 31 36 38 2C 32 35 35 2C 33 |253,32,168,255,3| 00000AD0: 32 2C 31 38 33 2C 32 35 35 2C 32 30 38 2C 31 35 |2,183,255,208,15| 00000AE0: 2C 31 36 35 2C 32 35 34 2C 31 39 37 2C 32 35 32 |,165,254,197,252| 00000AF0: 2C 32 34 30 2C 31 33 00 40 13 F8 02 83 32 33 30 |,240,13.@....230| 00000B00: 2C 32 35 33 2C 32 30 38 2C 32 2C 32 33 30 2C 32 |,253,208,2,230,2| 00000B10: 35 34 2C 37 36 2C 37 37 2C 33 2C 33 32 2C 32 30 |54,76,77,3,32,20| 00000B20: 34 2C 32 35 35 2C 39 36 2C 31 36 35 2C 32 35 33 |4,255,96,165,253| 00000B30: 2C 31 39 37 2C 32 35 31 2C 32 30 38 2C 32 33 37 |,197,251,208,237| 00000B40: 00 86 13 02 03 83 37 36 2C 31 31 30 2C 33 2C 31 |......76,110,3,1| 00000B50: 32 30 2C 31 36 39 2C 35 32 2C 31 33 33 2C 31 2C |20,169,52,133,1,| 00000B60: 31 36 31 2C 32 35 33 2C 31 34 31 2C 36 30 2C 33 |161,253,141,60,3| 00000B70: 2C 31 36 39 2C 35 35 2C 31 33 33 2C 31 2C 31 37 |,169,55,133,1,17| 00000B80: 33 2C 36 30 2C 33 00 A1 13 0C 03 83 38 38 2C 33 |3,60,3......88,3| 00000B90: 32 2C 31 36 38 2C 32 35 35 2C 37 36 2C 39 30 2C |2,168,255,76,90,| 00000BA0: 33 00 00 00 FF FF 00 |3...... |
.......56,32:..)....I.679.746:.A%:.I,A%:
..D....I.832.914:.A%:.I,A%:..A.(..A$(150
),A%(150),C%(150)...2..670:.".. HOW MANY
COPY'S DO YOU WISH TO MAKE";:.AC:.670..
.7..AC.1.AC...(AC).50...<.."...PLACE THE
SOURCE DISK AND TYPE 'SPACE'"...F..198,
0:.198,1:.C$:.C$.." ".70.O.P..".........
"
:.1,8,15,"I": 1.T.Z..15,8,15:.1,8,0,"$0"
:.ST..0..630...D..".. ONE MOMENT PLEASE
! READING DIRECTORY."...N..#1,A$,A$,A$,A
$:B$.""...X..I.1.24:.#1,A$:.A$."".......
.A$.G(34).A$.G(18).......B$.B$.A$:.I....
..". DISK NAME: "B$.7. ..". CORRECT DISK
? Y/N".`....198,0:.198,1:.C$:.C$."N". 1
: 15:.50.Q....C$.."Y".170....N.0:B$."".
..H..#1,A$:.A$.."".200...R..#1,A$,A$:.#1
,A$:.A$."".A$.G(0).....C.F(A$):.#1,A$:.A
$."".A$.G(0).....C.C.F(A$).256:A%(N).C..
....I.1.25:.#1,A$:.A$.G(34)...'....I.4.A
$." "...<....I.25.A$." ".280.`...B$.B$.A
$:.B$."BLOCKS FREE.".310.R....:.ST..0..6
30..."..C(B$).20.B$.H(B$,20).U.,.A$(N).B
$:B$."":."... .....";A%(N);" ";A$(N)
;" ...":N.N.1:.200...6.A$(N).B$: 1: 1
5...@.."......"A%(N)"BLOCKS FREE.":.QQ.1
.2000:.:.670.;.J..".ANSWER YES OR NO Y
/N".E.T..I.0.N.1:.A%(I).225..".";A%(I);A
$(I);...^..A%(I)..225.."."A%(I);A$(I);..
.H..198,0:.198,1:.C$:.C$."N".C%(I).0:..3
0)C$:.390.Z.R..C$."Y".C%(I).1:..30)C$:.3
90...|..360......:I.0:C.0......670:..!..
..C%(I).1.A%(I)..225.C.C.1:.470:..+...I.
I.1.=....C.9.C.0:.400.K....I..N.410.M.B.
."..................FINISHED"...L..198,0
:.198,1:.C$:.:.40.B.V..X.C(A$(I)).4.1..1
:.J(A$(I),X,1)." ".X$.H(A$(I),X.1)......
J(A$(I),X,1).G(32).X$.H(A$(I),X):.500...
....0...CO.0:.15,8,15:.1,8,2,X$.",".I(A$
(I),3).",R":.630:.EF.470.R...." READING
";A$(I);" "A%(I).H....679:.630:.EF.470
.|... 1: 15:.CO.1.AC......"PLACE DESTINA
TION DISK #"CO",TYPE SPACE.":.198,0:.198
,1:.C$.O....C$.." ".530...&.."
.":.15,8,15.
>.0..1,8,2,X$.",".I(A$(I),3).",W":.630:.
EF.CO.CO.1:.CO.V.:..". WRITING ";A$(I).T
.D..832:.630:.EF.CO.CO.1:.CO...N..". COP
IED ";A$(I);" ": 15: 1:.CO:.I.N.1.620..
.X.."PLACE SOURCE DISK,THEN TYPE 'SPACE'
.":.198,0:.198,1:.C$...B.."
."...L...;.V.EF.
0:.15,EN,ER$,ET,ES:.EN.20...W....".DISK
ERROR #";EN;". .";ER$;ET;"."ES;".":EF.1
: 1: 15......CO.0.."PLACE SOURCE DISK,TH
EN TYPE 'SPACE'.":.198,0:.198,1:.C$.....
." "
:.......".............SUPER MONO COPY".6
....".........***** VC-1541 *****".G
....". MAXIMUM FILE LENGHT:225 BLOCKS (
56K)":.......162,1,32,198,255,169,0,133,
251,169,32,133,252,162,0,169,159,197,252
...F..144,23,32,165,255,129,251,32,183,2
55,208,9,230,251,208,2,230,252.@.P..76,1
80,2,32,204,255,96,32,165,255,141,60,3,1
20,169,52,133,1,173,60,3.F.Z..129,251,16
9,55,133,1,88,76,193,2......162,1,32,201
,255,169,0,133,253,169,32,133,254,162,0,
169,159,197,254......144,38,161,253,32,1
68,255,32,183,255,208,15,165,254,197,252
,240,13.@....230,253,208,2,230,254,76,77
,3,32,204,255,96,165,253,197,251,208,237
......76,110,3,120,169,52,133,1,161,253,
141,60,3,169,55,133,1,173,60,3......88,3
2,168,255,76,90,3......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL