collapseos/recipes/rc2014/run.fs
2020-04-05 09:09:00 -04:00

10 lines
107 B
Forth

: INIT
ACIA$
(c<$)
." Collapse OS" CR LF
( 0c == CINPTR )
['] (c<) 0x0c RAM+ !
;
INIT