1bd191e86a
Less noisy this way
8 lines
111 B
Forth
8 lines
111 B
Forth
: (c<) KEY DUP EMIT ;
|
|
: _
|
|
ACIA$
|
|
." Collapse OS" CRLF
|
|
( 0c == CINPTR )
|
|
['] (c<) 0x0c RAM+ !
|
|
; _
|