home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 224a.lha / Includes / intuition / gadget < prev    next >
Encoding:
Text File  |  1989-04-08  |  3.0 KB  |  147 lines
  1.  
  2. {s Gadget
  3.     APTR NextGadget
  4.     WORD LeftEdge
  5.     WORD TopEdge
  6.     WORD Width
  7.     WORD Height
  8.     WORD Flags
  9.     WORD Activation
  10.     WORD GadgetType
  11.     APTR GadgetRender
  12.     APTR SelectRender
  13.     APTR GadgetText
  14.     LONG MutualExclude
  15.     APTR SpecialInfo
  16.     WORD GadgetID
  17.     APTR UserData
  18.    s}
  19.  
  20. EQU GADGHIGHBITS    $0003
  21. EQU GADGHCOMP       $0000
  22. EQU GADGHBOX        $0001
  23. EQU GADGHIMAGE      $0002
  24. EQU GADGHNONE       $0003
  25.  
  26. EQU GADGIMAGE       $0004
  27.  
  28. EQU GRELBOTTOM      $0008
  29. EQU GRELRIGHT       $0010
  30. EQU GRELWIDTH       $0020
  31. EQU GRELHEIGHT      $0040
  32.  
  33. EQU SELECTED        $0080
  34.  
  35. EQU GADGDISABLED    $0100
  36.  
  37. EQU RELVERIFY       $0001
  38.  
  39. EQU GADGIMMEDIATE   $0002
  40.  
  41. EQU ENDGADGET       $0004
  42.  
  43. EQU FOLLOWMOUSE     $0008
  44.  
  45. EQU RIGHTBORDER     $0010
  46. EQU LEFTBORDER      $0020
  47. EQU TOPBORDER       $0040
  48. EQU BOTTOMBORDER    $0080
  49.  
  50. EQU TOGGLESELECT    $0100
  51.  
  52. EQU STRINGCENTER    $0200
  53. EQU STRINGRIGHT     $0400
  54.  
  55. EQU LONGINT         $0800
  56.  
  57. EQU ALTKEYMAP       $1000
  58.  
  59. EQU BOOLEXTEND      $2000
  60.  
  61.  
  62. EQU GADGETTYPE      $FC00
  63. EQU SYSGADGET       $8000
  64. EQU SCRGADGET       $4000
  65. EQU GZZGADGET       $2000
  66. EQU REQGADGET       $1000
  67.  
  68. EQU SIZING          $0010
  69. EQU WDRAGGING       $0020
  70. EQU SDRAGGING       $0030
  71. EQU WUPFRONT        $0040
  72. EQU SUPFRONT        $0050
  73. EQU WDOWNBACK       $0060
  74. EQU SDOWNBACK       $0070
  75. EQU CLOSE           $0080
  76.  
  77. EQU BOOLGADGET      $0001
  78. EQU GADGET0002      $0002
  79. EQU PROPGADGET      $0003
  80. EQU STRGADGET       $0004
  81.  
  82. {s BoolInfo
  83.     WORD    Flags
  84.     APTR    Mask
  85.     LONG    Reserved
  86.    s}
  87.  
  88. EQU BOOLMASK        $0001
  89.  
  90. {s PropInfo
  91.     WORD Flags
  92.     WORD HorizPot
  93.     WORD VertPot
  94.     WORD HorizBody
  95.     WORD VertBody
  96.     WORD CWidth
  97.     WORD CHeight
  98.     WORD HPotRes
  99.     WORD VPotRes
  100.     WORD LeftBorder
  101.     WORD TopBorder
  102.    s}
  103.  
  104. EQU AUTOKNOB        $0001
  105. EQU FREEHORIZ       $0002
  106. EQU FREEVERT        $0004
  107. EQU PROPBORDERLESS  $0008
  108. EQU KNOBHIT         $0100
  109.  
  110. EQU KNOBHMIN        6
  111. EQU KNOBVMIN        4
  112. EQU MAXBODY         $FFFF
  113. EQU MAXPOT          $FFFF
  114.  
  115.  
  116. {s StringInfo
  117.     APTR Buffer
  118.     APTR UndoBuffer
  119.     WORD BufferPos
  120.     WORD MaxChars
  121.     WORD DispPos
  122.     WORD UndoPos
  123.     WORD NumChars
  124.     WORD DispCount
  125.     WORD CLeft
  126.     WORD CTop
  127.     APTR LayerPtr
  128.     LONG LongInt
  129.     APTR AltKeyMap
  130.    s}
  131.  
  132. >Intuition   -432 (r A2 A1 A0 D0 r)    RefreshGList (s Req Wd Gg Gg# -- )
  133. >Intuition ^ -438 (r A2 A1 A0 D1 D0 r) AddGList (s Req Gg Wd Gg# Pos -- 'Pos )
  134. >Intuition ^ -444 (r A1 A0 D0 r)       RemoveGList (s Gg Wd Gg# -- Pos )
  135.  
  136. >Intuition ^ -462 (r A2 A1 A0 r) ActivateGadget (s Req Wd Gg -- f )
  137. >Intuition ^ -042 (r A1 A0 D0 r) AddGadget      (s Gg Wd Pos -- 'Pos )
  138. >Intuition   -174 (r A2 A1 A0 r) OffGadget      (s Req Wd Gg -- )
  139. >Intuition   -186 (r A2 A1 A0 r) OnGadget       (s Req Wd Gg -- )
  140. >Intuition   -222 (r A2 A1 A0 r) RefreshGadgets (s Req Wd Gg -- )
  141. >Intuition ^ -228 (r A1 A0 r)    RemoveGadget   (s Gg Wd -- pos )
  142. >Intuition   -156 (r A2 A1 A0 D4 D3 D2 D1 D0 r)     ModifyProp
  143.         (s Req Wd Gg VBody HBody VPot HPot fl -- )
  144. >Intuition   -468 (r A2 A1 A0 D5 D4 D3 D2 D1 D0 r)  NewModifyProp
  145.    (s Req Wd Gadget NumGad Vbody Hbody VPos HPos Flags -- )
  146.  
  147.