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
| 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 |
| ! | - | >= | 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.1641461397.txt.gz · Last modified: 2022/01/06 09:29 by papa
