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 />
; * COMPILE *<br />
. ***************<br />
I<br />
0914 87 DB 87H<br />
0915 43 4F 4D 50 49 4C DB 'COMPIL'<br />
091B C5 DB 'E1+80H<br />
091C F9 08 DW QLOAD-0BH<br />
091E 20 05 COMP DW DOCOL<br />
0920 A5 08 DW QCOMP<br />
0922 CC 03 DW FROMR<br />
0924 79 04 DW DUP<br />
0926 14 07 DW TWOP<br />
0928 BC 03 DW TOR<br />
092A B4 04 DW AT<br />
092C 3F 07 DW COMMA<br />
092E 9A 03 DW SEMIS<br />
LB RAC<br />
RBRAC<br />
0C 1H<br />
' ['+80H<br />
COMP-0AH<br />
DOCOL<br />
ZERO<br />
STATE<br />
STORE<br />
SEMIS<br />
8 1 H<br />
'1 '+80H<br />
LBRAC-4<br />
DOCOL<br />
LIT, 0C0H<br />
STATE,STORE<br />
SEMIS<br />
PAGE 45