QUIT
Some parts of this page/site are currently incomplete & will be updated asap
Other parts will change continually so use “Refresh” in your browser !!
There is extensive use of “Tooltips” text to support learning which do
not seem to render on a Smartphone
QUIT Clear the return stack, stop compilation, and return control to the operators terminal. No message is given
NFA: 00032D 84 DB 84H
00032E 515549 DB "QUI"
000331 D4 DB 'T'+80H
LFA: 000332 2003 DW ABORT-8
CFA: 000334 950E QUIT: DW DOCOL ; :
PFA: 000336 3613 DW LBRAC ; [
000338 QUIT1: ; BEGIN
000338 F70A DW RPSTO ; RP!
00033A 9407 DW DOTS ; .S
00033C CF09 DW CR ; CR
00033E 7915 DW QUERY ; QUERY
000340 7618 DW INTER ; INTERPRET
000342 8A10 DW STATE ; STATE
000344 EA0C DW AT ; @
000346 7A0B DW ZEQU ; 0=
000348 0908 0700 DW ZBRAN,QUIT2-$ ; IF
00034C A914 DW PDOTQ ; (.")
00034E 026F6B DB 2,"ok" ; ok
000351 QUIT2: ; THEN
000351 F107 E5FF DW BRAN,QUIT1-$ ; AGAIN