This is an old revision of the document!
FORTH-10 is a Forth language interpreter included in the Panda TOPS-20 distribution. The anonymous programmer describes the implementation as “NOT totally standard”. The interpreter can be started with the following command on TWENEX:
@FORTH
MIDAS assembly language source is available in file TOPS20:<UTILITIES>FORTH.MID
.
The following Forth words are hard-coded in the FORTH-10 dictionary.
DUP SWAP ROLL PICK DROP OVER ROT -DUP ?DUP LEVEL DEPTH FLOAT + - * / ^ F+ F- F* F/ FIX MOD /MOD 0= 0=_ 0< 0<= 0> 0>= EXCHANGE JSYS = =_ < <= > >= FLUSH TRACE @ ! +! -! FILL ' '# ] QUIT <# # HOLD #N SIGN #S #> HOME CR CLEAR SPACE SPACES EMIT TYPE [TYPE] KEY ?TERMINAL EXPECT [EXPECT] C@ C! C> C< . .R F. ." :" (") ["] VLIST ( ABS MINUS +- 1+ 1- MAX MIN SINE COSINE ROOT LN <-,, SW,,AP ,,-> AND OR NOT XOR EXECUTE FORGET : ; <BUILDS DOES> , ALLOT LOAD [LOAD] UNLOAD DECIMAL OCTAL BINARY IF ELSE THEN DO LOOP +LOOP I J IJ..N RUNT REPEAT UNTIL CMOVE [CMOVE] HERE LEAVE ERROR [NUMBER] WHILE BEGIN END
At start-up, FORTH-10 searches the user's log-in directory for a file named AUTO-LOAD.4TH
. If such a file exists, it is loaded automatically. If the file does not exist, FORTH-10 displays a standard greeting message.