mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-06 01:50:57 +11:00
10 lines
104 B
Forth
10 lines
104 B
Forth
: INIT
|
|
ACIA$
|
|
(c<$)
|
|
." Collapse OS" LF
|
|
( 0c == CINPTR )
|
|
['] (c<) 0x0c RAM+ !
|
|
;
|
|
INIT
|
|
|