1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-17 06:28:06 +11:00
collapseos/blk/102
Virgil Dupras 58ece9f9a1 editor: implement I command
Also, made LIST properly handle full 64-chars lines not ending with
a null or CR. Previously, such a line would be accompanied by its
following line, duplicating that line's output.
2020-05-06 12:19:36 -04:00

17 lines
219 B
Plaintext

50 LOAD+ ( B152, extras )
1 6 LOADR+
: BROWSE
0 ACC ! L
BEGIN
KEY CASE
'Q' OF EXIT ENDOF
'B' OF B ENDOF
'N' OF N ENDOF
_NUM
ENDCASE
AGAIN
;