home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 607.lha / PopUpMenu_v4.3 / Source.LZH / Source / PopUpMenu.i < prev    next >
Text File  |  1991-10-23  |  10KB  |  432 lines
  1. AbsExecBase          EQU   4
  2. TRUE              EQU   1
  3. FALSE              EQU   0
  4. LIBVERSION          EQU   $21
  5. UNIT_VBLANK          EQU   1
  6.  
  7. * Exec
  8. _LVOObtainSemaphore   EQU  -$234
  9. _LVOReleaseSemaphore  EQU  -$23a
  10. _LVOForbid          EQU  -$84
  11. _LVOPermit          EQU  -$8a
  12. _LVOSetSignal          EQU  -$132
  13. _LVOCheckIO          EQU  -$1d4
  14. _LVOWaitIO          EQU  -$1da
  15. _LVOSendIO          EQU  -$1ce
  16. _LVODoIO          EQU  -$1c8
  17. _LVOGetMsg          EQU  -$174
  18. _LVOPutMsg          EQU  -$16e
  19. _LVOWaitPort          EQU  -$180
  20. _LVOWait          EQU  -$13e
  21. _LVOSignal          EQU  -$144
  22. _LVOReplyMsg          EQU  -$17a
  23. _LVOFreeMem          EQU  -$d2
  24. _LVOAllocMem          EQU  -$c6
  25. _LVOFindPort          EQU  -$186
  26. _LVOAllocSignal       EQU  -$14a
  27. _LVOFreeSignal          EQU  -$150
  28. _LVOOpenDevice          EQU  -$1bc
  29. _LVOCloseDevice       EQU  -$1c2
  30. _LVOInitSemaphore     EQU  -$22e
  31. _LVOSetFunction       EQU  -$1a4
  32. _LVOOpenLibrary       EQU  -$228
  33. _LVOCloseLibrary      EQU  -$19e
  34. _LVOAddPort          EQU  -$162
  35. _LVORemPort          EQU  -$168
  36. _LVOSetTaskPri          EQU  -$12c
  37.  
  38. * Layer
  39. _LVOLockLayers          EQU  -$6c
  40. _LVOUnlockLayers      EQU  -$72
  41.  
  42. * Intuition
  43. _LVOItemAddress       EQU  -$90
  44. _LVOLockIBase          EQU  -$19e
  45. _LVOUnlockIBase       EQU  -$1a4
  46. _LVOCurrentTime       EQU  -$54
  47. _LVOActivateWindow    EQU  -$1c2
  48. _LVOIntuiTextLength   EQU  -$14a
  49. _LVOPrintIText          EQU  -$d8
  50. _LVODrawImage          EQU  -$72
  51. _LVOAllocRemember     EQU  -$18c
  52. _LVOFreeRemember      EQU  -$198
  53. _LVOSetMenuStrip      EQU  -$108
  54. _LVOClearMenuStrip    EQU  -$36
  55. _LVOOnMenu          EQU  -$c0
  56. _LVOOffMenu          EQU  -$b4
  57. _LVODisplayBeep       EQU  -$60
  58.  
  59. * Graphics
  60. _LVOInitRastPort      EQU  -$c6
  61. _LVOSetFont          EQU  -$42
  62. _LVOTextLength          EQU  -$36
  63. _LVOSetDrMd          EQU  -$162
  64. _LVOSetAPen          EQU  -$156
  65. _LVORectFill          EQU  -$132
  66. _LVOInitBitMap          EQU  -$186
  67. _LVOAllocRaster       EQU  -$1ec
  68. _LVOFreeRaster          EQU  -$1f2
  69. _LVOBltBitMap          EQU  -$1e
  70. _LVOMove          EQU  -$f0
  71. _LVODraw          EQU  -$f6
  72. _LVOText          EQU  -$3c
  73.  
  74. * Dos
  75. _LVOWrite          EQU  -$30
  76. _LVOUnLoadSeg          EQU  -$9c
  77. _LVODelay          EQU  -$c6
  78. _LVOOpen          EQU  -$1e
  79. _LVOClose          EQU  -$24
  80. _LVOOutput          EQU  -$3c
  81. _LVOCurrentDir          EQU  -$7e
  82.  
  83. * Icon
  84. _LVOGetDiskObject     EQU  -$4e
  85. _LVOFreeDiskObject    EQU  -$5a
  86. _LVOFindToolTypes     EQU  -$60
  87.  
  88. MODE_OLDFILE          EQU   1005
  89. **** Screen ****
  90. sc_LayerInfo          EQU   $00E0
  91. sc_MouseX          EQU   $0012
  92. sc_MouseY          EQU   $0010
  93. sc_ViewPort          EQU   $002C
  94. sc_RastPort          EQU   $002C+$0028
  95. sc_FirstWindow          EQU   $0004
  96. sc_BitMap          EQU   $00B8
  97. sc_Height          EQU   $000E
  98. sc_Width          EQU   $000C
  99. sc_BarHeight          EQU   $001E
  100.  
  101. **** ViewPort ****
  102. vp_Modes          EQU   $0020
  103.  
  104. **** Window ****
  105. wd_Flags          EQU   $0018
  106. wd_MenuStrip          EQU   $001C
  107. wd_ReqCount          EQU   $002C
  108. wd_WScreen          EQU   $002E
  109. wd_FirstGadget          EQU   $003e
  110. wd_IDCMPFlags          EQU   $0052
  111. wd_UserPort          EQU   $0056
  112. wd_DetailPen          EQU   $0062
  113. wd_BlockPen          EQU   $0063
  114. wd_CheckMark          EQU   $0064
  115.  
  116. **** Gadget ****
  117. gg_Flags          EQU   $000c
  118. gg_GadgetType          EQU   $0010
  119.  
  120. **** RastPort ****
  121. rp_Font           EQU   $0034
  122. rp_BitMap          EQU   $0004
  123. rp_TxHeight          EQU   $003A
  124. rp_AOlPen          EQU   $001B
  125. rp_Flags          EQU   $0020
  126. rp_TxWidth          EQU   $003C
  127. rp_AreaPtrn          EQU   $0008
  128. rp_AreaPtSz          EQU   $001D
  129. rp_SIZEOF          EQU   $0064
  130.  
  131. IO_COMMAND          EQU   $001C
  132. IOTV_TIME          EQU   $0020
  133. TV_SECS           EQU   $0000
  134. TV_MICRO          EQU   $0004
  135.  
  136. **** ExecBase ****
  137. eb_ThisTask          EQU   $0114
  138.  
  139. **** Process *****
  140. pr_MsgPort          EQU   $005c
  141. pr_CLI              EQU   $00ac
  142.  
  143. **** IntuitionBase ****
  144. ib_FirstScreen          EQU   $003C
  145. ib_ActiveScreen       EQU   $0038
  146. ib_ActiveWindow       EQU   $0034
  147.  
  148. **** IntuiMessage ****
  149. im_ExecMessage          EQU   $0000
  150. im_Class          EQU   $0014
  151. im_Code           EQU   $0018
  152. im_IDCMPWindow          EQU   $002C
  153. im_Seconds          EQU   $0024
  154. im_Micros          EQU   $0028
  155. im_SIZEOF          EQU   $0034
  156.  
  157. *** Message ****
  158. mn_Node           EQU   $0000
  159. mn_Length          EQU   $0012
  160. mn_ReplyPort          EQU   $000E
  161.  
  162. **** SignalSemaphore ****
  163. ss_Link           EQU   $0000
  164. ss_SIZEOF          EQU   $002e
  165.  
  166. **** Node ****
  167. ln_Type           EQU   $0008
  168. ln_Pri              EQU   $0009
  169. ln_Name           EQU   $000A
  170.  
  171. **** MsgPort ****
  172. mp_Node           EQU   $0000
  173. mp_Flags          EQU   $000E
  174. mp_SigBit          EQU   $000F
  175. mp_SigTask          EQU   $0010
  176. mp_SIZEOF          EQU   $0022
  177.  
  178. **** MenuItem ****
  179. mi_NextSelect          EQU   $0020
  180. mi_TopEdge          EQU   $0006
  181. mi_Height          EQU   $000A
  182. mi_LeftEdge          EQU   $0004
  183. mi_Width          EQU   $0008
  184. mi_ItemFill          EQU   $0012
  185. mi_SelectFill          EQU   $0016
  186. mi_Flags          EQU   $000C
  187. mi_SubItem          EQU   $001C
  188. mi_Command          EQU   $001A
  189. mi_MutualExclude      EQU   $000E
  190.  
  191. **** Menu ****
  192. mu_NextMenu          EQU   $0000
  193. mu_LeftEdge          EQU   $0004
  194. mu_Width          EQU   $0008
  195. mu_Flags          EQU   $000C
  196. mu_MenuName          EQU   $000E
  197. mu_FirstItem          EQU   $0012
  198.  
  199. **** BitMap ****
  200. bm_Depth          EQU   $0005
  201. bm_Planes          EQU   $0008
  202.  
  203. **** IntuiText ****
  204. it_LeftEdge          EQU   $0004
  205. it_TopEdge          EQU   $0006
  206. it_ITextFont          EQU   $0008
  207. it_IText          EQU   $000C
  208. it_NextText          EQU   $0010
  209.  
  210. **** Image ****
  211. ig_TopEdge          EQU   $0002
  212. ig_Width          EQU   $0004
  213. ig_Height          EQU   $0006
  214. ig_NextImage          EQU   $0010
  215. ig_SIZEOF          EQU   $0014
  216.  
  217. ta_YSize          EQU   $0004
  218.  
  219. ***** Remember ********
  220. rm_NextRemember       EQU   $0000
  221. rm_SIZEOF          EQU   $000c
  222.  
  223. IECLASS_MENULIST      EQU   $0A
  224. IECLASS_RAWMOUSE      EQU   $02
  225. IECLASS_RAWKEY          EQU   $01
  226.  
  227. MENUDOWN          EQU   $0069
  228. MENUUP              EQU   $00E9
  229. SELECTDOWN          EQU   $0068
  230. SELECTUP          EQU   $00E8
  231.  
  232. IEQUALIFIER_LSHIFT    EQU   $0001
  233. IEQUALIFIER_RSHIFT    EQU   $0002
  234. IEQUALIFIER_CONTROL   EQU   $0008
  235. IEQUALIFIER_LALT      EQU   $0010
  236. IEQUALIFIER_RALT      EQU   $0020
  237. IEQUALIFIER_LCOMMAND  EQU   $0040
  238. IEQUALIFIER_RCOMMAND  EQU   $0080
  239. IEQUALIFIER_MIDBUTTON EQU   $1000
  240. IEQUALIFIER_LEFTBUTTON      EQU    $4000
  241.  
  242. **** InputEvent ****
  243. ie_Class          EQU   $0004
  244. ie_Code           EQU   $0006
  245. ie_Qualifier          EQU   $0008
  246. ie_EventAddress       EQU   $000A
  247. ie_TimeStamp          EQU   $000E
  248. ie_SIZEOF          EQU   $16
  249.  
  250. **** interrupt *****
  251. is_Node           EQU   $0000
  252. is_Data           EQU   $000E
  253. is_Code           EQU   $0012
  254. is_SIZEOF          EQU   $0016
  255.  
  256. **** IoStdReq *****
  257. io_Message          EQU   $0000
  258. io_Command          EQU   $001C
  259. io_Data           EQU   $0028
  260. io_SIZEOF          EQU   $0030
  261.  
  262. **** timerrequest ****
  263. tr_Node           EQU   $0000
  264. tr_SIZEOF          EQU   $0028
  265.  
  266. ***** Workbench ********
  267. sm_ArgList          EQU   $0024
  268.  
  269. ***** Workbenchargs ****
  270. wa_Lock           EQU   $0000
  271. wa_Name           EQU   $0004
  272.  
  273. ***** Disk object *****
  274. do_ToolTypes          EQU   $0036
  275.  
  276. TR_ADDREQUEST          EQU   $0009
  277. IND_WRITEEVENT          EQU   $000B
  278.  
  279. IO_FLAGS          EQU   $001E
  280. IO_LENGTH          EQU   $0024
  281. IO_DATA           EQU   $0028
  282.  
  283. NOITEM              EQU   $003F
  284. RP_JAM1           EQU   $0000
  285. RP_COMPLEMENT          EQU   $0002
  286.  
  287. ABNC              EQU   $40
  288. ANBC              EQU   $20
  289.  
  290. ***** Window *********
  291. MENUSTATE          EQU   $8000
  292. MENUSTATEBIT          EQU   7
  293.  
  294. ***** Gadget *********
  295. STRGADGET          EQU   4
  296.  
  297. ***** MENUITEMS *********
  298. HIGHFLAGS          EQU   $00C0
  299. HIGHBOX           EQU   $0080
  300. HIGHCOMP          EQU   $0040
  301. ITEMTEXT          EQU   $0002
  302.  
  303. CHECKIT           EQU   $0001
  304. CHECKED           EQU   $0100
  305. COMMSEQ           EQU   $0004
  306. ITEMENABLED          EQU   $0010
  307.  
  308. ISDRAWN           EQU   $1000
  309. ISDRAWNBIT          EQU   $4
  310. HIGHITEM          EQU   $2000
  311. HIGHITEMBIT          EQU   $5
  312.  
  313. ******* Menu **********
  314. MENUTOGGLE          EQU   $0008
  315. MENUENABLED          EQU   $0001
  316.  
  317. MIDRAWN           EQU   $0100
  318. MIDRAWNBIT          EQU   $1
  319.  
  320. ***** MENUVERIFY *******
  321. MENUHOT           EQU   $0001
  322. MENUCANCEL          EQU   $0002
  323. MENUWAITING          EQU   $0003
  324.  
  325. NT_MESSAGE          EQU   $05
  326. NT_MSGPORT          EQU   $04
  327.  
  328. PA_SIGNAL          EQU   $00
  329.  
  330. IND_ADDHANDLER          EQU   $0009
  331.  
  332. IND_REMHANDLER          EQU   $000A
  333.  
  334. MEMF_PUBLIC          EQU   $00000001
  335. MEMF_CLEAR          EQU   $00010000
  336.  
  337. NEWOPTIONS          EQU   $0000
  338. GETOPTIONS          EQU   $0001
  339.  
  340. DEFAULTOPTIONS          EQU   $52
  341. DEFAULTHOTKEY          EQU   $19
  342.  
  343. SHOWSINGLEMENU          EQU   0
  344. SUBITEMPOINTER          EQU   1
  345. ITEMSCENTERED          EQU   2
  346. POPUPWITHQUAL          EQU   3
  347. POPUPNOQUAL          EQU   4
  348. CLICKMENUES          EQU   5
  349. OPENWINDOW          EQU   6
  350. EXIT              EQU   7
  351.  
  352.  
  353.            STRUCTURE  WindowData,0
  354.            BOOL      wwd_BitMapOk
  355.            BOOL      wwd_ItemsEnabled
  356.            WORD      wwd_LeftEdge
  357.            WORD      wwd_TopEdge
  358.            WORD      wwd_RightEdge
  359.            WORD      wwd_Bottom
  360.            WORD      wwd_Width
  361.            WORD      wwd_Height
  362.            WORD      wwd_TopValue
  363.            WORD      wwd_LeftValue
  364.            APTR      wwd_Items
  365.            APTR      wwd_Current
  366.            STRUCT      wwd_Bm,40
  367.            LABEL      wwd_SIZEOF
  368.  
  369.            STRUCTURE  WindowSize,0
  370.            WORD      ws_Left
  371.            WORD      ws_Top
  372.            WORD      ws_Right
  373.            WORD      ws_Bottom
  374.            LABEL      ws_SIZEOF
  375.  
  376.            STRUCTURE  SignalData,0
  377.            APTR      sd_PopUpMenuTask
  378.            ULONG      sd_MenuUpSig
  379.            ULONG      sd_MenuDownSig
  380.            ULONG      sd_MouseMovedSig
  381.            ULONG      sd_SelectDownSig
  382.            ULONG      sd_HotKeySig
  383.            BOOL      sd_Down
  384.            WORD      sd_EndQualifier
  385.            UBYTE      sd_Options
  386.            UBYTE      sd_HotKey
  387.            STRUCT      sd_Semaphore,ss_SIZEOF
  388.            LABEL      sd_SIZEOF
  389.  
  390.            STRUCTURE  MenuSort,0
  391.            APTR      ms_Next
  392.            APTR      ms_MenuPtr
  393.            LABEL      ms_SIZEOF
  394.  
  395.  
  396.            STRUCTURE  Globals,0
  397.            APTR      _SysBase
  398.            STRUCT      _SubWindow,wwd_SIZEOF
  399.            STRUCT      _ItemWindow,wwd_SIZEOF
  400.            STRUCT      _MenuWindow,wwd_SIZEOF
  401.            APTR      _DOSBase
  402.            APTR      _IntuitionBase
  403.            APTR      _GfxBase
  404.            APTR      _LayersBase
  405.            APTR      _WBenchMsg
  406.            BOOL      _Error
  407.            BYTE      _Options
  408.            BYTE      _HotKey
  409.            STRUCT      _Size,ws_SIZEOF
  410.            APTR      _TempItem
  411.            WORD      _CurrentMenuNr
  412.            WORD      _LastSelected
  413.            WORD      _MenuFontSize
  414.            WORD      _MouseX
  415.            WORD      _MouseY
  416.            APTR      _InputReqBlock
  417.            APTR      _TimerReqBlock
  418.            APTR      _TimerPort
  419.            LONG      _TimerSignal
  420.            APTR      _ReplyPort
  421.            APTR      _Menues
  422.            STRUCT      _SortRemember,rm_SIZEOF
  423.            STRUCT      _MenuSorted,ms_SIZEOF
  424.            APTR      _LastWindow
  425.            WORD      _LastSelectedNum
  426.            APTR      _Screen
  427.            BOOL      _ScreenType
  428.            STRUCT      _Rp,rp_SIZEOF
  429.            APTR      _ActiveWindow
  430.            LABEL      Globals_SIZEOF
  431.  
  432.