Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
ASM86 VER 1.0 SOURCE: FORTH.A86 Fig <strong>Forth</strong> <strong>8086</strong>/88 Ver 1.0<br />
EJECT<br />
. *************<br />
; * FLUSH *<br />
. *************<br />
I<br />
DB<br />
D B<br />
DB<br />
DW<br />
FLUSH DW<br />
DW<br />
DW<br />
FLUS1 DW<br />
DW<br />
DW<br />
DW<br />
DW<br />
; ************<br />
; * LOAD *<br />
. ************<br />
LOAD<br />
SCREEN<br />
DB<br />
DB<br />
DB<br />
DW<br />
DW<br />
DW<br />
DW<br />
DW<br />
DW<br />
DW<br />
DW<br />
DW<br />
DW<br />
DW<br />
DW<br />
DW<br />
DW<br />
85H<br />
'FLUS '<br />
'H1+80H<br />
RSLW-6<br />
DOCOL<br />
NOBUF , ONEP<br />
ZERO, XDO<br />
ZERO, BUFFE<br />
DROP<br />
XLOOP<br />
OFFSET FLUS1-$<br />
SEMIS<br />
84H<br />
'LOA'<br />
'D8+80H<br />
FLUSH-8<br />
DOCOL, BLK<br />
AT, TOR<br />
INN, AT<br />
TOR, ZERO<br />
INN, STORE<br />
BSCR, STAR<br />
BLK, STORE<br />
INTER<br />
FROMR, INN<br />
STORE<br />
FROMR, BLK<br />
STORE<br />
SEMIS<br />
PAGE 89<br />
; BLK