Glossary
Quartus memo words, in alphabetic order |
Forth word | stack descriptor | line# | memo file
|
#8 | | 12 | regs |
#trailing0 | ( c-addr u -- u1 ) | 25 | float-ext |
&unnest. | | 16 | tinylocals
|
([else]) | ( --) | 30 | tools-ext |
([if]) | ( flag --) | 14 | tools-ext |
(allocate) | ( u -- a. ior ) | 5 | Mem
|
(f.) | ( F: r -- ) | 31 | float-ext |
(free) | ( a. -- ior ) | 8 | Mem |
(ID) | ( <cccc> -- id. ) | 8 | ids
|
(point) | | 23 | float-ext |
(resize) | ( a. u -- ior ) | 10 | Mem |
(sin) | ( n -- n') | 27 | trig |
(size) | ( a. -- u ) | 9 | Mem |
+cycles | | 99 | disasm |
+if-long | | 101 | disasm |
+long
| | 98 | disasm |
+LOOP | | 30 | core-ext |
+mem | | 100 | disasm |
,areg | |
28 | disasm.part2 |
,dreg | | 29 | disasm.part2 |
,extra | ( -- ) | 113 | asm68k |
,more | ( ea -- ) |
103 | asm68k |
,source | | 27 | disasm.part2 |
-> | ( ... -- ) | 54 | tester |
-frot | ( F: r1 r2 r3 -- r3 r1 r2 ) |
4 | float-ext |
-sz1 | | 53 | asm68k |
.# | ( -- ) | 69 | disasm |
.( | | 115 | disasm |
.) | | 116 | disasm |
., | ( -- ) | 71 | disasm |
.,r) | | 140 | disasm |
.-a@ |
| 120 | disasm |
.a@ | ( .areg .) | 118 | disasm |
.a@+ | ( .areg ." ) | 119 | disasm |
.abs.l | |
13 | disasm.part2 |
.abs.w | | 11 | disasm.part2 |
.an | | 117 | disasm |
.an+r+b | | 3 |
disasm.part2 |
.an+w | ( op -- ) | 144 | disasm |
.areg | | 112 | disasm |
.args-reladr | ( adr -- ) | 137 |
disasm |
.b | | 42 | asm68k |
.base-char | | 90 | disasm |
.byte | | 88 | disasm |
.called-name? | ( cfa -- ) | 132 | disasm |
.cond | | 79 | disasm.part3 |
.cond$ | | 75 | disasm.part3 |
.dest | | 3 | disasm.part3 |
.dreg | | 113 | disasm |
.dw | ( -- ) | 123 | disasm |
.exg |
| 47 | disasm.part4 |
.ext | ( op -- ) | 16 | disasm.part2 |
.imm | | 104 | disasm |
.l | |
44 | asm68k |
.long | | 86 | disasm |
.movem | | 32 | disasm.part2 |
.moveq | |
124 | disasm.part3 |
.mul | | 36 | disasm.part4 |
.nib4-reg | | 108 | disasm.part2 |
.num | | 121
| disasm |
.param | | 148 | disasm |
.param-size | ( -- ) | 125 | disasm |
.pc+r+b | | 7 | disasm.part2
|
.pc+w | | 9 | disasm.part2 |
.R | | 46 | core-ext |
.regs | | 16 | regs |
.rot$
| | 63 | disasm.part4 |
.rotlr | | 66 | disasm.part4 |
.size | | 84 | disasm |
.source |
| 21 | disasm.part2 |
.stat-bit | | 21 | disasm.part3 |
.w | | 43 | asm68k |
.word | |
87 | disasm |
/STRING | | 3 | string |
: | | 18 | safe |
:noname | | 17 |
safe |
; | | 14 | safe |
;; | | 12 | safe |
>arg | | 78 | disasm |
>flag
| ( bool -- flag ) | 36 | disasm |
>lower | ( C -- c ) | 16 | toolkit |
>roman | ( u1 -- addr u2 ) | 64 | roman |
>upper | ( c -- C ) | 19 | toolkit |
?, | | 24 | asm68k |
?DO | | 15 | core-ext |
?resolve-do |
| 23 | core-ext |
[COMPILE] | | 56 | core-ext |
[defined] | | 40 | toolkit |
[ELSE] | ( --)
| 6 | tools-ext |
[end] | | 38 | toolkit |
[ID] | | 14 | ids |
[IF] | ( flag --) |
11 | tools-ext |
[THEN] | ( --) | 3 | tools-ext |
{ | | 50 | tester |
} | | 63 | tester |
0allot | ( chars -- ) | 42 | toolkit |
2, | | 23 | asm68k |
2>R | | 12 | core-ext |
2or |
( d1. d2. -- d3. ) | 43 | serial |
2R> | | 11 | core-ext |
2R@ | | 13 | core-ext |
2ROT |
| 10 | double |
3drop | | 45 | toolkit |
4drop | | 46 | toolkit |
6&7 | ( -- 6&7 ) |
59 | disasm |
6&7? | ( -- flag ) | 60 | disasm |
6drop | | 47 | toolkit |
a2+ | | 65 | disasm
|
admod | ( d +n -- +m) | 22 | dblmath |
after | ( d1 k -- d2) | 46 | calendar |
AGAIN | ( target -- ) | 129 | asm68k.part2
|
ALLOCATE | ( u -- a ior ) | 17 | memory |
anytime | ( xt "name" --) | 29 | safe |
append | ( at ut as us -- at ut+us ) |
24 | toolkit |
approximate | | 21 | disasm |
arcfour | ( M-addr length -- ) | 28 | arcfour |
arcfourkey | ( K-addr length -- ) |
25 | arcfour |
array | ( cells <name> -- ) | 27 | toolkit |
ASSEMBLER | | 6 | asm68k |
assert( | |
36 | assert |
assert-error | ( x -- ) | 8 | assert |
assert0( | | 24 | assert |
assert1( | |
27 | assert |
assert2( | | 30 | assert |
assert3( | | 33 | assert |
assertion( | | 11 | assert
|
at | ( y x --) | 63 | graphics |
AT-XY | ( col row -- ) | 9 | facility |
b@ | ( a -- byte ) | 15 | disasm |
backlight | ( bool --) | 3 | backlight |
backlight? | ( -- bool) | 6 | backlight |
bartype | ( u -- ) | 73 | roman |
before | ( d1 k -- d2) | 42 | calendar |
BEGIN | ( -- target ) | 126 | asm68k.part2 |
bin.# | ( -- ) | 73 | disasm |
binary | | 5 | tinynums |
bit-set? | ( n bit -- flag ) | 41 | disasm |
bitmap | ( height width "name" -- ) | 3 |
bitmap |
bits | ( n offset bits -- bits-of-n ) | 38 | disasm |
black | | 7 | turtle |
BLANK | | 5 |
string |
bounds | ( a n -- a+n a ) | 13 | toolkit |
byte>cell | ( byte -- n ) | 32 | disasm |
C" | | 34 |
core-ext |
carray | ( n "name" -- ) | 5 | arcfour |
center-title | ( c-addr u -- ) | 26 | input |
check0 | |
44 | safe |
checkaddr | | 40 | safe |
checkbase | | 46 | safe |
circle | ( radius cy cx --) | 16 |
graphics |
CloseDB | ( dbr. -- ) | 22 | DataMgr |
CloseDocDB | ( dbr. -- ) | 30 | doc |
CloseMemoDB | ( -- ) | 17 |
memo |
CMP | ( ea Dn ) | 54 | asm68k.part2 |
CMPM | | 39 | asm68k.part2 |
CODE | | 11 | asm68k |
comp? | | 38 | safe |
compiletime | ( xt "name" --) | 20 | safe |
cond-bra? | ( adr -- ) | 90 | disasm.part3
|
coords@ | ( -- y x ) | 44 | Events |
cos | ( n -- n') | 34 | trig |
cosdist | ( angle distance -- xOffset) | 16 |
turtle |
CreateDB | | 25 | DataMgr |
cstype | ( cs-addr u -- ) | 129 | disasm |
cts? | ( -- flag ) | 178 |
serial |
cursor-position | ( -- y x ) | 65 | graphics |
D. | | 9 | double |
D< | | 5 | double |
D= | | 4 | double |
D>S | | 44 | core-ext |
D>S | | 8 | double |
D0< |
| 6 | double |
D0= | | 7 | double |
date>day-of-week | | 34 | calendar |
date>dmy | (
d -- day month year) | 108 | calendar |
date>iso | ( d -- day week year) | 132 | calendar |
date>year | ( d -- year) | 89 | calendar
|
Decompress | ( addr. len -- a. n ) | 35 | doc |
define: | | 26 | asm68k |
digit>roman | ( c -- addr ) | 34 |
roman |
dir | | 44 | memo |
disasm | ( a -- a+ flag ) | 100 | disasm.part4 |
disassembler | | 9 |
disasm |
dism-clr | | 43 | disasm.part2 |
display | ( c-addr. u -- ) | 76 | doc |
dm* | ( d n -- d*n) | 4 | dblmath
|
dm/ | ( d +n -- d/n) | 5 | dblmath |
dmod | ( d +n -- +m) | 18 | dblmath |
dmy>date | ( day month year -- d) | 66 |
calendar |
dn? | ( ea -- ea flag ) | 82 | asm68k |
DO | | 21 | core-ext |
DocInclude | ( "name" -- ) |
120 | docinc |
DocInclude" | ( "name<">" -- ) | 124 | docinc |
DocIncluded | ( c-addr u -- ) | 64 | docinc |
DocNeeded
| ( c u -- ) | 117 | docinc |
DocNeeds | ( "name" -- ) | 122 | docinc |
DocNeeds" | ( "name<">" -- ) |
126 | docinc |
doing-call | | 29 | disasm |
done? | | 97 | disasm |
dot | | 19 | music |
double? | ( mode -- flag ) | 94 | asm68k |
drawto | ( toY toX --) | 9 | turtle |
dst | ( ea ins -- ea ins' ) | 84 |
asm68k |
dyn$ | | 18 | disasm.part3 |
eighth | | 17 | music |
ELSE | ( oldfwdref -- newfwdref ) | 123 |
asm68k.part2 |
EMPTY-STACK | ( ... -- ) | 32 | tester |
END-CODE | | 16 | asm68k |
end-environment | ( -- ) | 6 |
environment |
end-struct | ( s "structname" --) | 10 | struct |
endcase | | 13 | case |
endof | |
10 | case |
enum | ( n -- ) | 34 | toolkit |
environment | ( -- ) | 4 | environment |
ENVIRONMENT? | | 29 |
environment |
EOR | ( Dn ea ) | 53 | asm68k.part2 |
ERASE | | 38 | core-ext |
erase-rectangle | | 41 |
graphics |
erase-rounded-rectangle | | 36 | graphics |
ERROR | ( c-addr u -- ) | 37 | tester |
Eval-Record | ( c-addr. u -- ) |
39 | docinc |
Evaluate-Buf | ( -- ) | 30 | docinc |
exact | | 22 | disasm |
EXG | |
41 | asm68k.part2 |
EXT | ( Dn ) | 47 | asm68k.part2 |
extra? | ( [n] mode -- mode ) | 108 | asm68k |
F. | ( F: r --) |
47 | float-ext |
F~ | ( F: r1 r2 r3 -- ) | 7 | float-ext |
field | | 75 | asm68k |
field | ( n "fieldname" -- ) |
6 | struct |
Field>string | ( c-addr fieldID -- len ) | 22 | Fields |
FieldFocus | ( fieldid -- ) | 8 | Fields |
fifth | ( d1 k -- d2)
| 59 | calendar |
first | ( d1 k -- d2) | 55 | calendar |
fix | | 32 | asm68k |
FlushQueue | ( -- ) |
5 | Fields |
FOR | ( Dn -- Dn target ) | 134 | asm68k.part2 |
FORTH | | 21 | asm68k |
forth? | | 111 |
disasm.part4 |
fourth | ( d1 k -- d2) | 58 | calendar |
frame | | 46 | graphics |
FREE | ( a -- ior ) | 20 |
memory |
fwd | ( distance --) | 19 | turtle |
get-input | | 33 | input |
get-timeout | ( -- timeout. ) | 115 |
serial |
GetControlValue | ( controlid -- flag ) | 12 | Forms |
GetObjectIndex | ( objectid -- index ) | 3 | Forms |
GetObjectPtr | ( objectid
-- ptr. ) | 7 | Forms |
GetRecord | ( index -- addr u ) | 64 | doc |
getregs | | 6 | regs |
go | |
80 | doc |
goto | ( y x ) | 8 | turtle |
half | | 15 | music |
Handle>rel | ( h. -- a 0=success|ior ) |
12 | memory |
ibcd | | 57 | asm68k.part2 |
ibit | | 170 | asm68k |
ibra | | 6 | asm68k.part2
|
icon | | 110 | asm68k.part2 |
ID | ( <cccc> -- ) | 18 | ids |
idbr | | 13 | asm68k.part2 |
idd | | 64 | asm68k.part2 |
idea | | 71 | asm68k.part2 |
iea | | 91 | asm68k.part2 |
ieaa | | 143 | asm68k |
iead | | 82 | asm68k.part2 |
ieas | | 102 | asm68k.part2 |
IF |
( condition -- fwdref ) | 121 | asm68k.part2 |
imm | | 120 | asm68k |
immsr | | 130 | asm68k |
index? |
( [n] mode -- [a] mode ) | 96 | asm68k |
init-disasm | | 95 | disasm.part4 |
init-S | ( -- ) | 14 | arcfour |
InitSerLib
| ( -- err ) | 63 | serial |
inputfldlen | ( -- len ) | 22 | input |
inrange? | ( a. -- flag ) | 6 | memory |
instr:
| | 36 | asm68k |
iq | | 136 | asm68k |
is-mem | | 102 | disasm |
iset | |
18 | asm68k.part2 |
iso>date | ( day week year -- d) | 125 | calendar |
isr | | 151 | asm68k |
itemid | |
46 | Events |
j+! | ( n -- ) | 12 | arcfour |
kday | ( d1 k o -- d2) | 36 | calendar |
KEY? | ( -- flag ) | 3 |
facility |
l@ | ( a -- x. ) | 16 | disasm |
last | ( d1 k -- d2) | 54 | calendar |
leapyear? | ( year -- bool) | 61 |
calendar |
line | ( y2 x2 y1 x1 --) | 3 | graphics |
LINK | ( n An ) | 51 | asm68k.part2 |
long? | | 52 | asm68k
|
LOOP | | 26 | core-ext |
M+ | | 3 | double |
matchtag | | 10 | safe |
MD5 |
( c-addr u -- c-addr2 16 ) | 42 | arcfour |
MemoDBR | | 10 | memo |
mix-S | ( K-addr length -- ) | 16 | arcfour |
mode | | 59 | asm68k |
more? | ( ea -- flag ) | 102 | asm68k |
MOVE | | 24 | asm68k.part2 |
MOVE<USP
| ( An ) | 29 | asm68k.part2 |
MOVE>USP | ( An ) | 28 | asm68k.part2 |
MOVEM< | | 32 | asm68k.part2 |
MOVEM> | | 30 | asm68k.part2 |
MOVEP | | 34 | asm68k.part2 |
MOVEQ | | 26 | asm68k.part2 |
nearest
| ( d1 k -- d2) | 44 | calendar |
needed? | ( c-addr u -- flag ) | 60 | docinc |
NEXT | ( Dn target -- ) | 136 | asm68k.part2 |
nib0 | | 49 | disasm.part3 |
nib0$ | | 40 | disasm.part3 |
nib0-dest | | 44 | disasm.part3 |
nib0-unique | | 25 | disasm.part3 |
nib1-3 | | 8 | disasm.part3 |
nib11 | | 20 | disasm.part4 |
nib12 | | 49 | disasm.part4 |
nib13 | | 79 | disasm.part4 |
nib14 | | 70 | disasm.part4 |
nib4 | | 129 | disasm.part2 |
nib4-special | | 99 | disasm.part2 |
nib4-unique | | 89 | disasm.part2 |
nib4:0 | | 38 | disasm.part2 |
nib4:10 | | 69 | disasm.part2 |
nib4:12 | | 83 | disasm.part2 |
nib4:14 | | 74 | disasm.part2 |
nib4:4 | | 46 | disasm.part2 |
nib4:6 | | 53 | disasm.part2 |
nib4:8 | | 59 | disasm.part2 |
nib5 | | 94 | disasm.part3 |
nib6 | | 112 | disasm.part3 |
nib8 | | 128 | disasm.part3 |
nib9 | | 3 | disasm.part4 |
not-doing-call | | 30 | disasm |
note | | 24 | music |
nth | ( d1 k n -- d2) | 48 | calendar |
o | | 10 | music |
of |
| 5 | case |
on-or-after | ( d1 k -- d2) | 45 | calendar |
on-or-before | ( d1 k -- d2) | 43 | calendar |
op-bit? |
( bit# -- flag ) | 47 | disasm |
op-bits | ( off #bits -- n ) | 44 | disasm |
op-btst | ( bit# -- ) | 50 | disasm |
op>>3
| ( -- op>>3 ) | 63 | disasm |
op>>9 | ( -- op>>9 ) | 62 | disasm |
OpenDB | ( mode zaddr len -- dbr. ) | 16 | DataMgr
|
OpenDocDB | | 26 | doc |
OpenMemoDB | ( -- ) | 13 | memo |
OpenResDB | | 7 | resources |
OSversion | ( -- minor major ) | 7 | Ver |
out, | ( c -- ) | 23 | doc |
outfree | ( -- ) | 18 | doc |
outinit |
( -- ) | 14 | doc |
PAD | | 40 | core-ext |
param | | 67 | disasm |
pixel-width | ( c-addr u -- width
) | 8 | textalign |
place | ( a1 n1 a2 -- ) | 6 | toolkit |
place, | ( a1 n1 -- ) | 9 | toolkit |
point | ( y x --
) | 4 | graphics |
point2 | ( y x -- y x) | 9 | graphics |
point4 | ( y x -- y -x) | 11 | graphics |
point8 | ( y x
--) | 13 | graphics |
PopupForm | ( formID -- ) | 32 | Forms |
postfix | | 30 | asm68k |
prefix | |
31 | asm68k |
quarter | | 16 | music |
rand | ( -- n ) | 4 | random |
rectangle | ( height width y x --) |
33 | graphics |
reduce | ( ud1 ud2 -- udquot udrem) | 86 | calendar |
regs | | 56 | asm68k |
rel>Handle | ( a -- h. ) |
9 | memory |
REPEAT | ( target fwdref -- ) | 131 | asm68k.part2 |
REPRESENT | | 3 | float |
reset | |
21 | music |
RESIZE | ( a1 u -- a2 ior ) | 23 | memory |
rn | ( <digit> <string> -- ) | 25 | roman |
roman> | ( addr u --
n ) | 39 | roman |
roman10x | ( addr u -- ) | 52 | roman |
romantype | ( +n -- ) | 85 | roman |
rounded-rectangle |
| 27 | graphics |
rpoint | ( y x --) | 7 | graphics |
second | ( d1 k -- d2) | 56 | calendar |
see | |
141 | disasm.part4 |
seed | ( ud -- ) | 3 | random |
serClearErr | ( -- ) | 76 | serial |
serClose | ( -- err ) |
82 | serial |
serGetSettings | ( &settings -- err ) | 172 | serial |
serGetStatus | ( -- cts dsr err ) | 161 | serial |
serOpen | (
baud. -- err ) | 79 | serial |
serRecv | ( addr cnt -- #. err ) | 133 | serial |
serRecv10 | ( &addr len -- err ) | 124 | serial |
serRecv10A | ( &addr. len. -- err ) | 119 | serial |
serRecvA | ( &addr. len. -- #. err ) | 128 | serial |
serRecvCheck | ( -- bytes. err
) | 137 | serial |
serRecvFlush | ( -- ) | 141 | serial |
serRecvWait | ( bytes -- err ) | 149 | serial |
serRecvWaitA |
( bytes. -- err ) | 145 | serial |
serSend | ( &addr len -- #. err ) | 102 | serial |
serSend10 | ( &addr len -- err ) | 92 |
serial |
serSend10A | ( &addr. len. -- err ) | 86 | serial |
serSendA | ( &addr. len. -- #. err ) | 96 | serial |
serSendWait | ( -- err
) | 105 | serial |
serSetRecvBuff | ( &addr len -- err ) | 157 | serial |
serSetRecvBuffA | | 153 | serial |
serSetSettings
| ( &settings -- err ) | 175 | serial |
serSysTrap | ( # -- ) | 68 | serial |
serSysTrap2n | ( a b # -- n ) | 71 | serial |
serSysTrap4n | ( a b c d # -- n ) | 73 | serial |
set | ( n <c> -- ) | 8 | roman |
set-high-branch | ( adr -- ) | 81 |
disasm.part3 |
set-size | ( -- ) | 76 | disasm |
set-timeout | ( timeout. -- ) | 112 | serial |
setclass | | 4
| asm68k.part2 |
SetControlValue | ( flag controlid -- ) | 17 | Forms |
SetLabel | ( &string. controlid -- ) | 22 | Forms |
simple-handler
| | 13 | simple-handler |
sin | ( n -- n') | 30 | trig |
sindist | ( angle distance -- yOffset) | 14 | turtle |
sixteenth | | 18 | music |
size | ( a -- u ) | 28 | memory |
size$ | | 80 | disasm |
sizeof |
( "structname" -- s) | 14 | struct |
SndOldDoCmd | ( &sndcmd -- err) | 6 | sound |
sound | ( vol0..64 ms hz --) | 11 |
sound |
split-roman | ( u -- nnn 1000's ) | 79 | roman |
src | ( ea ins -- ea ins' ) | 83 | asm68k |
STOP | ( n ) |
49 | asm68k.part2 |
str>lstr | ( &addr len -- &addr. len. ) | 89 | serial |
string | | 69 | input |
string>Field |
( c-addr u fieldID -- Err ) | 16 | Fields |
SWAP | ( Dn ) | 48 | asm68k.part2 |
symbol>value | ( char -- value ) | 20 | roman |
symbol10x | ( sym -- sym*10 ) | 22 | roman |
SystemSound | ( soundID --) | 3 | sound |
sz | | 46 | asm68k |
t | | 12 | music |
t | | 41 | memo |
table | | 2 | trig |
test | |
70 | input |
test | | 34 | memo |
test | ( 0 -- 0 1 2 3 4 5 4 3 2 1 0 ) | 25 | tinylocals |
testdata | |
31 | memo |
testdata1 | | 32 | memo |
TESTING | ( -- ) | 83 | tester |
THEN | ( fwdref -- ) | 118 | asm68k.part2
|
thens | | 5 | condthens |
third | ( d1 k -- d2) | 57 | calendar |
TIME&DATE | | 4 | facility-ext
|
tinychar | ( "name" -- ) | 7 | tinynums |
tinycr | ( -- ) | 90 | tinynums |
tinyemit | ( char -- ) | 93 |
tinynums |
tinyspace | ( -- ) | 88 | tinynums |
tinytype | ( c-addr u -- ) | 101 | tinynums |
TO | ( x "name" --) |
6 | core-ext |
TRAP | ( n ) | 50 | asm68k.part2 |
turn | ( angle --) | 18 | turtle |
turtle | | 12 | turtle
|
type.center | ( c-addr u center -- ) | 16 | textalign |
type.left | | 4 | textalign |
type.right | | 11 |
textalign |
U.R | | 50 | core-ext |
U> | | 48 | core-ext |
ud/mod | ( ud1 ud2 -- udr udq) | 9 |
dblmath |
uncond-bra? | ( adr -- ) | 84 | disasm.part3 |
under+ | ( n1 x1 n2 -- n1+n2 x1 ) | 31 | toolkit |
unique | |
6 | safe |
UNLK | ( An ) | 52 | asm68k.part2 |
unnest | | 11 | tinylocals |
UNTIL | ( target cond -- ) | 127
| asm68k.part2 |
until-drawn | ( formID -- ) | 25 | Forms |
use-locals | | 18 | tinylocals |
use-resources | |
13 | resources |
UseCard | ( n -- ) | 13 | DataMgr |
v | | 11 | music |
VALUE | ( x "name" --) | 3
| core-ext |
w@ | ( a -- x ) | 14 | disasm |
WHILE | ( cond -- fwdref ) | 130 | asm68k.part2 |
white | | 7 |
turtle |
whole | | 14 | music |
WITHIN | | 42 | core-ext |
WITHIN | ( test low high -- flag) | 53 |
core-ext |
WriteNewMemo | ( zstring length -- ) | 20 | memo |
z" | ( ...<"> -- runtime: c-addr u ) | 5 | zstrings |
zeroes | (
n -- ) | 17 | float-ext |