New libs (CMM): system.h, mouse.h

git-svn-id: svn://kolibrios.org@5674 a494cfbc-eb01-0410-851d-a64ba20cac60
2015-08-04 14:36:07 +00:00
parent 1a537e6e27
commit 36e0e0420d
29 changed files with 458 additions and 465 deletions
--- a/programs/cmm/lib/mouse.h
+++ b/programs/cmm/lib/mouse.h
@@ -0,0 +1,214 @@
+#ifndef INCLUDE_MOUSE_H
+#define INCLUDE_MOUSE_H
+
+//Button MOUSE
+#define MOUSE_LEFT   001b
+#define MOUSE_RIGHT  010b
+#define MOUSE_LR     011b
+#define MOUSE_CENTER 100b
+
+/**
+ *  The structure of the MOUSE
+ *  x - coordinate X
+ *  y - coordinate Y
+ *  xx and yy - time coordinates
+ *  lkm - left MOUSE button
+ *  pkm - right MOUSE button
+ *  mkm - MOUSE wheel
+ *  key - keycode button
+ *  tmp - time keycode 
+ *  down - key event press
+ *  up - key release events
+ *  move - event MOUSE movements
+ *  click - when clicked
+ *  dblclick - double-click the default 50 (500 ms)
+ *  drag - drag the element event
+ */
+
+:dword __TMP_TIME,MOUSE_TIME;
+:struct MOUSE
+{
+	signed x,y,xx,yy,lkm,mkm,pkm,key,tmp,tmp_time,hor,vert,down,up,move,click,dblclick,drag,left,top;
+	dword handle,_;
+	byte cmd;
+	void clearTime();
+	void get();
+	void set();
+	void center();
+	dword hide();
+	void slider();
+	void show();
+} mouse;
+:void MOUSE::clearTime()
+{
+	tmp_time = GetStartTime()+MOUSE_TIME;
+}
+:void MOUSE::show()
+{
+	if(!handle)return;
+	ECX = handle;
+	EAX = 37;
+	EBX = 5;
+	$int 0x40;
+}
+:dword MOUSE::hide()
+{
+	if(!_)
+	{
+		EAX = 68;
+		EBX = 12;
+		ECX = 32*32*4;
+		$int 0x40
+		ECX = EAX;
+		_ = EAX;
+	} else ECX = _;
+	EAX = 37;
+	EBX = 4;
+	DX  = 2;
+	$int 0x40;
+	handle = EAX;
+	ECX = EAX;
+	EAX = 37;
+	EBX = 5;
+	$int 0x40;
+	handle = EAX;
+}
+
+//set new attributes MOUSE
+:void MOUSE::set()
+{
+	if((xx!=x)||(yy!=y))
+	{
+		EAX = 18;
+		EBX = 19;
+		ECX = 4;
+		EDX = (x<<16)+y;
+		$int 0x40
+		//move = true;
+	}
+	if((key)||(lkm|mkm|pkm))&&(down|up|click|dblclick|move)
+	{
+		if(lkm|mkm|pkm)key=(lkm)|(pkm<<1)|(2<<mkm);
+		EAX = 18;
+		EBX = 19;
+		ECX = key;
+		EDX = (x<<16)+y;
+		$int 0x40
+	}
+}
+
+:void MOUSE::center()
+{
+	EAX = 18;
+	EBX = 15;
+	$int 0x40
+}
+
+//get new attributes MOUSE
+:void MOUSE::get()
+{
+	EAX = 37;
+	EBX = 1;
+	$int	0x40
+	$mov	ebx, eax
+	$shr	eax, 16
+	$and	ebx,0x0000FFFF
+	x = EAX;
+	y = EBX;
+	if (x>6000) x-=65535;
+	if (y>6000) y-=65535;
+	EAX = 37;
+	EBX = 2;
+	$int	0x40
+	$mov	ebx, eax
+	$mov	ecx, eax
+	key = EAX;
+	$and	eax, 0x00000001
+	$shr	ebx, 1
+	$and	ebx, 0x00000001
+	$shr	ecx, 2
+	$and	ecx, 0x00000001
+	lkm = EAX;
+	pkm = EBX;
+	mkm = ECX;
+	
+	//when you release the MOUSE button
+	// Mouse Move Event
+	if(xx!=x)||(yy!=y)
+	{
+		move = true;
+		xx = x;
+		yy = y;
+	}
+	else move = false;
+	// Mouse Up Event
+	if(cmd)&&(!key){
+		up   = true;
+		down = false;
+		drag = false;
+		if(!move) click = true;
+		__TMP_TIME = GetStartTime();
+		if(__TMP_TIME-tmp_time<=MOUSE_TIME)
+		{ 
+			dblclick = true;
+			click    = false; 
+		}
+		tmp_time = __TMP_TIME;
+		//returns the key code
+		key = tmp;
+		lkm = 1&tmp;
+		pkm = 2&tmp;
+		pkm >>= 1;
+		mkm = 4&tmp;
+		mkm >>= 2;
+		cmd = false;
+	}
+	
+	//when you press the MOUSE button
+	// Mouse Down Event/Move Event
+	else 
+	{
+	    up       = false;
+		click    = false;
+		dblclick = false;
+		down     = false;
+		// Mouse Move Event
+		if(key)if(!cmd) 
+		{
+			down = true;
+			if(move)drag = true;
+			cmd = true;
+			tmp=key;
+		}
+	}
+	
+	//scroll
+	EAX = 37;
+	EBX = 7;
+	$int	0x40
+	$mov	ebx, eax
+	$shr	eax, 16
+	$and	ebx,0x0000FFFF
+	//hor = EAX;
+	vert = EBX;
+}
+
+
+
+:void MOUSE::slider()
+{
+	signed _x,_y;
+	if(!handle)hide();
+	get();
+	_x = x;_y = y;
+	pause(5);
+	get();
+	left = _x - x;
+	top  = _y - y;
+	center();
+	get();
+	_x = x;_y = y;
+	pause(5);
+}
+
+#endif