home *** CD-ROM | disk | FTP | other *** search
- ;Assembler header file for FontMenu
- ;written by DefMod (Jun 30 1995) on Tue Sep 5 15:15:13 1995
- ;Jonathan Coxhead, Acorn Computers Ltd
-
- [ :LNOT: :DEF: Get_Types
- GBLS Get_Types
- ]
- [ :LNOT: :DEF: Types_Hdr
- Get_Types SETS "GET OS:Hdr.Types"
- |
- Get_Types SETS ""
- ]
- $Get_Types
-
- [ :LNOT: :DEF: Get_Toolbox
- GBLS Get_Toolbox
- ]
- [ :LNOT: :DEF: Toolbox_Hdr
- Get_Toolbox SETS "GET OS:Hdr.Toolbox"
- |
- Get_Toolbox SETS ""
- ]
- $Get_Toolbox
-
- [ :LNOT: :DEF: Get_Menu
- GBLS Get_Menu
- ]
- [ :LNOT: :DEF: Menu_Hdr
- Get_Menu SETS "GET OS:Hdr.Menu"
- |
- Get_Menu SETS ""
- ]
- $Get_Menu
-
- [ :LNOT: :DEF: FontMenu_Hdr
- GBLS FontMenu_Hdr
-
- ;Symbols for constants
- Class_FontMenu * &82A40
- FontMenu_GenerateAboutToBeShown * &1
- FontMenu_GenerateDialogueCompleted * &2
- FontMenu_IncludeSystemFont * &4
- Action_FontMenuAboutToBeShown * &82A40
- Action_FontMenuDialogueCompleted * &82A41
- Action_FontMenuSelection * &82A42
- Error_FontMenuTasksActive * &80B000
- Error_FontMenuAllocFailed * &80B001
- Error_FontMenuShortBuffer * &80B002
- Error_FontMenuNoSuchTask * &80B011
- Error_FontMenuNoSuchMethod * &80B012
- Error_FontMenuNoSuchMiscOpMethod * &80B013
-
- ;Symbols for structure offsets and sizes
- FontMenu_Flags * Bits
-
- ^ 0
- FontMenu_Object_flags # FontMenu_Flags
- FontMenu_Object_ticked_font # Toolbox_StringReference
- FontMenu_Object * @
-
- FontMenu_Full * OS_Coord
-
- ^ 0
- FontMenu_ActionAboutToBeShown_tag # Toolbox_PositionTag
- FontMenu_ActionAboutToBeShown_position * @
- FontMenu_ActionAboutToBeShown_position_top_left # OS_Coord
- ^ FontMenu_ActionAboutToBeShown_position
- FontMenu_ActionAboutToBeShown_position_full # FontMenu_Full
- FontMenu_ActionAboutToBeShown * @
-
- ^ 0
- FontMenu_ActionSelection_font_identifier # 216*Char
- FontMenu_ActionSelection * @
-
-
- ;Symbols for SWI's and SWI reason codes
- XFontMenu_ClassSWI * &A2A40
- FontMenu_ClassSWI * &82A40
-
- XFontMenu_PostFilter * &A2A41
- FontMenu_PostFilter * &82A41
-
- XFontMenu_PreFilter * &A2A42
- FontMenu_PreFilter * &82A42
-
- FontMenu_SetFont * &0
- ;Entry
- ; R0 = flags (Bits)
- ; R1 = font_menu (Toolbox_O)
- ; R2 = &0
- ; R3 -> font_identifier (String)
-
- FontMenu_GetFont * &1
- ;Entry
- ; R0 = flags (Bits)
- ; R1 = font_menu (Toolbox_O)
- ; R2 = &1
- ; R3 = buffer (pointer to String)
- ; R4 = size (Int)
- ;Exit
- ; R4 = used (Int)
-
- ]
- END
-