Subversion Repositories Kolibri OS

Rev

Rev 1640 | Go to most recent revision | Blame | Last modification | View Log | Download | RSS feed

  1. ;ôàéë ñîçäàí 13.02.2009 <Lrz> Íà êîä ïðèìåíåíà GPL2 ëèöåíçèÿ
  2. ;Ìàêðîñ äëÿ ñèñòåìíîé áèáëèîòåêè box_lib.obj
  3. ;Checkbox
  4.  
  5. macro use_checkbox_draw
  6. {
  7. check_box_draw:
  8.        pusha   ;ñîõðàíèì âñå ðåãèñòðû
  9.        mov     edi,dword [esp+36]
  10.        mov eax,13
  11.        movzx ebx,word ch_left
  12.        shl ebx,16
  13.        add ebx,ch_size
  14.        mov ecx,ch_top
  15.        shl ecx,16
  16.        add ecx,dword ch_size
  17.        mov edx,dword ch_border_color
  18.        mcall ;ðèñóåì ðàìêó
  19.  
  20.        mov edx,dword ch_color
  21.        add ebx,1 shl 16 - 2
  22.        add ecx,1 shl 16 - 2
  23.        mcall ;çàêðàøèâàåì âíóòðåííîñòè ÷åêáîêñà
  24.  
  25.        test dword ch_flags,2  ;äîñòàòü çíà÷åíèå áèòà èç ïåðåìåííîé è ïîìåñòèòü â  ôëàã CF
  26.        jz   @f                ;â åñëè CF=1, òî âûïîëíèì ñëåäóþùóþ ïðîöåäóðó èíà÷å ïåðåéòè íà íèæíþþ @@
  27.        call check_box_draw_ch  ;íàðèñîâàòü âêëþ÷åííûé ÷åê áîêñ
  28. @@:
  29. ;----------------------------
  30. ;ðàñ÷åò êóäà áóäåò ïðîèçâåäåí âûâîä òåêñòà
  31. ;----------------------------
  32.         movzx ebx,word ch_left        ;çàãðóçèòü çíà÷åíèå õ äëÿ ÷åê áîêñà
  33.         add   ebx,dword ch_size
  34.         add   ebx,dword ch_text_margin;äîáàâèòü ðàçìåð ñòîðîíû è ðàññòîÿíèå íà êîòîðîì íà÷íåòñÿ âûâîä òåêñòà
  35.         shl   ebx,16                ;ñäâèíåì íà 16 ðàçðÿäîâ â ëåâî (óìíîæèì íà 65536)
  36.         mov   bx,word ch_top        ;çàãðóçèì çíà÷åíèå ïî y
  37.         mov   eax,ch_size
  38.         shr   eax,1
  39.         add   eax,4
  40.         add   ebx,eax
  41.         mov   ecx,dword ch_text_color        ;çàãðóçèì öâåò íàäïèñè + flags
  42.         sub   ebx,7        ;äîáàâèì çíà÷åíèå äëèíû ñòîðîíû -9+2
  43.        
  44.         mov   edx,dword ch_text_ptr                ;óêàæåì àäðåñ îò êóäà íóæíî âûâîäèòü ñòðîêó
  45.         mov   esi,dword ch_text_length
  46.         ;âíåñåì â eax çíà÷åíèå âûâîäà íàäïèñè íà êàíâó
  47.         mov   eax,4
  48.         mcall                  ;Âûâîä
  49. popa                              ;âîññòàíîâèòü çíà÷åíèÿ ðåãèñòðîâ èç ñòåêà
  50. ret 4                             ;âûéäåì èç ïðîöåäóðû
  51.  
  52. check_box_clear_ch:                        ;î÷èñòêà ÷åê áîêñà
  53.         mov   edx,dword ch_color   ;öâåò âíóòðè ÷åê áîêñà
  54.         jmp   @f             ;áåçóñëîâíûé ïðûæîê íà íèæíþþ ìåòêó @@
  55. check_box_draw_ch:            ;íàðèñîâàòü âêëþ÷åííûé ÷åê áîêñ
  56.         mov   edx,dword ch_border_color        ;çàãðóçèòü öâåò
  57. @@:
  58.         movzx ebx,word ch_left  ;çàãðóçèòü êîîðäèíàòó ïî õ
  59.         mov   eax,dword ch_size
  60.         mov   bp,ax
  61.         shr   eax,2
  62.         push  ax
  63.  
  64.         push  ax
  65.         add   ebx,eax          
  66.         shl   ebx,16            ;ñäâèíåì íà 16 ðàçðÿäîâ â ëåâî (óìíîæèì íà 65536)
  67.         pop   ax
  68.         lea   eax,[eax*2]
  69.         sub   bp,ax             ;ñîõðàíèì ðåãèñòð bx â ðåãèñòðå óêàçàòåëÿ áàçû
  70.         mov   bx,bp
  71.  
  72.         movzx ecx,word ch_top ;çàãðóçèòü êîîðäèíàòó ïî ó
  73.         pop   ax
  74.         add   cx,ax        
  75.         shl   ecx,16          ;ñäâèíåì íà 16 ðàçðÿäîâ â ëåâî (óìíîæèì íà 65536)
  76.         mov   cx,bp           ;çàãðóçèì çíà÷åíèÿ ðåãèñòðà óêàçàòåëÿ áàçû â cx
  77.         mov   eax,13          ;â eax - çíà÷åíèÿ ôóíêöèè äëÿ âûâîäà ïîëîñû ò.å. ïî ñóòè ïðÿìîóãîëüíèêà, êîòîðûé îòîáðàæàåò âêëþ÷åííûé êîìïîíåíò ÷åê áîêñ
  78.         mcall            ;âûâîä
  79. ret                                ;âûéòè èç ïðîöåäóðû
  80. }
  81.  
  82.  
  83. macro use_checkbox_mouse
  84. {
  85.  
  86. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  87. ;Îáðàáîò÷èê mouse
  88. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  89. check_box_mouse:      ;îáðàáîòêà ìûøè
  90. pusha
  91.         mov     edi,dword [esp+36]
  92.         mov     eax,37           ;áóäåì ÷òî òî äåëàòü åñëè ó íàñ ÷òî - íèòü íàæàòî
  93.         mov     ebx,2            ;âíåñòè â ðåãèñòð çíà÷åíèå 2
  94.         mcall             ;ïðîâåðêà íå íàæàë ëè ïîëüçîâàòåëü êíîïêó ìûøêè
  95.         test    eax,eax   ;ïðîâåðêà åñëè ó íàñ â eax=0, òî óñòàíîâèì ôëàã è âûéäåì
  96.         jnz     @f         ;ïåðåéòè íà íèæíþþ ìåòêó @@
  97.         btr     dword ch_flags,2  ;èçâëå÷åíèå çíà÷åíèÿ çàäàííîãî áèòà â ôëàã cf è èçìåíåíèå åãî çíà÷åíèÿ íà íóëåâîå.
  98.         jmp     check_box_mouse_end
  99.        
  100. @@:
  101.         bts  dword ch_flags,2   ;ïðîâåðêà ôëàãà ò.å. ïåðåíîñ â cf çíà÷åíèå áèòà è óñòàíîâêà áèòà â ñîñòîÿíèå âêëþ÷åíî
  102.         jc   check_box_mouse_end         ;åñëè CF=1 òî ïåðåéòè  â êîíåö ò.å. ýòî âûõîä
  103.         mov  esi,dword ch_text_length ;çàãðóçèòü êîë-âî ñèìâîëîâ â òåêñòîâîé ñòðîêå
  104.         ;Óìíîæåíèå íà 6 Áûñòðîå óìíîæåíèå ìîæíî âîñïîëüçîâàòüñÿ ëþáûì ìç ìåòîäîâ, íî íà ñòàðûõ Ïðîöåññîðàõ (386,486,P1)áûñòðåå áóäåò ñ èíñòðóêöèåé Lea
  105.         lea esi,[eax*3]  
  106.         shl esi,1
  107. ;        imul esi,6             ; èëè ìîæíî è òàê óìíîæèòü íà 6
  108.         add  esi,dword ch_text_margin ;äîáàâèòü 3 - ðàññòîÿíèå îò ÷åê áîêñà äî íàäïèñè
  109.  
  110.         mov  eax,37             ;ïîëó÷èì êîîðäèíàòû ìûøêè
  111.         mov  ebx,1              ;äîáàâèòü 1
  112.         mcall               ;ïîëó÷èòü êîîðäèíàòû êóðñîðà îòíîñèòåëüíî îêíà
  113.        
  114.         movzx ebx,word ch_top  ;çàãðóçèòü â bx çíà÷åíèå êîîðäèíàòû ó
  115.         cmp   ax,bx              ;ñðàâíèòü ñ ñ êîîðäèíàòîé êóðñîðà
  116.         jl   check_box_mouse_end          ;SF <> OF åñëè ìåíüøå
  117.         add   ebx,dword ch_size        ;äîáàâèòü ðàçìåð
  118.         cmp   ax,bx              ;ñðàâíèòü
  119.         jg   check_box_mouse_end          ;ZF = 0 è SF = OF åñëè áîëüøå
  120.              
  121.         shr   eax,16              ;ðàçäåëèì íà 65536 èëè ïðîñòî ñäâèíåì áèòû íà 16 çíà÷åíèé
  122.         movzx ebx,word ch_left  ;ïðîèçâåäåì àíàëîãè÷íîå ñðàâíåíèå
  123.         cmp   ax,bx            ;ñðàâíèòü ðåãèñòðû
  124.         jl   check_box_mouse_end        ;åñëè ìåíüøå
  125.         add   ebx,dword ch_size      ;äîáàâèòü äëèíó ñòîðîíû ïðÿìîóãîëüíèêà
  126.         add   ebx,esi          ;Ó÷åñòü â çíà÷åíèè ïî õ åùå è äëèíó íàäïèñè ê ÷åêáîêñó
  127.         cmp   ax,bx            ;ñòðàâíèòü ðåãèñòðû
  128.         jg   check_box_mouse_end        ;åñëè áîëüøå
  129.  
  130.         bts  dword ch_flags,1  ;èçâëå÷åíèå çíà÷åíèÿ çàäàííîãî áèòà â ôëàã cf è èçìåíåíèå åãî çíà÷åíèÿ íà 1.
  131.         jc   @f                ;CF=1 òî ïåðåéòè íà íèæíþþ @@
  132.        
  133.         call check_box_draw_ch        ;îòîáðàçèòü âêëþ÷åííûé ÷åê áîêñ
  134. ;        mov   dword [esp+24],1 ;äàëüíåéøàÿ ïðîâåðêà ÷åê áîêñîâ áåñìûñëåíà, ïî ýòîìó â ñòåê, ãäå ðàñïîëàãàåòñÿ ecx ïîìåñòèòì 0
  135.         jmp  check_box_mouse_end       ;âûéòè
  136. @@:
  137.         btr   word ch_flags,1  ;èçâëå÷åíèå çíà÷åíèÿ çàäàííîãî áèòà â ôëàã cf è èçìåíåíèå åãî çíà÷åíèÿ íà íóëåâîå.
  138.         call check_box_clear_ch         ;âûêëþ÷èòü ÷åê áîêñ ò.å. íà ìåñòå çàêðàøåííîãî ïðÿìîóãîëüíèêà îòîáðàçèòü öâåò ôîíà.
  139. check_box_mouse_end:
  140. popa                                ;âîññòàíîâèòü ðåãèñòðû èç ñòåêà
  141. ret  4                              ;âûéòè
  142. }