EDITOR
FILE INFORMATION
FILENAME(S): EDITOR
FILE TYPE(S): PRG
FILE SIZE: 1.8K
FIRST SEEN: 2025-11-30 21:12:05
APPEARS ON: 1 disk(s)
FILE HASH
2ed6052767f32dac9195c5fc659079ae2a449c1465521033907bd08283461fb7
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MODEMPROGRAMME | EDITOR | PRG | DuncanTwain | 8 | 10 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 3B 08 00 00 97 35 33 32 38 31 2C 31 3A 97 |..;....53281,1:.| 00000010: 35 33 32 38 30 2C 33 3A 99 C7 28 31 34 29 22 1F |53280,3:..(14)".| 00000020: 93 11 11 11 11 22 A3 31 31 29 22 D3 50 45 45 44 |.....".11)".PEED| 00000030: D4 45 52 4D 20 C5 44 49 54 4F 52 00 7D 08 01 00 |.ERM .DITOR.}...| 00000040: 99 22 11 22 A3 31 38 29 22 C2 59 11 11 22 3A 99 |.".".18)".Y..":.| 00000050: A3 31 31 29 22 C7 41 52 59 20 C8 2E 20 D3 43 48 |.11)".ARY .. .CH| 00000060: 52 4F 45 44 45 52 11 22 3A 99 A3 31 33 29 22 C3 |ROEDER.":..13)".| 00000070: 4F 50 59 52 49 47 48 54 20 31 39 38 33 00 9E 08 |OPYRIGHT 1983...| 00000080: 02 00 8B 41 B2 30 A7 41 B2 31 3A 93 22 53 50 45 |...A.0.A.1:."SPE| 00000090: 45 44 54 45 52 4D 20 49 49 22 2C 38 2C 31 00 DA |EDTERM II",8,1..| 000000A0: 08 03 00 99 3A 99 3A 99 22 D0 52 45 53 53 20 27 |....:.:.".RESS '| 000000B0: 53 27 20 46 4F 52 20 D3 50 45 45 44 D4 45 52 4D |S' FOR .PEED.ERM| 000000C0: 20 C9 C9 22 3A 8D 31 33 35 3A 8B 41 24 B2 22 53 | ..":.135:.A$."S| 000000D0: 22 A7 9E 31 32 AC 34 30 39 36 00 FD 08 05 00 86 |"..12.4096......| 000000E0: 42 24 28 32 35 35 29 3A 46 24 B2 22 20 CC 49 4E |B$(255):F$." .IN| 000000F0: 45 20 23 22 3A 45 24 B2 C7 28 31 33 29 00 13 09 |E #":E$..(13)...| 00000100: 07 00 58 25 B2 37 38 3A 58 31 25 B2 33 38 3A 41 |..X%.78:X1%.38:A| 00000110: 25 B2 31 00 59 09 08 00 99 22 93 3C 3E 3C 3E 3C |%.1.Y....".<><><| 00000120: 3E 3C 3E 3C 3E 3C 3E 3C 3E 12 20 C5 4E 54 45 52 |><><><><>. .NTER| 00000130: 20 D4 45 58 54 20 92 3C 3E 3C 3E 3C 3E 3C 3E 3C | .EXT .<><><><><| 00000140: 3E 3C 3E 3C 3E 22 3A 8B 43 25 A7 99 42 24 28 41 |><><>":.C%..B$(A| 00000150: 25 AB 31 29 3A 43 25 B2 30 00 61 09 09 00 89 31 |%.1):C%.0.a....1| 00000160: 32 00 78 09 0A 00 42 25 B2 42 25 AB 31 3A 8B 42 |2.x...B%.B%.1:.B| 00000170: 25 B3 30 A7 42 25 B2 30 00 9E 09 0B 00 42 24 28 |%.0.B%.0.....B$(| 00000180: 41 25 29 B2 C8 28 42 24 28 41 25 29 2C 42 25 29 |A%)..(B$(A%),B%)| 00000190: 3A 8B 42 25 B3 31 A7 43 25 B2 31 3A 89 38 00 C3 |:.B%.1.C%.1:.8..| 000001A0: 09 0C 00 8B 42 25 B1 58 25 A7 A1 44 24 3A 8B 44 |....B%.X%..D$:.D| 000001B0: 24 B2 C7 28 31 33 29 B0 44 24 B2 C7 28 32 30 29 |$..(13).D$..(20)| 000001C0: A7 31 37 00 D1 09 0D 00 8B 42 25 B1 58 25 A7 31 |.17......B%.X%.1| 000001D0: 32 00 0D 0A 0E 00 A1 44 24 3A 97 32 31 32 2C 30 |2......D$:.212,0| 000001E0: 3A 8B 44 24 B2 22 93 22 B0 44 24 B2 22 13 22 B0 |:.D$.".".D$.".".| 000001F0: 44 24 B2 C7 28 32 30 29 B0 44 24 B2 22 1D 22 A7 |D$..(20).D$.".".| 00000200: 99 22 20 9D 9D A4 9D 22 3B 3A 89 31 30 00 38 0A |." ....";:.10.8.| 00000210: 0F 00 8B 44 24 B2 22 22 B0 44 24 B2 22 91 22 B0 |...D$."".D$.".".| 00000220: 44 24 B2 22 11 22 B0 44 24 B2 22 9D 22 A7 99 22 |D$.".".D$.".".."| 00000230: A4 9D 22 3B 3A 89 31 34 00 49 0A 10 00 8B 44 24 |..";:.14.I....D$| 00000240: B2 45 24 A7 99 22 20 22 3B 00 69 0A 11 00 99 44 |.E$.." ";.i....D| 00000250: 24 3B 3A 58 B2 C6 28 44 24 29 3A 8B 58 B2 31 35 |$;:X..(D$):.X.15| 00000260: 37 B0 58 B2 32 30 A7 31 30 00 7D 0A 12 00 8B 58 |7.X.20.10.}....X| 00000270: B3 31 33 33 B0 58 B1 31 33 36 A7 32 30 00 94 0A |.133.X.136.20...| 00000280: 13 00 91 58 AB 31 33 32 89 33 34 2C 35 35 2C 34 |...X.132.34,55,4| 00000290: 32 2C 32 36 00 BD 0A 14 00 42 24 28 41 25 29 B2 |2,26.....B$(A%).| 000002A0: 42 24 28 41 25 29 AA 44 24 3A 8B 44 24 B3 B1 45 |B$(A%).D$:.D$..E| 000002B0: 24 A7 42 25 B2 42 25 AA 31 3A 89 31 32 00 DE 0A |$.B%.B%.1:.12...| 000002C0: 17 00 8B 42 24 28 41 25 29 B2 45 24 A7 42 24 28 |...B$(A%).E$.B$(| 000002D0: 41 25 29 B2 22 22 3A 43 25 B2 31 3A 89 38 00 F3 |A%)."":C%.1:.8..| 000002E0: 0A 19 00 41 25 B2 41 25 AA 31 3A 42 25 B2 30 3A |...A%.A%.1:B%.0:| 000002F0: 89 31 32 00 0E 0B 1A 00 9F 31 35 2C 38 2C 31 35 |.12......15,8,15| 00000300: 2C 22 49 22 3A 8D 32 30 30 3A 54 54 B2 31 00 45 |,"I":.200:TT.1.E| 00000310: 0B 1B 00 99 3A 99 3A 85 22 C6 49 4C 45 20 CE 41 |....:.:.".ILE .A| 00000320: 4D 45 22 3B 41 24 3A 9F 31 2C 38 2C 32 2C 22 40 |ME";A$:.1,8,2,"@| 00000330: 3A 22 AA 41 24 AA 22 2C 53 2C 57 22 3A 8D 32 30 |:".A$.",S,W":.20| 00000340: 30 3A 99 3A 99 00 53 0B 1C 00 81 45 B2 31 A4 41 |0:.:..S....E.1.A| 00000350: 25 AB 31 00 77 0B 1D 00 99 42 24 28 45 29 3B 3A |%.1.w....B$(E);:| 00000360: 98 31 2C 42 24 28 45 29 3B 3A 8D 32 30 30 3A 82 |.1,B$(E);:.200:.| 00000370: 3A A0 31 3A A0 31 35 00 A4 0B 1E 00 99 3A 81 49 |:.1:.15......:.I| 00000380: B2 31 A4 34 30 3A 99 22 2D 22 3B 3A 82 3A 99 3A |.1.40:."-";:.:.:| 00000390: 99 22 1C D0 52 45 53 53 20 27 C5 27 20 54 4F 20 |."..RESS '.' TO | 000003A0: 45 58 49 54 00 DE 0B 1F 00 99 3A 99 22 D0 52 45 |EXIT......:.".RE| 000003B0: 53 53 20 27 D3 27 20 46 4F 52 20 D3 50 45 45 44 |SS '.' FOR .PEED| 000003C0: D4 45 52 4D 20 C9 C9 22 3A 8D 31 33 35 3A 8B 41 |.ERM ..":.135:.A| 000003D0: 24 B2 22 53 22 A7 9E 31 32 AC 34 30 39 36 00 F1 |$."S"..12.4096..| 000003E0: 0B 20 00 99 22 1F 22 3A 8B 41 24 B2 22 45 22 A7 |. ..".":.A$."E".| 000003F0: 80 00 F8 0B 21 00 8A 35 00 1E 0C 22 00 81 45 B2 |....!..5..."..E.| 00000400: 31 A4 41 25 AB 31 3A 99 22 93 12 22 A3 31 35 29 |1.A%.1:."..".15)| 00000410: 46 24 45 3A 99 3A 99 3A 99 42 24 28 45 29 00 67 |F$E:.:.:.B$(E).g| 00000420: 0C 23 00 99 22 13 11 11 11 11 11 11 22 A3 31 32 |.#..".......".12| 00000430: 29 22 D4 4F 20 C5 44 49 54 20 D0 52 45 53 53 20 |)".O .DIT .RESS | 00000440: 12 C5 92 22 3A 8D 31 33 35 3A 99 22 91 22 A3 31 |...":.135:.".".1| 00000450: 32 29 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |2)" | 00000460: 20 20 20 20 20 20 22 00 79 0C 24 00 8B 41 24 B3 | ".y.$..A$.| 00000470: B1 22 45 22 A7 82 3A 89 38 00 CB 0C 25 00 99 22 |."E"..:.8...%.."| 00000480: 12 20 D3 55 52 52 4F 55 4E 44 20 54 48 45 20 4C |. .URROUND THE L| 00000490: 49 4E 45 20 57 49 54 48 20 D1 D5 CF D4 C5 D3 20 |INE WITH ...... | 000004A0: 49 46 20 59 4F 55 20 20 20 57 41 4E 54 20 54 4F |IF YOU WANT TO| 000004B0: 20 49 4E 44 45 4E 54 20 4F 52 20 55 53 45 3A 20 | INDENT OR USE: | 000004C0: 92 27 3A 27 20 4F 52 20 27 2C 27 00 09 0D 26 00 |.':' OR ','...&.| 000004D0: 99 22 13 11 11 11 22 3A 99 A3 58 31 25 29 22 1C |."....":..X1%)".| 000004E0: 5E 22 3A 99 22 13 11 11 11 11 11 11 22 A3 31 32 |^":.".......".12| 000004F0: 29 22 5E 1F 3D CD 41 58 49 4D 55 4D 20 4C 49 4E |)"^.=.AXIMUM LIN| 00000500: 45 20 4C 45 4E 47 54 48 22 00 2F 0D 27 00 99 22 |E LENGTH"./.'.."| 00000510: 13 11 11 22 3A 85 22 9D 9D 22 3B 42 24 28 45 29 |...":."..";B$(E)| 00000520: 3A 8B 42 24 28 45 29 B2 22 22 A7 82 3A 89 38 00 |:.B$(E).""..:.8.| 00000530: 6B 0D 28 00 8B C3 28 42 24 28 45 29 29 B1 58 25 |k.(...(B$(E)).X%| 00000540: AA 31 A7 99 22 11 11 11 22 A3 31 35 29 22 1C 12 |.1.."...".15)"..| 00000550: 20 D4 4F 4F 20 CC 4F 4E 47 20 92 1F 13 11 11 11 | .OO .ONG ......| 00000560: 22 3B 42 24 28 45 29 3A 89 33 38 00 83 0D 29 00 |";B$(E):.38...).| 00000570: 42 24 28 45 29 B2 42 24 28 45 29 AA 45 24 3A 82 |B$(E).B$(E).E$:.| 00000580: 3A 89 38 00 C5 0D 2A 00 9F 31 35 2C 38 2C 31 35 |:.8...*..15,8,15| 00000590: 2C 22 49 22 3A 85 22 C6 49 4C 45 20 CE 41 4D 45 |,"I":.".ILE .AME| 000005A0: 22 3B 41 24 3A 9F 31 2C 38 2C 32 2C 22 40 3A 22 |";A$:.1,8,2,"@:"| 000005B0: AA 41 24 AA 22 2C 53 2C 52 22 3A 8D 32 30 30 3A |.A$.",S,R":.200:| 000005C0: 47 24 B2 22 22 00 E4 0D 2B 00 A1 23 31 2C 41 24 |G$.""...+..#1,A$| 000005D0: 3A 52 53 B2 53 54 3A 8D 32 30 30 3A 47 24 B2 47 |:RS.ST:.200:G$.G| 000005E0: 24 AA 41 24 00 0C 0E 2C 00 8B 41 24 B2 45 24 A7 |$.A$...,..A$.E$.| 000005F0: 42 24 28 41 25 29 B2 47 24 3A 99 47 24 3B 3A 41 |B$(A%).G$:.G$;:A| 00000600: 25 B2 41 25 AA 31 3A 47 24 B2 22 22 00 27 0E 2D |%.A%.1:G$."".'.-| 00000610: 00 8B 52 53 B2 36 34 A7 A0 31 3A 8D 32 30 30 3A |..RS.64..1:.200:| 00000620: A0 31 35 3A 89 33 34 00 2F 0E 31 00 89 34 33 00 |.15:.34./.1..43.| 00000630: 46 0E 37 00 8B 58 25 AB C3 28 42 24 28 41 25 29 |F.7..X%..(B$(A%)| 00000640: 29 B3 35 A7 31 34 00 77 0E 38 00 44 24 B2 22 20 |).5.14.w.8.D$." | 00000650: 20 20 20 20 22 3A 99 44 24 3B 3A 42 24 28 41 25 | ":.D$;:B$(A%| 00000660: 29 B2 42 24 28 41 25 29 AA 44 24 3A 42 25 B2 42 |).B$(A%).D$:B%.B| 00000670: 25 AA 35 3A 89 31 32 00 A7 0E 87 00 99 3A 99 3A |%.5:.12......:.:| 00000680: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 12 20 |." . | 00000690: D0 52 45 53 53 20 41 4E 59 20 4B 45 59 20 92 22 |.RESS ANY KEY ."| 000006A0: 3A 97 31 39 38 2C 30 00 C0 0E 8C 00 41 24 B2 22 |:.198,0.....A$."| 000006B0: 22 3A A1 41 24 3A 8B 41 24 B2 22 22 A7 31 34 30 |":.A$:.A$."".140| 000006C0: 00 C6 0E 91 00 8E 00 E3 0E C8 00 84 31 35 2C 45 |............15,E| 000006D0: 4E 2C 45 4D 24 2C 45 54 2C 45 53 3A 8B 45 4E B2 |N,EM$,ET,ES:.EN.| 000006E0: 30 A7 8E 00 FF 0E CA 00 99 3A 99 22 12 22 45 4E |0........:."."EN| 000006F0: 3B 45 4D 24 3B 45 54 3B 45 53 22 92 22 3A 99 00 |;EM$;ET;ES".":..| 00000700: 0F 0F CB 00 8B 54 54 A7 3A A0 31 3A 89 32 37 00 |.....TT.:.1:.27.| 00000710: 25 0F CD 00 8B 45 4E B2 36 32 A7 A0 31 3A A0 31 |%....EN.62..1:.1| 00000720: 35 3A 89 34 32 00 32 0F CE 00 A0 31 3A A0 31 35 |5:.42.2....1:.15| 00000730: 3A 80 00 00 00 85 00 1D |:....... |
..;....53281,1:.53280,3:.G(14)"......".1
1)"SPEEDTERM EDITOR.}....".".18)"BY..":.
.11)"GARY H. SCHROEDER.":..13)"COPYRIGHT
1983......A.0.A.1:."SPEEDTERM II",8,1.Z
....:.:."PRESS 'S' FOR SPEEDTERM II":.13
5:.A$."S"..12.4096......B$(255):F$." LIN
E #":E$.G(13).....X%.78:X1%.38:A%.1.Y...
.".<><><><><><><>. ENTER TEXT .<><><><><
><><>":.C%..B$(A%.1):C%.0.A....12.X...B%
.B%.1:.B%.0.B%.0.....B$(A%).H(B$(A%),B%)
:.B%.1.C%.1:.8.C....B%.X%..D$:.D$.G(13).
D$.G(20).17.Q....B%.X%.12......D$:.212,0
:.D$.".".D$.".".D$.G(20).D$.".".." ...."
;:.10.8....D$."".D$.".".D$.".".D$.".".."
..";:.14.I....D$.E$.." ";.I....D$;:X.F(D
$):.X.157.X.20.10.}....X.133.X.136.20...
...X.132.34,55,42,26.....B$(A%).B$(A%).D
$:.D$..E$.B%.B%.1:.12......B$(A%).E$.B$(
A%)."":C%.1:.8.....A%.A%.1:B%.0:.12.....
.15,8,15,"I":.200:TT.1.E....:.:."FILE NA
ME";A$:.1,8,2,"@:".A$.",S,W":.200:.:..S.
...E.1.A%.1.W....B$(E);:.1,B$(E);:.200:.
: 1: 15......:.I.1.40:."-";:.:.:.".PRESS
'E' TO EXIT......:."PRESS 'S' FOR SPEED
TERM II":.135:.A$."S"..12.4096... ..".":
.A$."E".....!..5..."..E.1.A%.1:."..".15)
F$E:.:.:.B$(E).G.#..".......".12)"TO EDI
T PRESS .E.":.135:.".".12)"
".Y.$..A$.."E"..:.8.K.%..". SURROU
ND THE LINE WITH QUOTES IF YOU WANT TO
INDENT OR USE: .':' OR ','...&.."....":
..X1%)".^":.".......".12)"^.=MAXIMUM LIN
E LENGTH"./.'.."...":."..";B$(E):.B$(E).
""..:.8.K.(..C(B$(E)).X%.1.."...".15)"..
TOO LONG ......";B$(E):.38...).B$(E).B$
(E).E$:.:.8.E.*..15,8,15,"I":."FILE NAME
";A$:.1,8,2,"@:".A$.",S,R":.200:G$.""...
+..#1,A$:RS.ST:.200:G$.G$.A$...,..A$.E$.
B$(A%).G$:.G$;:A%.A%.1:G$."".'.-..RS.64.
1:.200: 15:.34./.1..43.F.7..X%.C(B$(A%)
).5.14.W.8.D$." ":.D$;:B$(A%).B$(A%)
.D$:B%.B%.5:.12......:.:." .
PRESS ANY KEY .":.198,0.....A$."":.A$:.A
$."".140.F.......H..15,EN,EM$,ET,ES:.EN.
0.....J..:."."EN;EM$;ET;ES".":....K..TT.
: 1:.27.%.M..EN.62. 1: 15:.42.2.N. 1: 15
:.......
> CLICK IMAGE PREVIEW FOR FULL MODAL