1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-15 03:28:06 +11:00
collapseos/emul/forth/emul.fs
Virgil Dupras 80891d7ec1 Add in-memory bootstrapping system
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...
2020-04-03 20:13:11 -04:00

5 lines
77 B
Forth

HERE @ 256 /MOD 2 PC! 2 PC!
: EMIT 0 PC! ;
: KEY 0 PC@ ;
CURRENT @ 12 RAM+ !