home *** CD-ROM | disk | FTP | other *** search
/ ARM Club 3 / TheARMClub_PDCD3.iso / hensa / programming / oslib / oslib_1 / OSLib / Toolbox / Hdr / StringSet < prev    next >
Encoding:
Text File  |  1995-09-05  |  4.0 KB  |  142 lines

  1. ;Assembler header file for StringSet
  2. ;written by DefMod (Jun 30 1995) on Tue Sep  5 16:29:46 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: StringSet_Hdr
  36.         GBLS    StringSet_Hdr
  37.  
  38. ;Symbols for constants
  39. Class_StringSet                 *       &380
  40. StringSet_GenerateUserValueChanged *       &1
  41. StringSet_GenerateSetValueChanged *       &2
  42. StringSet_Writable              *       &4
  43. StringSet_GenerateAboutToBeShown *       &8
  44. StringSet_NoDisplay             *       &10
  45. StringSet_Justification         *       &60
  46. StringSet_JustificationShift    *       5
  47. StringSet_JustificationLeft     *       &0
  48. StringSet_JustificationRight    *       &1
  49. StringSet_JustificationCentred  *       &2
  50. StringSet_GetAlphanumericField  *       &1
  51. StringSet_GetPopUpMenu          *       &2
  52. Action_StringSetValueChanged    *       &8288E
  53. Action_StringSetAboutToBeShown  *       &8288F
  54. StringSet_ValueTooLong          *       &1
  55.  
  56. ;Symbols for structure offsets and sizes
  57.                                 ^       0
  58. StringSet_Gadget_string_set     #       Toolbox_MsgReference
  59. StringSet_Gadget_title          #       Toolbox_MsgReference
  60. StringSet_Gadget_initial_selected_string #       Toolbox_MsgReference
  61. StringSet_Gadget_selected_string_limit #       Int
  62. StringSet_Gadget_allowable      #       Toolbox_MsgReference
  63. StringSet_Gadget_allowable_limit #       Int
  64. StringSet_Gadget_prev           #       Toolbox_C
  65. StringSet_Gadget_next           #       Toolbox_C
  66. StringSet_Gadget                *       @
  67.  
  68.                                 ^       0
  69. StringSet_ActionValueChanged_value #       216*Char
  70. StringSet_ActionValueChanged    *       @
  71.  
  72.  
  73. ;Symbols for SWI's and SWI reason codes
  74. StringSet_SetAvailable          *       &380
  75.    ;Entry
  76.    ;  R0 = flags (Bits)
  77.    ;  R1 = window (Toolbox_O)
  78.    ;  R2 = &380
  79.    ;  R3 = string_set (Toolbox_C)
  80.    ;  R4 -> set (String)
  81.  
  82. StringSet_SetSelected           *       &382
  83.  
  84. StringSetSetSelected_String     *       &0
  85.    ;Entry
  86.    ;  R0 = &0 :OR: flags (Bits)
  87.    ;  R1 = window (Toolbox_O)
  88.    ;  R2 = &382
  89.    ;  R3 = string_set (Toolbox_C)
  90.    ;  R4 -> selection (String)
  91.  
  92. StringSetSetSelected_Index      *       &1
  93.    ;Entry
  94.    ;  R0 = &1 :OR: flags (Bits)
  95.    ;  R1 = window (Toolbox_O)
  96.    ;  R2 = &382
  97.    ;  R3 = string_set (Toolbox_C)
  98.    ;  R4 = index (Int)
  99.  
  100. StringSet_GetSelected           *       &383
  101.  
  102. StringSetGetSelected_String     *       &0
  103.    ;Entry
  104.    ;  R0 = &0 :OR: flags (Bits)
  105.    ;  R1 = window (Toolbox_O)
  106.    ;  R2 = &383
  107.    ;  R3 = string_set (Toolbox_C)
  108.    ;  R4 = buffer (pointer to String)
  109.    ;  R5 = size (Int)
  110.    ;Exit
  111.    ;  R5 = used (Int)
  112.  
  113. StringSetGetSelected_Index      *       &1
  114.    ;Entry
  115.    ;  R0 = &1 :OR: flags (Bits)
  116.    ;  R1 = window (Toolbox_O)
  117.    ;  R2 = &383
  118.    ;  R3 = string_set (Toolbox_C)
  119.    ;Exit
  120.    ;  R0 = index (Int)
  121.  
  122. StringSet_SetAllowable          *       &384
  123.    ;Entry
  124.    ;  R0 = flags (Bits)
  125.    ;  R1 = window (Toolbox_O)
  126.    ;  R2 = &384
  127.    ;  R3 = string_set (Toolbox_C)
  128.    ;  R4 -> allowable (String)
  129.  
  130. StringSet_GetComponents         *       &386
  131.    ;Entry
  132.    ;  R0 = flags (Bits)
  133.    ;  R1 = window (Toolbox_O)
  134.    ;  R2 = &386
  135.    ;  R3 = string_set (Toolbox_C)
  136.    ;Exit
  137.    ;  R0 = alphanumeric_field (Toolbox_C)
  138.    ;  R1 = popup_menu (Toolbox_C)
  139.  
  140.         ]
  141.         END
  142.