Win32Forth Version 6.06
List of all CODE and COLON definitions.
A
B
C
D
E
F
G
H
I
J
K
L
M
N
O
P
Q
R
S
T
U
V
W
X
Y
Z
#
- F -
| NAME |
Stack |
Comment |
File |
| F"LOG |
( -- ) |
|
Keysave.f |
| F# |
( F: -- r ) |
|
FLOAT.F |
| F#+> |
( n1 -- ) |
increment the value of a float |
FLOAT.F |
| F#-> |
( n1 -- ) |
store a value into a float |
FLOAT.F |
| F**N |
( F: r1 -- r2 ; n -- ) |
Floating number raised to integer power. |
FLOAT.F |
| F*10**N |
( n -- ) |
|
FLOAT.F |
| F, |
( -- ) |
|
FLOAT.F |
| F. |
( F: r -- ) |
|
FLOAT.F |
| F.S |
( -- ) |
display floating point stack |
FLOAT.F |
| F.S-DEBUG |
( -- ) |
display the floating point stack |
TOOLSET.F |
| F.X |
( f: r1 r2 ... rn -- r1 r2 ... rn ) |
Hex dump of fstack |
FLOAT.F |
| F/0 |
( f: f1 f2 -- f1/f2 ) |
Note: nan and infinity will be 0 |
Opengl.f |
| F? |
( adr - ) |
|
Opengl.f |
| F^2 |
|
|
FLOAT.F |
| F^X |
|
|
FLOAT.F |
| F~ |
( f: r1 r2 r3 -- ) |
|
FLOAT.F |
| F+> |
( n1 -- ) |
increment the value of a float |
FLOAT.F |
| F< |
( -- f ) |
|
FLOAT.F |
| F<= |
|
|
FLOAT.F |
| F= |
( -- f ) |
|
FLOAT.F |
| F> |
( -- f ) |
|
FLOAT.F |
| F-> |
( n1 -- ) |
store a value into a float |
FLOAT.F |
| F>= |
|
|
FLOAT.F |
| F>PROFILE |
( inifile section key - inifile section ) |
|
TOOLSET.F |
| F>R |
|
|
FLOAT.F |
| F>S |
|
|
FLOAT.F |
| F>TMP$ |
( f: f - adr ) |
|
TOOLSET.F |
| F-AXES |
( - ) |
|
Opengl.f |
| F0< |
( -- f ) |
|
FLOAT.F |
| F0<> |
|
|
FLOAT.F |
| F0= |
( -- f ) |
|
FLOAT.F |
| F0> |
( -- f ) |
|
FLOAT.F |
| F1-HELP |
( -- ) |
F1 starts up the initial help file |
Menu.f |
| F2DROP |
( fs: r1 r2 -- ) |
|
FLOAT.F |
| F2DUP |
( fs: r1 r2 -- r1 r2 r3 r4 ) |
|
FLOAT.F |
| F2SWAP |
( fs: r1 r2 -- r2 r1 ) |
|
FLOAT.F |
| F3DUP |
( f3 f2 f1 - f3 f2 f1 f3 f2 f1 ) |
|
Opengl.f |
| F6. |
( addr op -- addr' ) |
|
DIS486.F |
| FAD/FMUL-COMPILE |
( compile FADD and FMUL ) |
|
486ASM.F |
| FADUMP |
( from to 'name-cell-array - ) |
|
TOOLSET.F |
| FALIGN |
( -- ) |
|
FLOAT.F |
| FALIGNED |
( addr -- addr ) |
|
FLOAT.F |
| FALOG |
( f: r1 -- r2 ) |
? overflow error ? |
FLOAT.F |
| FALU1 |
( xopcode -- ) |
|
DIS486.F |
| FALU3 |
( op -- ) |
|
DIS486.F |
| FALU5 |
( xopcode -- ) |
|
DIS486.F |
| FALU6 |
( op -- ) |
|
DIS486.F |
| FALU7 |
( op -- ) |
|
DIS486.F |
| FARRAY |
|
|
TOOLSET.F |
| FARRAY! |
( f: n - ) |
|
TOOLSET.F |
| FARRAY+! |
( f: n - ) |
|
TOOLSET.F |
| FATANH |
( f: r1 -- r2 ) |
OK for valid args |
FLOAT.F |
| FBLD/STP-COMPILE |
( compile FBLD & FBSTP ) |
|
486ASM.F |
| FCALL |
|
|
FLOAT.F |
| FCHOOSE |
|
|
TOOLSET.F |
| FCLOSE |
( - ) |
|
TOOLSET.F |
| FCMOVA |
( op -- ) |
|
DIS486.F |
| FCMOVB |
( op -- ) |
|
DIS486.F |
| FCOM-COMPILE |
( compile FCOM and FCOMP ) |
|
486ASM.F |
| FCONSTANT |
( -- ) |
|
FLOAT.F |
| FCOS |
( f: r1 -- r2 ) |
? error if x > 2**63 ? |
FLOAT.F |
| FCOSH |
( f: r1 -- r2 ) |
? error for x too large |
FLOAT.F |
| FCP-HELP |
|
|
fcp101.f |
| FCREATE |
( adr-counted-string - ) |
|
TOOLSET.F |
| FD8 |
( addr opcode -- addr' ) |
|
DIS486.F |
| FD9 |
( addr op -- addr' ) |
|
DIS486.F |
| FDA |
( addr op -- ) |
|
DIS486.F |
| FDB |
( addr op -- addr' ) |
|
DIS486.F |
| FDC |
( addr opcode -- addr' ) |
|
DIS486.F |
| FDD |
( addr op -- addr' ) |
|
DIS486.F |
| FDE |
( addr op -- addr' ) |
|
DIS486.F |
| FDEBUG |
( - ) |
shows the floating point stack while debugging |
TOOLSET.F |
| FDEPTH |
( -- n ) |
|
FLOAT.F |
| FDF |
( addr op -- addr' ) |
|
DIS486.F |
| FDISCARD-NUMBER |
( ?? -- ?? ) |
discard a floating point number if present |
FLOAT.F |
| FDIV/SUB-COMPILE |
( compile FDIV, FDIVR, FSUB, & FSUBR ) |
|
486ASM.F |
| FDLG-ADJFILE |
( -- filename ) |
adjust filename returned |
xfiledlg.f |
| FDLG-BUILD |
( filename diraddr titleaddr specaddr owner -- ) |
|
xfiledlg.f |
| FDLG-CALL |
( xt -- filename ) |
call GetxxxxFileName |
xfiledlg.f |
| FDLG-FILTER |
( abs-addr -- abs-addr ) |
change all | to \0 in filter |
xfiledlg.f |
| FDLG-GETFILE |
( -- filename ) |
fetch filename |
xfiledlg.f |
| FDLG-NEWF |
( -- ) |
set open flags in struct |
xfiledlg.f |
| FDLG-NOFILE |
( -- filename ) |
return null filename |
xfiledlg.f |
| FDLG-OPEN |
( addr -- rc ) |
|
xfiledlg.f |
| FDLG-OPENF |
( -- ) |
set open flags in struct |
xfiledlg.f |
| FDLG-SAVE |
( addr -- rc ) |
|
xfiledlg.f |
| FDLG-SAVEF |
( -- ) |
set save flags in struct |
xfiledlg.f |
| FDUMP |
( -- ) |
Dump of the real Floating Point Unit |
FLOAT.F |
| FDUP>R |
|
|
FLOAT.F |
| FE. |
( addr op -- addr' ) |
|
DIS486.F |
| FE. |
( F: r -- ) |
display fp # in engineering notation |
FLOAT.F |
| FEMIT |
( char - ) |
|
TOOLSET.F |
| FF. |
( addr op -- addr' ) |
|
DIS486.F |
| FG@ |
( -- foreground ) |
|
Primutil.f |
| FGBG! |
( forground background -- ) |
|
Primutil.f |
| FIELD+ |
( n1 n2 -- n1+n2 ) |
definer for fields |
Primutil.f |
| FILD-COMPILE |
( compile FILD ) |
|
486ASM.F |
| FILE |
( adr-counted-string - ) |
|
TOOLSET.F |
| FILE-APPEND |
( fileid -- ior ) |
|
Fkernel.f |
| FILE-HAS-CHANGED |
( -- ) |
|
Wined.f |
| FILE-POSITION |
( fileid -- len-ud ior ) |
|
Fkernel.f |
| FILE-SIZE |
( fileid -- len-ud ior ) |
|
Fkernel.f |
| FILE-STATUS |
( adr len -- x ior ) |
|
Fkernel.f |
| FILERANK>SQ |
( file rank -- sq ) |
|
fcp101.f |
| FILES2ISS |
{ \ script$ hfile -- } |
|
RELEASE.F |
| FILETIME-TO-SYSTEMTIME |
( cell# -- ; convert file time to system time ) |
|
ANSFILE.F |
| FILL-24-BITS-HEADER |
( w h total-file-size vadr - ) |
|
BMPDOT.F |
| FILL-PBMI |
( nbits - nrgbquad ) |
|
BMPIO.F |
| FINAL-SAVE-USAGE |
( -- ) |
|
MARKUSED.F |
| FIND&EXECUTE |
( addr len wordlist -- ? ) |
|
Meta.f |
| FIND-CLOSE |
( -- ior ) |
close the _hdl-search handle |
ANSFILE.F |
| FIND-CMD$ |
( a1 n1 -- f1 ) |
find a line starting with string |
HYPER.F |
| FIND-DIALOG-ID |
( id addr -- address-of-template-header ) |
|
Dialog.f |
| FIND-FILE |
( addr len -- f ) |
search path-list for file |
paths.f |
| FIND-FIRST-FILE |
( adr slen -- adrd ior ) |
|
ANSFILE.F |
| FIND-IN-FILES |
( -- ) |
|
Wined.f |
| FIND-LABEL |
{ line# -- flag } |
flag=TRUE if we found the label |
Wined.f |
| FIND-LONGEST-COMMON-SUBSEQUENCE |
( -- ) |
|
dfc.F |
| FIND-METHOD |
( SelID ^obj -- ^obj m0cfa ) |
find method in object |
Class.f |
| FIND-NEXT-FILE |
( -- adrd ior ) |
find-first-file word must be called |
ANSFILE.F |
| FIND-TEXT-AGAIN |
( -- ) |
|
Wined.f |
| FIND-TEXT-EDIT |
( -- f1 ) |
|
Forthdlg.f |
| FIND-TEXT-EDIT2 |
( -- f1 ) |
|
DLGTEST.F |
| FIND-TEXT-HIGHLIGHT |
( -- ) |
|
Wined.f |
| FIND-UNRESOLVED |
( -- cfa f ) |
|
Meta.f |
| FIND-WINDOW |
( z"a1 -- hWnd ) |
|
Window.f |
| FINDFORTHWINDOW |
( -- flag ) |
check if there is a forth console |
Wined.f |
| FINDMOVE |
( ^from mv -- ^from ^mv|0 ) |
|
fcp101.f |
| FINDSIZEMIN |
( addr cnt -- cnt2 ) |
rls January 8th, 2002 - 19:32 |
Wined.f |
| FIRST-FOLDER" |
( link <-name-> -- ) |
add a path to the top of the search order |
paths.f |
| FIRST-LINE |
( -- ) |
set first line flag |
Primutil.f |
| FIRST-MASK" |
( -- a1 n1 ) |
get the first forth directory path |
Wined.f |
| FIRST-MOVE? |
( - flag ) |
|
fcp3d.f |
| FIRST-PATH" |
( -- a1 n1 ) |
get the first forth directory path |
Utils.f |
| FIRSTCHR |
( addr cnt -- addr cnt chr ) |
|
ARGS.F |
| FIRSTCHR |
( addr cnt -- addr cnt chr ) |
|
Fkernel.f |
| FIRSTMOVEPLY |
( -- ^gen ) |
|
fcp101.f |
| FIST-COMPILE |
( compile FIST & FISTP ) |
|
486ASM.F |
| FIX-COMPILE |
( compile FIx instructions ) |
|
486ASM.F |
| FKEY |
( n1 -- ) |
|
KEYBOARD.F |
| FLAG-FOR-SIZE-PREFIX |
( do we need a size prefix? ) |
|
486ASM.F |
| FLD |
( basevar offset len -- -- basevar offset+len ) |
definer for fields |
imageman.f |
| FLD-COMPILE |
( compile FLD ) |
|
486ASM.F |
| FLDBASE |
( -- ) |
set field base name (starts field) |
imageman.f |
| FLIP |
( n - nflip ) |
|
TOOLSET.F |
| FLITERAL |
( fs: r -- ) |
|
FLOAT.F |
| FLOAD |
( -- ) |
load "filename" into application dictionary |
Fkernel.f |
| FLOAT |
( -- ) |
compile time 64-bits |
FLOAT.F |
| FLOAT+ |
( addr1 -- addr2 ) |
|
FLOAT.F |
| FLOAT-ARRAY |
( n1 -- ) |
compile time |
FLOAT.F |
| FLOAT-NUMBER? |
( a1 n1 f1 -- ) |
input parameters |
FLOAT.F |
| FLOAT-NUMBER-STRING |
|
( adr - f ) FS: ( - n ) |
TOOLSET.F |
| FLOAT-RESET-STACKS |
( ? -- ) |
|
FLOAT.F |
| FLOAT-STRING>NUMBER-STRING |
|
( adr - ) |
TOOLSET.F |
| FLOATER? |
( a1 -- a1 f1 ) |
is a1 the CFA of a float? or ^float? |
FLOAT.F |
| FLOATING |
|
|
FLOAT.F |
| FLOATING-EXT |
|
|
FLOAT.F |
| FLOATS |
( n1 -- n2 ) |
|
FLOAT.F |
| FLOATS! |
( adr k - ) |
|
Opengl.f |
| FLOATS!@ |
( adr k - ) |
|
Opengl.f |
| FLOATS@ |
( adr k - ) |
|
Opengl.f |
| FLOATSF@* |
( adr k - ) |
|
Opengl.f |
| FLOATSF@+ |
( adr k - ) |
|
Opengl.f |
| FLUSH |
( -- ) |
Write any updated buffers to disk |
BLOCK.F |
| FLUSH-FILE |
( fileid -- ior ) |
|
Fkernel.f |
| FLUSH-INDEX |
( -- ) |
|
HYPER.F |
| FLUSH-VIEW-FILE |
( map-handle -- f1 ) |
flush the file to disk |
MAPFILE.F |
| FM/MOD |
( d n -- rem quot ) |
|
Fkernel.f |
| FM+ |
( adr-floats-to-add addr-floats-result - ) |
|
Opengl.f |
| FMAX |
( f1 f2 -- f3 ) |
|
FLOAT.F |
| FMIN |
( f1 f2 -- f3 ) |
|
FLOAT.F |
| FMISC-COMPILE |
( compile miscellaneous fp instructions ) |
|
486ASM.F |
| FNULLARY |
( op -- ) |
|
DIS486.F |
| FNULLARY-E |
( op -- ) |
|
DIS486.F |
| FNULLARY-F |
( op -- ) |
|
DIS486.F |
| FOCUS-CONSOLE |
( -- ) |
|
Primutil.f |
| FOLDER-LIST |
( link -- [n] ) |
builds a folder list for searching |
paths.f |
| FOLLOWPV |
|
|
fcp101.f |
| FOPEN |
( adr-counted-string fmode - ) |
|
TOOLSET.F |
| FOREGROUND |
{ color_object \ theDC -- } |
|
COLORS.F |
| FOREVERYROW |
( sq -- sq+7 ) |
|
fcp101.f |
| FOREVERYROW |
( 'word sq -- 'word sq+7 ) |
|
fcp101.f |
| FOREVERYSQ |
( [st] 'word -- ) |
doSq ( [st] sq -- [st] sq ) |
fcp101.f |
| FOREVERYSQ |
( [st] 'word -- ) |
word ( [st] sq -- [st] sq ) |
fcp101.f |
| FOREVERYSQ |
( [st] 'word -- ) |
word ( [st] sq -- [st] sq ) |
fcp101.f |
| FOREVERYSQ |
|
this was slower |
fcp101.f |
| FORGET |
( -- ) |
|
Nforget.f |
| FORMOVESATPLY |
( -- lastMovePly firstMovePly ) |
init ?DO LOOP |
fcp101.f |
| FORTH |
|
|
Order.f |
| FORTH-IO |
( -- ) |
|
Primutil.f |
| FORTH-MSG-BEEP |
( wParam lParam -- wParam lParam ) |
|
Window.f |
| FORTH-SOURCE? |
( -- flag ) |
Is current file *.F ? |
Wined.f |
| FORTH-WORDLIST |
( -- wid ) |
|
Order.f |
| FORTH-WORDLIST |
|
|
Order.f |
| FORWARD: |
( -- ) |
Explicit forward reference |
Meta.f |
| FOUR-PAGE |
( -- ) |
|
Dc.f |
| FOURTH |
( w x y z -- w x y z w ) |
|
TOOLSET.F |
| FP-DIRECTION? |
( which direction is the floating point data going? ) |
|
486ASM.F |
| FP-GENERIC-ASSEMBLE |
( generic assembly of floating point instructions ) |
|
486ASM.F |
| FPARAMS>TITLE |
( - ) |
|
Opengl.f |
| FPARMS-FP |
( len-ud fileid move -- \ parms for file-position words using SetFilePointer |
|
Fkernel.f |
| FPATH+ |
( -- ) |
append a directory to forth path |
Utils.f |
| FPRINT |
( -- ) |
|
Dc.f |
| FPS>TITLE |
( - ) |
|
Opengl.f |
| FPS-ACTION |
( - ) |
registration of Fps |
OGLEVTS.F |
| FR@ |
|
|
FLOAT.F |
| FRAD |
( fs: deg - rad ) |
|
TOOLSET.F |
| FREAD |
( adr len - len ) |
|
TOOLSET.F |
| FREE |
( addr -- f1 ) |
release the memory pointer |
Fkernel.f |
| FREE-WINLIBRARY |
( lib-entry -- ) |
free a lib entry |
Fkernel.f |
| FREF: |
|
compiletime: ( k - ) runtime: ( - adr.first-float k ) |
Opengl.f |
| FROLL |
( k -- ) |
|
Opengl.f |
| FROT_EYED |
( f: f1 f2 f3 - f2 f3 f1 _eyeD ) |
|
Opengl.f |
| FS. |
( f: r -- r ) |
display fp # in scientific notation |
FLOAT.F |
| FS: |
( adr code -- adr' ) |
|
DIS486.F |
| FSAVE |
( -- ) |
|
Utils.f |
| FSAVE-FILE |
( addr len filename -- ) |
|
Fkernel.f |
| FSIN |
( f: r1 -- r2 ) |
? error if x > 2**63 ? |
FLOAT.F |
| FSINCOS |
( f: r1 -- r2 ) |
? error if x > 2**63 ? |
FLOAT.F |
| FSINH |
( f: r1 -- r2 ) |
? overflow error ? |
FLOAT.F |
| FSP_MEMORY |
( -- ) |
|
FLOAT.F |
| FSQR |
|
|
FLOAT.F |
| FST-COMPILE |
( compile FST and FSTP ) |
|
486ASM.F |
| FSTACK_MEMORY |
( -- ) |
|
FLOAT.F |
| FSTKUFLO |
( -- ) |
|
FLOAT.F |
| FSTSW-COMPILE |
( compile FSTSW & FNSTSW ) |
|
486ASM.F |
| FTAN |
( f: r1 -- r2 ) |
? error if x > 2**63 ? |
FLOAT.F |
| FTANH |
( f: r1 -- r2 ) |
should be OK for legal args |
FLOAT.F |
| FTO |
|
|
FLOAT.F |
| FTO-CELL |
|
|
TOOLSET.F |
| FTO-DISTANCE |
( f: f - ) |
|
Opengl.f |
| FTP |
( - ) |
|
TOOLSET.F |
| FTYPE |
( -- ) |
|
Utils.f |
| FULL-SCREEN? |
( - flag ) |
|
Opengl.f |
| FULL-TRIM |
( nfa link -- ) |
Order-independent trim |
Nforget.f |
| FULLSCREEN? |
( dvmd - flag ) |
|
Fullscreen.f |
| FULLSCREEN-MODE |
( - ) |
using the current settings |
Fullscreen.f |
| FULLSCREEN-TO-WINDOW |
( - ) |
|
Opengl.f |
| FVALUE |
|
compiletime: ( FS: n - ) ( -- ) |
FLOAT.F |
| FVALUE-TO-STRING |
|
( adr - ) fs: ( n - ) \ Borrowed from f. |
TOOLSET.F |
| FVALUE-TO-STRING-AND-COUNT |
( n addr$ - addr len ) |
|
TOOLSET.F |
| FVARIABLE |
( -- ) |
compile time |
FLOAT.F |
| FWAITOPS |
( addr op -- addr' ) |
|
DIS486.F |
| FWITHIN |
|
<> --- \ f: --- <> |
TOOLSET.F |
| FWRITE |
( adr len - ) |
|
TOOLSET.F |
| FXP-COMPILE |
( compile FxP instructions ) |
|
486ASM.F |
A
B
C
D
E
F
G
H
I
J
K
L
M
N
O
P
Q
R
S
T
U
V
W
X
Y
Z
#
Created on
June 22nd, 2003
by Dirk Busch.