crawos/doc/handbook-forth.html

7278 lines
427 KiB
HTML
Executable File

<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
<title>MikeOS Forth Handbook</title>
<meta name="created" content="2014-02-24T21:50:29.185000000">
<meta name="changed" content="2014-03-20T21:33:25.278000000">
<style type="text/css">
body {
font-family: sans-serif;
}
h1 {
margin-top:5px;
color: #69A000;
}
h2 {
color: #69A000;
}
h3 {
margin-top:5px;
color: #69A000;
}
hr {
border: 0;
color: #69A000;
background-color: #69A000;
height: 3px;
}
pre {
background-color: #F0F0F0;
border: 5px solid #F0F0F0;
}
a {
text-decoration: none;
color: #0000F0;
}
a:visited {
text-decoration: none;
color: #0000F0;
}
a:hover {
text-decoration: underline;
}
li {
margin-left: -1ex;
}
</style>
</head>
<body>
<table cellpadding="10" border="0">
<tbody>
<tr>
<!-- NAVIGATION PANEL --> <td style="border:1px solid black;
width:160px;" valign="top">
<h3>Navigate</h3>
<p><strong>Overview</strong></p>
<ul>
<li><a href="#Introduction">Introduction</a></li>
<li><a href="#Features">Features</a></li>
<li><a href="#Dictionary">Dictionary</a></li>
</ul>
<p><strong><a href="#Vocabulary">Vocabulary</a></strong></p>
<a href="#Vocabulary"> </a>
<ul>
<a href="#Vocabulary"> </a>
<li><a href="#Vocabulary"></a><a href="#Math">Math
Functions</a></li>
<li><a href="#Data">Data and Stack</a></li>
<li><a href="#Keyboard">Keyboard and Screen</a></li>
<li><a href="#Conditionals">Conditional Structures</a></li>
<li><a href="#Loops">Loop Structures</a></li>
<li><a href="#Defining">Defining Words</a></li>
<li><a href="#Control">Execution Control</a></li>
<li><a href="#Miscellaneous">Miscellaneous</a></li>
</ul>
<p><strong><a href="#Starting">Getting Started</a></strong></p>
<a href="#Starting"> </a>
<p><a href="#Starting"><strong></strong></a><strong><a
href="#Technical">Technical</a></strong></p>
<a href="#Technical"> </a>
<p><a href="#Technical"><strong></strong></a><strong><a
href="#Extra">Extra</a></strong></p>
<a href="#Extra"> </a>
<ul>
<a href="#Extra"> </a>
<li><a href="#Extra"></a><a href="#Help">Help</a></li>
<li><a href="#License">License</a></li>
</ul>
</td>
<!-- MAIN CONTENT PANEL --> <td valign="top">
<h1>MikeOS Forth Handbook<br>
</h1>
<h2>For kernel version 4.4, 20 March 2014, or newer - (C)
MikeOS Developers</h2>
<h3>Forth version 1.5.3</h3>
<p>If you have any questions, see <a
href="http://mikeos.sourceforge.net"> the MikeOS website</a>
for contact details and mailing list information.<br>
</p>
<p>Click the links on the left to navigate around this
guide.<br>
</p>
<p><br>
</p>
<hr noshade="noshade">
<h2>Introduction</h2>
<a name="Introduction"></a>
<p>In the early 1960s a computer programmer named Charles
Moore developed what he considered to be a 4<sup>th</sup>
generation programming language (4GL), Forth. Forth can be
considered to be an application, compiler, language or
operating system depending upon how the program is being
used at any particular time.</p>
<p>A Forth system consists of a dictionary of words that can
be compiled or executed depending on the machine's current
operating state. The dictionary is further divided into
vocabularies. The same word may be present in more than
one vocabulary and perform differently in each one. The
machine's current context determines which definition is
used. The primary vocabulary where most words are linked
is FORTH.</p>
<p>Forth is modeled as a two stack virtual machine: one
stack for passing parameters and one to follow the
execution of a program (list of pointers to currently
executing 'words'). It is tempting to think of each word
as a computer subroutine and a program as a collection of
subroutines, however, Forth is defined as a <b>direct</b>
threaded language. Languages that are subroutine threaded
may be considered to be Forth-like, but not true Forth.</p>
<p>Over the years several standards have been developed that
describe the meaning of the words that comprise the kernel
of a Forth system. This document will rely heavily on
three of these standards: Forth-79, Forth Interest Group
(FIG) and Forth-83. In 1994 a national standards group
developed an all-encompassing standards document; it will
be referenced occasionally. The standards are very
similar, but there are significant differences, in spots,
among them. The Forth-79 standard will be used
preferentially to resolve most conflicts.</p>
<p>Forth has the reputation of being 'write-once' code, i.e.
it is not possible to understand, change and debug an
existing program. This is the original programmer's
problem and not inherent in the language. If the code is
laid out well and documented using the built-in tools, it
will be no harder to change than any other well-written
code.</p>
<p>This document is a <u>brief</u> description of a Forth
system that has been developed to work with MikeOS and is
not meant to 'stand alone.' Much information concerning
Forth is available on line. Two books that are very
helpful are <i>Starting Forth</i> by Leo Brodie (a
tutorial that takes one from basic concepts to advanced
use of the language) and <i>FORTH: A Text and Reference</i>
by Mahlon Kelly and Nicholas Spies (a text book in a
tutorial style with an exceptional glossary of most common
Forth words).</p>
<p><br>
</p>
<hr noshade="noshade">
<h2>Features</h2>
<a name="Features"></a>
<ul>
<li>Based on a 16-bit virtual architecture.</li>
</ul>
<ul>
<li>Two stacks: parameter stack, S, and return stack, R.</li>
</ul>
<ul>
<li>Data is divided into bytes (8 bits), cells (16 bits)
and double words (32 bits).</li>
</ul>
<ul>
<li>This implementation is limited to 16-bit CPU
operations and one 64k Intel segment.</li>
</ul>
<ul>
<li>Self-contained: a program is built by extending the
Forth system with new words.</li>
</ul>
<ul>
<li>Fixed point math. (Words that manipulate floating
point numbers may be defined, but this kernel only
supports fixed point.)</li>
</ul>
<p>This version of Forth is set up to use 7-bit ASCII
characters for input and output.</p>
<p>Although strings are input as null terminated (ASCII-Z),
strings are stored in the dictionary as 'counted:' one
byte count followed by the (counted) number of characters.
The maximum size counted string is 255 characters. We
further limit this to 32 characters for a name to keep the
word list from becoming unwieldy.</p>
<p>Logic values: false is numerically equal to zero. Any
non-zero value tests as true. Logic functions return 1 for
true in Forth-79.</p>
<p>Forth uses post-fix (sometimes called 'reverse Polish')
notation, e.g. 2 3 <u>*</u> = 6. Note that the operation
comes after the variables, not before or between.<br>
</p>
<p>The primary vocabulary is called FORTH. This is usually
where a program is developed, however other vocabularies,
including custom ones, are possible. Other common
vocabularies are ASSEMBLER and EDITOR. Because the host OS
normally handles these functions they are not included in
this implementation.</p>
<p>[<b>Custom</b>] Forth usually divides a disk into logical
blocks of 1k bytes; except at the driver level, the
hardware disk structure is ignored. This implementation
uses the host built-in file functions to access
information from the host file system rather than
read/write raw disk data.</p>
<p>[<b>Custom</b>] For faster searching during compilation
the dictionary is split into 16 hash chains. The current
vocabulary modifies the hash function so that only words
in the vocabulary(ies) of interest are found. Typically, a
dictionary search starts in the current vocabulary and
continues in the FORTH vocabulary if the word is not found
in the current one.</p>
<p><br>
</p>
<hr noshade="noshade">
<h2>Dictionary</h2>
<a name="Dictionary"></a>
<p>Traditionally, Forth words are documented by showing the
before and after parameter stack condition inside a
comment. In-line comments start with '<b>('</b> and end
with '<b>)'</b>; before and after are separated by two
dashes. E.g. addition could be documented as '( n1 n2 --
n3 )'. 'n' represents a signed 16-bit value, 'd' a 32-bit
value, 'c' an 8-bit character or byte value, 'u' unsigned
value, 'a' a 16-bit address and 'f' a logic flag.
Additional information may be placed after the final stack
value to describe the operation in more detail. The format
of the additional information is highly dependent on the
actual programmer. Consult the recommended references and
the included source code for details of the behavior of
individual words.</p>
<p>Note: the author's grouping of words is somewhat
different than either the standards or the text books
mentioned above.</p>
<p><br>
</p>
<hr noshade="noshade">
<h2>Forth Vocabulary</h2>
<a name="Vocabulary"></a>
<h3><u>Math functions</u></h3>
<a name="Math"></a>
<dl>
<dd>
<table cellspacing="0" cellpadding="5" width="689">
<colgroup><col width="188"> <col width="159"> <col
width="310"> </colgroup><tbody>
<tr valign="top">
<td style="border-top: 1px solid #000000;
border-bottom: 1px solid #000000; border-left:
1px solid #000000; border-right: none;
padding-top: 0.04in; padding-bottom: 0.04in;
padding-left: 0.04in; padding-right: 0in"
width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">*</font></font></p>
</td>
<td style="border-top: 1px solid #000000;
border-bottom: 1px solid #000000; border-left:
1px solid #000000; border-right: none;
padding-top: 0.04in; padding-bottom: 0.04in;
padding-left: 0.04in; padding-right: 0in"
width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border: 1px solid #000000; padding:
0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'times'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">*/</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'times
divide'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">*/MOD</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">(star
slant) 'times divide mod'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">+</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">plus</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">+!</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'plus
store'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">-</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">minus</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">/</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'divide'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">/MOD</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">(slant)
'divide mod'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">1+</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">1+!</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
uncontrolled</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Inc
memory contents</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">1-</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">1-!</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
uncontrolled</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Dec
memory contents</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">2*</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
reserved</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'two
times'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">2**</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2"><b>Custom</b></font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">2^n</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">2+</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">2-</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">2/</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-83</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">4*</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">4/</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">@+</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( n1 a --
n )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">@-</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( n1 a --
n )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">ABS</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">(absolute)</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">AND</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">C+!</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( c a --
)</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">COM</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
uncontrolled</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">One's
complement</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">D+</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">D+!</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( d a --
)</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">D-</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79 double</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">DABS</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79 double</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'d-abs'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">DMAX</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79 double</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">DMIN</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79 double</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">DNEGAGE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Two's
complement</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">LSHIFT</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-94</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( n c --
n&lt;&lt;c )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">M*</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-94</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( n1 n2
-- d )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">M*/</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">94 double</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( d1 n1
n2 -- d )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">M+</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">94 double</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( d1 n --
d )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">M/</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( d n1 --
n )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">MAX</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">MIN</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">MOD</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">NEGATE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Two's
complement</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">OR</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">RSHIFT</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-94</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( n c --
n&gt;&gt;c )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">S&gt;D</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-94</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'s to d'
( n -- d ) sign extend</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">SQRT</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2"><b>Custom</b></font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( d -- n
)</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">T*</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( d n --
t )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">T/</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( t n --
d )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p>U*</p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">U/MOD</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">XOR</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p>Forth-79</p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
</tbody>
</table>
</dd>
</dl>
<p style="margin-left: 0.26in"> Use U* and U/MOD in place of
Forth-83 UM* and UM/MOD.</p>
<h3><u>Data and stack manipulation functions</u></h3>
<a name="Data"></a>
<dl>
<dd>
<table cellspacing="0" cellpadding="5" width="689">
<colgroup><col width="188"> <col width="159"> <col
width="310"> </colgroup><tbody>
<tr valign="top">
<td style="border-top: 1px solid #000000;
border-bottom: 1px solid #000000; border-left:
1px solid #000000; border-right: none;
padding-top: 0.04in; padding-bottom: 0.04in;
padding-left: 0.04in; padding-right: 0in"
width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">!</font></font></p>
</td>
<td style="border-top: 1px solid #000000;
border-bottom: 1px solid #000000; border-left:
1px solid #000000; border-right: none;
padding-top: 0.04in; padding-bottom: 0.04in;
padding-left: 0.04in; padding-right: 0in"
width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border: 1px solid #000000; padding:
0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'store'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">+@</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( a1 a2
-- n ) 'a' may be offset</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">-LEADING</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( addr
cnt -- addr' cnt' )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">-ROT</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( n1 n2
n3 -- n3 n1 n2 )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">-TEXT</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
uncontrolled</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( a1 n a2
-- f,t=different )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">-TRAILING</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">2!</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79 double</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'two
store'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">2@</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79 double</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'two
fetch'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">2&gt;R</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-94</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'two to
r'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">2DROP</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79 double</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'two
drop'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">2DUP</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79 double</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'two dup'
(duplicate)</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">2OVER</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79 double</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'two
over'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">2R&gt;</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-94</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'two r
from'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">2SWAP</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79 double</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'two
swap'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">3DUP</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( n1 n2
n3 -- n1 n2 n3 n1 n2 n3 )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">&lt;CMOVE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
reserved</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">(backwards)
'reverse c-move'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">&gt;&lt;</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
uncontrolled</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'interchange
bytes'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">&gt;R</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'to r'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">?DUP</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'question
dup'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">@</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'fetch'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">BLANK</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
reserved</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">C!</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">(byte)
'c-store'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">C@</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'c-fetch'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">CMOVE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'c-move'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">COUNT</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">DEPTH</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Parameter
stack depth</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">DROP</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">DUP</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">(duplicate)</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">ERASE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">FILL</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">L!</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( n seg
off -- ) long, intersegment</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">L@</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( seg off
-- n )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">LC!</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( c seg
off -- )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">LC@</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( seg off
-- c &gt;&gt; zero extended byte )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">LOWER&gt;UPPER</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2"><b>Custom</b></font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( c -- c'
)</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">OVER</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">PICK</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">R&gt;</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'r from'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">ROLL</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">ROT</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">(rotate)</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">S0</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
uncontrolled</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Report
TOS</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">SEGMOVE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( fs fa
ts ta #byte -- )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">SP@</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
reserved</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">SWAP</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">XFER</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( a1 a2
-- &gt;&gt; transfers contents of 1 to 2 )</font></font></p>
</td>
</tr>
</tbody>
</table>
</dd>
</dl>
<p style="margin-left: 0.26in">2ROT, MOVE (use CMOVE) and R@
(use I) are not included in this implementation.</p>
<h3><u>Keyboard input and CRT output</u></h3>
<a name="Keyboard"></a>
<dl>
<dd>
<table cellspacing="0" cellpadding="5" width="688">
<colgroup><col width="187"> <col width="159"> <col
width="310"> </colgroup><tbody>
<tr valign="top">
<td style="border-top: 1px solid #000000;
border-bottom: 1px solid #000000; border-left:
1px solid #000000; border-right: none;
padding-top: 0.04in; padding-bottom: 0.04in;
padding-left: 0.04in; padding-right: 0in"
width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">#</font></font></p>
</td>
<td style="border-top: 1px solid #000000;
border-bottom: 1px solid #000000; border-left:
1px solid #000000; border-right: none;
padding-top: 0.04in; padding-bottom: 0.04in;
padding-left: 0.04in; padding-right: 0in"
width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border: 1px solid #000000; padding:
0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'sharp'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">#&gt;</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">End
number conversion</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">#S</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Convert
numbers</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">#TIB</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-83</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">System
variable =&gt; characters left in current
input stream</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">$</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Temporary
(next number input only) base 16</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">%</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Temporary
base 2</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">(D.)</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Format a
signed double</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">.</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'dot'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">.BASE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'dot
base' = BASE @ .</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">.R</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
reserved</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Right-justified
number</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">.S</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-94</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Show
parameter stack</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">0</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">System
constant for speed and size</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">0.</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">System
constant</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">1</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">System
constant</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">1.</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">System
constant</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">2</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">System
constant</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">&lt;#</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Begin
number conversion</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">&gt;IN</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">System
variable =&gt; offset into input stream</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">?</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'question'
= @ .</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">BASE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">System
variable</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">BASE!</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'base
store'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">BINARY</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">BELL</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
uncontrolled</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">BL</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
reserved</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">System
constant = space = 32</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">CONVERT</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">CR</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">D.</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79 double</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'d-dot'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">D.R</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79 double</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'d dot r'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">DECIMAL</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">EMIT</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">EXPECT</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">HEX</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
reserved</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">HLD</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">System
variable; address for HOLD</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">HOLD</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">KEY</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">NUMBER</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
reserved</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Counted
string to double</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">OCTAL</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
reserved</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">OK</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Say 'ok'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Q</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Temporary
base 8</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">SIGN</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">SPACE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">SPACES</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">SPAN</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-83</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">System
variable</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">TIB</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-83</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Returns
address of input buffer (text or disk)</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">TYPE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">U.</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">(unsigned)
'u dot'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="187">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">U.R</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
reserved</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'u dot r'</font></font></p>
</td>
</tr>
</tbody>
</table>
</dd>
</dl>
<h3><u>Conditional structures</u></h3>
<a name="Conditionals"></a>
<p style="margin-left: 0.25in; margin-bottom: 0.1in;
page-break-before: auto; page-break-after: auto"> <font
face="Verdana, sans-serif"><font style="font-size: 11pt"
size="2">IF ... ELSE ... THEN</font></font></p>
<p style="margin-left: 0.25in; margin-bottom: 0.1in"><font
face="Verdana, sans-serif"><font style="font-size: 11pt"
size="2">C@SWITCH ... ENDSWITCH</font></font></p>
<p style="margin-left: 0.25in; margin-bottom: 0.1in"><font
face="Verdana, sans-serif"><font style="font-size: 11pt"
size="2">SWITCH ... ENDSWITCH</font></font></p>
<dl>
<dd>
<table cellspacing="0" cellpadding="5" width="688">
<colgroup><col width="188"> <col width="159"> <col
width="309"> </colgroup><tbody>
<tr valign="top">
<td style="border-top: 1px solid #000000;
border-bottom: 1px solid #000000; border-left:
1px solid #000000; border-right: none;
padding-top: 0.04in; padding-bottom: 0.04in;
padding-left: 0.04in; padding-right: 0in"
width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">0&lt;</font></font></p>
</td>
<td style="border-top: 1px solid #000000;
border-bottom: 1px solid #000000; border-left:
1px solid #000000; border-right: none;
padding-top: 0.04in; padding-bottom: 0.04in;
padding-left: 0.04in; padding-right: 0in"
width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border: 1px solid #000000; padding:
0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'zero
less than'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">0=</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'zero
equal'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">0&gt;</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'zero
greater than'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">&lt;</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">=</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'equal'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">&gt;</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">?CELL</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( n -- n
f,t=word )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">?PRINTABLE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( c --
f,t=printable )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">D0=</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79 double</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">D&lt;</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">D=</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79 double</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">DU&lt;</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79 double</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'d u less
than'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">FALSE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-94</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( -- 0 )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">FALSE!</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( a --
&gt;&gt; stores 0 in address )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">NOT</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Alias for
0=</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">STAY</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( f --
&gt;&gt; exit if false )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">TRUE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-94</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( -- t )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">U&lt;</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">WITHIN</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-94</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( n n2 n3
-- f &gt;&gt; true if n2 &lt;= n &lt; n3 )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">{</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Start
option compile</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">}</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">End
option compile</font></font></p>
</td>
</tr>
</tbody>
</table>
</dd>
</dl>
<p style="margin-left: 0.26in">NOT may also be used for 0= .</p>
<h3><u>Loop structures</u></h3>
<a name="Loops"></a>
<p style="margin-left: 0.26in"> BEGIN ... AGAIN [Custom]
Only an abort terminates the loop.</p>
<p style="margin-left: 0.26in"> BEGIN ... UNTIL</p>
<p style="margin-left: 0.26in"> BEGIN ... WHILE ... REPEAT</p>
<p style="margin-left: 0.26in"> DO ... LOOP</p>
<p style="margin-left: 0.26in"> DO ... +LOOP</p>
<p style="margin-left: 0.26in"> DO ... /LOOP [Custom]
Unsigned limit test.</p>
<dl>
<dd>
<table cellspacing="0" cellpadding="5" width="689">
<colgroup><col width="188"> <col width="159"> <col
width="310"> </colgroup><tbody>
<tr valign="top">
<td style="border-top: 1px solid #000000;
border-bottom: 1px solid #000000; border-left:
1px solid #000000; border-right: none;
padding-top: 0.04in; padding-bottom: 0.04in;
padding-left: 0.04in; padding-right: 0in"
width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">2LEAVE-EXIT</font></font></p>
</td>
<td style="border-top: 1px solid #000000;
border-bottom: 1px solid #000000; border-left:
1px solid #000000; border-right: none;
padding-top: 0.04in; padding-bottom: 0.04in;
padding-left: 0.04in; padding-right: 0in"
width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border: 1px solid #000000; padding:
0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Leave 2
loops and exit word</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">I</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'eye'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">I'</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
reserved</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'I-prime'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">J</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'jay'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">J'</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'j-prime'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">K</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
reserved</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'kay'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">LEAVE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">LEAVE-EXIT</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Leave
loop and exit word</font></font></p>
</td>
</tr>
</tbody>
</table>
</dd>
</dl>
<h3><u>Defining (dictionary) words</u></h3>
<a name="Defining"></a>
<dl>
<dd>
<table cellspacing="0" cellpadding="5" width="689">
<colgroup><col width="188"> <col width="159"> <col
width="310"> </colgroup><tbody>
<tr valign="top">
<td style="border-top: 1px solid #000000;
border-bottom: 1px solid #000000; border-left:
1px solid #000000; border-right: none;
padding-top: 0.04in; padding-bottom: 0.04in;
padding-left: 0.04in; padding-right: 0in"
width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'</font></font></p>
</td>
<td style="border-top: 1px solid #000000;
border-bottom: 1px solid #000000; border-left:
1px solid #000000; border-right: none;
padding-top: 0.04in; padding-bottom: 0.04in;
padding-left: 0.04in; padding-right: 0in"
width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Modified
79</font></font></p>
</td>
<td style="border: 1px solid #000000; padding:
0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'tick';
returns CFA, state smart</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">(</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Start
comment</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">)</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Not
actual word</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">End
comment</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">,</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'comma'</font></font></p>
</td>
</tr>
</tbody>
</table>
</dd>
<dd>
<table cellspacing="0" cellpadding="5" width="689">
<colgroup><col width="188"> <col width="159"> <col
width="310"> </colgroup><tbody>
<tr valign="top">
<td style="border-top: 1px solid #000000;
border-bottom: 1px solid #000000; border-left:
1px solid #000000; border-right: none;
padding-top: 0.04in; padding-bottom: 0.04in;
padding-left: 0.04in; padding-right: 0in"
width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">."</font></font></p>
</td>
<td style="border-top: 1px solid #000000;
border-bottom: 1px solid #000000; border-left:
1px solid #000000; border-right: none;
padding-top: 0.04in; padding-bottom: 0.04in;
padding-left: 0.04in; padding-right: 0in"
width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Modified
79</font></font></p>
</td>
<td style="border: 1px solid #000000; padding:
0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'dot
quote', state smart</font></font></p>
</td>
</tr>
</tbody>
</table>
</dd>
<dd>
<table cellspacing="0" cellpadding="5" width="689">
<colgroup><col width="188"> <col width="159"> <col
width="310"> </colgroup><tbody>
<tr valign="top">
<td style="border-top: 1px solid #000000;
border-bottom: 1px solid #000000; border-left:
1px solid #000000; border-right: none;
padding-top: 0.04in; padding-bottom: 0.04in;
padding-left: 0.04in; padding-right: 0in"
width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">2CONSTANT</font></font></p>
</td>
<td style="border-top: 1px solid #000000;
border-bottom: 1px solid #000000; border-left:
1px solid #000000; border-right: none;
padding-top: 0.04in; padding-bottom: 0.04in;
padding-left: 0.04in; padding-right: 0in"
width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79 double</font></font></p>
</td>
<td style="border: 1px solid #000000; padding:
0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">2VARIABLE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79 double</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">:</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">;</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">;CODE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
assembler</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">;code</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-94</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Run-time
header for development</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">&gt;BODY</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-83</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">CFA → PFA</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">ABORT"</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-83</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'abort
quote', state smart</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">ALLOT</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">ARRAY</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Array of
bytes</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">ASSEMBLER</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
assembler</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">vocabulary</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">C,</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
reserved</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'c comma'
(compile)</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">CFA</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">FIG</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">PFA → CFA</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">CVARIABLE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Byte
variable</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">COMPILE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">CONSTANT</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">CONTEXT</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">System
[double] variable</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">CREATE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">CURRENT</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">System
[double] variable</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">DCLIT</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( c1 c2
-- )</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">DEFINITIONS</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">DOES&gt;</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'does'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">EDITOR</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
reserved</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">vocabulary</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">EMPTY</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Go back
to last protected dictionary</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">FENCE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">System
variable</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">FORGET</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">FORTH</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">H</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">System
variable contains 'here'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">H-LIST</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Print
dictionary hash chain</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">HEADS</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">System
array of hash pointers</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">HERE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">ID.</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( lfa --
&gt;&gt; prints name of word at link addr
)</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">IMMEDIATE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">L&gt;CFA</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">LFA → CFA</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">L&gt;NFA</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">LFA → NFA</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">L&gt;PFA</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">LFA → PFA</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">LAST</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
uncontrolled</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">System
variable = last word created</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">LITERAL</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">PAD</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">PROTECT</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">SMUDGE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">FIG</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">STATE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">System
variable</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">UNSMUDGE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">FIG</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">VARIABLE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">VLIST</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">FIG</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">(vocabulary)
'v list'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">VOCABULARY</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">[</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'left
bracket' stop compiling<br>
</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">]</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'right
bracket' restart compiling<br>
</font></font></p>
</td>
</tr>
</tbody>
</table>
</dd>
</dl>
<p style="margin-left: 0.26in"> Since ' and ." are state
smart, ['] and .( are not needed.</p>
<p style="margin-left: 0.26in">VLIST replaces Forth-83
WORDS.</p>
<h3><u>Execution control words</u></h3>
<a name="Control"></a>
<dl>
<dd>
<table cellspacing="0" cellpadding="5" width="689">
<colgroup><col width="188"> <col width="159"> <col
width="310"> </colgroup><tbody>
<tr valign="top">
<td style="border-top: 1px solid #000000;
border-bottom: 1px solid #000000; border-left:
1px solid #000000; border-right: none;
padding-top: 0.04in; padding-bottom: 0.04in;
padding-left: 0.04in; padding-right: 0in"
width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">'ABORT</font></font></p>
</td>
<td style="border-top: 1px solid #000000;
border-bottom: 1px solid #000000; border-left:
1px solid #000000; border-right: none;
padding-top: 0.04in; padding-bottom: 0.04in;
padding-left: 0.04in; padding-right: 0in"
width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border: 1px solid #000000; padding:
0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Vectored
abort address</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">@EXECUTE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">For
vectored execute</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">ABORT</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">EXECUTE</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">EXIT</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">INTERPRET</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
uncontrolled</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">QUERY</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">QUIT</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">WORD</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Forth-79</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="310">
<p><br>
</p>
</td>
</tr>
</tbody>
</table>
</dd>
</dl>
<h3><u>Miscellaneous</u></h3>
<a name="Miscellaneous"></a>
<dl>
<dd>
<table cellspacing="0" cellpadding="5" width="688">
<colgroup><col width="188"> <col width="159"> <col
width="309"> </colgroup><tbody>
<tr valign="top">
<td style="border-top: 1px solid #000000;
border-bottom: 1px solid #000000; border-left:
1px solid #000000; border-right: none;
padding-top: 0.04in; padding-bottom: 0.04in;
padding-left: 0.04in; padding-right: 0in"
width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">!CURSOR</font></font></p>
</td>
<td style="border-top: 1px solid #000000;
border-bottom: 1px solid #000000; border-left:
1px solid #000000; border-right: none;
padding-top: 0.04in; padding-bottom: 0.04in;
padding-left: 0.04in; padding-right: 0in"
width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border: 1px solid #000000; padding:
0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">(set)
'store cursor'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">.AZ</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Print a
null terminated string (ASCII-Z)</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">/0</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Divide 0
interrupt</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">?MEM</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Amount of
memory left for new dictionary entries</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">@CURSOR</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">(get)
'fetch cursor'</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">ASCII</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">79
uncontrolled</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Numerical
value of next word; state smart</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">CLS</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Clear
screen</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">FNAME</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">System
byte array: the file name used for file
access</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">FORTHSEG</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( -- seg
), Intel segment system currently resides
in</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">FIRSTSEG</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">( -- seg
), first available full segment</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">ROWS</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Rows
available in display</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">SYSTEM</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Return to
host system</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">VERSION</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Print
version string</font></font></p>
</td>
</tr>
<tr valign="top">
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="188">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">\</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: none; padding-top: 0in;
padding-bottom: 0.04in; padding-left: 0.04in;
padding-right: 0in" width="159">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Custom</font></font></p>
</td>
<td style="border-top: none; border-bottom: 1px
solid #000000; border-left: 1px solid #000000;
border-right: 1px solid #000000; padding-top:
0in; padding-bottom: 0.04in; padding-left:
0.04in; padding-right: 0.04in" width="309">
<p><font face="Verdana, sans-serif"><font
style="font-size: 11pt" size="2">Comment
to end of line</font></font></p>
</td>
</tr>
</tbody>
</table>
</dd>
</dl>
<p><br>
</p>
<hr noshade="noshade">
<h2>Getting started</h2>
<a name="Starting"></a>
<p>Forth is a very 'lean' system. There is no terminal
prompt; only the default blinking cursor. When starting
the system the version string will be displayed, followed
by the command completed satisfactorily message (ok).</p>
<p>Start the system and press the &lt;Enter&gt; key a couple
of times. Each time the system should say 'ok' and the
cursor move to the next line for more input. To return to
the host system at any time type <font face="Courier New,
monospace">SYSTEM</font>&lt;Enter&gt;.</p>
<p>The system can do much in its interpretive mode. Try (pay
particular attention to the spaces between each 'word':</p>
<p style="margin-left: 0.31in; margin-bottom: 0.1in;
page-break-before: auto; page-break-after: auto"> <font
face="Courier New, monospace"><font style="font-size:
11pt" size="2">5 2 + .<font face="Verdana, sans-serif">&lt;Enter&gt;</font></font></font></p>
<p style="margin-bottom: 0.1in"><font face="Verdana,
sans-serif"><font style="font-size: 11pt" size="2">Remember,
Forth uses post-fix notation. The system should have
responded with '<font face="Courier New, monospace">7
ok</font>'. The 'dot' tells Forth to print the top
number on the parameter stack.</font></font></p>
<p style="margin-bottom: 0.1in"><font face="Verdana,
sans-serif"><font style="font-size: 11pt" size="2">Now,
let's create the traditional first program; type:</font></font></p>
<p style="margin-left: 0.26in; margin-bottom: 0.1in;
page-break-before: auto; page-break-after: auto"> <font
face="Courier New, monospace"><font style="font-size:
11pt" size="2">: HW ." Hello World!" ;<font
face="Verdana, sans-serif">&lt;Enter&gt;</font></font></font></p>
<p style="margin-bottom: 0.1in"><font face="Verdana,
sans-serif"><font style="font-size: 11pt" size="2">Execute
the program (word) by typing <font face="Courier New,
monospace">HW</font>&lt;Enter&gt;. ':' creates a new
dictionary entry. 'HW' is the name we gave this word
that was compiled into the Forth vocabulary; you could
have used any other legal name. ' ." ' compiles a
literal string that will be displayed when the word is
executed. Finally, ';' completes the dictionary entry
and makes it findable.</font></font></p>
<p style="margin-bottom: 0.1in"><font face="Verdana,
sans-serif"><font style="font-size: 11pt" size="2">Here's
another short 'program' to try.</font></font></p>
<p style="margin-left: 0.31in; margin-bottom: 0.1in;
page-break-before: auto; page-break-after: auto"> <font
face="Courier New, monospace"><font style="font-size:
11pt" size="2">: LP 5 0 DO I . LOOP ; <font
face="Verdana, sans-serif">&lt;Enter&gt;</font></font></font></p>
<p style="margin-left: 0.31in; margin-bottom: 0.1in"><font
face="Verdana, sans-serif"><font style="font-size: 11pt"
size="2">Execute the word by typing <font
face="Courier New, monospace">LP</font>&lt;Enter&gt;.
Did the system respond with '<font face="Courier New">0
1 2 3 4 ok</font>'?</font></font></p>
<p style="margin-left: 0.31in; margin-bottom: 0.1in"><font
face="Verdana, sans-serif"><font style="font-size: 11pt"
size="2">Alternately you could use <font
face="Courier New, monospace">: LP [ 5 0 ] DCLIT</font>
<font face="Courier New, monospace">DO I . LOOP ; </font>&lt;Enter&gt;</font></font></p>
<p style="margin-bottom: 0.1in"><font face="Verdana,
sans-serif"><font style="font-size: 11pt" size="2">Forth
uses a 2 stack virtual machine model. 'I' retrieves
the working loop counter of the outermost loop and
places it on the parameter stack and 'dot' prints out
a signed number. Loop counters and limits are stored
on the return stack so that the parameter stack can
still be easily accessed inside of loops.</font></font></p>
<p style="margin-bottom: 0.1in"><font face="Verdana,
sans-serif"><font style="font-size: 11pt" size="2">DCLIT
requires that the 2 literals (constants) each fit into
a signed byte. The '[' stops compilation and allows
the numbers to be placed on the parameter stack. The
']' resumes compilation and the definition completes
as before. This construct is a little quicker and
saves a little space in the dictionary.</font></font></p>
<p>Experiment and enjoy.</p>
<p><br>
</p>
<hr noshade="noshade">
<h2>Technical</h2>
<a name="Technical"></a>
<p>Register usage (generally): </p>
<ul>
<li>ax general purpose arithmetic</li>
</ul>
<ul>
<li>bx general purpose and BIOS access</li>
</ul>
<ul>
<li>cx counter and general purpose</li>
</ul>
<ul>
<li>dx general purpose arithmetic</li>
</ul>
<ul>
<li>bp return stack (R)</li>
</ul>
<ul>
<li>sp parameter stack (S)</li>
</ul>
<ul>
<li>si execution pointer</li>
</ul>
<ul>
<li>di (temporary) pfa pointer when processing a colon
definition<br>
</li>
</ul>
<p>The system follows the Forth-79 standard as much as
possible. Although it is permissible to specify the system
as, "FORTH-79 Standard Subset," the author has chosen not
to do so.</p>
<p>Bytes have a numeric range of -128 to +127. Cells (16-bit
words), -32768 to +32767. And double words (32 bits),
-2,147,483,648 to +2,147,483,647.</p>
<p>Fixed point math can be remarkably precise. E.g. 355 113
*/ is excellent approximation of multiplying by π.</p>
<p>Forth words may perform 2 different operations: one
during word compilation and one during execution. In the
"Getting Started" section it was seen how ' ." ' compiled
a literal string into the dictionary during compilation
and then printed that string during execution.</p>
<p>This system uses the following dictionary entry format:</p>
<p style="margin-left: 0.26in">LFA = Link Field Address: a
pointer to the previous definition in this hash list</p>
<p style="margin-left: 0.26in">NFA = Name Field Address: a
counted string that represents the name and flags. The
maximum number of characters in a name is 31 (bits 4 to
0). Bit 5 is used to 'smudge' an entry so that later
definitions can replace early ones. Bit 6 is reserved. And
bit 7 indicates immediate execution rather than
compilation. The name field may be 2 to 32 bytes long.</p>
<p style="margin-left: 0.26in">CFA = Code Field Address:
pointer to actual code to execute. For assembler (code)
definitions this is usually the beginning of the next
cell. (The mathematical operators at the start of the
dictionary are typical.) For colon definitions this points
to the colon run-time code.</p>
<p style="margin-left: 0.26in">PFA = Parameter Field
Address: the parameters needed by this definition. For
code definitions this would be machine code. For colon
definitions this would be a list of CFAs that make up this
word's definition (description). For constants and
variables this would be actual data.</p>
<p>When using an external compiler the link and name fields
may be omitted (entry is considered headerless) to
conserve space. Words using these headerless entries will
still execute, but the name will not be found for use in
future definitions. Alternatively, to save space, the
headers may be placed in a separate data segment during
compilation: only the final word needs to be able to be
found to execute an intricate program.</p>
<p>In the original specification of Forth higher level
definitions consisted of either code or colon types. There
are Forth-like systems that provide for inline code in
colon definitions. This construct has rarely been
advantageous in a true Forth system; the increased size
and complexity out weighs any speed gains.</p>
<p>CONTEXT and CURRENT are double variables (32-bits) that
contain lists of VOCABULARIES. A vocabulary is designated
by a nibble, 1-15, with null being 'none.' A 32-bit
variable has 8 nibbles and thus may designate up to 8
vocabularies. The dictionary hash function uses the
vocabulary designator and the 7-bit ASCII value of the
first letter of the word to reduce the search to only one
of the 16 chains. The least significant nibble of CURRENT
specifies where new words are to be compiled. CONTEXT
specifies which vocabularies and in what order they are to
be searched for words making up the current word being
compiled.</p>
<p>This implementation follows the extended FIG model for
preventing inadvertent tampering with the kernel. There
are two arrays that describe the dictionary. One, GOLDEN,
contains the variables that map the protected portion of
the dictionary. The second array, HEADS, contains the
variables that map the working dictionary. The dictionary
may be returned to its golden state by using the word
EMPTY. Alternately, the FENCE can be moved to the current
working position with the word PROTECT.</p>
<p>This implementation was written to take advantage of many
of the input and output functions available in an IBM
compatible BIOS. All keyboard entry and screen output,
specifically, goes through the BIOS. The main OS (PC DOS
or MikeOS) is used to gain access to operating files on
the disk.</p>
<p>Two of the most basic and important operations in the
kernel are separating a word from the input stream and
finding a word in the dictionary. Many other operations
cannot be completed unless these two function properly. To
separate a word the system needs a delimiter. The most
common delimiter is space (or BL). Generally, with the
input stream pointer set, 'BL WORD' will separate the next
word from the stream and transfer the string to HERE + 2.
This sets it up to compile a new word -- link field goes
at HERE -- or place a literal string in the dictionary --
CFA of defining word goes HERE. Although there are
standards, many programmers (as does the author) prefer
non-standard stack conditions for dictionary searches. In
this implementation 'FIND' is left headerless to prevent
confusion.</p>
<p>Most macro processors would have difficulty building the
dictionary hash lists during the assembly of the code.
This system uses a slightly different approach: the NASM
macro processor builds one long chain during the assembly,
then the Forth start-up code splits the single chain into
the desired hash lists. This can take a significant amount
of time on an 8-bit, 1 MHz microprocessor, but is not
noticeable on modern processors. All words in the initial
code must be in the FORTH vocabulary. The start up penalty
can be saved by saving the after start-up modified code as
an appropriate '.bin' or '.com' executable. The Forth word
'write_exec &lt;file-name&gt;' will do this for the user.
Note that 'write_exec' is one of the few Forth words in
lower case; this helps prevent inadvertent writes to the
disk.</p>
<p>To do any serious work with a language it should be
possible to develop source as a text file and load it into
the system. Preferably, a way to store the updated
information would also be available. The 'write_exec' word
of this implementation provides a unique way to do the
latter; once the source is loaded and compiled by the
Forth kernel a new executable can be written to disk,
which includes the newly compiled code. To 'seal' the code
it is only necessary to tell the start-up code to go to a
word that will not exit nor abort. The former desire is
met by the word 'INCLUDE &lt;file name&gt;'. As an example
GEN.4TH is included in this package. At the Forth blinking
cursor type <font face="Courier New, monospace">INCLUDE
GEN.4TH </font>&lt;enter&gt;. GEN.4TH looks like a
normal text file and may be opened with any text
processor. The 'write_exec' word is contained within this
file so that the new executable is generated, as well.
[INCLUDE cannot currently use nested disk access, i.e. the
first INCLUDEd file cannot have an INCLUDE in its script.]</p>
<p><br>
</p>
<hr noshade="noshade">
<h2>Extra</h2>
<a name="Extra"></a>
<h3>Help</h3>
<a name="Help"></a>
<p>If you have any questions about MikeOS, or you're
developing a similar OS and want to share code and ideas,
go to <a href="http://mikeos.sourceforge.net/">the MikeOS
website</a> and join the mailing list as described.</p>
<br>
<h3>License</h3>
<a name="License"></a>
<p>MikeOS is open source and released under a BSD-like
license (see <strong>doc/LICENSE.TXT</strong> in the
MikeOS <strong>.zip</strong> file). Essentially, it means
you can do anything you like with the code, including
basing your own project on it, providing you retain the
license file and give credit to the MikeOS developers for
their work.</p>
<br>
<hr noshade="noshade"> </td>
</tr>
</tbody>
</table>
</body>
</html>