WebSVN – Kolibri OS – Diff – /programs/cmm/lib/kolibri.h


//CODED by Veliant, Leency, Nable. GNU GPL licence.
#ifndef INCLUDE_KOLIBRI_H
#define INCLUDE_KOLIBRI_H
 
#startaddress 0
#code32 TRUE
 
char   os_name[8]   = {'M','E','N','U','E','T','0','1'};
dword  os_version   = 0x00000001;
dword  start_addr   = #______INIT______;
dword  final_addr   = #______STOP______+32;
dword  alloc_mem    = MEMSIZE;
dword  x86esp_reg   = MEMSIZE;
dword  I_Param      = #param;
dword  I_Path       = #program_path;
char param[4096];
char program_path[4096];
 
#define NULL      0
#define OLD      -1
#define true      1
#define false     0
 
//Events
#define evReDraw  1
#define evKey     2
#define evButton  3
#define evDesktop 5
#define evMouse   6
#define evIPC     7
#define evNetwork 8
#define evDebug   9
 
//Button options
#define BT_DEL      0x80000000
#define BT_HIDE     0x40000000
#define BT_NOFRAME  0x20000000
 
//Button MOUSE
#define MOUSE_LEFT   001b
#define MOUSE_RIGHT  010b
#define MOUSE_LR     011b
#define MOUSE_CENTER 100b
 
//ASCII KEYS
#define ASCII_KEY_BS    008
#define ASCII_KEY_TAB   009
#define ASCII_KEY_ENTER 013
#define ASCII_KEY_ESC   027
#define ASCII_KEY_DEL   182
#define ASCII_KEY_INS   185
#define ASCII_KEY_SPACE 032
 
#define ASCII_KEY_LEFT  176
#define ASCII_KEY_RIGHT 179
#define ASCII_KEY_DOWN  177
#define ASCII_KEY_UP    178
#define ASCII_KEY_HOME  180
#define ASCII_KEY_END   181
#define ASCII_KEY_PGDN  183
#define ASCII_KEY_PGUP  184
 
//allow event mask
#define EVENT_MASK_REDRAW   000000001b
#define EVENT_MASK_KEYBOARD 000000010b
#define EVENT_MASK_BUTTONS  000000100b
#define EVENT_MASK_DESKTOP  000010000b
#define EVENT_MASK_MOUSE    000100000b
#define EVENT_MASK_IPC      001000000b
#define EVENT_MASK_NETWORK  010000000b
#define EVENT_MASK_DEBUG    100000000b
 
//ARGS FUNCTION
#define END_ARGS 0xFF00FF
//-------------------------------------------------------------------------
 
:struct raw_image {
	dword w, h, data;
};
 
/**
 *  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)
 */
 
: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,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<
		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 Up Event
	if((cmd)&&!(key)){
		up = true;
		down = false;
		if(!move) click = true;
		move = false;
		__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((xx!=x)||(yy!=y))
		{
			move = true;
			xx = x;
			yy = y;
		}
		else move = false;
		if(key)if(!cmd) {down = 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);
}
 
:struct keyboard
{
	signed key;
	byte down,up,press;
	void get(void);
};
 
:void keyboard::get(void)
{
	
}
 
:struct system_colors
{
	dword frame,grab,grab_button,grab_button_text,grab_text,
	      work,work_button,work_button_text,work_text,work_graph;
	void get();
};
 
:void system_colors::get()
{
	EAX = 48;
	EBX = 3;
	ECX = #frame;
	EDX = 40;
	$int 0x40
}
 
//------------------------------------------------------------------------------
:dword wait_event_code;
inline fastcall dword WaitEvent()
{
	$mov eax,10
	$int 0x40
	wait_event_code = EAX;
	//if(wait_event_code==evMouse) MOUSE.get();
	//return wait_event_code;
}
 
inline fastcall dword CheckEvent()
{
	$mov eax,11
	$int 0x40
}
 
inline fastcall dword WaitEventTimeout(EBX)
{
	$mov eax,23
	$int 0x40
} 
 
inline fastcall SetEventMask(EBX)
{
	$mov eax,40
	$int 0x40
}
 
inline fastcall ScancodesGeting(){
	$mov eax,66
	$mov ebx,1
	$mov ecx,1 //áª ­ª®¤ë
	$int 0x40
}
 
inline fastcall word GetKey()  //+Gluk fix
{
		$push edx
GETKEY:
		$mov  eax,2
		$int  0x40
		$cmp eax,1
		$jne GETKEYI
		$mov ah,dh
		$jmp GETKEYII //jz?
GETKEYI:
		$mov dh,ah
		$jmp GETKEY
GETKEYII:
		$pop edx
		$shr eax,8
}
 
inline fastcall int GetFullKey()
{
	$mov  eax,2
	$int  0x40
}
 
 
inline fastcall pause(EBX)
{
	$mov eax, 5
	$int 0x40
}
 
inline fastcall word GetButtonID()
{
	$mov eax,17
	$int  0x40
	$shr eax,8
}
 
inline fastcall dword GetFreeRAM()
{
	$mov eax, 18
	$mov ebx, 16
	$int 0x40
	//return eax = ðàçìåð ñâîáîäíîé ïàìÿòè â êèëîáàéòàõ
}
 
inline void draw_line(dword x1,y1,x2,y2,color)
{
	x2--;y2--;y1--;
	$mov EAX,38
	EBX = x1<<16;
	EBX |= x2;
	ECX = y1<<16;
	ECX |= y2;
	$mov EDX,color
	$int 0x40
}
 
inline fastcall dword LoadDriver(ECX) //ECX - èìÿ äðàéâåðà
{
	$mov eax, 68
	$mov ebx, 16
	$int 0x40
	//return 0 - íåóäà÷à, èíà÷å eax = õýíäë äðàéâåðà 
}
 
inline fastcall dword RuleDriver(ECX) //óêàçàòåëü íà óïðàâëÿþùóþ ñòðóêòóðó
{
	$mov eax, 68
	$mov ebx, 17
	$int 0x40
	//return eax = îïðåäåëÿåòñÿ äðàéâåðîì
}
 
struct proc_info
{
	#define SelfInfo -1
	dword	use_cpu;
	word	pos_in_stack,num_slot,rezerv1;
	unsigned char name[11];
	char	rezerv2;
	dword	adress,use_memory,ID,left,top,width,height;
	word	status_slot,rezerv3;
	dword	work_left,work_top,work_width,work_height;
	char	status_window;
	dword   cwidth,cheight;
	byte    reserved[1024-71-8];
};
 
inline fastcall void GetProcessInfo(EBX, ECX)
{
	$mov eax,9;
	$int  0x40
	DSDWORD[EBX+71] = DSDWORD[EBX+42] - 9; //set cwidth
	DSDWORD[EBX+75] = DSDWORD[EBX+46] - GetSkinHeight() - 4; //set cheight
}
 
inline fastcall int GetPointOwner( EBX, ECX) //ebx=m.x, ecx=m.y
{
	$mov eax,34
	$int 0x40
}
 
inline fastcall int GetProcessSlot( ECX)
{
	EAX = 18;
	EBX = 21;
	$int 0x40
}
 
inline fastcall int GetActiveProcess()
{
	EAX = 18;
	EBX = 7;
	$int 0x40
}
 
:int CheckActiveProcess(int Form_ID)
{
	int id9=GetProcessSlot(Form_ID);
	if (id9==GetActiveProcess()) return 1;
	return 0;
}
 
inline fastcall void ActivateWindow( ECX)
{
	EAX = 18;
	EBX = 3;
	$int 0x40
}
 
inline fastcall int MinimizeWindow()
{
	EAX = 18;
	EBX = 10;
	$int 0x40
}
 
inline fastcall int CreateThread(ECX,EDX)
{
	$mov eax,51
	$mov ebx,1
	$int 0x40
}
 
inline fastcall void SwitchToAnotherThread()
{
	$mov eax,68
	$mov ebx,1
	$int 0x40
}
 
inline fastcall int SendWindowMessage( ECX, EDX)
{
	$mov eax, 72
	$mov ebx, 1
	$int 0x40
}
 
inline fastcall int KillProcess( ECX)
{
	$mov eax,18;
	$mov ebx,18;
	$int 0x40
}
 
#define TURN_OFF 2
#define REBOOT 3
#define KERNEL 4
inline fastcall int ExitSystem( ECX)
{
	$mov eax, 18
	$mov ebx, 9
	$int 0x40
}
 
inline fastcall ExitProcess()
{
	$mov eax,-1;
	$int 0x40
}
 
//------------------------------------------------------------------------------
 
//eax = ÿçûê ñèñòåìû (1=eng, 2=fi, 3=ger, 4=rus)
inline fastcall int GetSystemLanguage()
{
	EAX = 26;
	EBX = 5;
	$int 0x40
}
 
inline fastcall GetSkinHeight()
{
	$push ebx
	$mov  eax,48
	$mov  ebx,4
	$int 0x40
	$pop  ebx
}
 
inline fastcall void SetSystemSkin( ECX)
{
	EAX = 48;
	EBX = 8;
	$int 0x40
}
 
inline fastcall int GetScreenWidth()
{
	$mov eax, 14
	$int 0x40
	$shr eax, 16
}
 
inline fastcall int GetScreenHeight()
{
	$mov eax, 14
	$int 0x40
	$and eax,0x0000FFFF
}
 
inline fastcall int GetClientTop()
{
	$mov eax, 48
	$mov ebx, 5
	$int 0x40
    $mov eax, ebx
    $shr eax, 16
}
 
inline fastcall int GetClientHeight()
{
	$mov eax, 48
	$mov ebx, 5
	$int 0x40
    $mov eax, ebx
}
 
 
inline fastcall dword LoadLibrary( ECX)
{
	$mov eax, 68 
	$mov ebx, 19
	$int  0x40
}
 
inline fastcall int TestBit( EAX, CL)
{
	$shr eax,cl
	$and eax,1
}
 
inline fastcall int PlaySpeaker( ESI)
{
	$mov eax, 55
	$mov ebx, 55
	$int 0x40
}
 
inline fastcall void debugln( EDX)
{
	$push eax
	$push ebx
	$push ecx
	$mov eax, 63
	$mov ebx, 1
NEXT_CHAR:
	$mov ecx, DSDWORD[edx]
	$or	 cl, cl
	$jz  DONE
	$int 0x40
	$inc edx
	$jmp NEXT_CHAR
DONE:
	$mov cl, 13
	$int 0x40
	$mov cl, 10
	$int 0x40
	$pop ecx
	$pop ebx
	$pop eax
}
 
inline fastcall void debug( EDX)
{
	$push eax
	$push ebx
	$push ecx
	$mov eax, 63
	$mov ebx, 1
NEXT_CHAR:
	$mov ecx, DSDWORD[edx]
	$or	 cl, cl
	$jz  DONE
	$int 0x40
	$inc edx
	$jmp NEXT_CHAR
DONE:
	$pop ecx
	$pop ebx
	$pop eax
}
 
 
inline fastcall void debugch( ECX)
{
	$push eax
	$push ebx
	$mov eax,63
	$mov ebx,1
	$int 0x40
	$pop ebx
	$pop eax
}
//------------------------------------------------------------------------------
 
void DefineAndDrawWindow(dword x, y, size_w, size_h, byte WindowType,dword WindowAreaColor, EDI, ESI)
{
	EAX = 12;              // function 12:tell os about windowdraw
	EBX = 1;
	$int 0x40
	
	$xor EAX,EAX
	EBX = x << 16 + size_w; 
	ECX = y << 16 + size_h;
 
	EDX = WindowType << 24 | WindowAreaColor;
	$int 0x40
 
	EAX = 12;              // function 12:tell os about windowdraw
	EBX = 2;
	$int 0x40
}
 
inline fastcall MoveSize( EBX,ECX,EDX,ESI)
{
	$mov eax, 67
	$int 0x40
}
 
inline fastcall void DrawTitle( ECX)
{
	EAX = 71;
	EBX = 1;
	$int 0x40;
}
 
void WriteTextB(dword x,y,byte fontType, dword color, EDX)
{
	EAX = 4;
	EBX = x<<16+y;
	ECX = fontType<<24+color;
	ESI = 0;
	$int 0x40;
	$add ebx, 1<<16
	$int 0x40
}
 
void WriteText(dword x,y,byte fontType, dword color, EDX)
{
	EAX = 4;
	EBX = x<<16+y;
	ECX = fontType<<24+color;
	$int 0x40;
}
 
dword WriteBufText(dword x,y,byte fontType, dword color, EDX, EDI)
{
	EAX = 4;
	EBX = x<<16+y;
	ECX = fontType<<24+color;
	$int 0x40;
}
 
void WriteNumber(dword x,y,byte fontType, dword color, count, ECX)
{
	EAX = 47;
	EBX = count<<16;
	EDX = x<<16+y;
	ESI = fontType<<24+color;
	$int 0x40;
}
 
void CopyScreen(dword EBX, x, y, w, h)
{
  EAX = 36;
  ECX = w << 16 + h;
  EDX = x << 16 + y;
  $int  0x40;
}
 
:dword GetPixelColor(dword x, x_size, y)
{
	$mov eax, 35
	EBX= y*x_size+x;
	$int 0x40
}
 
 
void _PutImage(dword x,y, w,h, EBX)
{
	EAX = 7;
	ECX = w<<16+h;
	EDX = x<<16+y;
	$int 0x40
}
 
void PutPaletteImage(dword EBX,w,h,x,y,ESI,EDI)
{
	EAX = 65;
	ECX = w<<16+h;
	EDX = x<<16+y;
	EBP = 0;
	$int 0x40
} 
 
inline fastcall void PutPixel( EBX,ECX,EDX)
{
  EAX=1;
  $int 0x40
}
 
void DrawBar(dword x,y,w,h,EDX)
{
	if (h<=0) || (h>60000) || (w<=0) || (w>60000) return; //bad boy :)
	EAX = 13;
	EBX = x<<16+w;
	ECX = y<<16+h;
 	$int 0x40
}
 
void DefineButton(dword x,y,w,h,EDX,ESI)
{
	EAX = 8;
	$push edx
	EDX += BT_DEL;
	$int 0x40;
	$pop edx
	EBX = x<<16+w;
	ECX = y<<16+h;
	$int 0x40
}
 
inline RefreshWindow(dword ID_REFRESH,ID_ACTIVE)
{
	EAX = 18;
	EBX = 22;
	ECX = 3;
	EDX = ID_REFRESH;
	$int 0x40
	EAX = 18;
	EBX = 3;
	EDX = ID_ACTIVE;
	$int 0x40
}
 
inline getIPC(ECX,EDX)
{
	$mov EAX,60
	$mov EBX,2
	$int 0x40
}
 
inline sendIPC(ECX,EDX,ESI)
{
	$mov EAX,60
	$mov EBX,1
	$int 0x40
}
 
void UnsafeDefineButton(dword x,y,w,h,EDX,ESI)
{
	EAX = 8;
	EBX = x<<16+w;
	ECX = y<<16+h;
	$int 0x40
}
 
inline fastcall void DeleteButton( EDX)
{
	EAX = 8;
	EDX += BT_DEL;
	$int 0x40
}
 
inline fastcall dword GetStartTime()
{
	$mov eax,26
	$mov ebx,9
	$int 0x40
}
 
:dword X_EventRedrawWindow,Y_EventRedrawWindow;
:void _EventRedrawWindow()
{
	loop()switch(WaitEvent())
	{
		case evReDraw:
			DefineAndDrawWindow(X_EventRedrawWindow,Y_EventRedrawWindow,100,1,1,0x34,0xFFFFFF,"");
			pause(10);
			ExitProcess();
			break;
	}
}
:void EventRedrawWindow(dword x,y)
{
	dword mem = malloc(4096);
	X_EventRedrawWindow = x;
	Y_EventRedrawWindow = y;
	CreateThread(#_EventRedrawWindow,mem+4092);
}
 
:dword ALERT_TEXT;
:void dialog_alert()
{
	byte id;
	loop()switch(WaitEvent())
	{
		case evReDraw:
			DefineAndDrawWindow(215,100,250,200,0x34,0xFFFFFF,"Alert");
			WriteTextB(5,5,0x90,0x0,ALERT_TEXT);
		break;
		case evKey:
		case evButton:
			id=GetButtonID();
			if (id==1) ExitProcess();
		break;
	}
}
:dword alert(dword text)
{
	dword mem = malloc(4096);
	ALERT_TEXT = text;
	CreateThread(#dialog_alert,mem+4092);
	return mem;
}
 
:struct _screen
{
	dword width,height;
} screen;
 
:struct _skin
{
	dword width,height;
} SKIN;
 
:void DrawDate(dword x, y, color, in_date)
{
	//char text[15];
	EDI = in_date;
	EAX = 47;
	EBX = 2<<16;
	EDX = x<<16+y;
	ESI = 0x80<<24+color;
	ECX = EDI.date.day;
	$int 0x40;
	EDX += 18<<16;
	ECX = EDI.date.month;
	$int 0x40;
	EDX += 18<<16;
	EBX = 4<<16;
	ECX = EDI.date.year;
	$int 0x40;
	PutPixel(x+14,y+6,color);
	PutPixel(x+32,y+6,color);
	//sprintf(#text,"%d",EDI.date.year);
	//WriteText(x, y, 0x80, 0x000000, #text);
}
 
:void __path_name__(dword BUF,PATH)
{
	dword beg = PATH;
	dword pos = PATH;
	dword sav = PATH;
	dword i;
	while(DSBYTE[pos])
	{
		if(DSBYTE[pos]=='/')sav = pos;
		pos++;
	}
	i = sav-beg;
	while(i)
	{
		DSBYTE[BUF] = DSBYTE[beg];
		beg++;
		BUF++;
		i--;
	}
	/*while(DSBYTE[beg])
	{
		DSBYTE[BUF1] = DSBYTE[beg];
		beg++;
		BUF1++;
	}*/
	//DSBYTE[BUF1] = 0;
	DSBYTE[BUF] = 0;
}
char __BUF_DIR__[4096];
:struct SELF
{
	dword dir;
	dword file;
	dword path;
} self;
 
dword __generator;  // random number generator - äëÿ ãåíåðàöèè ñëó÷àéíûõ ÷èñåë
 
:dword program_path_length;
 
 
 
 
 
//The initialization of the initial data before running
void ______INIT______()
{
	self.dir = #__BUF_DIR__;
	self.file = 0;
	self.path = I_Path;
	__path_name__(#__BUF_DIR__,I_Path);
	
	SKIN.height   = GetSkinHeight();
	screen.width  = GetScreenWidth();
	screen.height = GetScreenHeight();
	
	//program_path_length = strlen(I_Path);
	MOUSE_TIME = 50; //Default 500 ms.
	__generator = GetStartTime();
	//mem_Init();
	main();
}
 
______STOP______:
#endif
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>

Rev 5646	Rev 5648
1	//CODED by Veliant, Leency, Nable. GNU GPL licence.	1	//CODED by Veliant, Leency, Nable. GNU GPL licence.
2	#ifndef INCLUDE_KOLIBRI_H	2	#ifndef INCLUDE_KOLIBRI_H
3	#define INCLUDE_KOLIBRI_H	3	#define INCLUDE_KOLIBRI_H
4		4
5	#startaddress 0	5	#startaddress 0
6	#code32 TRUE	6	#code32 TRUE
7		7
8	char os_name[8] = {'M','E','N','U','E','T','0','1'};	8	char os_name[8] = {'M','E','N','U','E','T','0','1'};
9	dword os_version = 0x00000001;	9	dword os_version = 0x00000001;
10	dword start_addr = #load_init_main;	10	dword start_addr = #______INIT______;
11	dword final_addr = #stop+32;	11	dword final_addr = #______STOP______+32;
12	dword alloc_mem = MEMSIZE;	12	dword alloc_mem = MEMSIZE;
13	dword x86esp_reg = MEMSIZE;	13	dword x86esp_reg = MEMSIZE;
14	dword I_Param = #param;	14	dword I_Param = #param;
15	dword I_Path = #program_path;	15	dword I_Path = #program_path;
16	char param[4096];	16	char param[4096];
17	char program_path[4096];	17	char program_path[4096];
18		18
19	#define NULL 0	19	#define NULL 0
20	#define OLD -1	20	#define OLD -1
21	#define true 1	21	#define true 1
22	#define false 0	22	#define false 0
23		23
24	//Events	24	//Events
25	#define evReDraw 1	25	#define evReDraw 1
26	#define evKey 2	26	#define evKey 2
27	#define evButton 3	27	#define evButton 3
28	#define evDesktop 5	28	#define evDesktop 5
29	#define evMouse 6	29	#define evMouse 6
30	#define evIPC 7	30	#define evIPC 7
31	#define evNetwork 8	31	#define evNetwork 8
32	#define evDebug 9	32	#define evDebug 9
33		33
34	//Button options	34	//Button options
35	#define BT_DEL 0x80000000	35	#define BT_DEL 0x80000000
36	#define BT_HIDE 0x40000000	36	#define BT_HIDE 0x40000000
37	#define BT_NOFRAME 0x20000000	37	#define BT_NOFRAME 0x20000000
38		38
39	//Button MOUSE	39	//Button MOUSE
40	#define MOUSE_LEFT 001b	40	#define MOUSE_LEFT 001b
41	#define MOUSE_RIGHT 010b	41	#define MOUSE_RIGHT 010b
42	#define MOUSE_LR 011b	42	#define MOUSE_LR 011b
43	#define MOUSE_CENTER 100b	43	#define MOUSE_CENTER 100b
44		44
45	//ASCII KEYS	45	//ASCII KEYS
46	#define ASCII_KEY_BS 008	46	#define ASCII_KEY_BS 008
47	#define ASCII_KEY_TAB 009	47	#define ASCII_KEY_TAB 009
48	#define ASCII_KEY_ENTER 013	48	#define ASCII_KEY_ENTER 013
49	#define ASCII_KEY_ESC 027	49	#define ASCII_KEY_ESC 027
50	#define ASCII_KEY_DEL 182	50	#define ASCII_KEY_DEL 182
51	#define ASCII_KEY_INS 185	51	#define ASCII_KEY_INS 185
52	#define ASCII_KEY_SPACE 032	52	#define ASCII_KEY_SPACE 032
53		53
54	#define ASCII_KEY_LEFT 176	54	#define ASCII_KEY_LEFT 176
55	#define ASCII_KEY_RIGHT 179	55	#define ASCII_KEY_RIGHT 179
56	#define ASCII_KEY_DOWN 177	56	#define ASCII_KEY_DOWN 177
57	#define ASCII_KEY_UP 178	57	#define ASCII_KEY_UP 178
58	#define ASCII_KEY_HOME 180	58	#define ASCII_KEY_HOME 180
59	#define ASCII_KEY_END 181	59	#define ASCII_KEY_END 181
60	#define ASCII_KEY_PGDN 183	60	#define ASCII_KEY_PGDN 183
61	#define ASCII_KEY_PGUP 184	61	#define ASCII_KEY_PGUP 184
62		62
63	//allow event mask	63	//allow event mask
64	#define EVENT_MASK_REDRAW 000000001b	64	#define EVENT_MASK_REDRAW 000000001b
65	#define EVENT_MASK_KEYBOARD 000000010b	65	#define EVENT_MASK_KEYBOARD 000000010b
66	#define EVENT_MASK_BUTTONS 000000100b	66	#define EVENT_MASK_BUTTONS 000000100b
67	#define EVENT_MASK_DESKTOP 000010000b	67	#define EVENT_MASK_DESKTOP 000010000b
68	#define EVENT_MASK_MOUSE 000100000b	68	#define EVENT_MASK_MOUSE 000100000b
69	#define EVENT_MASK_IPC 001000000b	69	#define EVENT_MASK_IPC 001000000b
70	#define EVENT_MASK_NETWORK 010000000b	70	#define EVENT_MASK_NETWORK 010000000b
71	#define EVENT_MASK_DEBUG 100000000b	71	#define EVENT_MASK_DEBUG 100000000b
72		72
73	//ARGS FUNCTION	73	//ARGS FUNCTION
74	#define END_ARGS 0xFF00FF	74	#define END_ARGS 0xFF00FF
75	//-------------------------------------------------------------------------	75	//-------------------------------------------------------------------------
76		76
77	:struct raw_image {	77	:struct raw_image {
78	dword w, h, data;	78	dword w, h, data;
79	};	79	};
80		80
81	/**	81	/**
82	* The structure of the MOUSE	82	* The structure of the MOUSE
83	* x - coordinate X	83	* x - coordinate X
84	* y - coordinate Y	84	* y - coordinate Y
85	* xx and yy - time coordinates	85	* xx and yy - time coordinates
86	* lkm - left MOUSE button	86	* lkm - left MOUSE button
87	* pkm - right MOUSE button	87	* pkm - right MOUSE button
88	* mkm - MOUSE wheel	88	* mkm - MOUSE wheel
89	* key - keycode button	89	* key - keycode button
90	* tmp - time keycode	90	* tmp - time keycode
91	* down - key event press	91	* down - key event press
92	* up - key release events	92	* up - key release events
93	* move - event MOUSE movements	93	* move - event MOUSE movements
94	* click - when clicked	94	* click - when clicked
95	* dblclick - double-click the default 50 (500 ms)	95	* dblclick - double-click the default 50 (500 ms)
96	*/	96	*/
97		97
98	:dword __TMP_TIME,MOUSE_TIME;	98	:dword __TMP_TIME,MOUSE_TIME;
99	:struct MOUSE	99	:struct MOUSE
100	{	100	{
101	signed x,y,xx,yy,lkm,mkm,pkm,key,tmp,tmp_time,hor,vert,down,up,move,click,dblclick,left,top;	101	signed x,y,xx,yy,lkm,mkm,pkm,key,tmp,tmp_time,hor,vert,down,up,move,click,dblclick,left,top;
102	dword handle,_;	102	dword handle,_;
103	byte cmd;	103	byte cmd;
104	void clearTime();	104	void clearTime();
105	void get();	105	void get();
106	void set();	106	void set();
107	void center();	107	void center();
108	dword hide();	108	dword hide();
109	void slider();	109	void slider();
110	void show();	110	void show();
111	} mouse;	111	} mouse;
112	:void MOUSE::clearTime()	112	:void MOUSE::clearTime()
113	{	113	{
114	tmp_time = GetStartTime()+MOUSE_TIME;	114	tmp_time = GetStartTime()+MOUSE_TIME;
115	}	115	}
116	:void MOUSE::show()	116	:void MOUSE::show()
117	{	117	{
118	if(!handle)return;	118	if(!handle)return;
119	ECX = handle;	119	ECX = handle;
120	EAX = 37;	120	EAX = 37;
121	EBX = 5;	121	EBX = 5;
122	$int 0x40;	122	$int 0x40;
123	}	123	}
124	:dword MOUSE::hide()	124	:dword MOUSE::hide()
125	{	125	{
126	if(!_)	126	if(!_)
127	{	127	{
128	EAX = 68;	128	EAX = 68;
129	EBX = 12;	129	EBX = 12;
130	ECX = 32324;	130	ECX = 32324;
131	$int 0x40	131	$int 0x40
132	ECX = EAX;	132	ECX = EAX;
133	_ = EAX;	133	_ = EAX;
134	} else ECX = _;	134	} else ECX = _;
135	EAX = 37;	135	EAX = 37;
136	EBX = 4;	136	EBX = 4;
137	DX = 2;	137	DX = 2;
138	$int 0x40;	138	$int 0x40;
139	handle = EAX;	139	handle = EAX;
140	ECX = EAX;	140	ECX = EAX;
141	EAX = 37;	141	EAX = 37;
142	EBX = 5;	142	EBX = 5;
143	$int 0x40;	143	$int 0x40;
144	handle = EAX;	144	handle = EAX;
145	}	145	}
146		146
147	//set new attributes MOUSE	147	//set new attributes MOUSE
148	:void MOUSE::set()	148	:void MOUSE::set()
149	{	149	{
150	if((xx!=x)\|\|(yy!=y))	150	if((xx!=x)\|\|(yy!=y))
151	{	151	{
152	EAX = 18;	152	EAX = 18;
153	EBX = 19;	153	EBX = 19;
154	ECX = 4;	154	ECX = 4;
155	EDX = (x<<16)+y;	155	EDX = (x<<16)+y;
156	$int 0x40	156	$int 0x40
157	//move = true;	157	//move = true;
158	}	158	}
159	if((key)\|\|(lkm\|mkm\|pkm))&&(down\|up\|click\|dblclick\|move)	159	if((key)\|\|(lkm\|mkm\|pkm))&&(down\|up\|click\|dblclick\|move)
160	{	160	{
161	if(lkm\|mkm\|pkm)key=(lkm)\|(pkm<<1)\|(2<	161	if(lkm\|mkm\|pkm)key=(lkm)\|(pkm<<1)\|(2<
162	EAX = 18;	162	EAX = 18;
163	EBX = 19;	163	EBX = 19;
164	ECX = key;	164	ECX = key;
165	EDX = (x<<16)+y;	165	EDX = (x<<16)+y;
166	$int 0x40	166	$int 0x40
167	}	167	}
168	}	168	}
169		169
170	:void MOUSE::center()	170	:void MOUSE::center()
171	{	171	{
172	EAX = 18;	172	EAX = 18;
173	EBX = 15;	173	EBX = 15;
174	$int 0x40	174	$int 0x40
175	}	175	}
176		176
177	//get new attributes MOUSE	177	//get new attributes MOUSE
178	:void MOUSE::get()	178	:void MOUSE::get()
179	{	179	{
180	EAX = 37;	180	EAX = 37;
181	EBX = 1;	181	EBX = 1;
182	$int 0x40	182	$int 0x40
183	$mov ebx, eax	183	$mov ebx, eax
184	$shr eax, 16	184	$shr eax, 16
185	$and ebx,0x0000FFFF	185	$and ebx,0x0000FFFF
186	x = EAX;	186	x = EAX;
187	y = EBX;	187	y = EBX;
188	if (x>6000) x-=65535;	188	if (x>6000) x-=65535;
189	if (y>6000) y-=65535;	189	if (y>6000) y-=65535;
190	EAX = 37;	190	EAX = 37;
191	EBX = 2;	191	EBX = 2;
192	$int 0x40	192	$int 0x40
193	$mov ebx, eax	193	$mov ebx, eax
194	$mov ecx, eax	194	$mov ecx, eax
195	key = EAX;	195	key = EAX;
196	$and eax, 0x00000001	196	$and eax, 0x00000001
197	$shr ebx, 1	197	$shr ebx, 1
198	$and ebx, 0x00000001	198	$and ebx, 0x00000001
199	$shr ecx, 2	199	$shr ecx, 2
200	$and ecx, 0x00000001	200	$and ecx, 0x00000001
201	lkm = EAX;	201	lkm = EAX;
202	pkm = EBX;	202	pkm = EBX;
203	mkm = ECX;	203	mkm = ECX;
204		204
205	//when you release the MOUSE button	205	//when you release the MOUSE button
206	// Mouse Up Event	206	// Mouse Up Event
207	if((cmd)&&!(key)){	207	if((cmd)&&!(key)){
208	up = true;	208	up = true;
209	down = false;	209	down = false;
210	if(!move) click = true;	210	if(!move) click = true;
211	move = false;	211	move = false;
212	__TMP_TIME = GetStartTime();	212	__TMP_TIME = GetStartTime();
213	if(__TMP_TIME-tmp_time<=MOUSE_TIME){ dblclick = true;click = false; }	213	if(__TMP_TIME-tmp_time<=MOUSE_TIME){ dblclick = true;click = false; }
214	tmp_time = __TMP_TIME;	214	tmp_time = __TMP_TIME;
215	//returns the key code	215	//returns the key code
216	key = tmp;	216	key = tmp;
217	lkm = 1&tmp;	217	lkm = 1&tmp;
218	pkm = 2&tmp;	218	pkm = 2&tmp;
219	pkm >>= 1;	219	pkm >>= 1;
220	mkm = 4&tmp;	220	mkm = 4&tmp;
221	mkm >>= 2;	221	mkm >>= 2;
222	cmd = false;	222	cmd = false;
223	}	223	}
224		224
225	//when you press the MOUSE button	225	//when you press the MOUSE button
226	// Mouse Down Event/Move Event	226	// Mouse Down Event/Move Event
227	else {	227	else {
228	up = false;	228	up = false;
229	click = false;	229	click = false;
230	dblclick = false;	230	dblclick = false;
231	down = false;	231	down = false;
232	// Mouse Move Event	232	// Mouse Move Event
233	if((xx!=x)\|\|(yy!=y))	233	if((xx!=x)\|\|(yy!=y))
234	{	234	{
235	move = true;	235	move = true;
236	xx = x;	236	xx = x;
237	yy = y;	237	yy = y;
238	}	238	}
239	else move = false;	239	else move = false;
240	if(key)if(!cmd) {down = true;cmd = true;tmp=key;}	240	if(key)if(!cmd) {down = true;cmd = true;tmp=key;}
241	}	241	}
242		242
243	//scroll	243	//scroll
244	EAX = 37;	244	EAX = 37;
245	EBX = 7;	245	EBX = 7;
246	$int 0x40	246	$int 0x40
247	$mov ebx, eax	247	$mov ebx, eax
248	$shr eax, 16	248	$shr eax, 16
249	$and ebx,0x0000FFFF	249	$and ebx,0x0000FFFF
250	//hor = EAX;	250	//hor = EAX;
251	vert = EBX;	251	vert = EBX;
252	}	252	}
253		253
254		254
255		255
256	:void MOUSE::slider()	256	:void MOUSE::slider()
257	{	257	{
258	signed _x,_y;	258	signed _x,_y;
259	if(!handle)hide();	259	if(!handle)hide();
260	get();	260	get();
261	_x = x;_y = y;	261	_x = x;_y = y;
262	pause(5);	262	pause(5);
263	get();	263	get();
264	left = _x - x;	264	left = _x - x;
265	top = _y - y;	265	top = _y - y;
266	center();	266	center();
267	get();	267	get();
268	_x = x;_y = y;	268	_x = x;_y = y;
269	pause(5);	269	pause(5);
270	}	270	}
271		271
272	:struct keyboard	272	:struct keyboard
273	{	273	{
274	signed key;	274	signed key;
275	byte down,up,press;	275	byte down,up,press;
276	void get(void);	276	void get(void);
277	};	277	};
278		278
279	:void keyboard::get(void)	279	:void keyboard::get(void)
280	{	280	{
281		281
282	}	282	}
283		283
284	:struct system_colors	284	:struct system_colors
285	{	285	{
286	dword frame,grab,grab_button,grab_button_text,grab_text,	286	dword frame,grab,grab_button,grab_button_text,grab_text,
287	work,work_button,work_button_text,work_text,work_graph;	287	work,work_button,work_button_text,work_text,work_graph;
288	void get();	288	void get();
289	};	289	};
290		290
291	:void system_colors::get()	291	:void system_colors::get()
292	{	292	{
293	EAX = 48;	293	EAX = 48;
294	EBX = 3;	294	EBX = 3;
295	ECX = #frame;	295	ECX = #frame;
296	EDX = 40;	296	EDX = 40;
297	$int 0x40	297	$int 0x40
298	}	298	}
299		299
300	//------------------------------------------------------------------------------	300	//------------------------------------------------------------------------------
301	:dword wait_event_code;	301	:dword wait_event_code;
302	inline fastcall dword WaitEvent()	302	inline fastcall dword WaitEvent()
303	{	303	{
304	$mov eax,10	304	$mov eax,10
305	$int 0x40	305	$int 0x40
306	wait_event_code = EAX;	306	wait_event_code = EAX;
307	//if(wait_event_code==evMouse) MOUSE.get();	307	//if(wait_event_code==evMouse) MOUSE.get();
308	//return wait_event_code;	308	//return wait_event_code;
309	}	309	}
310		310
311	inline fastcall dword CheckEvent()	311	inline fastcall dword CheckEvent()
312	{	312	{
313	$mov eax,11	313	$mov eax,11
314	$int 0x40	314	$int 0x40
315	}	315	}
316		316
317	inline fastcall dword WaitEventTimeout(EBX)	317	inline fastcall dword WaitEventTimeout(EBX)
318	{	318	{
319	$mov eax,23	319	$mov eax,23
320	$int 0x40	320	$int 0x40
321	}	321	}
322		322
323	inline fastcall SetEventMask(EBX)	323	inline fastcall SetEventMask(EBX)
324	{	324	{
325	$mov eax,40	325	$mov eax,40
326	$int 0x40	326	$int 0x40
327	}	327	}
328		328
329	inline fastcall ScancodesGeting(){	329	inline fastcall ScancodesGeting(){
330	$mov eax,66	330	$mov eax,66
331	$mov ebx,1	331	$mov ebx,1
332	$mov ecx,1 //áª ª®¤ë	332	$mov ecx,1 //áª ª®¤ë
333	$int 0x40	333	$int 0x40
334	}	334	}
335		335
336	inline fastcall word GetKey() //+Gluk fix	336	inline fastcall word GetKey() //+Gluk fix
337	{	337	{
338	$push edx	338	$push edx
339	GETKEY:	339	GETKEY:
340	$mov eax,2	340	$mov eax,2
341	$int 0x40	341	$int 0x40
342	$cmp eax,1	342	$cmp eax,1
343	$jne GETKEYI	343	$jne GETKEYI
344	$mov ah,dh	344	$mov ah,dh
345	$jmp GETKEYII //jz?	345	$jmp GETKEYII //jz?
346	GETKEYI:	346	GETKEYI:
347	$mov dh,ah	347	$mov dh,ah
348	$jmp GETKEY	348	$jmp GETKEY
349	GETKEYII:	349	GETKEYII:
350	$pop edx	350	$pop edx
351	$shr eax,8	351	$shr eax,8
352	}	352	}
353		353
354	inline fastcall int GetFullKey()	354	inline fastcall int GetFullKey()
355	{	355	{
356	$mov eax,2	356	$mov eax,2
357	$int 0x40	357	$int 0x40
358	}	358	}
359		359
360		360
361	inline fastcall pause(EBX)	361	inline fastcall pause(EBX)
362	{	362	{
363	$mov eax, 5	363	$mov eax, 5
364	$int 0x40	364	$int 0x40
365	}	365	}
366		366
367	inline fastcall word GetButtonID()	367	inline fastcall word GetButtonID()
368	{	368	{
369	$mov eax,17	369	$mov eax,17
370	$int 0x40	370	$int 0x40
371	$shr eax,8	371	$shr eax,8
372	}	372	}
373		373
374	inline fastcall dword GetFreeRAM()	374	inline fastcall dword GetFreeRAM()
375	{	375	{
376	$mov eax, 18	376	$mov eax, 18
377	$mov ebx, 16	377	$mov ebx, 16
378	$int 0x40	378	$int 0x40
379	//return eax = ðàçìåð ñâîáîäíîé ïàìÿòè â êèëîáàéòàõ	379	//return eax = ðàçìåð ñâîáîäíîé ïàìÿòè â êèëîáàéòàõ
380	}	380	}
381		381
382	inline void draw_line(dword x1,y1,x2,y2,color)	382	inline void draw_line(dword x1,y1,x2,y2,color)
383	{	383	{
384	x2--;y2--;y1--;	384	x2--;y2--;y1--;
385	$mov EAX,38	385	$mov EAX,38
386	EBX = x1<<16;	386	EBX = x1<<16;
387	EBX \|= x2;	387	EBX \|= x2;
388	ECX = y1<<16;	388	ECX = y1<<16;
389	ECX \|= y2;	389	ECX \|= y2;
390	$mov EDX,color	390	$mov EDX,color
391	$int 0x40	391	$int 0x40
392	}	392	}
393		393
394	inline fastcall dword LoadDriver(ECX) //ECX - èìÿ äðàéâåðà	394	inline fastcall dword LoadDriver(ECX) //ECX - èìÿ äðàéâåðà
395	{	395	{
396	$mov eax, 68	396	$mov eax, 68
397	$mov ebx, 16	397	$mov ebx, 16
398	$int 0x40	398	$int 0x40
399	//return 0 - íåóäà÷à, èíà÷å eax = õýíäë äðàéâåðà	399	//return 0 - íåóäà÷à, èíà÷å eax = õýíäë äðàéâåðà
400	}	400	}
401		401
402	inline fastcall dword RuleDriver(ECX) //óêàçàòåëü íà óïðàâëÿþùóþ ñòðóêòóðó	402	inline fastcall dword RuleDriver(ECX) //óêàçàòåëü íà óïðàâëÿþùóþ ñòðóêòóðó
403	{	403	{
404	$mov eax, 68	404	$mov eax, 68
405	$mov ebx, 17	405	$mov ebx, 17
406	$int 0x40	406	$int 0x40
407	//return eax = îïðåäåëÿåòñÿ äðàéâåðîì	407	//return eax = îïðåäåëÿåòñÿ äðàéâåðîì
408	}	408	}
409		409
410	struct proc_info	410	struct proc_info
411	{	411	{
412	#define SelfInfo -1	412	#define SelfInfo -1
413	dword use_cpu;	413	dword use_cpu;
414	word pos_in_stack,num_slot,rezerv1;	414	word pos_in_stack,num_slot,rezerv1;
415	unsigned char name[11];	415	unsigned char name[11];
416	char rezerv2;	416	char rezerv2;
417	dword adress,use_memory,ID,left,top,width,height;	417	dword adress,use_memory,ID,left,top,width,height;
418	word status_slot,rezerv3;	418	word status_slot,rezerv3;
419	dword work_left,work_top,work_width,work_height;	419	dword work_left,work_top,work_width,work_height;
420	char status_window;	420	char status_window;
421	dword cwidth,cheight;	421	dword cwidth,cheight;
422	byte reserved[1024-71-8];	422	byte reserved[1024-71-8];
423	};	423	};
424		424
425	inline fastcall void GetProcessInfo(EBX, ECX)	425	inline fastcall void GetProcessInfo(EBX, ECX)
426	{	426	{
427	$mov eax,9;	427	$mov eax,9;
428	$int 0x40	428	$int 0x40
429	DSDWORD[EBX+71] = DSDWORD[EBX+42] - 9; //set cwidth	429	DSDWORD[EBX+71] = DSDWORD[EBX+42] - 9; //set cwidth
430	DSDWORD[EBX+75] = DSDWORD[EBX+46] - GetSkinHeight() - 4; //set cheight	430	DSDWORD[EBX+75] = DSDWORD[EBX+46] - GetSkinHeight() - 4; //set cheight
431	}	431	}
432		432
433	inline fastcall int GetPointOwner( EBX, ECX) //ebx=m.x, ecx=m.y	433	inline fastcall int GetPointOwner( EBX, ECX) //ebx=m.x, ecx=m.y
434	{	434	{
435	$mov eax,34	435	$mov eax,34
436	$int 0x40	436	$int 0x40
437	}	437	}
438		438
439	inline fastcall int GetProcessSlot( ECX)	439	inline fastcall int GetProcessSlot( ECX)
440	{	440	{
441	EAX = 18;	441	EAX = 18;
442	EBX = 21;	442	EBX = 21;
443	$int 0x40	443	$int 0x40
444	}	444	}
445		445
446	inline fastcall int GetActiveProcess()	446	inline fastcall int GetActiveProcess()
447	{	447	{
448	EAX = 18;	448	EAX = 18;
449	EBX = 7;	449	EBX = 7;
450	$int 0x40	450	$int 0x40
451	}	451	}
452		452
453	:int CheckActiveProcess(int Form_ID)	453	:int CheckActiveProcess(int Form_ID)
454	{	454	{
455	int id9=GetProcessSlot(Form_ID);	455	int id9=GetProcessSlot(Form_ID);
456	if (id9==GetActiveProcess()) return 1;	456	if (id9==GetActiveProcess()) return 1;
457	return 0;	457	return 0;
458	}	458	}
459		459
460	inline fastcall void ActivateWindow( ECX)	460	inline fastcall void ActivateWindow( ECX)
461	{	461	{
462	EAX = 18;	462	EAX = 18;
463	EBX = 3;	463	EBX = 3;
464	$int 0x40	464	$int 0x40
465	}	465	}
466		466
467	inline fastcall int MinimizeWindow()	467	inline fastcall int MinimizeWindow()
468	{	468	{
469	EAX = 18;	469	EAX = 18;
470	EBX = 10;	470	EBX = 10;
471	$int 0x40	471	$int 0x40
472	}	472	}
473		473
474	inline fastcall int CreateThread(ECX,EDX)	474	inline fastcall int CreateThread(ECX,EDX)
475	{	475	{
476	$mov eax,51	476	$mov eax,51
477	$mov ebx,1	477	$mov ebx,1
478	$int 0x40	478	$int 0x40
479	}	479	}
480		480
481	inline fastcall void SwitchToAnotherThread()	481	inline fastcall void SwitchToAnotherThread()
482	{	482	{
483	$mov eax,68	483	$mov eax,68
484	$mov ebx,1	484	$mov ebx,1
485	$int 0x40	485	$int 0x40
486	}	486	}
487		487
488	inline fastcall int SendWindowMessage( ECX, EDX)	488	inline fastcall int SendWindowMessage( ECX, EDX)
489	{	489	{
490	$mov eax, 72	490	$mov eax, 72
491	$mov ebx, 1	491	$mov ebx, 1
492	$int 0x40	492	$int 0x40
493	}	493	}
494		494
495	inline fastcall int KillProcess( ECX)	495	inline fastcall int KillProcess( ECX)
496	{	496	{
497	$mov eax,18;	497	$mov eax,18;
498	$mov ebx,18;	498	$mov ebx,18;
499	$int 0x40	499	$int 0x40
500	}	500	}

Subversion Repositories Kolibri OS

(root)/programs/cmm/lib/kolibri.h @ 6651 – Rev 5646 → 5648