Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
FORTH. A86 Fig <strong>Forth</strong> <strong>8086</strong>/88 Ver 1.0<br />
EJECT<br />
. ************<br />
; * OVER *<br />
. ************<br />
I<br />
OVER<br />
DB<br />
DB<br />
DB<br />
DW<br />
DW<br />
POP<br />
POP<br />
PUSH<br />
JMP<br />
. ************<br />
; * DROP *<br />
. ************<br />
DROP<br />
DB<br />
D B<br />
D B<br />
DW<br />
DW<br />
PCP<br />
JXP<br />
; * SWAP *<br />
. ************<br />
I<br />
SWAP<br />
DUP<br />
DB<br />
DB<br />
DB<br />
DW<br />
DW<br />
POP<br />
POP<br />
JMP<br />
DB<br />
D B<br />
D B<br />
DW<br />
DW<br />
POP<br />
PUSH<br />
JM P<br />
843<br />
'OVE '<br />
'Rr+8CH<br />
DMINU-9<br />
$+2<br />
DX<br />
AX<br />
AX<br />
DPLJSH<br />
84H<br />
'DRO'<br />
'P'+80H<br />
OVER-7<br />
$+2<br />
AX<br />
NEXT<br />
84H<br />
'SWA'<br />
'Pt+80H<br />
DRO2-7<br />
$+2<br />
DX<br />
AX<br />
DPUSH<br />
83H<br />
'DU'<br />
'P1+80H<br />
SWAP-7<br />
$+2<br />
AX<br />
AX<br />
APUSH