Subversion Repositories Kolibri OS

Rev

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

Rev 2676 Rev 3443
Line 1... Line 1...
1 
;
 1 
;
2 
; END
 2 
; END
3 
; KolibriOS Team 2005-2010
 3 
; KolibriOS Team 2005-2013
4 
;
 4 
;
5 
;  note that 'mov al,xx' is shorter than 'mov eax,xx'
 5 
;  note that 'mov al,xx' is shorter than 'mov eax,xx'
6 
;           and if we know that high 24 bits of eax are zero, we can use 1st form
 6 
;           and if we know that high 24 bits of eax are zero, we can use 1st form
7 
;           the same about ebx,ecx,edx
 7 
;           the same about ebx,ecx,edx
Line 21... Line 21...
21 
 
 21 
 
Line 22... Line 22...
22 
    movzx ecx,ax
 22 
    movzx ecx,ax
23 
 
 23 
 
24 
    shr  eax,17
 24 
    shr  eax,17
Line 25... Line 25...
25 
    shl  eax,16
 25 
    shl  eax,16
26 
    lea  ebx,[eax-110*10000h+220]
 26 
    lea  ebx,[eax-110*10000h+222]
27 
 
 27 
 
Line 28... Line 28...
28 
    shr  ecx,1
 28 
    shr  ecx,1
29 
    shl  ecx,16
 29 
    shl  ecx,16
30 
    sub  ecx,50*10000h - 115
 30 
    sub  ecx,50*10000h - 115
31 
 
 31 
 
32 
    xor  eax,eax			   ; define and draw window
 32 
    xor  eax,eax			   ; define and draw window
Line 33... Line 33...
33 
    mov  edx,0x00cccccc
 33 
    mov  edx,0x01cccccc
34 
    mov  esi,edx
 - 
 
35 
    mov  edi,edx
 34 
    mov  esi,edx
36 
    mcall
 35 
    mov  edi,edx
37 
 
 36 
    mcall
38 
   sub edx,0x555555
 37 
 
39 
   mov al,13
 38 
   mcall 13,0 shl 16+222,0 shl 16+230, 0xcccccc
40 
   mcall ,19 shl 16+87,21 shl 16+24
 39 
   mcall ,19 shl 16+87,21 shl 16+24, 0x555555