Subversion Repositories Kolibri OS

Rev

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

Rev 1639 Rev 1640
Line 38... Line 38...
38 
        mov	ecx,dword ch_text_color		;çàãðóçèì öâåò íàäïèñè + flags
 38 
        mov   ecx,dword ch_text_color        ;çàãðóçèì öâåò íàäïèñè + flags
39 
        sub	ebx,7				;äîáàâèì çíà÷åíèå äëèíû ñòîðîíû -9+2
 39 
        sub   ebx,7        ;äîáàâèì çíà÷åíèå äëèíû ñòîðîíû -9+2
Line 40... Line 40...
40
40
41 
        mov	edx,dword ch_text_ptr		;óêàæåì àäðåñ îò êóäà íóæíî âûâîäèòü ñòðîêó
 41 
        mov   edx,dword ch_text_ptr                ;óêàæåì àäðåñ îò êóäà íóæíî âûâîäèòü ñòðîêó
42 
        mov	esi,dword ch_text_length
 42 
        mov   esi,dword ch_text_length
- 
 
 43 
        ;âíåñåì â eax çíà÷åíèå âûâîäà íàäïèñè íà êàíâó
43 
        mov	eax,4				;âíåñåì â eax çíà÷åíèå âûâîäà íàäïèñè íà êàíâó
 44 
        mov   eax,4
44 
        mcall					;Âûâîä
45 
        mcall                  ;Âûâîä
45 
	popa					;âîññòàíîâèòü çíà÷åíèÿ ðåãèñòðîâ èç ñòåêà
 46 
popa                              ;âîññòàíîâèòü çíà÷åíèÿ ðåãèñòðîâ èç ñòåêà
Line 46... Line 47...
46 
	ret 4					;âûéäåì èç ïðîöåäóðû
 47 
ret 4                             ;âûéäåì èç ïðîöåäóðû
Line 51... Line 52...
51 
check_box_draw_ch:            ;íàðèñîâàòü âêëþ÷åííûé ÷åê áîêñ
 52 
check_box_draw_ch:            ;íàðèñîâàòü âêëþ÷åííûé ÷åê áîêñ
52 
        mov   edx,dword ch_border_color        ;çàãðóçèòü öâåò
 53 
        mov   edx,dword ch_border_color        ;çàãðóçèòü öâåò
53 
@@:
 54 
@@:
54 
        movzx ebx,word ch_left  ;çàãðóçèòü êîîðäèíàòó ïî õ
 55 
        movzx ebx,word ch_left  ;çàãðóçèòü êîîðäèíàòó ïî õ
55 
        mov   eax,dword ch_size
 56 
        mov   eax,dword ch_size
56 
        mov   di,ax
 57 
        mov   bp,ax
57 
        shr   eax,2
 58 
        shr   eax,2
58 
        push  ax
 59 
        push  ax
Line 59... Line 60...
59
60
60 
        push  ax
 61 
        push  ax