mirror of
https://github.com/hsoft/collapseos.git
synced 2024-12-27 04:28:06 +11:00
80891d7ec1
This should help with the bootstrapping of non-emulated environment. For example, I have a problem with the RC2014: I can't send it bootstrap info until the ACIA is up. I need to find a way...
5 lines
77 B
Forth
5 lines
77 B
Forth
HERE @ 256 /MOD 2 PC! 2 PC!
|
|
: EMIT 0 PC! ;
|
|
: KEY 0 PC@ ;
|
|
CURRENT @ 12 RAM+ !
|