home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Professional / OS2PRO194.ISO / os2 / patches / fortran / win3apif.a < prev    next >
Encoding:
Text File  |  1993-06-29  |  62.7 KB  |  1,316 lines
  1. ! Force default run-time and windows libraries
  2.  
  3. c$pragma library
  4. c$pragma library win386
  5.  
  6. ! Force startup code to be included
  7.  
  8. c$pragma aux wstart "_cstart_"
  9.  
  10. c$pragma aux (__pascal) callback far
  11.  
  12. c$pragma aux (__pascal) winapi
  13.  
  14. c$pragma aux (__cdecl) windecl
  15.  
  16. ! Define "dll_function" alias (to be used for DLL functions)
  17.  
  18. c$pragma aux (__pascal) dll_function far parm( value )
  19.  
  20. !-------------------------------------------------------------------------------
  21. !  General Purpose Defines
  22. !-------------------------------------------------------------------------------
  23.  
  24. c$pragma aux MAKELONG = zc1e210 \ shl edx,16
  25. c                       z0bc2   \ or  eax,edx
  26. c                   parm ( value*2, value*2 ) [eax] [edx] \
  27. c                   value [eax] \
  28. c                   modify exact [eax edx]
  29. c$pragma aux HIWORD = zc1e810 \ shr eax,16
  30. c                   parm( value*4 ) [eax] \
  31. c                   value [ax] \
  32. c                   modify exact [eax]
  33. c$pragma aux LOBYTE = \
  34. c                   parm( value*1 ) [al] \
  35. c                   value [al] \
  36. c                   modify exact []
  37. c$pragma aux HIBYTE = \
  38. c                   parm( value*2 ) [ax] \
  39. c                   value [ah] \
  40. c                   modify exact []
  41. c$pragma aux LOWORD = \
  42. c                   parm( value*2 ) [ax] \
  43. c                   value [ax] \
  44. c                   modify exact []
  45.  
  46. !-------------------------------------------------------------------------------
  47. !  KERNEL Section
  48. !-------------------------------------------------------------------------------
  49.  
  50. !---- begin KERNEL -------------------------------------------------------------
  51.  
  52. ! Loader Routines
  53.  
  54. c$pragma aux (winapi) GetVersion parm
  55. c$pragma aux (winapi) GetNumTasks parm
  56. c$pragma aux (winapi) GetCodeHandle parm( value*4 )
  57. c$pragma aux (winapi) GetCodeInfo parm( reference, reference )
  58. c$pragma aux (winapi) GetModuleHandle parm( value )
  59. c$pragma aux (winapi) GetModuleUsage parm( value*2 )
  60. c$pragma aux (winapi) GetModuleFileName parm( value*2, value, value*2 )
  61. c$pragma aux (winapi) GetInstanceData parm( value*2, reference near, value*2 )
  62. c$pragma aux (winapi) GetProcAddress parm( value*2, value )
  63. c$pragma aux (winapi) MakeProcInstance parm( value*4, value*2 )
  64. c$pragma aux (winapi) FreeProcInstance parm( value*4 )
  65. c$pragma aux (winapi) LoadLibrary parm( value )
  66. c$pragma aux (winapi) LoadModule parm( value, reference )
  67. c$pragma aux (winapi) FreeModule parm( value*2 )
  68. c$pragma aux (winapi) FreeLibrary parm( value*2 )
  69. c$pragma aux (winapi) GetFreeSpace parm( value*2 )
  70. c$pragma aux (winapi) WinExec parm( value, value*2 )
  71. c$pragma aux (winapi) DebugBreak parm
  72. c$pragma aux (winapi) OutputDebugString parm( value )
  73. c$pragma aux (winapi) SwitchStackBack parm
  74. c$pragma aux (winapi) SwitchStackTo parm( value*2, value*2, value*2 )
  75. c$pragma aux (winapi) GetCurrentPDB parm
  76.  
  77. !---- begin OPENFILE -----------------------------------------------------------
  78.  
  79. c$pragma aux (winapi) OpenFile parm( value, reference, value*2 )
  80.  
  81. c$pragma aux (winapi) GetTempDrive parm( value*1 )
  82. c$pragma aux (winapi) GetTempFileName parm( value*1, value, value*2, value )
  83. c$pragma aux (winapi) SetHandleCount parm( value*2 )
  84.  
  85. c$pragma aux (winapi) GetDriveType parm( value*2 )
  86.  
  87. !---- end OPENFILE -------------------------------------------------------------
  88.  
  89. !---- begin MEMMGR -------------------------------------------------------------
  90.  
  91. c$pragma aux (winapi) GlobalAlloc parm( value*2, value*4 )
  92. c$pragma aux (winapi) GlobalDosAlloc parm( value*4 )
  93. c$pragma aux (winapi) GlobalDosFree parm( value*2 )
  94. c$pragma aux (winapi) GlobalCompact parm( value*4 )
  95. c$pragma aux (winapi) GlobalFree parm( value*2 )
  96. c$pragma aux (winapi) GlobalHandle parm( value*2 )
  97. c$pragma aux (winapi) GlobalLock parm( value*2 )
  98. c$pragma aux (winapi) GlobalReAlloc parm( value*2, value*4, value*2 )
  99. c$pragma aux (winapi) GlobalSize parm( value*2 )
  100. c$pragma aux (winapi) GlobalUnlock parm( value*2 )
  101. c$pragma aux (winapi) GlobalFlags parm( value*2 )
  102. c$pragma aux (winapi) GlobalWire parm( value*2 )
  103. c$pragma aux (winapi) GlobalUnWire parm( value*2 )
  104. c$pragma aux (winapi) GlobalUnlock parm( value*2 )
  105. c$pragma aux (winapi) GlobalLRUNewest parm( value*2 )
  106. c$pragma aux (winapi) GlobalLRUOldest parm( value*2 )
  107. c$pragma aux (winapi) GlobalNotify parm( reference )
  108. c$pragma aux (winapi) GlobalPageLock parm( value*2 )
  109. c$pragma aux (winapi) GlobalPageUnlock parm( value*2 )
  110. c$pragma aux (winapi) GlobalFix parm( value*2 )
  111. c$pragma aux (winapi) GlobalUnfix parm( value*2 )
  112.  
  113. c$pragma aux (winapi) GlobalDiscard parm( value*2 )
  114.  
  115. c$pragma aux (winapi) LockSegment parm( value*2 )
  116. c$pragma aux (winapi) UnlockSegment parm( value*2 )
  117.  
  118. c$pragma aux (winapi) LockData parm( value*2 )
  119.  
  120. c$pragma aux (winapi) UnLockData parm( value*2 )
  121.  
  122. c$pragma aux (winapi) LocalAlloc parm( value*2, value*2 )
  123. c$pragma aux (winapi) LocalCompact parm( value*2 )
  124. c$pragma aux (winapi) LocalFree parm( value*2 )
  125. c$pragma aux (winapi) LocalHandle parm( value*2 )
  126. c$pragma aux (winapi) LocalInit parm( value*2, value*2, value*2 )
  127. c$pragma aux (winapi) LocalLock parm( value*2 )
  128. c$pragma aux (winapi) LocalNotify parm( reference )
  129. c$pragma aux (winapi) LocalReAlloc parm( value*2, value*2, value*2 )
  130. c$pragma aux (winapi) LocalSize parm( value*2 )
  131. c$pragma aux (winapi) LocalUnlock parm( value*2 )
  132. c$pragma aux (winapi) LocalFlags parm( value*2 )
  133. c$pragma aux (winapi) LocalShrink parm( value*2, value*2 )
  134.  
  135. c$pragma aux (winapi) LocalDiscard parm( value*2 )
  136.  
  137. !---- end MEMMGR ---------------------------------------------------------------
  138.  
  139. c$pragma aux (winapi) SetSwapAreaSize parm( value*2 )
  140. c$pragma aux (winapi) ValidateFreeSpaces parm
  141. c$pragma aux (winapi) LimitEmsPages parm( value*4 )
  142. c$pragma aux (winapi) SetErrorMode parm( value*2 )
  143. c$pragma aux (winapi) ValidateCodeSegments parm
  144.  
  145. c$pragma aux (winapi) GetDOSEnvironment parm
  146.  
  147. c$pragma aux (winapi) AllocDStoCSAlias parm( value*2 )
  148. c$pragma aux (winapi) AllocSelector parm( value*2 )
  149. c$pragma aux (winapi) ChangeSelector parm( value*2, value*2 )
  150. c$pragma aux (winapi) FreeSelector parm( value*2 )
  151.  
  152. c$pragma aux (winapi) UnlockResource "GlobalUnlock" parm ( value*2 )
  153.  
  154. c$pragma aux (winapi) FindResource parm( value*2, value, value )
  155. c$pragma aux (winapi) LoadResource parm( value*2, value*2 )
  156. c$pragma aux (winapi) FreeResource parm( value*2 )
  157. c$pragma aux (winapi) LockResource parm( value*2 )
  158. c$pragma aux (winapi) SetResourceHandler parm( value*2, reference, reference )
  159. c$pragma aux (winapi) AllocResource parm( value*2, value*2, value*4 )
  160. c$pragma aux (winapi) SizeofResource parm( value*2, value*2 )
  161. c$pragma aux (winapi) AccessResource parm( value*2, value*2 )
  162.  
  163. c$pragma aux MAKEINTRESOURCE = z0d0000ffff \ or eax,0ffff0000h
  164. c                   parm( value*2 ) [ax] \
  165. c                   value [eax] \
  166. c                   modify exact [eax]
  167.  
  168. c$pragma aux (winapi) Yield parm
  169. c$pragma aux (winapi) GetCurrentTask parm
  170.  
  171. !---- begin ATOM ---------------------------------------------------------------
  172.  
  173. c$pragma aux (winapi) InitAtomTable parm( value*2 )
  174. c$pragma aux (winapi) AddAtom parm( value )
  175. c$pragma aux (winapi) DeleteAtom parm( value*2 )
  176. c$pragma aux (winapi) FindAtom parm( value )
  177. c$pragma aux (winapi) GetAtomName parm( value*2, value, value*2 )
  178. c$pragma aux (winapi) GlobalAddAtom parm( value )
  179. c$pragma aux (winapi) GlobalDeleteAtom parm( value*2 )
  180. c$pragma aux (winapi) GlobalFindAtom parm( value )
  181. c$pragma aux (winapi) GlobalGetAtomName parm( value*2, value, value*2 )
  182. c$pragma aux (winapi) GetAtomHandle parm( value*2 )
  183.  
  184. !---- end ATOM -----------------------------------------------------------------
  185.  
  186. ! User Profile Routines
  187.  
  188. c$pragma aux (winapi) GetProfileInt parm( value, value, value*2 )
  189. c$pragma aux (winapi) GetProfileString parm( value, value, value, value, \
  190. c                                            value*2 )
  191. c$pragma aux (winapi) WriteProfileString parm( value, value, value )
  192. c$pragma aux (winapi) GetPrivateProfileInt parm( value, value, value*2, value )
  193. c$pragma aux (winapi) GetPrivateProfileString parm( value, value, value, \
  194. c                                                   value, value*2, value )
  195. c$pragma aux (winapi) WritePrivateProfileString parm( value, value, value, \
  196. c                                                     value )
  197.  
  198. c$pragma aux (winapi) GetWindowsDirectory parm( value, value*2 )
  199. c$pragma aux (winapi) GetSystemDirectory parm( value, value*2 )
  200.  
  201. ! Catch() and Throw()
  202.  
  203. c$pragma aux (winapi) Catch parm( reference )
  204. c$pragma aux (winapi) Throw parm( reference, value*2 )
  205.  
  206. c$pragma aux (winapi) FatalAppExit parm( value*2, value )
  207. c$pragma aux (winapi) FatalExit parm( value*2 )
  208.  
  209. c$pragma aux (winapi) SwapRecording parm( value*2 )
  210.  
  211. ! Character Translation Routines
  212.  
  213. c$pragma aux (winapi) AnsiToOem parm( value, value )
  214. c$pragma aux (winapi) OemToAnsi parm( value, value )
  215. c$pragma aux (winapi) AnsiToOemBuff parm( value, value, value*2 )
  216. c$pragma aux (winapi) OemToAnsiBuff parm( value, value, value*2 )
  217. c$pragma aux (winapi) AnsiUpper parm( value )
  218. c$pragma aux (winapi) AnsiUpperBuff parm( value, value*2 )
  219. c$pragma aux (winapi) AnsiLower parm( value )
  220. c$pragma aux (winapi) AnsiLowerBuff parm( value, value*2 )
  221. c$pragma aux (winapi) AnsiNext parm( value )
  222. c$pragma aux (winapi) AnsiPrev parm( value, value )
  223.  
  224. !---- begin KEYBOARDINFO -------------------------------------------------------
  225.  
  226. ! Keyboard Information Routines
  227.  
  228. c$pragma aux (winapi) OemKeyScan parm( value*2 )
  229. c$pragma aux (winapi) VkKeyScan parm( value*2 )
  230. c$pragma aux (winapi) GetKeyboardType parm( value*2 )
  231. c$pragma aux (winapi) MapVirtualKey parm( value*2, value*2 )
  232. c$pragma aux (winapi) GetKBCodePage parm
  233. c$pragma aux (winapi) GetKeyNameText parm( value*4, value, value*2 )
  234. c$pragma aux (winapi) ToAscii parm( value*2, value*2, reference, reference, \
  235. c                                   value*2 )
  236.  
  237. !---- end KEYBOARDINFO ---------------------------------------------------------
  238.  
  239. !---- begin LANGUAGE -----------------------------------------------------------
  240.  
  241. ! Language dependent Routines
  242.  
  243. c$pragma aux (winapi) IsCharAlpha parm( value*1 )
  244. c$pragma aux (winapi) IsCharAlphaNumeric parm( value*1 )
  245. c$pragma aux (winapi) IsCharUpper parm( value*1 )
  246. c$pragma aux (winapi) IsCharLower parm( value*1 )
  247.  
  248. !---- end LANGUAGE -------------------------------------------------------------
  249.  
  250. c$pragma aux (winapi) GetWinFlags parm
  251.  
  252. !---- end KERNEL ---------------------------------------------------------------
  253.  
  254. !-------------------------------------------------------------------------------
  255. !  GDI Section
  256. !-------------------------------------------------------------------------------
  257.  
  258. !---- begin GDI ----------------------------------------------------------------
  259.  
  260. c$pragma aux RGB = z30f6   \ xor   dh,dh
  261. c                  zc1e210 \ shl   edx,16
  262. c                  z0bc2   \ or    eax,edx
  263. c                  parm ( value*1, value*1, value*1 ) [al] [ah] [dl] \
  264. c                  value [eax] \
  265. c                  modify exact [eax edx]
  266. c$pragma aux PALETTERGB = zb602   \ mov   dh,02h
  267. c                         zc1e210 \ shl   edx,16
  268. c                         z0bc2   \ or    eax,edx
  269. c                  parm ( value*1, value*1, value*1 ) [al] [ah] [dl] \
  270. c                  value [eax] \
  271. c                  modify exact [eax edx]
  272. c$pragma aux PALETTEINDEX = z0fb7c0     \ movzx eax,ax
  273. c                           z0d00000001 \ or    eax,01000000h
  274. c                  parm ( value*2 ) [ax] \
  275. c                  value [eax] \
  276. c                  modify exact [eax]
  277. c$pragma aux GetRValue = \
  278. c                  parm ( value*4 ) [eax] \
  279. c                  value [al] \
  280. c                  modify exact []
  281. c$pragma aux GetGValue = \
  282. c                  parm ( value*4 ) [eax] \
  283. c                  value [ah] \
  284. c                  modify exact []
  285. c$pragma aux GetBValue = zc1e810 \ shr eax,16
  286. c                  parm ( value*4 ) [eax] \
  287. c                  value [al] \
  288. c                  modify exact [eax]
  289.  
  290. !---- begin DRAWTEXT -----------------------------------------------------------
  291.  
  292. c$pragma aux (winapi) DrawText parm( value*2, value, value*2, reference, \
  293. c                                    value*2 )
  294. c$pragma aux (winapi) DrawIcon parm( value*2, value*2, value*2, value*2 )
  295.  
  296. !---- end DRAWTEXT -------------------------------------------------------------
  297.  
  298. c$pragma aux (winapi) GetWindowDC parm( value*2 )
  299. c$pragma aux (winapi) GetDC parm( value*2 )
  300. c$pragma aux (winapi) ReleaseDC parm( value*2, value*2 )
  301. c$pragma aux (winapi) CreateDC parm( value, value, value, value )
  302. c$pragma aux (winapi) CreateIC parm( value, value, value, value )
  303. c$pragma aux (winapi) CreateCompatibleDC parm( value*2 )
  304. c$pragma aux (winapi) DeleteDC parm( value*2 )
  305. c$pragma aux (winapi) SaveDC parm( value*2 )
  306. c$pragma aux (winapi) RestoreDC parm( value*2, value*2 )
  307. c$pragma aux (winapi) MoveTo parm( value*2, value*2, value*2 )
  308. c$pragma aux (winapi) GetCurrentPosition parm( value*2 )
  309. c$pragma aux (winapi) LineTo parm( value*2, value*2, value*2 )
  310. c$pragma aux (winapi) GetDCOrg parm( value*2 )
  311.  
  312. c$pragma aux (winapi) MulDiv parm( value*2, value*2, value*2 )
  313.  
  314. c$pragma aux (winapi) ExtTextOut parm( value*2, value*2, value*2, value*2, \
  315. c                                      reference, value, value*2, reference )
  316.  
  317. c$pragma aux (winapi) Polyline parm( value*2, reference, value*2 )
  318. c$pragma aux (winapi) Polygon parm( value*2, reference, value*2 )
  319. c$pragma aux (winapi) PolyPolygon parm( value*2, reference, reference, value*2 )
  320.  
  321. c$pragma aux (winapi) Rectangle parm( value*2, value*2, value*2, value*2, \
  322. c                                     value*2 )
  323. c$pragma aux (winapi) RoundRect parm( value*2, value*2, value*2, value*2, \
  324. c                                     value*2, value*2, value*2 )
  325. c$pragma aux (winapi) Ellipse parm( value*2, value*2, value*2, value*2, \
  326. c                                   value*2 )
  327. c$pragma aux (winapi) Arc parm( value*2, value*2, value*2, value*2, \
  328. c                                   value*2, value*2, value*2, value*2, \
  329. c                                   value*2 )
  330. c$pragma aux (winapi) Chord parm( value*2, value*2, value*2, value*2, \
  331. c                                 value*2, value*2, value*2, value*2, \
  332. c                                 value*2 )
  333. c$pragma aux (winapi) Pie parm( value*2, value*2, value*2, value*2, value*2, \
  334. c                               value*2, value*2, value*2, value*2 )
  335. c$pragma aux (winapi) PatBlt parm( value*2, value*2, value*2, value*2, \
  336. c                                  value*2, value*4 )
  337. c$pragma aux (winapi) BitBlt parm( value*2, value*2, value*2, value*2, \
  338. c                                  value*2, value*2, value*2, value*2, value*4 )
  339. c$pragma aux (winapi) StretchBlt parm( value*2, value*2, value*2, value*2, \
  340. c                                      value*2, value*2, value*2, value*2, \
  341. c                                      value*2, value*2, value*4 )
  342. c$pragma aux (winapi) TextOut parm( value*2, value*2, value*2, value, value*2 )
  343. c$pragma aux (winapi) TabbedTextOut parm( value*2, value*2, value*2, value, \
  344. c                                         value*2, value*2, reference, value*2 )
  345. c$pragma aux (winapi) GetCharWidth parm( value*2, value*2, value*2, reference )
  346. c$pragma aux (winapi) SetPixel parm( value*2, value*2, value*2, value*4 )
  347. c$pragma aux (winapi) GetPixel parm( value*2, value*2, value*2 )
  348. c$pragma aux (winapi) FloodFill parm( value*2, value*2, value*2, value*4 )
  349. c$pragma aux (winapi) ExtFloodFill parm( value*2, value*2, value*2, \
  350. c                                        value*4, value*2 )
  351. c$pragma aux (winapi) LineDDA parm( value*2, value*2, value*2, value*2, \
  352. c                                   reference, reference )
  353.  
  354. c$pragma aux (winapi) GetStockObject parm( value*2 )
  355.  
  356. c$pragma aux (winapi) CreatePen parm( value*2, value*2, value*4 )
  357. c$pragma aux (winapi) CreatePenIndirect parm( reference )
  358.  
  359. c$pragma aux (winapi) CreateSolidBrush parm( value*4 )
  360. c$pragma aux (winapi) CreateHatchBrush parm( value*2, value*4 )
  361. c$pragma aux (winapi) SetBrushOrg parm( value*2, value*2, value*2 )
  362. c$pragma aux (winapi) GetBrushOrg parm( value*2 )
  363. c$pragma aux (winapi) CreatePatternBrush parm( value*2 )
  364. c$pragma aux (winapi) CreateBrushIndirect parm( reference )
  365.  
  366. c$pragma aux (winapi) CreateBitmap parm( value*2, value*2, value*1, value*1, \
  367. c                                        reference )
  368. c$pragma aux (winapi) CreateBitmapIndirect parm( reference )
  369. c$pragma aux (winapi) CreateCompatibleBitmap parm( value*2, value*2, value*2 )
  370. c$pragma aux (winapi) CreateDiscardableBitmap parm( value*2, value*2, value*2 )
  371.  
  372. c$pragma aux (winapi) SetBitmapBits parm( value*2, value*4, reference )
  373. c$pragma aux (winapi) GetBitmapBits parm( value*2, value*4, reference )
  374. c$pragma aux (winapi) SetBitmapDimension parm( value*2, value*2, value*2 )
  375. c$pragma aux (winapi) GetBitmapDimension parm( value*2 )
  376.  
  377. c$pragma aux (winapi) CreateFont parm( value*2, value*2, value*2, value*2, \
  378. c                                      value*2, value*1, value*1, value*1, \
  379. c                                      value*1, value*1, value*1, value*1, \
  380. c                                      value*1, value )
  381. c$pragma aux (winapi) CreateFontIndirect parm( reference )
  382.  
  383. c$pragma aux (winapi) SelectClipRgn parm( value*2, value*2 )
  384. c$pragma aux (winapi) CreateRectRgn parm( value*2, value*2, value*2, \
  385. c                                         value*2 )
  386. c$pragma aux (winapi) SetRectRgn parm( value*2, value*2, value*2, value*2, \
  387. c                                      value*2 )
  388. c$pragma aux (winapi) CreateRectRgnIndirect parm( reference )
  389. c$pragma aux (winapi) CreateEllipticRgnIndirect parm( reference )
  390. c$pragma aux (winapi) CreateEllipticRgn parm( value*2, value*2, value*2, \
  391. c                                             value*2 )
  392. c$pragma aux (winapi) CreatePolygonRgn parm( reference, value*2, value*2 )
  393. c$pragma aux (winapi) CreatePolyPolygonRgn parm( reference, reference, \
  394. c                                                value*2, value*2 )
  395. c$pragma aux (winapi) CreateRoundRectRgn parm( value*2, value*2, value*2, \
  396. c                                              value*2, value*2, value*2 )
  397.  
  398. c$pragma aux (winapi) GetObject parm( value*2, value*2, reference )
  399. c$pragma aux (winapi) DeleteObject parm( value*2 )
  400. c$pragma aux (winapi) SelectObject parm( value*2, value*2 )
  401. c$pragma aux (winapi) UnrealizeObject parm( value*2 )
  402.  
  403. c$pragma aux (winapi) SetBkColor parm( value*2, value*4 )
  404. c$pragma aux (winapi) GetBkColor parm( value*2 )
  405. c$pragma aux (winapi) SetBkMode parm( value*2, value*2 )
  406. c$pragma aux (winapi) GetBkMode parm( value*2 )
  407. c$pragma aux (winapi) SetTextColor parm( value*2, value*4 )
  408. c$pragma aux (winapi) GetTextColor parm( value*2 )
  409. c$pragma aux (winapi) SetTextAlign parm( value*2, value*2 )
  410. c$pragma aux (winapi) GetTextAlign parm( value*2 )
  411. c$pragma aux (winapi) SetMapperFlags parm( value*2, value*4 )
  412. c$pragma aux (winapi) GetAspectRatioFilter parm( value*2 )
  413. c$pragma aux (winapi) GetNearestColor parm( value*2, value*4 )
  414. c$pragma aux (winapi) SetROP2 parm( value*2, value*2 )
  415. c$pragma aux (winapi) GetROP2 parm( value*2 )
  416. c$pragma aux (winapi) SetStretchBltMode parm( value*2, value*2 )
  417. c$pragma aux (winapi) GetStretchBltMode parm( value*2 )
  418. c$pragma aux (winapi) SetPolyFillMode parm( value*2, value*2 )
  419. c$pragma aux (winapi) GetPolyFillMode parm( value*2 )
  420. c$pragma aux (winapi) SetMapMode parm( value*2, value*2 )
  421. c$pragma aux (winapi) GetMapMode parm( value*2 )
  422. c$pragma aux (winapi) SetWindowOrg parm( value*2, value*2, value*2 )
  423. c$pragma aux (winapi) GetWindowOrg parm( value*2 )
  424. c$pragma aux (winapi) SetWindowExt parm( value*2, value*2, value*2 )
  425. c$pragma aux (winapi) GetWindowExt parm( value*2 )
  426. c$pragma aux (winapi) SetViewportOrg parm( value*2, value*2, value*2 )
  427. c$pragma aux (winapi) GetViewportOrg parm( value*2 )
  428. c$pragma aux (winapi) SetViewportExt parm( value*2, value*2, value*2 )
  429. c$pragma aux (winapi) GetViewportExt parm( value*2 )
  430. c$pragma aux (winapi) OffsetViewportOrg parm( value*2, value*2, value*2 )
  431. c$pragma aux (winapi) ScaleViewportExt parm( value*2, value*2, value*2, \
  432. c                                            value*2, value*2 )
  433. c$pragma aux (winapi) OffsetWindowOrg parm( value*2, value*2, value*2 )
  434. c$pragma aux (winapi) ScaleWindowExt parm( value*2, value*2, value*2, \
  435. c                                          value*2, value*2 )
  436.  
  437. c$pragma aux (winapi) GetClipBox parm( value*2, reference )
  438. c$pragma aux (winapi) IntersectClipRect parm( value*2, value*2, value*2, \
  439. c                                             value*2, value*2 )
  440. c$pragma aux (winapi) OffsetClipRgn parm( value*2, value*2, value*2 )
  441. c$pragma aux (winapi) ExcludeClipRect parm( value*2, value*2, value*2, \
  442. c                                           value*2, value*2 )
  443. c$pragma aux (winapi) PtVisible parm( value*2, value*2, value*2 )
  444. c$pragma aux (winapi) CombineRgn parm( value*2, value*2, value*2, value*2 )
  445. c$pragma aux (winapi) EqualRgn parm( value*2, value*2 )
  446. c$pragma aux (winapi) OffsetRgn parm( value*2, value*2, value*2 )
  447. c$pragma aux (winapi) GetRgnBox parm( value*2, reference )
  448.  
  449. c$pragma aux (winapi) SetTextJustification parm( value*2, value*2, value*2 )
  450. c$pragma aux (winapi) GetTextExtent parm( value*2, value, value*2 )
  451. c$pragma aux (winapi) GetTabbedTextExtent parm( value*2, value, value*2, \
  452. c                                               value*2, reference )
  453. c$pragma aux (winapi) SetTextCharacterExtra parm( value*2, value*2 )
  454. c$pragma aux (winapi) GetTextCharacterExtra parm( value*2 )
  455.  
  456. c$pragma aux (winapi) GetMetaFile parm( value )
  457. c$pragma aux (winapi) DeleteMetaFile parm( value*2 )
  458. c$pragma aux (winapi) CopyMetaFile parm( value*2, value )
  459.  
  460. !---- begin METAFILE -----------------------------------------------------------
  461.  
  462. c$pragma aux (winapi) PlayMetaFileRecord parm( value*2, reference, reference, \
  463. c                                              value*2 )
  464. c$pragma aux (winapi) EnumMetaFile parm( value*2, value*2, reference, \
  465. c                                        reference )
  466.  
  467. !---- end METAFILE -------------------------------------------------------------
  468.  
  469. c$pragma aux (winapi) PlayMetaFile parm( value*2, value*2 )
  470. c$pragma aux (winapi) Escape parm( value*2, value*2, value*2, reference, \
  471. c                                  reference )
  472. c$pragma aux (winapi) EnumFonts parm( value*2, value, reference, reference )
  473. c$pragma aux (winapi) EnumObjects parm( value*2, value*2, reference, reference )
  474. c$pragma aux (winapi) GetTextFace parm( value*2, value*2, value )
  475.  
  476. !---- begin TEXTMETRIC ---------------------------------------------------------
  477.  
  478. c$pragma aux (winapi) GetTextMetrics parm( value*2, reference )
  479.  
  480. !---- end TEXTMETRIC -----------------------------------------------------------
  481.  
  482. c$pragma aux (winapi) GetDeviceCaps parm( value*2, value*2 )
  483.  
  484. c$pragma aux (winapi) SetEnvironment parm( value, value, value*2 )
  485. c$pragma aux (winapi) GetEnvironment parm( value, value, value*2 )
  486.  
  487. c$pragma aux (winapi) DPtoLP parm( value*2, reference, value*2 )
  488. c$pragma aux (winapi) LPtoDP parm( value*2, reference, value*2 )
  489.  
  490. c$pragma aux (winapi) CreateMetaFile parm( value )
  491. c$pragma aux (winapi) CloseMetaFile parm( value*2 )
  492. c$pragma aux (winapi) GetMetaFileBits parm( value*2 )
  493. c$pragma aux (winapi) SetMetaFileBits parm( value*2 )
  494.  
  495. c$pragma aux (winapi) SetDIBits parm( value*2, value*2, value*2, value*2, \
  496. c                                     reference, reference, value*2 )
  497. c$pragma aux (winapi) GetDIBits parm( value*2, value*2, value*2, value*2, \
  498. c                                     reference, reference, value*2 )
  499. c$pragma aux (winapi) SetDIBitsToDevice parm( value*2, value*2, value*2, \
  500. c                                             value*2, value*2, value*2, \
  501. c                                             value*2, value*2, value*2, \
  502. c                                             reference, reference, value*2 )
  503. c$pragma aux (winapi) CreateDIBitmap parm( value*2, reference, value*4, \
  504. c                                          reference, reference, value*2 )
  505. c$pragma aux (winapi) CreateDIBPatternBrush parm( value*2, value*2 )
  506. c$pragma aux (winapi) StretchDIBits parm( value*2, value*2, value*2, value*2, \
  507. c                                         value*2, value*2, value*2, value*2, \
  508. c                                         value*2, reference, reference, \
  509. c                                         value*2, value*4 )
  510.  
  511. c$pragma aux (winapi) CreatePalette parm( reference )
  512. c$pragma aux (winapi) SelectPalette parm( value*2, value*2, value*2 )
  513. c$pragma aux (winapi) RealizePalette parm( value*2 )
  514. c$pragma aux (winapi) UpdateColors parm( value*2 )
  515. c$pragma aux (winapi) AnimatePalette parm( value*2, value*2, value*2, \
  516. c                                          reference )
  517. c$pragma aux (winapi) SetPaletteEntries parm( value*2, value*2, value*2, \
  518. c                                             reference )
  519. c$pragma aux (winapi) GetPaletteEntries parm( value*2, value*2, value*2, \
  520. c                                             reference )
  521. c$pragma aux (winapi) GetNearestPaletteIndex parm( value*2, value*4 )
  522. c$pragma aux (winapi) ResizePalette parm( value*2, value*2 )
  523.  
  524. c$pragma aux (winapi) GetSystemPaletteEntries parm( value*2, value*2, \
  525. c                                                   value*2, \
  526. c                                                   reference )
  527. c$pragma aux (winapi) GetSystemPaletteUse parm( value*2, value*2 )
  528. c$pragma aux (winapi) SetSystemPaletteUse parm( value*2, value*2 )
  529.  
  530. !---- end GDI ------------------------------------------------------------------
  531.  
  532. !-------------------------------------------------------------------------------
  533. !      USER Section
  534. !-------------------------------------------------------------------------------
  535.  
  536. !---- begin USER ---------------------------------------------------------------
  537.  
  538. c$pragma aux (winapi) wvsprintf parm( value, value, reference )
  539. c$pragma aux (windecl) wsprintf parm( value, value )
  540.  
  541. !---- begin WINMESSAGES --------------------------------------------------------
  542.  
  543. c$pragma aux (winapi) RegisterWindowMessage parm( value )
  544.  
  545. !---- end WINMESSAGES ----------------------------------------------------------
  546.  
  547. !---- begin MSG ----------------------------------------------------------------
  548.  
  549. ! Message Function Templates
  550.  
  551. c$pragma aux (winapi) GetMessage parm( reference, value*2, value*2, value*2 )
  552. c$pragma aux (winapi) TranslateMessage parm( reference )
  553. c$pragma aux (winapi) DispatchMessage parm( reference )
  554. c$pragma aux (winapi) PeekMessage parm( reference, value*2, value*2, \
  555. c                                       value*2, value*2 )
  556.  
  557. !---- end MSG ------------------------------------------------------------------
  558.  
  559. c$pragma aux (winapi) ExitWindows parm( value*4, value*2 )
  560.  
  561. c$pragma aux (winapi) SwapMouseButton parm( value*2 )
  562. c$pragma aux (winapi) GetMessagePos parm
  563. c$pragma aux (winapi) GetMessageTime parm
  564.  
  565. c$pragma aux (winapi) GetSysModalWindow parm
  566. c$pragma aux (winapi) SetSysModalWindow parm( value*2 )
  567.  
  568. c$pragma aux (winapi) SendMessage parm( value*2, value*2, value*2, value*4 )
  569. c$pragma aux (winapi) PostMessage parm( value*2, value*2, value*2, value*4 )
  570. c$pragma aux (winapi) PostAppMessage parm( value*2, value*2, value*2, value*4 )
  571. c$pragma aux (winapi) ReplyMessage parm( value*4 )
  572. c$pragma aux (winapi) WaitMessage parm
  573. c$pragma aux (winapi) DefWindowProc parm( value*2, value*2, value*2, value*4 )
  574. c$pragma aux (winapi) PostQuitMessage parm( value*2 )
  575. c$pragma aux (winapi) CallWindowProc parm( reference, value*2, \
  576. c                                          value*2, value*2, value*4 )
  577. c$pragma aux (winapi) InSendMessage parm
  578.  
  579. c$pragma aux (winapi) GetDoubleClickTime parm
  580. c$pragma aux (winapi) SetDoubleClickTime parm( value*2 )
  581.  
  582. c$pragma aux (winapi) RegisterClass parm( reference )
  583. c$pragma aux (winapi) UnregisterClass parm( value, value*2 )
  584. c$pragma aux (winapi) GetClassInfo parm( value*2, value, reference )
  585.  
  586. c$pragma aux (winapi) SetMessageQueue parm( value*2 )
  587.  
  588. c$pragma aux (winapi) CreateWindow parm( value, value, value*4, \
  589. c                                        value*2, value*2, value*2, \
  590. c                                        value*2, value*2, value*2, \
  591. c                                        value*2, value*4 )
  592. c$pragma aux (winapi) CreateWindowEx parm( value*4, value, \
  593. c                                          value, value*4, value*2, \
  594. c                                          value*2, value*2, value*2, \
  595. c                                          value*2, value*2, value*2, \
  596. c                                          value*4 )
  597.  
  598. c$pragma aux (winapi) IsWindow parm( value*2 )
  599. c$pragma aux (winapi) IsChild parm( value*2, value*2 )
  600. c$pragma aux (winapi) DestroyWindow parm( value*2 )
  601.  
  602. c$pragma aux (winapi) ShowWindow parm( value*2, value*2 )
  603. c$pragma aux (winapi) FlashWindow parm( value*2, value*2 )
  604. c$pragma aux (winapi) ShowOwnedPopups parm( value*2, value*2 )
  605.  
  606. c$pragma aux (winapi) OpenIcon parm( value*2 )
  607. c$pragma aux (winapi) CloseWindow parm( value*2 )
  608. c$pragma aux (winapi) MoveWindow parm( value*2, value*2, value*2, value*2, \
  609. c                                      value*2, value*2 )
  610. c$pragma aux (winapi) SetWindowPos parm( value*2, value*2, value*2, \
  611. c                                        value*2, value*2, value*2, \
  612. c                                        value*2 )
  613.  
  614. !---- begin DEFERWINDOWPOS -----------------------------------------------------
  615.  
  616. c$pragma aux (winapi) BeginDeferWindowPos parm( value*2 )
  617. c$pragma aux (winapi) DeferWindowPos parm( value*2, value*2, value*2, \
  618. c                                          value*2, value*2, value*2, \
  619. c                                          value*2, value*2 )
  620. c$pragma aux (winapi) EndDeferWindowPos parm( value*2 )
  621.  
  622. !---- end DEFERWINDOWPOS -------------------------------------------------------
  623.  
  624. c$pragma aux (winapi) IsWindowVisible parm( value*2 )
  625. c$pragma aux (winapi) IsIconic parm( value*2 )
  626. c$pragma aux (winapi) AnyPopup parm
  627. c$pragma aux (winapi) BringWindowToTop parm( value*2 )
  628. c$pragma aux (winapi) IsZoomed parm( value*2 )
  629.  
  630. !---- begin CTLMGR -------------------------------------------------------------
  631.  
  632. c$pragma aux (winapi) CreateDialog parm( value*2, value, value*2, value*4 )
  633. c$pragma aux (winapi) CreateDialogIndirect parm( value*2, reference, \
  634. c                                                value*2, value*4 )
  635. c$pragma aux (winapi) CreateDialogParam parm( value*2, value, value*2, \
  636. c                                             value*4, value*4 )
  637. c$pragma aux (winapi) CreateDialogIndirectParam parm( value*2, reference, \
  638. c                                                     value*2, value*4, \
  639. c                                                     value*4 )
  640. c$pragma aux (winapi) DialogBox parm( value*2, value, value*2, value*4 )
  641. c$pragma aux (winapi) DialogBoxIndirect parm( value*2, value*2, value*2, \
  642. c                                             value*4 )
  643. c$pragma aux (winapi) DialogBoxParam parm( value*2, value, value*2, \
  644. c                                          value*4, value*4 )
  645. c$pragma aux (winapi) DialogBoxIndirectParam parm( value*2, value*2, value*2, \
  646. c                                                  value*4, value*4 )
  647. c$pragma aux (winapi) EndDialog parm( value*2, value*2 )
  648. c$pragma aux (winapi) GetDlgItem parm( value*2, value*2 )
  649. c$pragma aux (winapi) SetDlgItemInt parm( value*2, value*2, value*2, \
  650. c                                         value*2 )
  651. c$pragma aux (winapi) GetDlgItemInt parm( value*2, value*2, reference, \
  652. c                                         value*2 )
  653. c$pragma aux (winapi) SetDlgItemText parm( value*2, value*2, value )
  654. c$pragma aux (winapi) GetDlgItemText parm( value*2, value*2, value, \
  655. c                                          value*2 )
  656. c$pragma aux (winapi) CheckDlgButton parm( value*2, value*2, value*2 )
  657. c$pragma aux (winapi) CheckRadioButton parm( value*2, value*2, value*2, \
  658. c                                            value*2 )
  659. c$pragma aux (winapi) IsDlgButtonChecked parm( value*2, value*2 )
  660. c$pragma aux (winapi) SendDlgItemMessage parm( value*2, value*2, value*2, \
  661. c                                              value*2, value*4 )
  662. c$pragma aux (winapi) GetNextDlgGroupItem parm( value*2, value*2, value*2 )
  663. c$pragma aux (winapi) GetNextDlgTabItem parm( value*2, value*2, value*2 )
  664. c$pragma aux (winapi) GetDlgCtrlID parm( value*2 )
  665. c$pragma aux (winapi) GetDialogBaseUnits parm
  666. c$pragma aux (winapi) DefDlgProc parm( value*2, value*2, value*2, value*4 )
  667.  
  668. !---- end CTLMGR ---------------------------------------------------------------
  669.  
  670. !---- begin MSG ----------------------------------------------------------------
  671.  
  672. c$pragma aux (winapi) CallMsgFilter parm( reference, value*2 )
  673.  
  674. !---- end MSG ------------------------------------------------------------------
  675.  
  676. !---- begin CLIPBOARD ----------------------------------------------------------
  677.  
  678. ! Clipboard Manager Functions
  679.  
  680. c$pragma aux (winapi) OpenClipboard parm( value*2 )
  681. c$pragma aux (winapi) CloseClipboard parm
  682. c$pragma aux (winapi) GetClipboardOwner parm
  683. c$pragma aux (winapi) SetClipboardViewer parm( value*2 )
  684. c$pragma aux (winapi) GetClipboardViewer parm
  685. c$pragma aux (winapi) ChangeClipboardChain parm( value*2, value*2 )
  686. c$pragma aux (winapi) SetClipboardData parm( value*2, value*2 )
  687. c$pragma aux (winapi) GetClipboardData parm( value*2 )
  688. c$pragma aux (winapi) RegisterClipboardFormat parm( value )
  689. c$pragma aux (winapi) CountClipboardFormats parm
  690. c$pragma aux (winapi) EnumClipboardFormats parm( value*2 )
  691. c$pragma aux (winapi) GetClipboardFormatName parm( value*2, value, value*2 )
  692. c$pragma aux (winapi) EmptyClipboard parm
  693. c$pragma aux (winapi) IsClipboardFormatAvailable parm( value*2 )
  694. c$pragma aux (winapi) GetPriorityClipboardFormat parm( reference, value*2 )
  695.  
  696. !---- end CLIPBOARD ------------------------------------------------------------
  697.  
  698. c$pragma aux (winapi) SetFocus parm( value*2 )
  699. c$pragma aux (winapi) GetFocus parm
  700. c$pragma aux (winapi) GetActiveWindow parm
  701. c$pragma aux (winapi) GetKeyState parm( value*2 )
  702. c$pragma aux (winapi) GetAsyncKeyState parm( value*2 )
  703. c$pragma aux (winapi) GetKeyboardState parm( reference )
  704. c$pragma aux (winapi) SetKeyboardState parm( reference )
  705. c$pragma aux (winapi) EnableHardwareInput parm( value*2 )
  706. c$pragma aux (winapi) GetInputState parm
  707. c$pragma aux (winapi) GetCapture parm
  708. c$pragma aux (winapi) SetCapture parm( value*2 )
  709. c$pragma aux (winapi) ReleaseCapture parm
  710.  
  711. ! Windows Functions
  712.  
  713. c$pragma aux (winapi) SetTimer parm( value*2, value*2, value*2, value*4 )
  714. c$pragma aux (winapi) KillTimer parm( value*2, value*2 )
  715.  
  716. c$pragma aux (winapi) EnableWindow parm( value*2, value*2 )
  717. c$pragma aux (winapi) IsWindowEnabled parm( value*2 )
  718.  
  719. c$pragma aux (winapi) LoadAccelerators parm( value*2, value )
  720.  
  721. !---- begin MSG ----------------------------------------------------------------
  722.  
  723. c$pragma aux (winapi) TranslateAccelerator parm( value*2, value*2, reference )
  724.  
  725. !---- end MSG ------------------------------------------------------------------
  726.  
  727. !---- begin SYSMETRICS ---------------------------------------------------------
  728.  
  729. c$pragma aux (winapi) GetSystemMetrics parm( value*2 )
  730.  
  731. !---- end SYSMETRICS -----------------------------------------------------------
  732.  
  733. !---- begin MENUS --------------------------------------------------------------
  734.  
  735. c$pragma aux (winapi) LoadMenu parm( value*2, value )
  736. c$pragma aux (winapi) LoadMenuIndirect parm( reference )
  737. c$pragma aux (winapi) GetMenu parm( value*2 )
  738. c$pragma aux (winapi) SetMenu parm( value*2, value*2 )
  739. c$pragma aux (winapi) ChangeMenu parm( value*2, value*2, value, \
  740. c                                      value*2, value*2 )
  741. c$pragma aux (winapi) HiliteMenuItem parm( value*2, value*2, value*2, \
  742. c                                          value*2 )
  743. c$pragma aux (winapi) GetMenuString parm( value*2, value*2, value, \
  744. c                                         value*2, value*2 )
  745. c$pragma aux (winapi) GetMenuState parm( value*2, value*2, value*2 )
  746. c$pragma aux (winapi) DrawMenuBar parm( value*2 )
  747. c$pragma aux (winapi) GetSystemMenu parm( value*2, value*2 )
  748. c$pragma aux (winapi) CreateMenu parm
  749. c$pragma aux (winapi) CreatePopupMenu parm
  750. c$pragma aux (winapi) DestroyMenu parm( value*2 )
  751. c$pragma aux (winapi) CheckMenuItem parm( value*2, value*2, value*2 )
  752. c$pragma aux (winapi) EnableMenuItem parm( value*2, value*2, value*2 )
  753. c$pragma aux (winapi) GetSubMenu parm( value*2, value*2 )
  754. c$pragma aux (winapi) GetMenuItemID parm( value*2, value*2 )
  755. c$pragma aux (winapi) GetMenuItemCount parm( value*2 )
  756.  
  757. c$pragma aux (winapi) InsertMenu parm( value*2, value*2, value*2, value*2, \
  758. c                                      value )
  759. c$pragma aux (winapi) AppendMenu parm( value*2, value*2, value*2, value )
  760. c$pragma aux (winapi) ModifyMenu parm( value*2, value*2, value*2, value*2, \
  761. c                                      value )
  762. c$pragma aux (winapi) RemoveMenu parm( value*2, value*2, value*2 )
  763. c$pragma aux (winapi) DeleteMenu parm( value*2, value*2, value*2 )
  764. c$pragma aux (winapi) SetMenuItemBitmaps parm( value*2, value*2, value*2, \
  765. c                                              value*2, value*2 )
  766. c$pragma aux (winapi) GetMenuCheckMarkDimensions parm
  767. c$pragma aux (winapi) TrackPopupMenu parm( value*2, value*2, value*2, \
  768. c                                          value*2, value*2, value*2, \
  769. c                                          reference )
  770.  
  771. !---- end MENUS ----------------------------------------------------------------
  772.  
  773. c$pragma aux (winapi) GrayString parm( value*2, value*2, reference, \
  774. c                                      value*4, value*2, value*2, value*2, \
  775. c                                      value*2, value*2 )
  776. c$pragma aux (winapi) UpdateWindow parm( value*2 )
  777. c$pragma aux (winapi) SetActiveWindow parm( value*2 )
  778.  
  779. c$pragma aux (winapi) BeginPaint parm( value*2, reference )
  780. c$pragma aux (winapi) EndPaint parm( value*2, reference )
  781. c$pragma aux (winapi) GetUpdateRect parm( value*2, reference, value*2 )
  782. c$pragma aux (winapi) GetUpdateRgn parm( value*2, value*2, value*2 )
  783.  
  784. c$pragma aux (winapi) ExcludeUpdateRgn parm( value*2, value*2 )
  785.  
  786. c$pragma aux (winapi) InvalidateRect parm( value*2, reference, value*2 )
  787. c$pragma aux (winapi) ValidateRect parm( value*2, reference )
  788.  
  789. c$pragma aux (winapi) InvalidateRgn parm( value*2, value*2, value*2 )
  790. c$pragma aux (winapi) ValidateRgn parm( value*2, value*2 )
  791.  
  792. c$pragma aux (winapi) ScrollWindow parm( value*2, value*2, value*2, \
  793. c                                        reference, reference )
  794. c$pragma aux (winapi) ScrollDC parm( value*2, value*2, value*2, \
  795. c                                    reference, reference, \
  796. c                                    value*2, reference )
  797.  
  798. !---- begin SCROLL -------------------------------------------------------------
  799.  
  800. c$pragma aux (winapi) SetScrollPos parm( value*2, value*2, value*2, value*2 )
  801. c$pragma aux (winapi) GetScrollPos parm( value*2, value*2 )
  802. c$pragma aux (winapi) SetScrollRange parm( value*2, value*2, value*2, \
  803. c                                          value*2, value*2 )
  804. c$pragma aux (winapi) GetScrollRange parm( value*2, value*2, \
  805. c                                          reference, reference )
  806. c$pragma aux (winapi) ShowScrollBar parm( value*2, value*2, value*2 )
  807.  
  808. !---- end SCROLL ---------------------------------------------------------------
  809.  
  810. c$pragma aux (winapi) SetProp parm( value*2, value, value*2 )
  811. c$pragma aux (winapi) GetProp parm( value*2, value )
  812. c$pragma aux (winapi) RemoveProp parm( value*2, value )
  813. c$pragma aux (winapi) EnumProps parm( value*2, reference )
  814. c$pragma aux (winapi) SetWindowText parm( value*2, value )
  815. c$pragma aux (winapi) GetWindowText parm( value*2, value, value*2 )
  816. c$pragma aux (winapi) GetWindowTextLength parm( value*2 )
  817.  
  818. c$pragma aux (winapi) GetClientRect parm( value*2, reference )
  819. c$pragma aux (winapi) GetWindowRect parm( value*2, reference )
  820. c$pragma aux (winapi) AdjustWindowRect parm( reference, value*4, \
  821. c                                            value*2 )
  822. c$pragma aux (winapi) AdjustWindowRectEx parm( reference, value*4, \
  823. c                                              value*2, value*4 )
  824.  
  825. !---- begin MB -----------------------------------------------------------------
  826.  
  827. c$pragma aux (winapi) MessageBox parm( value*2, value, value, value*2 )
  828. c$pragma aux (winapi) MessageBeep parm( value*2 )
  829.  
  830. !---- end MB -------------------------------------------------------------------
  831.  
  832. c$pragma aux (winapi) ShowCursor parm( value*2 )
  833. c$pragma aux (winapi) SetCursorPos parm( value*2, value*2 )
  834. c$pragma aux (winapi) SetCursor parm( value*2 )
  835. c$pragma aux (winapi) GetCursorPos parm( reference )
  836. c$pragma aux (winapi) ClipCursor parm( reference )
  837.  
  838. c$pragma aux (winapi) CreateCaret parm( value*2, value*2, value*2, value*2 )
  839. c$pragma aux (winapi) GetCaretBlinkTime parm
  840. c$pragma aux (winapi) SetCaretBlinkTime parm( value*2 )
  841. c$pragma aux (winapi) DestroyCaret parm
  842. c$pragma aux (winapi) HideCaret parm( value*2 )
  843. c$pragma aux (winapi) ShowCaret parm( value*2 )
  844. c$pragma aux (winapi) SetCaretPos parm( value*2, value*2 )
  845. c$pragma aux (winapi) GetCaretPos parm( reference )
  846.  
  847. c$pragma aux (winapi) ClientToScreen parm( value*2, reference )
  848. c$pragma aux (winapi) ScreenToClient parm( value*2, reference )
  849. c$pragma aux (winapi) WindowFromPoint parm( value )
  850. c$pragma aux (winapi) ChildWindowFromPoint parm( value*2, value )
  851.  
  852. !---- begin COLOR --------------------------------------------------------------
  853.  
  854. c$pragma aux (winapi) GetSysColor parm( value*2 )
  855. c$pragma aux (winapi) SetSysColors parm( value*2, reference, reference )
  856.  
  857. !---- end COLOR ----------------------------------------------------------------
  858.  
  859. c$pragma aux (winapi) FillRgn parm( value*2, value*2, value*2 )
  860. c$pragma aux (winapi) FrameRgn parm( value*2, value*2, value*2, value*2, \
  861. c                                    value*2 )
  862. c$pragma aux (winapi) InvertRgn parm( value*2, value*2 )
  863. c$pragma aux (winapi) PaintRgn parm( value*2, value*2 )
  864. c$pragma aux (winapi) PtInRegion parm( value*2, value*2, value*2 )
  865.  
  866. c$pragma aux (winapi) DrawFocusRect parm( value*2, reference )
  867. c$pragma aux (winapi) FillRect parm( value*2, reference, value*2 )
  868. c$pragma aux (winapi) FrameRect parm( value*2, reference, value*2 )
  869. c$pragma aux (winapi) InvertRect parm( value*2, reference )
  870. c$pragma aux (winapi) SetRect parm( reference, value*2, value*2, value*2, \
  871. c                                   value*2 )
  872. c$pragma aux (winapi) SetRectEmpty parm( reference )
  873. c$pragma aux (winapi) CopyRect parm( reference, reference )
  874. c$pragma aux (winapi) InflateRect parm( reference, value*2, value*2 )
  875. c$pragma aux (winapi) IntersectRect parm( reference, reference, reference )
  876. c$pragma aux (winapi) UnionRect parm( reference, reference, reference )
  877. c$pragma aux (winapi) OffsetRect parm( reference, value*2, value*2 )
  878. c$pragma aux (winapi) IsRectEmpty parm( reference )
  879. c$pragma aux (winapi) EqualRect parm( reference, reference )
  880. c$pragma aux (winapi) PtInRect parm( reference, value )
  881. c$pragma aux (winapi) RectVisible parm( value*2, reference )
  882. c$pragma aux (winapi) RectInRegion parm( value*2, reference )
  883.  
  884. c$pragma aux (winapi) GetCurrentTime parm
  885. c$pragma aux (winapi) GetTickCount parm
  886.  
  887. !---- begin WINOFFSETS ---------------------------------------------------------
  888.  
  889. c$pragma aux (winapi) GetWindowWord parm( value*2, value*2 )
  890. c$pragma aux (winapi) SetWindowWord parm( value*2, value*2, value*2 )
  891. c$pragma aux (winapi) GetWindowLong parm( value*2, value*2 )
  892. c$pragma aux (winapi) SetWindowLong parm( value*2, value*2, value*4 )
  893. c$pragma aux (winapi) GetClassWord parm( value*2, value*2 )
  894. c$pragma aux (winapi) SetClassWord parm( value*2, value*2, value*2 )
  895. c$pragma aux (winapi) GetClassLong parm( value*2, value*2 )
  896. c$pragma aux (winapi) SetClassLong parm( value*2, value*2, value*4 )
  897. c$pragma aux (winapi) GetDesktopHwnd parm
  898. c$pragma aux (winapi) GetDesktopWindow parm
  899.  
  900. !---- end WINOFFSETS -----------------------------------------------------------
  901.  
  902. c$pragma aux (winapi) GetParent parm( value*2 )
  903. c$pragma aux (winapi) SetParent parm( value*2, value*2 )
  904. c$pragma aux (winapi) EnumChildWindows parm( value*2, reference, value*4 )
  905. c$pragma aux (winapi) FindWindow parm( value, value )
  906. c$pragma aux (winapi) EnumWindows parm( value, value*4 )
  907. c$pragma aux (winapi) EnumTaskWindows parm( value*2, reference, value*4 )
  908. c$pragma aux (winapi) GetClassName parm( value*2, value, value*2 )
  909. c$pragma aux (winapi) GetTopWindow parm( value*2 )
  910. c$pragma aux (winapi) GetNextWindow parm( value*2, value*2 )
  911. c$pragma aux (winapi) GetWindowTask parm( value*2 )
  912. c$pragma aux (winapi) GetLastActivePopup parm( value*2 )
  913.  
  914. c$pragma aux (winapi) GetWindow parm( value*2, value*2 )
  915.  
  916. !---- begin NOWH ---------------------------------------------------------------
  917.  
  918. c$pragma aux (winapi) SetWindowsHook parm( value*2, reference )
  919. c$pragma aux (winapi) UnhookWindowsHook parm( value*2, reference )
  920. c$pragma aux (winapi) DefHookProc parm( value*2, value*2, value*4, reference )
  921.  
  922. !---- end NOWH -----------------------------------------------------------------
  923.  
  924. ! Resource Loading Routines
  925.  
  926. c$pragma aux (winapi) LoadBitmap parm( value*2, value )
  927. c$pragma aux (winapi) LoadCursor parm( value*2, value*4 )
  928. c$pragma aux (winapi) CreateCursor parm( value*2, value*2, value*2, value*2, \
  929. c                                        value*2, reference, reference )
  930. c$pragma aux (winapi) DestroyCursor parm( value*2 )
  931.  
  932. c$pragma aux (winapi) LoadIcon parm( value*2, value )
  933. c$pragma aux (winapi) CreateIcon parm( value*2, value*2, value*2, value*1, \
  934. c                                      value*1, reference, reference )
  935. c$pragma aux (winapi) DestroyIcon parm( value*2 )
  936.  
  937. c$pragma aux (winapi) LoadString parm( value*2, value*2, value, value*2 )
  938.  
  939. c$pragma aux (winapi) AddFontResource parm( value )
  940. c$pragma aux (winapi) RemoveFontResource parm( value )
  941.  
  942. !---- begin KANJI --------------------------------------------------------------
  943.  
  944. c$pragma aux (winapi) ConvertRequest parm( value*2, reference )
  945. c$pragma aux (winapi) SetConvertParams parm( value*2, value*2 )
  946. c$pragma aux (winapi) SetConvertHook parm( value*2 )
  947.  
  948. !---- end KANJI ----------------------------------------------------------------
  949.  
  950. ! Key Conversion Window
  951.  
  952. c$pragma aux (winapi) IsTwoByteCharPrefix parm( value*1 )
  953.  
  954. !---- begin CTLMGR -------------------------------------------------------------
  955.  
  956. ! Dialog Manager Routines
  957.  
  958. !---- begin MSG ----------------------------------------------------------------
  959.  
  960. c$pragma aux (winapi) IsDialogMessage parm( value*2, reference )
  961.  
  962. !---- end MSG ------------------------------------------------------------------
  963.  
  964. c$pragma aux (winapi) MapDialogRect parm( value*2, reference )
  965.  
  966. c$pragma aux (winapi) DlgDirList parm( value*2, value, value*2, value*2, \
  967. c                                      value*2 )
  968. c$pragma aux (winapi) DlgDirSelect parm( value*2, value, value*2 )
  969. c$pragma aux (winapi) DlgDirListComboBox parm( value*2, value, \
  970. c                                              value*2, value*2, value*2 )
  971. c$pragma aux (winapi) DlgDirSelectComboBox parm( value*2, value, value*2 )
  972.  
  973. !---- end CTLMGR ---------------------------------------------------------------
  974.  
  975. !---- begin SOUND --------------------------------------------------------------
  976.  
  977. c$pragma aux (winapi) OpenSound parm
  978. c$pragma aux (winapi) CloseSound parm
  979. c$pragma aux (winapi) SetVoiceQueueSize parm( value*2, value*2 )
  980. c$pragma aux (winapi) SetVoiceNote parm( value*2, value*2, value*2, value*2 )
  981. c$pragma aux (winapi) SetVoiceAccent parm( value*2, value*2, value*2, \
  982. c                                          value*2, value*2 )
  983. c$pragma aux (winapi) SetVoiceEnvelope parm( value*2, value*2, value*2 )
  984. c$pragma aux (winapi) SetSoundNoise parm( value*2, value*2 )
  985. c$pragma aux (winapi) SetVoiceSound parm( value*2, value*4, value*2 )
  986. c$pragma aux (winapi) StartSound parm
  987. c$pragma aux (winapi) StopSound parm
  988. c$pragma aux (winapi) WaitSoundState parm( value*2 )
  989. c$pragma aux (winapi) SyncAllVoices parm
  990. c$pragma aux (winapi) CountVoiceNotes parm( value*2 )
  991. c$pragma aux (winapi) GetThresholdEvent parm
  992. c$pragma aux (winapi) GetThresholdStatus parm
  993. c$pragma aux (winapi) SetVoiceThreshold parm( value*2, value*2 )
  994.  
  995. !---- end SOUND ----------------------------------------------------------------
  996.  
  997. !---- begin COMM ---------------------------------------------------------------
  998.  
  999. c$pragma aux (winapi) OpenComm parm( value, value*2, value*2 )
  1000. c$pragma aux (winapi) SetCommState parm( reference )
  1001. c$pragma aux (winapi) GetCommState parm( value*2, reference )
  1002. c$pragma aux (winapi) ReadComm parm( value*2, value, value*2 )
  1003. c$pragma aux (winapi) UngetCommChar parm( value*2, value*1 )
  1004. c$pragma aux (winapi) WriteComm parm( value*2, value, value*2 )
  1005. c$pragma aux (winapi) CloseComm parm( value*2 )
  1006. c$pragma aux (winapi) GetCommError parm( value*2, reference )
  1007. c$pragma aux (winapi) BuildCommDCB parm( value, reference )
  1008. c$pragma aux (winapi) TransmitCommChar parm( value*2, value*1 )
  1009. c$pragma aux (winapi) SetCommEventMask parm( value*2, value*2 )
  1010. c$pragma aux (winapi) GetCommEventMask parm( value*2, value*2 )
  1011. c$pragma aux (winapi) SetCommBreak parm( value*2 )
  1012. c$pragma aux (winapi) ClearCommBreak parm( value*2 )
  1013. c$pragma aux (winapi) FlushComm parm( value*2, value*2 )
  1014. c$pragma aux (winapi) EscapeCommFunction parm( value*2, value*2 )
  1015.  
  1016. !---- end COMM -----------------------------------------------------------------
  1017.  
  1018. !---- begin MDI ----------------------------------------------------------------
  1019.  
  1020. c$pragma aux (winapi) DefFrameProc parm( value*2, value*2, value*2, \
  1021. c                                        value*2, value*4 )
  1022. c$pragma aux (winapi) DefMDIChildProc parm( value*2, value*2, value*2, \
  1023. c                                           value*4 )
  1024.  
  1025. !---- begin MSG ----------------------------------------------------------------
  1026.  
  1027. c$pragma aux (winapi) TranslateMDISysAccel parm( value*2, reference )
  1028.  
  1029. !---- end MSG ------------------------------------------------------------------
  1030.  
  1031. c$pragma aux (winapi) ArrangeIconicWindows parm( value*2 )
  1032.  
  1033. !---- end MDI ------------------------------------------------------------------
  1034.  
  1035. !---- end USER -----------------------------------------------------------------
  1036.  
  1037. !---- begin HELP ---------------------------------------------------------------
  1038.  
  1039. c$pragma aux (winapi) WinHelp parm( value*2, value, value*2, value*4 )
  1040.  
  1041. !---- end HELP -----------------------------------------------------------------
  1042.  
  1043. !---- begin PROFILER -----------------------------------------------------------
  1044.  
  1045. ! function declarations for profiler routines contained in Windows libraries
  1046.  
  1047. c$pragma aux (winapi) ProfInsChk parm
  1048. c$pragma aux (winapi) ProfSetup parm( value*2, value*2 )
  1049. c$pragma aux (winapi) ProfSampRate parm( value*2, value*2 )
  1050. c$pragma aux (winapi) ProfStart parm
  1051. c$pragma aux (winapi) ProfStop parm
  1052. c$pragma aux (winapi) ProfClear parm
  1053. c$pragma aux (winapi) ProfFlush parm
  1054. c$pragma aux (winapi) ProfFinish parm
  1055.  
  1056. !---- end PROFILER -------------------------------------------------------------
  1057.  
  1058. c$pragma aux (winapi) DeviceCapabilities parm( value, value, value*2, \
  1059. c                                              reference, reference )
  1060. c$pragma aux (winapi) DeviceMode parm( value*2, value*2, value, value )
  1061. c$pragma aux (winapi) ExtDeviceMode parm( value*2, value*2, reference, \
  1062. c                                         value, value, reference, value, \
  1063. c                                         value*2 )
  1064.  
  1065. !---- Special WIN386 library functions -----------------------------------------
  1066.  
  1067. c$pragma aux GetProc16 "*_" parm ( value*4, value*4 )
  1068. c$pragma aux ReleaseProc16 "*_" parm ( value*4 )
  1069. c$pragma aux AllocAlias16 "*_" parm ( value*4 )
  1070. c$pragma aux AllocHugeAlias16 "*_" parm ( value*4, value*4 )
  1071. c$pragma aux FreeAlias16 "*_" parm ( value*4 )
  1072. c$pragma aux FreeHugeAlias16 "*_" parm ( value*4, value*4 )
  1073. c$pragma aux InvokeIndirectFunction "InvokeIndirectFunction_" \
  1074. c                                   parm( value*4 ) caller []
  1075. c$pragma aux DefineDLLEntry "DefineDLLEntry_" parm( value*4 ) caller []
  1076. c$pragma aux DefineUserProc16 "DefineUserProc16_" \
  1077. c                             parm( value*4, value*4 ) caller []
  1078. c$pragma aux GetIndirectFunctionHandle "GetIndirectFunctionHandle_" \
  1079. c                                      parm( value*4 ) caller []
  1080. c$pragma aux PASS_WORD_AS_POINTER = z350000ffff \ or eax,0ffff0000h
  1081. c                                 parm( value*2 ) [ax] \
  1082. c                                 value [eax] \
  1083. c                                 modify exact [eax]
  1084.  
  1085. !-------------------------------------------------------------------------------
  1086. !  Define pragma which invokes 32-bit DLLs from 32-bit Windows applications
  1087. !-------------------------------------------------------------------------------
  1088.  
  1089. c$pragma aux (InvokeIndirectFunction) dll32_call
  1090.  
  1091. c$pragma aux (AddAtom) _16AddAtom
  1092. c$pragma aux (AddFontResource) _16AddFontResource
  1093. c$pragma aux (AdjustWindowRect) _16AdjustWindowRect
  1094. c$pragma aux (AdjustWindowRectEx) _16AdjustWindowRectEx
  1095. c$pragma aux (AnimatePalette) _16AnimatePalette
  1096. c$pragma aux (AnsiLower) _16AnsiLower
  1097. c$pragma aux (AnsiLowerBuff) _16AnsiLowerBuff
  1098. c$pragma aux (AnsiNext) _16AnsiNext
  1099. c$pragma aux (AnsiPrev) _16AnsiPrev
  1100. c$pragma aux (AnsiToOem) _16AnsiToOem
  1101. c$pragma aux (AnsiToOemBuff) _16AnsiToOemBuff
  1102. c$pragma aux (AnsiUpper) _16AnsiUpper
  1103. c$pragma aux (AnsiUpperBuff) _16AnsiUpperBuff
  1104. c$pragma aux (BuildCommDCB) _16BuildCommDCB
  1105. c$pragma aux (CallMsgFilter) _16CallMsgFilter
  1106. c$pragma aux (CallWindowProc) _16CallWindowProc
  1107. c$pragma aux (ChangeMenu) _16ChangeMenu
  1108. c$pragma aux (ClientToScreen) _16ClientToScreen
  1109. c$pragma aux (ClipCursor) _16ClipCursor
  1110. c$pragma aux (CopyMetaFile) _16CopyMetaFile
  1111. c$pragma aux (CopyRect) _16CopyRect
  1112. c$pragma aux (CreateBitmap) _16CreateBitmap
  1113. c$pragma aux (CreateBitmapIndirect) _16CreateBitmapIndirect
  1114. c$pragma aux (CreateBrushIndirect) _16CreateBrushIndirect
  1115. c$pragma aux (CreateCursor) _16CreateCursor
  1116. c$pragma aux (CreateDC) _16CreateDC
  1117. c$pragma aux (CreateDialogIndirect) _16CreateDialogIndirect
  1118. c$pragma aux (CreateEllipticRgnIndirect) _16CreateEllipticRgnIndirect
  1119. c$pragma aux (CreateFont) _16CreateFont
  1120. c$pragma aux (CreateFontIndirect) _16CreateFontIndirect
  1121. c$pragma aux (CreateIC) _16CreateIC
  1122. c$pragma aux (CreateIcon) _16CreateIcon
  1123. c$pragma aux (CreateMetaFile) _16CreateMetaFile
  1124. c$pragma aux (CreatePalette) _16CreatePalette
  1125. c$pragma aux (CreatePenIndirect) _16CreatePenIndirect
  1126. c$pragma aux (CreatePolygonRgn) _16CreatePolygonRgn
  1127. c$pragma aux (CreatePolyPolygonRgn) _16CreatePolyPolygonRgn
  1128. c$pragma aux (CreateRectRgnIndirect) _16CreateRectRgnIndirect
  1129. c$pragma aux (CreateWindow) _16CreateWindow
  1130. c$pragma aux (CreateWindowEx) _16CreateWindowEx
  1131. c$pragma aux (DialogBox) _16DialogBox
  1132. c$pragma aux (DialogBoxIndirect) _16DialogBoxIndirect
  1133. c$pragma aux (DialogBoxIndirectParam) _16DialogBoxIndirectParam
  1134. c$pragma aux (DialogBoxParam) _16DialogBoxParam
  1135. c$pragma aux (DispatchMessage) _16DispatchMessage
  1136. c$pragma aux (DlgDirList) _16DlgDirList
  1137. c$pragma aux (DlgDirListComboBox) _16DlgDirListComboBox
  1138. c$pragma aux (DlgDirSelect) _16DlgDirSelect
  1139. c$pragma aux (DlgDirSelectComboBox) _16DlgDirSelectComboBox
  1140. c$pragma aux (DPtoLP) _16DPtoLP
  1141. c$pragma aux (DrawFocusRect) _16DrawFocusRect
  1142. c$pragma aux (DrawText) _16DrawText
  1143. c$pragma aux (EndPaint) _16EndPaint
  1144. c$pragma aux (EnumChildWindows) _16EnumChildWindows
  1145. c$pragma aux (EnumFonts) _16EnumFonts
  1146. c$pragma aux (EnumMetaFile) _16EnumMetaFile
  1147. c$pragma aux (EnumObjects) _16EnumObjects
  1148. c$pragma aux (EnumTaskWindows) _16EnumTaskWindows
  1149. c$pragma aux (EnumWindows) _16EnumWindows
  1150. c$pragma aux (EqualRect) _16EqualRect
  1151. c$pragma aux (ExtTextOut) _16ExtTextOut
  1152. c$pragma aux (FillRect) _16FillRect
  1153. c$pragma aux (FindAtom) _16FindAtom
  1154. c$pragma aux (FindResource) _16FindResource
  1155. c$pragma aux (FindWindow) _16FindWindow
  1156. c$pragma aux (FrameRect) _16FrameRect
  1157. c$pragma aux (GetAtomName) _16GetAtomName
  1158. c$pragma aux (GetBitmapBits) _16GetBitmapBits
  1159. c$pragma aux (GetCaretPos) _16GetCaretPos
  1160. c$pragma aux (GetCharWidth) _16GetCharWidth
  1161. c$pragma aux (GetClassInfo) _16GetClassInfo
  1162. c$pragma aux (GetClassName) _16GetClassName
  1163. c$pragma aux (GetClientRect) _16GetClientRect
  1164. c$pragma aux (GetClipboardFormatName) _16GetClipboardFormatName
  1165. c$pragma aux (GetClipBox) _16GetClipBox
  1166. c$pragma aux (GetCodeInfo) _16GetCodeInfo
  1167. c$pragma aux (GetCommError) _16GetCommError
  1168. c$pragma aux (GetCommState) _16GetCommState
  1169. c$pragma aux (GetCursorPos) _16GetCursorPos
  1170. c$pragma aux (GetDIBits) _16GetDIBits
  1171. c$pragma aux (GetDlgItemInt) _16GetDlgItemInt
  1172. c$pragma aux (GetDlgItemText) _16GetDlgItemText
  1173. c$pragma aux (GetEnvironment) _16GetEnvironment
  1174. c$pragma aux (GetInstanceData) _16GetInstanceData
  1175. c$pragma aux (GetKeyboardState) _16GetKeyboardState
  1176. c$pragma aux (GetKeyNameText) _16GetKeyNameText
  1177. c$pragma aux (GetMenuString) _16GetMenuString
  1178. c$pragma aux (GetMetaFile) _16GetMetaFile
  1179. c$pragma aux (GetModuleFileName) _16GetModuleFileName
  1180. c$pragma aux (GetModuleHandle) _16GetModuleHandle
  1181. c$pragma aux (GetObject) _16GetObject
  1182. c$pragma aux (GetPaletteEntries) _16GetPaletteEntries
  1183. c$pragma aux (GetPriorityClipboardFormat) _16GetPriorityClipboardFormat
  1184. c$pragma aux (GetPrivateProfileInt) _16GetPrivateProfileInt
  1185. c$pragma aux (GetPrivateProfileString) _16GetPrivateProfileString
  1186. c$pragma aux (GetProcAddress) _16GetProcAddress
  1187. c$pragma aux (GetProfileInt) _16GetProfileInt
  1188. c$pragma aux (GetProfileString) _16GetProfileString
  1189. c$pragma aux (GetProp) _16GetProp
  1190. c$pragma aux (GetRgnBox) _16GetRgnBox
  1191. c$pragma aux (GetScrollRange) _16GetScrollRange
  1192. c$pragma aux (GetSystemDirectory) _16GetSystemDirectory
  1193. c$pragma aux (GetSystemPaletteEntries) _16GetSystemPaletteEntries
  1194. c$pragma aux (GetTabbedTextExtent) _16GetTabbedTextExtent
  1195. c$pragma aux (GetTempFileName) _16GetTempFileName
  1196. c$pragma aux (GetTextExtent) _16GetTextExtent
  1197. c$pragma aux (GetTextFace) _16GetTextFace
  1198. c$pragma aux (GetTextMetrics) _16GetTextMetrics
  1199. c$pragma aux (GetUpdateRect) _16GetUpdateRect
  1200. c$pragma aux (GetWindowRect) _16GetWindowRect
  1201. c$pragma aux (GetWindowsDirectory) _16GetWindowsDirectory
  1202. c$pragma aux (GetWindowText) _16GetWindowText
  1203. c$pragma aux (GlobalAddAtom) _16GlobalAddAtom
  1204. c$pragma aux (GlobalFindAtom) _16GlobalFindAtom
  1205. c$pragma aux (GlobalGetAtomName) _16GlobalGetAtomName
  1206. c$pragma aux (InflateRect) _16InflateRect
  1207. c$pragma aux (IntersectRect) _16IntersectRect
  1208. c$pragma aux (InvalidateRect) _16InvalidateRect
  1209. c$pragma aux (InvertRect) _16InvertRect
  1210. c$pragma aux (IsDialogMessage) _16IsDialogMessage
  1211. c$pragma aux (IsRectEmpty) _16IsRectEmpty
  1212. c$pragma aux (LineDDA) _16LineDDA
  1213. c$pragma aux (LoadAccelerators) _16LoadAccelerators
  1214. c$pragma aux (LoadBitmap) _16LoadBitmap
  1215. c$pragma aux (LoadCursor) _16LoadCursor
  1216. c$pragma aux (LoadIcon) _16LoadIcon
  1217. c$pragma aux (LoadLibrary) _16LoadLibrary
  1218. c$pragma aux (LoadMenu) _16LoadMenu
  1219. c$pragma aux (LoadMenuIndirect) _16LoadMenuIndirect
  1220. c$pragma aux (LoadModule) _16LoadModule
  1221. c$pragma aux (LoadString) _16LoadString
  1222. c$pragma aux (LPtoDP) _16LPtoDP
  1223. c$pragma aux (MapDialogRect) _16MapDialogRect
  1224. c$pragma aux (MessageBox) _16MessageBox
  1225. c$pragma aux (OemToAnsi) _16OemToAnsi
  1226. c$pragma aux (OemToAnsiBuff) _16OemToAnsiBuff
  1227. c$pragma aux (OffsetRect) _16OffsetRect
  1228. c$pragma aux (OpenComm) _16OpenComm
  1229. c$pragma aux (OpenFile) _16OpenFile
  1230. c$pragma aux (OutputDebugString) _16OutputDebugString
  1231. c$pragma aux (PlayMetaFile) _16PlayMetaFile
  1232. c$pragma aux (Polygon) _16Polygon
  1233. c$pragma aux (Polyline) _16Polyline
  1234. c$pragma aux (PolyPolygon) _16PolyPolygon
  1235. c$pragma aux (PtInRect) _16PtInRect
  1236. c$pragma aux (ReadComm) _16ReadComm
  1237. c$pragma aux (RectInRegion) _16RectInRegion
  1238. c$pragma aux (RectVisible) _16RectVisible
  1239. c$pragma aux (RegisterClipboardFormat) _16RegisterClipboardFormat
  1240. c$pragma aux (RegisterWindowMessage) _16RegisterWindowMessage
  1241. c$pragma aux (RemoveFontResource) _16RemoveFontResource
  1242. c$pragma aux (RemoveProp) _16RemoveProp
  1243. c$pragma aux (ScreenToClient) _16ScreenToClient
  1244. c$pragma aux (ScrollDC) _16ScrollDC
  1245. c$pragma aux (ScrollWindow) _16ScrollWindow
  1246. c$pragma aux (SetBitmapBits) _16SetBitmapBits
  1247. c$pragma aux (SetCommState) _16SetCommState
  1248. c$pragma aux (SetDIBits) _16SetDIBits
  1249. c$pragma aux (SetDlgItemText) _16SetDlgItemText
  1250. c$pragma aux (SetEnvironment) _16SetEnvironment
  1251. c$pragma aux (SetKeyboardState) _16SetKeyboardState
  1252. c$pragma aux (SetPaletteEntries) _16SetPaletteEntries
  1253. c$pragma aux (SetProp) _16SetProp
  1254. c$pragma aux (SetRect) _16SetRect
  1255. c$pragma aux (SetRectEmpty) _16SetRectEmpty
  1256. c$pragma aux (SetResourceHandler) _16SetResourceHandler
  1257. c$pragma aux (SetSysColors) _16SetSysColors
  1258. c$pragma aux (SetWindowText) _16SetWindowText
  1259. c$pragma aux (TabbedTextOut) _16TabbedTextOut
  1260. c$pragma aux (TextOut) _16TextOut
  1261. c$pragma aux (ToAscii) _16ToAscii
  1262. c$pragma aux (TrackPopupMenu) _16TrackPopupMenu
  1263. c$pragma aux (TranslateAccelerator) _16TranslateAccelerator
  1264. c$pragma aux (TranslateMDISysAccel) _16TranslateMDISysAccel
  1265. c$pragma aux (TranslateMessage) _16TranslateMessage
  1266. c$pragma aux (UnionRect) _16UnionRect
  1267. c$pragma aux (UnregisterClass) _16UnregisterClass
  1268. c$pragma aux (ValidateRect) _16ValidateRect
  1269. c$pragma aux (WinExec) _16WinExec
  1270. c$pragma aux (WinHelp) _16WinHelp
  1271. c$pragma aux (WriteComm) _16WriteComm
  1272. c$pragma aux (WritePrivateProfileString) _16WritePrivateProfileString
  1273. c$pragma aux (WriteProfileString) _16WriteProfileString
  1274.  
  1275. !-------------------------------------------------------------------------------
  1276.  
  1277. c$ifndef NOCOVERSENDS
  1278. c$pragma aux (SendMessage) SendMessage "_COVER_*"
  1279. c$pragma aux (SendDlgItemMessage) SendDlgItemMessage "_COVER_*"
  1280. c$endif
  1281.  
  1282. c$ifndef NOCOVERRC
  1283. c$pragma aux (RegisterClass) RegisterClass "_COVER_*"
  1284. c$endif
  1285.  
  1286. c$ifndef NOAUTOPROCS
  1287. c$pragma aux (CreateDialog) CreateDialog "_COVER_*"
  1288. c$pragma aux (CreateDialogIndirect) CreateDialogIndirect "_COVER_*"
  1289. c$pragma aux (CreateDialogParam) CreateDialogParam "_COVER_*"
  1290. c$pragma aux (CreateDialogIndirectParam) CreateDialogIndirectParam "_COVER_*"
  1291. c$pragma aux (DialogBox) DialogBox "_COVER_*"
  1292. c$pragma aux (DialogBoxIndirect) DialogBoxIndirect "_COVER_*"
  1293. c$pragma aux (DialogBoxParam) DialogBoxParam "_COVER_*"
  1294. c$pragma aux (DialogBoxIndirectParam) DialogBoxIndirectParam "_COVER_*"
  1295. c$pragma aux (EnumChildWindows) EnumChildWindows "_COVER_*"
  1296. c$pragma aux (EnumFonts) EnumFonts "_COVER_*"
  1297. c$pragma aux (EnumMetaFile) EnumMetaFile "_COVER_*"
  1298. c$pragma aux (EnumObjects) EnumObjects "_COVER_*"
  1299. c$pragma aux (EnumProps) EnumProps "_COVER_*"
  1300. c$pragma aux (EnumTaskWindows) EnumTaskWindows "_COVER_*"
  1301. c$pragma aux (EnumWindows) EnumWindows "_COVER_*"
  1302. c$pragma aux (Escape) Escape "_COVER_*"
  1303. c$pragma aux (FreeProcInstance) FreeProcInstance "_COVER_*"
  1304. c$pragma aux (GlobalNotify) GlobalNotify "_COVER_*"
  1305. c$pragma aux (GrayString) GrayString "_COVER_*"
  1306. c$pragma aux (LineDDA) LineDDA "_COVER_*"
  1307. c$pragma aux (MakeProcInstance) MakeProcInstance "_COVER_*" \
  1308. c                parm( reference far, value*2 )
  1309. c$pragma aux (SetResourceHandler) SetResourceHandler "_COVER_*"
  1310. c$pragma aux (SetTimer) SetTimer "_COVER_*"
  1311. c$pragma aux (SetWindowsHook) SetWindowsHook "_COVER_*"
  1312. c$pragma aux (SetWindowLong) SetWindowLong "_COVER_*"
  1313. c$pragma aux (SetClassLong) SetClassLong "_COVER_*"
  1314. c$pragma aux (UnhookWindowsHook) UnhookWindowsHook "_COVER_*"
  1315. c$endif
  1316.