1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-05 20:20:55 +11:00
collapseos/blk/102
Virgil Dupras fa79e3d8a6 Make (print) stop on CR
Lines edited with the Block editor end with 0xd and (print) spits
spurious CR when printing those lines.

Also, properly initialize ACC in BROWSE.
2020-05-05 15:49:50 -04:00

17 lines
219 B
Plaintext

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