home *** CD-ROM | disk | FTP | other *** search
/ ARM Club 3 / TheARMClub_PDCD3.iso / hensa / programming / oslib / oslib_1 / OSLib / Toolbox / Hdr / WritableFi < prev   
Encoding:
Text File  |  1995-09-05  |  3.1 KB  |  113 lines
  1. ;Assembler header file for WritableField
  2. ;written by DefMod (Jun 30 1995) on Tue Sep  5 16:29:28 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: Get_Font
  36.         GBLS    Get_Font
  37.         ]
  38.         [       :LNOT: :DEF: Font_Hdr
  39. Get_Font                        SETS    "GET OS:Hdr.Font"
  40.         |
  41. Get_Font                        SETS    ""
  42.         ]
  43.         $Get_Font
  44.  
  45.         [       :LNOT: :DEF: WritableField_Hdr
  46.         GBLS    WritableField_Hdr
  47.  
  48. ;Symbols for constants
  49. Class_WritableField             *       &200
  50. WritableField_GenerateUserValueChanged *       &1
  51. WritableField_GenerateSetValueChanged *       &2
  52. WritableField_RJustified        *       &4
  53. WritableField_HCentred          *       &8
  54. WritableField_ConcealText       *       &10
  55. Action_WritableFieldValueChanged *       &82885
  56. WritableField_ValueTooLong      *       &1
  57.  
  58. ;Symbols for structure offsets and sizes
  59.                                 ^       0
  60. WritableField_Gadget_text       #       Toolbox_MsgReference
  61. WritableField_Gadget_text_limit #       Int
  62. WritableField_Gadget_allowable  #       Toolbox_MsgReference
  63. WritableField_Gadget_allowable_limit #       Int
  64. WritableField_Gadget_prev       #       Toolbox_C
  65. WritableField_Gadget_next       #       Toolbox_C
  66. WritableField_Gadget            *       @
  67.  
  68.                                 ^       0
  69. WritableField_ActionValueChanged_string #       212*Char
  70. WritableField_ActionValueChanged *       @
  71.  
  72.  
  73. ;Symbols for SWI's and SWI reason codes
  74. WritableField_SetValue          *       &200
  75.    ;Entry
  76.    ;  R0 = flags (Bits)
  77.    ;  R1 = window (Toolbox_O)
  78.    ;  R2 = &200
  79.    ;  R3 = writable_field (Toolbox_C)
  80.    ;  R4 -> value (String)
  81.  
  82. WritableField_GetValue          *       &201
  83.    ;Entry
  84.    ;  R0 = flags (Bits)
  85.    ;  R1 = window (Toolbox_O)
  86.    ;  R2 = &201
  87.    ;  R3 = writable_field (Toolbox_C)
  88.    ;  R4 = buffer (pointer to String)
  89.    ;  R5 = size (Int)
  90.    ;Exit
  91.    ;  R5 = used (Int)
  92.  
  93. WritableField_SetAllowable      *       &202
  94.    ;Entry
  95.    ;  R0 = flags (Bits)
  96.    ;  R1 = window (Toolbox_O)
  97.    ;  R2 = &202
  98.    ;  R3 = writable_field (Toolbox_C)
  99.    ;  R4 -> allowed (String)
  100.  
  101. WritableField_SetFont           *       &204
  102.    ;Entry
  103.    ;  R0 = flags (Bits)
  104.    ;  R1 = window (Toolbox_O)
  105.    ;  R2 = &204
  106.    ;  R3 = writable_field (Toolbox_C)
  107.    ;  R4 -> font_name (String)
  108.    ;  R5 = xsize (Int)
  109.    ;  R6 = ysize (Int)
  110.  
  111.         ]
  112.         END
  113.