0
[IF]
Forth to HTML converter
Main contributors:
Brad Eckert brad1NO@SPAMtinyboot.com Original author
Ed Beroset berosetNO@SPAMmindspring.com Fixed HTML bugs
Dirk Busch dirkNO@SPAMschneider-busch.de Added some features
Revision 7. See bottom for revision history.
This ANS Forth program is public domain. It translates ANS Forth to colorized
HTML. Hyperlinks to the ANS Forth draft standard are inserted for all ANS
standard words. Hyperlinks to user definitions are included.
Usage: HTML FileName Generates HTML file from Forth source.
Output file is Filename with .HTM extension.
Q [forth code] Outputs HTML for 1 line to screen
Q is for debugging. You can use "linenum ?" to show the line number if an
ABORT occurs. The HTML is about 7 times as big as the Forth source because of
all the links, color changes and whitespace.
INCLUDEd files produce corresponding HTML pages. If a file can't be found,
it is skipped. Otherwise it is nested.
When you INCLUDE this file some redefinition complaints may occur. That's
okay since you won't be loading an application on top of this. You can make
a text version of this file by cut-and-paste to a text editor. The browser's
save-as-text function will work too. This file is only 80 columns wide. Note
that the browser may wrap after 80 columns when saving as a text file.
Users of specific Forths can extend the hyperlink table to point to words
in a glossary for that particular Forth.
You can change the following bold/italic/nestable options:
[THEN]
ONLY
FORTH
ALSO
DEFINITIONS
\
------------------------------------------------------------------------------
\
Configuration - You can change the options:
1
VALUE
bold
\
T if bold text
1
VALUE
italic
\
T if italic comments
1
VALUE
nestable
\
T if INCLUDE nested files
1
VALUE
linksource
\
T link to the org. file /7/
CREATE
dpanspath
,"
.\"
\
path to the ANS-Files /7/
CREATE
copyright
,"
"
\
copyright to output at /7/
\
the bottom of the HTML-file
0
CONSTANT
scheme
( Color scheme )
\
0 = light background, 1=dark
\
------------------------------------------------------------------------------
:
undefined
( <name> -- f )
BL
WORD
FIND
NIP
0=
;
undefined
C+!
[IF]
:
C+!
SWAP
OVER
C@
+
SWAP
C!
;
[THEN]
undefined
BOUNDS
[IF]
:
BOUNDS
OVER
+
SWAP
;
[THEN]
undefined
SCAN
[IF]
:
SCAN
( addr len char -- addr' len' )
>R
BEGIN
DUP
WHILE
OVER
C@
R@
<>
WHILE
1
/STRING
REPEAT
THEN
R>
DROP
;
[THEN]
undefined
SKIP
[IF]
:
SKIP
( addr len char -- addr' len' )
>R
BEGIN
DUP
WHILE
OVER
C@
R@
=
WHILE
1
/STRING
REPEAT
THEN
R>
DROP
;
[THEN]
undefined
NOOP
[IF]
:
NOOP
;
[THEN]
undefined
+PLACE
[IF]
:
+PLACE
2DUP
2>R
COUNT
CHARS
+
SWAP
MOVE
2R>
C+!
;
[THEN]
undefined
PLACE
[IF]
:
PLACE
0
OVER
C!
+PLACE
;
[THEN]
undefined
FDROP
[IF]
:
FDROP
;
( no floating point? fake it )
[THEN]
undefined
>FLOAT
[IF]
:
>FLOAT
DROP
C@
[CHAR] 0
[CHAR] 9
1+
WITHIN
;
[THEN]
undefined
UPC
[IF]
:
UPC
( convert char to upper case )
DUP
[CHAR] a
[CHAR] z
1+
WITHIN
AND
IF
32
-
THEN
;
[THEN]
0
VALUE
outf
\
output to file
1
VALUE
screen-only
\
screen is for testing
:
werr
ABORT"
Error writing file"
;
:
out
screen-only
IF
TYPE
ELSE
outf
WRITE-FILE
werr
THEN
;
:
outln
screen-only
IF
TYPE
CR
ELSE
outf
WRITE-LINE
werr
THEN
;
WORDLIST
CONSTANT
hyperlinks
\
list of hyperlinks
WORDLIST
CONSTANT
superlinks
\
hyperlinks that can't change
VARIABLE
attrib
:
/a
( -- )
attrib
@
IF
S"
</a>"
out
THEN
0
attrib
!
;
:
,$
( a len -- )
DUP
C,
BOUNDS
?DO
I
C@
C,
LOOP
;
\
text to dictionary
:
,|
( <text> -- )
[CHAR] |
WORD
COUNT
-TRAILING
,$
;
:
line
( a line# -- )
0
?DO
COUNT
+
LOOP
COUNT
out
;
\
output one string
:
boiler
( addr -- )
BEGIN
COUNT
DUP
WHILE
2DUP
+
>R
outln
R>
REPEAT
2DROP
;
:
ital(
( -- )
italic
IF
S"
<i>"
out
THEN
;
:
)ital
( -- )
italic
IF
S"
</i>"
out
THEN
;
CREATE
misctext
\
various attribute strings
,|
<a
href="
|
,|
<a
name="x
|
,|
">
|
,|
<a
href="#x
|
,|
">
|
,|
<span
style="color:#
|
,|
<hr
/><h1>
|
,|
</h1><hr
/><p>
|
,|
</span>
|
,|
</a>
|
0
C,
VARIABLE
color
\
current color
VARIABLE
infont
\
within <font> tag
:
fontcolor
( color -- )
BASE
@
>R
\
change font color
1
infont
!
misctext
5
line
0
HEX
<#
#
#
#
#
#
#
#>
out
misctext
2
line
R>
BASE
!
;
:
col
( color <name> -- )
\
define a font color
CREATE
,
DOES>
@
color
!
;
HEX
scheme
0
=
[IF]
\
light background
808080
col
unknown
008000
col
commentary
990000
col
numeric
FF0000
col
errors
990080
col
values
000000
col
userwords
009999
col
userdefiner
CC00CC
col
variables
0000FF
col
core_ws
\
core is slightly lighter blue
0000FF
col
core_ext_ws
0000FF
col
block_ws
0000FF
col
double_ws
0000FF
col
exception_ws
0000FF
col
facilities_ws
0000FF
col
file_ws
0000FF
col
fp_ws
0000FF
col
local_ws
0000FF
col
malloc_ws
0000FF
col
progtools_ws
0000FF
col
searchord_ws
0000FF
col
string_ws
[ELSE]
\
black background
808080
col
unknown
00FF00
col
commentary
FF8080
col
numeric
FF0000
col
errors
FF00FF
col
values
FFFFFF
col
userwords
00FFFF
col
userdefiner
FF80FF
col
variables
8080FF
col
core_ws
8080FF
col
core_ext_ws
0000FF
col
block_ws
0000FF
col
double_ws
0000FF
col
exception_ws
0000FF
col
facilities_ws
0000FF
col
file_ws
0000FF
col
fp_ws
0000FF
col
local_ws
0000FF
col
malloc_ws
0000FF
col
progtools_ws
0000FF
col
searchord_ws
0000FF
col
string_ws
[THEN]
DECIMAL
CREATE
begin_header
\
begin of HTML file part 1
,|
<?xml
version="1.0"?>
|
,|
<!DOCTYPE
html
PUBLIC
"-//W3C//DTD
XHTML
1.0
Strict//EN"
|
,|
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
|
,|
<html
xmlns="http://www.w3.org/1999/xhtml"
xml:lang="en"
lang="en">
|
,|
<head>
|
,|
<meta
http-equiv="Content-Type"
content="text/xml;
charset=iso-8859-1"
/>|
,|
<meta
name="GENERATOR"
content="Forth2HTML
0.8"
/>
|
,|
<style
type="text/css">
|
scheme
0
=
[IF]
,|
body
{background:
#FFFFEE;}
|
[THEN]
\
light background
scheme
1
=
[IF]
,|
body
{background:
#000000;}
|
[THEN]
\
black background
scheme
0
=
[IF]
,|
h1
{color:
#000000;}
|
[THEN]
scheme
1
=
[IF]
,|
h1
{color:
#FFFFFF;}
|
[THEN]
,|
p
{font-family:
monospace;}
|
,|
a
{text-decoration:none;}
|
,|
</style>
|
,|
<title>
|
0
C,
\
body defaults: the most common link color (blue) is made the default color
\
the most common plain text color (green) is made default.
CREATE
mid_header
\
begin of HTML file part 2
,|
</title></head>
|
,|
<body>
|
0
C,
CREATE
end_header_part1
\
end of HTML file part 1 /7/
,|
<hr
/>
|
,|
<h4
style="color:black">
|
0
C,
CREATE
end_header_part2
\
end of HTML file part 2 /8/
,|
<p><a
href="http://www.tinyboot.com/ANS/color.htm"><font
color="#C0C0C0">|
,|
HTMLized
by
<u>Forth2HTML</u>
ver
0.8</font></a></p>
|
,|
</h4>
|
,|
</body></html>
|
0
C,
:
setcolor
( -- )
\
select next color
color
@
fontcolor
;
:
closefont
( -- )
infont
@
IF
misctext
8
line
0
infont
!
THEN
;
VARIABLE
bltally
:
outh
( a n -- )
\
HTMLized text output
999
bltally
!
BOUNDS
?DO
I
C@
CASE
[CHAR] &
OF
S"
&"
out
ENDOF
[CHAR] <
OF
S"
<"
out
ENDOF
[CHAR] >
OF
S"
>"
out
ENDOF
[CHAR] "
OF
S"
""
out
ENDOF
[CHAR] ©
OF
S"
©"
out
ENDOF
\
/7/
BL
OF
bltally
@
0=
IF
S"
"
ELSE
S"
"
THEN
out
1
bltally
+!
ENDOF
I
1
out
0
bltally
!
ENDCASE
LOOP
;
:
outhattr
( a n -- )
\
HTMLized text output
BOUNDS
?DO
I
C@
CASE
[CHAR] &
OF
S"
amp"
out
ENDOF
[CHAR] <
OF
S"
lt"
out
ENDOF
[CHAR] >
OF
S"
gt"
out
ENDOF
[CHAR] "
OF
S"
quot"
out
ENDOF
[CHAR] +
OF
S"
plus"
out
ENDOF
[CHAR] !
OF
S"
bang"
out
ENDOF
[CHAR] /
OF
S"
slash"
out
ENDOF
[CHAR] \
OF
S"
backslash"
out
ENDOF
[CHAR] '
OF
S"
apos"
out
ENDOF
[CHAR] =
OF
S"
equal"
out
ENDOF
[CHAR] -
OF
S"
dash"
out
ENDOF
[CHAR] @
OF
S"
at"
out
ENDOF
[CHAR] ;
OF
S"
semi"
out
ENDOF
[CHAR] *
OF
S"
star"
out
ENDOF
[CHAR] ?
OF
S"
question"
out
ENDOF
[CHAR] ~
OF
S"
tilde"
out
ENDOF
[CHAR] #
OF
S"
pound"
out
ENDOF
[CHAR] ,
OF
S"
comma"
out
ENDOF
[CHAR] $
OF
S"
dollar"
out
ENDOF
[CHAR] |
OF
S"
bar"
out
ENDOF
[CHAR] [
OF
S"
ltbracket"
out
ENDOF
[CHAR] (
OF
S"
ltparen"
out
ENDOF
[CHAR] {
OF
S"
ltbrace"
out
ENDOF
[CHAR] ]
OF
S"
rtbracket"
out
ENDOF
[CHAR] )
OF
S"
rtparen"
out
ENDOF
[CHAR] }
OF
S"
rtbrace"
out
ENDOF
BL
OF
S"
_"
out
ENDOF
I
1
out
ENDCASE
LOOP
;
:
end_header
( -- )
\
output end of HTML file /7/
end_header_part1
boiler
copyright
COUNT
?DUP
IF
outh
ELSE
drop
THEN
end_header_part2
boiler
;
:
label
( addr len -- )
/a
\
associate a label with a word
misctext
1
line
outhattr
misctext
2
line
1
attrib
!
;
\
Assuming this is running on a PC, we allocate enough storage that crashes from
\
string overflows can't happen.
CREATE
inbuf
260
CHARS
ALLOT
\
current line from file
CREATE
token
260
CHARS
ALLOT
\
last blank delimited string
CREATE
XPAD
260
CHARS
ALLOT
\
temporary pad for word storage
CREATE
EPAD
260
CHARS
ALLOT
\
temporary pad for evaluation
CREATE
fn
260
CHARS
ALLOT
\
file name
CREATE
fn1
260
CHARS
ALLOT
\
file name backup
CREATE
"str"
260
CHARS
ALLOT
\
parsed string storage
CREATE
uname
260
CHARS
ALLOT
\
: definition name
0
VALUE
inf
VARIABLE
nufile
\
T if nesting a file
VARIABLE
utype
\
type of defined word
VARIABLE
hstate
VARIABLE
linenum
VARIABLE
special
\
special action, 0=none
:
std
( word 2nd_fn color filename label -- )
CREATE
'
,
'
,
BL
WORD
COUNT
,$
BL
WORD
COUNT
,$
DOES>
/a
DUP
>R
2
CELLS
+
misctext
0
line
\
begin hyperlink
dpanspath
COUNT
out
\
output path to ANS files /7/
COUNT
2DUP
+
>R
out
S"
#"
out
\
output file name
R>
COUNT
out
misctext
2
line
\
and anchor name
1
attrib
!
R>
2@
SWAP
EXECUTE
EXECUTE
;
\
extra attributes
:
genHTML
( -- )
\
generate pending HTML
token
COUNT
DUP
IF
setcolor
THEN
outh
closefont
/a
0
token
!
;
:
isnumber?
( addr len -- f )
\
string converts to number?
0
0
2SWAP
>NUMBER
NIP
NIP
NIP
0=
;
:
hparse
( a len char -- a' len' )
>R
2DUP
R@
SKIP
R>
SCAN
BL
SCAN
2SWAP
2
PICK
-
token
+PLACE
;
:
>XPAD
( -- )
token
COUNT
BL
SKIP
XPAD
PLACE
;
\
move to temporary pad
:
hint
( addr len -- )
\
interpret one line...
BEGIN
0
token
!
BL
hparse
token
C@
WHILE
unknown
\
default color
>XPAD
XPAD
COUNT
superlinks
SEARCH-WORDLIST
0=
\
fixed hyperlink?
IF
XPAD
COUNT
hyperlinks
SEARCH-WORDLIST
\
got a hyperlink for this?
ELSE
TRUE
THEN
IF
DEPTH
>R
EXECUTE
R>
DEPTH
<>
ABORT"
stack depth change in HTML generator"
ELSE
XPAD
COUNT
BASE
@
10
=
IF
>FLOAT
IF
FDROP
numeric
THEN
\
valid float or integer
ELSE
isnumber?
IF
numeric
THEN
THEN
THEN
genHTML
REPEAT
2DROP
S"
<br />"
outln
;
\
new line
:
ofn
( -- addr len )
\
output file name
fn
COUNT
2DUP
[CHAR] .
SCAN
NIP
-
EPAD
PLACE
S"
.htm"
EPAD
+PLACE
EPAD
COUNT
;
:
hcreate
( addr len -- )
DUP
0=
IF
2DROP
S"
fakename"
THEN
\
in case the name is missing
S"
CREATE "
EPAD
PLACE
EPAD
+PLACE
GET-CURRENT
>R
hyperlinks
SET-CURRENT
EPAD
COUNT
EVALUATE
R>
SET-CURRENT
;
\
create a hyperlink generator
\
The user defined words use the following data structure:
\
CELL xt of coloring word
\
STRING name of reference word
\
STRING name of file
:
deflink
( addr -- )
\
defined word makes hyperlink
DUP
@
EXECUTE
CELL+
\
set color
DUP
COUNT
+
COUNT
ofn
COMPARE
\
in an external file?
IF
misctext
0
line
DUP
COUNT
+
COUNT
out
\
yes, put the file name
S"
#"
out
COUNT
outh
S"
>"
out
ELSE
misctext
3
line
COUNT
outhattr
\
no, just the label name
misctext
4
line
THEN
1
attrib
!
;
:
defx
( a len xt -- a' len' )
>R
genHTML
BL
hparse
>XPAD
\
output defining word
XPAD
COUNT
2DUP
hcreate
R>
,
,$
ofn
,$
DOES>
deflink
;
:
labelnow
genHTML
XPAD
COUNT
label
;
:
defdat
[']
numeric
defx
numeric
labelnow
;
:
defvar
[']
variables
defx
variables
labelnow
;
:
defusr
[']
userwords
defx
userwords
labelnow
;
:
defval
[']
values
defx
values
labelnow
;
:
defdef
[']
userdefiner
defx
userdefiner
labelnow
;
:
hstate=0
( -- )
0
hstate
!
;
:
hstate=1
( -- )
1
hstate
!
;
:
spec=zero
( -- )
1
special
!
;
:
NONE
( -- )
0
special
!
;
\
plain word
:
skip)
( a len -- a' len' )
[CHAR] )
hparse
;
:
skip}
( a len -- a' len' )
[CHAR] }
hparse
;
\
/7/
:
skipw
( a len -- a' len' )
BL
hparse
;
:
skipc
( a len -- a len )
hstate
@
0=
IF
numeric
skipw
THEN
;
:
skip"
( a len -- a' len' )
\
copy string to "str"
genHTML
[CHAR] "
hparse
token
COUNT
1-
"str"
PLACE
;
\
------------------------------------------------------------------------------
\
":" definitions might be defining words, so they can't be assumed to be defusr
\
types. ":" makes a label and saves the name for later use by ";" which makes
\
a hyperlink or a hyperlink defining word.
:NONAME
\
normal : definition
uname
COUNT
[']
userwords
defx
2DROP
0
token
!
;
CONSTANT
normal_def
:NONAME
uname
COUNT
2DUP
hcreate
[']
userwords
,
,$
ofn
,$
DOES>
deflink
defdef
;
CONSTANT
defining_def
:
defunk
( a len -- a' len' )
\
starting unknown definition
hstate=1
normal_def
utype
!
\
save name of : definition
genHTML
skipw
userwords
token
COUNT
BL
SKIP
2DUP
uname
PLACE
label
;
:
resunk
( -- )
\
resolve unknown defined word
genHTML
utype
@
EXECUTE
hstate=0
;
:
created
( -- )
hstate
@
IF
defining_def
utype
!
\
make ; create a defining word
ELSE
defdat
\
not compiling
THEN
;
\
------------------------------------------------------------------------------
:
header
( addr len -- )
\
output big header text /8/
misctext
6
line
linksource
IF
misctext
0
line
2dup
out
misctext
2
line
outln
misctext
9
line
ELSE
outln
THEN
misctext
7
line
;
:
_incfil
( addr -- )
\
trigger file nesting /4/
nestable
0=
IF
DROP
EXIT
THEN
\
don't nest files if disabled
COUNT
BL
SKIP
2DUP
R/O
OPEN-FILE
\
can the file be opened?
IF
DROP
2DROP
\
no
ELSE
CLOSE-FILE
DROP
\
yes
fn
COUNT
fn1
PLACE
fn
PLACE
1
nufile
!
THEN
;
:
incfile
( a len -- a' len' )
\
include a file
genHTML
skipw
token
_incfil
;
:
"incfil
( a len -- a' len' )
\
include file from S" filename"
skipw
"str"
_incfil
;
:
hfill
( -- len ior )
\
read next line of file
inbuf
256
BL
FILL
XPAD
256
inf
READ-LINE
ABORT"
Error reading file"
>R
>R
0
XPAD
R>
BOUNDS
( idx . . )
?DO
I
C@
9
=
IF
3
RSHIFT
1+
3
LSHIFT
\
tab
ELSE
I
C@
OVER
255
AND
CHARS
inbuf
+
C!
1+
DUP
256
=
IF
CR
."
Input line too long"
THEN
THEN
LOOP
R>
1
linenum
+!
;
:
open
( -- )
CR
."
Reading "
fn
COUNT
TYPE
."
at line "
linenum
@
.
0
linenum
!
fn
COUNT
R/O
OPEN-FILE
ABORT"
Error opening source file"
TO
inf
;
:
close
( -- )
CR
."
closing "
fn
COUNT
TYPE
inf
CLOSE-FILE
ABORT"
Error closing file"
;
:
.title
( addr len -- )
\
output as title string
BOUNDS
?DO
I
C@
BL
=
IF
S"
%20"
out
ELSE
I
1
out
THEN
LOOP
;
:
oopen
( -- )
ofn
W/O
CREATE-FILE
ABORT"
Error creating file"
TO
outf
begin_header
boiler
\
begin boilerplate
fn
COUNT
.title
mid_header
boiler
\
title and end boilerplate
bold
IF
S"
<b>"
out
THEN
fn
COUNT
header
;
:
HTML
( <infile> -- )
S"
/basic-links/"
hyperlinks
SEARCH-WORDLIST
IF
EXECUTE
THEN
\
remove user hyperlinks
GET-CURRENT
>R
hyperlinks
SET-CURRENT
\
replace the fence
S"
MARKER /basic-links/"
EVALUATE
R>
SET-CURRENT
0
TO
screen-only
0
nufile
!
1
linenum
!
\
force usage of file
BL
WORD
COUNT
fn
PLACE
open
oopen
\
open input and output files
-1
DUP
>R
outf
>R
\
file nest uses stacks
hstate=0
BEGIN
BEGIN
0
special
!
\
process line
nufile
@
\
nest a file?
IF
inf
outf
open
oopen
outf
>R
\
open new files
0
nufile
!
THEN
hfill
WHILE
inbuf
SWAP
hint
REPEAT
DROP
close
fn1
COUNT
fn
PLACE
\
restore file name
DUP
-1
<>
IF
TO
outf
TO
inf
FALSE
\
unnest files
ELSE
TRUE
THEN
UNTIL
DROP
BEGIN
R>
DUP
-1
<>
\
close all output files
WHILE
bold
IF
S"
</b>"
out
THEN
end_header
\
finish up HTML /7/
CLOSE-FILE
ABORT"
Error closing file"
REPEAT
DROP
;
:
q
( -- )
1
TO
screen-only
\
single line test
-1
WORD
COUNT
inbuf
PLACE
inbuf
COUNT
hint
;
\
0 [IF] is often used as a comment. If it is used as a comment, scan the file
\
for a [THEN]. [THEN] must be on the next line or beyond.
CREATE
terminator
16
CHARS
ALLOT
\
multiline comment terminator
:
multicomment
( a len searchstring -- a' len' )
terminator
PLACE
genHTML
commentary
ital(
setcolor
outh
\
finish up this line
BEGIN
hfill
S"
<br />"
outln
WHILE
>R
inbuf
EPAD
R@
MOVE
EPAD
R@
BOUNDS
?DO
I
C@
UPC
I
C!
LOOP
\
uppercase for search
EPAD
R@
terminator
COUNT
SEARCH
IF
DROP
EPAD
-
inbuf
OVER
token
PLACE
\
before [THEN] is comment
genHTML
inbuf
R>
ROT
/STRING
)ital
closefont
EXIT
ELSE
2DROP
inbuf
R>
outh
\
whole line is comment
THEN
REPEAT
inbuf
SWAP
)ital
closefont
;
\
EOF found
:
bigif
( a len -- a len )
special
@
1
=
IF
S"
[THEN]"
multicomment
THEN
;
\
=============================================================================
:
_DEFINITIONS
DEFINITIONS
;
\
: _order order ; : _words words ; : _see see ;
superlinks
SET-CURRENT
\
These hyperlinks cannot be overridden.
\
The following words are not in the ANS standard but are very common.
:
VOCABULARY
defusr
;
:
DEFER
defusr
;
:
INCLUDE
hstate
@
0=
IF
incfile
THEN
;
:
FLOAD
hstate
@
0=
IF
incfile
THEN
;
:
BINARY
2
BASE
!
;
:
OCTAL
8
BASE
!
;
:
0
numeric
spec=zero
;
:
1
numeric
;
:
-1
numeric
;
:
COMMENT:
S"
COMMENT;"
multicomment
;
:
((
S"
))"
multicomment
;
\
The following words are not in the ANS standard but are used in Win32Forth
:
ANEW
skipw
;
\
/7/
:
CallBack:
defunk
;
\
/7/
:
:M
defunk
;
\
/7/
:
;M
resunk
;
\
/7/
:
z"
numeric
skip"
;
\
Forth Inc uses { for comment while others use it for locals. } on the same
\
line indicates locals, which are grayed. Otherwise a multiline comment.
:
{
2DUP
[CHAR] }
SCAN
NIP
0=
IF
S"
}"
multicomment
ELSE
genHTML
skip}
THEN
;
\
The rest is ANS Forth standard
:
\
commentary
genHTML
ital(
token
PLACE
genHTML
)ital
token
0
;
( NAME ACTION COLOR FILENAME REFERENCE )
( ------------------ ------ -------------- ----------- --------- )
std
(
skip)
commentary
dpans6.htm
6.1.0080
std
."
skip"
numeric
dpans6.htm
6.1.0190
std
:
defunk
core_ws
dpans6.htm
6.1.0450
std
;
resunk
core_ws
dpans6.htm
6.1.0460
std
ABORT"
skip"
errors
dpans6.htm
6.1.0680
std
CHAR
skipc
core_ws
dpans6.htm
6.1.0895
std
CONSTANT
defdat
core_ws
dpans6.htm
6.1.0950
std
CREATE
created
core_ws
dpans6.htm
6.1.1000
std
DECIMAL
DECIMAL
core_ws
dpans6.htm
6.1.1170
std
S"
skip"
numeric
dpans6.htm
6.1.2165
std
VARIABLE
defvar
core_ws
dpans6.htm
6.1.2410
std
[
hstate=0
core_ws
dpans6.htm
6.1.2500
std
[CHAR]
skipw
numeric
dpans6.htm
6.1.2520
std
]
hstate=1
core_ws
dpans6.htm
6.1.2540
std
.(
skip)
commentary
dpans6.htm
6.2.0200
std
C"
skip"
numeric
dpans6.htm
6.2.0855
std
FALSE
spec=zero
numeric
dpans6.htm
6.2.1485
std
HEX
HEX
core_ext_ws
dpans6.htm
6.2.1660
std
MARKER
defusr
core_ext_ws
dpans6.htm
6.2.1850
std
VALUE
defval
core_ext_ws
dpans6.htm
6.2.2405
std
2CONSTANT
defdat
double_ws
dpans8.htm
8.6.1.0360
std
2VARIABLE
defvar
double_ws
dpans8.htm
8.6.1.0440
std
INCLUDED
"incfil
file_ws
dpans11.htm
11.6.1.1718
std
FCONSTANT
defdat
fp_ws
dpans12.htm
12.6.1.1492
std
FVARIABLE
defvar
fp_ws
dpans12.htm
12.6.1.1630
std
;CODE
resunk
progtools_ws
dpans15.htm
15.6.2.0470
std
CODE
defusr
progtools_ws
dpans15.htm
15.6.2.0930
std
[IF]
bigif
progtools_ws
dpans15.htm
15.6.2.2532
hyperlinks
SET-CURRENT
\
These hyperlinks can be overridden.
std
[']
NONE
numeric
dpans6.htm
6.1.2510
std
!
NONE
core_ws
dpans6.htm
6.1.0010
std
#
NONE
core_ws
dpans6.htm
6.1.0030
std
#>
NONE
core_ws
dpans6.htm
6.1.0040
std
#S
NONE
core_ws
dpans6.htm
6.1.0050
std
'
NONE
core_ws
dpans6.htm
6.1.0070
std
*
NONE
core_ws
dpans6.htm
6.1.0090
std
*/
NONE
core_ws
dpans6.htm
6.1.0100
std
*/MOD
NONE
core_ws
dpans6.htm
6.1.0110
std
+
NONE
core_ws
dpans6.htm
6.1.0120
std
+!
NONE
core_ws
dpans6.htm
6.1.0130
std
+LOOP
NONE
core_ws
dpans6.htm
6.1.0140
std
,
NONE
core_ws
dpans6.htm
6.1.0150
std
-
NONE
core_ws
dpans6.htm
6.1.0160
std
.
NONE
core_ws
dpans6.htm
6.1.0180
std
/
NONE
core_ws
dpans6.htm
6.1.0230
std
/MOD
NONE
core_ws
dpans6.htm
6.1.0240
std
0<
NONE
core_ws
dpans6.htm
6.1.0250
std
0=
NONE
core_ws
dpans6.htm
6.1.0270
std
1+
NONE
core_ws
dpans6.htm
6.1.0290
std
1-
NONE
core_ws
dpans6.htm
6.1.0300
std
2!
NONE
core_ws
dpans6.htm
6.1.0310
std
2*
NONE
core_ws
dpans6.htm
6.1.0320
std
2/
NONE
core_ws
dpans6.htm
6.1.0330
std
2@
NONE
core_ws
dpans6.htm
6.1.0350
std
2DROP
NONE
core_ws
dpans6.htm
6.1.0370
std
2DUP
NONE
core_ws
dpans6.htm
6.1.0380
std
2OVER
NONE
core_ws
dpans6.htm
6.1.0400
std
2SWAP
NONE
core_ws
dpans6.htm
6.1.0430
std
<
NONE
core_ws
dpans6.htm
6.1.0480
std
<#
NONE
core_ws
dpans6.htm
6.1.0490
std
=
NONE
core_ws
dpans6.htm
6.1.0530
std
>
NONE
core_ws
dpans6.htm
6.1.0540
std
>BODY
NONE
core_ws
dpans6.htm
6.1.0550
std
>IN
NONE
core_ws
dpans6.htm
6.1.0560
std
>NUMBER
NONE
core_ws
dpans6.htm
6.1.0570
std
>R
NONE
core_ws
dpans6.htm
6.1.0580
std
?DUP
NONE
core_ws
dpans6.htm
6.1.0630
std
@
NONE
core_ws
dpans6.htm
6.1.0650
std
ABORT
NONE
core_ws
dpans6.htm
6.1.0670
std
ABS
NONE
core_ws
dpans6.htm
6.1.0690
std
ACCEPT
NONE
core_ws
dpans6.htm
6.1.0695
std
ALIGN
NONE
core_ws
dpans6.htm
6.1.0705
std
ALIGNED
NONE
core_ws
dpans6.htm
6.1.0706
std
ALLOT
NONE
core_ws
dpans6.htm
6.1.0710
std
AND
NONE
core_ws
dpans6.htm
6.1.0720
std
BASE
NONE
core_ws
dpans6.htm
6.1.0750
std
BEGIN
NONE
core_ws
dpans6.htm
6.1.0760
std
BL
NONE
numeric
dpans6.htm
6.1.0770
std
C!
NONE
core_ws
dpans6.htm
6.1.0850
std
C,
NONE
core_ws
dpans6.htm
6.1.0860
std
C@
NONE
core_ws
dpans6.htm
6.1.0870
std
CELL+
NONE
core_ws
dpans6.htm
6.1.0880
std
CELLS
NONE
core_ws
dpans6.htm
6.1.0890
std
CHAR+
NONE
core_ws
dpans6.htm
6.1.0897
std
CHARS
NONE
core_ws
dpans6.htm
6.1.0898
std
COUNT
NONE
core_ws
dpans6.htm
6.1.0980
std
CR
NONE
core_ws
dpans6.htm
6.1.0990
std
DEPTH
NONE
core_ws
dpans6.htm
6.1.1200
std
DO
NONE
core_ws
dpans6.htm
6.1.1240
std
DOES>
NONE
core_ws
dpans6.htm
6.1.1250
std
DROP
NONE
core_ws
dpans6.htm
6.1.1260
std
DUP
NONE
core_ws
dpans6.htm
6.1.1290
std
ELSE
NONE
core_ws
dpans6.htm
6.1.1310
std
EMIT
NONE
core_ws
dpans6.htm
6.1.1320
std
ENVIRONMENT?
NONE
core_ws
dpans6.htm
6.1.1345
std
EVALUATE
NONE
core_ws
dpans6.htm
6.1.1360
std
EXECUTE
NONE
core_ws
dpans6.htm
6.1.1370
std
EXIT
NONE
core_ws
dpans6.htm
6.1.1380
std
FILL
NONE
core_ws
dpans6.htm
6.1.1540
std
FIND
NONE
core_ws
dpans6.htm
6.1.1550
std
FM/MOD
NONE
core_ws
dpans6.htm
6.1.1561
std
HERE
NONE
core_ws
dpans6.htm
6.1.1650
std
HOLD
NONE
core_ws
dpans6.htm
6.1.1670
std
I
NONE
core_ws
dpans6.htm
6.1.1680
std
IF
NONE
core_ws
dpans6.htm
6.1.1700
std
IMMEDIATE
NONE
core_ws
dpans6.htm
6.1.1710
std
INVERT
NONE
core_ws
dpans6.htm
6.1.1720
std
J
NONE
core_ws
dpans6.htm
6.1.1730
std
KEY
NONE
core_ws
dpans6.htm
6.1.1750
std
LEAVE
NONE
core_ws
dpans6.htm
6.1.1760
std
LITERAL
NONE
core_ws
dpans6.htm
6.1.1780
std
LOOP
NONE
core_ws
dpans6.htm
6.1.1800
std
LSHIFT
NONE
core_ws
dpans6.htm
6.1.1805
std
M*
NONE
core_ws
dpans6.htm
6.1.1810
std
MAX
NONE
core_ws
dpans6.htm
6.1.1870
std
MIN
NONE
core_ws
dpans6.htm
6.1.1880
std
MOD
NONE
core_ws
dpans6.htm
6.1.1890
std
MOVE
NONE
core_ws
dpans6.htm
6.1.1900
std
NEGATE
NONE
core_ws
dpans6.htm
6.1.1910
std
OR
NONE
core_ws
dpans6.htm
6.1.1980
std
OVER
NONE
core_ws
dpans6.htm
6.1.1990
std
POSTPONE
NONE
core_ws
dpans6.htm
6.1.2033
std
QUIT
NONE
core_ws
dpans6.htm
6.1.2050
std
R>
NONE
core_ws
dpans6.htm
6.1.2060
std
R@
NONE
core_ws
dpans6.htm
6.1.2070
std
RECURSE
NONE
core_ws
dpans6.htm
6.1.2120
std
REPEAT
NONE
core_ws
dpans6.htm
6.1.2140
std
ROT
NONE
core_ws
dpans6.htm
6.1.2160
std
RSHIFT
NONE
core_ws
dpans6.htm
6.1.2162
std
S>D
NONE
core_ws
dpans6.htm
6.1.2170
std
SIGN
NONE
core_ws
dpans6.htm
6.1.2210
std
SM/REM
NONE
core_ws
dpans6.htm
6.1.2214
std
SOURCE
NONE
core_ws
dpans6.htm
6.1.2216
std
SPACE
NONE
core_ws
dpans6.htm
6.1.2220
std
SPACES
NONE
core_ws
dpans6.htm
6.1.2230
std
STATE
NONE
core_ws
dpans6.htm
6.1.2250
std
SWAP
NONE
core_ws
dpans6.htm
6.1.2260
std
THEN
NONE
core_ws
dpans6.htm
6.1.2270
std
TYPE
NONE
core_ws
dpans6.htm
6.1.2310
std
U.
NONE
core_ws
dpans6.htm
6.1.2320
std
U<
NONE
core_ws
dpans6.htm
6.1.2340
std
UM*
NONE
core_ws
dpans6.htm
6.1.2360
std
UM/MOD
NONE
core_ws
dpans6.htm
6.1.2370
std
UNLOOP
NONE
core_ws
dpans6.htm
6.1.2380
std
UNTIL
NONE
core_ws
dpans6.htm
6.1.2390
std
WHILE
NONE
core_ws
dpans6.htm
6.1.2430
std
WORD
NONE
core_ws
dpans6.htm
6.1.2450
std
XOR
NONE
core_ws
dpans6.htm
6.1.2490
std
#TIB
NONE
core_ext_ws
dpans6.htm
6.2.0060
std
.R
NONE
core_ext_ws
dpans6.htm
6.2.0210
std
0<>
NONE
core_ext_ws
dpans6.htm
6.2.0260
std
0>
NONE
core_ext_ws
dpans6.htm
6.2.0280
std
2>R
NONE
core_ext_ws
dpans6.htm
6.2.0340
std
2R>
NONE
core_ext_ws
dpans6.htm
6.2.0410
std
2R@
NONE
core_ext_ws
dpans6.htm
6.2.0415
std
:NONAME
NONE
core_ext_ws
dpans6.htm
6.2.0455
std
<>
NONE
core_ext_ws
dpans6.htm
6.2.0500
std
?DO
NONE
core_ext_ws
dpans6.htm
6.2.0620
std
AGAIN
NONE
core_ext_ws
dpans6.htm
6.2.0700
std
CASE
NONE
core_ext_ws
dpans6.htm
6.2.0873
std
COMPILE,
NONE
core_ext_ws
dpans6.htm
6.2.0945
std
CONVERT
NONE
core_ext_ws
dpans6.htm
6.2.0970
std
ENDCASE
NONE
core_ext_ws
dpans6.htm
6.2.1342
std
ENDOF
NONE
core_ext_ws
dpans6.htm
6.2.1343
std
ERASE
NONE
core_ext_ws
dpans6.htm
6.2.1350
std
EXPECT
NONE
core_ext_ws
dpans6.htm
6.2.1390
std
NIP
NONE
core_ext_ws
dpans6.htm
6.2.1930
std
OF
NONE
core_ext_ws
dpans6.htm
6.2.1950
std
PAD
NONE
core_ext_ws
dpans6.htm
6.2.2000
std
PARSE
NONE
core_ext_ws
dpans6.htm
6.2.2008
std
PICK
NONE
core_ext_ws
dpans6.htm
6.2.2030
std
QUERY
NONE
core_ext_ws
dpans6.htm
6.2.2040
std
REFILL
NONE
core_ext_ws
dpans6.htm
6.2.2125
std
RESTORE-INPUT
NONE
core_ext_ws
dpans6.htm
6.2.2148
std
ROLL
NONE
core_ext_ws
dpans6.htm
6.2.2150
std
SAVE-INPUT
NONE
core_ext_ws
dpans6.htm
6.2.2182
std
SOURCE-ID
NONE
core_ext_ws
dpans6.htm
6.2.2218
std
SPAN
NONE
core_ext_ws
dpans6.htm
6.2.2240
std
TIB
NONE
core_ext_ws
dpans6.htm
6.2.2290
std
TO
NONE
core_ext_ws
dpans6.htm
6.2.2295
std
TRUE
NONE
numeric
dpans6.htm
6.2.2298
std
TUCK
NONE
core_ext_ws
dpans6.htm
6.2.2300
std
U.R
NONE
core_ext_ws
dpans6.htm
6.2.2330
std
U>
NONE
core_ext_ws
dpans6.htm
6.2.2350
std
UNUSED
NONE
core_ext_ws
dpans6.htm
6.2.2395
std
WITHIN
NONE
core_ext_ws
dpans6.htm
6.2.2440
std
[COMPILE]
NONE
core_ext_ws
dpans6.htm
6.2.2530
std
BLK
NONE
block_ws
dpans7.htm
7.6.1.0790
std
BLOCK
NONE
block_ws
dpans7.htm
7.6.1.0800
std
BUFFER
NONE
block_ws
dpans7.htm
7.6.1.0820
std
FLUSH
NONE
block_ws
dpans7.htm
7.6.1.1559
std
LOAD
NONE
block_ws
dpans7.htm
7.6.1.1790
std
SAVE-BUFFERS
NONE
block_ws
dpans7.htm
7.6.1.2180
std
UPDATE
NONE
block_ws
dpans7.htm
7.6.1.2400
std
EMPTY-BUFFERS
NONE
block_ws
dpans7.htm
7.6.2.1330
std
LIST
NONE
block_ws
dpans7.htm
7.6.2.1770
std
SCR
NONE
block_ws
dpans7.htm
7.6.2.2190
std
THRU
NONE
block_ws
dpans7.htm
7.6.2.2280
std
2LITERAL
NONE
double_ws
dpans8.htm
8.6.1.0390
std
D+
NONE
double_ws
dpans8.htm
8.6.1.1040
std
D-
NONE
double_ws
dpans8.htm
8.6.1.1050
std
D.
NONE
double_ws
dpans8.htm
8.6.1.1060
std
D.R
NONE
double_ws
dpans8.htm
8.6.1.1070
std
D0<
NONE
double_ws
dpans8.htm
8.6.1.1075
std
D0=
NONE
double_ws
dpans8.htm
8.6.1.1080
std
D2*
NONE
double_ws
dpans8.htm
8.6.1.1090
std
D2/
NONE
double_ws
dpans8.htm
8.6.1.1100
std
D<
NONE
double_ws
dpans8.htm
8.6.1.1110
std
D=
NONE
double_ws
dpans8.htm
8.6.1.1120
std
D>S
NONE
double_ws
dpans8.htm
8.6.1.1140
std
DABS
NONE
double_ws
dpans8.htm
8.6.1.1160
std
DMAX
NONE
double_ws
dpans8.htm
8.6.1.1210
std
DMIN
NONE
double_ws
dpans8.htm
8.6.1.1220
std
DNEGATE
NONE
double_ws
dpans8.htm
8.6.1.1230
std
M*/
NONE
double_ws
dpans8.htm
8.6.1.1820
std
M+
NONE
double_ws
dpans8.htm
8.6.1.1830
std
2ROT
NONE
double_ws
dpans8.htm
8.6.2.0420
std
DU<
NONE
double_ws
dpans8.htm
8.6.2.1270
std
CATCH
NONE
exception_ws
dpans9.htm
9.6.1.0875
std
THROW
NONE
exception_ws
dpans9.htm
9.6.1.2275
std
AT-XY
NONE
facilities_ws
dpans10.htm
10.6.1.0742
std
KEY?
NONE
facilities_ws
dpans10.htm
10.6.1.1755
std
PAGE
NONE
facilities_ws
dpans10.htm
10.6.1.2005
std
EKEY
NONE
facilities_ws
dpans10.htm
10.6.2.1305
std
EKEY<CHAR
NONE
facilities_ws
dpans10.htm
10.6.2.1306
std
EKEY?
NONE
facilities_ws
dpans10.htm
10.6.2.1307
std
EMIT?
NONE
facilities_ws
dpans10.htm
10.6.2.1325
std
MS
NONE
facilities_ws
dpans10.htm
10.6.2.1905
std
TIME&DATE
NONE
facilities_ws
dpans10.htm
10.6.2.2292
std
BIN
NONE
file_ws
dpans11.htm
11.6.1.0765
std
CLOSE-FILE
NONE
file_ws
dpans11.htm
11.6.1.0900
std
CREATE-FILE
NONE
file_ws
dpans11.htm
11.6.1.1010
std
DELETE-FILE
NONE
file_ws
dpans11.htm
11.6.1.1190
std
FILE-POSITION
NONE
file_ws
dpans11.htm
11.6.1.1520
std
FILE-SIZE
NONE
file_ws
dpans11.htm
11.6.1.1522
std
INCLUDE-FILE
NONE
file_ws
dpans11.htm
11.6.1.1717
std
OPEN-FILE
NONE
file_ws
dpans11.htm
11.6.1.1970
std
R/O
NONE
file_ws
dpans11.htm
11.6.1.2054
std
R/W
NONE
file_ws
dpans11.htm
11.6.1.2056
std
READ-FILE
NONE
file_ws
dpans11.htm
11.6.1.2080
std
READ-LINE
NONE
file_ws
dpans11.htm
11.6.1.2090
std
REPOSITION-FILE
NONE
file_ws
dpans11.htm
11.6.1.2142
std
RESIZE-FILE
NONE
file_ws
dpans11.htm
11.6.1.2147
std
W/O
NONE
file_ws
dpans11.htm
11.6.1.2425
std
WRITE-FILE
NONE
file_ws
dpans11.htm
11.6.1.2480
std
WRITE-LINE
NONE
file_ws
dpans11.htm
11.6.1.2485
std
FILE-STATUS
NONE
file_ws
dpans11.htm
11.6.2.1524
std
FLUSH-FILE
NONE
file_ws
dpans11.htm
11.6.2.1560
std
RENAME-FILE
NONE
file_ws
dpans11.htm
11.6.2.2130
std
>FLOAT
NONE
fp_ws
dpans12.htm
12.6.1.0558
std
D>F
NONE
fp_ws
dpans12.htm
12.6.1.1130
std
F!
NONE
fp_ws
dpans12.htm
12.6.1.1400
std
F*
NONE
fp_ws
dpans12.htm
12.6.1.1410
std
F+
NONE
fp_ws
dpans12.htm
12.6.1.1420
std
F-
NONE
fp_ws
dpans12.htm
12.6.1.1425
std
F/
NONE
fp_ws
dpans12.htm
12.6.1.1430
std
F0<
NONE
fp_ws
dpans12.htm
12.6.1.1440
std
F0=
NONE
fp_ws
dpans12.htm
12.6.1.1450
std
F<
NONE
fp_ws
dpans12.htm
12.6.1.1460
std
F>D
NONE
fp_ws
dpans12.htm
12.6.1.1460
std
F@
NONE
fp_ws
dpans12.htm
12.6.1.1472
std
FALIGN
NONE
fp_ws
dpans12.htm
12.6.1.1479
std
FALIGNED
NONE
fp_ws
dpans12.htm
12.6.1.1483
std
FDEPTH
NONE
fp_ws
dpans12.htm
12.6.1.1497
std
FDROP
NONE
fp_ws
dpans12.htm
12.6.1.1500
std
FDUP
NONE
fp_ws
dpans12.htm
12.6.1.1510
std
FLITERAL
NONE
fp_ws
dpans12.htm
12.6.1.1552
std
FLOAT+
NONE
fp_ws
dpans12.htm
12.6.1.1555
std
FLOATS
NONE
fp_ws
dpans12.htm
12.6.1.1556
std
FLOOR
NONE
fp_ws
dpans12.htm
12.6.1.1558
std
FMAX
NONE
fp_ws
dpans12.htm
12.6.1.1562
std
FMIN
NONE
fp_ws
dpans12.htm
12.6.1.1565
std
FNEGATE
NONE
fp_ws
dpans12.htm
12.6.1.1567
std
FOVER
NONE
fp_ws
dpans12.htm
12.6.1.1600
std
FROT
NONE
fp_ws
dpans12.htm
12.6.1.1610
std
FROUND
NONE
fp_ws
dpans12.htm
12.6.1.1612
std
FSWAP
NONE
fp_ws
dpans12.htm
12.6.1.1620
std
REPRESENT
NONE
fp_ws
dpans12.htm
12.6.1.2143
std
DF!
NONE
fp_ws
dpans12.htm
12.6.2.1203
std
DF@
NONE
fp_ws
dpans12.htm
12.6.2.1204
std
DFALIGN
NONE
fp_ws
dpans12.htm
12.6.2.1205
std
DFALIGNED
NONE
fp_ws
dpans12.htm
12.6.2.1207
std
DFLOAT+
NONE
fp_ws
dpans12.htm
12.6.2.1208
std
DFLOATS
NONE
fp_ws
dpans12.htm
12.6.2.1209
std
F**
NONE
fp_ws
dpans12.htm
12.6.2.1415
std
F.
NONE
fp_ws
dpans12.htm
12.6.2.1427
std
FABS
NONE
fp_ws
dpans12.htm
12.6.2.1474
std
FACOS
NONE
fp_ws
dpans12.htm
12.6.2.1476
std
FACOSH
NONE
fp_ws
dpans12.htm
12.6.2.1477
std
FALOG
NONE
fp_ws
dpans12.htm
12.6.2.1484
std
FASIN
NONE
fp_ws
dpans12.htm
12.6.2.1486
std
FASINH
NONE
fp_ws
dpans12.htm
12.6.2.1487
std
FATAN
NONE
fp_ws
dpans12.htm
12.6.2.1488
std
FATAN2
NONE
fp_ws
dpans12.htm
12.6.2.1489
std
FATANH
NONE
fp_ws
dpans12.htm
12.6.2.1491
std
FCOS
NONE
fp_ws
dpans12.htm
12.6.2.1493
std
FCOSH
NONE
fp_ws
dpans12.htm
12.6.2.1494
std
FE.
NONE
fp_ws
dpans12.htm
12.6.2.1513
std
FEXP
NONE
fp_ws
dpans12.htm
12.6.2.1515
std
FEXPM1
NONE
fp_ws
dpans12.htm
12.6.2.1516
std
FLN
NONE
fp_ws
dpans12.htm
12.6.2.1553
std
FLNP1
NONE
fp_ws
dpans12.htm
12.6.2.1554
std
FLOG
NONE
fp_ws
dpans12.htm
12.6.2.1557
std
FS.
NONE
fp_ws
dpans12.htm
12.6.2.1613
std
FSIN
NONE
fp_ws
dpans12.htm
12.6.2.1614
std
FSINCOS
NONE
fp_ws
dpans12.htm
12.6.2.1616
std
FSINH
NONE
fp_ws
dpans12.htm
12.6.2.1617
std
FSQRT
NONE
fp_ws
dpans12.htm
12.6.2.1618
std
FTAN
NONE
fp_ws
dpans12.htm
12.6.2.1625
std
FTANH
NONE
fp_ws
dpans12.htm
12.6.2.1626
std
F~
NONE
fp_ws
dpans12.htm
12.6.2.1640
std
PRECISION
NONE
fp_ws
dpans12.htm
12.6.2.2035
std
SET-PRECISION
NONE
fp_ws
dpans12.htm
12.6.2.2200
std
SF!
NONE
fp_ws
dpans12.htm
12.6.2.2202
std
SF@
NONE
fp_ws
dpans12.htm
12.6.2.2203
std
SFALIGN
NONE
fp_ws
dpans12.htm
12.6.2.2204
std
SFALIGNED
NONE
fp_ws
dpans12.htm
12.6.2.2206
std
SFLOAT+
NONE
fp_ws
dpans12.htm
12.6.2.2207
std
SFLOATS
NONE
fp_ws
dpans12.htm
12.6.2.2208
std
(LOCAL)
NONE
local_ws
dpans13.htm
13.6.1.0086
std
LOCALS|
NONE
local_ws
dpans13.htm
13.6.2.1795
std
ALLOCATE
NONE
malloc_ws
dpans14.htm
14.6.1.0707
std
FREE
NONE
malloc_ws
dpans14.htm
14.6.1.1605
std
RESIZE
NONE
malloc_ws
dpans14.htm
14.6.1.2145
std
.S
NONE
progtools_ws
dpans15.htm
15.6.1.0220
std
?
NONE
progtools_ws
dpans15.htm
15.6.1.0600
std
DUMP
NONE
progtools_ws
dpans15.htm
15.6.1.1280
std
SEE
NONE
progtools_ws
dpans15.htm
15.6.1.2194
std
WORDS
NONE
progtools_ws
dpans15.htm
15.6.1.2465
std
AHEAD
NONE
progtools_ws
dpans15.htm
15.6.2.0702
std
ASSEMBLER
NONE
progtools_ws
dpans15.htm
15.6.2.0740
std
BYE
NONE
progtools_ws
dpans15.htm
15.6.2.0830
std
CS-PICK
NONE
progtools_ws
dpans15.htm
15.6.2.1015
std
CS-ROLL
NONE
progtools_ws
dpans15.htm
15.6.2.1020
std
EDITOR
NONE
progtools_ws
dpans15.htm
15.6.2.1300
std
FORGET
NONE
progtools_ws
dpans15.htm
15.6.2.1580
std
[ELSE]
NONE
progtools_ws
dpans15.htm
15.6.2.2531
std
[THEN]
NONE
progtools_ws
dpans15.htm
15.6.2.2533
std
DEFINITIONS
NONE
searchord_ws
dpans16.htm
16.6.1.1180
std
FORTH-WORDLIST
NONE
searchord_ws
dpans16.htm
16.6.1.1595
std
GET-CURRENT
NONE
searchord_ws
dpans16.htm
16.6.1.1643
std
GET-ORDER
NONE
searchord_ws
dpans16.htm
16.6.1.1647
std
SEARCH-WORDLIST
NONE
searchord_ws
dpans16.htm
16.6.1.2192
std
SET-CURRENT
NONE
searchord_ws
dpans16.htm
16.6.1.2195
std
SET-ORDER
NONE
searchord_ws
dpans16.htm
16.6.1.2197
std
WORDLIST
NONE
searchord_ws
dpans16.htm
16.6.1.2460
std
ALSO
NONE
searchord_ws
dpans16.htm
16.6.2.0715
std
FORTH
NONE
searchord_ws
dpans16.htm
16.6.2.1590
std
ONLY
NONE
searchord_ws
dpans16.htm
16.6.2.1965
std
ORDER
NONE
searchord_ws
dpans16.htm
16.6.2.1985
std
PREVIOUS
NONE
searchord_ws
dpans16.htm
16.6.2.2037
std
-TRAILING
NONE
string_ws
dpans17.htm
17.6.1.0170
std
/STRING
NONE
string_ws
dpans17.htm
17.6.1.0245
std
BLANK
NONE
string_ws
dpans17.htm
17.6.1.0780
std
CMOVE
NONE
string_ws
dpans17.htm
17.6.1.0910
std
CMOVE>
NONE
string_ws
dpans17.htm
17.6.1.0920
std
COMPARE
NONE
string_ws
dpans17.htm
17.6.1.0935
std
SEARCH
NONE
string_ws
dpans17.htm
17.6.1.2191
std
SLITERAL
NONE
string_ws
dpans17.htm
17.6.1.2212
_DEFINITIONS
\
Revision history
\
0. 1st release to guinea pigs via comp.lang.forth
\
1. (BNE) Added multi-line comment 0 [IF]. Colored CHAR outside definitions.
\
2. (EJB) Added missing definitions for common but nonstandard words
\
and cleaned up to account for case sensitivity.
\
3. (EJB) Fixed up to create conforming XHTML 1.0 Strict
\
4. (BNE) File check before nesting, moved file names to the hyperlink table,
\
added some option flags, cleared hyperlink list for each run. Added more
\
multiline comment words. Expands tabs to spaces. Title uses %20 for blanks.
\
5. (BNE) Added multiline { comment. Replaced -1 WORD with [CHAR] |.
\
Put hyperlinks that should not be overridden in a separate wordlist.
\
6. (BNE) Limited this text to 80 columns, cleaned up comments a bit. Added
\
option for different color schemes.
\
7. (DBU) Added dpanspath to configure the path to the dpans-files. Added
\
linksource to output a hyperlink to the original source file. Added
\
some words used in Win32Forth. Added copyright to output a copyright text
\
at the bottom of the HTML-file.
\
8. (BNE) Put in Dirk's link to source file in header. Changed ['] to be
\
simple colored link. Added Forth2HTML link at bottom.