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


//CODED by Veliant, Leency, Nable. GNU GPL licence.
 
#startaddress 0
#code32 TRUE
 
char   os_name[8]   = {'M','E','N','U','E','T','0','1'};
dword  os_version   = 0x00000001;
dword  start_addr   = #main;
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 evMouse   6
#define evButton  3
#define evKey     2
#define evReDraw  1
 
//Button options
#define BT_DEL      0x80000000
#define BT_HIDE     0x40000000
#define BT_NOFRAME  0x20000000
 
//-------------------------------------------------------------------------
 
struct mouse
{
	signed int x,y,lkm,pkm,hor,vert;
	void get();
};
 
void mouse::get()
{
	EAX = 37;
	EBX = 1;
	$int	0x40
	$mov	ebx, eax
	$shr	eax, 16
	$and	ebx,0x0000FFFF
	x = EAX;
	y = EBX;
	EAX = 37;
	EBX = 2;
	$int	0x40
	$mov	ebx, eax
	$and	eax, 0x00000001
	$shr	ebx, 1
	$and	ebx, 0x00000001
	lkm = EAX;
	pkm = EBX;
	EAX = 37; //áªà®««
	EBX = 7;
	$int	0x40
	$mov	ebx, eax
	$shr	eax, 16
	$and	ebx,0x0000FFFF
	//hor = EAX;
	vert = EBX;
	if (y>6000) y=0;
}
 
 
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
}
 
//------------------------------------------------------------------------------
 
inline fastcall dword WaitEvent()
{
	$mov eax,10
	$int 0x40
}
 
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 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 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;
	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
}
 
inline fastcall void ActivateWindow( ECX)
{
	EAX = 18;
	EBX = 3;
	$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 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 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:
	$mov cl, 13
	$int 0x40
	$mov cl, 10
	$int 0x40
	$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, sizeX,sizeY, byte WindowType,dword WindowAreaColor, EDI, ESI)
{
	EAX = 12;              // function 12:tell os about windowdraw
	EBX = 1;
	$int 0x40
	
	EAX = 0;
	EBX = x << 16 + sizeX;
	ECX = y << 16 + sizeY;
	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
}
 
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;
}
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>

Rev 3458	Rev 3467
1	//CODED by Veliant, Leency, Nable. GNU GPL licence.	1	//CODED by Veliant, Leency, Nable. GNU GPL licence.
2		2
3	#startaddress 0	3	#startaddress 0
4	#code32 TRUE	4	#code32 TRUE
5		5
6	char os_name[8] = {'M','E','N','U','E','T','0','1'};	6	char os_name[8] = {'M','E','N','U','E','T','0','1'};
7	dword os_version = 0x00000001;	7	dword os_version = 0x00000001;
8	dword start_addr = #main;	8	dword start_addr = #main;
9	dword final_addr = #stop+32;	9	dword final_addr = #stop+32;
10	dword alloc_mem = MEMSIZE;	10	dword alloc_mem = MEMSIZE;
11	dword x86esp_reg = MEMSIZE;	11	dword x86esp_reg = MEMSIZE;
12	dword I_Param = #param;	12	dword I_Param = #param;
13	dword I_Path = #program_path;	13	dword I_Path = #program_path;
14	char param[4096];	14	char param[4096];
15	char program_path[4096];	15	char program_path[4096];
16		16
17	#define NULL 0	17	#define NULL 0
18	#define OLD -1	18	#define OLD -1
19	#define true 1	19	#define true 1
20	#define false 0	20	#define false 0
21		21
22	//Events	22	//Events
23	#define evMouse 6	23	#define evMouse 6
24	#define evButton 3	24	#define evButton 3
25	#define evKey 2	25	#define evKey 2
26	#define evReDraw 1	26	#define evReDraw 1
27		27
28	//Button options	28	//Button options
29	#define BT_DEL 0x80000000	29	#define BT_DEL 0x80000000
30	#define BT_HIDE 0x40000000	30	#define BT_HIDE 0x40000000
31	#define BT_NOFRAME 0x20000000	31	#define BT_NOFRAME 0x20000000
32		32
33	//-------------------------------------------------------------------------	33	//-------------------------------------------------------------------------
34		34
35	struct mouse	35	struct mouse
36	{	36	{
37	signed int x,y,lkm,pkm,hor,vert;	37	signed int x,y,lkm,pkm,hor,vert;
38	void get();	38	void get();
39	};	39	};
40		40
41	void mouse::get()	41	void mouse::get()
42	{	42	{
43	EAX = 37;	43	EAX = 37;
44	EBX = 1;	44	EBX = 1;
45	$int 0x40	45	$int 0x40
46	$mov ebx, eax	46	$mov ebx, eax
47	$shr eax, 16	47	$shr eax, 16
48	$and ebx,0x0000FFFF	48	$and ebx,0x0000FFFF
49	x = EAX;	49	x = EAX;
50	y = EBX;	50	y = EBX;
51	EAX = 37;	51	EAX = 37;
52	EBX = 2;	52	EBX = 2;
53	$int 0x40	53	$int 0x40
54	$mov ebx, eax	54	$mov ebx, eax
55	$and eax, 0x00000001	55	$and eax, 0x00000001
56	$shr ebx, 1	56	$shr ebx, 1
57	$and ebx, 0x00000001	57	$and ebx, 0x00000001
58	lkm = EAX;	58	lkm = EAX;
59	pkm = EBX;	59	pkm = EBX;
60	EAX = 37; //áªà®««	60	EAX = 37; //áªà®««
61	EBX = 7;	61	EBX = 7;
62	$int 0x40	62	$int 0x40
63	$mov ebx, eax	63	$mov ebx, eax
64	$shr eax, 16	64	$shr eax, 16
65	$and ebx,0x0000FFFF	65	$and ebx,0x0000FFFF
66	//hor = EAX;	66	//hor = EAX;
67	vert = EBX;	67	vert = EBX;
68	if (y>6000) y=0;	68	if (y>6000) y=0;
69	}	69	}
70		70
71		71
72	struct system_colors	72	struct system_colors
73	{	73	{
74	dword frame,grab,grab_button,grab_button_text,grab_text,	74	dword frame,grab,grab_button,grab_button_text,grab_text,
75	work,work_button,work_button_text,work_text,work_graph;	75	work,work_button,work_button_text,work_text,work_graph;
76	void get();	76	void get();
77	};	77	};
78		78
79	void system_colors::get()	79	void system_colors::get()
80	{	80	{
81	EAX = 48;	81	EAX = 48;
82	EBX = 3;	82	EBX = 3;
83	ECX = #frame;	83	ECX = #frame;
84	EDX = 40;	84	EDX = 40;
85	$int 0x40	85	$int 0x40
86	}	86	}
87		87
88	//------------------------------------------------------------------------------	88	//------------------------------------------------------------------------------
89		89
90	inline fastcall dword WaitEvent()	90	inline fastcall dword WaitEvent()
91	{	91	{
92	$mov eax,10	92	$mov eax,10
93	$int 0x40	93	$int 0x40
94	}	94	}
95		95
96	inline fastcall dword CheckEvent()	96	inline fastcall dword CheckEvent()
97	{	97	{
98	$mov eax,11	98	$mov eax,11
99	$int 0x40	99	$int 0x40
100	}	100	}
101		101
102	inline fastcall dword WaitEventTimeout( EBX)	102	inline fastcall dword WaitEventTimeout( EBX)
103	{	103	{
104	$mov eax,23	104	$mov eax,23
105	$int 0x40	105	$int 0x40
106	}	106	}
107		107
108	inline fastcall SetEventMask( EBX)	108	inline fastcall SetEventMask( EBX)
109	{	109	{
110	$mov eax,40	110	$mov eax,40
111	$int 0x40	111	$int 0x40
112	}	112	}
113		113
114	inline fastcall ScancodesGeting(){	114	inline fastcall ScancodesGeting(){
115	$mov eax,66	115	$mov eax,66
116	$mov ebx,1	116	$mov ebx,1
117	$mov ecx,1 //áª ª®¤ë	117	$mov ecx,1 //áª ª®¤ë
118	$int 0x40	118	$int 0x40
119	}	119	}
120		120
121	inline fastcall word GetKey() //+Gluk fix	121	inline fastcall word GetKey() //+Gluk fix
122	{	122	{
123	$push edx	123	$push edx
124	GETKEY:	124	GETKEY:
125	$mov eax,2	125	$mov eax,2
126	$int 0x40	126	$int 0x40
127	$cmp eax,1	127	$cmp eax,1
128	$jne GETKEYI	128	$jne GETKEYI
129	$mov ah,dh	129	$mov ah,dh
130	$jmp GETKEYII //jz?	130	$jmp GETKEYII //jz?
131	GETKEYI:	131	GETKEYI:
132	$mov dh,ah	132	$mov dh,ah
133	$jmp GETKEY	133	$jmp GETKEY
134	GETKEYII:	134	GETKEYII:
135	$pop edx	135	$pop edx
136	$shr eax,8	136	$shr eax,8
137	}	137	}
138		138
139		139
140	inline fastcall pause( EBX)	140	inline fastcall pause( EBX)
141	{	141	{
142	$mov eax, 5	142	$mov eax, 5
143	$int 0x40	143	$int 0x40
144	}	144	}
145		145
146	inline fastcall word GetButtonID()	146	inline fastcall word GetButtonID()
147	{	147	{
148	$mov eax,17	148	$mov eax,17
149	$int 0x40	149	$int 0x40
150	$shr eax,8	150	$shr eax,8
151	}	151	}
152		152
153	//----------------------------------------	153	//----------------------------------------
154		154
155	inline fastcall dword GetFreeRAM()	155	inline fastcall dword GetFreeRAM()
156	{	156	{
157	$mov eax, 18	157	$mov eax, 18
158	$mov ebx, 16	158	$mov ebx, 16
159	$int 0x40	159	$int 0x40
160	//return eax = ðàçìåð ñâîáîäíîé ïàìÿòè â êèëîáàéòàõ	160	//return eax = ðàçìåð ñâîáîäíîé ïàìÿòè â êèëîáàéòàõ
161	}	161	}
162		162
163	inline fastcall dword LoadDriver( ECX) //ECX - èìÿ äðàéâåðà	163	inline fastcall dword LoadDriver( ECX) //ECX - èìÿ äðàéâåðà
164	{	164	{
165	$mov eax, 68	165	$mov eax, 68
166	$mov ebx, 16	166	$mov ebx, 16
167	$int 0x40	167	$int 0x40
168	//return 0 - íåóäà÷à, èíà÷å eax = õýíäë äðàéâåðà	168	//return 0 - íåóäà÷à, èíà÷å eax = õýíäë äðàéâåðà
169	}	169	}
170		170
171	inline fastcall dword RuleDriver( ECX) //óêàçàòåëü íà óïðàâëÿþùóþ ñòðóêòóðó	171	inline fastcall dword RuleDriver( ECX) //óêàçàòåëü íà óïðàâëÿþùóþ ñòðóêòóðó
172	{	172	{
173	$mov eax, 68	173	$mov eax, 68
174	$mov ebx, 17	174	$mov ebx, 17
175	$int 0x40	175	$int 0x40
176	//return eax = îïðåäåëÿåòñÿ äðàéâåðîì	176	//return eax = îïðåäåëÿåòñÿ äðàéâåðîì
177	}	177	}
178		178
179	struct proc_info	179	struct proc_info
180	{	180	{
181	#define SelfInfo -1	181	#define SelfInfo -1
182	dword use_cpu;	182	dword use_cpu;
183	word pos_in_stack,num_slot,rezerv1;	183	word pos_in_stack,num_slot,rezerv1;
184	char name[11];	184	char name[11];
185	char rezerv2;	185	char rezerv2;
186	dword adress,use_memory,ID,left,top,width,height;	186	dword adress,use_memory,ID,left,top,width,height;
187	word status_slot,rezerv3;	187	word status_slot,rezerv3;
188	dword work_left,work_top,work_width,work_height;	188	dword work_left,work_top,work_width,work_height;
189	char status_window;	189	char status_window;
190	dword cwidth,cheight;	190	dword cwidth,cheight;
191	byte reserved[1024-71-8];	191	byte reserved[1024-71-8];
192	};	192	};
193		193
194	inline fastcall void GetProcessInfo( EBX, ECX)	194	inline fastcall void GetProcessInfo( EBX, ECX)
195	{	195	{
196	$mov eax,9;	196	$mov eax,9;
197	$int 0x40	197	$int 0x40
198	DSDWORD[EBX+71] = DSDWORD[EBX+42] - 9; //set cwidth	198	DSDWORD[EBX+71] = DSDWORD[EBX+42] - 9; //set cwidth
199	DSDWORD[EBX+75] = DSDWORD[EBX+46] - GetSkinHeight() - 4; //set cheight	199	DSDWORD[EBX+75] = DSDWORD[EBX+46] - GetSkinHeight() - 4; //set cheight
200	}	200	}
201		201
202	inline fastcall int GetPointOwner( EBX, ECX) //ebx=m.x, ecx=m.y	202	inline fastcall int GetPointOwner( EBX, ECX) //ebx=m.x, ecx=m.y
203	{	203	{
204	$mov eax,34	204	$mov eax,34
205	$int 0x40	205	$int 0x40
206	}	206	}
207		207
208	inline fastcall int GetProcessSlot( ECX)	208	inline fastcall int GetProcessSlot( ECX)
209	{	209	{
210	EAX = 18;	210	EAX = 18;
211	EBX = 21;	211	EBX = 21;
212	$int 0x40	212	$int 0x40
213	}	213	}
214		214
215	inline fastcall int GetActiveProcess()	215	inline fastcall int GetActiveProcess()
216	{	216	{
217	EAX = 18;	217	EAX = 18;
218	EBX = 7;	218	EBX = 7;
219	$int 0x40	219	$int 0x40
220	}	220	}
221		221
222	inline fastcall void ActivateWindow( ECX)	222	inline fastcall void ActivateWindow( ECX)
223	{	223	{
224	EAX = 18;	224	EAX = 18;
225	EBX = 3;	225	EBX = 3;
226	$int 0x40	226	$int 0x40
227	}	227	}
228		228
229	inline fastcall int CreateThread( ECX,EDX)	229	inline fastcall int CreateThread( ECX,EDX)
230	{	230	{
231	$mov eax,51	231	$mov eax,51
232	$mov ebx,1	232	$mov ebx,1
233	$int 0x40	233	$int 0x40
234	}	234	}
235		235
236	inline fastcall void SwitchToAnotherThread()	236	inline fastcall void SwitchToAnotherThread()
237	{	237	{
238	$mov eax,68	238	$mov eax,68
239	$mov ebx,1	239	$mov ebx,1
240	$int 0x40	240	$int 0x40
241	}	241	}
242		242
243	inline fastcall int SendWindowMessage( ECX, EDX)	243	inline fastcall int SendWindowMessage( ECX, EDX)
244	{	244	{
245	$mov eax, 72	245	$mov eax, 72
246	$mov ebx, 1	246	$mov ebx, 1
247	$int 0x40	247	$int 0x40
248	}	248	}
249		249
250	inline fastcall int KillProcess( ECX)	250	inline fastcall int KillProcess( ECX)
251	{	251	{
252	$mov eax,18;	252	$mov eax,18;
253	$mov ebx,18;	253	$mov ebx,18;
254	$int 0x40	254	$int 0x40
255	}	255	}
256		256
257	#define TURN_OFF 2	257	#define TURN_OFF 2
258	#define REBOOT 3	258	#define REBOOT 3
259	#define KERNEL 4	259	#define KERNEL 4
260	inline fastcall int ExitSystem( ECX)	260	inline fastcall int ExitSystem( ECX)
261	{	261	{
262	$mov eax, 18	262	$mov eax, 18
263	$mov ebx, 9	263	$mov ebx, 9
264	$int 0x40	264	$int 0x40
265	}	265	}
266		266
267	inline fastcall ExitProcess()	267	inline fastcall ExitProcess()
268	{	268	{
269	$mov eax,-1;	269	$mov eax,-1;
270	$int 0x40	270	$int 0x40
271	}	271	}
272		272
273	//------------------------------------------------------------------------------	273	//------------------------------------------------------------------------------
274		274
275	//eax = ÿçûê ñèñòåìû (1=eng, 2=fi, 3=ger, 4=rus)	275	//eax = ÿçûê ñèñòåìû (1=eng, 2=fi, 3=ger, 4=rus)
276	inline fastcall int GetSystemLanguage()	276	inline fastcall int GetSystemLanguage()
277	{	277	{
278	EAX = 26;	278	EAX = 26;
279	EBX = 5;	279	EBX = 5;
280	$int 0x40	280	$int 0x40
281	}	281	}
282		282
283	inline fastcall GetSkinHeight()	283	inline fastcall GetSkinHeight()
284	{	284	{
285	$push ebx	285	$push ebx
286	$mov eax,48	286	$mov eax,48
287	$mov ebx,4	287	$mov ebx,4
288	$int 0x40	288	$int 0x40
289	$pop ebx	289	$pop ebx
290	}	290	}
291		291
292	inline fastcall void SetSystemSkin( ECX)	292	inline fastcall void SetSystemSkin( ECX)
293	{	293	{
294	EAX = 48;	294	EAX = 48;
295	EBX = 8;	295	EBX = 8;
296	$int 0x40	296	$int 0x40
297	}	297	}
298		298
299	inline fastcall int GetScreenWidth()	299	inline fastcall int GetScreenWidth()
300	{	300	{
301	$mov eax, 14	301	$mov eax, 14
302	$int 0x40	302	$int 0x40
303	$shr eax, 16	303	$shr eax, 16
304	}	304	}
305		305
306	inline fastcall int GetScreenHeight()	306	inline fastcall int GetScreenHeight()
307	{	307	{
308	$mov eax, 14	308	$mov eax, 14
309	$int 0x40	309	$int 0x40
310	$and eax,0x0000FFFF	310	$and eax,0x0000FFFF
311	}	311	}
312		312
313	inline fastcall dword LoadLibrary( ECX)	313	inline fastcall dword LoadLibrary( ECX)
314	{	314	{
315	$mov eax, 68	315	$mov eax, 68
316	$mov ebx, 19	316	$mov ebx, 19
317	$int 0x40	317	$int 0x40
318	}	318	}
319		319
320	inline fastcall int TestBit( EAX, CL)	320	inline fastcall int TestBit( EAX, CL)
321	{	321	{
322	$shr eax,cl	322	$shr eax,cl
323	$and eax,1	323	$and eax,1
324	}	324	}
325		325
326	inline fastcall int PlaySpeaker( ESI)	326	inline fastcall int PlaySpeaker( ESI)
327	{	327	{
328	$mov eax, 55	328	$mov eax, 55
329	$mov ebx, 55	329	$mov ebx, 55
330	$int 0x40	330	$int 0x40
331	}	331	}
332		332
333	inline fastcall void debug( EDX)	333	inline fastcall void debug( EDX)
334	{	334	{
335	$push eax	335	$push eax
336	$push ebx	336	$push ebx
337	$push ecx	337	$push ecx
338	$mov eax, 63	338	$mov eax, 63
339	$mov ebx, 1	339	$mov ebx, 1
340	NEXT_CHAR:	340	NEXT_CHAR:
341	$mov ecx, DSDWORD[edx]	341	$mov ecx, DSDWORD[edx]
342	$or cl, cl	342	$or cl, cl
343	$jz DONE	343	$jz DONE
344	$int 0x40	344	$int 0x40
345	$inc edx	345	$inc edx
346	$jmp NEXT_CHAR	346	$jmp NEXT_CHAR
347	DONE:	347	DONE:
348	$mov cl, 13	348	$mov cl, 13
349	$int 0x40	349	$int 0x40
350	$mov cl, 10	350	$mov cl, 10
351	$int 0x40	351	$int 0x40
352	$pop ecx	352	$pop ecx
353	$pop ebx	353	$pop ebx
354	$pop eax	354	$pop eax
355	}	355	}
356		356
357		357
358	inline fastcall void debugch( ECX)	358	inline fastcall void debugch( ECX)
359	{	359	{
360	$push eax	360	$push eax
361	$push ebx	361	$push ebx
362	$mov eax,63	362	$mov eax,63
363	$mov ebx,1	363	$mov ebx,1
364	$int 0x40	364	$int 0x40
365	$pop ebx	365	$pop ebx
366	$pop eax	366	$pop eax
367	}	367	}
368	//------------------------------------------------------------------------------	368	//------------------------------------------------------------------------------
369		369
370	void DefineAndDrawWindow(dword x,y, sizeX,sizeY, byte WindowType,dword WindowAreaColor, EDI, ESI)	370	void DefineAndDrawWindow(dword x,y, sizeX,sizeY, byte WindowType,dword WindowAreaColor, EDI, ESI)
371	{	371	{
372	EAX = 12; // function 12:tell os about windowdraw	372	EAX = 12; // function 12:tell os about windowdraw
373	EBX = 1;	373	EBX = 1;
374	$int 0x40	374	$int 0x40
375		375
376	EAX = 0;	376	EAX = 0;
377	EBX = x << 16 + sizeX;	377	EBX = x << 16 + sizeX;
378	ECX = y << 16 + sizeY;	378	ECX = y << 16 + sizeY;
379	EDX = WindowType << 24 \| WindowAreaColor;	379	EDX = WindowType << 24 \| WindowAreaColor;
380	$int 0x40	380	$int 0x40
381		381
382	EAX = 12; // function 12:tell os about windowdraw	382	EAX = 12; // function 12:tell os about windowdraw
383	EBX = 2;	383	EBX = 2;
384	$int 0x40	384	$int 0x40
385	}	385	}
386		386
387	inline fastcall MoveSize( EBX,ECX,EDX,ESI)	387	inline fastcall MoveSize( EBX,ECX,EDX,ESI)
388	{	388	{
389	$mov eax, 67	389	$mov eax, 67
390	$int 0x40	390	$int 0x40
391	}	391	}
392		392
393	inline fastcall void DrawTitle( ECX)	393	inline fastcall void DrawTitle( ECX)
394	{	394	{
395	EAX = 71;	395	EAX = 71;
396	EBX = 1;	396	EBX = 1;
397	$int 0x40;	397	$int 0x40;
398	}	398	}
399		399
400	void WriteTextB(dword x,y,byte fontType, dword color, EDX)	400	void WriteTextB(dword x,y,byte fontType, dword color, EDX)
401	{	401	{
402	EAX = 4;	402	EAX = 4;
403	EBX = x<<16+y;	403	EBX = x<<16+y;
404	ECX = fontType<<24+color;	404	ECX = fontType<<24+color;
405	ESI = 0;	405	ESI = 0;
406	$int 0x40;	406	$int 0x40;
407	$add ebx, 1<<16	407	$add ebx, 1<<16
408	$int 0x40	408	$int 0x40
409	}	409	}
410		410
411	void WriteText(dword x,y,byte fontType, dword color, EDX)	411	void WriteText(dword x,y,byte fontType, dword color, EDX)
412	{	412	{
413	EAX = 4;	413	EAX = 4;
414	EBX = x<<16+y;	414	EBX = x<<16+y;
415	ECX = fontType<<24+color;	415	ECX = fontType<<24+color;
416	$int 0x40;	416	$int 0x40;
417	}	417	}
-		418
-		419	dword WriteBufText(dword x,y,byte fontType, dword color, EDX, EDI)
-		420	{
-		421	EAX = 4;
-		422	EBX = x<<16+y;
-		423	ECX = fontType<<24+color;
-		424	$int 0x40;
-		425	}
418		426
419	void WriteNumber(dword x,y,byte fontType, dword color, count, ECX)	427	void WriteNumber(dword x,y,byte fontType, dword color, count, ECX)
420	{	428	{
421	EAX = 47;	429	EAX = 47;
422	EBX = count<<16;	430	EBX = count<<16;
423	EDX = x<<16+y;	431	EDX = x<<16+y;
424	ESI = fontType<<24+color;	432	ESI = fontType<<24+color;
425	$int 0x40;	433	$int 0x40;
426	}	434	}
427		435
428	void CopyScreen(dword EBX, x, y, w, h)	436	void CopyScreen(dword EBX, x, y, w, h)
429	{	437	{
430	EAX = 36;	438	EAX = 36;
431	ECX = w << 16 + h;	439	ECX = w << 16 + h;
432	EDX = x << 16 + y;	440	EDX = x << 16 + y;
433	$int 0x40;	441	$int 0x40;
434	}	442	}
435		443
436	dword GetPixelColor(dword x, x_size, y)	444	:dword GetPixelColor(dword x, x_size, y)
437	{	445	{
438	$mov eax, 35	446	$mov eax, 35
439	EBX= y*x_size+x;	447	EBX= y*x_size+x;
440	$int 0x40	448	$int 0x40
441	}	449	}
442		450
443		451
444	void _PutImage(dword x,y, w,h, EBX)	452	void _PutImage(dword x,y, w,h, EBX)
445	{	453	{
446	EAX = 7;	454	EAX = 7;
447	ECX = w<<16+h;	455	ECX = w<<16+h;
448	EDX = x<<16+y;	456	EDX = x<<16+y;
449	$int 0x40	457	$int 0x40
450	}	458	}
451		459
452	void PutPaletteImage(dword EBX,w,h,x,y,ESI,EDI)	460	void PutPaletteImage(dword EBX,w,h,x,y,ESI,EDI)
453	{	461	{
454	EAX = 65;	462	EAX = 65;
455	ECX = w<<16+h;	463	ECX = w<<16+h;
456	EDX = x<<16+y;	464	EDX = x<<16+y;
457	EBP = 0;	465	EBP = 0;
458	$int 0x40	466	$int 0x40
459	}	467	}
460		468
461	inline fastcall void PutPixel( EBX,ECX,EDX)	469	inline fastcall void PutPixel( EBX,ECX,EDX)
462	{	470	{
463	EAX=1;	471	EAX=1;
464	$int 0x40	472	$int 0x40
465	}	473	}
466		474
467	void DrawBar(dword x,y,w,h,EDX)	475	void DrawBar(dword x,y,w,h,EDX)
468	{	476	{
469	if (h<=0) \|\| (h>60000) \|\| (w<=0) \|\| (w>60000) return; //bad boy :)	477	if (h<=0) \|\| (h>60000) \|\| (w<=0) \|\| (w>60000) return; //bad boy :)
470	EAX = 13;	478	EAX = 13;
471	EBX = x<<16+w;	479	EBX = x<<16+w;
472	ECX = y<<16+h;	480	ECX = y<<16+h;
473	$int 0x40	481	$int 0x40
474	}	482	}
475		483
476	void DefineButton(dword x,y,w,h,EDX,ESI)	484	void DefineButton(dword x,y,w,h,EDX,ESI)
477	{	485	{
478	EAX = 8;	486	EAX = 8;
479	$push edx	487	$push edx
480	EDX += BT_DEL;	488	EDX += BT_DEL;
481	$int 0x40;	489	$int 0x40;
482	$pop edx	490	$pop edx
483	EBX = x<<16+w;	491	EBX = x<<16+w;
484	ECX = y<<16+h;	492	ECX = y<<16+h;
485	$int 0x40	493	$int 0x40
486	}	494	}
487		495
488	void UnsafeDefineButton(dword x,y,w,h,EDX,ESI)	496	void UnsafeDefineButton(dword x,y,w,h,EDX,ESI)
489	{	497	{
490	EAX = 8;	498	EAX = 8;
491	EBX = x<<16+w;	499	EBX = x<<16+w;
492	ECX = y<<16+h;	500	ECX = y<<16+h;

Subversion Repositories Kolibri OS

(root)/programs/cmm/lib/kolibri.h @ 4646 – Rev 3458 → 3467