home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / xbase / library / clipper / mouse / u_mouse / u_mousea.asm < prev    next >
Encoding:
Assembly Source File  |  1989-10-21  |  3.5 KB  |  208 lines

  1. ;*******************
  2. ;*******************
  3. ;*
  4. ;*   Source File ... U_MouseA.ASM
  5. ;*
  6. ;*   Application ...
  7. ;*                   Copyright (c) 1989 Philip de Lisle Associates
  8. ;*                   All Rights Reserved
  9. ;*
  10. ;*   Author ........ Philip de Lisle
  11. ;*   Last Update ... 8 September 1989 at 12:18 AM
  12. ;*   Purpose ....... Low level mouse functions
  13. ;*
  14. ;*******************
  15. ;*******************
  16.  
  17.  
  18. INCLUDE C:\CLIPPER\EXTENDA.INC
  19.  
  20. ;CODESEG MOUSE
  21. ;DATASEG
  22.  
  23. CLpublic <M_FUNC0>
  24. CLpublic <M_FUNC1>
  25. CLpublic <M_FUNC2>
  26. CLpublic <M_FUNC3B, M_FUNC3X, M_FUNC3Y>
  27. CLpublic <M_FUNC4>
  28. CLpublic <M_FUNC5B, M_FUNC5C, M_FUNC5X, M_FUNC5Y>
  29. CLpublic <M_FUNC6B, M_FUNC6C, M_FUNC6X, M_FUNC6Y>
  30. CLpublic <M_FUNC10>
  31. CLpublic <M_FUNC11H, M_FUNC11V>
  32.  
  33. CLfunc int M_FUNC0
  34. ;  Reset Mouse
  35. CLcode
  36.  
  37.     mov AX, 0
  38.     int 33h
  39. CLret AX                       ; M_FUNC0()
  40.  
  41.  
  42. CLfunc void M_FUNC1
  43. ;  Show Mouse Cursor
  44. CLcode
  45.  
  46.     mov AX, 1
  47.     int 33h
  48. CLret                          ; M_FUNC1()
  49.  
  50.  
  51. CLfunc void M_FUNC2
  52. ;  Hide Mouse Cursor
  53. CLcode
  54.  
  55.     mov AX, 2
  56.     int 33h
  57. CLret                          ; M_FUNC2()
  58.  
  59.  
  60. CLfunc int M_FUNC3B
  61. ;  Get Which Button Pressed
  62. CLcode
  63.  
  64.     mov AX, 3
  65.     int 33h
  66. CLret BX                       ; M_FUNC3B()
  67.  
  68.  
  69. CLfunc int M_FUNC3X
  70. ;  Get X coordinate of Mouse
  71. CLcode
  72.  
  73.     mov AX, 3
  74.     int 33h
  75. CLret CX                       ; M_FUNC3X()
  76.  
  77.  
  78. CLfunc int M_FUNC3Y
  79. ;  Get Y coordinate of Mouse
  80. CLcode
  81.  
  82.     mov AX, 3
  83.     int 33h
  84. CLret DX                       ; M_FUNC3Y()
  85.  
  86.  
  87. CLfunc void M_FUNC4 <int M3, int M4>
  88. ;  Set Mouse Position
  89. CLcode
  90.  
  91.     mov AX, 4
  92.     mov BX, 0
  93.     mov CX, M4
  94.     mov DX, M3
  95.     int 33h
  96. CLret                          ; M_FUNC4()
  97.  
  98.  
  99. CLfunc int M_FUNC5B <int M2>
  100. ;  Status of Button Pressed (0 = up, 1 = down)
  101. CLcode
  102.  
  103.     mov AX, 5
  104.     mov BX, M2
  105.     int 33h
  106. CLret AX                       ; M_FUNC5B()
  107.  
  108.  
  109. CLfunc int M_FUNC5C <int M2>
  110. ;  No. of Presses of Button
  111. CLcode
  112.  
  113.     mov AX, 5
  114.     mov BX, M2
  115.     int 33h
  116. CLret BX                       ; M_FUNC5C()
  117.  
  118.  
  119. CLfunc int M_FUNC5X <int M2>
  120. ;  Get X coordinate of Last Button Pressed
  121. CLcode
  122.  
  123.     mov AX, 5
  124.     mov BX, M2
  125.     int 33h
  126. CLret CX                       ; M_FUNC5X()
  127.  
  128.  
  129. CLfunc int M_FUNC5Y <int M2>
  130. ;  Get Y coordinate of Last Button Pressed
  131. CLcode
  132.  
  133.     mov AX, 5
  134.     mov BX, M2
  135.     int 33h
  136. CLret DX                       ; M_FUNC5Y()
  137.  
  138.  
  139. CLfunc int M_FUNC6B <int M2>
  140. ;  Status of Button Released (0 = up, 1 = down)
  141. CLcode
  142.  
  143.     mov AX, 5
  144.     mov BX, M2
  145.     int 33h
  146. CLret AX                       ; M_FUNC5C()
  147.  
  148.  
  149. CLfunc int M_FUNC6C <int M2>
  150. ;  No. of Releases of Button
  151. CLcode
  152.  
  153.     mov AX, 6
  154.     mov BX, M2
  155.     int 33h
  156. CLret BX                       ; M_FUNC6C()
  157.  
  158.  
  159. CLfunc int M_FUNC6X <int M2>
  160. ;  Get X coordinate of Last Button Released
  161. CLcode
  162.  
  163.     mov AX, 6
  164.     mov BX, M2
  165.     int 33h
  166. CLret CX                       ; M_FUNC6X()
  167.  
  168.  
  169. CLfunc int M_FUNC6Y <int M2>
  170. ;  Get Y coordinate of Last Button Released
  171. CLcode
  172.  
  173.     mov AX, 6
  174.     mov BX, M2
  175.     int 33h
  176. CLret DX                       ; M_FUNC6Y()
  177.  
  178.  
  179. CLfunc void M_FUNC10 <int M4>
  180. ;  Set Mouse Cursor Type
  181. CLcode
  182.  
  183.     mov AX, 0Ah
  184.     mov BX, 0
  185.     mov CX, 0
  186.     mov DX, M4
  187.     int 33h
  188. CLret                          ; M_FUNC10()
  189.  
  190.  
  191. CLFUNC int M_FUNC11H
  192. ; Get Horizontal Direction of Mouse
  193. CLcode
  194.     mov AX, 0Bh
  195.     int 33h
  196. CLret CX                       ; M_FUNC11H()
  197.  
  198.  
  199. CLFUNC int M_FUNC11V
  200. ; Get Vertical Direction of Mouse
  201. CLcode
  202.     mov AX, 0Bh
  203.     int 33h
  204. CLret DX                       ; M_FUNC11V()
  205.  
  206.  
  207. END
  208.