home *** CD-ROM | disk | FTP | other *** search
/ Apple Developer Connection 1998 Fall: Game Toolkit / Disc.iso / MPW / MPW-GM / Interfaces&Libraries / Interfaces / AIncludes / AERegistry.a < prev    next >
Encoding:
Text File  |  1998-02-17  |  26.9 KB  |  652 lines  |  [TEXT/MPS ]

  1. ;
  2. ;    File:        AERegistry.a
  3. ;
  4. ;    Contains:    AppleEvents Registry Interface.
  5. ;
  6. ;    Version:    Technology:    System 7.5
  7. ;                Release:    Universal Interfaces 3.1
  8. ;
  9. ;    Copyright:    © 1993-1998 by Apple Computer, Inc., all rights reserved
  10. ;
  11. ;    Bugs?:        Please include the the file and version information (from above) with
  12. ;                the problem description.  Developers belonging to one of the Apple
  13. ;                developer programs can submit bug reports to:
  14. ;
  15. ;                    devsupport@apple.com
  16. ;
  17. ;
  18.     IF &TYPE('__AEREGISTRY__') = 'UNDEFINED' THEN
  19. __AEREGISTRY__ SET 1
  20.  
  21.     IF &TYPE('__MACTYPES__') = 'UNDEFINED' THEN
  22.     include 'MacTypes.a'
  23.     ENDIF
  24.     IF &TYPE('__ERRORS__') = 'UNDEFINED' THEN
  25.     include 'Errors.a'
  26.     ENDIF
  27.     IF &TYPE('__APPLEEVENTS__') = 'UNDEFINED' THEN
  28.     include 'AppleEvents.a'
  29.     ENDIF
  30.     IF &TYPE('__QUICKDRAW__') = 'UNDEFINED' THEN
  31.     include 'Quickdraw.a'
  32.     ENDIF
  33.  
  34.  
  35. cAEList                            EQU        'list'                ;  0x6c697374  
  36. cApplication                    EQU        'capp'                ;  0x63617070  
  37. cArc                            EQU        'carc'                ;  0x63617263  
  38. cBoolean                        EQU        'bool'                ;  0x626f6f6c  
  39. cCell                            EQU        'ccel'                ;  0x6363656c  
  40. cChar                            EQU        'cha '                ;  0x63686120  
  41. cColorTable                        EQU        'clrt'                ;  0x636c7274  
  42. cColumn                            EQU        'ccol'                ;  0x63636f6c  
  43. cDocument                        EQU        'docu'                ;  0x646f6375  
  44. cDrawingArea                    EQU        'cdrw'                ;  0x63647277  
  45. cEnumeration                    EQU        'enum'                ;  0x656e756d  
  46. cFile                            EQU        'file'                ;  0x66696c65  
  47. cFixed                            EQU        'fixd'                ;  0x66697864  
  48. cFixedPoint                        EQU        'fpnt'                ;  0x66706e74  
  49. cFixedRectangle                    EQU        'frct'                ;  0x66726374  
  50. cGraphicLine                    EQU        'glin'                ;  0x676c696e  
  51. cGraphicObject                    EQU        'cgob'                ;  0x63676f62  
  52. cGraphicShape                    EQU        'cgsh'                ;  0x63677368  
  53. cGraphicText                    EQU        'cgtx'                ;  0x63677478  
  54. cGroupedGraphic                    EQU        'cpic'                ;  0x63706963  
  55.  
  56. cInsertionLoc                    EQU        'insl'                ;  0x696e736c  
  57. cInsertionPoint                    EQU        'cins'                ;  0x63696e73  
  58. cIntlText                        EQU        'itxt'                ;  0x69747874  
  59. cIntlWritingCode                EQU        'intl'                ;  0x696e746c  
  60. cItem                            EQU        'citm'                ;  0x6369746d  
  61. cLine                            EQU        'clin'                ;  0x636c696e  
  62. cLongDateTime                    EQU        'ldt '                ;  0x6c647420  
  63. cLongFixed                        EQU        'lfxd'                ;  0x6c667864  
  64. cLongFixedPoint                    EQU        'lfpt'                ;  0x6c667074  
  65. cLongFixedRectangle                EQU        'lfrc'                ;  0x6c667263  
  66. cLongInteger                    EQU        'long'                ;  0x6c6f6e67  
  67. cLongPoint                        EQU        'lpnt'                ;  0x6c706e74  
  68. cLongRectangle                    EQU        'lrct'                ;  0x6c726374  
  69. cMachineLoc                        EQU        'mLoc'                ;  0x6d4c6f63  
  70. cMenu                            EQU        'cmnu'                ;  0x636d6e75  
  71. cMenuItem                        EQU        'cmen'                ;  0x636d656e  
  72. cObject                            EQU        'cobj'                ;  0x636f626a  
  73. cObjectSpecifier                EQU        'obj '                ;  0x6f626a20  
  74. cOpenableObject                    EQU        'coob'                ;  0x636f6f62  
  75. cOval                            EQU        'covl'                ;  0x636f766c  
  76.  
  77. cParagraph                        EQU        'cpar'                ;  0x63706172  
  78. cPICT                            EQU        'PICT'                ;  0x50494354  
  79. cPixel                            EQU        'cpxl'                ;  0x6370786c  
  80. cPixelMap                        EQU        'cpix'                ;  0x63706978  
  81. cPolygon                        EQU        'cpgn'                ;  0x6370676e  
  82. cProperty                        EQU        'prop'                ;  0x70726f70  
  83. cQDPoint                        EQU        'QDpt'                ;  0x51447074  
  84. cQDRectangle                    EQU        'qdrt'                ;  0x71647274  
  85. cRectangle                        EQU        'crec'                ;  0x63726563  
  86. cRGBColor                        EQU        'cRGB'                ;  0x63524742  
  87. cRotation                        EQU        'trot'                ;  0x74726f74  
  88. cRoundedRectangle                EQU        'crrc'                ;  0x63727263  
  89. cRow                            EQU        'crow'                ;  0x63726f77  
  90. cSelection                        EQU        'csel'                ;  0x6373656c  
  91. cShortInteger                    EQU        'shor'                ;  0x73686f72  
  92. cTable                            EQU        'ctbl'                ;  0x6374626c  
  93. cText                            EQU        'ctxt'                ;  0x63747874  
  94. cTextFlow                        EQU        'cflo'                ;  0x63666c6f  
  95. cTextStyles                        EQU        'tsty'                ;  0x74737479  
  96. cType                            EQU        'type'                ;  0x74797065  
  97.  
  98. cVersion                        EQU        'vers'                ;  0x76657273  
  99. cWindow                            EQU        'cwin'                ;  0x6377696e  
  100. cWord                            EQU        'cwor'                ;  0x63776f72  
  101. enumArrows                        EQU        'arro'                ;  0x6172726f  
  102. enumJustification                EQU        'just'                ;  0x6a757374  
  103. enumKeyForm                        EQU        'kfrm'                ;  0x6b66726d  
  104. enumPosition                    EQU        'posi'                ;  0x706f7369  
  105. enumProtection                    EQU        'prtn'                ;  0x7072746e  
  106. enumQuality                        EQU        'qual'                ;  0x7175616c  
  107. enumSaveOptions                    EQU        'savo'                ;  0x7361766f  
  108. enumStyle                        EQU        'styl'                ;  0x7374796c  
  109. enumTransferMode                EQU        'tran'                ;  0x7472616e  
  110. formUniqueID                    EQU        'ID  '                ;  0x49442020  
  111. kAEAbout                        EQU        'abou'                ;  0x61626f75  
  112. kAEAfter                        EQU        'afte'                ;  0x61667465  
  113. kAEAliasSelection                EQU        'sali'                ;  0x73616c69  
  114. kAEAllCaps                        EQU        'alcp'                ;  0x616c6370  
  115. kAEArrowAtEnd                    EQU        'aren'                ;  0x6172656e  
  116. kAEArrowAtStart                    EQU        'arst'                ;  0x61727374  
  117. kAEArrowBothEnds                EQU        'arbo'                ;  0x6172626f  
  118.  
  119. kAEAsk                            EQU        'ask '                ;  0x61736b20  
  120. kAEBefore                        EQU        'befo'                ;  0x6265666f  
  121. kAEBeginning                    EQU        'bgng'                ;  0x62676e67  
  122. kAEBeginsWith                    EQU        'bgwt'                ;  0x62677774  
  123. kAEBeginTransaction                EQU        'begi'                ;  0x62656769  
  124. kAEBold                            EQU        'bold'                ;  0x626f6c64  
  125. kAECaseSensEquals                EQU        'cseq'                ;  0x63736571  
  126. kAECentered                        EQU        'cent'                ;  0x63656e74  
  127. kAEChangeView                    EQU        'view'                ;  0x76696577  
  128. kAEClone                        EQU        'clon'                ;  0x636c6f6e  
  129. kAEClose                        EQU        'clos'                ;  0x636c6f73  
  130. kAECondensed                    EQU        'cond'                ;  0x636f6e64  
  131. kAEContains                        EQU        'cont'                ;  0x636f6e74  
  132. kAECopy                            EQU        'copy'                ;  0x636f7079  
  133. kAECoreSuite                    EQU        'core'                ;  0x636f7265  
  134. kAECountElements                EQU        'cnte'                ;  0x636e7465  
  135. kAECreateElement                EQU        'crel'                ;  0x6372656c  
  136. kAECreatePublisher                EQU        'cpub'                ;  0x63707562  
  137. kAECut                            EQU        'cut '                ;  0x63757420  
  138. kAEDelete                        EQU        'delo'                ;  0x64656c6f  
  139.  
  140. kAEDoObjectsExist                EQU        'doex'                ;  0x646f6578  
  141. kAEDoScript                        EQU        'dosc'                ;  0x646f7363  
  142. kAEDrag                            EQU        'drag'                ;  0x64726167  
  143. kAEDuplicateSelection            EQU        'sdup'                ;  0x73647570  
  144. kAEEditGraphic                    EQU        'edit'                ;  0x65646974  
  145. kAEEmptyTrash                    EQU        'empt'                ;  0x656d7074  
  146. kAEEnd                            EQU        'end '                ;  0x656e6420  
  147. kAEEndsWith                        EQU        'ends'                ;  0x656e6473  
  148. kAEEndTransaction                EQU        'endt'                ;  0x656e6474  
  149. kAEEquals                        EQU        '=   '                ;  0x3d202020  
  150. kAEExpanded                        EQU        'pexp'                ;  0x70657870  
  151. kAEFast                            EQU        'fast'                ;  0x66617374  
  152. kAEFinderEvents                    EQU        'FNDR'                ;  0x464e4452  
  153. kAEFormulaProtect                EQU        'fpro'                ;  0x6670726f  
  154. kAEFullyJustified                EQU        'full'                ;  0x66756c6c  
  155. kAEGetClassInfo                    EQU        'qobj'                ;  0x716f626a  
  156. kAEGetData                        EQU        'getd'                ;  0x67657464  
  157. kAEGetDataSize                    EQU        'dsiz'                ;  0x6473697a  
  158. kAEGetEventInfo                    EQU        'gtei'                ;  0x67746569  
  159. kAEGetInfoSelection                EQU        'sinf'                ;  0x73696e66  
  160.  
  161. kAEGetPrivilegeSelection        EQU        'sprv'                ;  0x73707276  
  162. kAEGetSuiteInfo                    EQU        'gtsi'                ;  0x67747369  
  163. kAEGreaterThan                    EQU        '>   '                ;  0x3e202020  
  164. kAEGreaterThanEquals            EQU        '>=  '                ;  0x3e3d2020  
  165. kAEGrow                            EQU        'grow'                ;  0x67726f77  
  166. kAEHidden                        EQU        'hidn'                ;  0x6869646e  
  167. kAEHiQuality                    EQU        'hiqu'                ;  0x68697175  
  168. kAEImageGraphic                    EQU        'imgr'                ;  0x696d6772  
  169. kAEIsUniform                    EQU        'isun'                ;  0x6973756e  
  170. kAEItalic                        EQU        'ital'                ;  0x6974616c  
  171. kAELeftJustified                EQU        'left'                ;  0x6c656674  
  172. kAELessThan                        EQU        '<   '                ;  0x3c202020  
  173. kAELessThanEquals                EQU        '<=  '                ;  0x3c3d2020  
  174. kAELowercase                    EQU        'lowc'                ;  0x6c6f7763  
  175. kAEMakeObjectsVisible            EQU        'mvis'                ;  0x6d766973  
  176. kAEMiscStandards                EQU        'misc'                ;  0x6d697363  
  177. kAEModifiable                    EQU        'modf'                ;  0x6d6f6466  
  178. kAEMove                            EQU        'move'                ;  0x6d6f7665  
  179. kAENo                            EQU        'no  '                ;  0x6e6f2020  
  180. kAENoArrow                        EQU        'arno'                ;  0x61726e6f  
  181.  
  182. kAENonmodifiable                EQU        'nmod'                ;  0x6e6d6f64  
  183. kAEOpen                            EQU        'odoc'                ;  0x6f646f63  
  184. kAEOpenSelection                EQU        'sope'                ;  0x736f7065  
  185. kAEOutline                        EQU        'outl'                ;  0x6f75746c  
  186. kAEPageSetup                    EQU        'pgsu'                ;  0x70677375  
  187. kAEPaste                        EQU        'past'                ;  0x70617374  
  188. kAEPlain                        EQU        'plan'                ;  0x706c616e  
  189. kAEPrint                        EQU        'pdoc'                ;  0x70646f63  
  190. kAEPrintSelection                EQU        'spri'                ;  0x73707269  
  191. kAEPrintWindow                    EQU        'pwin'                ;  0x7077696e  
  192. kAEPutAwaySelection                EQU        'sput'                ;  0x73707574  
  193. kAEQDAddOver                    EQU        'addo'                ;  0x6164646f  
  194. kAEQDAddPin                        EQU        'addp'                ;  0x61646470  
  195. kAEQDAdMax                        EQU        'admx'                ;  0x61646d78  
  196. kAEQDAdMin                        EQU        'admn'                ;  0x61646d6e  
  197. kAEQDBic                        EQU        'bic '                ;  0x62696320  
  198. kAEQDBlend                        EQU        'blnd'                ;  0x626c6e64  
  199. kAEQDCopy                        EQU        'cpy '                ;  0x63707920  
  200. kAEQDNotBic                        EQU        'nbic'                ;  0x6e626963  
  201. kAEQDNotCopy                    EQU        'ncpy'                ;  0x6e637079  
  202.  
  203. kAEQDNotOr                        EQU        'ntor'                ;  0x6e746f72  
  204. kAEQDNotXor                        EQU        'nxor'                ;  0x6e786f72  
  205. kAEQDOr                            EQU        'or  '                ;  0x6f722020  
  206. kAEQDSubOver                    EQU        'subo'                ;  0x7375626f  
  207. kAEQDSubPin                        EQU        'subp'                ;  0x73756270  
  208. kAEQDSupplementalSuite            EQU        'qdsp'                ;  0x71647370  
  209. kAEQDXor                        EQU        'xor '                ;  0x786f7220  
  210. kAEQuickdrawSuite                EQU        'qdrw'                ;  0x71647277  
  211. kAEQuitAll                        EQU        'quia'                ;  0x71756961  
  212. kAERedo                            EQU        'redo'                ;  0x7265646f  
  213. kAERegular                        EQU        'regl'                ;  0x7265676c  
  214. kAEReopenApplication            EQU        'rapp'                ;  0x72617070  
  215. kAEReplace                        EQU        'rplc'                ;  0x72706c63  
  216. kAERequiredSuite                EQU        'reqd'                ;  0x72657164  
  217. kAERestart                        EQU        'rest'                ;  0x72657374  
  218. kAERevealSelection                EQU        'srev'                ;  0x73726576  
  219. kAERevert                        EQU        'rvrt'                ;  0x72767274  
  220. kAERightJustified                EQU        'rght'                ;  0x72676874  
  221. kAESave                            EQU        'save'                ;  0x73617665  
  222. kAESelect                        EQU        'slct'                ;  0x736c6374  
  223. kAESetData                        EQU        'setd'                ;  0x73657464  
  224.  
  225. kAESetPosition                    EQU        'posn'                ;  0x706f736e  
  226. kAEShadow                        EQU        'shad'                ;  0x73686164  
  227. kAEShowClipboard                EQU        'shcl'                ;  0x7368636c  
  228. kAEShutDown                        EQU        'shut'                ;  0x73687574  
  229. kAESleep                        EQU        'slep'                ;  0x736c6570  
  230. kAESmallCaps                    EQU        'smcp'                ;  0x736d6370  
  231. kAESpecialClassProperties        EQU        'c@#!'                ;  0x63402321  
  232. kAEStrikethrough                EQU        'strk'                ;  0x7374726b  
  233. kAESubscript                    EQU        'sbsc'                ;  0x73627363  
  234. kAESuperscript                    EQU        'spsc'                ;  0x73707363  
  235. kAETableSuite                    EQU        'tbls'                ;  0x74626c73  
  236. kAETextSuite                    EQU        'TEXT'                ;  0x54455854  
  237. kAETransactionTerminated        EQU        'ttrm'                ;  0x7474726d  
  238. kAEUnderline                    EQU        'undl'                ;  0x756e646c  
  239. kAEUndo                            EQU        'undo'                ;  0x756e646f  
  240. kAEWholeWordEquals                EQU        'wweq'                ;  0x77776571  
  241. kAEYes                            EQU        'yes '                ;  0x79657320  
  242. kAEZoom                            EQU        'zoom'                ;  0x7a6f6f6d  
  243. ;  EventRecord Classes and EventIDs 
  244.  
  245. kAEMouseClass                    EQU        'mous'
  246. kAEDown                            EQU        'down'
  247. kAEUp                            EQU        'up  '
  248. kAEMoved                        EQU        'move'
  249. kAEStoppedMoving                EQU        'stop'
  250. kAEWindowClass                    EQU        'wind'
  251. kAEUpdate                        EQU        'updt'
  252. kAEActivate                        EQU        'actv'
  253. kAEDeactivate                    EQU        'dact'
  254. kAECommandClass                    EQU        'cmnd'                ; Modern Command Event Class 
  255. kAEKeyClass                        EQU        'keyc'
  256. kAERawKey                        EQU        'rkey'                ; Modern Raw Key Event 
  257. kAEVirtualKey                    EQU        'keyc'                ; Modern Virtual Key Event 
  258. kAENavigationKey                EQU        'nave'                ; Modern Navigation Key Event 
  259. kAEAutoDown                        EQU        'auto'
  260. kAEApplicationClass                EQU        'appl'
  261. kAESuspend                        EQU        'susp'
  262. kAEResume                        EQU        'rsme'
  263. kAEDiskEvent                    EQU        'disk'
  264. kAENullEvent                    EQU        'null'
  265. kAEWakeUpEvent                    EQU        'wake'
  266. kAEScrapEvent                    EQU        'scrp'
  267. kAEHighLevel                    EQU        'high'
  268.  
  269. keyAEAngle                        EQU        'kang'                ;  0x6b616e67  
  270. keyAEArcAngle                    EQU        'parc'                ;  0x70617263  
  271.  
  272. keyAEBaseAddr                    EQU        'badd'                ;  0x62616464  
  273. keyAEBestType                    EQU        'pbst'                ;  0x70627374  
  274. keyAEBgndColor                    EQU        'kbcl'                ;  0x6b62636c  
  275. keyAEBgndPattern                EQU        'kbpt'                ;  0x6b627074  
  276. keyAEBounds                        EQU        'pbnd'                ;  0x70626e64  
  277. keyAECellList                    EQU        'kclt'                ;  0x6b636c74  
  278. keyAEClassID                    EQU        'clID'                ;  0x636c4944  
  279. keyAEColor                        EQU        'colr'                ;  0x636f6c72  
  280. keyAEColorTable                    EQU        'cltb'                ;  0x636c7462  
  281. keyAECurveHeight                EQU        'kchd'                ;  0x6b636864  
  282. keyAECurveWidth                    EQU        'kcwd'                ;  0x6b637764  
  283. keyAEDashStyle                    EQU        'pdst'                ;  0x70647374  
  284. keyAEData                        EQU        'data'                ;  0x64617461  
  285. keyAEDefaultType                EQU        'deft'                ;  0x64656674  
  286. keyAEDefinitionRect                EQU        'pdrt'                ;  0x70647274  
  287. keyAEDescType                    EQU        'dstp'                ;  0x64737470  
  288. keyAEDestination                EQU        'dest'                ;  0x64657374  
  289. keyAEDoAntiAlias                EQU        'anta'                ;  0x616e7461  
  290. keyAEDoDithered                    EQU        'gdit'                ;  0x67646974  
  291. keyAEDoRotate                    EQU        'kdrt'                ;  0x6b647274  
  292.  
  293. keyAEDoScale                    EQU        'ksca'                ;  0x6b736361  
  294. keyAEDoTranslate                EQU        'ktra'                ;  0x6b747261  
  295. keyAEEditionFileLoc                EQU        'eloc'                ;  0x656c6f63  
  296. keyAEElements                    EQU        'elms'                ;  0x656c6d73  
  297. keyAEEndPoint                    EQU        'pend'                ;  0x70656e64  
  298. keyAEEventClass                    EQU        'evcl'                ;  0x6576636c  
  299. keyAEEventID                    EQU        'evti'                ;  0x65767469  
  300. keyAEFile                        EQU        'kfil'                ;  0x6b66696c  
  301. keyAEFileType                    EQU        'fltp'                ;  0x666c7470  
  302. keyAEFillColor                    EQU        'flcl'                ;  0x666c636c  
  303. keyAEFillPattern                EQU        'flpt'                ;  0x666c7074  
  304. keyAEFlipHorizontal                EQU        'kfho'                ;  0x6b66686f  
  305. keyAEFlipVertical                EQU        'kfvt'                ;  0x6b667674  
  306. keyAEFont                        EQU        'font'                ;  0x666f6e74  
  307. keyAEFormula                    EQU        'pfor'                ;  0x70666f72  
  308. keyAEGraphicObjects                EQU        'gobs'                ;  0x676f6273  
  309. keyAEID                            EQU        'ID  '                ;  0x49442020  
  310. keyAEImageQuality                EQU        'gqua'                ;  0x67717561  
  311. keyAEInsertHere                    EQU        'insh'                ;  0x696e7368  
  312. keyAEKeyForms                    EQU        'keyf'                ;  0x6b657966  
  313.  
  314. keyAEKeyword                    EQU        'kywd'                ;  0x6b797764  
  315. keyAELevel                        EQU        'levl'                ;  0x6c65766c  
  316. keyAELineArrow                    EQU        'arro'                ;  0x6172726f  
  317. keyAEName                        EQU        'pnam'                ;  0x706e616d  
  318. keyAENewElementLoc                EQU        'pnel'                ;  0x706e656c  
  319. keyAEObject                        EQU        'kobj'                ;  0x6b6f626a  
  320. keyAEObjectClass                EQU        'kocl'                ;  0x6b6f636c  
  321. keyAEOffStyles                    EQU        'ofst'                ;  0x6f667374  
  322. keyAEOnStyles                    EQU        'onst'                ;  0x6f6e7374  
  323. keyAEParameters                    EQU        'prms'                ;  0x70726d73  
  324. keyAEParamFlags                    EQU        'pmfg'                ;  0x706d6667  
  325. keyAEPenColor                    EQU        'ppcl'                ;  0x7070636c  
  326. keyAEPenPattern                    EQU        'pppa'                ;  0x70707061  
  327. keyAEPenWidth                    EQU        'ppwd'                ;  0x70707764  
  328. keyAEPixelDepth                    EQU        'pdpt'                ;  0x70647074  
  329. keyAEPixMapMinus                EQU        'kpmm'                ;  0x6b706d6d  
  330. keyAEPMTable                    EQU        'kpmt'                ;  0x6b706d74  
  331. keyAEPointList                    EQU        'ptlt'                ;  0x70746c74  
  332. keyAEPointSize                    EQU        'ptsz'                ;  0x7074737a  
  333. keyAEPosition                    EQU        'kpos'                ;  0x6b706f73  
  334.  
  335. keyAEPropData                    EQU        'prdt'                ;  0x70726474  
  336. keyAEProperties                    EQU        'qpro'                ;  0x7170726f  
  337. keyAEProperty                    EQU        'kprp'                ;  0x6b707270  
  338. keyAEPropFlags                    EQU        'prfg'                ;  0x70726667  
  339. keyAEPropID                        EQU        'prop'                ;  0x70726f70  
  340. keyAEProtection                    EQU        'ppro'                ;  0x7070726f  
  341. keyAERenderAs                    EQU        'kren'                ;  0x6b72656e  
  342. keyAERequestedType                EQU        'rtyp'                ;  0x72747970  
  343. keyAEResult                        EQU        '----'                ;  0x2d2d2d2d  
  344. keyAEResultInfo                    EQU        'rsin'                ;  0x7273696e  
  345. keyAERotation                    EQU        'prot'                ;  0x70726f74  
  346. keyAERotPoint                    EQU        'krtp'                ;  0x6b727470  
  347. keyAERowList                    EQU        'krls'                ;  0x6b726c73  
  348. keyAESaveOptions                EQU        'savo'                ;  0x7361766f  
  349. keyAEScale                        EQU        'pscl'                ;  0x7073636c  
  350. keyAEScriptTag                    EQU        'psct'                ;  0x70736374  
  351. keyAEShowWhere                    EQU        'show'                ;  0x73686f77  
  352. keyAEStartAngle                    EQU        'pang'                ;  0x70616e67  
  353. keyAEStartPoint                    EQU        'pstp'                ;  0x70737470  
  354. keyAEStyles                        EQU        'ksty'                ;  0x6b737479  
  355.  
  356. keyAESuiteID                    EQU        'suit'                ;  0x73756974  
  357. keyAEText                        EQU        'ktxt'                ;  0x6b747874  
  358. keyAETextColor                    EQU        'ptxc'                ;  0x70747863  
  359. keyAETextFont                    EQU        'ptxf'                ;  0x70747866  
  360. keyAETextPointSize                EQU        'ptps'                ;  0x70747073  
  361. keyAETextStyles                    EQU        'txst'                ;  0x74787374  
  362. keyAETextLineHeight                EQU        'ktlh'                ; type ShortInteger 
  363. keyAETextLineAscent                EQU        'ktas'                ; type ShortInteger 
  364. keyAETheText                    EQU        'thtx'                ;  0x74687478  
  365. keyAETransferMode                EQU        'pptm'                ;  0x7070746d  
  366. keyAETranslation                EQU        'ptrs'                ;  0x70747273  
  367. keyAETryAsStructGraf            EQU        'toog'                ;  0x746f6f67  
  368. keyAEUniformStyles                EQU        'ustl'                ;  0x7573746c  
  369. keyAEUpdateOn                    EQU        'pupd'                ;  0x70757064  
  370. keyAEUserTerm                    EQU        'utrm'                ;  0x7574726d  
  371. keyAEWindow                        EQU        'wndw'                ;  0x776e6477  
  372. keyAEWritingCode                EQU        'wrcd'                ;  0x77726364  
  373.  
  374. keyMiscellaneous                EQU        'fmsc'                ;  0x666d7363  
  375. keySelection                    EQU        'fsel'                ;  0x6673656c  
  376. keyWindow                        EQU        'kwnd'                ;  0x6b776e64  
  377.                                                             ; EventRecord keys 
  378. keyWhen                            EQU        'when'
  379. keyWhere                        EQU        'wher'
  380. keyModifiers                    EQU        'mods'
  381. keyKey                            EQU        'key '
  382. keyKeyCode                        EQU        'code'
  383. keyKeyboard                        EQU        'keyb'
  384. keyDriveNumber                    EQU        'drv#'
  385. keyErrorCode                    EQU        'err#'
  386. keyHighLevelClass                EQU        'hcls'
  387. keyHighLevelID                    EQU        'hid '
  388.  
  389. pArcAngle                        EQU        'parc'                ;  0x70617263  
  390. pBackgroundColor                EQU        'pbcl'                ;  0x7062636c  
  391. pBackgroundPattern                EQU        'pbpt'                ;  0x70627074  
  392. pBestType                        EQU        'pbst'                ;  0x70627374  
  393. pBounds                            EQU        'pbnd'                ;  0x70626e64  
  394. pClass                            EQU        'pcls'                ;  0x70636c73  
  395. pClipboard                        EQU        'pcli'                ;  0x70636c69  
  396. pColor                            EQU        'colr'                ;  0x636f6c72  
  397. pColorTable                        EQU        'cltb'                ;  0x636c7462  
  398. pContents                        EQU        'pcnt'                ;  0x70636e74  
  399. pCornerCurveHeight                EQU        'pchd'                ;  0x70636864  
  400. pCornerCurveWidth                EQU        'pcwd'                ;  0x70637764  
  401. pDashStyle                        EQU        'pdst'                ;  0x70647374  
  402. pDefaultType                    EQU        'deft'                ;  0x64656674  
  403. pDefinitionRect                    EQU        'pdrt'                ;  0x70647274  
  404. pEnabled                        EQU        'enbl'                ;  0x656e626c  
  405. pEndPoint                        EQU        'pend'                ;  0x70656e64  
  406. pFillColor                        EQU        'flcl'                ;  0x666c636c  
  407. pFillPattern                    EQU        'flpt'                ;  0x666c7074  
  408. pFont                            EQU        'font'                ;  0x666f6e74  
  409.  
  410. pFormula                        EQU        'pfor'                ;  0x70666f72  
  411. pGraphicObjects                    EQU        'gobs'                ;  0x676f6273  
  412. pHasCloseBox                    EQU        'hclb'                ;  0x68636c62  
  413. pHasTitleBar                    EQU        'ptit'                ;  0x70746974  
  414. pID                                EQU        'ID  '                ;  0x49442020  
  415. pIndex                            EQU        'pidx'                ;  0x70696478  
  416. pInsertionLoc                    EQU        'pins'                ;  0x70696e73  
  417. pIsFloating                        EQU        'isfl'                ;  0x6973666c  
  418. pIsFrontProcess                    EQU        'pisf'                ;  0x70697366  
  419. pIsModal                        EQU        'pmod'                ;  0x706d6f64  
  420. pIsModified                        EQU        'imod'                ;  0x696d6f64  
  421. pIsResizable                    EQU        'prsz'                ;  0x7072737a  
  422. pIsStationeryPad                EQU        'pspd'                ;  0x70737064  
  423. pIsZoomable                        EQU        'iszm'                ;  0x69737a6d  
  424. pIsZoomed                        EQU        'pzum'                ;  0x707a756d  
  425. pItemNumber                        EQU        'itmn'                ;  0x69746d6e  
  426. pJustification                    EQU        'pjst'                ;  0x706a7374  
  427. pLineArrow                        EQU        'arro'                ;  0x6172726f  
  428. pMenuID                            EQU        'mnid'                ;  0x6d6e6964  
  429. pName                            EQU        'pnam'                ;  0x706e616d  
  430.  
  431. pNewElementLoc                    EQU        'pnel'                ;  0x706e656c  
  432. pPenColor                        EQU        'ppcl'                ;  0x7070636c  
  433. pPenPattern                        EQU        'pppa'                ;  0x70707061  
  434. pPenWidth                        EQU        'ppwd'                ;  0x70707764  
  435. pPixelDepth                        EQU        'pdpt'                ;  0x70647074  
  436. pPointList                        EQU        'ptlt'                ;  0x70746c74  
  437. pPointSize                        EQU        'ptsz'                ;  0x7074737a  
  438. pProtection                        EQU        'ppro'                ;  0x7070726f  
  439. pRotation                        EQU        'prot'                ;  0x70726f74  
  440. pScale                            EQU        'pscl'                ;  0x7073636c  
  441. pScript                            EQU        'scpt'                ;  0x73637074  
  442. pScriptTag                        EQU        'psct'                ;  0x70736374  
  443. pSelected                        EQU        'selc'                ;  0x73656c63  
  444. pSelection                        EQU        'sele'                ;  0x73656c65  
  445. pStartAngle                        EQU        'pang'                ;  0x70616e67  
  446. pStartPoint                        EQU        'pstp'                ;  0x70737470  
  447. pTextColor                        EQU        'ptxc'                ;  0x70747863  
  448. pTextFont                        EQU        'ptxf'                ;  0x70747866  
  449. pTextItemDelimiters                EQU        'txdl'                ;  0x7478646c  
  450. pTextPointSize                    EQU        'ptps'                ;  0x70747073  
  451.  
  452. pTextStyles                        EQU        'txst'                ;  0x74787374  
  453. pTransferMode                    EQU        'pptm'                ;  0x7070746d  
  454. pTranslation                    EQU        'ptrs'                ;  0x70747273  
  455. pUniformStyles                    EQU        'ustl'                ;  0x7573746c  
  456. pUpdateOn                        EQU        'pupd'                ;  0x70757064  
  457. pUserSelection                    EQU        'pusl'                ;  0x7075736c  
  458. pVersion                        EQU        'vers'                ;  0x76657273  
  459. pVisible                        EQU        'pvis'                ;  0x70766973  
  460.  
  461. typeAEText                        EQU        'tTXT'                ;  0x74545854  
  462. typeArc                            EQU        'carc'                ;  0x63617263  
  463. typeBest                        EQU        'best'                ;  0x62657374  
  464. typeCell                        EQU        'ccel'                ;  0x6363656c  
  465. typeClassInfo                    EQU        'gcli'                ;  0x67636c69  
  466. typeColorTable                    EQU        'clrt'                ;  0x636c7274  
  467. typeColumn                        EQU        'ccol'                ;  0x63636f6c  
  468. typeDashStyle                    EQU        'tdas'                ;  0x74646173  
  469. typeData                        EQU        'tdta'                ;  0x74647461  
  470. typeDrawingArea                    EQU        'cdrw'                ;  0x63647277  
  471. typeElemInfo                    EQU        'elin'                ;  0x656c696e  
  472. typeEnumeration                    EQU        'enum'                ;  0x656e756d  
  473. typeEPS                            EQU        'EPS '                ;  0x45505320  
  474. typeEventInfo                    EQU        'evin'                ;  0x6576696e  
  475.  
  476. typeFinderWindow                EQU        'fwin'                ;  0x6677696e  
  477. typeFixedPoint                    EQU        'fpnt'                ;  0x66706e74  
  478. typeFixedRectangle                EQU        'frct'                ;  0x66726374  
  479. typeGraphicLine                    EQU        'glin'                ;  0x676c696e  
  480. typeGraphicText                    EQU        'cgtx'                ;  0x63677478  
  481. typeGroupedGraphic                EQU        'cpic'                ;  0x63706963  
  482. typeInsertionLoc                EQU        'insl'                ;  0x696e736c  
  483. typeIntlText                    EQU        'itxt'                ;  0x69747874  
  484. typeIntlWritingCode                EQU        'intl'                ;  0x696e746c  
  485. typeLongDateTime                EQU        'ldt '                ;  0x6c647420  
  486. typeLongFixed                    EQU        'lfxd'                ;  0x6c667864  
  487. typeLongFixedPoint                EQU        'lfpt'                ;  0x6c667074  
  488. typeLongFixedRectangle            EQU        'lfrc'                ;  0x6c667263  
  489. typeLongPoint                    EQU        'lpnt'                ;  0x6c706e74  
  490. typeLongRectangle                EQU        'lrct'                ;  0x6c726374  
  491. typeMachineLoc                    EQU        'mLoc'                ;  0x6d4c6f63  
  492. typeOval                        EQU        'covl'                ;  0x636f766c  
  493. typeParamInfo                    EQU        'pmin'                ;  0x706d696e  
  494. typePict                        EQU        'PICT'                ;  0x50494354  
  495.  
  496. typePixelMap                    EQU        'cpix'                ;  0x63706978  
  497. typePixMapMinus                    EQU        'tpmm'                ;  0x74706d6d  
  498. typePolygon                        EQU        'cpgn'                ;  0x6370676e  
  499. typePropInfo                    EQU        'pinf'                ;  0x70696e66  
  500. typeQDPoint                        EQU        'QDpt'                ;  0x51447074  
  501. typeQDRegion                    EQU        'Qrgn'                ;  0x51447074  (data is actual region data, including rectangle and size, _not_ region handle or ptr)
  502. typeRectangle                    EQU        'crec'                ;  0x63726563  
  503. typeRGB16                        EQU        'tr16'                ;  0x74723136  
  504. typeRGB96                        EQU        'tr96'                ;  0x74723936  
  505. typeRGBColor                    EQU        'cRGB'                ;  0x63524742  
  506. typeRotation                    EQU        'trot'                ;  0x74726f74  
  507. typeRoundedRectangle            EQU        'crrc'                ;  0x63727263  
  508. typeRow                            EQU        'crow'                ;  0x63726f77  
  509. typeScrapStyles                    EQU        'styl'                ;  0x7374796c  
  510. typeScript                        EQU        'scpt'                ;  0x73637074  
  511. typeStyledText                    EQU        'STXT'                ;  0x53545854  
  512. typeSuiteInfo                    EQU        'suin'                ;  0x7375696e  
  513. typeTable                        EQU        'ctbl'                ;  0x6374626c  
  514. typeTextStyles                    EQU        'tsty'                ;  0x74737479  
  515.  
  516. typeTIFF                        EQU        'TIFF'                ;  0x54494646  
  517. typeVersion                        EQU        'vers'                ;  0x76657273  
  518.  
  519. kAEMenuClass                    EQU        'menu'
  520. kAEMenuSelect                    EQU        'mhit'
  521. kAEMouseDown                    EQU        'mdwn'
  522. kAEMouseDownInBack                EQU        'mdbk'
  523. kAEKeyDown                        EQU        'kdwn'
  524. kAEResized                        EQU        'rsiz'
  525. kAEPromise                        EQU        'prom'
  526.  
  527. keyMenuID                        EQU        'mid '
  528. keyMenuItem                        EQU        'mitm'
  529. keyCloseAllWindows                EQU        'caw '
  530. keyOriginalBounds                EQU        'obnd'
  531. keyNewBounds                    EQU        'nbnd'
  532. keyLocalWhere                    EQU        'lwhr'
  533.  
  534. typeHIMenu                        EQU        'mobj'
  535. typeHIWindow                    EQU        'wobj'
  536.  
  537. kBySmallIcon                    EQU        0
  538. kByIconView                        EQU        1
  539. kByNameView                        EQU        2
  540. kByDateView                        EQU        3
  541. kBySizeView                        EQU        4
  542. kByKindView                        EQU        5
  543. kByCommentView                    EQU        6
  544. kByLabelView                    EQU        7
  545. kByVersionView                    EQU        8
  546.  
  547. kAEInfo                            EQU        11
  548. kAEMain                            EQU        0
  549. kAESharing                        EQU        13
  550.  
  551. kAEZoomIn                        EQU        7
  552. kAEZoomOut                        EQU        8
  553.  
  554. kTextServiceClass                EQU        'tsvc'
  555. kUpdateActiveInputArea            EQU        'updt'                ; update the active input area 
  556. kShowHideInputWindow            EQU        'shiw'                ; show or hide the input window 
  557. kPos2Offset                        EQU        'p2st'                ; converting global coordinates to char position 
  558. kOffset2Pos                        EQU        'st2p'                ; converting char position to global coordinates 
  559. keyAETSMDocumentRefcon            EQU        'refc'                ; TSM document refcon, typeLongInteger 
  560. keyAEServerInstance                EQU        'srvi'                ; component instance 
  561. keyAETheData                    EQU        'kdat'                ; typeText 
  562. keyAEFixLength                    EQU        'fixl'                ; fix len ?? 
  563. keyAEUpdateRange                EQU        'udng'                ; typeTextRangeArray 
  564. keyAECurrentPoint                EQU        'cpos'                ; current point 
  565. keyAEBufferSize                    EQU        'buff'                ; buffer size to get the text 
  566. keyAEMoveView                    EQU        'mvvw'                ; move view flag 
  567. keyAENextBody                    EQU        'nxbd'                ; next or previous body 
  568. keyAETSMScriptTag                EQU        'sclg'
  569. keyAETSMTextFont                EQU        'ktxf'
  570. keyAETSMTextPointSize            EQU        'ktps'
  571. typeTextRange                    EQU        'txrn'                ; TextRange 
  572. typeComponentInstance            EQU        'cmpi'                ; server instance 
  573. typeOffsetArray                    EQU        'ofay'                ; offset array 
  574. typeTextRangeArray                EQU        'tray'
  575. typeText                        EQU        'TEXT'                ; Plain text 
  576.  
  577. ;  Desc type constants 
  578.  
  579. kTSMOutsideOfBody                EQU        1
  580. kTSMInsideOfBody                EQU        2
  581. kTSMInsideOfActiveInputArea        EQU        3
  582.  
  583. kNextBody                        EQU        1
  584. kPreviousBody                    EQU        2
  585. TextRange                RECORD 0
  586. fStart                     ds.l    1                ; offset: $0 (0)
  587. fEnd                     ds.l    1                ; offset: $4 (4)
  588. fHiliteStyle             ds.w    1                ; offset: $8 (8)
  589. sizeof                     EQU *                    ; size:   $A (10)
  590.                         ENDR
  591. ; typedef struct TextRange *            TextRangePtr
  592.  
  593. ; typedef TextRangePtr *                TextRangeHandle
  594.  
  595. TextRangeArray            RECORD 0
  596. fNumOfRanges             ds.w    1                ; offset: $0 (0)        ;  specify the size of the fRange array 
  597. fRange                     ds        TextRange        ; offset: $2 (2) <-- really an array of length one ;  when fNumOfRanges > 1, the size of this array has to be calculated 
  598. sizeof                     EQU *                    ; size:   $C (12)
  599.                         ENDR
  600. ; typedef struct TextRangeArray *        TextRangeArrayPtr
  601.  
  602. ; typedef TextRangeArrayPtr *            TextRangeArrayHandle
  603.  
  604. OffsetArray                RECORD 0
  605. fNumOfOffsets             ds.w    1                ; offset: $0 (0)        ;  specify the size of the fOffset array 
  606. fOffset                     ds.l    1                ; offset: $2 (2) <-- really an array of length one ;  when fNumOfOffsets > 1, the size of this array has to be calculated 
  607. sizeof                     EQU *                    ; size:   $6 (6)
  608.                         ENDR
  609. ; typedef struct OffsetArray *            OffsetArrayPtr
  610.  
  611. ; typedef OffsetArrayPtr *                OffsetArrayHandle
  612.  
  613. WritingCode                RECORD 0
  614. theScriptCode             ds.w    1                ; offset: $0 (0)
  615. theLangCode                 ds.w    1                ; offset: $2 (2)
  616. sizeof                     EQU *                    ; size:   $4 (4)
  617.                         ENDR
  618. IntlText                RECORD 0
  619. theScriptCode             ds.w    1                ; offset: $0 (0)
  620. theLangCode                 ds.w    1                ; offset: $2 (2)
  621. theText                     ds.b    1                ; offset: $4 (4) <-- really an array of length one ;  variable length data 
  622.                          ORG 6
  623. sizeof                     EQU *                    ; size:   $6 (6)
  624.                         ENDR
  625.  
  626. ;  Hilite styles 
  627.  
  628. kCaretPosition                    EQU        1                    ; specify caret position 
  629. kRawText                        EQU        2                    ; specify range of raw text 
  630. kSelectedRawText                EQU        3                    ; specify range of selected raw text 
  631. kConvertedText                    EQU        4                    ; specify range of converted text 
  632. kSelectedConvertedText            EQU        5                    ; specify range of selected converted text 
  633. kBlockFillText                    EQU        6                    ; Block Fill hilite style 
  634. kOutlineText                    EQU        7                    ; Outline hilite style 
  635. kSelectedText                    EQU        8                    ; Selected hilite style 
  636.  
  637. keyAEHiliteRange                EQU        'hrng'                ; typeTextRangeArray for System 7, typeHiliteRangeArray for System 8    
  638. keyAEPinRange                    EQU        'pnrg'                ; typeTextRange for System 7, typeTextRegionRange for System 8    
  639. keyAEClauseOffsets                EQU        'clau'                ; typeOffsetArray for System 7, typeClauseOffsetArray for System 8 
  640. keyAEOffset                        EQU        'ofst'                ; typeLongInteger for System 7, typeByteOffset for System 8    
  641. keyAEPoint                        EQU        'gpos'                ; typePoint for System 7, typeQDPoint for System 8 
  642. keyAELeftSide                    EQU        'klef'                ; typeBoolean 
  643. keyAERegionClass                EQU        'rgnc'                ; typeShortInteger for System 7, typeRegionClass for System 8 
  644. keyAEDragging                    EQU        'bool'                ; typeBoolean 
  645.  
  646.     IF OLDROUTINENAMES THEN
  647.  
  648. keyAELeadingEdge                EQU        'klef'
  649.     ENDIF    ; OLDROUTINENAMES
  650.     ENDIF ; __AEREGISTRY__ 
  651.  
  652.