VolksForth/8080/CPM/cpmfiles/logprep.fth
2024-11-03 13:36:57 +01:00

15 lines
299 B
Forth

include extend2.fth
\needs drv : drv 2 ; \ showing C: if drv isn't defined
include multivid.fth
\ : .blk|tib
\ blk @ ?dup IF ." Blk " u. ?cr exit THEN
\ incfile @ IF tib #tib @ cr type THEN ;
\ ' .blk|tib Is .status
\ include dos2.fth
include dos3.fth
include log2file.fth