diff --git a/programs/system/cpu/trunk/build_en.bat b/programs/system/cpu/trunk/build_en.bat index 5a527c0bfc..e4120e25d8 100644 --- a/programs/system/cpu/trunk/build_en.bat +++ b/programs/system/cpu/trunk/build_en.bat @@ -1,5 +1,6 @@ @erase lang.inc @echo lang fix en >lang.inc -@fasm cpu.asm cpu +@fasm -m 16384 cpu.asm cpu +@kpack cpu @erase lang.inc @pause \ No newline at end of file diff --git a/programs/system/cpu/trunk/build_et.bat b/programs/system/cpu/trunk/build_et.bat index 8e14b41b4d..32bc406477 100644 --- a/programs/system/cpu/trunk/build_et.bat +++ b/programs/system/cpu/trunk/build_et.bat @@ -1,5 +1,6 @@ @erase lang.inc @echo lang fix et >lang.inc -@fasm cpu.asm cpu +@fasm -m 16384 cpu.asm cpu +@kpack cpu @erase lang.inc @pause \ No newline at end of file diff --git a/programs/system/cpu/trunk/build_ge.bat b/programs/system/cpu/trunk/build_ge.bat index bfd7636d39..93e2220d76 100644 --- a/programs/system/cpu/trunk/build_ge.bat +++ b/programs/system/cpu/trunk/build_ge.bat @@ -1,5 +1,6 @@ @erase lang.inc @echo lang fix de >lang.inc -@fasm cpu.asm cpu +@fasm -m 16384 cpu.asm cpu +@kpack cpu @erase lang.inc @pause \ No newline at end of file diff --git a/programs/system/cpu/trunk/build_ru.bat b/programs/system/cpu/trunk/build_ru.bat new file mode 100644 index 0000000000..323e01ccd3 --- /dev/null +++ b/programs/system/cpu/trunk/build_ru.bat @@ -0,0 +1,6 @@ +@erase lang.inc +@echo lang fix ru >lang.inc +@fasm -m 16384 cpu.asm cpu +@kpack cpu +@erase lang.inc +@pause \ No newline at end of file diff --git a/programs/system/cpu/trunk/cpu.asm b/programs/system/cpu/trunk/cpu.asm index 99ab7bd2dd..c9b2bb97b7 100644 --- a/programs/system/cpu/trunk/cpu.asm +++ b/programs/system/cpu/trunk/cpu.asm @@ -1,175 +1,237 @@ ; -; PROCESS MANAGEMENT +; CPU -process Manager ; -; VTurjanmaa -; additions by M.Lisovin lisovin@26.ru +;------------------------------------------------------------------------------ +; version: 1.70 +; last update: 04/04/2012 +; changed by: Marat Zakiyanov aka Mario79, aka Mario +; changes: Code refactoring and optimization. +; Added russian language support. +; Fix - processes information showing not been updated during +; the processing of mouse events. +;------------------------------------------------------------------------------ +; Many fix's and changes created by: +; Diamond, Heavyiron, SPraid, , +; Leency, IgorA, kaitz +;--------------------------------------------------------------------- ; integrated with load_lib.obj by -; Compile with FASM for Menuet -; - - use32 - org 0x0 - STACK_SIZE=1024 - offset_y=22 ; Correction for skin - offset_x=5 - db 'MENUET01' ; 8 byte id - dd 0x01 ; header version - dd START ; start of code - dd I_END ; size of image - dd U_END+STACK_SIZE ; memory for app - dd U_END+STACK_SIZE ; esp - dd 0x0 , 0x0 ; I_Param , I_Icon - +;--------------------------------------------------------------------- +; additions by M.Lisovin lisovin@26.ru +;--------------------------------------------------------------------- +; original author - VTurjanmaa +;------------------------------------------------------------------------------ + use32 + org 0x0 + db 'MENUET01' ; 8 byte id + dd 0x01 ; header version + dd START ; start of code + dd IM_END ; size of image + dd U_END ; memory for app + dd stack_area ; esp + dd 0x0 ; boot parameters + dd 0x0 ; path +;------------------------------------------------------------------------------ include 'lang.inc' include '../../../macros.inc' include '../../../develop/libraries/box_lib/trunk/box_lib.mac' include '../../../develop/libraries/box_lib/load_lib.mac' +;------------------------------------------------------------------------------ display_processes=32 ; number of processes to show +window_x_size=524 +window_y_size=430 +;------------------------------------------------------------------------------ @use_library ;use load lib macros +;------------------------------------------------------------------------------ START: ; start of execution - + mcall 68,11 sys_load_library library_name, cur_dir_path, library_path, system_path, \ err_message_found_lib, head_f_l, myimport, err_message_import, head_f_i inc eax jz close -; calculate window position -; at the center of the screen - mcall 40,0x27 ;set event - call calculate_window_pos - -;main loop when process name isn't edited. -red: +;------------------------------------------------------------------------------ + mcall 40,0x27 ;set event +;------------------------------------------------------------------------------ +;set window size and position for 0 function +;to [winxpos] and [winypos] variables +;get screen size + mcall 14 + mov ebx,eax +;calculate (x_screen-window_x_size)/2 + shr ebx,16+1 + sub ebx,window_x_size/2 + shl ebx,16 + mov bx,window_x_size +;winxpos=xcoord*65536+xsize + mov [winxpos],ebx +;calculate (y_screen-window_y_size)/2 + and eax,0xffff + shr eax,1 + sub eax,window_y_size/2 + shl eax,16 + mov ax,window_y_size +;winypos=ycoord*65536+ysize + mov [winypos],eax +;------------------------------------------------------------------------------ mcall 48,3,sc,40 edit_boxes_set_sys_color edit1,edit1_end,sc ;set color check_boxes_set_sys_color check1,check1_end,sc ;set color - xor ebp,ebp - inc ebp -; mov ebp,1 - call draw_window ; redraw all window +;------------------------------------------------------------------------------ +align 4 +;main loop when process name isn't edited. +red: + call draw_window ; redraw all window +;------------------------------------------------------------------------------ +align 4 still: - mcall 23,100 ; wait here for event 1 sec. + mcall 23,100 ; wait here for event 1 sec. - dec eax ; redraw request ? - jz red - dec eax ; key in buffer ? - jz key - dec eax ; button in buffer ? - jz button + dec eax ; redraw request ? + jz red + + dec eax ; key in buffer ? + jz key + + dec eax ; button in buffer ? + jz button + +; sub eax,3 ; If not use mouse - show +; jnz still_end - sub eax,3 ; If not use mouse - show - jnz still_end push dword edit1 call [edit_box_mouse] + push dword[check1+32] + push dword check1 call [check_box_mouse] + pop eax + cmp eax, dword[check1+32] - jnz still_end - jmp still + jz still_end + + push dword check1 + call [check_box_draw] +;-------------------------------------- +align 4 +show_process_info_1: + mcall 26,9 + add eax,100 + mov [time_counter],eax -still_end: - xor ebp,ebp ; draw new state of processes - call draw_window - jmp still + call show_process_info ; draw new state of processes + jmp still +;------------------------------------------------------------------------------ +align 4 +still_end: + mcall 26,9 + cmp [time_counter],eax + ja still + add eax,100 + mov [time_counter],eax - key: ; key - mcall 2 + call show_process_info ; draw new state of processes + jmp still +;------------------------------------------------------------------------------ +align 4 +key: ; key + mcall 2 - cmp ah,184 ; PageUp - jz pgdn - cmp ah,183 - jz pgup ; PageDown - cmp ah,27 - jz close ; Esc + cmp ah,184 ; PageUp + jz pgdn + + cmp ah,183 + jz pgup ; PageDown + + cmp ah,27 + jz close ; Esc push dword edit1 call [edit_box_key] ; Check ENTER with ed_focus edit_box - lea edi,[edit1] - test word ed_flags,ed_focus - jz still_end - sub ah,13 ; ENTER? - jz program_start ; RUN a program + lea edi,[edit1] + test word ed_flags,ed_focus + jz still_end - jmp still + sub ah,13 ; ENTER? + jz program_start ; RUN a program - button: + jmp still +;------------------------------------------------------------------------------ +align 4 +button: ; get button id - mov eax,17 - mcall - shr eax,8 - + mcall 17 + shr eax,8 ;id in [10,50] corresponds to terminate buttons. - cmp eax,10 - jb noterm - cmp eax,50 - jg noterm + cmp eax,10 + jb noterm + cmp eax,50 + jg noterm ;calculate button index - sub eax,11 - + sub eax,11 ;calculate process slot - mov ecx,[tasklist+4*eax] - + mov ecx,[tasklist+4*eax] ;ignore empty buttons - test ecx,ecx - jle still_end + test ecx,ecx + jle still_end ;terminate application - mov eax,18 - mov ebx,2 - mcall - jmp still_end - - noterm: - + mcall 18,2 + jmp show_process_info_1 ;still_end +;-------------------------------------- +align 4 +noterm: ;special buttons - dec eax - jz close + dec eax + jz close - sub eax,50 - jz pgdn ;51 - dec eax - jz pgup ;52 -; dec eax -; jz read_string - dec eax - jz program_start ;53 - dec eax - jz reboot ;54 - jmp still_end - + sub eax,50 + jz pgdn ;51 + + dec eax + jz pgup ;52 + + dec eax + jz program_start ;53 + + dec eax + jz reboot ;54 + + jmp still_end ;buttons handlers - - pgdn: - sub [list_start],display_processes -; cmp [list_start],0 - jge still_end - mov [list_start],0 - jmp still_end - - pgup: - mov eax,[list_add] ;maximal displayed process slot - mov [list_start],eax - jmp still_end - - program_start: - mov eax,70 - mov ebx,file_start - mcall - jmp still_end - - reboot: - mov eax,70 - mov ebx,sys_reboot - mcall +;------------------------------------------------------------------------------ +align 4 +pgdn: + sub [list_start],display_processes +; cmp [list_start],0 + jge show_process_info_1 ;still_end + mov [list_start],0 + jmp show_process_info_1 ;still_end +;------------------------------------------------------------------------------ +align 4 +pgup: + mov eax,[list_add] ;maximal displayed process slot + mov [list_start],eax + jmp show_process_info_1 ;still_end +;------------------------------------------------------------------------------ +align 4 +program_start: + mcall 70,file_start + jmp show_process_info_1 ;still_end +;------------------------------------------------------------------------------ +align 4 +reboot: + mcall 70,sys_reboot ;close program if we going to reboot - - close: - or eax,-1 ; close this program - mcall - +;------------------------------------------------------------------------------ +align 4 +close: + or eax,-1 ; close this program + mcall +;------------------------------------------------------------------------------ +align 4 draw_next_process: ;input: ; edi - current slot @@ -177,473 +239,253 @@ draw_next_process: ;output: ; edi - next slot (or -1 if no next slot) ;registers corrupted! - -;create button - test ebp,ebp - jnz .nodelete ;delete old button - mov eax,8 - mov edx,[index] - add edx,(1 shl 31)+11 - mcall - -.nodelete: + mov edx,[index] + add edx,(1 shl 31)+11 + mcall 8 ;create terminate process button - mov eax,8 - mov ebx,(15-offset_x)*65536+121-offset_y - mov ecx,[curposy] - ;sub ecx,1 - shl ecx,16 - mov cx,10 - mov edx,[index] - add edx,11 - mov esi,0xaabbcc + mov ecx,[curposy] + shl ecx,16 + mov cx,10 + mov edx,[index] + add edx,11 + mov esi,0xaabbcc ;contrast - test dword [index],1 - jz .change_color_button - mov esi,0x8899aa - + test dword [index],1 + jz .change_color_button + mov esi,0x8899aa +;-------------------------------------- +align 4 .change_color_button: - mcall - + mcall ,<10,99> ;draw background for proccess information - mov eax,13 - mov ebx,(115-offset_x)*65536+395 - ;ecx was already set - mov edx,0x88ff88 +; ecx was already set + mov edx,0x88ff88 ;contrast - test dword [index],1 - jz .change_color_info - mov edx,0xddffdd - + test dword [index],1 + jz .change_color_info + mov edx,0xddffdd +;-------------------------------------- +align 4 .change_color_info: - mcall - + mcall 13,<110,395> ;nothing else should be done ;if there is no process for this button - test edi,edi - jl .ret - -;find process + test edi,edi + jl .ret +;-------------------------------------- +align 4 .return_1: - inc edi +;find process + inc edi ;more comfortable register for next loop - mov ecx,edi + mov ecx,edi ;precacluate pointer to process buffer - mov ebx,process_info_buffer - -;find process loop - + mov ebx,process_info_buffer +;-------------------------------------- +align 4 .find_loop: - cmp ecx,256 - jge .no_processes - + cmp ecx,256 + jge .no_processes ;load process information in buffer - mov eax,9 -; mov ebx,process_info_buffer - mcall - + mcall 9 ;if current slot greater than maximal slot, ;there is no more proccesses. - cmp ecx,eax - jg .no_processes - + cmp ecx,eax + jg .no_processes ;if slot state is equal to 9, it is empty. - cmp [process_info_buffer+process_information.slot_state],9 - jnz .process_found - - inc ecx - jmp .find_loop + cmp [process_info_buffer+process_information.slot_state],9 + jnz .process_found + inc ecx + jmp .find_loop +;-------------------------------------- +align 4 .no_processes: - or edi,-1 - ret - + or edi,-1 + ret +;-------------------------------------- +align 4 .process_found: ;check on/off check box - push edi - lea edi,[check1] - test dword ch_flags,ch_flag_en - pop edi - jnz @f - cmp dword [process_info_buffer+10],'ICON' - jz .return_1 - cmp dword [process_info_buffer+10],'OS/I' - jz .return_1 - cmp byte [process_info_buffer+10],'@' - jz .return_1 + push edi + lea edi,[check1] + test dword ch_flags,ch_flag_en + pop edi + jnz @f + cmp dword [process_info_buffer+10],'ICON' + jz .return_1 -@@: mov edi,ecx - mov [list_add],ecx - + cmp dword [process_info_buffer+10],'OS/I' + jz .return_1 + + cmp byte [process_info_buffer+10],'@' + jz .return_1 +;-------------------------------------- +align 4 +@@: + mov edi,ecx + mov [list_add],ecx ;get processor cpeed ;for percent calculating - mov eax,18 - mov ebx,5 - mcall - - xor edx,edx - mov ebx,100 - div ebx - + mcall 18,5 + xor edx,edx + mov ebx,100 + div ebx ;eax = number of operation for 1% now ;calculate process cpu usage percent - mov ebx,eax - mov eax,[process_info_buffer+process_information.cpu_usage] -; cdq - xor edx,edx ; for CPU more 2 GHz - mike.dld - - div ebx - mov [cpu_percent],eax - + mov ebx,eax + mov eax,[process_info_buffer+process_information.cpu_usage] +; cdq + xor edx,edx ; for CPU more 2 GHz - mike.dld + div ebx + mov [cpu_percent],eax ;set text color to display process information ;([tcolor] variable) ;0% : black ;1-80% : green ;81-100% : red - test eax,eax - jnz .no_black - mov [tcolor],eax - jmp .color_set + test eax,eax + jnz .no_black + mov [tcolor],eax + jmp .color_set +;-------------------------------------- +align 4 .no_black: - cmp eax,80 - ja .no_green - mov dword [tcolor],0x107a30 - jmp .color_set + cmp eax,80 + ja .no_green + mov dword [tcolor],0x107a30 + jmp .color_set +;-------------------------------------- +align 4 .no_green: - mov dword [tcolor],0xac0000 + mov dword [tcolor],0xac0000 +;-------------------------------------- +align 4 .color_set: - ;show slot number - mov eax,47 - mov ebx,2*65536+1*256 ;ecx haven't changed since .process_found -; mov ecx,edi - mov edx,[curposy] - add edx,(20-offset_x)*65536+1 - mov esi,[tcolor] - mcall - +; mov ecx,edi + mov edx,[curposy] + add edx,15*65536+1 + mcall 47,<2,256>,,,[tcolor] ;show process name - mov eax,4 - mov ebx,[curposy] - add ebx,(50-offset_x)*65536+1 - mov ecx,[tcolor] - mov edx,process_info_buffer.process_name - mov esi,11 - mcall - + mov ebx,[curposy] + add ebx,45*65536+1 + mcall 4,,[tcolor],process_info_buffer.process_name,11 ;show pid - mov eax,47 - mov ebx,8*65536+1*256 - mov ecx,[process_info_buffer.PID] - mov edx,[curposy] - add edx,(130-offset_x)*65536+1 - mov esi,[tcolor] - mcall - + mov edx,[curposy] + add edx,125*65536+1 + mcall 47,<8,256>,[process_info_buffer.PID],,[tcolor] ;show cpu usage - mov ecx,[process_info_buffer.cpu_usage] - add edx,60*65536 - mcall - + add edx,60*65536 + mcall ,,[process_info_buffer.cpu_usage] ;show cpu percent - mov ebx,3*65536+0*256 - mov ecx,[cpu_percent] - add edx,60*65536 - mcall - + add edx,60*65536 + mcall ,<3,0>,[cpu_percent] ;show memory start - obsolete - mov ebx,8*65536+1*256 - mov ecx,[process_info_buffer.memory_start] - add edx,30*65536 - mcall - + add edx,30*65536 + mcall ,<8,256>,[process_info_buffer.memory_start] ;show memory usage - mov ecx,[process_info_buffer.used_memory] - inc ecx - add edx,60*65536 - mcall - + mov ecx,[process_info_buffer.used_memory] + inc ecx + add edx,60*65536 + mcall ;show window stack and value - mov ecx,dword [process_info_buffer.window_stack_position] - add edx,60*65536 - mcall - + add edx,60*65536 + mcall ,,dword [process_info_buffer.window_stack_position] ;show window xy size - mov ecx,[process_info_buffer.box.left] - shl ecx,16 - add ecx,[process_info_buffer.box.top] - add edx,60*65536 - mcall - + mov ecx,[process_info_buffer.box.left] + shl ecx,16 + add ecx,[process_info_buffer.box.top] + add edx,60*65536 + mcall +;-------------------------------------- +align 4 .ret: ;build index->slot map for terminating processes. - mov eax,[index] - mov [tasklist+4*eax],edi - ret - -;read_string: -;clean string -; mov edi,start_application -; xor eax,eax -; mov ecx,60 -; cld -; rep stosb -; call print_text - -; mov edi,start_application -;edi now contains pointer to last symbol -; jmp still1 - -;read string main loop - - f11: + mov eax,[index] + mov [tasklist+4*eax],edi + ret +;------------------------------------------------------------------------------ +align 4 +f11: ;full update - push edi - xor ebp,ebp - inc ebp -; mov ebp,1 - call draw_window - pop edi -; -; still1: -;wait for message -; mov eax,23 -; mov ebx,100 -; mcall -; cmp eax,1 -; je f11 -;if no message - update process information -; cmp eax,0 -; jnz .message_received -; push edi ;edi should be saved since draw_window -; xor ebp,ebp ;corrupt registers -; call draw_window -; pop edi -; jmp still1 -; -;.message_received: -; cmp eax,2 -; jne read_done ;buttons message -;read char -; mov eax,2 -; mcall -; shr eax,8 - -;if enter pressed, exit read string loop -; cmp eax,13 -; je read_done -;if backslash pressed? -; cmp eax,8 -; jnz nobsl -;decrease pointer to last symbol -; cmp edi,start_application -; jz still1 -; dec edi -;fill last symbol with space because -;print_text show all symbols -; mov [edi],byte 32 -; call print_text -; jmp still1 -; -; nobsl: -;write new symbol -; mov [edi],al -;display new text -; call print_text -;increment pointer to last symbol -; inc edi -;compare with end of string -; mov esi,start_application -; add esi,60 -; cmp esi,edi -; jnz still1 - -;exiting from read string loop -; -; read_done: -;terminate string for file functions -; mov [edi],byte 0 - -; call print_text -; jmp still - -; -;print_text: -;display start_application string - -; pushad - -;display text background -; mov eax,13 -; mov ebx,64*65536+62*6 -; mov ecx,400*65536+12 -; mov edx,0xffffcc ;0xeeeeee -; mcall - -;display text -; mov eax,4 -; mov edx,start_application ;from start_application string -; mov ebx,70*65536+402 ;text center-aligned -; xor ecx,ecx ;black text -; mov esi,60 ;60 symbols -; mcall - -; popad -; ret - -window_x_size=524 -window_y_size=430 - -calculate_window_pos: -;set window size and position for 0 function -;to [winxpos] and [winypos] variables - -;get screen size - mov eax,14 - mcall - mov ebx,eax - -;calculate (x_screen-window_x_size)/2 - shr ebx,16+1 - sub ebx,window_x_size/2 - shl ebx,16 - mov bx,window_x_size -;winxpos=xcoord*65536+xsize - mov [winxpos],ebx - -;calculate (y_screen-window_y_size)/2 - and eax,0xffff - shr eax,1 - sub eax,window_y_size/2 - shl eax,16 - mov ax,window_y_size -;winypos=ycoord*65536+ysize - mov [winypos],eax - - ret - + push edi + call draw_window + pop edi +;------------------------------------------------------------------------------ ; ********************************************* ; ******* WINDOW DEFINITIONS AND DRAW ******** ; ********************************************* - -align 16 +align 4 draw_window: -;ebp=1 - redraw all -;ebp=0 - redraw only process information - - test ebp,ebp - jz .show_process_info - - mcall 12, 1 - - ; DRAW WINDOW - xor eax,eax ; function 0 : define and draw window - mov ebx,[winxpos] ; [x start] *65536 + [x size] - mov ecx,[winypos] ; [y start] *65536 + [y size] - mov edx,0x34ddffdd ; color of work area RRGGBB,8->color - mov edi,title ; WINDOW CAPTION; - mcall - - - add eax,4 ; function 4 : write text to window - mov ebx,(22-offset_x)*65536+35-offset_y - xor ecx,ecx - mov edx,text - mov esi,text_len - mcall + mcall 12, 1 +; DRAW WINDOW + xor eax,eax ; function 0 : define and draw window + xor esi,esi + mcall ,[winxpos],[winypos],0x34ddffdd,,title +; function 4 : write text to window + xor ecx,ecx + mcall 4,<17,13>,,text,text_len push dword edit1 call [edit_box_draw] + push dword check1 call [check_box_draw] -align 16 -.show_process_info: - mov edi,[list_start] - mov [list_add],edi - mov dword [index],0 - mov dword [curposy],54-offset_y + mcall 26,9 + add eax,100 + mov [time_counter],eax -.loop_draw: - call draw_next_process - inc dword [index] - add dword [curposy],10 - cmp [index],display_processes - jl .loop_draw - - test ebp,ebp - jz .end_redraw - mov eax,8 - mov esi,0xaabbcc - + call show_process_info ; previous page button - mov ebx,(30-offset_x)*65536+96 - mov ecx,(380-offset_y)*65536+10 - mov edx,51 - mcall - + mcall 8,<25,96>,<358,10>,51,0xaabbcc ; next page button 52 - mov ebx,(130-offset_x)*65536+96 - inc edx - mcall - + inc edx + mcall ,<125,96> ; ">" (text enter) button -; mov ebx,30*65536+20 - add ecx,20 shl 16 -; inc edx -; mcall - + add ecx,20 shl 16 ; run button 53 - mov ebx,(456-offset_x)*65536+50 - inc edx - mcall - + inc edx + mcall ,<451,50> ; reboot button - sub ebx,120*65536 - add ebx,60 - sub ecx,20 shl 16 - inc edx - mcall - + sub ebx,120*65536 + add ebx,60 + sub ecx,20 shl 16 + inc edx + mcall ;"PREV PAGE", "NEXT PAGE" and "REBOOT" labels - mov eax,4 - mov ebx,(50-offset_x)*65536+382-offset_y - xor ecx,ecx - mov edx,tbts - mov esi,tbte-tbts - mcall - -;">" labels -; mov eax,4 -; mov ebx,40*65536+402 -; xor ecx,ecx -; mov edx,tbts_2 -; mov esi,1 -; mcall - + xor ecx,ecx + mcall 4,<45,360>,,tbts,tbte-tbts ;"RUN" labels -; mov eax,4 - mov ebx,(475-offset_x)*65536+402-offset_y - xor ecx,ecx - mov edx,tbts_3 - mov esi,tbte_2-tbts_3 - mcall - + mcall ,<464,380>,,tbts_3,tbte_2-tbts_3 ;print application name in text box -; call print_text - - mcall 12, 2 - -.end_redraw: - ret - - + mcall 12, 2 + ret +;------------------------------------------------------------------------------ +align 4 +show_process_info: + mov edi,[list_start] + mov [list_add],edi + mov dword [index],0 + mov dword [curposy],32 +;-------------------------------------- +align 4 +.loop_draw: + call draw_next_process + inc dword [index] + add dword [curposy],10 + cmp [index],display_processes + jl .loop_draw + ret +;------------------------------------------------------------------------------ ; DATA AREA +;------------------------------------------------------------------------------ system_path db '/sys/lib/' library_name db 'box_lib.obj',0 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; @@ -652,43 +494,47 @@ err_message_found_lib db 'Sorry I cannot load library box_lib.obj',0 head_f_i: head_f_l db 'System error',0 err_message_import db 'Error on load import library box_lib.obj',0 - +;------------------------------------------------------------------------------ +align 4 myimport: +edit_box_draw dd aEdit_box_draw +edit_box_key dd aEdit_box_key +edit_box_mouse dd aEdit_box_mouse +;version_ed dd aVersion_ed -edit_box_draw dd aEdit_box_draw -edit_box_key dd aEdit_box_key -edit_box_mouse dd aEdit_box_mouse -;version_ed dd aVersion_ed +check_box_draw dd aCheck_box_draw +check_box_mouse dd aCheck_box_mouse +;version_ch dd aVersion_ch -check_box_draw dd aCheck_box_draw -check_box_mouse dd aCheck_box_mouse -;version_ch dd aVersion_ch +;option_box_draw dd aOption_box_draw +;option_box_mouse dd aOption_box_mouse +;version_op dd aVersion_op -;option_box_draw dd aOption_box_draw -;option_box_mouse dd aOption_box_mouse -;version_op dd aVersion_op + dd 0 + dd 0 - dd 0 - dd 0 +aEdit_box_draw db 'edit_box',0 +aEdit_box_key db 'edit_box_key',0 +aEdit_box_mouse db 'edit_box_mouse',0 +;aVersion_ed db 'version_ed',0 -aEdit_box_draw db 'edit_box',0 -aEdit_box_key db 'edit_box_key',0 -aEdit_box_mouse db 'edit_box_mouse',0 -;aVersion_ed db 'version_ed',0 +aCheck_box_draw db 'check_box_draw',0 +aCheck_box_mouse db 'check_box_mouse',0 +;aVersion_ch db 'version_ch',0 -aCheck_box_draw db 'check_box_draw',0 -aCheck_box_mouse db 'check_box_mouse',0 -;aVersion_ch db 'version_ch',0 - -;aOption_box_draw db 'option_box_draw',0 -;aOption_box_mouse db 'option_box_mouse',0 -;aVersion_op db 'version_op',0 -check1 check_box 10,(400-offset_y),6,11,0x80AABBCC,0,0,check_text,check_t_e,0;ch_flag_en +;aOption_box_draw db 'option_box_draw',0 +;aOption_box_mouse db 'option_box_mouse',0 +;aVersion_op db 'version_op',0 +;------------------------------------------------------------------------------ +align 4 +check1 check_box 10,378,6,11,0x80AABBCC,0,0,check_text,check_t_e,0;ch_flag_en check1_end: -edit1 edit_box 350,(100-offset_x),(398-offset_y),0xffffff,0x6f9480,0,0xAABBCC,0,start_application_c,start_application,mouse_dd,ed_focus,start_application_e,start_application_e +edit1 edit_box 350,95,376,0xffffff,0x6f9480,0,0xAABBCC,0,start_application_c,\ + start_application,mouse_dd,ed_focus,start_application_e,start_application_e edit1_end: list_start dd 0 - +;------------------------------------------------------------------------------ +align 4 sys_reboot: dd 7 dd 0 @@ -696,74 +542,104 @@ sys_reboot: dd 0 dd 0 db '/sys/end',0 - +;------------------------------------------------------------------------------ if lang eq de text: - db 'NAME/BEENDEN PID CPU-LAST % ' - db 'SPEICHER START/NUTZUNG W-STACK W-SIZE' + db 'NAME/BEENDEN PID CPU-LAST % ' + db 'SPEICHER START/NUTZUNG W-STACK W-SIZE' text_len = $-text -tbts: db 'SEITE ZURUECK SEITE VOR REBOOT SYSTEM' +tbts: db 'SEITE ZURUECK SEITE VOR REBOOT SYSTEM' tbte: -;tbts_2 db '>' -tbts_3 db 'START' +tbts_3 db 'START' tbte_2: -check_text db '@ gehoren/aus' +check_text db '@ on/off' check_t_e=$-check_text -title db 'Prozesse - Ctrl/Alt/Del',0 - +title db 'Prozesse - Ctrl/Alt/Del',0 +;-------------------------------------- else if lang eq et text: - db 'NIMI/LÕPETA PID CPU-KASUTUS % ' - db 'MÄLU ALGUS/KASUTUS W-PUHVER W-SUURUS' + db 'NIMI/LÕPETA PID CPU-KASUTUS % ' + db 'MÄLU ALGUS/KASUTUS W-PUHVER W-SUURUS' text_len = $-text -tbts: db 'EELMINE LEHT JÄRGMINE LEHT REBOODI SÜSTEEM' +tbts: db 'EELMINE LEHT JÄRGMINE LEHT REBOODI SÜSTEEM' tbte: -;tbts_2 db '>' -tbts_3 db 'START' +tbts_3 db 'START' tbte_2: -check_text db '@ on/off' +check_text db '@ on/off' check_t_e=$-check_text -title db 'Protsessid - Ctrl/Alt/Del' +title db 'Protsessid - Ctrl/Alt/Del' +;-------------------------------------- +else if lang eq ru +text: + db 'ˆŒŸ/‡€‚…˜ˆ’œ PID CPU-‡€ƒ“‡Š€ % ' + db '€ŒŸ’œ €—€‹Ž/‚‘…ƒŽ W-STACK W-SIZE' +text_len = $-text +tbts: db '…„.‘’ ‘‹…„.‘’ ……‡€ƒ“‡Š€' +tbte: +tbts_3 db '‡€“‘Š' +tbte_2: +check_text db '@ ¢ª«/¢ëª«' +check_t_e=$-check_text +title db '„¨á¯¥âç¥à ¯à®æ¥áᮢ - Ctrl/Alt/Del',0 +;-------------------------------------- else text: - db 'NAME/TERMINATE PID CPU-USAGE % ' - db 'MEMORY START/USAGE W-STACK W-SIZE' + db 'NAME/TERMINATE PID CPU-USAGE % ' + db 'MEMORY START/USAGE W-STACK W-SIZE' text_len = $-text -tbts: db 'PREV PAGE NEXT PAGE REBOOT SYSTEM' +tbts: db 'PREV PAGE NEXT PAGE REBOOT SYSTEM' tbte: -;tbts_2 db '>' -tbts_3 db 'RUN' +tbts_3 db ' RUN' tbte_2: -check_text db '@ on/off' +check_text db '@ on/off' check_t_e=$-check_text -title db 'Processes - Ctrl/Alt/Del',0 +title db 'Process manager - Ctrl/Alt/Del',0 end if -file_start: dd 7 - dd 0,0,0,0 +;------------------------------------------------------------------------------ +align 4 +file_start: + dd 7 + dd 0 + dd 0 + dd 0 + dd 0 start_application: db '/sys/LAUNCHER',0 start_application_e=$-start_application-1 ; times 60 db 0 -rb 60 + rb 60 start_application_c=$-start_application-1 - -I_END: +;------------------------------------------------------------------------------ +IM_END: +;------------------------------------------------------------------------------ +align 4 sc system_colors -winxpos rd 1 -winypos rd 1 +winxpos rd 1 +winypos rd 1 mouse_dd rd 1 -cpu_percent rd 1 -tcolor rd 1 -list_add rd 1 -curposy rd 1 -index rd 1 -tasklist rd display_processes +cpu_percent rd 1 +tcolor rd 1 +list_add rd 1 +curposy rd 1 +index rd 1 +tasklist rd display_processes +time_counter rd 1 +;------------------------------------------------------------------------------ +align 4 +library_path: process_info_buffer process_information -cur_dir_path rb 1024 -library_path rb 1024 - +;------------------------------------------------------------------------------ +align 4 +cur_dir_path: + rb 1024 +;------------------------------------------------------------------------------ +align 4 + rb 1024 +stack_area: +;------------------------------------------------------------------------------ U_END: +;------------------------------------------------------------------------------