1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-08 20:58:06 +11:00
collapseos/emul/forth/xcomp.fs
2020-04-22 21:49:44 -04:00

11 lines
151 B
Forth

262 LOAD ( xcomp )
: CODE XCODE ;
: IMMEDIATE XIMM ;
: : [ ' X: , ] ;
CURRENT @ XCURRENT !
H@ 256 /MOD 2 PC! 2 PC!
H@ XOFF !
282 LOAD ( boot.z80 )