collapseos/emul/forth/xcomp.fs
2020-04-21 20:30:14 -04:00

10 lines
117 B
Forth

262 LOAD
: CODE XCODE ;
: IMMEDIATE XIMM ;
: : [ ' X: , ] ;
CURRENT @ XCURRENT !
H@ 256 /MOD 2 PC! 2 PC!
H@ XOFF !