WebSVN – Kolibri OS – Diff – /programs/system/cpuid/trunk/CPUID.ASM

   dd U_END+4096
   dd U_END+4096
   dd	 0x0
   dd	 0x0
-macro udata
-{
-}
+include '..\..\..\macros.inc' ; useful macroses
-include 'mos_uzel.inc'
+include 'draw.inc'
-; useful macroses and Brand ID decoding
-include 'caches.inc'
+include 'brand.inc'           ;Brand ID decoding
-;(L1 and L2 cashes decoding for Intel)
-include 'multipli.inc'
+include 'caches.inc'          ;(L1 and L2 cashes decoding for Intel)
-;(multiplier decoding)
+include 'multipli.inc'        ;(multiplier decoding)
-include 'features.inc'
-;(features decoding)
+include 'features.inc'        ;(features decoding)
 include 'gif2img.inc'
-; include macros to convert gif to img
+include 'gif2img.inc'         ;macros to convert gif to img
 ;------------
 CYCLES:
 ;    CPU speed
     mov eax, 18
     mov ebx,5
-    int 0x40
+    mcall
     mov [total1],eax  ;in Hz,  example 1600490000
     xor  edx,edx
     mov  ebx,1000000
     div  ebx
     mov [total], eax  ; in Mhz,  example 1600
 Text 75,70,0x00000000,AMDn, AMDnlen-AMDn
 	mov	esi, amd
 	call	load_gif
-PutImage 125,107,201,49,img_area+8
+PutImage 135,97,201,49,img_area+8
 ;         place   size
   ;  mov   eax,dword 0x00000004
   ;  mov   ebx,115*65536+80
   ;  mov   ecx,dword 0x00000000
   ;  mov   edx,PF0c
   ;  mov   esi,PF0clen-PF0c
-  ;  int   0x40
+  ;  mcall
   ;jmp MMXtest
 ;.ppF1:
 Text 110,70,0x00000000,PF0, PF0len-PF0
  jmp MMXtest
 .IF2:
     ;================_RAM_==============
   Number 200,340,0,4,dword [ram_size_a],0xFFFFFF
   mov eax, 18
   mov ebx, 16
-  int 0x40
+  mcall
   shr eax, 10
   mov [ram_size_a], eax
   mov eax, 18
   Number 270,340,0,4,dword [ram_size_t],0x000000
   Text 300,340,0x00000000,mb, mblen-mb
-;==============================
 ;==============================
-	mov	ebx,50	     ; æäåìñ 1 ñåê
+	mov	eax,23	     ; ôóíêöèÿ 23: îæèäàíèå ñîáûòèÿ
-	mov	eax,23	     ; ôóíêöèÿ 23: îæèäàíèå ñîáûòèÿ
-	int	0x40
 	mov	ebx,50	     ; æäåìñ 0.5 ñåê
-;    mov  eax,10
+	mcall
 ;    int  0x40           ;
     cmp  eax,1		;
     je	 red		;  redraw
     cmp  eax,2		;
     je	 key		;  key
     cmp  eax,3		;
     je	 button 	;  button
     jmp  still		;
   key:			;
     mov  eax,2		;
-    int  0x40		;
+    mcall		;
     jmp  still		;
   button:		;
     mov  eax,17 	;
-    int  0x40		;
+    mcall		;
     cmp  ah,1		;  = 1 ?
 noclose:
     jmp  still
 close:
     mov   eax,-1
-    int  0x40
+    mcall
 ;**************************** THREAD-SECOND WINDOW
  module_test:
 ;test rsa coding speed
 ;length of module - 256 bit
   mov  eax,26
   mov  ebx,9
-  int  0x40
+  mcall
   add  eax,100 ;test lasts 1 second.
   push eax
 .loop:
   mov  ecx,4 ;do 4 iterations
-  push ecx   ;this reduces number of calls int 0x40.
+  push ecx   ;this reduces number of calls mcall.
 .loop1:
   call rsa_test   ;this procedure change all registers
   dec  dword [esp]
   jnz  .loop1
   pop  ecx
   mov  eax,26
   mov  ebx,9
-  int  0x40
+  mcall
   cmp  eax,dword [esp]	 ;Is time changed?
   jl   .loop
   pop  eax
   shr  dword [iter],4 ;[iter] - speed in Kb/sec. (every iteration codes 64 bytes)
   ret
     call draw_window_2
 still_2:
     mov  eax,10
-    int  0x40
+    mcall
     cmp  eax,1
     jmp  still_2	;
   key_2:		;
     mov  eax,2		;   2
-    int  0x40		;
+    mcall		;
     jmp  still_2	;
   button_2:		;
     mov  eax,17 	; 17
-    int  0x40		;
+    mcall		;
     cmp  ah,1		; = 1 ?
     jne  noclose_2	; noclose
     mov  [num_win2],0	;
     or	 eax,-1 	;
-    int  0x40
+    mcall
   noclose_2:
 Number 95,350,0,5,dword [iter],0x000000; RSA test results
     mov  eax,12
     mov  ebx,2h
-    int  0x40
+    mcall
     ret
 num_win2 db 0
 ;   *******  main window *******
 draw_window:
    mov eax,12
 ;         place   size
     mov  eax,12
     mov  ebx,2h
-    int  0x40
+    mcall
 	gif2img esi,edi
 	ret
 ; DATA AREA
-header    db   'CPUID 2.19 by S.Kuzmin & the KolibriOS team',0
+title    db   'CPUID 2.2 by S.Kuzmin & the KolibriOS team',0
 myname:
    rb 48
 mynamelen:
 align 4
   udata
   thread2_stack_area rb 64
   thread2_esp = $

Subversion Repositories Kolibri OS

(root)/programs/system/cpuid/trunk/CPUID.ASM – Rev 451 → 485