Subversion Repositories Kolibri OS

Rev

Rev 7422 | Rev 8330 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7422 Rev 7991
Line 43... Line 43...
43
{
43
{
44
	if(!handle)return;
44
	if(!handle)return;
45
	ECX = handle;
45
	ECX = handle;
46
	EAX = 37;
46
	EAX = 37;
47
	EBX = 5;
47
	EBX = 5;
48
	$int 0x40;
48
	$int 64;
49
}
49
}
50
:dword MOUSE::hide()
50
:dword MOUSE::hide()
51
{
51
{
52
	if(!_)
52
	if(!_)
53
	{
53
	{
54
		EAX = 68;
54
		EAX = 68;
55
		EBX = 12;
55
		EBX = 12;
56
		ECX = 32*32*4;
56
		ECX = 32*32*4;
57
		$int 0x40
57
		$int 64
58
		ECX = EAX;
58
		ECX = EAX;
59
		_ = EAX;
59
		_ = EAX;
60
	} else ECX = _;
60
	} else ECX = _;
61
	EAX = 37;
61
	EAX = 37;
62
	EBX = 4;
62
	EBX = 4;
63
	DX  = 2;
63
	DX  = 2;
64
	$int 0x40;
64
	$int 64;
65
	handle = EAX;
65
	handle = EAX;
66
	ECX = EAX;
66
	ECX = EAX;
67
	EAX = 37;
67
	EAX = 37;
68
	EBX = 5;
68
	EBX = 5;
69
	$int 0x40;
69
	$int 64;
70
	handle = EAX;
70
	handle = EAX;
71
}
71
}
Line 72... Line 72...
72
 
72
 
73
//set new attributes MOUSE
73
//set new attributes MOUSE
Line 77... Line 77...
77
	{
77
	{
78
		EAX = 18;
78
		EAX = 18;
79
		EBX = 19;
79
		EBX = 19;
80
		ECX = 4;
80
		ECX = 4;
81
		EDX = (x<<16)+y;
81
		EDX = (x<<16)+y;
82
		$int 0x40
82
		$int 64
83
		//move = true;
83
		//move = true;
84
	}
84
	}
85
	if((key)||(lkm|mkm|pkm))&&(down|up|click|dblclick|move)
85
	if((key)||(lkm|mkm|pkm))&&(down|up|click|dblclick|move)
86
	{
86
	{
87
		if(lkm|mkm|pkm)key=(lkm)|(pkm<<1)|(2<
87
		if(lkm|mkm|pkm)key=(lkm)|(pkm<<1)|(2<
88
		EAX = 18;
88
		EAX = 18;
89
		EBX = 19;
89
		EBX = 19;
90
		ECX = key;
90
		ECX = key;
91
		EDX = (x<<16)+y;
91
		EDX = (x<<16)+y;
92
		$int 0x40
92
		$int 64
93
	}
93
	}
94
}
94
}
Line 95... Line 95...
95
 
95
 
96
:void MOUSE::center()
96
:void MOUSE::center()
97
{
97
{
98
	EAX = 18;
98
	EAX = 18;
99
	EBX = 15;
99
	EBX = 15;
100
	$int 0x40
100
	$int 64
Line 101... Line 101...
101
}
101
}
102
 
102
 
103
//get new attributes MOUSE
103
//get new attributes MOUSE
104
:void MOUSE::get()
104
:void MOUSE::get()
105
{
105
{
106
	EAX = 37;
106
	EAX = 37;
107
	EBX = 1;
107
	EBX = 1;
108
	$int	0x40
108
	$int	64
109
	$mov	ebx, eax
109
	$mov	ebx, eax
110
	$shr	eax, 16
110
	$shr	eax, 16
111
	$and	ebx,0x0000FFFF
111
	$and	ebx,0x0000FFFF
112
	x = EAX;
112
	x = EAX;
113
	y = EBX;
113
	y = EBX;
114
	if (x>6000) x-=65535;
114
	if (x>6000) x-=65535;
115
	if (y>6000) y-=65535;
115
	if (y>6000) y-=65535;
116
	EAX = 37;
116
	EAX = 37;
117
	EBX = 2;
117
	EBX = 2;
118
	$int	0x40
118
	$int	64
119
	$mov	ebx, eax
119
	$mov	ebx, eax
120
	$mov	ecx, eax
120
	$mov	ecx, eax
121
	key = EAX;
121
	key = EAX;
Line 178... Line 178...
178
	}
178
	}
Line 179... Line 179...
179
	
179
	
180
	//scroll
180
	//scroll
181
	EAX = 37;
181
	EAX = 37;
182
	EBX = 7;
182
	EBX = 7;
183
	$int	0x40
183
	$int	64
184
	$mov	ebx, eax
184
	$mov	ebx, eax
185
	$shr	eax, 16
185
	$shr	eax, 16
186
	$and	ebx,0x0000FFFF
186
	$and	ebx,0x0000FFFF
187
	//hor = EAX;
187
	//hor = EAX;
Line 211... Line 211...
211
===========================                                 ===========================
211
===========================                                 ===========================
212
=====================================================================================*/
212
=====================================================================================*/
Line 213... Line 213...
213
 
213
 
214
 
214
 
215
inline fastcall int GetMouseSpeed() {
215
inline fastcall int GetMouseSpeed() {
216
	$mov eax,18
216
	EAX = 18;
217
	$mov ebx,19
217
	EBX = 19;
218
	$mov ecx,0
218
	ECX = 0;
Line 219... Line 219...
219
	$int 0x40
219
	$int 64
220
}
220
}
221
 
221
 
222
inline fastcall void SetMouseSpeed(EDX) {
222
inline fastcall void SetMouseSpeed(EDX) {
223
	$mov eax,18
223
	EAX = 18;
224
	$mov ebx,19
224
	EBX = 19;
Line 225... Line 225...
225
	$mov ecx,1
225
	ECX = 1;
226
	$int 0x40
226
	$int 64
227
}
227
}
228
 
228
 
229
inline fastcall int GetMouseAcceleration() {
229
inline fastcall int GetMouseAcceleration() {
230
	$mov eax,18
230
	EAX = 18;
Line 231... Line 231...
231
	$mov ebx,19
231
	EBX = 19;
232
	$mov ecx,2
232
	ECX = 2;
233
	$int 0x40
233
	$int 64
234
}
234
}
235
 
235
 
236
inline fastcall void SetMouseAcceleration(EDX) {
236
inline fastcall void SetMouseAcceleration(EDX) {
Line 237... Line 237...
237
	$mov eax,18
237
	EAX = 18;
238
	$mov ebx,19
238
	EBX = 19;
239
	$mov ecx,3
239
	ECX = 3;
240
	$int 0x40
240
	$int 64
241
}
241
}
242
 
242
 
Line 243... Line 243...
243
inline fastcall int GetMouseDoubleClickDelay() {
243
inline fastcall int GetMouseDoubleClickDelay() {
244
	$mov eax,18
244
	EAX = 18;
245
	$mov ebx,19
245
	EBX = 19;
246
	$mov ecx,6
246
	ECX = 6;
247
	$int 0x40
247
	$int 64
248
}
248
}
Line 249... Line 249...
249
 
249
 
250
inline fastcall void SetMouseDoubleClickDelay(DL) {
250
inline fastcall void SetMouseDoubleClickDelay(DL) {