home *** CD-ROM | disk | FTP | other *** search
/ ARM Club 3 / TheARMClub_PDCD3.iso / hensa / programming / oslib / oslib_1 / OSLib / User / Hdr / ColourPick < prev    next >
Encoding:
Text File  |  1995-07-03  |  8.5 KB  |  262 lines

  1. ;Assembler header file for ColourPicker
  2. ;written by DefMod (Jun 30 1995) on Mon Jul  3 18:51:13 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_OS
  16.         GBLS    Get_OS
  17.         ]
  18.         [       :LNOT: :DEF: OS_Hdr
  19. Get_OS                          SETS    "GET OS:Hdr.OS"
  20.         |
  21. Get_OS                          SETS    ""
  22.         ]
  23.         $Get_OS
  24.  
  25.         [       :LNOT: :DEF: Get_Wimp
  26.         GBLS    Get_Wimp
  27.         ]
  28.         [       :LNOT: :DEF: Wimp_Hdr
  29. Get_Wimp                        SETS    "GET OS:Hdr.Wimp"
  30.         |
  31. Get_Wimp                        SETS    ""
  32.         ]
  33.         $Get_Wimp
  34.  
  35.         [       :LNOT: :DEF: ColourPicker_Hdr
  36.         GBLS    ColourPicker_Hdr
  37.  
  38. ;Symbols for constants
  39. Error_ColourPickerUninit        *       &20D00
  40. Error_ColourPickerBadModel      *       &20D01
  41. Error_ColourPickerBadHandle     *       &20D02
  42. Error_ColourPickerBadFlags      *       &20D03
  43. Error_ColourPickerInUse         *       &20D04
  44. Error_ColourPickerModelInUse    *       &20D05
  45. Error_ColourPickerBadReason     *       &20D06
  46. ColourPicker_EntryDialogueStarting *       0
  47. ColourPicker_EntryDialogueFinishing *       1
  48. ColourPicker_EntryRedrawArea    *       2
  49. ColourPicker_EntryUpdateArea    *       3
  50. ColourPicker_EntryReadValues    *       4
  51. ColourPicker_EntrySetValues     *       5
  52. ColourPicker_EntryProcessEvent  *       6
  53. ColourPicker_EntrySetColour     *       7
  54. ColourPicker_EntryLimit         *       8
  55. ColourPicker_DialogueOffersTransparent *       &1
  56. ColourPicker_DialogueTransparent *       &2
  57. ColourPicker_DialogueType       *       &C
  58. ColourPicker_DialogueTypeShift  *       2
  59. ColourPicker_DialogueTypeNever  *       &0
  60. ColourPicker_DialogueTypeClick  *       &1
  61. ColourPicker_DialogueTypeClickDrag *       &2
  62. ColourPicker_DialogueIgnoreHelp *       &10
  63. ColourPicker_DialogueIgnoreKeyPressed *       &20
  64. ColourPicker_ModelSizeRGB       *       16
  65. ColourPicker_ModelSizeCMYK      *       20
  66. ColourPicker_ModelSizeHSV       *       16
  67. ColourPicker_ModelRGB           *       0
  68. ColourPicker_ModelCMYK          *       1
  69. ColourPicker_ModelHSV           *       2
  70. Message_ColourPickerColourChoice *       &47700
  71. Message_ColourPickerColourChanged *       &47701
  72. Message_ColourPickerCloseDialogueRequest *       &47702
  73. Message_ColourPickerOpenParentRequest *       &47703
  74. Message_ColourPickerResetColourRequest *       &47704
  75. ColourPicker_ColourTransparent  *       &1
  76. ColourPicker_ColourDragging     *       &2
  77. ColourPicker_OpenTransient      *       &1
  78. ColourPicker_OpenSubMenu        *       &2
  79. ColourPicker_OpenToolbox        *       &2
  80. ColourPicker_UpdateOffersTransparent *       &1
  81. ColourPicker_UpdateTransparent  *       &2
  82. ColourPicker_UpdateType         *       &4
  83. ColourPicker_UpdateVisible      *       &8
  84. ColourPicker_UpdateScroll       *       &10
  85. ColourPicker_UpdateTitle        *       &20
  86. ColourPicker_UpdateColour       *       &40
  87. ColourPicker_UpdateModel        *       &80
  88. ColourPicker_UpdateIgnoreHelp   *       &100
  89. ColourPicker_UpdateIgnoreKeyPressed *       &200
  90.  
  91. ;Symbols for structure offsets and sizes
  92. ColourPicker_D                  *       4 ;abstract type
  93.                                 ^       0
  94. ColourPicker_Colour_colour      #       OS_Colour
  95. ColourPicker_Colour_size        #       Int
  96. ColourPicker_Colour_info        #       Int
  97. ColourPicker_Colour             *       @
  98.  
  99. ColourPicker_DialogueFlags      *       Bits
  100.  
  101.                                 ^       0
  102. ColourPicker_Dialogue_flags     #       ColourPicker_DialogueFlags
  103. ColourPicker_Dialogue_title     #       Ptr
  104. ColourPicker_Dialogue_visible   #       OS_Box
  105. ColourPicker_Dialogue_xscroll   #       Int
  106. ColourPicker_Dialogue_yscroll   #       Int
  107. ColourPicker_Dialogue_colour    #       OS_Colour
  108. ColourPicker_Dialogue_size      #       Int
  109. ColourPicker_Dialogue_info      #       Int
  110. ColourPicker_Dialogue           *       @
  111.  
  112. ColourPicker_ModelFlags         *       Bits
  113.  
  114.                                 ^       0
  115. ColourPicker_Model_flags        #       ColourPicker_ModelFlags
  116. ColourPicker_Model_name         #       Ptr
  117. ColourPicker_Model_description  #       Ptr
  118. ColourPicker_Model_info_size    #       Int
  119. ColourPicker_Model_pane_size    #       OS_Coord
  120. ColourPicker_Model_entries      #       8*Ptr
  121. ColourPicker_Model              *       @
  122.  
  123. ColourPicker_ColourFlags        *       Bits
  124.  
  125.                                 ^       0
  126. ColourPicker_MessageColourChoice_d #       ColourPicker_D
  127. ColourPicker_MessageColourChoice_flags #       ColourPicker_ColourFlags
  128. ColourPicker_MessageColourChoice_colour #       OS_Colour
  129. ColourPicker_MessageColourChoice_size #       Int
  130. ColourPicker_MessageColourChoice_info #       Int
  131. ColourPicker_MessageColourChoice *       @
  132.  
  133.                                 ^       0
  134. ColourPicker_MessageColourChanged_d #       ColourPicker_D
  135. ColourPicker_MessageColourChanged_flags #       ColourPicker_ColourFlags
  136. ColourPicker_MessageColourChanged_colour #       OS_Colour
  137. ColourPicker_MessageColourChanged_size #       Int
  138. ColourPicker_MessageColourChanged_info #       Int
  139. ColourPicker_MessageColourChanged *       @
  140.  
  141.                                 ^       0
  142. ColourPicker_MessageOpenParentRequest_d #       ColourPicker_D
  143. ColourPicker_MessageOpenParentRequest *       @
  144.  
  145.                                 ^       0
  146. ColourPicker_MessageCloseDialogueRequest_d #       ColourPicker_D
  147. ColourPicker_MessageCloseDialogueRequest *       @
  148.  
  149.                                 ^       0
  150. ColourPicker_MessageResetColourRequest_d #       ColourPicker_D
  151. ColourPicker_MessageResetColourRequest *       @
  152.  
  153. ColourPicker_OpenFlags          *       Bits
  154.  
  155. ColourPicker_CloseFlags         *       Bits
  156.  
  157. ColourPicker_UpdateFlags        *       Bits
  158.  
  159. ColourPicker_ReadFlags          *       Bits
  160.  
  161. ColourPicker_SetFlags           *       Bits
  162.  
  163. ColourPicker_HelpFlags          *       Bits
  164.  
  165.  
  166. ;Symbols for SWI's and SWI reason codes
  167. XColourPicker_RegisterModel     *       &67700
  168. ColourPicker_RegisterModel      *       &47700
  169.    ;Entry
  170.    ;  R0 = model_no (Int)
  171.    ;  R1 -> model (ColourPicker_Model)
  172.    ;  R2 = workspace (pointer to Void)
  173.  
  174. XColourPicker_DeregisterModel   *       &67701
  175. ColourPicker_DeregisterModel    *       &47701
  176.    ;Entry
  177.    ;  R0 = model_no (Int)
  178.  
  179. XColourPicker_OpenDialogue      *       &67702
  180. ColourPicker_OpenDialogue       *       &47702
  181.    ;Entry
  182.    ;  R0 = flags (ColourPicker_OpenFlags)
  183.    ;  R1 -> dialogue (ColourPicker_Dialogue)
  184.    ;Exit
  185.    ;  R0 = d (ColourPicker_D)
  186.    ;  R1 = w (Wimp_W)
  187.  
  188. XColourPicker_CloseDialogue     *       &67703
  189. ColourPicker_CloseDialogue      *       &47703
  190.    ;Entry
  191.    ;  R0 = flags (ColourPicker_CloseFlags)
  192.    ;  R1 = d (ColourPicker_D)
  193.  
  194. XColourPicker_UpdateDialogue    *       &67704
  195. ColourPicker_UpdateDialogue     *       &47704
  196.    ;Entry
  197.    ;  R0 = flags (ColourPicker_UpdateFlags)
  198.    ;  R1 = d (ColourPicker_D)
  199.    ;  R2 -> dialogue (ColourPicker_Dialogue)
  200.  
  201. XColourPicker_ReadDialogue      *       &67705
  202. ColourPicker_ReadDialogue       *       &47705
  203.    ;Entry
  204.    ;  R0 = flags (ColourPicker_ReadFlags)
  205.    ;  R1 = d (ColourPicker_D)
  206.    ;  R2 = dialogue (pointer to ColourPicker_Dialogue)
  207.    ;Exit
  208.    ;  R1 = w (Wimp_W)
  209.    ;  R2 = size (Int)
  210.  
  211. XColourPicker_SetColour         *       &67706
  212. ColourPicker_SetColour          *       &47706
  213.    ;Entry
  214.    ;  R0 = flags (ColourPicker_SetFlags)
  215.    ;  R1 -> colour (ColourPicker_Colour)
  216.  
  217. XColourPicker_HelpReply         *       &67707
  218. ColourPicker_HelpReply          *       &47707
  219.    ;Entry
  220.    ;  R0 = flags (ColourPicker_HelpFlags)
  221.    ;  R1 -> help_request (Wimp_Message)
  222.  
  223. XColourPicker_ModelSWI          *       &67708
  224. ColourPicker_ModelSWI           *       &47708
  225.  
  226. ColourPickerModelSWI_ColourChanged *       &0
  227.    ;Entry
  228.    ;  R0 = &0
  229.    ;  R1 -> colour (ColourPicker_Colour)
  230.  
  231. ColourPickerModelSWI_ColourChangedByDragging *       &1
  232.    ;Entry
  233.    ;  R0 = &1
  234.    ;  R1 -> colour (ColourPicker_Colour)
  235.  
  236. ColourPickerModelSWI_ClaimEvent *       &2
  237.    ;Entry
  238.    ;  R0 = &2
  239.    ;  R1 = event (Int)
  240.    ;  R2 -> colour (ColourPicker_Colour)
  241.  
  242. ColourPickerModelSWI_ReleaseEvent *       &3
  243.    ;Entry
  244.    ;  R0 = &3
  245.    ;  R1 = event (Int)
  246.    ;  R2 -> colour (ColourPicker_Colour)
  247.  
  248. ColourPickerModelSWI_ProcessKey *       &4
  249.    ;Entry
  250.    ;  R0 = &4
  251.    ;  R1 = c (Int)
  252.    ;  R2 -> colour (ColourPicker_Colour)
  253.  
  254. Service_ColourPickerLoaded      *       &93
  255.    ;Entry
  256.    ;  R1 = &93
  257.    ;  R2 -> loaded_service (code)
  258.    ;  R3 = workspace (pointer to Void)
  259.  
  260.         ]
  261.         END
  262.