Subversion Repositories Kolibri OS

Rev

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

Rev 3938 Rev 3952
Line 51... Line 51...
51
window_y_size=430
51
window_y_size=430
52
;------------------------------------------------------------------------------
52
;------------------------------------------------------------------------------
53
@use_library    ;use load lib macros
53
@use_library    ;use load lib macros
54
;------------------------------------------------------------------------------
54
;------------------------------------------------------------------------------
55
START:                          ; start of execution
55
START:                          ; start of execution
-
 
56
	mcall	9,process_info_buffer,-1
-
 
57
	mov	ecx,[ebx+30]	; PID
-
 
58
	mcall	18,21
-
 
59
	mov	[active_process],eax	; WINDOW SLOT
-
 
60
;------------------------------------------------------------------------------	
56
        mcall   68,11
61
        mcall   68,11
57
sys_load_library  library_name, cur_dir_path, library_path, system_path, \
62
sys_load_library  library_name, cur_dir_path, library_path, system_path, \
58
err_message_found_lib, head_f_l, myimport, err_message_import, head_f_i
63
err_message_found_lib, head_f_l, myimport, err_message_import, head_f_i
59
        inc     eax
64
        inc     eax
60
        jz      close
65
        jz      close
61
;------------------------------------------------------------------------------
66
;------------------------------------------------------------------------------
62
        mcall   40,0x27 ;set event
67
        mcall   40,0x80000027 ;set event
63
;------------------------------------------------------------------------------
68
;------------------------------------------------------------------------------
64
;set window size and position for 0 function
69
;set window size and position for 0 function
65
;to [winxpos] and [winypos] variables
70
;to [winxpos] and [winypos] variables
66
;get screen size
71
;get screen size
67
        mcall   14
72
        mcall   14
Line 103... Line 108...
103
        jz      key
108
        jz      key
Line 104... Line 109...
104
 
109
 
105
        dec     eax                   ; button in buffer ?
110
        dec     eax                   ; button in buffer ?
Line -... Line 111...
-
 
111
        jz      button
-
 
112
 
-
 
113
	mcall	18,7
-
 
114
	cmp	[active_process],eax
106
        jz      button
115
	jne	still_end
107
 
116
 
Line 108... Line 117...
108
        push    dword edit1
117
        push    dword edit1
Line 758... Line 767...
758
list_add        rd 1
767
list_add        rd 1
759
curposy         rd 1
768
curposy         rd 1
760
index           rd 1
769
index           rd 1
761
tasklist        rd display_processes
770
tasklist        rd display_processes
762
time_counter    rd 1
771
time_counter    rd 1
-
 
772
active_process  rd 1
Line 763... Line 773...
763
 
773
 
764
window_status           rd 1
774
window_status           rd 1
765
client_area_x_size      rd 1
775
client_area_x_size      rd 1
766
client_area_y_size      rd 1
776
client_area_y_size      rd 1