File: type_Sdlmouse.html

package info (click to toggle)
ocamlsdl 0.7.2-6
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 1,512 kB
  • ctags: 1,447
  • sloc: ansic: 2,903; sh: 2,610; ml: 2,130; makefile: 211; awk: 13
file content (63 lines) | stat: -rw-r--r-- 6,771 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
<html><head>
<link rel="stylesheet" href="style.css" type="text/css">
<link rel="Start" href="index.html">
<link title="Index of types" rel=Appendix href="index_types.html">
<link title="Index of exceptions" rel=Appendix href="index_exceptions.html">
<link title="Index of values" rel=Appendix href="index_values.html">
<link title="Index of modules" rel=Appendix href="index_modules.html">
<link title="Sdl" rel="Chapter" href="Sdl.html">
<link title="Sdlcdrom" rel="Chapter" href="Sdlcdrom.html">
<link title="Sdltimer" rel="Chapter" href="Sdltimer.html">
<link title="Sdljoystick" rel="Chapter" href="Sdljoystick.html">
<link title="Sdlkey" rel="Chapter" href="Sdlkey.html">
<link title="Sdlmouse" rel="Chapter" href="Sdlmouse.html">
<link title="Sdlevent" rel="Chapter" href="Sdlevent.html">
<link title="Sdlvideo" rel="Chapter" href="Sdlvideo.html">
<link title="Sdlwm" rel="Chapter" href="Sdlwm.html">
<link title="Sdlgl" rel="Chapter" href="Sdlgl.html">
<link title="Sdlttf" rel="Chapter" href="Sdlttf.html">
<link title="Sdlloader" rel="Chapter" href="Sdlloader.html">
<link title="Sdlmixer" rel="Chapter" href="Sdlmixer.html"><title>OCamlSDL 0.7.2 : Sdlmouse</title>
</head>
<body>
<code class="code"><span class="keyword">sig</span><br>
&nbsp;&nbsp;<span class="keyword">type</span>&nbsp;button&nbsp;=<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<span class="constructor">BUTTON_LEFT</span><br>
&nbsp;&nbsp;&nbsp;&nbsp;<span class="keywordsign">|</span>&nbsp;<span class="constructor">BUTTON_MIDDLE</span><br>
&nbsp;&nbsp;&nbsp;&nbsp;<span class="keywordsign">|</span>&nbsp;<span class="constructor">BUTTON_RIGHT</span><br>
&nbsp;&nbsp;&nbsp;&nbsp;<span class="keywordsign">|</span>&nbsp;<span class="constructor">BUTTON_WHEELUP</span><br>
&nbsp;&nbsp;&nbsp;&nbsp;<span class="keywordsign">|</span>&nbsp;<span class="constructor">BUTTON_WHEELDOWN</span><br>
&nbsp;&nbsp;<span class="keyword">external</span>&nbsp;get_state&nbsp;:<br>
&nbsp;&nbsp;&nbsp;&nbsp;?relative:bool&nbsp;<span class="keywordsign">-&gt;</span>&nbsp;unit&nbsp;<span class="keywordsign">-&gt;</span>&nbsp;int&nbsp;*&nbsp;int&nbsp;*&nbsp;<span class="constructor">Sdlmouse</span>.button&nbsp;list<br>
&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;<span class="string">"mlsdlevent_get_mouse_state"</span><br>
&nbsp;&nbsp;<span class="keyword">external</span>&nbsp;warp&nbsp;:&nbsp;int&nbsp;<span class="keywordsign">-&gt;</span>&nbsp;int&nbsp;<span class="keywordsign">-&gt;</span>&nbsp;unit&nbsp;=&nbsp;<span class="string">"ml_SDL_WarpMouse"</span><br>
&nbsp;&nbsp;<span class="keyword">type</span>&nbsp;cursor<br>
&nbsp;&nbsp;<span class="keyword">type</span>&nbsp;cursor_data&nbsp;=&nbsp;{<br>
&nbsp;&nbsp;&nbsp;&nbsp;data&nbsp;:<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;(int,&nbsp;<span class="constructor">Bigarray</span>.int8_unsigned_elt,&nbsp;<span class="constructor">Bigarray</span>.c_layout)&nbsp;<span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t;<br>
&nbsp;&nbsp;&nbsp;&nbsp;mask&nbsp;:<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;(int,&nbsp;<span class="constructor">Bigarray</span>.int8_unsigned_elt,&nbsp;<span class="constructor">Bigarray</span>.c_layout)&nbsp;<span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t;<br>
&nbsp;&nbsp;&nbsp;&nbsp;w&nbsp;:&nbsp;int;<br>
&nbsp;&nbsp;&nbsp;&nbsp;h&nbsp;:&nbsp;int;<br>
&nbsp;&nbsp;&nbsp;&nbsp;hot_x&nbsp;:&nbsp;int;<br>
&nbsp;&nbsp;&nbsp;&nbsp;hot_y&nbsp;:&nbsp;int;<br>
&nbsp;&nbsp;}<br>
&nbsp;&nbsp;<span class="keyword">external</span>&nbsp;make_cursor&nbsp;:<br>
&nbsp;&nbsp;&nbsp;&nbsp;data:(int,&nbsp;<span class="constructor">Bigarray</span>.int8_unsigned_elt,&nbsp;<span class="constructor">Bigarray</span>.c_layout)<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t&nbsp;<span class="keywordsign">-&gt;</span><br>
&nbsp;&nbsp;&nbsp;&nbsp;mask:(int,&nbsp;<span class="constructor">Bigarray</span>.int8_unsigned_elt,&nbsp;<span class="constructor">Bigarray</span>.c_layout)<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<span class="constructor">Bigarray</span>.<span class="constructor">Array2</span>.t&nbsp;<span class="keywordsign">-&gt;</span><br>
&nbsp;&nbsp;&nbsp;&nbsp;hot_x:int&nbsp;<span class="keywordsign">-&gt;</span>&nbsp;hot_y:int&nbsp;<span class="keywordsign">-&gt;</span>&nbsp;<span class="constructor">Sdlmouse</span>.cursor&nbsp;=&nbsp;<span class="string">"ml_SDL_CreateCursor"</span><br>
&nbsp;&nbsp;<span class="keyword">external</span>&nbsp;free_cursor&nbsp;:&nbsp;<span class="constructor">Sdlmouse</span>.cursor&nbsp;<span class="keywordsign">-&gt;</span>&nbsp;unit&nbsp;=&nbsp;<span class="string">"ml_SDL_FreeCursor"</span><br>
&nbsp;&nbsp;<span class="keyword">external</span>&nbsp;set_cursor&nbsp;:&nbsp;<span class="constructor">Sdlmouse</span>.cursor&nbsp;<span class="keywordsign">-&gt;</span>&nbsp;unit&nbsp;=&nbsp;<span class="string">"ml_SDL_SetCursor"</span><br>
&nbsp;&nbsp;<span class="keyword">external</span>&nbsp;get_cursor&nbsp;:&nbsp;unit&nbsp;<span class="keywordsign">-&gt;</span>&nbsp;<span class="constructor">Sdlmouse</span>.cursor&nbsp;=&nbsp;<span class="string">"ml_SDL_GetCursor"</span><br>
&nbsp;&nbsp;<span class="keyword">external</span>&nbsp;cursor_visible&nbsp;:&nbsp;unit&nbsp;<span class="keywordsign">-&gt;</span>&nbsp;bool&nbsp;=&nbsp;<span class="string">"ml_SDL_ShowCursor_query"</span><br>
&nbsp;&nbsp;<span class="keyword">external</span>&nbsp;show_cursor&nbsp;:&nbsp;bool&nbsp;<span class="keywordsign">-&gt;</span>&nbsp;unit&nbsp;=&nbsp;<span class="string">"ml_SDL_ShowCursor"</span><br>
&nbsp;&nbsp;<span class="keyword">external</span>&nbsp;cursor_data&nbsp;:&nbsp;<span class="constructor">Sdlmouse</span>.cursor&nbsp;<span class="keywordsign">-&gt;</span>&nbsp;<span class="constructor">Sdlmouse</span>.cursor_data<br>
&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;<span class="string">"ml_SDL_Cursor_data"</span><br>
&nbsp;&nbsp;<span class="keyword">val</span>&nbsp;pprint_cursor&nbsp;:&nbsp;<span class="constructor">Sdlmouse</span>.cursor&nbsp;<span class="keywordsign">-&gt;</span>&nbsp;unit<br>
&nbsp;&nbsp;<span class="keyword">val</span>&nbsp;convert_to_cursor&nbsp;:<br>
&nbsp;&nbsp;&nbsp;&nbsp;data:int&nbsp;array&nbsp;<span class="keywordsign">-&gt;</span><br>
&nbsp;&nbsp;&nbsp;&nbsp;mask:int&nbsp;array&nbsp;<span class="keywordsign">-&gt;</span><br>
&nbsp;&nbsp;&nbsp;&nbsp;w:int&nbsp;<span class="keywordsign">-&gt;</span>&nbsp;h:int&nbsp;<span class="keywordsign">-&gt;</span>&nbsp;hot_x:int&nbsp;<span class="keywordsign">-&gt;</span>&nbsp;hot_y:int&nbsp;<span class="keywordsign">-&gt;</span>&nbsp;<span class="constructor">Sdlmouse</span>.cursor<br>
<span class="keyword">end</span></code></body></html>