Subversion Repositories Kolibri OS

Rev

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

Rev 2582 Rev 2583
Line 6... Line 6...
6
; last update:  07/04/2012
6
; last update:  07/04/2012
7
; changed by:   Marat Zakiyanov aka Mario79, aka Mario
7
; changed by:   Marat Zakiyanov aka Mario79, aka Mario
8
; changes:      Complete elimination of flicker.
8
; changes:      Complete elimination of flicker.
9
;               Using f.0 C = 1 - don't fill working area on window draw.
9
;               Using f.0 C = 1 - don't fill working area on window draw.
10
;               Increasing the size of buttons and a bright color.
10
;               Increasing the size of buttons and a bright color.
-
 
11
;               Processing "window is rolled up" and "window is minimized"
11
;------------------------------------------------------------------------------
12
;------------------------------------------------------------------------------
12
; version:	1.70
13
; version:	1.70
13
; last update:  04/04/2012
14
; last update:  04/04/2012
14
; changed by:   Marat Zakiyanov aka Mario79, aka Mario
15
; changed by:   Marat Zakiyanov aka Mario79, aka Mario
15
; changes:      Code refactoring and optimization.
16
; changes:      Code refactoring and optimization.
Line 482... Line 483...
482
	xor	eax,eax				; function 0 : define and draw window
483
	xor	eax,eax				; function 0 : define and draw window
483
	xor	esi,esi
484
	xor	esi,esi
484
	mcall	,[winxpos],[winypos],0x74ffffff,,title	;0x34ddffdd
485
	mcall	,[winxpos],[winypos],0x74ffffff,,title	;0x34ddffdd
Line 485... Line 486...
485
 
486
 
-
 
487
	mcall	9,process_info_buffer,-1
-
 
488
	
-
 
489
	mov	eax,[ebx+70]
-
 
490
	mov	[window_status],eax
-
 
491
	test	[window_status],100b		; window is rolled up
-
 
492
	jnz	.exit
-
 
493
 
-
 
494
	test	[window_status],10b		; window is minimized to panel
-
 
495
	jnz	.exit
486
	mcall	9,process_info_buffer,-1
496
 
487
	mov	eax,[ebx+62]
497
	mov	eax,[ebx+62]
488
	inc	eax
498
	inc	eax
489
	mov	[client_area_x_size],eax
499
	mov	[client_area_x_size],eax
490
	mov	eax,[ebx+66]
500
	mov	eax,[ebx+66]
Line 544... Line 554...
544
	xor	ecx,ecx
554
	xor	ecx,ecx
545
	mcall	4,<45,365>,,tbts,tbte-tbts
555
	mcall	4,<45,365>,,tbts,tbte-tbts
546
;"RUN" labels
556
;"RUN" labels
547
	mcall	,<464,385>,,tbts_3,tbte_2-tbts_3
557
	mcall	,<464,385>,,tbts_3,tbte_2-tbts_3
548
;print application name in text box
558
;print application name in text box
-
 
559
;--------------------------------------
-
 
560
align 4
-
 
561
.exit:
549
	mcall	12, 2
562
	mcall	12, 2
550
	ret
563
	ret
551
;------------------------------------------------------------------------------
564
;------------------------------------------------------------------------------
552
align 4
565
align 4
553
show_process_info:
566
show_process_info:
-
 
567
	test	[window_status],100b		; window is rolled up
-
 
568
	jnz	.exit
-
 
569
 
-
 
570
	test	[window_status],10b		; window is minimized to panel
-
 
571
	jnz	.exit
-
 
572
 
554
	mov	edi,[list_start]
573
	mov	edi,[list_start]
555
	mov	[list_add],edi
574
	mov	[list_add],edi
556
	mov	dword [index],0
575
	mov	dword [index],0
557
	mov	dword [curposy],20
576
	mov	dword [curposy],20
558
;--------------------------------------
577
;--------------------------------------
Line 561... Line 580...
561
	call	draw_next_process
580
	call	draw_next_process
562
	inc	dword [index]
581
	inc	dword [index]
563
	add	dword [curposy],14
582
	add	dword [curposy],14
564
	cmp	[index],display_processes
583
	cmp	[index],display_processes
565
	jl	.loop_draw
584
	jl	.loop_draw
-
 
585
;--------------------------------------
-
 
586
align 4
-
 
587
.exit:
566
	ret
588
	ret
567
;------------------------------------------------------------------------------
589
;------------------------------------------------------------------------------
568
; DATA AREA
590
; DATA AREA
569
;------------------------------------------------------------------------------
591
;------------------------------------------------------------------------------
570
system_path	 db '/sys/lib/'
592
system_path	 db '/sys/lib/'
Line 708... Line 730...
708
curposy		rd 1
730
curposy		rd 1
709
index		rd 1
731
index		rd 1
710
tasklist	rd display_processes
732
tasklist	rd display_processes
711
time_counter	rd 1
733
time_counter	rd 1
Line -... Line 734...
-
 
734
 
712
 
735
window_status		rd 1
713
client_area_x_size	rd 1
736
client_area_x_size	rd 1
714
client_area_y_size	rd 1
737
client_area_y_size	rd 1
715
bar_bacground_color	rd 1
738
bar_bacground_color	rd 1
716
btn_bacground_color	rd 1
739
btn_bacground_color	rd 1