0                        >R 
0<                       @ 
0=                       AND 
0>                       BRANCH 
0BRANCH                  CALL 
1                        DROP 
1+                       DUP 
1-                       EXIT 
2*                       LITERAL 
2+                       NEGATE 
2/                       NOT 
4+                       OR 
+                        OVER 
-1                       R> 
-                        R@ 
<                        S->D 
<>                       U< 
=                        U> 
>                        XOR

1988 års implementation: 35000 transistorer, 10 MHz.