SINGLE FILE
FILE INFORMATION
FILENAME(S): SINGLE FILE
FILE TYPE(S): PRG
FILE SIZE: 2.8K
FIRST SEEN: 2025-11-30 17:23:58
APPEARS ON: 1 disk(s)
FILE HASH
edfd82b7f612b385b0316217693afc546d21bd8e7f03169b4146d310702640b7
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 64 ULTILITIES | SINGLE FILE | PRG | Quetzal & Style | 19 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 14 08 64 00 97 35 35 2C 30 3A 97 35 36 2C |....d..55,0:.56,|
00000010: 32 34 3A 9C 00 27 08 65 00 50 47 B2 32 34 3A 4D |24:..'.e.PG.24:M|
00000020: 58 B2 C2 28 35 36 29 00 3C 08 66 00 5A 24 B2 C7 |X..(56).<.f.Z$..|
00000030: 28 30 29 3A 51 24 B2 C7 28 33 34 29 00 52 08 67 |(0):Q$..(34).R.g|
00000040: 00 97 35 33 32 38 30 2C 31 3A 97 35 33 32 38 31 |..53280,1:.53281|
00000050: 2C 31 00 62 08 68 00 99 C7 28 31 34 29 3B C7 28 |,1.b.h...(14);.(|
00000060: 38 29 00 7A 08 69 00 86 46 24 28 4D 58 29 2C 46 |8).z.i..F$(MX),F|
00000070: 28 4D 58 29 2C 54 28 4D 58 29 00 93 08 6A 00 81 |(MX),T(MX)...j..|
00000080: 49 B2 38 32 38 A4 39 30 34 3A 87 41 3A 97 49 2C |I.828.904:.A:.I,|
00000090: 41 3A 82 00 C6 08 6B 00 99 22 93 90 20 20 20 31 |A:....k..".. 1|
000000A0: 35 34 31 20 C4 C9 D3 CB A0 C4 D2 C9 D6 C5 A0 D3 |541 ............|
000000B0: C9 CE C7 CC C5 A0 C6 C9 CC C5 A0 C3 CF D0 C9 C5 |................|
000000C0: D2 20 20 20 22 3B 00 F7 08 6C 00 99 22 A3 A3 A3 |. ";...l.."...|
000000D0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000000E0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000000F0: A3 A3 A3 A3 A3 22 3B 00 27 09 6D 00 99 22 11 D0 |.....";.'.m.."..|
00000100: 4C 45 41 53 45 20 49 4E 53 45 52 54 20 54 48 45 |LEASE INSERT THE|
00000110: 20 D3 CF D5 D2 C3 C5 20 20 44 49 53 4B 20 49 4E | ...... DISK IN|
00000120: 54 4F 20 54 48 45 22 00 4E 09 6E 00 99 22 20 20 |TO THE".N.n.." |
00000130: 20 20 20 20 20 44 52 49 56 45 20 41 4E 44 20 50 | DRIVE AND P|
00000140: 52 45 53 53 20 D2 C5 D4 D5 D2 CE 2E 2E 2E 00 65 |RESS ..........e|
00000150: 09 6F 00 A1 41 24 3A 8B 41 24 B3 B1 C7 28 31 33 |.o..A$:.A$...(13|
00000160: 29 A7 31 31 31 00 77 09 70 00 9F 31 35 2C 38 2C |).111.w.p..15,8,|
00000170: 31 35 2C 22 49 30 22 00 9D 09 71 00 85 22 11 20 |15,"I0"...q..". |
00000180: C6 49 4C 45 4E 41 4D 45 20 46 4F 52 20 4D 41 54 |.ILENAME FOR MAT|
00000190: 43 48 20 3F 20 2A 9D 9D 9D 22 3B 46 24 00 B9 09 |CH ? *...";F$...|
000001A0: 72 00 8B C9 28 46 24 2C 31 29 B3 B1 22 2A 22 A7 |r...(F$,1).."*".|
000001B0: 46 24 B2 46 24 AA 22 2A 22 00 C9 09 73 00 8D 31 |F$.F$."*"...s..1|
000001C0: 39 33 3A 8B 45 89 31 38 39 00 E2 09 74 00 9F 31 |93:.E.189...t..1|
000001D0: 2C 38 2C 30 2C 22 24 30 3A 22 AA 46 24 3A 8D 31 |,8,0,"$0:".F$:.1|
000001E0: 39 33 00 0A 0A 75 00 8B 45 A7 99 22 11 20 C6 41 |93...u..E..". .A|
000001F0: 55 4C 54 20 49 4E 20 44 49 52 45 43 54 4F 52 59 |ULT IN DIRECTORY|
00000200: 2E 2E 2E 20 22 3A 89 31 38 39 00 34 0A 76 00 99 |... ":.189.4.v..|
00000210: 22 11 20 28 C3 29 4F 50 59 20 46 49 4C 45 20 20 |". (.)OPY FILE |
00000220: 20 20 20 20 20 20 20 28 D2 29 45 4A 45 43 54 20 | (.)EJECT |
00000230: 46 49 4C 45 00 5E 0A 77 00 99 22 20 28 C2 29 45 |FILE.^.w.." (.)E|
00000240: 47 49 4E 20 43 4F 50 59 20 20 20 20 20 20 20 20 |GIN COPY |
00000250: 28 C1 29 42 4F 52 54 20 43 4F 50 59 11 22 00 7A |(.)BORT COPY.".z|
00000260: 0A 78 00 A1 23 31 2C 41 24 2C 42 24 3A 4E B2 30 |.x..#1,A$,B$:N.0|
00000270: 3A 41 44 B2 50 47 AC 32 35 36 00 93 0A 79 00 A1 |:AD.PG.256...y..|
00000280: 23 31 2C 41 24 2C 42 24 3A 8B 42 24 B2 22 22 89 |#1,A$,B$:.B$."".|
00000290: 31 34 32 00 A7 0A 7A 00 A1 23 31 2C 41 24 2C 42 |142...z..#1,A$,B|
000002A0: 24 3A 46 24 B2 22 22 00 C4 0A 7B 00 53 5A B2 C6 |$:F$.""...{.SZ..|
000002B0: 28 41 24 AA 5A 24 29 AA C6 28 42 24 AA 5A 24 29 |(A$.Z$)..(B$.Z$)|
000002C0: AC 32 35 36 00 DA 0A 7C 00 A1 23 31 2C 41 24 3A |.256...|..#1,A$:|
000002D0: 8B 36 34 AF 53 54 89 31 34 32 00 EA 0A 7D 00 8B |.64.ST.142...}..|
000002E0: 41 24 B3 B1 51 24 89 31 32 34 00 0B 0B 7E 00 A1 |A$..Q$.124...~..|
000002F0: 23 31 2C 41 24 3A 8B 41 24 B3 B1 51 24 A7 46 24 |#1,A$:.A$..Q$.F$|
00000300: B2 46 24 AA 41 24 3A 89 31 32 36 00 23 0B 7F 00 |.F$.A$:.126.#...|
00000310: A1 23 31 2C 41 24 3A 8B 41 24 B3 B1 22 20 22 89 |.#1,A$:.A$.." ".|
00000320: 31 32 37 00 3A 0B 80 00 A1 23 31 2C 54 24 3A 8B |127.:....#1,T$:.|
00000330: 54 24 B2 22 20 22 89 31 32 38 00 51 0B 81 00 A1 |T$." ".128.Q....|
00000340: 23 31 2C 41 24 3A 8B 41 24 B3 B1 22 22 89 31 32 |#1,A$:.A$.."".12|
00000350: 39 00 71 0B 82 00 8B 53 5A B2 30 B0 28 54 24 B3 |9.q....SZ.0.(T$.|
00000360: B1 22 50 22 AF 54 24 B3 B1 22 53 22 29 89 31 32 |."P".T$.."S").12|
00000370: 31 00 93 0B 83 00 99 53 5A 3B A3 35 29 3B 54 24 |1......SZ;.5);T$|
00000380: 3B 22 20 22 3B 51 24 3B 46 24 3B 51 24 3B A3 32 |;" ";Q$;F$;Q$;.2|
00000390: 36 29 3B 00 B9 0B 84 00 8B 41 44 AA 53 5A AC 32 |6);......AD.SZ.2|
000003A0: 35 36 B1 35 33 32 34 37 A7 99 22 CF D6 C5 D2 C6 |56.53247..".....|
000003B0: CC CF D7 22 3A 89 31 32 31 00 CE 0B 85 00 99 22 |...":.121......"|
000003C0: 28 43 29 28 42 29 28 52 29 28 41 29 22 3B 00 E1 |(C)(B)(R)(A)";..|
000003D0: 0B 86 00 A1 41 24 3A 8B 41 24 B2 22 22 89 31 33 |....A$:.A$."".13|
000003E0: 34 00 F7 0B 87 00 8B 41 24 B2 22 52 22 A7 99 22 |4......A$."R".."|
000003F0: D2 22 3A 89 31 32 31 00 0D 0C 88 00 8B 41 24 B2 |.":.121......A$.|
00000400: 22 42 22 A7 99 22 C2 22 3A 89 31 34 32 00 23 0C |"B"..".":.142.#.|
00000410: 89 00 8B 41 24 B2 22 41 22 A7 99 22 C1 22 3A 89 |...A$."A"..".":.|
00000420: 31 38 36 00 34 0C 8A 00 8B 41 24 B3 B1 22 43 22 |186.4....A$.."C"|
00000430: 89 31 33 34 00 53 0C 8B 00 4E B2 4E AA 31 3A 46 |.134.S...N.N.1:F|
00000440: 24 28 4E 29 B2 46 24 AA 22 2C 22 AA 54 24 3A 99 |$(N).F$.",".T$:.|
00000450: 22 C3 22 00 6E 0C 8C 00 41 44 B2 41 44 AA 53 5A |".".n...AD.AD.SZ|
00000460: AC 32 35 36 3A 8B 4E B3 4D 58 89 31 32 31 00 8E |.256:.N.MX.121..|
00000470: 0C 8D 00 99 22 11 20 CD 41 58 49 4D 55 4D 20 4F |....". .AXIMUM O|
00000480: 46 22 3B 4D 58 3B 22 46 49 4C 45 53 2E 22 00 B8 |F";MX;"FILES."..|
00000490: 0C 8E 00 A0 31 3A 99 22 11 1D 1D 1D 1D 1D 1D 1D |....1:."........|
000004A0: 1D 1D 1D 1D 22 3B 4E 3B 22 46 49 4C 45 53 20 54 |....";N;"FILES T|
000004B0: 4F 20 52 45 41 44 11 22 00 CF 0C 8F 00 41 44 B2 |O READ.".....AD.|
000004C0: 50 47 AC 32 35 36 3A 8B 4E B2 30 89 31 38 39 00 |PG.256:.N.0.189.|
000004D0: DA 0C 90 00 81 49 B2 31 A4 4E 00 F5 0C 91 00 99 |.....I.1.N......|
000004E0: 22 20 22 3B 51 24 3B 46 24 28 49 29 3B 51 24 3B |" ";Q$;F$(I);Q$;|
000004F0: A3 32 30 29 3B 00 06 0D 92 00 53 5A B2 B5 28 41 |.20);.....SZ..(A|
00000500: 44 AD 32 35 36 29 00 21 0D 93 00 97 32 35 31 2C |D.256).!....251,|
00000510: 41 44 AB 53 5A AC 32 35 36 3A 97 32 35 32 2C 53 |AD.SZ.256:.252,S|
00000520: 5A 00 3C 0D 94 00 9F 31 2C 38 2C 32 2C 22 30 3A |Z.<....1,8,2,"0:|
00000530: 22 AA 46 24 28 49 29 3A 8D 31 39 33 00 54 0D 95 |".F$(I):.193.T..|
00000540: 00 8B 45 B2 37 34 A7 A0 31 3A 4E B2 49 AB 31 3A |..E.74..1:N.I.1:|
00000550: 89 31 35 37 00 6C 0D 96 00 8B 45 A7 A0 31 3A 46 |.157.l....E..1:F|
00000560: 24 28 49 29 B2 22 22 3A 89 31 35 36 00 8E 0D 97 |$(I)."":.156....|
00000570: 00 9E 38 33 31 3A 8D 31 39 33 3A A0 31 3A 8B 45 |..831:.193:.1:.E|
00000580: B2 37 34 A7 4E B2 49 AB 31 3A 89 31 35 37 00 A3 |.74.N.I.1:.157..|
00000590: 0D 98 00 8B 45 A7 46 24 28 49 29 B2 22 22 3A 89 |....E.F$(I)."":.|
000005A0: 31 35 36 00 D0 0D 99 00 8B C2 28 32 35 32 29 B2 |156.......(252).|
000005B0: 32 30 38 A7 46 24 28 49 29 B2 22 22 3A 99 22 12 |208.F$(I)."":.".|
000005C0: D4 CF CF 20 CC C1 D2 C7 C5 92 22 3A 89 31 35 36 |... ......":.156|
000005D0: 00 F9 0D 9A 00 46 28 49 29 B2 41 44 3A 41 44 B2 |.....F(I).AD:AD.|
000005E0: C2 28 32 35 31 29 AA C2 28 32 35 32 29 AC 32 35 |.(251)..(252).25|
000005F0: 36 3A 54 28 49 29 B2 41 44 00 1F 0E 9B 00 99 C9 |6:T(I).AD.......|
00000600: 28 22 20 20 20 22 AA C4 28 54 28 49 29 AB 46 28 |(" "..(T(I).F(|
00000610: 49 29 29 2C 35 29 3B 22 20 42 59 54 45 53 22 00 |I)),5);" BYTES".|
00000620: 26 0E 9C 00 82 49 00 33 0E 9D 00 8B 4E B2 30 89 |&....I.3....N.0.|
00000630: 31 38 39 00 61 0E 9E 00 99 22 11 D0 4C 45 41 53 |189.a...."..LEAS|
00000640: 45 20 49 4E 53 45 52 54 20 54 48 45 20 C4 C5 D3 |E INSERT THE ...|
00000650: D4 C9 CE C1 D4 C9 CF CE 20 44 49 53 4B 2E 2E 2E |........ DISK...|
00000660: 22 00 8A 0E 9F 00 85 22 11 1D 1D 1D 1D 1D 1D 1D |"......"........|
00000670: C6 CF D2 CD C1 D4 20 54 48 49 53 20 44 49 53 4B |...... THIS DISK|
00000680: 20 20 4E 9D 9D 9D 22 3B 41 24 00 90 0E A0 00 99 | N...";A$......|
00000690: 00 A1 0E A1 00 8B 41 24 B3 B1 22 59 22 89 31 36 |......A$.."Y".16|
000006A0: 35 00 BC 0E A2 00 85 22 20 C4 49 53 4B 20 4E 41 |5......" .ISK NA|
000006B0: 4D 45 2C 49 44 22 3B 46 24 2C 54 24 00 D4 0E A3 |ME,ID";F$,T$....|
000006C0: 00 98 31 35 2C 22 4E 30 3A 22 AA 46 24 AA 22 2C |..15,"N0:".F$.",|
000006D0: 22 AA 54 24 00 E6 0E A4 00 99 3A 8D 31 39 33 3A |".T$......:.193:|
000006E0: 8B 45 89 31 35 37 00 F1 0E A5 00 81 49 B2 31 A4 |.E.157......I.1.|
000006F0: 4E 00 03 0F A6 00 8B 46 24 28 49 29 B2 22 22 89 |N......F$(I)."".|
00000700: 31 38 33 00 1E 0F A7 00 99 22 20 22 3B 51 24 3B |183......" ";Q$;|
00000710: 46 24 28 49 29 3B 51 24 3B A3 32 30 29 3B 00 34 |F$(I);Q$;.20);.4|
00000720: 0F A8 00 9F 31 2C 38 2C 32 2C 46 24 28 49 29 AA |....1,8,2,F$(I).|
00000730: 22 2C 57 22 00 46 0F A9 00 8D 31 39 33 3A 8B 45 |",W".F....193:.E|
00000740: B2 30 89 31 37 36 00 57 0F AA 00 A0 31 3A 8B 45 |.0.176.W....1:.E|
00000750: B2 36 33 A7 31 37 32 00 74 0F AB 00 8F 20 20 43 |.63.172.t.... C|
00000760: 4C 4F 53 45 31 3A 49 46 45 3C 3E 36 33 47 4F 54 |LOSE1:IFE<>63GOT|
00000770: 4F 38 34 30 00 A3 0F AC 00 99 3A 85 22 11 1D 1D |O840......:."...|
00000780: 1D 1D 1D 20 D2 C5 D0 CC C1 C3 C5 20 45 58 49 53 |... ....... EXIS|
00000790: 54 49 4E 47 20 46 49 4C 45 3F 20 4E 9D 9D 9D 22 |TING FILE? N..."|
000007A0: 3B 41 24 00 A9 0F AD 00 99 00 BA 0F AE 00 8B 41 |;A$............A|
000007B0: 24 B3 B1 22 59 22 89 31 38 33 00 D3 0F AF 00 98 |$.."Y".183......|
000007C0: 31 35 2C 22 53 30 3A 22 AA 46 24 28 49 29 3A 89 |15,"S0:".F$(I):.|
000007D0: 31 36 37 00 E6 0F B0 00 53 5A B2 B5 28 46 28 49 |167.....SZ..(F(I|
000007E0: 29 AD 32 35 36 29 00 03 10 B1 00 97 32 35 31 2C |).256)......251,|
000007F0: 46 28 49 29 AB 53 5A AC 32 35 36 3A 97 32 35 32 |F(I).SZ.256:.252|
00000800: 2C 53 5A 00 16 10 B2 00 53 5A B2 B5 28 54 28 49 |,SZ.....SZ..(T(I|
00000810: 29 AD 32 35 36 29 00 33 10 B3 00 97 32 35 33 2C |).256).3....253,|
00000820: 54 28 49 29 AB 53 5A AC 32 35 36 3A 97 32 35 34 |T(I).SZ.256:.254|
00000830: 2C 53 5A 00 53 10 B4 00 9E 38 32 38 3A 8D 31 39 |,SZ.S....828:.19|
00000840: 33 3A A0 31 3A 8B 45 B2 37 32 B0 45 B2 37 34 89 |3:.1:.E.72.E.74.|
00000850: 31 38 34 00 5E 10 B5 00 8B 45 89 31 38 33 00 84 |184.^....E.183..|
00000860: 10 B6 00 99 C9 28 22 20 20 20 22 AA C4 28 54 28 |.....(" "..(T(|
00000870: 49 29 AB 46 28 49 29 29 2C 35 29 3B 22 20 42 59 |I).F(I)),5);" BY|
00000880: 54 45 53 22 00 8B 10 B7 00 82 49 00 BB 10 B8 00 |TES"......I.....|
00000890: 85 22 11 1D 1D 1D 1D 1D 20 D3 41 56 45 20 53 41 |."...... .AVE SA|
000008A0: 4D 45 20 50 52 4F 47 52 41 4D 53 20 41 47 41 49 |ME PROGRAMS AGAI|
000008B0: 4E 3F 20 4E 9D 9D 9D 22 3B 41 24 00 CB 10 B9 00 |N? N...";A$.....|
000008C0: 8B 41 24 B2 22 59 22 89 31 35 37 00 D6 10 BA 00 |.A$."Y".157.....|
000008D0: A0 31 35 3A A0 31 00 04 11 BB 00 85 22 11 1D 1D |.15:.1......"...|
000008E0: 1D 1D 1D 1D 20 CD 4F 52 45 20 50 52 4F 47 52 41 |.... .ORE PROGRA|
000008F0: 4D 53 20 54 4F 20 43 4F 50 59 3F 20 59 9D 9D 9D |MS TO COPY? Y...|
00000900: 22 3B 41 24 00 1D 11 BC 00 8B 41 24 B2 22 59 22 |";A$......A$."Y"|
00000910: A7 20 A0 31 35 3A A0 31 3A 89 31 30 37 00 35 11 |. .15:.1:.107.5.|
00000920: BD 00 99 A3 31 34 29 22 11 C5 CE C4 20 CF C6 20 |....14)".... .. |
00000930: C3 CF D0 D9 22 00 57 11 BE 00 99 A3 39 29 22 11 |....".W.....9)".|
00000940: D0 4C 45 41 53 45 20 52 45 4D 4F 56 45 20 54 48 |.LEASE REMOVE TH|
00000950: 45 20 44 49 53 4B 22 00 77 11 BF 00 99 A3 31 31 |E DISK".w.....11|
00000960: 29 22 46 52 4F 4D 20 54 48 45 20 44 49 53 4B 20 |)"FROM THE DISK |
00000970: 44 52 49 56 45 90 22 00 84 11 C0 00 99 C7 28 39 |DRIVE.".......(9|
00000980: 29 3B 3A 80 00 97 11 C1 00 84 31 35 2C 45 2C 45 |);:.......15,E,E|
00000990: 24 2C 45 31 2C 45 32 00 A2 11 C2 00 8B 45 B2 30 |$,E1,E2......E.0|
000009A0: A7 8E 00 D2 11 C3 00 45 45 24 B2 CA 28 C4 28 45 |.......EE$..(.(E|
000009B0: 29 2C 32 29 3A 45 31 24 B2 CA 28 C4 28 45 31 29 |),2):E1$..(.(E1)|
000009C0: 2C 32 29 3A 45 32 24 B2 CA 28 C4 28 45 32 29 2C |,2):E2$..(.(E2),|
000009D0: 32 29 00 DE 11 C4 00 8B 45 B2 36 33 A7 8E 00 0E |2)......E.63....|
000009E0: 12 C5 00 99 3A 99 22 11 1D 1D 1D 1D 1D 1D 1D 1D |....:.".........|
000009F0: 1D 1D 22 3B 45 45 24 3B 22 2C 22 3B 45 24 3B 22 |..";EE$;",";E$;"|
00000A00: 2C 22 3B 45 31 24 3B 22 2C 22 3B 45 32 24 00 30 |,";E1$;",";E2$.0|
00000A10: 12 C6 00 83 20 37 36 2C 39 36 2C 33 2C 31 36 32 |.... 76,96,3,162|
00000A20: 2C 31 2C 33 32 2C 31 39 38 2C 32 35 35 2C 33 32 |,1,32,198,255,32|
00000A30: 00 50 12 C7 00 83 20 32 32 38 2C 32 35 35 2C 31 |.P.... 228,255,1|
00000A40: 36 30 2C 30 2C 31 34 35 2C 32 35 31 2C 32 33 30 |60,0,145,251,230|
00000A50: 00 70 12 C8 00 83 20 32 35 31 2C 32 30 38 2C 38 |.p.... 251,208,8|
00000A60: 2C 32 33 30 2C 32 35 32 2C 31 36 35 2C 32 35 32 |,230,252,165,252|
00000A70: 00 92 12 C9 00 83 20 32 30 31 2C 32 30 38 2C 32 |...... 201,208,2|
00000A80: 34 30 2C 36 2C 31 36 35 2C 31 34 34 2C 34 31 2C |40,6,165,144,41,|
00000A90: 36 34 00 B4 12 CA 00 83 20 32 34 30 2C 32 33 31 |64...... 240,231|
00000AA0: 2C 37 36 2C 32 30 34 2C 32 35 35 2C 31 36 32 2C |,76,204,255,162,|
00000AB0: 31 2C 33 32 00 D5 12 CB 00 83 20 32 30 31 2C 32 |1,32...... 201,2|
00000AC0: 35 35 2C 31 36 32 2C 35 34 2C 31 33 34 2C 31 2C |55,162,54,134,1,|
00000AD0: 31 36 30 2C 30 00 F6 12 CC 00 83 20 31 37 37 2C |160,0...... 177,|
00000AE0: 32 35 31 2C 33 32 2C 32 31 30 2C 32 35 35 2C 32 |251,32,210,255,2|
00000AF0: 33 30 2C 32 35 31 00 1A 13 CD 00 83 20 32 30 38 |30,251...... 208|
00000B00: 2C 32 2C 32 33 30 2C 32 35 32 2C 31 36 35 2C 32 |,2,230,252,165,2|
00000B10: 35 31 2C 31 39 37 2C 32 35 33 00 3C 13 CE 00 83 |51,197,253.<....|
00000B20: 20 32 30 38 2C 32 33 39 2C 31 36 35 2C 32 35 32 | 208,239,165,252|
00000B30: 2C 31 39 37 2C 32 35 34 2C 32 30 38 00 5E 13 CF |,197,254,208.^..|
00000B40: 00 83 20 32 33 33 2C 31 36 32 2C 35 35 2C 31 33 |.. 233,162,55,13|
00000B50: 34 2C 31 2C 37 36 2C 32 30 34 2C 32 35 35 00 00 |4,1,76,204,255..|
00000B60: 00 |. |
....D..55,0:.56,24:..'.E.PG.24:MX.B(56).
<.F.Z$.G(0):Q$.G(34).R.G..53280,1:.53281
,1.B.H..G(14);G(8).Z.I..F$(MX),F(MX),T(M
X)...J..I.828.904:.A:.I,A:..F.K..".. 1
541 DISK DRIVE SINGLE FILE COPIER ";..
.L.."...................................
.....";.'.M..".PLEASE INSERT THE SOURCE
DISK INTO THE".N.N.." DRIVE AND P
RESS RETURN....E.O..A$:.A$..G(13).111.W.
P..15,8,15,"I0"...Q..". FILENAME FOR MAT
CH ? *...";F$...R..I(F$,1).."*".F$.F$."*
".I.S..193:.E.189...T..1,8,0,"$0:".F$:.1
93...U..E..". FAULT IN DIRECTORY... ":.1
89.4.V..". (C)OPY FILE (R)EJECT
FILE.^.W.." (B)EGIN COPY (A)BORT
COPY.".Z.X..#1,A$,B$:N.0:AD.PG.256...Y..
#1,A$,B$:.B$."".142...Z..#1,A$,B$:F$."".
D.{.SZ.F(A$.Z$).F(B$.Z$).256.Z.|..#1,A$:
.64.ST.142...}..A$..Q$.124...~..#1,A$:.A
$..Q$.F$.F$.A$:.126.#...#1,A$:.A$.." ".
127.:....#1,T$:.T$." ".128.Q....#1,A$:.A
$.."".129.Q....SZ.0.(T$.."P".T$.."S").12
1......SZ;.5);T$;" ";Q$;F$;Q$;.26);.....
.AD.SZ.256.53247.."OVERFLOW":.121.N...."
(C)(B)(R)(A)";......A$:.A$."".134......A
$."R".."R":.121......A$."B".."B":.142.#.
...A$."A".."A":.186.4....A$.."C".134.S..
.N.N.1:F$(N).F$.",".T$:."C".N...AD.AD.SZ
.256:.N.MX.121......". MAXIMUM OF";MX;"F
ILES."..... 1:."............";N;"FILES T
O READ.".O...AD.PG.256:.N.0.189.Z....I.1
.N......" ";Q$;F$(I);Q$;.20);.....SZ..(A
D.256).!....251,AD.SZ.256:.252,SZ.<....1
,8,2,"0:".F$(I):.193.T....E.74. 1:N.I.1:
.157.L....E. 1:F$(I)."":.156......831:.1
93: 1:.E.74.N.I.1:.157......E.F$(I)."":.
156.P....B(252).208.F$(I)."":.".TOO LARG
E.":.156.....F(I).AD:AD.B(251).B(252).25
6:T(I).AD......I(" ".D(T(I).F(I)),5);"
BYTES".&....I.3....N.0.189.A....".PLEAS
E INSERT THE DESTINATION DISK..."......"
........FORMAT THIS DISK N...";A$... ..
......A$.."Y".165......" DISK NAME,ID";F
$,T$.T....15,"N0:".F$.",".T$......:.193:
.E.157......I.1.N......F$(I)."".183.....
." ";Q$;F$(I);Q$;.20);.4....1,8,2,F$(I).
",W".F....193:.E.0.176.W... 1:.E.63.172.
T.... CLOSE1:IFE<>63GOTO840......:."...
... REPLACE EXISTING FILE? N...";A$.....
.......A$.."Y".183.S....15,"S0:".F$(I):.
167.....SZ..(F(I).256)......251,F(I).SZ.
256:.252,SZ.....SZ..(T(I).256).3....253,
T(I).SZ.256:.254,SZ.S....828:.193: 1:.E.
72.E.74.184.^....E.183......I(" ".D(T(
I).F(I)),5);" BYTES"......I......"......
SAVE SAME PROGRAMS AGAIN? N...";A$.K...
.A$."Y".157.V... 15: 1......"....... MOR
E PROGRAMS TO COPY? Y...";A$......A$."Y"
. 15: 1:.107.5.....14)".END OF COPY".W.
....9)".PLEASE REMOVE THE DISK".W.....11
)"FROM THE DISK DRIVE."......G(9);:....A
..15,E,E$,E1,E2...B..E.0...R.C.EE$.J(D(E
),2):E1$.J(D(E1),2):E2$.J(D(E2),2)...D..
E.63.....E..:."...........";EE$;",";E$;"
,";E1$;",";E2$.0.F.. 76,96,3,162,1,32,19
8,255,32.P.G.. 228,255,160,0,145,251,230
.P.H.. 251,208,8,230,252,165,252...I.. 2
01,208,240,6,165,144,41,64...J.. 240,231
,76,204,255,162,1,32.U.K.. 201,255,162,5
4,134,1,160,0...L.. 177,251,32,210,255,2
30,251...M.. 208,2,230,252,165,251,197,2
53.<.N.. 208,239,165,252,197,254,208.^.O
.. 233,162,55,134,1,76,204,255...
> CLICK IMAGE PREVIEW FOR FULL MODAL