WebSVN – Kolibri OS – Diff – /programs/system/cpu/trunk/cpu.asm

   dd     0x0 , 0x0               ; I_Param , I_Icon
 include 'lang.inc'
 include '..\..\..\macros.inc'
+display_processes=32            ; number of processes to show
-display_processes=32            ; number of processes to show
+align 4
 START:                          ; start of execution
 ; calculate window position
 ; at the center of the screen
     call calculate_window_pos
 ;main loop when process name isn't edited.
+align 4
+red:
-;main loop when process name isn't edited.
+	xor	ebp,ebp
-red:
+	inc	ebp
+;    mov  ebp,1
-    mov  ebp,1
+    call draw_window            ; redraw all window
-    call draw_window            ; redraw all window
+align 4
 still:
     mov  eax,23                 ; wait here for event
-    mov  ebx,100                ; 1 sec.
+    mov  ebx,200                ; 2 sec.
-    int  0x40
+    mcall
-    cmp  eax,1                  ; redraw request ?
+    dec  eax                  ; redraw request ?
-    je   red
+    jz   red
-    cmp  eax,2                  ; key in buffer ?
+    dec  eax                  ; key in buffer ?
+    jz   key
-    je   key
+    dec  eax                  ; button in buffer ?
-    cmp  eax,3                  ; button in buffer ?
+    jz   button
-    je   button
+align 4
 still_end:
     xor  ebp,ebp                ; draw new state of processes
     call draw_window
     jmp  still
 align 4
   key:                          ; key
     mov  eax,2
-    int  0x40
+    mcall
     cmp  ah,184                 ; PageUp
     je   pgdn
     cmp  ah,183
     je   pgup                   ; PageDown
     cmp  ah,27
     je   close                  ; Esc
     jmp  still_end
+align 4
   button:
 ; get button id
     mov  eax,17
-    int  0x40
+    mcall
     test ecx,ecx
     jle  still_end
 ;terminate application
     mov  eax,18
     mov  ebx,2
-    int  0x40
+    mcall
     jmp  still_end
+align 4
   noterm:
+;special buttons
+    dec  eax
+    jz   close
-;special buttons
-    cmp  eax,51
+    sub  eax,50
     jz   pgdn
-    cmp  eax,52
+    dec  eax
     jz   pgup
-    cmp  eax,53
+    dec  eax
     jz   read_string
-    cmp  eax,54
+    dec  eax
     jz   program_start
-    cmp  eax,55
+    dec  eax
-    jz   reboot
-    cmp  eax,1
-    jz   close
+    jz   reboot
     jmp  still_end
 ;buttons handlers
-;buttons handlers
+align 4
   pgdn:
     sub  [list_start],display_processes
 ;    cmp  [list_start],0
     jge  still_end
     mov  [list_start],0
     jmp  still_end
 align 4
   pgup:
     mov  eax,[list_add]  ;maximal displayed process slot
     mov  [list_start],eax
     jmp  still_end
 align 4
   program_start:
     mov  eax,70
     mov  ebx,file_start
-    int  0x40
+    mcall
     jmp  still_end
 align 4
   reboot:
     mov  eax,70
     mov  ebx,sys_reboot
-    int  0x40
+    mcall
 ;close program if we going to reboot
 align 4
   close:
     or   eax,-1                 ; close this program
-    int  0x40
+    mcall
 align 4
 draw_next_process:
 ;input:
 ;  edi - current slot
     jnz   .nodelete
 ;delete old button
     mov   eax,8
     mov   edx,[index]
     add   edx,(1 shl 31)+11
-    int   0x40
+    mcall
+align 4
 .nodelete:
 ;create terminate process button
     mov   eax,8
     mov   ebx,15*65536+100
     mov   ecx,[curposy]
     mov   esi,0xaabbcc
 ;contrast
     test  dword [index],1
     jz    .change_color_button
     mov   esi,0x8899aa
+align 4
 .change_color_button:
-    int   0x40
+    mcall
 ;draw background for proccess information
     mov   eax,13
     mov   ebx,115*65536+395
     ;ecx was already set
     mov   edx,0x88ff88
 ;contrast
     test  dword [index],1
     jz    .change_color_info
+    mov   edx,0xddffdd
-    mov   edx,0xddffdd
+align 4
 .change_color_info:
-    int   0x40
+    mcall
 ;nothing else should be done
 ;if there is no process for this button
     mov   ecx,edi
 ;precacluate pointer to process buffer
     mov   ebx,process_info_buffer
+;find process loop
-;find process loop
+align 4
 .find_loop:
     cmp   ecx,256
     jge   .no_processes
 ;load process information in buffer
     mov   eax,9
 ;    mov   ebx,process_info_buffer
-    int   0x40
+    mcall
 ;if current slot greater than maximal slot,
     cmp   [process_info_buffer+process_information.slot_state],9
     jnz   .process_found
     inc   ecx
     jmp   .find_loop
 align 4
 .no_processes:
     mov   edi,-1
     ret
 align 4
 .process_found:
     mov  edi,ecx
     mov  [list_add],ecx
 ;get processor cpeed
 ;for percent calculating
     mov  eax,18
     mov  ebx,5
-    int  0x40
+    mcall
 ;81-100% : red
     test eax,eax
     jg   .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
+align 4
 .no_green:
     mov  dword [tcolor],0xac0000
 .color_set:
 ;ecx haven't changed since .process_found
 ;    mov  ecx,edi
     mov  edx,[curposy]
     add  edx,20*65536+1
     mov  esi,[tcolor]
-    int  0x40
+    mcall
 ;show process name
     mov  eax,4
     mov  ebx,[curposy]
     add  ebx,50*65536+1
     mov  ecx,[tcolor]
     mov  edx,process_info_buffer.process_name
     mov  esi,11
-    int  0x40
+    mcall
 ;show pid
     mov  eax,47
     mov  ebx,8*65536+1*256
     mov  ecx,[process_info_buffer.PID]
     mov  edx,[curposy]
     add  edx,130*65536+1
     mov  esi,[tcolor]
-    int  0x40
+    mcall
 ;show cpu usage
     mov  ecx,[process_info_buffer.cpu_usage]
     add  edx,60*65536
-    int  0x40
+    mcall
 ;show cpu percent
     mov  ebx,3*65536+0*256
     mov  ecx,[cpu_percent]
     add  edx,60*65536
-    int  0x40
+    mcall
 ;show memory start - obsolete
     mov  ebx,8*65536+1*256
     mov  ecx,[process_info_buffer.memory_start]
     add  edx,30*65536
-    int  0x40
+    mcall
 ;show memory usage
     mov  ecx,[process_info_buffer.used_memory]
     inc  ecx
     add  edx,60*65536
-    int  0x40
+    mcall
 ;show window stack and value
     mov  ecx,dword [process_info_buffer.window_stack_position]
     add  edx,60*65536
-    int  0x40
+    mcall
 ;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
-    int  0x40
+    mcall
 align 4
 .ret:
 ;build index->slot map for terminating processes.
     mov  edi,start_application
 ;edi now contains pointer to last symbol
     jmp  still1
+;read string main loop
-;read string main loop
+align 4
   f11:
 ;full update
     push edi
     mov  ebp,1
     call draw_window
+    pop  edi
-    pop  edi
+align 4
   still1:
 ;wait for message
     mov  eax,23
     mov  ebx,100
-    int  0x40
+    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
 align 4
 .message_received:
     cmp  eax,2
     jne  read_done          ;buttons message
 ;read char
     mov  eax,2
-    int  0x40
+    mcall
     shr  eax,8
 ;if enter pressed, exit read string loop
 ;fill last symbol with space because
 ;print_text show all symbols
     mov  [edi],byte 32
     call print_text
     jmp  still1
+align 4
   nobsl:
 ;write new symbol
     mov  [edi],al
 ;display new text
     call print_text
     add  esi,60
     cmp  esi,edi
     jnz  still1
+;exiting from read string loop
-;exiting from read string loop
+align 4
   read_done:
 ;terminate string for file functions
     mov  [edi],byte 0
     call print_text
     jmp  still
 align 4
 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
-    int  0x40
+    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
-    mov  esi,60                 ;60 symbols
+    mcall
     int  0x40
     popad
-    popad
+    ret
     ret
+window_x_size=524
-window_x_size=524
+window_y_size=430
-window_y_size=430
+align 4
 calculate_window_pos:
 ;set window size and position for 0 function
 ;   *********************************************
 ;   *******  WINDOW DEFINITIONS AND DRAW ********
 ;   *********************************************
 align 4
 draw_window:
 ;ebp=1 - redraw all
 ;ebp=0 - redraw only process information
     test ebp,ebp
+    jz   .show_process_info
-    jz   .show_process_info
+    mov  eax,12                    ; function 12:tell os about windowdraw
 ;    mov  ebx,1                     ; 1, start of draw
-    mov  eax,12                    ; function 12:tell os about windowdraw
+    xor	 ebx,ebx
-    mov  ebx,1                     ; 1, start of draw
+    inc  ebx
-    int  0x40
+    mcall
                                    ; 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,0x14ddffdd  ;ffffff   ; color of work area RRGGBB,8->color
     mov  edi,title                ; WINDOW CAPTION;
-    int  0x40
+    mcall
-    mov  eax,4                     ; function 4 : write text to window
-    mov  ebx,22*65536+35           ; draw info text with function 4
+    mov  eax,4                     ; function 4 : write text to window
-    xor  ecx,ecx
+    mov  ebx,22*65536+35           ; draw info text with function 4
-    mov  edx,text
+    xor  ecx,ecx
-    mov  esi,text_len
+    mov  edx,text
-    mov  eax,4
+    mov  esi,text_len
+    mcall
-    int  0x40
+align 4
 .show_process_info:
-.show_process_info:
+    mov  edi,[list_start]
-    mov  edi,[list_start]
+    mov  [list_add],edi
-    mov  [list_add],edi
+    mov  dword [index],0
 ; previous page button
     mov  ebx,30*65536+96
     mov  ecx,380*65536+10
     mov  edx,51
-    int  0x40
+    mcall
 ; next page button
     mov  ebx,130*65536+96
     inc  edx
-    int  0x40
+    mcall
 ; ">" (text enter) button
     mov  ebx,30*65536+20
     add  ecx,20 shl 16
     inc  edx
-    int  0x40
+    mcall
 ; run button
     mov  ebx,456*65536+50
     inc  edx
-    int  0x40
+    mcall
 ; reboot button
     sub  ebx,120*65536
     add  ebx,60
     sub  ecx,20 shl 16
     inc  edx
-    int  0x40
+    mcall
 ;"PREV PAGE", "NEXT PAGE" and "REBOOT" labels
     mov  eax,4
     mov  ebx,50*65536+382
     xor  ecx,ecx
     mov  edx,tbts
     mov  esi,tbte-tbts
-    int  0x40
+    mcall
 ;">" labels
     mov  eax,4
     mov  ebx,40*65536+402
     xor  ecx,ecx
     mov  edx,tbts_2
     mov  esi,1
-    int  0x40
+    mcall
 ;"RUN" labels
     mov  eax,4
     mov  ebx,475*65536+402
     xor  ecx,ecx
     mov  edx,tbts_3
     mov  esi,tbte_2-tbts_3
-    int  0x40
+    mcall

Subversion Repositories Kolibri OS

(root)/programs/system/cpu/trunk/cpu.asm – Rev 748 → 1203