tutorials:forth
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.
Primitive Dictionary
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
|!|-|>=|BINARY|DROP|F.|KEY|[NUMBER]|SPACE|
| # | -! | @ | <BUILDS | DUP | F/ | LEAVE | OCTAL | SPACES | |
| #> | . | ] | C! | -DUP | FILL | LEVEL | OR | SW,,AP | |
| ' | .“ | 0< | C< | ?DUP | FIX | LN | OVER | SWAP | |
| '# | / | 0⇐ | C> | ELSE | FLOAT | LOAD | PICK | ?TERMINAL | |
| ( | 0= | C@ | EMIT | FLUSH | [LOAD] | QUIT | THEN | ||
| (”) | : | 0=_ | CLEAR | END | FORGET | LOOP | .R | TRACE | |
| [“] | :“ | 0> | CMOVE | ERROR | HERE | +LOOP | REPEAT | TYPE | |
| * | ; | 0>= | [CMOVE] | EXCHANGE | HOLD | MAX | ROLL | [TYPE] | |
| + | < | 1+ | COSINE | EXECUTE | HOME | MIN | ROOT | UNLOAD | |
| +! | <# | 1- | CR | EXPECT | I | MINUS | ROT | UNTIL | |
| +- | ⇐ | ABS | DECIMAL | [EXPECT] | IF | MOD | RUNT | VLIST | |
| , | = | ALLOT | DEPTH | F* | IJ..N | /MOD | #S | WHILE | |
| ,,→ | =_ | AND | DO | F+ | J | #N | SIGN | XOR | |
| ←,, | > | BEGIN | DOES> | F- | JSYS | NOT | SINE | ||
Start-Up File
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.
tutorials/forth.1641459685.txt.gz · Last modified: 2022/01/06 09:01 by papa
