275C6 |
TakeOver
|
( → )
Override the default menu key executer. If
this is the first entry in a program, the
program can be used in edit mode. When the
first in a program in the label slot of a
menu key, the program is evaluated to get the
label object (most likely a grob).
|
27FED |
NullMenuKey
|
( → )
A placeholder for an empty menu key when
defining menu lists.
|
275EE |
Modifier
|
( → )
:: TakeOver ;
|
27620 |
MenuMaker
|
( → ob )
Quotes next object, and also provides
TakeOver. The disassembly is
:: TakeOver 'R ;
Normally this is used like this:
:: MenuMaker menu InitMenu ;
|
25EE0 |
InitMenu
|
( menu → )
menu is {} or :: settings {} ;
Settings override the default settings
installed by InitMenu.
|
25EC6 |
DoMenuKey
|
( menu → )
:: SetDA12NoCh InitMenu ;
|
25EE1 |
InitMenu%
|
( %mnu.pg → )
( %0 → )
|
25EDA |
GetMenu%
|
( → % )
|
25F00 |
StartMenu
|
( menu #n → )
#n is the index of the first menu key on the
page, use 1 for the first page, 7 for the
second etc. StartMenu does ExitAction
(Previous menu!), sets the default menu
properties and page. Then it evaluates menu,
stores result to MenuKeys and executes
SetThisRow.
|
25EFE |
SetThisRow
|
( → )
Builds a new TOUCHTAB, SetBadMenu.
|
25EE8 |
LoadTouchTbl
|
( MenuKey1 .. MenuKeyN #n → )
Builds new TOUCHTAB from menukeys.
|