home *** CD-ROM | disk | FTP | other *** search
/ ARM Club 3 / TheARMClub_PDCD3.iso / hensa / programming / oslib / oslib_1 / OSLib / Toolbox / Hdr / PopUp < prev    next >
Encoding:
Text File  |  1995-09-05  |  1.9 KB  |  75 lines
  1. ;Assembler header file for PopUp
  2. ;written by DefMod (Jun 30 1995) on Tue Sep  5 16:29:51 1995
  3. ;Jonathan Coxhead, Acorn Computers Ltd
  4.  
  5.         [       :LNOT: :DEF: Get_Types
  6.         GBLS    Get_Types
  7.         ]
  8.         [       :LNOT: :DEF: Types_Hdr
  9. Get_Types                       SETS    "GET OS:Hdr.Types"
  10.         |
  11. Get_Types                       SETS    ""
  12.         ]
  13.         $Get_Types
  14.  
  15.         [       :LNOT: :DEF: Get_Toolbox
  16.         GBLS    Get_Toolbox
  17.         ]
  18.         [       :LNOT: :DEF: Toolbox_Hdr
  19. Get_Toolbox                     SETS    "GET OS:Hdr.Toolbox"
  20.         |
  21. Get_Toolbox                     SETS    ""
  22.         ]
  23.         $Get_Toolbox
  24.  
  25.         [       :LNOT: :DEF: Get_Gadget
  26.         GBLS    Get_Gadget
  27.         ]
  28.         [       :LNOT: :DEF: Gadget_Hdr
  29. Get_Gadget                      SETS    "GET OS:Hdr.Gadget"
  30.         |
  31. Get_Gadget                      SETS    ""
  32.         ]
  33.         $Get_Gadget
  34.  
  35.         [       :LNOT: :DEF: PopUp_Hdr
  36.         GBLS    PopUp_Hdr
  37.  
  38. ;Symbols for constants
  39. Class_PopUp                     *       &2C0
  40. PopUp_GenerateAboutToBeShown    *       &1
  41. Action_PopUpAboutToBeShown      *       &8288B
  42.  
  43. ;Symbols for structure offsets and sizes
  44.                                 ^       0
  45. PopUp_Gadget_menu_name          #       Toolbox_StringReference
  46. PopUp_Gadget                    *       @
  47.  
  48. PopUp_Full                      *       OS_Coord
  49.  
  50.                                 ^       0
  51. PopUp_ActionAboutToBeShown_menu #       Toolbox_O
  52. PopUp_ActionAboutToBeShown      *       @
  53.  
  54.  
  55. ;Symbols for SWI's and SWI reason codes
  56. PopUp_SetMenu                   *       &2C0
  57.    ;Entry
  58.    ;  R0 = flags (Bits)
  59.    ;  R1 = window (Toolbox_O)
  60.    ;  R2 = popup (Toolbox_C)
  61.    ;  R3 = &2C0
  62.    ;  R4 = menu (Toolbox_O)
  63.  
  64. PopUp_GetMenu                   *       &2C1
  65.    ;Entry
  66.    ;  R0 = flags (Bits)
  67.    ;  R1 = window (Toolbox_O)
  68.    ;  R2 = popup (Toolbox_C)
  69.    ;  R3 = &2C1
  70.    ;Exit
  71.    ;  R0 = menu (Toolbox_O)
  72.  
  73.         ]
  74.         END
  75.