Subversion Repositories Kolibri OS

Rev

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

Rev 313 Rev 340
Line 231... Line 231...
231 
	int	0x40
 231 
	int	0x40
232 
	; Ñîçäà¸ì îêíî
 232 
	; Ñîçäà¸ì îêíî
233 
	xor	eax, eax
 233 
	xor	eax, eax
234 
	mov	ebx, 300 * 65536 + 309
 234 
	mov	ebx, 300 * 65536 + 309
235 
	mov	ecx, 150 * 65536 + 450
 235 
	mov	ecx, 150 * 65536 + 450
236 
	mov	edx, tcol + 0x3000000	; color of work area RRGGBB,8->color
 236 
	mov	edx, tcol + 0x13000000	; color of work area RRGGBB,8->color
237 
	mov	esi, 0x805080d0		; color of grab bar  RRGGBB,8->color
 - 
 
238 
	mov	edi, 0x005080d0		; color of frames    RRGGBB
 237 
	mov	edi, title		; color of frames    RRGGBB
239 
	int	0x40
 238 
	int	0x40
240 
	; Ñîçäà¸ì ðàìêó ãðàôèêà
 239 
	; Ñîçäà¸ì ðàìêó ãðàôèêà
241 
	mov	eax, 13
 240 
	mov	eax, 13
242 
	mov	ebx, 10 * 65536 + 290
 241 
	mov	ebx, 10 * 65536 + 290
243 
	mov	ecx, 138 * 65536 + 105
 242 
	mov	ecx, 138 * 65536 + 105
Line 253... Line 252...
253 
	mov	ecx, 140 * 65536 + 140
 252 
	mov	ecx, 140 * 65536 + 140
254 
@@:	add	ecx, 10 * 65536 + 10
 253 
@@:	add	ecx, 10 * 65536 + 10
255 
	int	0x40
 254 
	int	0x40
256 
	cmp	cx, 230			; ïðèâÿçàíî ê êîîðäèíàòàì îêíà
 255 
	cmp	cx, 230			; ïðèâÿçàíî ê êîîðäèíàòàì îêíà
257 
	jl	@b
 256 
	jl	@b
258 
	; Ïèøèì çàãîëîâîê
 - 
 
259 
	mov	eax, 4
 - 
 
260 
	mov	ebx, 8 * 65536 + 8
 - 
 
261 
	mov	edx, title
 - 
 
262 
	mov	ecx, 0x10FFFFFF
 - 
 
263 
	mov	esi, 29
 - 
 
264 
	int	0x40
 - 
 
Line 265... Line 257...
265
257
266 
	; Ïèøèì íàçâàíèÿ ïàðàìåòðîâ (Cpu load, temper, etc...)
 258 
	; Ïèøèì íàçâàíèÿ ïàðàìåòðîâ (Cpu load, temper, etc...)
267 
	mov	edx, msgs_mon
 259 
	mov	edx, msgs_mon
268 
	mov	ebx, 17 * 65536 + 30
 260 
	mov	ebx, 17 * 65536 + 30
Line 513... Line 505...
513
505
514 
 
 506 
 
515 
DATA
 507 
DATA
516 
act_tab		db	2 			; Íîìåð àêòèâíîé âêëàäêè
 508 
act_tab		db	2 			; Íîìåð àêòèâíîé âêëàäêè
Line 517... Line 509...
517 
tab_lab		db	'Info       Tests      Configs     About'
 509 
tab_lab		db	'Info       Tests      Configs     About'
518 
title		db	'Ghost Monitor v0.4 [26/12/06]'
 510 
title		db	'Ghost Monitor v0.4 [26/12/06]',0
519 
 
 511 
 
520 
msgs_mon mls \
 512 
msgs_mon mls \