> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 07 08 00 00 8F 00 1B 08 0A 00 8B 20 47 4C |............. GL|
00000010: B2 35 31 31 30 20 A7 20 33 36 30 00 2F 08 14 00 |.5110 . 360./...|
00000020: 8B 20 47 4C B2 35 33 37 30 20 A7 20 36 32 30 00 |. GL.5370 . 620.|
00000030: 43 08 1E 00 8B 20 47 4C B2 35 33 39 30 20 A7 20 |C.... GL.5390 . |
00000040: 36 34 30 00 4D 08 28 00 89 20 32 36 30 00 58 08 |640.M.(.. 260.X.|
00000050: 32 00 44 52 24 B2 22 22 00 75 08 3C 00 8B 20 44 |2.DR$."".u.<.. D|
00000060: 56 B2 38 20 AF 20 44 52 B2 30 20 A7 20 44 52 24 |V.8 . DR.0 . DR$|
00000070: B2 22 41 3A 22 00 92 08 46 00 8B 20 44 56 B2 38 |."A:"...F.. DV.8|
00000080: 20 AF 20 44 52 B2 31 20 A7 20 44 52 24 B2 22 42 | . DR.1 . DR$."B|
00000090: 3A 22 00 AF 08 50 00 8B 20 44 56 B2 39 20 AF 20 |:"...P.. DV.9 . |
000000A0: 44 52 B2 30 20 A7 20 44 52 24 B2 22 43 3A 22 00 |DR.0 . DR$."C:".|
000000B0: CC 08 5A 00 8B 20 44 56 B2 39 20 AF 20 44 52 B2 |..Z.. DV.9 . DR.|
000000C0: 31 20 A7 20 44 52 24 B2 22 44 3A 22 00 E9 08 64 |1 . DR$."D:"...d|
000000D0: 00 8B 20 44 56 B2 31 30 AF 20 44 52 B2 30 20 A7 |.. DV.10. DR.0 .|
000000E0: 20 44 52 24 B2 22 45 3A 22 00 07 09 6E 00 8B 20 | DR$."E:"...n.. |
000000F0: 44 56 B2 31 30 20 AF 20 44 52 B2 31 20 A7 20 44 |DV.10 . DR.1 . D|
00000100: 52 24 B2 22 46 3A 22 00 25 09 78 00 8B 20 44 56 |R$."F:".%.x.. DV|
00000110: B2 31 31 20 AF 20 44 52 B2 30 20 A7 20 44 52 24 |.11 . DR.0 . DR$|
00000120: B2 22 47 3A 22 00 43 09 82 00 8B 20 44 56 B2 31 |."G:".C.... DV.1|
00000130: 31 20 AF 20 44 52 B2 31 20 A7 20 44 52 24 B2 22 |1 . DR.1 . DR$."|
00000140: 48 3A 22 00 49 09 8C 00 8E 00 4F 09 96 00 80 00 |H:".I.....O.....|
00000150: 6C 09 04 01 8F 3A 20 41 50 50 45 4E 44 20 54 4F |l....: APPEND TO|
00000160: 20 41 4E 20 41 52 43 20 46 49 4C 45 00 9D 09 0E | AN ARC FILE....|
00000170: 01 99 22 93 11 05 20 20 20 20 20 12 C1 50 50 45 |.."... ..PPE|
00000180: 4E 44 20 54 4F 20 41 4E 20 45 58 49 53 54 49 49 |ND TO AN EXISTII|
00000190: 4E 47 20 C1 D2 C3 20 46 49 4C 45 92 22 00 CD 09 |NG ... FILE."...|
000001A0: 18 01 99 22 11 11 20 20 20 20 20 D0 4C 45 41 53 |...".. .LEAS|
000001B0: 45 20 49 4E 53 45 52 54 20 44 49 53 4B 20 57 49 |E INSERT DISK WI|
000001C0: 54 48 20 C1 D2 C3 20 46 49 4C 45 2E 22 00 02 0A |TH ... FILE."...|
000001D0: 22 01 99 22 11 11 20 20 D0 52 45 53 53 20 12 9E |"..".. .RESS ..|
000001E0: 24 05 92 20 46 4F 52 20 41 20 44 49 52 45 43 54 |$.. FOR A DIRECT|
000001F0: 4F 52 59 20 4F 46 20 C4 52 49 56 45 20 38 2C 30 |ORY OF .RIVE 8,0|
00000200: 2E 22 00 38 0A 23 01 99 22 11 11 20 D0 52 45 53 |.".8.#..".. .RES|
00000210: 53 20 12 9E D3 D0 C1 C3 C5 20 C2 C1 D2 05 92 20 |S ....... ..... |
00000220: 54 4F 20 52 45 54 55 52 4E 20 54 4F 20 4D 41 49 |TO RETURN TO MAI|
00000230: 4E 20 4D 45 4E 55 2E 22 00 65 0A 2C 01 99 22 11 |N MENU.".e.,..".|
00000240: 11 20 20 20 20 20 20 20 C1 4E 59 20 4F 54 48 45 |. .NY OTHE|
00000250: 52 20 4B 45 59 20 57 49 4C 4C 20 43 4F 4E 54 49 |R KEY WILL CONTI|
00000260: 4E 55 45 2E 22 00 7C 0A 36 01 A1 20 41 24 3A 8B |NUE.".|.6.. A$:.|
00000270: 20 41 24 B2 22 22 20 A7 20 33 31 30 00 90 0A 37 | A$."" . 310...7|
00000280: 01 8B 20 41 24 B3 B1 22 20 22 20 A7 20 33 32 30 |.. A$.." " . 320|
00000290: 00 C5 0A 38 01 99 22 93 05 11 11 11 11 11 20 D0 |...8.."....... .|
000002A0: 4C 45 41 53 45 20 49 4E 53 45 52 54 20 44 49 53 |LEASE INSERT DIS|
000002B0: 4B 20 57 49 54 48 20 C1 D2 C3 20 C1 C9 C4 20 4F |K WITH ... ... O|
000002C0: 4E 20 49 54 22 00 EA 0A 39 01 99 22 20 20 20 20 |N IT"...9.." |
000002D0: 20 20 20 20 20 20 20 41 4E 44 20 50 52 45 53 53 | AND PRESS|
000002E0: 20 41 4E 59 20 4B 45 59 2E 22 00 01 0B 3A 01 A1 | ANY KEY."...:..|
000002F0: 20 41 24 3A 8B 20 41 24 B2 22 22 20 A7 20 33 31 | A$:. A$."" . 31|
00000300: 34 00 1F 0B 3B 01 99 22 93 11 11 11 22 3B A6 31 |4...;.."....";.1|
00000310: 35 29 3B 22 CC 4F 41 44 49 4E 47 2E 2E 2E 22 00 |5);".OADING...".|
00000320: 4A 0B 3C 01 99 22 13 90 11 11 4C 4F 41 44 22 C7 |J.<.."....LOAD".|
00000330: 28 33 34 29 22 4D 41 49 4E 22 C7 28 33 34 29 22 |(34)"MAIN".(34)"|
00000340: 2C 38 13 22 3B 3A 89 36 37 30 00 5F 0B 40 01 8B |,8.";:.670._.@..|
00000350: 20 41 24 B3 B1 22 24 22 20 A7 20 20 33 39 30 00 | A$.."$" . 390.|
00000360: 8A 0B 4A 01 99 22 93 20 20 20 20 20 20 20 20 12 |..J..". .|
00000370: C8 4F 4C 44 20 44 4F 57 4E 20 D3 C8 C9 C6 D4 20 |.OLD DOWN ..... |
00000380: 54 4F 20 50 41 55 53 45 2E 22 00 A4 0B 54 01 99 |TO PAUSE."...T..|
00000390: 22 11 11 44 49 52 22 3A 99 22 13 22 3A 47 4C B2 |"..DIR":.".":GL.|
000003A0: 35 31 31 30 00 AD 0B 5E 01 89 36 37 30 00 E7 0B |5110...^..670...|
000003B0: 68 01 97 31 39 38 2C 30 3A 99 22 20 20 20 20 12 |h..198,0:." .|
000003C0: D0 52 45 53 53 20 41 4E 59 20 4B 45 59 20 54 4F |.RESS ANY KEY TO|
000003D0: 20 52 45 54 55 52 4E 20 54 4F 20 4D 45 4E 55 2E | RETURN TO MENU.|
000003E0: 92 22 3A 47 4C B2 30 00 FE 0B 72 01 A1 20 41 24 |.":GL.0...r.. A$|
000003F0: 3A 8B 20 41 24 B2 22 22 20 A7 20 33 37 30 00 08 |:. A$."" . 370..|
00000400: 0C 7C 01 89 20 32 36 30 00 36 0C 86 01 99 22 93 |.|.. 260.6....".|
00000410: 20 20 20 20 20 12 C1 50 50 45 4E 44 20 54 4F 20 | ..PPEND TO |
00000420: 41 4E 20 45 58 49 53 54 49 4E 47 20 C1 D2 C3 20 |AN EXISTING ... |
00000430: 46 49 4C 45 92 22 00 64 0C 90 01 99 22 93 11 20 |FILE.".d....".. |
00000440: 20 CE 4F 57 20 54 48 41 54 20 59 4F 55 20 4B 4E | .OW THAT YOU KN|
00000450: 4F 57 20 54 48 45 20 4E 41 4D 45 53 20 4F 46 20 |OW THE NAMES OF |
00000460: 54 48 45 22 00 9E 0C 9A 01 99 22 46 49 4C 45 53 |THE"......"FILES|
00000470: 20 54 4F 20 42 45 20 C1 D2 C3 44 2C 20 41 4E 53 | TO BE ...D, ANS|
00000480: 57 45 52 20 54 48 45 20 46 4F 4C 4C 4F 57 49 4E |WER THE FOLLOWIN|
00000490: 47 20 20 51 55 45 53 54 49 4F 4E 53 3A 22 00 D6 |G QUESTIONS:"..|
000004A0: 0C A4 01 85 20 22 11 11 11 11 11 11 C1 D2 C3 20 |.... "......... |
000004B0: 46 49 4C 45 20 54 4F 20 42 45 20 41 50 50 45 4E |FILE TO BE APPEN|
000004C0: 44 45 44 20 54 4F 22 3B 46 24 3A 8B 20 46 24 B2 |DED TO";F$:. F$.|
000004D0: 22 22 20 A7 20 8A 00 06 0D AE 01 8B C2 28 32 29 |"" . ........(2)|
000004E0: B1 31 A7 99 22 D0 55 54 20 12 9E CF 55 54 50 55 |.1..".UT ...UTPU|
000004F0: 54 92 05 20 44 49 53 4B 20 49 4E 20 C4 52 49 56 |T.. DISK IN .RIV|
00000500: 45 20 38 2C 30 22 00 16 0D B8 01 8B 20 41 B2 39 |E 8,0"...... A.9|
00000510: 20 A7 20 35 34 30 00 41 0D C2 01 85 20 22 C6 49 | . 540.A.... ".I|
00000520: 4C 45 2C 20 50 41 54 54 45 52 4E 20 4F 52 20 12 |LE, PATTERN OR .|
00000530: 9E D2 C5 D4 D5 D2 CE 92 05 22 3B 46 49 24 28 41 |.........";FI$(A|
00000540: 29 00 57 0D CC 01 8B 20 46 49 24 28 41 29 B2 22 |).W.... FI$(A)."|
00000550: 22 20 A7 20 35 34 30 00 9E 0D D6 01 8B C2 28 32 |" . 540.......(2|
00000560: 29 B1 31 A7 85 22 CF 4E 20 57 48 41 54 20 44 52 |).1..".N WHAT DR|
00000570: 49 56 45 20 43 41 4E 20 54 48 49 53 20 46 49 4C |IVE CAN THIS FIL|
00000580: 45 20 42 45 20 46 4F 55 4E 44 20 20 20 20 28 45 |E BE FOUND (E|
00000590: 58 2E 20 39 2C 30 29 22 3B 44 56 2C 44 52 00 B2 |X. 9,0)";DV,DR..|
000005A0: 0D E0 01 8D 20 35 30 3A 46 44 24 28 41 29 B2 44 |.... 50:FD$(A).D|
000005B0: 52 24 00 C8 0D EA 01 81 20 49 B2 31 20 A4 20 C3 |R$...... I.1 . .|
000005C0: 28 46 49 24 28 41 29 29 00 FA 0D F4 01 8B 20 CA |(FI$(A))...... .|
000005D0: 28 46 49 24 28 41 29 2C 49 2C 31 29 B2 22 20 22 |(FI$(A),I,1)." "|
000005E0: 20 A7 20 54 45 24 28 41 29 B2 54 45 24 28 41 29 | . TE$(A).TE$(A)|
000005F0: AA 22 3F 22 3A 89 20 35 32 30 00 1A 0E FE 01 54 |."?":. 520.....T|
00000600: 45 24 28 41 29 B2 54 45 24 28 41 29 AA CA 28 46 |E$(A).TE$(A)..(F|
00000610: 49 24 28 41 29 2C 49 2C 31 29 00 20 0E 08 02 82 |I$(A),I,1). ....|
00000620: 00 30 0E 12 02 41 B2 41 AA 31 3A 89 20 34 34 30 |.0...A.A.1:. 440|
00000630: 00 44 0E 1C 02 8B 20 46 49 24 28 30 29 B2 22 22 |.D.... FI$(0).""|
00000640: 20 A7 20 8A 00 60 0E 26 02 43 24 B2 22 41 52 43 | . ..`.&.C$."ARC|
00000650: 2F 41 20 41 3A 22 AA 46 24 3A 45 58 24 B2 22 22 |/A A:".F$:EX$.""|
00000660: 00 70 0E 30 02 81 20 49 B2 30 20 A4 20 41 AB 31 |.p.0.. I.0 . A.1|
00000670: 00 8E 0E 3A 02 45 58 24 B2 45 58 24 AA 22 20 22 |...:.EX$.EX$." "|
00000680: AA 46 44 24 28 49 29 AA 54 45 24 28 49 29 00 94 |.FD$(I).TE$(I)..|
00000690: 0E 44 02 82 00 A2 0E 4E 02 43 24 B2 43 24 AA 45 |.D.....N.C$.C$.E|
000006A0: 58 24 00 BE 0E 58 02 99 22 93 11 11 11 22 3B 43 |X$...X.."....";C|
000006B0: 24 3A 99 22 13 22 3A 47 4C B2 35 33 37 30 00 C7 |$:.".":GL.5370..|
000006C0: 0E 62 02 89 36 37 30 00 EA 0E 6C 02 99 22 93 11 |.b..670...l.."..|
000006D0: 11 11 41 52 43 2F 4C 20 41 3A 22 46 24 3A 99 22 |..ARC/L A:"F$:."|
000006E0: 13 22 3A 47 4C B2 35 33 39 30 00 F3 0E 76 02 89 |.":GL.5390...v..|
000006F0: 36 37 30 00 31 0F 80 02 97 20 31 39 38 2C 30 3A |670.1.... 198,0:|
00000700: 99 22 20 20 12 D0 52 45 53 53 20 41 4E 59 20 4B |." ..RESS ANY K|
00000710: 45 59 20 54 4F 20 52 45 54 55 52 4E 20 54 4F 20 |EY TO RETURN TO |
00000720: 4D 41 49 4E 20 4D 45 4E 55 2E 92 22 3A 47 4C B2 |MAIN MENU..":GL.|
00000730: 30 00 48 0F 8A 02 A1 20 41 24 3A 8B 20 41 24 B2 |0.H.... A$:. A$.|
00000740: 22 22 20 A7 20 36 35 30 00 4E 0F 94 02 8A 00 8A |"" . 650.N......|
00000750: 0F 9E 02 97 20 36 33 31 2C 31 33 3A 97 36 33 32 |.... 631,13:.632|
00000760: 2C 37 31 3A 97 20 36 33 33 2C 32 30 37 3A 97 36 |,71:. 633,207:.6|
00000770: 33 35 2C 31 33 3A 97 36 33 36 2C 31 33 3A 97 31 |35,13:.636,13:.1|
00000780: 39 38 2C 35 3A 89 20 31 35 30 00 00 00 |98,5:. 150... |
............. GL.5110 . 360./.... GL.537
0 . 620.C.... GL.5390 . 640.M.(.. 260.X.
2.DR$."".U.<.. DV.8 . DR.0 . DR$."A:"...
F.. DV.8 . DR.1 . DR$."B:"...P.. DV.9 .
DR.0 . DR$."C:".L.Z.. DV.9 . DR.1 . DR$.
"D:"...D.. DV.10. DR.0 . DR$."E:"...N..
DV.10 . DR.1 . DR$."F:".%.X.. DV.11 . DR
.0 . DR$."G:".C.... DV.11 . DR.1 . DR$."
H:".I.....O.....L....: APPEND TO AN ARC
FILE......"... .APPEND TO AN EXISTII
NG ARC FILE.".M....".. PLEASE INSERT
DISK WITH ARC FILE."..."..".. PRESS ..
$.. FOR A DIRECTORY OF DRIVE 8,0.".8.#..
".. PRESS ..SPACE BAR.. TO RETURN TO MAI
N MENU.".E.,..".. ANY OTHER KEY WI
LL CONTINUE.".|.6.. A$:. A$."" . 310...7
.. A$.." " . 320.E.8.."....... PLEASE IN
SERT DISK WITH ARC AID ON IT"...9.."
AND PRESS ANY KEY."...:.. A$:. A$
."" . 314...;.."....";.15);"LOADING...".
J.<.."....LOAD"G(34)"MAIN"G(34)",8.";:.6
70._.@.. A$.."$" . 390...J..". .
HOLD DOWN SHIFT TO PAUSE."...T.."..DIR":
.".":GL.5110...^..670...H..198,0:." .
PRESS ANY KEY TO RETURN TO MENU..":GL.0.
..R.. A$:. A$."" . 370...|.. 260.6....".
.APPEND TO AN EXISTING ARC FILE.".D
....".. NOW THAT YOU KNOW THE NAMES OF
THE"......"FILES TO BE ARCD, ANSWER THE
FOLLOWING QUESTIONS:".V.... "......ARC
FILE TO BE APPENDED TO";F$:. F$."" . ...
....B(2).1.."PUT ..OUTPUT.. DISK IN DRIV
E 8,0"...... A.9 . 540.A.B.. "FILE, PATT
ERN OR ..RETURN..";FI$(A).W.L.. FI$(A)."
" . 540...V..B(2).1.."ON WHAT DRIVE CAN
THIS FILE BE FOUND (EX. 9,0)";DV,DR..
.... 50:FD$(A).DR$.H.... I.1 . C(FI$(A))
...... J(FI$(A),I,1)." " . TE$(A).TE$(A)
."?":. 520.....TE$(A).TE$(A).J(FI$(A),I,
1). .....0...A.A.1:. 440.D.... FI$(0).""
. ..`.&.C$."ARC/A A:".F$:EX$."".P.0.. I
.0 . A.1...:.EX$.EX$." ".FD$(I).TE$(I)..
.D.....N.C$.C$.EX$...X.."....";C$:.".":G
L.5370.G.B..670...L.."....ARC/L A:"F$:."
.":GL.5390...V..670.1.... 198,0:." .PRE
SS ANY KEY TO RETURN TO MAIN MENU..":GL.
0.H.... A$:. A$."" . 650.N.......... 631
,13:.632,71:. 633,207:.635,13:.636,13:.1
98,5:. 150...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL