128 SEQ.EDITOR
FILE INFORMATION
FILENAME(S): 128 SEQ.EDITOR
FILE TYPE(S): PRG
FILE SIZE: 9.3K
FIRST SEEN: 2025-11-02 16:39:39
APPEARS ON: 1 disk(s)
FILE HASH
d2a2db6a3f598c8d9dc93afdd1d2f1950de78cb1fe0ecfd68b8160fdec1f5db8
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C128 Z004 | 128 SEQ.EDITOR | PRG | Treasure Chest - Plattfuss | 11 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 0B 1C 05 00 E7 35 2C 31 35 00 2A 1C 64 00 |.......5,15.*.d.|
00000010: 8F 20 20 20 20 20 20 20 20 20 20 57 52 49 54 54 |. WRITT|
00000020: 45 4E 20 42 59 20 4D 52 2E 44 00 4D 1C 78 00 8F |EN BY MR.D.M.x..|
00000030: 20 20 20 20 20 20 20 46 49 52 45 48 4F 55 53 45 | FIREHOUSE|
00000040: 20 42 42 53 20 39 32 33 2D 33 39 36 37 00 7B 1C | BBS 923-3967.{.|
00000050: 8C 00 97 35 33 32 38 30 2C 30 3A 97 35 33 32 38 |...53280,0:.5328|
00000060: 31 2C 30 3A 8D 36 30 32 30 3A 99 C7 28 31 34 29 |1,0:.6020:..(14)|
00000070: 3B C7 28 38 29 3A 89 33 33 32 30 00 81 1C A0 00 |;.(8):.3320.....|
00000080: 80 00 A8 1C C8 00 97 35 33 32 38 30 2C 30 3A 97 |.......53280,0:.|
00000090: 35 33 32 38 31 2C 30 3A 99 C7 28 31 34 29 3B C7 |53281,0:..(14);.|
000000A0: 28 38 29 3A 8D 34 30 30 00 E2 1C DC 00 99 22 20 |(8):.400......" |
000000B0: D0 4C 45 41 53 45 20 45 4E 54 45 52 20 46 49 4C |.LEASE ENTER FIL|
000000C0: 45 20 4E 41 4D 45 20 42 45 4C 4F 57 22 3A 99 3A |E NAME BELOW":.:|
000000D0: 99 3A 85 22 20 20 20 20 22 3B 46 24 3A 89 32 36 |.:." ";F$:.26|
000000E0: 36 30 00 1C 1D F0 00 8D 34 30 30 3A 99 A3 31 34 |60......400:..14|
000000F0: 29 22 D3 45 4E 44 20 46 49 4C 45 20 54 4F 11 9D |)".END FILE TO..|
00000100: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D A3 A3 A3 A3 A3 |................|
00000110: A3 A3 A3 A3 A3 A3 A3 22 3A 99 3A 99 00 40 1D 04 |.......":.:..@..|
00000120: 01 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |.." |
00000130: 20 20 12 D3 92 43 52 45 45 4E 20 4F 52 22 3A 99 | ...CREEN OR":.|
00000140: 00 64 1D 18 01 99 22 20 20 20 20 20 20 20 20 20 |.d...." |
00000150: 20 20 20 20 20 54 4F 20 12 D0 92 52 49 4E 54 45 | TO ...RINTE|
00000160: 52 20 3F 22 00 6C 1D 2C 01 A1 51 24 00 AC 1D 40 |R ?".l.,..Q$...@|
00000170: 01 8B 51 24 B2 22 53 22 A7 8D 34 30 30 3A 99 22 |..Q$."S"..400:."|
00000180: 11 11 11 11 11 11 20 20 20 20 20 20 20 20 20 53 |...... S|
00000190: 45 4E 44 49 4E 47 20 46 49 4C 45 20 54 4F 20 D3 |ENDING FILE TO .|
000001A0: C3 D2 C5 C5 CE 2E 22 3A 89 34 34 30 00 EC 1D 54 |......":.440...T|
000001B0: 01 8B 51 24 B2 22 50 22 A7 8D 34 30 30 3A 99 22 |..Q$."P"..400:."|
000001C0: 11 11 11 11 11 11 20 20 20 20 20 20 20 20 53 45 |...... SE|
000001D0: 4E 44 49 4E 47 20 46 49 4C 45 20 54 4F 20 D0 D2 |NDING FILE TO ..|
000001E0: C9 CE D4 C5 D2 2E 22 3A 89 34 34 30 00 F5 1D 68 |......":.440...h|
000001F0: 01 89 33 30 30 00 FB 1D 7C 01 80 00 19 1E 90 01 |..300...|.......|
00000200: 99 22 93 22 3B 3A 81 54 B2 30 A4 31 31 39 3A 99 |.".";:.T.0.119:.|
00000210: 22 12 20 92 22 3B 3A 82 54 00 51 1E A4 01 99 22 |". .";:.T.Q...."|
00000220: 13 11 22 3B 3A 99 22 12 20 20 20 20 20 C8 C1 CC |..";:.". ...|
00000230: A0 C2 C2 D3 A0 D3 C5 D1 D5 C5 CE D4 C9 C1 CC A0 |................|
00000240: C6 C9 CC C5 A0 D2 C5 C1 C4 C5 D2 92 22 3A 99 3A |............":.:|
00000250: 8E 00 66 1E B8 01 8B 51 24 B2 22 53 22 A7 44 B2 |..f....Q$."S".D.|
00000260: 33 3A 89 34 38 30 00 79 1E CC 01 44 B2 34 3A 8D |3:.480.y...D.4:.|
00000270: 34 35 36 30 3A 89 35 30 30 00 87 1E E0 01 FE 0B |4560:.500.......|
00000280: 31 3A 99 22 93 22 3B 00 A2 1E F4 01 FE 0D 23 32 |1:.".";.......#2|
00000290: 2C 28 46 24 29 2C 44 30 2C 55 38 2C 52 3A 8D 38 |,(F$),D0,U8,R:.8|
000002A0: 30 30 00 B0 1E 08 02 8B 44 B2 33 A7 44 42 B2 31 |00......D.3.DB.1|
000002B0: 00 C6 1E 1C 02 9F 34 2C 44 2C 37 3A 8B 44 B2 34 |......4,D,7:.D.4|
000002C0: A7 44 42 B2 32 30 00 DA 1E 30 02 A1 5A 24 3A 8B |.DB.20...0..Z$:.|
000002D0: 5A 24 B2 22 50 22 A7 38 38 30 00 EB 1E 44 02 A1 |Z$."P".880...D..|
000002E0: 23 32 2C 41 24 3A 45 31 B2 53 54 00 0C 1F 58 02 |#2,A$:E1.ST...X.|
000002F0: 8B 41 24 B2 C7 28 33 34 29 A7 98 34 2C 22 22 3B |.A$..(34)..4,"";|
00000300: A3 44 42 29 22 22 3B 3A 89 36 36 30 00 17 1F 6C |.DB)"";:.660...l|
00000310: 02 98 34 2C 41 24 3B 00 49 1F 80 02 8B 5A 24 B2 |..4,A$;.I....Z$.|
00000320: 22 41 22 A7 99 3A 99 3A 99 A3 31 30 29 22 12 20 |"A"..:.:..10)". |
00000330: 46 49 4C 45 20 52 45 41 44 20 41 42 4F 52 54 45 |FILE READ ABORTE|
00000340: 44 20 92 22 3A 89 37 38 30 00 5F 1F 94 02 8B 45 |D .":.780._....E|
00000350: 31 B3 B1 30 A7 A0 34 3A A0 32 3A 89 37 30 30 00 |1..0..4:.2:.700.|
00000360: 68 1F A8 02 89 35 36 30 00 94 1F BC 02 99 3A 99 |h....560......:.|
00000370: A3 38 29 22 12 20 46 49 4C 45 20 52 45 41 44 20 |.8)". FILE READ |
00000380: 43 4F 4D 50 4C 45 54 45 44 2E 2E 2E 20 12 22 3A |COMPLETED... .":|
00000390: 89 39 32 30 00 AC 1F D0 02 45 B2 44 53 3A 45 24 |.920.....E.DS:E$|
000003A0: B2 44 53 24 3A 8B 45 B3 B1 30 A7 99 00 B7 1F E4 |.DS$:.E..0......|
000003B0: 02 8B 45 B2 30 A7 8E 00 E7 1F F8 02 99 22 11 11 |..E.0........"..|
000003C0: 22 3A 4A 51 B2 28 34 30 AB 28 C3 28 45 24 29 29 |":JQ.(40.(.(E$))|
000003D0: 29 AD 32 3A 99 3A 99 A3 4A 51 29 22 12 22 3B 45 |).2:.:..JQ)".";E|
000003E0: 24 3B 22 92 22 3A 99 00 07 20 0C 03 A0 32 3A A0 |$;".":... ...2:.|
000003F0: 34 3A A0 31 35 3A 81 54 B2 30 A4 31 35 30 30 3A |4:.15:.T.0.1500:|
00000400: 82 54 3A 89 39 32 30 00 25 20 20 03 99 22 13 11 |.T:.920.% .."..|
00000410: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000420: 11 11 11 11 22 00 54 20 34 03 99 22 20 2D 2D 2D |....".T 4.." ---|
00000430: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000440: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000450: 2D 2D 2D 22 00 89 20 48 03 99 22 20 2D 20 12 D0 |---".. H.." - ..|
00000460: 92 20 50 41 55 53 45 53 20 20 3C 3C 12 C3 D2 92 |. PAUSES <<....|
00000470: 3E 3E 20 43 4F 4E 54 49 4E 55 45 20 12 C1 92 20 |>> CONTINUE ... |
00000480: 41 42 4F 52 54 53 20 2D 22 00 B9 20 5C 03 99 22 |ABORTS -".. \.."|
00000490: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
000004A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000004B0: 2D 2D 2D 2D 2D 2D 2D 22 3B 00 E5 20 5E 03 FE 1A |-------";.. ^...|
000004C0: 30 2C 30 2C 33 39 2C 32 31 2C 31 3A 99 22 13 11 |0,0,39,21,1:."..|
000004D0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000004E0: 11 11 11 22 3B 00 EB 20 60 03 8E 00 02 21 70 03 |...";.. `....!p.|
000004F0: A1 5A 24 3A 8B 5A 24 B3 B1 C7 28 31 33 29 A7 38 |.Z$:.Z$...(13).8|
00000500: 38 30 00 0B 21 84 03 89 35 38 30 00 2E 21 98 03 |80..!...580..!..|
00000510: 99 3A 99 A3 31 30 29 22 12 20 52 45 41 44 20 41 |.:..10)". READ A|
00000520: 4E 4F 54 48 45 52 20 46 49 4C 45 20 92 22 00 36 |NOTHER FILE .".6|
00000530: 21 AC 03 A1 41 24 00 4E 21 C0 03 8B 41 24 B2 22 |!...A$.N!...A$."|
00000540: 59 22 A7 20 FE 0F 3A A0 34 3A 89 32 30 30 00 5F |Y". ..:.4:.200._|
00000550: 21 D4 03 8B 41 24 B2 22 4E 22 A7 33 33 32 30 00 |!...A$."N".3320.|
00000560: 68 21 E8 03 89 39 34 30 00 DD 21 FC 03 8F 20 3A |h!...940..!... :|
00000570: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
00000580: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 20 20 20 |::::::::::::: |
00000590: 20 20 20 20 20 20 20 3A 3A 3A 3A 20 46 49 4C 45 | :::: FILE|
000005A0: 20 57 52 49 54 49 4E 47 20 52 4F 55 54 49 4E 45 | WRITING ROUTINE|
000005B0: 20 3A 3A 3A 3A 20 20 20 20 20 20 20 20 20 20 3A | :::: :|
000005C0: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
000005D0: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 E3 21 |:::::::::::::..!|
000005E0: FD 03 3A 00 20 22 00 04 9C 3A 86 4C 24 28 35 30 |..:. "...:.L$(50|
000005F0: 29 3A 99 C7 28 31 34 37 29 3A 99 3A 99 22 20 20 |):..(147):.:." |
00000600: D4 48 49 53 20 49 53 20 41 20 53 45 51 55 45 4E |.HIS IS A SEQUEN|
00000610: 54 49 41 4C 20 46 49 4C 45 20 57 52 49 54 45 52 |TIAL FILE WRITER|
00000620: 00 50 22 10 04 99 3A 99 22 D9 4F 55 20 4D 41 59 |.P"...:.".OU MAY|
00000630: 20 54 59 50 45 20 55 50 20 54 4F 20 35 30 20 4C | TYPE UP TO 50 L|
00000640: 49 4E 45 53 20 43 4F 4E 54 41 49 4E 49 4E 47 22 |INES CONTAINING"|
00000650: 00 7F 22 24 04 99 3A 99 22 54 48 49 52 54 59 2D |.."$..:."THIRTY-|
00000660: 45 49 47 48 54 2C 20 28 33 38 29 20 43 48 41 52 |EIGHT, (38) CHAR|
00000670: 41 43 54 45 52 53 20 45 41 43 48 2E 22 3A 99 00 |ACTERS EACH.":..|
00000680: AE 22 38 04 99 22 20 20 D4 4F 20 43 4F 4E 43 4C |."8.." .O CONCL|
00000690: 55 44 45 20 57 52 49 54 49 4E 47 2C 20 4F 4E 20 |UDE WRITING, ON |
000006A0: 41 20 4E 45 57 20 4C 49 4E 45 2C 22 3A 99 00 ED |A NEW LINE,":...|
000006B0: 22 4C 04 99 22 54 59 50 45 20 54 48 45 20 57 4F |"L.."TYPE THE WO|
000006C0: 52 44 2C 20 22 3B C7 28 33 34 29 3B 22 45 4E 44 |RD, ";.(34);"END|
000006D0: 22 3B C7 28 33 34 29 3B 22 20 26 20 48 49 54 20 |";.(34);" & HIT |
000006E0: 3C 3C 52 45 54 55 52 4E 3E 3E 20 2E 22 00 14 23 |<<RETURN>> ."..#|
000006F0: 60 04 99 3A 99 3A 99 A3 39 29 22 12 20 48 49 54 |`..:.:..9)". HIT|
00000700: 20 41 4E 59 20 4B 45 59 20 54 4F 20 42 45 47 41 | ANY KEY TO BEGA|
00000710: 4E 20 92 22 00 28 23 74 04 A1 51 24 3A 8B 51 24 |N .".(#t..Q$:.Q$|
00000720: B2 22 22 A7 31 31 34 30 00 45 23 88 04 99 C7 28 |."".1140.E#....(|
00000730: 31 34 37 29 3B 3A 4C B2 30 3A 8D 31 31 38 30 3A |147);:L.0:.1180:|
00000740: 89 31 32 36 30 00 75 23 9C 04 99 3A 99 A3 34 29 |.1260.u#...:..4)|
00000750: 22 3E 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |">--------------|
00000760: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000770: 2D 2D 2D 2D 22 00 A3 23 B0 04 99 A3 34 29 22 20 |----"..#....4)" |
00000780: 30 30 30 30 30 30 30 30 30 31 31 31 31 31 31 31 |0000000001111111|
00000790: 31 31 31 32 32 32 32 32 32 32 32 32 32 33 33 33 |1112222222222333|
000007A0: 33 33 22 00 D1 23 B2 04 99 A3 34 29 22 20 31 32 |33"..#....4)" 12|
000007B0: 33 34 35 36 37 38 39 30 31 32 33 34 35 36 37 38 |3456789012345678|
000007C0: 39 30 31 32 33 34 35 36 37 38 39 30 31 32 33 34 |9012345678901234|
000007D0: 22 00 FF 23 C4 04 99 A3 34 29 22 3E 2D 2D 2D 2D |"..#....4)">----|
000007E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000007F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 |--------------".|
00000800: 07 24 D8 04 99 3A 8E 00 3F 24 EC 04 4C B2 4C AA |.$...:..?$..L.L.|
00000810: 31 3A 97 32 35 31 2C 4C 3A 8B 4C B2 34 38 A7 99 |1:.251,L:.L.48..|
00000820: 3A 99 22 41 54 54 45 4E 54 49 4F 4E 2E 2E 2E 33 |:."ATTENTION...3|
00000830: 20 4C 49 4E 45 53 20 54 4F 20 47 4F 22 3A 99 00 | LINES TO GO":..|
00000840: 74 24 00 05 8B 4C B2 35 31 A7 99 3A 99 A3 31 34 |t$...L.51..:..14|
00000850: 29 22 41 54 54 45 4E 54 49 4F 4E 2E 2E 2E 22 3A |)"ATTENTION...":|
00000860: 99 A3 31 34 29 22 4E 4F 20 4D 4F 52 45 20 4C 49 |..14)"NO MORE LI|
00000870: 4E 45 53 22 00 A4 24 14 05 8B 4C B2 35 31 A7 99 |NES"..$...L.51..|
00000880: 3A 99 A3 35 29 22 2B 2D 2B 2D 2B 2D 20 57 52 49 |:..5)"+-+-+- WRI|
00000890: 54 45 20 43 4F 4D 50 4C 45 54 45 44 20 2D 2B 2D |TE COMPLETED -+-|
000008A0: 2B 2D 2B 22 00 C3 24 28 05 8B 4C B2 35 31 A7 81 |+-+"..$(..L.51..|
000008B0: 51 58 B2 30 A4 32 30 30 30 3A 82 51 58 3A 89 31 |QX.0.2000:.QX:.1|
000008C0: 37 36 30 00 D4 24 3C 05 43 B2 30 3A 4C 24 28 4C |760..$<.C.0:L$(L|
000008D0: 29 B2 22 22 00 EE 24 3E 05 4C 53 24 B2 CA 28 C4 |).""..$>.LS$..(.|
000008E0: 28 4C 29 2C 32 2C C3 28 C4 28 4C 29 29 29 00 0C |(L),2,.(.(L)))..|
000008F0: 25 40 05 8B 4C B3 31 FF A7 99 22 20 20 E2 3B 4C |%@..L.1..." .;L|
00000900: 53 E4 3B E2 3E 20 12 A6 92 9D 22 3B 00 29 25 42 |S.;.> ....";.)%B|
00000910: 05 8B 4C B1 30 39 A7 99 22 20 22 3B 4C 53 24 3B |..L.09.." ";LS$;|
00000920: 22 3E 20 12 A6 92 9D 22 3B 00 3C 25 50 05 41 24 |"> ....";.<%P.A$|
00000930: B2 22 22 3A 56 B2 30 3A 4B 56 B2 30 00 50 25 55 |."":V.0:KV.0.P%U|
00000940: 05 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 33 36 35 |..A$:.A$."".1365|
00000950: 00 68 25 5A 05 4B 56 B2 C6 28 43 24 29 3A 56 B2 |.h%Z.KV..(C$):V.|
00000960: 4B 56 20 AF 20 31 32 37 00 79 25 64 05 8B 56 B2 |KV . 127.y%d..V.|
00000970: 31 33 20 A7 20 31 37 34 32 00 8D 25 78 05 8B 20 |13 . 1742..%x.. |
00000980: 56 20 B2 20 32 30 20 A7 20 31 36 34 30 00 A8 25 |V . 20 . 1640..%|
00000990: 8C 05 8B 20 56 20 B3 33 32 20 AF 20 56 20 B1 39 |... V .32 . V .9|
000009A0: 35 20 A7 20 31 33 36 30 00 C1 25 8E 05 8B 20 4B |5 . 1360..%... K|
000009B0: 56 20 B2 31 36 30 20 A7 20 41 24 B2 C7 28 33 32 |V .160 . A$..(32|
000009C0: 29 00 D7 25 B4 05 99 41 24 3B 22 12 A6 92 9D 22 |)..%...A$;"...."|
000009D0: 3B 3A 43 B2 4F AA 31 00 EA 25 DC 05 4C 24 28 4C |;:C.O.1..%..L$(L|
000009E0: 2B FF FF FF FF FF FF 18 94 89 88 FF 26 F0 05 8B |+...........&...|
000009F0: 43 B2 33 38 A7 99 22 20 22 3A 99 22 12 A6 92 9D |C.38.." ":."....|
00000A00: 22 3B 3A 89 31 32 36 30 00 17 26 40 06 8B 43 B3 |";:.1260..&@..C.|
00000A10: 33 38 A7 31 33 36 30 00 21 26 54 06 89 31 32 36 |38.1360.!&T..126|
00000A20: 30 00 2F 26 68 06 8B 43 B2 30 A7 31 33 36 30 00 |0./&h..C.0.1360.|
00000A30: 47 26 7C 06 8B 4C 24 28 4C 29 B2 22 22 A7 43 B2 |G&|..L$(L)."".C.|
00000A40: 30 3A 89 31 33 36 30 00 76 26 90 06 8B C3 28 4C |0:.1360.v&....(L|
00000A50: 24 28 4C 29 29 B2 31 A7 43 B2 30 3A 4C 24 28 4C |$(L)).1.C.0:L$(L|
00000A60: 29 B2 22 22 3A 99 41 24 3B 22 12 A6 92 9D 22 3B |)."":.A$;"....";|
00000A70: 3A 89 31 33 36 30 00 86 26 A4 06 99 41 24 3B 22 |:.1360..&...A$;"|
00000A80: 12 A6 92 9D 22 3B 00 A0 26 B8 06 51 24 B2 4C 24 |....";..&..Q$.L$|
00000A90: 28 4C 29 3A 4C 4C B2 28 C3 28 51 24 29 AB 31 29 |(L):LL.(.(Q$).1)|
00000AA0: 00 C1 26 CC 06 4C 24 28 4C 29 B2 CA 28 51 24 2C |..&..L$(L)..(Q$,|
00000AB0: 31 2C 4C 4C 29 3A 43 B2 43 AB 31 3A 89 31 33 36 |1,LL):C.C.1:.136|
00000AC0: 30 00 F8 26 CE 06 8B 20 4C 24 28 4C 29 B2 22 45 |0..&... L$(L)."E|
00000AD0: 4E 44 22 20 A7 20 97 32 35 31 2C 4C AB 31 3A 99 |ND" . .251,L.1:.|
00000AE0: 22 9D 9D 9D 9D 20 20 20 20 20 22 3A FE 0B 31 3A |".... ":..1:|
00000AF0: 99 3A 89 20 31 37 36 30 00 0E 27 D0 06 8B 20 4C |.:. 1760..'... L|
00000B00: 24 28 4C 29 B3 B1 22 22 20 A7 31 37 34 38 00 2B |$(L).."" .1748.+|
00000B10: 27 D2 06 8B 20 4C 24 28 4C 29 B2 22 22 20 A7 20 |'... L$(L)."" . |
00000B20: 4C 24 28 4C 29 B2 C7 28 31 33 29 00 34 27 D4 06 |L$(L)..(13).4'..|
00000B30: 99 22 20 22 00 3E 27 D6 06 89 31 32 36 30 00 6D |." ".>'...1260.m|
00000B40: 27 E0 06 99 22 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |'..." ==========|
00000B50: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000B60: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 00 90 27 |============"..'|
00000B70: F4 06 99 A3 38 29 22 C6 C9 CC C5 A0 C5 C4 C9 D4 |....8)".........|
00000B80: CF D2 A0 C5 C4 C9 D4 A0 D2 CF D5 D4 C9 CE C5 22 |..............."|
00000B90: 00 B5 27 F6 06 99 A3 38 29 22 A3 A3 A3 A3 A3 A3 |..'....8)"......|
00000BA0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000BB0: A3 A3 22 3A 99 00 E0 27 F8 06 99 A3 35 29 22 3C |..":...'....5)"<|
00000BC0: C5 3E 44 49 54 20 20 20 20 20 3C CC 3E 49 53 54 |.>DIT <.>IST|
00000BD0: 20 20 20 20 3C D0 3E 52 45 56 49 45 57 22 3A 99 | <.>REVIEW":.|
00000BE0: 00 0C 28 FA 06 99 A3 35 29 22 3C C1 3E 42 4F 52 |..(....5)"<.>BOR|
00000BF0: 54 20 20 20 20 3C D3 3E 41 56 45 20 20 20 20 3C |T <.>AVE <|
00000C00: C3 3E 4F 4E 54 49 4E 55 45 22 3A 99 00 32 28 FC |.>ONTINUE":..2(.|
00000C10: 06 FF A3 35 29 22 3C 3F 3E C8 45 4C 50 20 20 20 |...5)"<?>.ELP |
00000C20: 20 20 3C C4 3E 45 4C 45 54 45 20 41 20 4C 49 4E | <.>ELETE A LIN|
00000C30: 45 22 00 3A 28 FE 06 99 3A 99 00 5C 28 80 07 99 |E".:(...:..\(...|
00000C40: 22 20 20 53 20 45 20 4C 20 45 20 43 20 54 20 3D |" S E L E C T =|
00000C50: 3E 22 3B 22 20 20 20 9D 9D 9D 22 3B 00 70 28 94 |>";" ...";.p(.|
00000C60: 07 A1 51 24 3A 8B 51 24 B2 22 22 A7 31 39 34 30 |..Q$:.Q$."".1940|
00000C70: 00 76 28 A8 07 8F 00 8B 28 BC 07 99 22 20 12 22 |.v(.....(..." ."|
00000C80: 3B 51 24 3B 22 92 22 3A FE 0B 31 00 9C 28 D0 07 |;Q$;".":..1..(..|
00000C90: 8B 51 24 B2 22 45 22 A7 32 31 36 30 00 AD 28 E4 |.Q$."E".2160..(.|
00000CA0: 07 8B 51 24 B2 22 4C 22 A7 32 32 36 30 00 BE 28 |..Q$."L".2260..(|
00000CB0: F8 07 8B 51 24 B2 22 50 22 A7 32 32 38 30 00 D5 |...Q$."P".2280..|
00000CC0: 28 0C 08 8B 51 24 B2 22 41 22 A7 99 22 93 22 3A |(...Q$."A"..".":|
00000CD0: FE 0B 32 3A 8A 00 F3 28 20 08 8B 51 24 B2 22 53 |..2:...( ..Q$."S|
00000CE0: 22 20 AF 20 45 FF 24 B3 B1 22 41 50 50 22 A7 32 |" . E.$.."APP".2|
00000CF0: 33 30 30 00 10 29 22 08 8B 51 24 B2 22 53 22 20 |300..)"..Q$."S" |
00000D00: AF 20 45 45 24 B2 22 41 50 50 22 A7 35 32 38 30 |. EE$."APP".5280|
00000D10: 00 21 29 34 08 8B 51 24 B2 22 3F 22 A7 31 37 36 |.!)4..Q$."?".176|
00000D20: 30 00 32 29 48 08 8B 51 24 B2 22 43 22 A7 32 34 |0.2)H..Q$."C".24|
00000D30: 36 30 00 44 29 4A 08 8B 51 24 B2 22 44 22 A7 8D |60.D)J..Q$."D"..|
00000D40: 32 31 34 32 00 54 29 5C 08 99 22 91 91 22 3A 89 |2142.T)\.."..":.|
00000D50: 31 39 32 30 00 D0 29 5E 08 99 3A 85 22 44 45 4C |1920..)^..:."DEL|
00000D60: 45 54 45 20 57 48 49 43 48 20 4C 49 4E 45 22 3B |ETE WHICH LINE";|
00000D70: 57 4C 24 3A 57 4C B2 C5 28 57 4C 24 29 3A 4C 24 |WL$:WL..(WL$):L$|
00000D80: 28 57 4C 29 B2 22 22 3A 51 51 24 B2 22 91 4C 49 |(WL)."":QQ$.".LI|
00000D90: 4E 45 20 4E 55 4D 42 45 52 20 22 AA 57 4C 24 AA |NE NUMBER ".WL$.|
00000DA0: 22 20 44 45 4C 45 54 45 44 2E 2E 2E 22 3A 99 51 |" DELETED...":.Q|
00000DB0: 51 24 3B 3A FE 0B 31 3A 81 41 51 B2 31 A4 C3 28 |Q$;:..1:.AQ.1..(|
00000DC0: 51 51 24 29 3A 99 C7 28 32 30 29 3B 3A 82 41 51 |QQ$):..(20);:.AQ|
00000DD0: 00 E9 29 60 08 81 20 44 44 B2 57 4C 20 A4 20 28 |..)`.. DD.WL . (|
00000DE0: C2 28 32 35 31 29 29 AB 31 00 F7 29 62 08 4C 24 |.(251)).1..)b.L$|
00000DF0: 28 44 5C FF FF FF FF FF F7 FF FF FF FF FF FF FF |(D\.............|
00000E00: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00000E10: FF FF FF FF FF DF FF FF 36 FF FF FF FF FF FF 67 |........6......g|
00000E20: FF F5 35 FF FF E7 FF FF FF FF FF FF FF FF FF F7 |..5.............|
00000E30: E6 FF FF DF C2 FF 36 FF FF FF FF FF 37 FF FF FF |......6.....7...|
00000E40: FF FF FF FF 37 FF FF FF FF FF FC FF 33 FF FF FF |....7.......3...|
00000E50: FF FF FF F4 FF F4 FF 33 FF F3 FF FF AD 2D FF FF |.......3.....-..|
00000E60: FF FF ED AD FF FF FF FF FF FF FF FF FF FF F3 FF |................|
00000E70: F2 FF FF FF 33 FF FF 2E FF FF FF FF FF FF FF FF |....3...........|
00000E80: FF FF FF F3 FF F3 FF F3 FF FF FF FF FF FF FF FF |................|
00000E90: FF FF F2 FF 22 6E D7 FF FF FF FF FF FF FF FF FF |...."n..........|
00000EA0: FF FF F3 2B FF FF FF FF FF FF FF AE FF FF FF FF |...+............|
00000EB0: FF FF FF FF F3 FF F3 FF F3 FF FF FF FF 2E FF FF |................|
00000EC0: FF FA FF FF FF 33 FF FF F3 FF FF EE FF FF FF FF |.....3..........|
00000ED0: FF FB FF FF FF 23 FF FF FF FF FF FD FF FA FF 33 |.....#.........3|
00000EE0: FF FF 99 00 F3 2A D6 08 81 54 B2 31 A4 C2 28 32 |.....*...T.1..(2|
00000EF0: 35 31 29 00 0C 2B D8 08 54 24 B2 CA 28 C4 28 54 |51)..+..T$..(.(T|
00000F00: 29 2C 32 2C C3 28 C4 28 54 29 29 29 00 20 2B DA |),2,.(.(T))). +.|
00000F10: 08 8B 54 B1 30 39 A7 99 54 24 3B 22 20 2E 22 3B |..T.09..T$;" .";|
00000F20: 00 37 2B DC 08 8B 54 B3 31 30 A7 99 A3 31 29 54 |.7+...T.10...1)T|
00000F30: 24 3B 22 20 2E 22 3B 00 53 2B DD 08 8B 4C 24 28 |$;" .";.S+...L$(|
00000F40: 54 29 B2 C7 28 31 33 29 A7 99 22 20 22 3A 89 32 |T)..(13).." ":.2|
00000F50: 32 37 34 00 69 2B DE 08 8B 4C 24 28 54 29 B3 B1 |274.i+...L$(T)..|
00000F60: 22 22 A7 99 4C 24 28 54 29 00 86 2B E0 08 8B 4C |""..L$(T)..+...L|
00000F70: 24 28 54 29 B2 22 22 A7 99 22 12 20 44 45 4C 45 |$(T).""..". DELE|
00000F80: 54 45 44 20 92 22 00 8D 2B E2 08 82 54 00 99 2B |TED ."..+...T..+|
00000F90: E4 08 99 3A 89 33 32 36 30 00 BF 2B E8 08 99 3A |...:.3260..+...:|
00000FA0: 99 3A 81 54 B2 31 A4 C2 28 32 35 31 29 3A 99 4C |.:.T.1..(251):.L|
00000FB0: 24 28 54 29 3A 82 54 3A 99 3A 89 33 32 36 30 00 |$(T):.T:.:.3260.|
00000FC0: DA 2B FC 08 8B 45 4D 24 B2 22 45 44 49 54 20 4D |.+...EM$."EDIT M|
00000FD0: 4F 44 45 22 A7 20 34 30 38 30 00 FD 2B 10 09 99 |ODE". 4080..+...|
00000FE0: 22 93 11 1D 45 4E 54 45 52 20 54 48 45 20 46 49 |"...ENTER THE FI|
00000FF0: 4C 45 53 20 4E 41 4D 45 22 3A FF 9A FF 00 FF EC |LES NAME":......|
00001000: 24 FF 99 A3 91 32 29 22 3D 9D FD 9E 20 22 3B 9A |$....2)"=... ";.|
00001010: 85 46 24 3A FF 32 37 30 8F FF FF FF FF FF FF 77 |.F$:.270.......w|
00001020: C9 8F FF 8F 97 9F 8F 8D FF FF 8D FF 98 FF FF FF |................|
00001030: FF FF FF FF FF FF FF FF 98 FF FF FF FF FF FF 98 |................|
00001040: FF FF FF FF FF FF FF FF FF FF FF FF FF 7B FF 75 |.............{.u|
00001050: FF FF 88 8D 71 FF FF 10 FF FF FF FF 89 8D FF FF |....q...........|
00001060: 98 99 FF FF 71 FF FF FF FF 8F FF 77 FF FF 7B FF |....q......w..{.|
00001070: FF FF B7 FF FF 77 C9 8F FF FF FF 99 87 9F FF 9D |.....w..........|
00001080: FF 99 FF 6B FF 99 97 FF 9D FF FF FF 77 FF 9D FF |...k........w...|
00001090: FF FF FF FF BB FF FF 99 FF 98 FF 75 FF FF FF 71 |...........u...q|
000010A0: FF FF FF 79 79 FF 71 FF 98 FF FF FF FF FF FF FF |...yy.q.........|
000010B0: 9D FF FF FF FF C9 88 FF 7F FF 88 C1 97 FF 99 8F |................|
000010C0: FF FF FF FF FF FF 89 FF FF 94 FF FF FF 98 FF FF |................|
000010D0: FF FF FF FF FF FF FF FF FF 98 0D FF D8 9F 34 29 |..............4)|
000010E0: 22 12 20 46 49 4C 45 20 53 41 56 45 44 20 22 3A |". FILE SAVED ":|
000010F0: 81 54 B2 30 A4 35 30 30 3A 82 54 3A 89 32 35 36 |.T.0.500:.T:.256|
00001100: 30 00 0E 2D 9C 09 4B B2 C2 28 32 35 31 29 00 28 |0..-..K..(251).(|
00001110: 2D B0 09 99 3A 99 3A 81 54 B2 31 20 A4 20 4B 3A |-...:.:.T.1 . K:|
00001120: 4B 24 B2 4C 24 28 54 29 00 3E 2D C4 09 4B 54 B2 |K$.L$(T).>-..KT.|
00001130: C3 28 4B 24 29 3A 54 47 24 B2 C4 28 54 29 00 55 |.(K$):TG$..(T).U|
00001140: 2D C6 09 54 24 B2 CA 28 54 47 24 2C 32 2C C3 28 |-..T$..(TG$,2,.(|
00001150: 54 47 24 29 29 00 71 2D C8 09 8B C3 28 54 24 29 |TG$)).q-....(T$)|
00001160: B2 31 A7 99 22 20 20 22 3B 54 24 3B 22 3E 20 22 |.1.." ";T$;"> "|
00001170: 3B 00 8C 2D CA 09 8B C3 28 54 24 29 B2 32 A7 99 |;..-....(T$).2..|
00001180: 22 20 22 3B 54 24 3B 22 3E 20 22 3B 00 9F 2D D8 |" ";T$;"> ";..-.|
00001190: 09 99 CA 28 4B 24 2C 32 2C 4B 54 29 3A 82 54 00 |...(K$,2,KT):.T.|
000011A0: BE 2D EC 09 4C B2 C2 28 32 35 31 29 3A 43 B2 C2 |.-..L..(251):C..|
000011B0: 28 32 35 32 29 3A A0 32 3A 89 31 32 36 30 00 E0 |(252):.2:.1260..|
000011C0: 2D 00 0A 99 3A 99 A3 31 30 29 22 D7 52 49 54 45 |-...:..10)".RITE|
000011D0: 20 41 4E 4F 54 48 45 52 20 46 49 4C 45 20 3F 22 | ANOTHER FILE ?"|
000011E0: 00 FE 2D 14 0A A1 51 24 3A 8B 51 24 B3 B1 22 59 |..-...Q$:.Q$.."Y|
000011F0: 22 AF 51 24 B3 B1 22 4E 22 A7 32 35 38 30 00 12 |".Q$.."N".2580..|
00001200: 2E 28 0A 8B 51 24 B2 22 59 22 A7 9C 3A 89 31 30 |.(..Q$."Y"..:.10|
00001210: 32 30 00 26 2E 3C 0A 8B 51 24 B2 22 4E 22 A7 9C |20.&.<..Q$."N"..|
00001220: 3A 89 33 33 32 30 00 2C 2E 50 0A 80 00 48 2E 64 |:.3320.,.P...H.d|
00001230: 0A 99 C7 28 31 34 37 29 3A 99 A3 30 30 29 22 D7 |...(147):..00)".|
00001240: 41 49 54 2E 2E 2E 2E 22 00 7C 2E 78 0A 99 22 13 |AIT....".|.x..".|
00001250: 11 11 11 11 11 11 11 11 11 11 22 3A 99 A3 37 29 |..........":..7)|
00001260: 22 43 48 45 43 4B 49 4E 47 20 46 49 4C 45 53 27 |"CHECKING FILES'|
00001270: 20 45 58 49 53 54 45 4E 43 45 2E 22 00 97 2E 8C | EXISTENCE."....|
00001280: 0A FE 0D 23 32 2C 28 46 24 29 2C 44 30 2C 55 38 |...#2,(F$),D0,U8|
00001290: 2C 52 3A 8D 37 32 30 00 AA 2E A0 0A A0 32 3A A0 |,R:.720......2:.|
000012A0: 31 35 3A 99 C7 28 31 34 37 29 00 B3 2E B4 0A 89 |15:..(147)......|
000012B0: 32 34 30 00 B9 2E C8 0A 80 00 D4 2E DC 0A 99 C7 |240.............|
000012C0: 28 31 34 37 29 3A 99 3A 99 22 20 D7 41 49 54 2E |(147):.:." .AIT.|
000012D0: 2E 2E 2E 22 00 06 2F F0 0A 99 22 13 11 11 11 11 |..."../...".....|
000012E0: 11 11 11 11 11 11 22 3A 99 A3 38 29 22 43 48 45 |......":..8)"CHE|
000012F0: 43 4B 49 4E 47 20 46 4F 52 20 44 55 50 4C 49 43 |CKING FOR DUPLIC|
00001300: 41 54 49 4F 4E 22 00 1C 2F 04 0B FE 0D 23 32 2C |ATION"../....#2,|
00001310: 28 46 24 29 2C 44 30 2C 55 38 2C 52 00 2C 2F 18 |(F$),D0,U8,R.,/.|
00001320: 0B 45 B2 44 53 3A 45 24 B2 44 53 24 00 41 2F 2C |.E.DS:E$.DS$.A/,|
00001330: 0B 8B 45 B3 B1 30 AF 45 B3 B1 36 32 A7 33 32 30 |..E..0.E..62.320|
00001340: 30 00 59 2F 40 0B 8B 45 B2 36 32 A7 99 C7 28 31 |0.Y/@..E.62...(1|
00001350: 34 37 29 3A 89 32 33 36 30 00 7D 2F 54 0B 8B 45 |47):.2360.}/T..E|
00001360: B2 30 A7 99 3A 99 A3 31 32 29 22 54 48 41 54 20 |.0..:..12)"THAT |
00001370: 46 49 4C 45 20 45 58 49 53 54 53 2E 22 00 B8 2F |FILE EXISTS."../|
00001380: 68 0B 8B 45 B2 30 A7 99 3A 99 A3 39 29 22 53 43 |h..E.0..:..9)"SC|
00001390: 52 41 54 43 48 20 44 54 48 45 20 4F 4C 44 20 43 |RATCH DTHE OLD C|
000013A0: 4F 50 59 3F 9D 9D 9D 9D 9D 9D 9D 9D 9D 11 A3 A3 |OPY?............|
000013B0: A3 A3 A3 A3 A3 A3 A3 22 00 D6 2F 7C 0B A1 51 24 |......."../|..Q$|
000013C0: 3A 8B 51 24 B3 B1 22 59 22 AF 51 24 B3 B1 22 4E |:.Q$.."Y".Q$.."N|
000013D0: 22 A7 32 39 34 30 00 E7 2F 90 0B 8B 51 24 B2 22 |".2940../...Q$."|
000013E0: 4E 22 A7 33 31 36 30 00 F8 2F A4 0B 8B 51 24 B2 |N".3160../...Q$.|
000013F0: 22 59 22 A7 33 30 30 30 00 24 30 B8 0B 99 C7 28 |"Y".3000.$0....(|
00001400: 31 34 37 29 3A 99 3A 99 3A 99 A3 31 30 29 22 53 |147):.:.:..10)"S|
00001410: 43 52 41 54 43 40 20 4F 4C 44 20 43 4F 50 59 20 |CRATC@ OLD COPY |
00001420: 21 21 21 22 00 40 30 CC 0B 99 3A 99 A3 31 33 29 |!!!".@0...:..13)|
00001430: 22 41 52 45 20 59 4F 55 20 53 55 52 45 20 3F 22 |"ARE YOU SURE ?"|
00001440: 00 5E 30 E0 0B A1 51 24 3A 8B 51 24 B3 B1 22 59 |.^0...Q$:.Q$.."Y|
00001450: 22 AF 51 24 B3 B1 22 4E 22 A7 33 30 34 30 00 6F |".Q$.."N".3040.o|
00001460: 30 F4 0B 8B 51 24 B2 22 4E 22 A7 33 31 36 30 00 |0...Q$."N".3160.|
00001470: 80 30 08 0C 8B 51 24 B2 22 59 22 A7 33 31 30 30 |.0...Q$."Y".3100|
00001480: 00 B0 30 1C 0C 99 22 93 11 11 11 11 11 11 11 11 |..0...".........|
00001490: 11 11 22 3A 99 A3 39 29 22 D3 43 52 41 54 43 48 |..":..9)".CRATCH|
000014A0: 49 4E 47 20 4F 4C 44 20 43 4F 50 59 2E 2E 2E 22 |ING OLD COPY..."|
000014B0: 00 C4 30 30 0C A0 31 35 3A A0 32 3A A0 34 3A F2 |..00..15:.2:.4:.|
000014C0: 28 46 24 29 00 F1 30 44 0C 99 3A 99 A3 31 30 29 |(F$)..0D..:..10)|
000014D0: 22 4F 4C 44 20 43 4F 50 59 20 53 43 52 41 54 43 |"OLD COPY SCRATC|
000014E0: 48 45 44 2E 2E 2E 22 3A 99 3A 99 3A 89 32 33 38 |HED...":.:.:.238|
000014F0: 30 00 15 31 58 0C 99 22 93 11 1D 45 4E 54 45 52 |0..1X.."...ENTER|
00001500: 20 41 20 4E 45 57 20 46 49 4C 45 20 4E 41 4D 45 | A NEW FILE NAME|
00001510: 22 3A 99 3A 99 00 3A 31 6C 0C 99 A3 31 32 29 22 |":.:..:1l...12)"|
00001520: 3D 3D 3D 3E 20 22 3B 3A 85 22 20 20 9D 9D 20 20 |===> ";:." .. |
00001530: 22 3B 46 24 3A 89 32 37 38 30 00 68 31 80 0C 99 |";F$:.2780.h1...|
00001540: 22 11 11 22 3A 4A 51 B2 28 34 30 AB 28 C3 28 45 |"..":JQ.(40.(.(E|
00001550: 24 29 29 29 AD 32 3A 99 3A 99 A3 4A 51 29 22 12 |$))).2:.:..JQ)".|
00001560: 22 3B 45 24 3B 22 92 22 00 72 31 94 0C FE 0F 3A |";E$;".".r1....:|
00001570: A0 34 00 80 31 A8 0C FE 0B 33 3A 89 31 37 36 30 |.4..1....3:.1760|
00001580: 00 A4 31 BC 0C 99 3A 99 22 20 20 53 20 45 20 4C |..1...:." S E L|
00001590: 20 45 20 43 20 54 20 3D 3E 22 3B 22 20 20 20 9D | E C T =>";" .|
000015A0: 9D 9D 22 3B 00 AE 31 D0 0C 89 31 39 34 30 00 B4 |..";..1...1940..|
000015B0: 31 E4 0C 8F 00 CF 31 F8 0C FE 1A 30 2C 30 2C 33 |1.....1....0,0,3|
000015C0: 39 2C 32 34 3A 99 22 93 11 11 11 11 11 11 22 00 |9,24:.".......".|
000015D0: 44 32 0C 0D 8F 20 FF FF FF FF FF FF FF FF FF FF |D2... ..........|
000015E0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
000015F0: FF FF FF FF 20 20 20 20 20 20 20 20 20 20 FF FF |.... ..|
00001600: FF FF FF 20 45 44 49 54 4F 52 20 4D 41 49 4E 20 |... EDITOR MAIN |
00001610: 4D 45 4E 55 20 FF FF FF FF FF FF FF 20 20 20 20 |MENU ....... |
00001620: 20 20 20 20 20 20 FF FF FF FF FF FF FF FF FF FF | ..........|
00001630: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001640: FF FF FF FF 00 4A 32 0D 0D 3A 00 93 32 10 0D 99 |.....J2..:..2...|
00001650: A3 31 30 29 22 C8 C1 CC A0 C2 C2 D3 A0 C6 C9 CC |.10)"...........|
00001660: C5 A0 CD C1 CE C1 C7 C5 D2 11 9D 9D 9D 9D 9D 9D |................|
00001670: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D A3 A3 |................|
00001680: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00001690: A3 A3 22 00 9B 32 20 0D 99 3A 99 00 E9 32 34 0D |.."..2 ..:...24.|
000016A0: 99 A3 31 32 29 22 28 D2 29 45 41 44 20 20 28 D7 |..12)"(.)EAD (.|
000016B0: 29 52 49 54 45 22 3A 99 3A 99 A3 31 32 29 22 28 |)RITE":.:..12)"(|
000016C0: C5 29 44 49 54 20 20 28 C1 29 50 50 45 4E 44 22 |.)DIT (.)PPEND"|
000016D0: 3A 99 3A 99 A3 FF 34 FF E2 28 C4 29 FF 52 45 43 |:.:...4..(.).REC|
000016E0: 55 FF 53 FF E2 3A 99 3A 99 00 99 33 48 0D 9D FF |U.S..:.:...3H...|
000016F0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF DA FF |................|
00001700: D6 FF FF FF D0 EE FF FF FF FF FF FF FF FF D2 D0 |................|
00001710: DD FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001720: FF EE FF DE FF D2 D0 DD FF D6 FF FF FF FF FF FF |................|
00001730: FF FF FF FF FF FF FF FF FF FF FF FF EA FB FF E7 |................|
00001740: FF FF FF FF FF FA 36 E7 FF 7D FF FF FF F5 FF FF |......6..}......|
00001750: FF FF FF FF FF FF FA 36 E7 FF 40 08 94 01 0E CA |.......6..@.....|
00001760: FF FF C8 80 DA 4C FF 1F FF D4 8B 40 08 EE 01 0E |.....L.....@....|
00001770: C4 C0 40 C8 88 FF 45 FF 1F FF D4 8B 40 08 9E 01 |..@...E.....@...|
00001780: 0E 45 DE 4A C8 81 FF 45 8F 1F FF D4 8B 40 08 E0 |.E.J...E.....@..|
00001790: 01 FF E0 C1 D8 81 FF 4C F8 1F FF D5 9B 40 08 FF |.......L.....@..|
000017A0: A1 FF FF 01 FF A0 58 FF 81 40 45 F9 1F FF 45 DA |......X..@E...E.|
000017B0: 40 C8 81 A0 45 69 17 FF 01 FF CC CC CC CC CC C4 |@...Ei..........|
000017C0: 00 51 FF 05 FF FF A8 40 81 68 9D 9C 99 BD FF FF |.Q.....@.h......|
000017D0: 20 44 49 53 4B 20 C4 49 52 45 43 54 4F 52 59 20 | DISK .IRECTORY |
000017E0: 92 22 00 02 34 D8 0D 99 3A 99 A3 31 31 29 22 54 |."..4...:..11)"T|
000017F0: 4F 20 48 41 4C 54 20 4C 49 53 54 49 4E 47 2E 2E |O HALT LISTING..|
00001800: 2E 22 00 37 34 DA 0D 99 3A 99 A3 38 29 22 D5 53 |.".74...:..8)".S|
00001810: 45 20 54 48 45 20 28 CE CF 20 D3 C3 D2 CF CC CC |E THE (.. ......|
00001820: 29 20 4B 45 59 2E 22 3A 99 3A 99 3A FE 0B 33 3A |) KEY.":.:.:..3:|
00001830: FE 0C 44 30 2C 55 38 00 3D 34 DB 0D 99 00 65 34 |..D0,U8.=4....e4|
00001840: DC 0D 99 A3 36 29 22 12 20 20 20 20 20 20 20 20 |....6)". |
00001850: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001860: 20 20 20 20 22 00 8D 34 DE 0D 99 A3 36 29 22 12 | "..4....6)".|
00001870: 20 20 20 20 44 49 52 45 43 54 4F 52 59 20 46 49 | DIRECTORY FI|
00001880: 4E 49 53 48 45 44 2E 2E 2E 20 20 20 22 00 B5 34 |NISHED... "..4|
00001890: E0 0D 99 A3 36 29 22 12 20 54 59 50 45 20 41 4E |....6)". TYPE AN|
000018A0: 59 20 4B 45 59 20 46 4F 52 20 4D 41 49 4E 20 4D |Y KEY FOR MAIN M|
000018B0: 45 4E 55 20 22 00 DE 34 E2 0D 99 A3 36 29 22 12 |ENU "..4....6)".|
000018C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000018D0: 20 20 20 20 20 20 20 20 20 20 20 20 92 22 00 F2 | ."..|
000018E0: 34 E4 0D A1 51 24 3A 8B 51 24 B2 22 22 A7 33 35 |4...Q$:.Q$."".35|
000018F0: 35 36 00 FC 34 E6 0D 89 33 33 32 30 00 2E 35 E8 |56..4...3320..5.|
00001900: 0D 9C 3A 99 22 93 22 3A 99 A3 34 29 22 20 D4 48 |..:.".":..4)" .H|
00001910: 49 53 20 52 4F 55 54 49 4E 45 20 41 4C 4C 4F 57 |IS ROUTINE ALLOW|
00001920: 53 20 59 4F 55 20 54 4F 20 45 44 49 54 22 00 42 |S YOU TO EDIT".B|
00001930: 35 FC 0D 45 4D 24 B2 22 45 44 49 54 20 4D 4F 44 |5..EM$."EDIT MOD|
00001940: 45 22 00 6D 35 10 0E 99 A3 34 29 22 45 58 49 53 |E".m5....4)"EXIS|
00001950: 54 49 4E 47 20 53 45 51 55 45 4E 54 49 41 4C 20 |TING SEQUENTIAL |
00001960: 46 49 4C 45 53 20 54 41 4B 45 4E 20 22 00 98 35 |FILES TAKEN "..5|
00001970: 24 0E 99 A3 34 29 22 46 52 4F 4D 20 59 4F 55 52 |$...4)"FROM YOUR|
00001980: 20 44 49 53 4B 2C 20 54 48 45 4E 20 52 45 53 54 | DISK, THEN REST|
00001990: 4F 52 45 20 54 48 45 22 00 C6 35 38 0E 99 A3 34 |ORE THE"..58...4|
000019A0: 29 22 44 41 54 41 20 54 4F 20 54 48 45 20 53 41 |)"DATA TO THE SA|
000019B0: 4D 45 20 4F 52 20 41 4E 4F 54 48 45 52 20 44 49 |ME OR ANOTHER DI|
000019C0: 53 4B 2E 22 3A 99 00 FB 35 4C 0E 99 A3 34 29 22 |SK.":...5L...4)"|
000019D0: C5 4E 54 45 52 20 54 48 45 20 46 49 4C 45 20 4E |.NTER THE FILE N|
000019E0: 41 4D 45 2E 2E 2E 22 3B 3A 85 46 24 3A 99 22 93 |AME...";:.F$:.".|
000019F0: 11 11 11 11 11 11 11 11 11 11 22 00 1F 36 60 0E |.........."..6`.|
00001A00: 99 A3 31 33 29 22 50 4C 45 41 53 45 20 57 41 49 |..13)"PLEASE WAI|
00001A10: 54 2E 2E 2E 22 3A A0 31 35 3A A0 32 3A A0 34 00 |T...":.15:.2:.4.|
00001A20: 35 36 74 0E FE 0D 23 F2 2C 28 46 24 29 2C 44 30 |56t...#.,(F$),D0|
00001A30: 2C 55 38 2C 52 00 45 36 88 0E 45 B2 44 53 3A 45 |,U8,R.E6..E.DS:E|
00001A40: 24 B2 44 53 24 00 74 36 9C 0E 8B 45 B2 30 A7 99 |$.DS$.t6...E.0..|
00001A50: 22 93 11 11 11 11 11 11 11 11 11 22 3A 99 A3 31 |"..........":..1|
00001A60: 35 29 22 4C 4F 41 44 49 4E 47 2E 2E 2E 22 3A 89 |5)"LOADING...":.|
00001A70: 33 38 30 30 00 A4 36 B0 0E 99 22 11 11 22 3A 4A |3800..6..."..":J|
00001A80: 51 B2 28 34 30 AB 28 C3 28 45 24 29 29 29 AD 32 |Q.(40.(.(E$))).2|
00001A90: 3A 99 3A 99 A3 4A 51 29 22 12 22 3B 45 24 3B 22 |:.:..JQ)".";E$;"|
00001AA0: 92 22 3A 99 00 B8 36 C4 0E FE 0F 3A A0 34 3A FE |.":...6....:.4:.|
00001AB0: 0B 32 3A 89 33 33 32 30 00 D1 36 D8 0E 86 4C 24 |.2:.3320..6...L$|
00001AC0: 28 32 35 30 29 2C 41 24 28 31 32 30 FF 3A 4C B2 |(250),A$(120.:L.|
00001AD0: 30 00 F1 36 EC 0E 4C B2 4C AA 31 3A 4C 24 28 4C |0..6..L.L.1:L$(L|
00001AE0: 29 B2 22 22 3A 41 24 B2 22 22 3A 97 32 35 31 2C |)."":A$."":.251,|
00001AF0: 4C 00 F7 36 00 0F 8F 00 09 37 14 0F 84 32 2C 4C |L..6.....7...2,L|
00001B00: 24 28 4C 29 3A 45 B2 53 54 00 17 37 8C 0F 8B 45 |$(L):E.ST..7...E|
00001B10: B2 30 A7 33 38 32 30 00 1F 37 A0 0F FE 0B 31 00 |.0.3820..7....1.|
00001B20: 3D 37 B4 0F 99 3A 99 A3 31 34 29 22 46 49 4C 45 |=7...:..14)"FILE|
00001B30: 20 4C 4F 41 44 45 44 2E 2E 2E 22 3A 99 00 61 37 | LOADED...":..a7|
00001B40: C8 0F 99 A3 31 30 29 22 47 4F 49 4E 47 20 49 4E |....10)"GOING IN|
00001B50: 54 4F 20 45 44 49 54 20 4D 4F 44 45 22 3A FE 0B |TO EDIT MODE":..|
00001B60: 31 00 6E 37 DC 0F FE 0F 3A 89 31 37 36 30 00 9B |1.n7....:.1760..|
00001B70: 37 F0 0F 99 22 93 11 11 11 11 11 11 11 11 22 3A |7...".........":|
00001B80: FF A3 31 30 29 22 52 45 2D 53 5B 56 49 4E 47 20 |..10)"RE-S[VING |
00001B90: 59 4F 55 5E 20 44 5B 54 41 2E 2E 00 B7 37 04 10 |YOU^ D[TA....7..|
00001BA0: FF 3A FF A3 31 33 29 22 50 FF 45 41 53 55 FF FF |.:..13)"P.EASU..|
00001BB0: FF D2 ED FF FF FF FF FF B5 FF 62 FF E7 FF FF FF |..........b.....|
00001BC0: FF FF FF D2 FF D5 FF FF AA C7 28 33 34 29 AA 46 |..........(34).F|
00001BD0: 24 AA C7 28 33 34 29 00 F2 37 2C 10 51 4C B2 C3 |$..(34)..7,.QL..|
00001BE0: 28 51 24 29 3A 51 B2 28 28 34 30 AB 51 4C 29 AD |(Q$):Q.((40.QL).|
00001BF0: 32 29 00 FC 37 40 10 F2 28 46 24 29 00 0A 38 54 |2)..7@..(F$)..8T|
00001C00: 10 99 3A 99 A3 51 29 51 24 3B 00 26 38 68 10 FE |..:..Q)Q$;.&8h..|
00001C10: 0D 23 32 2C 28 46 24 29 2C 44 30 2C 55 38 2C 57 |.#2,(F$),D0,U8,W|
00001C20: 3A 41 24 B2 22 22 00 36 38 7C 10 81 54 B2 31 A4 |:A$."".68|..T.1.|
00001C30: C2 28 32 35 31 29 00 68 38 90 10 41 24 B2 C8 28 |.(251).h8..A$..(|
00001C40: 4C 24 28 54 29 2C 31 29 3A 8B 41 24 B3 B1 C7 28 |L$(T),1):.A$...(|
00001C50: 33 34 29 A7 98 32 2C C7 28 33 34 29 AA 4C 24 28 |34)..2,.(34).L$(|
00001C60: 54 29 3A 89 34 32 38 30 00 75 38 A4 10 98 32 2C |T):.4280.u8...2,|
00001C70: 4C 24 28 54 29 00 7C 38 B8 10 82 54 00 94 38 CC |L$(T).|8...T..8.|
00001C80: 10 98 32 2C 22 45 4E 44 20 4F 46 20 4D 45 53 53 |..2,"END OF MESS|
00001C90: 41 47 45 22 00 9B 38 6C 11 A0 32 00 BD 38 80 11 |AGE"..8l..2..8..|
00001CA0: 81 54 B2 31 A4 51 4C 3A 99 C7 28 32 30 29 3B 3A |.T.1.QL:..(20);:|
00001CB0: 81 58 B2 30 A4 35 30 3A 82 58 3A 82 54 00 DE 38 |.X.0.50:.X:.T..8|
00001CC0: 94 11 81 54 B2 31 A4 51 3A 99 C7 28 32 30 29 3B |...T.1.Q:..(20);|
00001CD0: 3A 81 58 B2 30 A4 35 30 3A 82 58 3A 82 54 00 04 |:.X.0.50:.X:.T..|
00001CE0: 39 A8 11 99 A3 31 34 29 22 12 20 46 49 4C 45 20 |9....14)". FILE |
00001CF0: 53 41 56 45 44 20 22 3A 81 54 B2 30 A4 32 35 30 |SAVED ":.T.0.250|
00001D00: 30 3A 82 54 00 15 39 BC 11 45 4D 24 B2 22 22 3A |0:.T..9..EM$."":|
00001D10: 89 33 33 32 30 00 1D 39 D0 11 58 B2 32 00 37 39 |.3320..9..X.2.79|
00001D20: E4 11 9F 34 2C 34 2C 37 3A 98 34 2C C7 28 31 35 |...4,4,7:.4,.(15|
00001D30: 29 3B C7 28 31 34 29 00 61 39 F8 11 4B B2 C3 28 |);.(14).a9..K..(|
00001D40: 46 24 29 AA 32 3A 4B 31 B2 28 28 34 30 AB 4B 29 |F$).2:K1.((40.K)|
00001D50: AD 32 29 3A 4B 24 B2 22 20 22 AA 46 24 AA 22 20 |.2):K$." ".F$." |
00001D60: 22 00 81 39 0C 12 98 34 2C C7 28 32 37 29 3B C7 |"..9...4,.(27);.|
00001D70: 28 31 30 29 3B C7 28 58 29 3B A3 4B 31 29 22 22 |(10);.(X);.K1)""|
00001D80: 3B 00 8F 39 20 12 81 4C 4C B2 31 A4 4B AB 31 00 |;..9 ..LL.1.K.1.|
00001D90: 9B 39 34 12 98 34 2C 22 3D 22 3B 00 A3 39 48 12 |.94..4,"=";..9H.|
00001DA0: 82 4C 4C 00 AE 39 5C 12 98 34 2C 22 3D 22 00 CD |.LL..9\..4,"="..|
00001DB0: 39 70 12 98 34 2C C7 28 32 37 29 3B C7 28 31 30 |9p..4,.(27);.(10|
00001DC0: 29 3B C7 28 58 29 3B A3 4B 31 29 4B 24 00 ED 39 |);.(X);.K1)K$..9|
00001DD0: 84 12 98 34 2C C7 28 32 37 29 3B C7 28 31 30 29 |...4,.(27);.(10)|
00001DE0: 3B C7 28 58 29 3B A3 4B 31 29 22 22 3B 00 FB 39 |;.(X);.K1)"";..9|
00001DF0: 98 12 81 4C 4C B2 31 A4 4B AB 31 00 07 3A AC 12 |...LL.1.K.1..:..|
00001E00: 98 34 2C 22 3D 22 3B 00 0F 3A C0 12 82 4C 4C 00 |.4,"=";..:...LL.|
00001E10: 1A 3A D4 12 98 34 2C 22 3D 22 00 2C 3A E8 12 98 |.:...4,"=".,:...|
00001E20: 34 2C C7 28 31 35 29 3A A0 34 3A 8E 00 32 3A FC |4,.(15):.4:..2:.|
00001E30: 12 3A 00 A4 3A 10 13 8F 20 3A 3A 3A 3A 3A 3A 3A |.:..:... :::::::|
00001E40: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
00001E50: 3A 3A 3A 3A 20 20 20 20 20 20 20 20 20 20 20 20 |:::: |
00001E60: 20 3A 3A 3A 20 46 49 4C 45 20 41 50 50 45 4E 44 | ::: FILE APPEND|
00001E70: 45 52 20 43 2D 31 32 38 20 3A 3A 3A 20 20 20 20 |ER C-128 ::: |
00001E80: 20 20 20 20 20 20 20 20 20 3A 3A 3A 3A 3A 3A 3A | :::::::|
00001E90: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
00001EA0: 3A 3A 3A 3A 00 AA 3A 24 13 3A 00 DB 3A 38 13 9C |::::..:$.:..:8..|
00001EB0: 3A 86 4C 24 28 35 31 29 3A 81 20 4A 20 B2 20 32 |:.L$(51):. J . 2|
00001EC0: 35 31 20 A4 20 32 35 34 3A 97 20 4A 2C 30 3A 82 |51 . 254:. J,0:.|
00001ED0: 4A 3A 45 45 24 B2 22 41 50 50 22 00 51 3B 4C 13 |J:EE$."APP".Q;L.|
00001EE0: 51 24 B2 22 20 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |Q$." :::::::::::|
00001EF0: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
00001F00: 20 20 20 20 20 20 20 20 20 20 20 20 20 3A 3A 3A | :::|
00001F10: 20 C6 C9 CC C5 A0 C1 D0 D0 C5 CE C4 C5 D2 20 C3 | ............. .|
00001F20: 2D 31 32 38 20 3A 3A 3A 20 20 20 20 20 20 20 20 |-128 ::: |
00001F30: 20 20 20 20 20 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A | :::::::::::|
00001F40: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
00001F50: 22 00 63 3B 60 13 99 22 93 22 3A 99 A3 36 29 51 |".c;`..".":..6)Q|
00001F60: 24 3A 99 00 EA 3B 74 13 99 22 1D 1D D4 48 49 53 |$:...;t.."...HIS|
00001F70: 20 49 53 20 41 20 46 49 4C 45 20 41 50 50 45 4E | IS A FILE APPEN|
00001F80: 44 45 52 20 46 4F 52 20 54 48 45 20 C3 2D 31 32 |DER FOR THE .-12|
00001F90: 38 2E 22 3A 99 22 C9 54 20 41 4C 4C 4F 57 53 20 |8.":.".T ALLOWS |
00001FA0: 59 4F 55 20 54 4F 20 41 54 54 41 43 48 20 41 4E |YOU TO ATTACH AN|
00001FB0: 20 46 45 57 20 4C 49 4E 45 53 20 54 4F 22 3A 99 | FEW LINES TO":.|
00001FC0: 22 41 4E 20 41 4C 52 45 41 44 59 20 45 58 49 53 |"AN ALREADY EXIS|
00001FD0: 54 49 4E 47 20 53 45 51 55 45 4E 54 49 41 4C 20 |TING SEQUENTIAL |
00001FE0: 46 49 4C 45 2E 2E 2E 22 3A 99 00 6F 3C 88 13 99 |FILE...":..o<...|
00001FF0: 22 20 20 C9 46 20 59 4F 55 20 41 52 45 20 28 4E |" .F YOU ARE (N|
00002000: 4F 54 29 20 52 55 4E 4E 49 4E 47 20 54 48 49 53 |OT) RUNNING THIS|
00002010: 20 50 52 4F 47 52 41 4D 22 3A 99 22 4F 4E 20 41 | PROGRAM":."ON A|
00002020: 20 C3 4F 4D 4D 4F 44 4F 52 45 20 31 32 38 20 4F | .OMMODORE 128 O|
00002030: 52 20 59 4F 55 20 57 49 53 48 20 54 4F 20 41 42 |R YOU WISH TO AB|
00002040: 4F 52 54 22 3A 99 22 54 48 49 53 20 53 45 43 54 |ORT":."THIS SECT|
00002050: 49 4F 4E 2C 20 4A 55 53 54 20 54 59 50 45 20 54 |ION, JUST TYPE T|
00002060: 48 45 20 4C 45 54 54 45 52 20 28 C1 29 2E 22 00 |HE LETTER (.).".|
00002070: ED 3C 9C 13 99 3A 99 3A 99 3A 99 A3 38 29 22 3A |.<...:.:.:..8)":|
00002080: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
00002090: 3A 3A 3A 3A 3A 3A 3A 3A 20 20 20 20 20 20 20 20 |:::::::: |
000020A0: 20 20 20 20 20 20 20 3A 3A 3A 3A D4 59 50 45 20 | ::::.YPE |
000020B0: 28 41 29 20 54 4F 20 41 42 4F 52 54 20 3A 3A 3A |(A) TO ABORT :::|
000020C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A | :|
000020D0: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
000020E0: 3A 3A 3A 3A 3A 3A 3A 3A 22 3A 99 3A 99 00 18 3D |::::::::":.:...=|
000020F0: B0 13 99 A3 35 29 22 12 20 48 49 54 20 41 4E 59 |....5)". HIT ANY|
00002100: 4F 54 48 45 52 20 4B 45 59 20 54 4F 20 43 4F 4E |OTHER KEY TO CON|
00002110: 54 49 4E 55 45 20 92 22 00 2E 3D C4 13 A1 51 54 |TINUE ."..=...QT|
00002120: 24 3A 8B 51 54 24 B2 22 22 A7 35 30 36 30 00 60 |$:.QT$."".5060.`|
00002130: 3D D8 13 8B 51 54 24 B2 22 41 22 A7 99 3A 99 A3 |=...QT$."A"..:..|
00002140: 31 35 29 22 12 20 41 42 4F 52 54 45 44 2E 20 92 |15)". ABORTED. .|
00002150: 22 3A 81 54 B2 30 A4 31 35 30 30 3A 82 54 3A 8A |":.T.0.1500:.T:.|
00002160: 00 B6 3D EC 13 99 22 93 22 3A 99 A3 35 29 51 24 |..=...".":..5)Q$|
00002170: 3A 99 3A 99 22 20 20 45 4E 54 45 52 20 4F 4C 44 |:.:." ENTER OLD|
00002180: 20 46 49 4C 45 20 4E 41 4D 45 22 3B 3A 85 46 24 | FILE NAME";:.F$|
00002190: 3A 99 3A 99 3A 99 22 12 22 3B 3A 99 A3 28 33 39 |:.:.:.".";:..(39|
000021A0: AB C3 28 46 24 29 29 AD 32 29 22 12 20 22 3B 46 |..(F$)).2)". ";F|
000021B0: 24 3B 22 20 92 22 00 D8 3D 00 14 99 3A 99 A3 31 |$;" ."..=...:..1|
000021C0: 31 29 22 12 20 49 53 20 54 48 49 53 20 43 4F 52 |1)". IS THIS COR|
000021D0: 52 45 43 54 3F 20 92 22 00 F9 3D 14 14 A1 51 54 |RECT? ."..=...QT|
000021E0: 24 3A 8B 51 54 24 B3 B1 22 59 22 AF 51 54 24 B3 |$:.QT$.."Y".QT$.|
000021F0: B1 22 4E 22 A7 35 31 34 30 00 0B 3E 28 14 8B 51 |."N".5140..>(..Q|
00002200: 54 24 B2 22 4E 22 A7 35 31 30 30 00 6B 3E 3C 14 |T$."N".5100.k><.|
00002210: 99 22 93 22 3A 99 A3 35 29 51 24 3A 99 3A 99 22 |.".":..5)Q$:.:."|
00002220: 13 11 11 11 11 11 11 22 3A 99 A3 38 29 22 43 48 |.......":..8)"CH|
00002230: 45 43 4B 49 4E 47 20 46 49 4C 45 53 20 45 58 49 |ECKING FILES EXI|
00002240: 53 54 45 4E 43 45 22 3A 99 3A 99 3A 99 3A FE 0D |STENCE":.:.:.:..|
00002250: 23 31 2C 28 46 24 29 2C 44 30 2C 55 38 2C 52 3A |#1,(F$),D0,U8,R:|
00002260: 45 B2 44 53 3A 45 24 B2 44 53 24 00 9A 3E 50 14 |E.DS:E$.DS$..>P.|
00002270: 8B 45 B2 B1 32 30 A7 20 FE 0F 3A 99 A3 28 34 30 |.E..20. ..:..(40|
00002280: AB C3 28 45 24 29 29 AD 32 29 45 24 3A 99 3A FE |..(E$)).2)E$:.:.|
00002290: 0B 32 3A 9C 3A 89 33 33 32 30 00 A1 3E 64 14 A0 |.2:.:.3320..>d..|
000022A0: 31 00 06 3F 78 14 99 22 93 22 3A 99 A3 35 29 51 |1..?x..".":..5)Q|
000022B0: 24 3A 99 3A 99 22 20 20 D9 4F 55 20 4D 41 59 20 |$:.:." .OU MAY |
000022C0: 45 4E 54 45 52 20 55 50 20 54 4F 20 46 49 46 54 |ENTER UP TO FIFT|
000022D0: 59 20 28 35 30 29 20 4C 49 4E 45 53 22 3A 99 22 |Y (50) LINES":."|
000022E0: 54 48 49 52 54 59 2D 45 49 47 48 54 20 43 48 41 |THIRTY-EIGHT CHA|
000022F0: 52 41 43 54 45 52 53 20 50 45 52 20 4C 49 4E 45 |RACTERS PER LINE|
00002300: 2E 2E 2E 22 3A 99 00 5E 3F 7A 14 99 22 20 20 D4 |...":..^?z.." .|
00002310: 4F 20 43 4F 4E 43 4C 55 44 45 20 59 4F 55 52 20 |O CONCLUDE YOUR |
00002320: 57 52 49 54 49 4E 47 2C 20 4A 55 53 54 20 54 59 |WRITING, JUST TY|
00002330: 50 45 22 3A 99 22 54 48 45 20 57 4F 52 44 20 3C |PE":."THE WORD <|
00002340: 3C C5 CE C4 3E 3E 20 4F 4E 20 41 20 4E 45 57 20 |<...>> ON A NEW |
00002350: 4C 49 4E 45 20 41 4E 44 20 59 4F 55 52 22 00 AE |LINE AND YOUR"..|
00002360: 3F 7C 14 99 22 41 44 44 49 54 49 4F 4E 20 54 4F |?|.."ADDITION TO|
00002370: 20 54 48 45 20 4F 4C 44 20 46 49 4C 45 20 57 49 | THE OLD FILE WI|
00002380: 4C 4C 20 45 4E 44 20 41 4E 44 22 3A 99 22 54 48 |LL END AND":."TH|
00002390: 49 53 20 50 52 4F 47 52 41 4D 20 57 49 4C 4C 20 |IS PROGRAM WILL |
000023A0: 41 55 54 4F 4D 41 54 49 43 41 4C 4C 59 22 00 E4 |AUTOMATICALLY"..|
000023B0: 3F 8C 14 99 22 53 41 56 45 20 59 4F 55 52 20 41 |?..."SAVE YOUR A|
000023C0: 44 44 45 44 20 4C 49 4E 45 53 20 54 4F 20 54 48 |DDED LINES TO TH|
000023D0: 45 20 4F 4C 44 20 54 45 58 54 22 3A 99 22 46 49 |E OLD TEXT":."FI|
000023E0: 4C 45 2E 22 00 EE 3F 91 14 89 31 31 32 30 00 F4 |LE."..?...1120..|
000023F0: 3F A0 14 8F 00 64 40 58 16 99 22 93 22 3A 99 A3 |?....d@X..".":..|
00002400: 35 29 51 24 3A 99 3A 99 22 11 11 11 22 3A 99 A3 |5)Q$:.:."...":..|
00002410: 31 33 29 22 50 4C 45 41 53 45 20 57 41 49 54 2E |13)"PLEASE WAIT.|
00002420: 2E 2E 22 3A 99 3A 99 A3 36 29 22 41 50 50 45 4E |..":.:..6)"APPEN|
00002430: 44 49 4E 47 20 59 4F 55 52 20 44 41 54 41 20 54 |DING YOUR DATA T|
00002440: 4F 20 46 49 4C 45 2E 22 3A FE 0E 23 32 2C 28 46 |O FILE.":..#2,(F|
00002450: 24 29 2C 44 30 2C 55 38 3A 45 B2 44 53 3A 45 24 |$),D0,U8:E.DS:E$|
00002460: B2 44 53 24 00 A9 40 6C 16 8B 45 B2 30 A7 99 3A |.DS$..@l..E.0..:|
00002470: 99 A3 36 29 22 12 20 46 49 4C 45 20 46 4F 55 4E |..6)". FILE FOUN|
00002480: 44 2C 22 3B 3A FE 0B 31 3A 99 22 20 41 50 50 45 |D,";:..1:." APPE|
00002490: 4E 44 49 4E 47 20 44 41 54 41 20 92 22 3A 41 24 |NDING DATA .":A$|
000024A0: B2 22 22 3A 89 32 34 32 30 00 D7 40 80 16 8B 45 |."":.2420..@...E|
000024B0: 53 B1 30 A7 99 3A 99 A3 28 33 39 AB C3 28 45 24 |S.0..:..(39..(E$|
000024C0: 29 29 AD 32 29 22 12 20 22 3B 45 24 3B 22 20 92 |)).2)". ";E$;" .|
000024D0: 22 3A FE 0B 36 3A 8A 00 01 41 BC 16 99 3A 99 A3 |":..6:...A...:..|
000024E0: 31 30 29 22 12 20 46 49 4C 45 20 44 41 54 41 20 |10)". FILE DATA |
000024F0: 41 50 50 45 4E 44 45 44 20 92 22 3A FE 0B 33 3A |APPENDED .":..3:|
00002500: 8A 00 07 41 D0 16 80 00 0D 41 70 17 8E 00 1B 41 |...A.....Ap....A|
00002510: 84 17 F9 20 38 2C 22 8C 22 3A 8E 00 00 00 49 |... 8,".":....I |
.......5,15.*.D.. WRITTEN BY MR
.D.M.X.. FIREHOUSE BBS 923-3967.{.
...53280,0:.53281,0:.6020:.G(14);G(8):.3
320... .....H..53280,0:.53281,0:.G(14);G
(8):.400......" PLEASE ENTER FILE NAME B
ELOW":.:.:." ";F$:.2660......400:..14
)"SEND FILE TO........................."
:.:..@...." .S.CREEN OR":.
.D...." TO .P.RINTER ?".L.,
..Q$...@..Q$."S"..400:."...... S
ENDING FILE TO SCREEN.":.440...T..Q$."P"
..400:."...... SENDING FILE TO PR
INTER.":.440...H..300...|........".";:.T
.0.119:.". .";:.T.Q...."..";:.". HAL
BBS SEQUENTIAL FILE READER.":.:..F....Q
$."S".D.3:.480.Y.L.D.4:.4560:.500.......
1:.".";.......#2,(F$),D0,U8,R:.800......
D.3.DB.1.F....4,D,7:.D.4.DB.20.Z.0..Z$:.
Z$."P".880...D..#2,A$:E1.ST...X..A$.G(34
)..4,"";.DB)"";:.660...L..4,A$;.I....Z$.
"A"..:.:..10)". FILE READ ABORTED .":.78
0._....E1..0. 4: 2:.700.H....560......:.
.8)". FILE READ COMPLETED... .":.920...P
.E.DS:E$.DS$:.E..0........E.0........"..
":JQ.(40.(C(E$))).2:.:..JQ)".";E$;".":..
. .. 2: 4: 15:.T.0.1500:.T:.920.% .."..
....................".T 4.." -----------
---------------------------".. H.." - .P
. PAUSES <<.CR.>> CONTINUE .A. ABORTS -
".. \.." -------------------------------
-------";.. ^...0,0,39,21,1:."..........
...........";.. `....!P..Z$:.Z$..G(13).8
80..!...580..!...:..10)". READ ANOTHER F
ILE .".6!...A$.N!...A$."Y". ..: 4:.200._
!T..A$."N".3320.H!...940..!... :::::::::
::::::::::::::::::::: :::: FILE
WRITING ROUTINE :::: :::::::::
:::::::::::::::::::::..!..:. "...:.L$(50
):.G(147):.:." THIS IS A SEQUENTIAL FIL
E WRITER.P"...:."YOU MAY TYPE UP TO 50 L
INES CONTAINING"."$..:."THIRTY-EIGHT, (
38) CHARACTERS EACH.":..."8.." TO CONCL
UDE WRITING, ON A NEW LINE,":..."L.."TYP
E THE WORD, ";G(34);"END";G(34);" & HIT
<<RETURN>> ."..#`..:.:..9)". HIT ANY KEY
TO BEGAN .".(#T..Q$:.Q$."".1140.E#...G(
147);:L.0:.1180:.1260.U#...:..4)">------
----------------------------"..#....4)"
0000000001111111111222222222233333".Q#..
..4)" 1234567890123456789012345678901234
"..#D...4)">----------------------------
------"..$X..:..?$..L.L.1:.251,L:.L.48..
:."ATTENTION...3 LINES TO GO":..T$...L.5
1..:..14)"ATTENTION...":..14)"NO MORE LI
NES"..$...L.51..:..5)"+-+-+- WRITE COMPL
ETED -+-+-+".C$(..L.51..QX.0.2000:.QX:.1
760.T$<.C.0:L$(L).""..$>.LS$.J(D(L),2,C(
D(L)))..%@..L.1..." .;LS.;.> ....";.)%B
..L.09.." ";LS$;"> ....";.<%P.A$."":V.0:
KV.0.P%U..A$:.A$."".1365.H%Z.KV.F(C$):V.
KV . 127.Y%D..V.13 . 1742..%X.. V . 20 .
1640..%... V .32 . V .95 . 1360.A%... K
V .160 . A$.G(32).W%...A$;"....";:C.O.1.
.%..L$(L+...........&...C.38.." ":."....
";:.1260..&@..C.38.1360.!&T..1260./&H..C
.0.1360.G&|..L$(L)."".C.0:.1360.V&...C(L
$(L)).1.C.0:L$(L)."":.A$;"....";:.1360..
&...A$;"....";. &..Q$.L$(L):LL.(C(Q$).1)
.A&L.L$(L).J(Q$,1,LL):C.C.1:.1360..&N..
L$(L)."END" . .251,L.1:.".... ":..1:
.:. 1760..'P.. L$(L).."" .1748.+'R.. L$(
L)."" . L$(L).G(13).4'T.." ".>'V..1260.M
'..." ==================================
===="..'....8)"FILE EDITOR EDIT ROUTINE"
..'....8)"........................":...'
....5)"<E>DIT <L>IST <P>REVIEW":.
..(....5)"<A>BORT <S>AVE <C>ONTINU
E":..2(....5)"<?>HELP <D>ELETE A LIN
E".:(...:..\(..." S E L E C T =>";" .
..";.P(...Q$:.Q$."".1940.V(.....(..." ."
;Q$;".":..1..(P..Q$."E".2160..(...Q$."L"
.2260..(...Q$."P".2280.U(...Q$."A"..".":
..2:...( ..Q$."S" . E.$.."APP".2300..)".
.Q$."S" . EE$."APP".5280.!)4..Q$."?".176
0.2)H..Q$."C".2460.D)J..Q$."D"..2142.T)\
.."..":.1920.P)^..:."DELETE WHICH LINE";
WL$:WL.E(WL$):L$(WL)."":QQ$.".LINE NUMBE
R ".WL$." DELETED...":.QQ$;:..1:.AQ.1.C(
QQ$):.G(20);:.AQ..)`.. DD.WL . (B(251)).
1..)B.L$(D\.............................
........6......G..5.................B.6.
....7.......7.......3..........3.....-..
....................3...................
............"NW............+............
.....................3...............#..
.......3.....*V..T.1.B(251)..+X.T$.J(D(T
),2,C(D(T))). +Z..T.09..T$;" .";.7+...T.
10...1)T$;" .";.S+...L$(T).G(13).." ":.2
274.I+...L$(T)..""..L$(T)..+...L$(T)."".
.". DELETED ."..+...T..+...:.3260..+...:
.:.T.1.B(251):.L$(T):.T:.:.3260.Z+...EM$
."EDIT MODE". 4080..+..."...ENTER THE FI
LES NAME":......$....2)"=... ";..F$:.270
.......WI...............................
.............{.U....Q...............Q...
...W..{......WI............K........W...
...........U...Q...YY.Q..............I..
..A................................X.4)
". FILE SAVED ":.T.0.500:.T:.2560..-..K.
B(251).(-...:.:.T.1 . K:K$.L$(T).>-D.KT.
C(K$):TG$.D(T).U-F.T$.J(TG$,2,C(TG$)).Q-
H..C(T$).1.." ";T$;"> ";..-J..C(T$).2..
" ";T$;"> ";..-X..J(K$,2,KT):.T..-..L.B(
251):C.B(252): 2:.1260..-...:..10)"WRITE
ANOTHER FILE ?"..-...Q$:.Q$.."Y".Q$.."N
".2580...(..Q$."Y"..:.1020.&.<..Q$."N"..
:.3320.,.P...H.D..G(147):..00)"WAIT...."
.|.X.."...........":..7)"CHECKING FILES'
EXISTENCE.".......#2,(F$),D0,U8,R:.720.
.. . 2: 15:.G(147)......240...H...T....G
(147):.:." WAIT...."../..."...........":
..8)"CHECKING FOR DUPLICATION"../....#2,
(F$),D0,U8,R.,/..E.DS:E$.DS$.A/,..E..0.E
..62.3200.Y/@..E.62..G(147):.2360.}/T..E
.0..:..12)"THAT FILE EXISTS."../H..E.0..
:..9)"SCRATCH DTHE OLD COPY?............
.......".V/|..Q$:.Q$.."Y".Q$.."N".2940..
/...Q$."N".3160../...Q$."Y".3000.$0...G(
147):.:.:..10)"SCRATC@ OLD COPY !!!".@0L
..:..13)"ARE YOU SURE ?".^0...Q$:.Q$.."Y
".Q$.."N".3040.O0...Q$."N".3160..0...Q$.
"Y".3100..0..."...........":..9)"SCRATCH
ING OLD COPY...".D00. 15: 2: 4:.(F$)..0D
..:..10)"OLD COPY SCRATCHED...":.:.:.238
0..1X.."...ENTER A NEW FILE NAME":.:..:1
L...12)"===> ";:." .. ";F$:.2780.H1...
"..":JQ.(40.(C(E$))).2:.:..JQ)".";E$;"."
.R1....: 4..1....3:.1760..1...:." S E L
E C T =>";" ...";..1P..1940..1....O1.
...0,0,39,24:.".......".D2... ..........
.................... ..... EDIT
OR MAIN MENU ....... ..........
.....................J2..:..2....10)"HAL
BBS FILE MANAGER.......................
.................."..2 ..:...24...12)"(R
)EAD (W)RITE":.:..12)"(E)DIT (A)PPEND"
:.:...4..(D).RECU.S..:.:...3H...........
......Z.V...P.........RP................
.....RP..V............................6.
.}.............6..@....J..H.ZL...T.@....
D.@H..E...T.@....E.JH..E...T.@.....AX..L
...U.@....... X..@E...EZ@H. EI....LLLLLD
.Q.....@.H...... DISK DIRECTORY ."..4X..
:..11)"TO HALT LISTING...".74Z..:..8)"US
E THE (NO SCROLL) KEY.":.:.:..3:..D0,U8.
=4....E4....6)".
"..4....6)". DIRECTORY FINISHED..
. "..4....6)". TYPE ANY KEY FOR MAIN M
ENU "..4....6)".
."..4...Q$:.Q$."".3556..4...3320..5.
..:.".":..4)" THIS ROUTINE ALLOWS YOU TO
EDIT".B5..EM$."EDIT MODE".M5....4)"EXIS
TING SEQUENTIAL FILES TAKEN "..5$...4)"F
ROM YOUR DISK, THEN RESTORE THE".F58...4
)"DATA TO THE SAME OR ANOTHER DISK.":...
5L...4)"ENTER THE FILE NAME...";:.F$:.".
.........."..6`...13)"PLEASE WAIT...": 1
5: 2: 4.56T...#.,(F$),D0,U8,R.E6..E.DS:E
$.DS$.T6...E.0.."..........":..15)"LOADI
NG...":.3800..6..."..":JQ.(40.(C(E$))).2
:.:..JQ)".";E$;".":...6D...: 4:..2:.3320
.Q6X..L$(250),A$(120.:L.0..6..L.L.1:L$(L
)."":A$."":.251,L..6.....7...2,L$(L):E.S
T..7...E.0.3820..7 ...1.=7...:..14)"FILE
LOADED...":..A7H...10)"GOING INTO EDIT
MODE":..1.N7....:.1760..7...".........":
..10)"RE-S[VING YOU^ D[TA....7...:..13)"
P.EASU...R........B........R.U...G(34).F
$.G(34)..7,.QL.C(Q$):Q.((40.QL).2)..7@..
(F$)..8T..:..Q)Q$;.&8H...#2,(F$),D0,U8,W
:A$."".68|..T.1.B(251).H8..A$.H(L$(T),1)
:.A$..G(34)..2,G(34).L$(T):.4280.U8...2,
L$(T).|8...T..8L..2,"END OF MESSAGE"..8L
. 2..8...T.1.QL:.G(20);:.X.0.50:.X:.T..8
...T.1.Q:.G(20);:.X.0.50:.X:.T..9....14)
". FILE SAVED ":.T.0.2500:.T..9..EM$."":
.3320..9P.X.2.79...4,4,7:.4,G(15);G(14).
A9..K.C(F$).2:K1.((40.K).2):K$." ".F$."
"..9...4,G(27);G(10);G(X);.K1)"";..9 ..L
L.1.K.1..94..4,"=";..9H..LL..9\..4,"=".M
9P..4,G(27);G(10);G(X);.K1)K$..9...4,G(2
7);G(10);G(X);.K1)"";..9...LL.1.K.1..:..
.4,"=";..:...LL..:T..4,"=".,:...4,G(15):
4:..2:..:..:... :::::::::::::::::::::::
:::: ::: FILE APPENDER C-128
::: :::::::::::::::::::::::
::::..:$.:..:8..:.L$(51):. J . 251 . 254
:. J,0:.J:EE$."APP".Q;L.Q$." :::::::::::
:::::::::::::::: ::: FILE AP
PENDER C-128 ::: :::::::::::
::::::::::::::::".C;`..".":..6)Q$:...;T.
."..THIS IS A FILE APPENDER FOR THE C-12
8.":."IT ALLOWS YOU TO ATTACH AN FEW LIN
ES TO":."AN ALREADY EXISTING SEQUENTIAL
FILE...":..O<..." IF YOU ARE (NOT) RUNN
ING THIS PROGRAM":."ON A COMMODORE 128 O
R YOU WISH TO ABORT":."THIS SECTION, JUS
T TYPE THE LETTER (A)."..<...:.:.:..8)":
:::::::::::::::::::::::: :
:::TYPE (A) TO ABORT ::: :
::::::::::::::::::::::::":.:...=....5)".
HIT ANYOTHER KEY TO CONTINUE ."..=D..QT
$:.QT$."".5060.`=X..QT$."A"..:..15)". AB
ORTED. .":.T.0.1500:.T:...=...".":..5)Q$
:.:." ENTER OLD FILE NAME";:.F$:.:.:.".
";:..(39.C(F$)).2)". ";F$;" .".X=...:..1
1)". IS THIS CORRECT? ."..=...QT$:.QT$..
"Y".QT$.."N".5140..>(..QT$."N".5100.K><.
.".":..5)Q$:.:.".......":..8)"CHECKING F
ILES EXISTENCE":.:.:.:..#1,(F$),D0,U8,R:
E.DS:E$.DS$..>P..E..20. ..:..(40.C(E$)).
2)E$:.:..2:.:.3320..>D. 1..?X..".":..5)Q
$:.:." YOU MAY ENTER UP TO FIFTY (50) L
INES":."THIRTY-EIGHT CHARACTERS PER LINE
...":..^?Z.." TO CONCLUDE YOUR WRITING,
JUST TYPE":."THE WORD <<END>> ON A NEW
LINE AND YOUR"..?|.."ADDITION TO THE OLD
FILE WILL END AND":."THIS PROGRAM WILL
AUTOMATICALLY"..?..."SAVE YOUR ADDED LIN
ES TO THE OLD TEXT":."FILE."..?...1120..
? ...D@X..".":..5)Q$:.:."...":..13)"PLEA
SE WAIT...":.:..6)"APPENDING YOUR DATA T
O FILE.":..#2,(F$),D0,U8:E.DS:E$.DS$..@L
..E.0..:..6)". FILE FOUND,";:..1:." APPE
NDING DATA .":A$."":.2420.W@...ES.0..:..
(39.C(E$)).2)". ";E$;" .":..6:...A...:..
10)". FILE DATA APPENDED .":..3:...AP...
.AP....A... 8,".":....I
> CLICK IMAGE PREVIEW FOR FULL MODAL