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
#
- C -
| NAME |
Stack |
Comment |
File |
| C! |
( c1 a1 -- ) |
store character c1 into address a1 |
Fkernel.f |
| C!-C |
( char taddr -- ) |
|
Meta.f |
| C!-H |
( char taddr -- ) |
|
Meta.f |
| C!-T |
( char taddr -- ) |
|
Meta.f |
| C" |
( -- ) |
|
Fkernel.f |
| C"W |
|
|
DIALOGRC.F |
| C, |
|
|
Meta.f |
| C,-C |
( char -- ) |
|
Meta.f |
| C,-H |
( char -- ) |
|
Meta.f |
| C,-T |
( char -- ) |
|
Meta.f |
| C; |
|
|
Meta.f |
| C@ |
( a1 -- c1 ) |
fetch the character c1 from address a1 |
Fkernel.f |
| C@+ |
( c-addr1 -- c-addr2 char ) |
|
TOOLSET.F |
| C@-C |
( taddr -- char ) |
|
Meta.f |
| C@-H |
( taddr -- char ) |
|
Meta.f |
| C@-T |
( taddr -- char ) |
|
Meta.f |
| C+! |
( c1 a1 -- ) |
add character c1 to the contents of address a1 |
Fkernel.f |
| C+DEL-BUF |
( c1 -- ) |
|
Wined.f |
| C+LPLACE |
( c1 a1 -- ) |
append char c1 to the LONG counted string at a1 |
Primutil.f |
| C+PLACE |
( c1 a1 -- ) |
append char c1 to the counted string at a1 |
Primutil.f |
| C>UNICODE! |
( dest char - dest+2 ) |
|
TOOLSET.F |
| C-LOCK |
|
|
taskdemo.f |
| C-UNLOCK |
|
|
taskdemo.f |
| C0- |
|
|
486ASM.F |
| C0+ |
|
|
486ASM.F |
| C0-8* |
|
|
486ASM.F |
| CADUMP |
( from to 'name-cell-array - ) |
|
TOOLSET.F |
| CALC-COLUMN |
( -- ) |
try to round the click position between characters |
Wined.f |
| CALL |
( [args..] -- result ) |
compile or execute a windows procedure |
Fkernel.f |
| CALL, |
( addr -- ) |
compile call |
Fkernel.f |
| CALL/JMP-ENTRY |
( entry for call and jump ) |
|
486ASM.F |
| CALL-COMPILE |
( compile CALL ) |
|
486ASM.F |
| CALLBACK |
( n1 -- ) |
define a callback with "name" that has n1 arguments |
CALLBACK.f |
| CALLBACK: |
{ #args \ addr temp$ -- } |
makes a headerless callback function, only |
CALLBACK.f |
| CALLWINDOWPROC |
( hwnd msg wparam lparam wndproc -- result ) |
|
CONTROL.F |
| CANDIDATE |
( x y z -- candidate-pointer) |
|
dfc.F |
| CAPS-COMPARE |
{ sa1 sn1 sa2 sn2 \ st1 st2 -- f1 } |
|
Primutil.f |
| CAPS-FIND |
( str -- str FALSE | cfa flag ) |
|
Fkernel.f |
| CAPS-SEARCH |
{ s-adr s-len t-adr t-len \ t-buf t-str -- adr len flag } |
|
Primutil.f |
| CAPS-SEARCH |
{ sa1 sn1 sa2 sn2 \ st1 st2 -- a3 n3 f1 } |
|
Primutil.f |
| CASE |
|
|
Fkernel.f |
| CATCH |
( cfa -- flag ) |
|
Fkernel.f |
| CDECR |
( addr -- ) |
decrement the BYTE contents of addr |
Fkernel.f |
| CELL |
|
|
STRUCT.F |
| CELL- |
|
|
486ASM.F |
| CELL- |
( a1 -- a1-cell ) |
subtract a cell from a1 |
Fkernel.f |
| CELL- |
|
|
fcp101.f |
| CELL/ |
|
|
486ASM.F |
| CELL+ |
( a1 -- a1+cell ) |
add a cell to a1 |
Fkernel.f |
| CELL-ARRAY |
|
|
TOOLSET.F |
| CELL-COUNT |
( addr -- c_addr len ) |
|
dfc.F |
| CELL-FILL |
{ addr len value -- } |
|
Wined.f |
| CELL-PLACE |
( c_addr len addr -- ) |
|
dfc.F |
| CELL-SORT |
( a1 n1 -- ) |
perform in place sort buffer a1 of n1 cells |
Fkernel.f |
| CELL-SORT |
( a1 n1 -- ) |
perform in place sort buffer a1 of n1 cells |
primcode.f |
| CELLS |
( n1 -- n1*cell ) |
multiply n1 by the cell size |
Fkernel.f |
| CELLS- |
( a1 n1 -- a1-n1*cell ) |
multiply n1 by the cell size and subtract |
Fkernel.f |
| CELLS+ |
( a1 n1 -- a1+n1*cell ) |
multiply n1 by the cell size and add |
Fkernel.f |
| CEQ |
( adr op -- adr' ) |
|
DIS486.F |
| CFA-CODE |
( -- ) |
|
Meta.f |
| CFA-CODE |
( -- ) |
|
Primutil.f |
| CFA-COMP, |
( cfa -- ) |
compile or execute a CFA |
Primutil.f |
| CFA-FUNC |
( -- ) |
|
Primutil.f |
| CFA-IS-CODE |
( -- ) |
mark the last header create as a code cfa |
Fkernel.f |
| CFA-LATER |
( cfa -- ) |
push a cfa onto the later stack |
Later.f |
| CFA-WATCH |
( cfa -- ) |
try to display the source for CFA |
Debug.f |
| CFG-INIT |
( -- ) |
|
HYPER.F |
| CFG-OPEN? |
( -- f1 ) |
open the configuration file |
HYPER.F |
| CFILE |
( sq -- c ) |
|
fcp101.f |
| CGT |
( adr op -- adr' ) |
|
DIS486.F |
| CHAIN-ADD |
( chain_address -- ) |
for normal forward chains |
Primutil.f |
| CHAIN-ADD-BEFORE |
( chain_address -- ) |
|
Primutil.f |
| CHANGE-SCENE |
( VK_key - ) |
|
Opengl.f |
| CHANGE-TO-APPLE |
{ \ inform? old-len old-char -- } |
|
Wined.f |
| CHANGE-TO-BINARY-TOGGLE |
{ \ inform? old-len old-char -- } |
|
Wined.f |
| CHANGE-TO-PC |
{ \ inform? -- } |
|
Wined.f |
| CHANGED-VIEW |
( - ) |
|
Bounce3d.f |
| CHANGED-VIEW |
( - ) |
|
fcp3d.f |
| CHAR |
( -- char ) |
|
Fkernel.f |
| CHAR@SCREEN |
( x y -- c1 ) |
|
Utils.f |
| CHAR+ |
( a1 -- a1+char ) |
add the characters size in bytes to a1 |
Fkernel.f |
| CHAR>PIECE |
( c -- piece | 0 ) |
|
fcp101.f |
| CHAR-STRIP |
( a1 n1 c1 -- a1 n1 ) |
|
HYPER.F |
| CHARACTER-LEFT |
( -- ) |
|
Wined.f |
| CHARACTER-RIGHT |
( -- ) |
|
Wined.f |
| CHARS |
( n1 -- n1*char ) |
multiply n1 by the character size (1) |
Fkernel.f |
| CHARTOKEY |
( -- char | -1 = end_of_file) |
|
Keysave.f |
| CHARWH |
( -- width height ) |
get the width and height of the |
Primutil.f |
| CHDIR |
( -- ) |
|
REGISTRY.F |
| CHECK! |
( 1/0 bit# - ) |
|
TOOLSET.F |
| CHECK-AD-SIZE |
( check the address size ) |
|
486ASM.F |
| CHECK-DT-SIZE |
( check the operand size ) |
|
486ASM.F |
| CHECK-LABELS |
|
|
Meta.f |
| CHECK-SIZES |
( check the address and operand sizes ) |
|
486ASM.F |
| CHECKBOX |
{ identifier xpos ypos xsize ysize ---- -- } |
|
DIALOGRC.F |
| CHECKTIME |
( -- ) |
|
fcp101.f |
| CHKFIL |
( n1 --- n1 f1 ) |
verify file in bufer n1 is current |
BLOCK.F |
| CHR>ASC |
( n -- char ) |
|
Debug.f |
| CINCR |
( addr -- ) |
increment the BYTE contents of addr |
Fkernel.f |
| CIS |
( addr op -- addr' ) |
|
DIS486.F |
| CLASS> |
( ^Class -- objCfa ) |
|
Class.f |
| CLASS>OBJ |
( ^Class -- ^obj ) |
|
Class.f |
| CLASS-ALLOT |
( n -- ) |
|
Class.f |
| CLASS-BITALLOT |
( n -- ) |
|
Class.f |
| CLASSPOINTER? |
( class -- f ) |
|
Class.f |
| CLASSVFIND |
( str ^class -- str f OR ^iclass t ) |
|
Class.f |
| CLEAN-PASTE |
( -- ) |
|
Wined.f |
| CLEANUP |
( -- ) |
|
HELLO.F |
| CLEAR-ALL-OFFSETS |
( - ) |
|
Opengl.f |
| CLEAR-BUFFER |
( - ) |
|
Opengl.f |
| CLEAR-EXCEPTION |
( -- ) |
clear any previous exception |
EXCEPTIO.F |
| CLEAR-INFO |
( -- ) |
|
CONTROL.F |
| CLEAR-LABELS |
|
|
Meta.f |
| CLEAR-SCREEN |
( -- ) |
|
Wined.f |
| CLEAR-TEXT |
( -- ) |
|
Wined.f |
| CLEAR-TRANSIENT |
( -- ) |
|
TRANSIT.F |
| CLIENT |
( -- ) |
load file and execute client on the client |
PIPES.F |
| CLIP-CONSOLE-LINES |
( -- ) |
|
Wined.f |
| CLONE |
( CfaOfObject 'newobject' -- ) |
clone an static object |
Class.f |
| CLOSE-ALL-TEXT |
( -- ) |
Colse all files |
Wined.f |
| CLOSE-BLOCKFILE |
( -- ) |
|
BLOCK.F |
| CLOSE-FILE |
( fileid -- ior ) |
|
Fkernel.f |
| CLOSE-INDEX |
( -- ) |
|
HYPER.F |
| CLOSE-KEYWORDS |
( -- ) |
|
Wined.f |
| CLOSE-MAP-FILE |
( map-handle -- f1 ) |
|
MAPFILE.F |
| CLOSE-OPENGLWINDOW |
( - ) |
|
fcp_inputwin.f |
| CLOSE-PIPE |
( -- ) |
|
PIPES.F |
| CLOSE-SHARE |
( memory_pointer handle -- ) |
|
MAPFILE.F |
| CLOSESAMPLE |
( -- ) |
|
CONTROLS.F |
| CLR-1LAB |
( n1 -- ) |
zero out a local label record |
Newlab.f |
| CLR-ASCII-OGL |
( - ) |
|
fcp3d.f |
| CLR-OPSTACK |
|
|
486ASM.F |
| CLR-REF |
( n1 -- ) |
zero out this reference record |
Newlab.f |
| CLS-OPENGL |
( - ) |
|
Opengl.f |
| CMDLINE |
|
|
Primutil.f |
| CMETHODS |
( 'class' -- ) |
methods of a class |
CLASSDBG.F |
| CMOVCC-COMPILE |
( compile CMOVcc instructions ) |
|
586ASMCM.f |
| CMPXCHG8B-COMP |
( assemble CMPXCHG8B ) |
|
486ASM.F |
| CMV |
( adr op -- ) |
|
DIS486.F |
| CODE |
( -- ) |
|
Meta.f |
| CODE-, |
( n1 -- ) |
store dword in code space |
Fkernel.f |
| CODE? |
( cfa -- f ) |
|
XDEBUG.F |
| CODE? |
( cfa -- f ) |
is cfa a code word? |
Debug.f |
| CODE-ALIGN |
( -- ) |
|
Fkernel.f |
| CODE-ALLOT |
( n -- ) |
allocate code space |
Fkernel.f |
| CODE-C, |
( c1 -- ) |
store byte in code space |
Fkernel.f |
| CODE-FREE |
( -- N1 ) |
|
Fkernel.f |
| CODE-HERE |
( -- a1 ) |
next free byte of code space |
Fkernel.f |
| CODE-ORIGIN |
( -- a1 ) |
return the origin of code |
Fkernel.f |
| CODE-W, |
( w1 -- ) |
store word in code space |
Fkernel.f |
| CODE_LIST, |
{ opcode \ w#threads -- } |
compile a list of optimizable code |
OPTIMIZE.F |
| COLON? |
( cfa -- f ) |
|
XDEBUG.F |
| COLON? |
( cfa -- f ) |
is cfa a colon definition? |
Debug.f |
| COLORABLE? |
( -- f ) |
|
Wined.f |
| COLORWORD |
( n -- ) |
set color based on 4-bit value |
Wined.f |
| COLS |
( -- n1 ) |
current screen columns |
Primutil.f |
| COM1EMIT |
{ char -- } |
write a character to the serial port |
WINSER.F |
| COM1KEY |
( -- c1 ) |
must return a key |
WINSER.F |
| COM1KEY? |
( -- c1 ) |
get a key from serial port, don't wait long |
WINSER.F |
| COM1TALK |
( -- ) |
simple terminal talker to the serial port |
WINSER.F |
| COM2EMIT |
{ char -- } |
write a character to the serial port |
WINSER.F |
| COM2INIT |
( -- ) |
simple terminal talker to the serial port |
WINSER.F |
| COM2KEY |
( -- c1 ) |
must return a key |
WINSER.F |
| COM2KEY? |
( -- c1 ) |
get a key from serial port, don't wait long |
WINSER.F |
| COM2TALK |
( -- ) |
simple terminal talker to the serial port |
WINSER.F |
| COMBOBOX |
{ identifier xpos ypos xsize ysize -- } |
|
DIALOGRC.F |
| COMCLOSE |
( cHndl -- ) |
close com port if its open |
WINSER.F |
| COMERRORCLEAR |
{ comhndl \ lpErrors -- f } |
true = success |
WINSER.F |
| COMMAND-OPTIONS |
( -- ) |
command line parsing |
Wined.f |
| COMMENT |
|
-- |
Primutil.f |
| COMMENT: |
( -- ) |
all that follows is a comment |
Utils.f |
| COMOPEN |
( z1 -- cHndl ) |
Open Com port for z" COM1", or z" COM2" |
WINSER.F |
| COMPACT |
( -- ) |
build a compact header |
imageman.f |
| COMPARE |
( adr1 len1 adr2 len2 -- n ) |
|
Fkernel.f |
| COMPILE-FIELDS |
( compile the mod-r/m, s-i-b, displacement, and immed fields ) |
|
486ASM.F |
| COMPILE-OPCODE |
( compile the bytes in an opcode ) |
|
486ASM.F |
| COMPUTERNAME$! |
( adr - ) |
March 30th, 2002 was GetComputerName |
TOOLSET.F |
| COMSETUP |
{ baud size parity stop cHndl -- } |
|
WINSER.F |
| COMTIMEOUTS |
{ cHndl \ CT -- } |
Initialize the communications timeouts |
WINSER.F |
| CON-NEW-MACRO |
( -- ) |
|
Keysave.f |
| CON-PLAY-MACRO |
( -- ) |
|
Keysave.f |
| CONDC |
( -- dc ) |
get the console device context |
Primutil.f |
| CONFIG" |
( -- ) |
|
Extend.f |
| CONSOLE-FORTH-IO |
( -- ) |
|
Dc.f |
| CONSOLE-TEXT |
( -- ) |
|
Wined.f |
| CONST |
( n1 -- ) |
|
BUILD.F |
| CONSTANT |
( n -- ) |
create a constant (unchangable) value |
Fkernel.f |
| CONSTANT |
( n -- ) |
|
Meta.f |
| CONSTANT? |
( cfa -- f ) |
|
Debug.f |
| CONSTANTS |
( -- ) |
|
WORDS.F |
| CONTBP |
( -- ) |
run continuous till key press |
Wined.f |
| CONTEXT-BUFFER |
( -- a1 ) |
return the address of the |
EXCEPTIO.F |
| CONTROL-Y? |
( - flag ) |
|
TOOLSET.F |
| CONVERT |
( ud1 a1 -- ud2 a2 ) |
|
Primutil.f |
| COPY-BITMAP |
( dc-source hdcMem xdest ydest - ) |
or ( source dest xdest ydest - ) |
BMPIO.F |
| COPY-CONSOLE |
{ \ gblhndl gblptr b/l l/s len -- } |
Copy text to Windows clipboard |
Keysave.f |
| COPY-DEMO-BITMAP |
{ flag \ hbm hdcMem -- } |
|
WINDEMO.F |
| COPY-TEXT |
{ \ gblhndl gblptr hwidth scnt -- } |
Copy text to clipboard |
Wined.f |
| COPYFILE |
{ \ from$ to$ -- } |
copy a file to a directory |
Utils.f |
| COUNT |
( str -- addr len ) |
byte counted strings |
Fkernel.f |
| COUNT! |
( adr len - ) |
|
TOOLSET.F |
| COUNT-1-FILE |
{ \ line$ -- } |
|
Wined.f |
| COUNT-CONSTANTS |
( -- n1 ) |
count the constants available to system |
WORDS.F |
| COUNT-FILE |
{ \ line$ -- } |
|
Wined.f |
| COUNT-VOC |
( voc -- ) |
|
DTHREAD.F |
| COUNT-WORDS |
( -- n1 ) |
|
DTHREAD.F |
| COUNTER! |
( n hwnd -- ) |
|
HELLO.F |
| COUNTER@ |
( hwnd -- n ) |
|
HELLO.F |
| CR_OGL |
( - ) |
|
fcp3d.f |
| CRANK |
( sq -- c ) |
|
fcp101.f |
| CREATE |
( -- ) |
|
Fkernel.f |
| CREATE |
( -- ) |
|
Meta.f |
| CREATE-BIND |
( create words to bind local labels ) |
|
486ASM.F |
| CREATE-BITMAP-FILE |
( nrgbquad - vadr ) |
|
BMPIO.F |
| CREATE-BLOCKFILE |
( u1 -- ) |
create a blank file of u1 block long |
BLOCK.F |
| CREATE-CHILD-WINDOW |
( -- hWnd ) |
|
CHILDWND.F |
| CREATE-CONTROL |
( z"classname" -- ) |
|
CONTROL.F |
| CREATE-DC |
( w h - hbm hdcMem ) |
|
BMPIO.F |
| CREATE-FILE |
( adr slen fmode -- fileid ior ) |
|
Fkernel.f |
| CREATE-FILE-MAP |
( map-handle -- ) |
|
MAPFILE.F |
| CREATE-FRAME-WINDOW |
( -- hwnd ) |
|
Window.f |
| CREATE-FRAME-WINDOWEX |
( -- hwnd ) |
|
Fullscreen.f |
| CREATE-FRAME-WINDOWEX |
( -- hwnd ) |
|
Oglwin.f |
| CREATE-HELLO-WINDOW |
( -- f ) |
|
HELLO.F |
| CREATE-MACRO-BIND |
( create macro-safe local label bindings ) |
|
486ASM.F |
| CREATE-MACRO-REF |
( create macro-safe local label references ) |
|
486ASM.F |
| CREATE-REF |
( create words to reference local labels ) |
|
486ASM.F |
| CREATE-TASK |
( addr -- flag ) |
create task suspended |
task.f |
| CREATE-THREAD-USER: |
|
|
multithr.f |
| CREATE-VGA-BITMAP |
( -- ) |
|
CLASDBG.F |
| CS: |
( adr code -- adr' ) |
|
DIS486.F |
| CS-PICK |
( dest .. u -- dest ) |
pick both addr and ?pairs value |
Primutil.f |
| CS-ROLL |
( dest -- u -- .. dest ) |
roll both addr and ?pairs value |
Primutil.f |
| CTEXT |
{ identifier xpos ypos xsize ysize ---- -- } |
|
DIALOGRC.F |
| CTRL |
|
|
Primutil.f |
| CTYPE@ |
( n -- x ) |
|
CTYPE.F |
| CUBE |
( f: size - ) |
|
Opengl.f |
| CUR-COLUMN |
( -- n1 ) |
|
Wined.f |
| CURR-ORIGIN |
( -- origin ) |
|
metadlg.f |
| CURRENT-DIR$ |
( -- a1 ) |
get the full path to the current directory |
REGISTRY.F |
| CURSOR-ON-SCREEN |
( -- ) |
|
Wined.f |
| CURSORINVIEW |
( -- ) |
make sure cursor is visible in the window |
Primutil.f |
| CURSORT |
( ^from -- ) |
|
fcp101.f |
| CUT-CONSOLE |
( -- ) |
|
Keysave.f |
| CUT-TEXT |
( -- ) |
|
Wined.f |
| CWORDS |
( -- ) |
|
Wined.f |
| CX8 |
( addr op -- addr' ) |
|
DIS486.F |
| CXC |
( addr op -- addr' ) |
|
DIS486.F |
| CYLINDER |
( stacks slices basef topf heightf - ) |
|
Opengl.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.