collapseos/recipes/rc2014/run.fs

10 lines
107 B
Forth
Raw Normal View History

2020-04-04 14:27:23 -04:00
: INIT
ACIA$
(c<$)
." Collapse OS" CR LF
2020-04-04 14:27:23 -04:00
( 0c == CINPTR )
['] (c<) 0x0c RAM+ !
2020-04-04 14:27:23 -04:00
;
INIT