Subversion Repositories Kolibri OS

Rev

Rev 1099 | Blame | Compare with Previous | 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. ;ch_struc_size=24
  9. ch_left equ [edi]    ;ъююЁфшэрЄр эрўрыр Ёшёютрэш  яю ї
  10. ch_top equ [edi+2]   ;ъююЁфшэрЄр эрўрыр Ёшёютрэш  яю є
  11. ch_text_margin equ [edi+4]      ;=4 ЁрёёЄю эшх юЄ яЁ ьюєуюы№эшър ўхъ сюъёр фю эрфяшёш
  12. ch_size equ [edi+8]             ;12 ЁрчьхЁ ътрфЁрЄр ўхъ сюъёр
  13. ch_color equ [edi+12]
  14. ch_border_color equ [edi+16] ; or [edi+4] ;ЎтхЄ Ёрьъш checkbox хх ьюцэю чрфрЄ№ ёрьюёЄю Єхы№эю
  15. ch_text_color equ   [edi+20];[edi+4]  ;ЎтхЄ ЄхъёЄр
  16. ch_text_ptr equ [edi+24]    ;єърчрЄхы№ эр эрўрыю ЄхъёЄютющ ёЄЁюъш
  17. ch_text_length equ [edi+28]
  18. ch_flags equ [edi+32]       ;Їыруш
  19.  
  20.        pusha   ;ёюїЁрэшь тёх ЁхушёЄЁ√
  21.        mov     edi,dword [esp+36]
  22.        mov eax,13
  23.        movzx ebx,word ch_left
  24.        shl ebx,16
  25.        add ebx,ch_size
  26.        mov ecx,ch_top
  27.        shl ecx,16
  28.        add ecx,dword ch_size
  29.        mov edx,dword ch_border_color
  30.        mcall ;Ёшёєхь Ёрьъє
  31.  
  32.        mov edx,dword ch_color
  33.        add ebx,1 shl 16 - 2
  34.        add ecx,1 shl 16 - 2
  35.        mcall ;чръЁр°штрхь тэєЄЁхээюёЄш ўхъсюъёр
  36.  
  37.        test dword ch_flags,2  ;фюёЄрЄ№ чэрўхэшх сшЄр шч яхЁхьхээющ ш яюьхёЄшЄ№ т  Їыру CF
  38.        jz   @f                ;т хёыш CF=1, Єю т√яюыэшь ёыхфє■∙є■ яЁюЎхфєЁє шэрўх яхЁхщЄш эр эшцэ■■ @@
  39.        call check_box_draw_ch  ;эрЁшёютрЄ№ тъы■ўхээ√щ ўхъ сюъё
  40. @@:
  41. ;----------------------------
  42. ;ЁрёўхЄ ъєфр сєфхЄ яЁюшчтхфхэ т√тюф ЄхъёЄр
  43. ;----------------------------
  44.         movzx ebx,word ch_left        ;чруЁєчшЄ№ чэрўхэшх ї фы  ўхъ сюъёр
  45.         add   ebx,dword ch_size
  46.         add   ebx,dword ch_text_margin;фюсртшЄ№ ЁрчьхЁ ёЄюЁюэ√ ш ЁрёёЄю эшх эр ъюЄюЁюь эрўэхЄё  т√тюф ЄхъёЄр
  47.         shl   ebx,16                ;ёфтшэхь эр 16 ЁрчЁ фют т ыхтю (єьэюцшь эр 65536)
  48.         mov   bx,word ch_top        ;чруЁєчшь чэрўхэшх яю y
  49.         add   ebx,ch_size
  50.         mov   ecx,dword ch_text_color        ;чруЁєчшь ЎтхЄ эрфяшёш + flags
  51.         sub   ebx,7        ;фюсртшь чэрўхэшх фышэ√ ёЄюЁюэ√ -9+2
  52.        
  53.         mov   edx,dword ch_text_ptr                ;єърцхь рфЁхё юЄ ъєфр эєцэю т√тюфшЄ№ ёЄЁюъє
  54.         mov   esi,dword ch_text_length
  55.         ;тэхёхь т eax чэрўхэшх т√тюфр эрфяшёш эр ърэтє
  56.         mov   eax,4
  57.         mcall                  ;┬√тюф
  58. popa                              ;тюёёЄрэютшЄ№ чэрўхэш  ЁхушёЄЁют шч ёЄхър
  59. ret 4                             ;т√щфхь шч яЁюЎхфєЁ√
  60.  
  61. check_box_clear_ch:                        ;юўшёЄър ўхъ сюъёр
  62.         mov   edx,dword ch_color   ;ЎтхЄ тэєЄЁш ўхъ сюъёр
  63.         jmp   @f             ;схчєёыютэ√щ яЁ√цюъ эр эшцэ■■ ьхЄъє @@
  64. check_box_draw_ch:            ;эрЁшёютрЄ№ тъы■ўхээ√щ ўхъ сюъё
  65.         mov   edx,dword ch_border_color        ;чруЁєчшЄ№ ЎтхЄ
  66. @@:
  67.         movzx ebx,word ch_left  ;чруЁєчшЄ№ ъююЁфшэрЄє яю ї
  68.         mov   eax,dword ch_size
  69.         mov   bp,ax
  70.         shr   eax,2
  71.         push  ax
  72.  
  73.         push  ax
  74.         add   ebx,eax          
  75.         shl   ebx,16            ;ёфтшэхь эр 16 ЁрчЁ фют т ыхтю (єьэюцшь эр 65536)
  76.         pop   ax
  77.         lea   eax,[eax*2]
  78.         sub   bp,ax             ;ёюїЁрэшь ЁхушёЄЁ bx т ЁхушёЄЁх єърчрЄхы  срч√
  79.         mov   bx,bp
  80.  
  81.         movzx ecx,word ch_top ;чруЁєчшЄ№ ъююЁфшэрЄє яю є
  82.         pop   ax
  83.         add   cx,ax        
  84.         shl   ecx,16          ;ёфтшэхь эр 16 ЁрчЁ фют т ыхтю (єьэюцшь эр 65536)
  85.         mov   cx,bp           ;чруЁєчшь чэрўхэш  ЁхушёЄЁр єърчрЄхы  срч√ т cx
  86.         mov   eax,13          ;т eax - чэрўхэш  ЇєэъЎшш фы  т√тюфр яюыюё√ Є.х. яю ёєЄш яЁ ьюєуюы№эшър, ъюЄюЁ√щ юЄюсЁрцрхЄ тъы■ўхээ√щ ъюьяюэхэЄ ўхъ сюъё
  87.         mcall            ;т√тюф
  88. ret                                ;т√щЄш шч яЁюЎхфєЁ√
  89. }
  90.  
  91.  
  92. macro use_checkbox_mouse
  93. {
  94.  
  95. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  96. ;╬сЁрсюЄўшъ mouse
  97. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  98. check_box_mouse:      ;юсЁрсюЄър ь√°ш
  99. pusha
  100.         mov     edi,dword [esp+36]
  101.         mov     eax,37           ;сєфхь ўЄю Єю фхырЄ№ хёыш є эрё ўЄю - эшЄ№ эрцрЄю
  102.         mov     ebx,2            ;тэхёЄш т ЁхушёЄЁ чэрўхэшх 2
  103.         mcall             ;яЁютхЁър эх эрцры ыш яюы№чютрЄхы№ ъэюяъє ь√°ъш
  104.         test    eax,eax   ;яЁютхЁър хёыш є эрё т eax=0, Єю єёЄрэютшь Їыру ш т√щфхь
  105.         jnz     @f         ;яхЁхщЄш эр эшцэ■■ ьхЄъє @@
  106.         btr     dword ch_flags,2  ;шчтыхўхэшх чэрўхэш  чрфрээюую сшЄр т Їыру cf ш шчьхэхэшх хую чэрўхэш  эр эєыхтюх.
  107.         jmp     check_box_mouse_end
  108.        
  109. @@:
  110.         bts  dword ch_flags,2   ;яЁютхЁър Їырур Є.х. яхЁхэюё т cf чэрўхэшх сшЄр ш єёЄрэютър сшЄр т ёюёЄю эшх тъы■ўхэю
  111.         jc   check_box_mouse_end         ;хёыш CF=1 Єю яхЁхщЄш  т ъюэхЎ Є.х. ¤Єю т√їюф
  112.         mov  esi,dword ch_text_length ;чруЁєчшЄ№ ъюы-тю ёшьтюыют т ЄхъёЄютющ ёЄЁюъх
  113.         ;╙ьэюцхэшх эр 6 ┴√ёЄЁюх єьэюцхэшх ьюцэю тюёяюы№чютрЄ№ё  ы■с√ь ьч ьхЄюфют, эю эр ёЄрЁ√ї ╧ЁюЎхёёюЁрї (386,486,P1)с√ёЄЁхх сєфхЄ ё шэёЄЁєъЎшхщ Lea
  114.         lea esi,[eax*3]  
  115.         shl esi,1
  116. ;        imul esi,6             ; шыш ьюцэю ш Єръ єьэюцшЄ№ эр 6
  117.         add  esi,dword ch_text_margin ;фюсртшЄ№ 3 - ЁрёёЄю эшх юЄ ўхъ сюъёр фю эрфяшёш
  118.  
  119.         mov  eax,37             ;яюыєўшь ъююЁфшэрЄ√ ь√°ъш
  120.         mov  ebx,1              ;фюсртшЄ№ 1
  121.         mcall               ;яюыєўшЄ№ ъююЁфшэрЄ√ ъєЁёюЁр юЄэюёшЄхы№эю юъэр
  122.        
  123.         movzx ebx,word ch_top  ;чруЁєчшЄ№ т bx чэрўхэшх ъююЁфшэрЄ√ є
  124.         cmp   ax,bx              ;ёЁртэшЄ№ ё ё ъююЁфшэрЄющ ъєЁёюЁр
  125.         jl   check_box_mouse_end          ;SF <> OF хёыш ьхэ№°х
  126.         add   ebx,dword ch_size        ;фюсртшЄ№ ЁрчьхЁ
  127.         cmp   ax,bx              ;ёЁртэшЄ№
  128.         jg   check_box_mouse_end          ;ZF = 0 ш SF = OF хёыш сюы№°х
  129.              
  130.         shr   eax,16              ;Ёрчфхышь эр 65536 шыш яЁюёЄю ёфтшэхь сшЄ√ эр 16 чэрўхэшщ
  131.         movzx ebx,word ch_left  ;яЁюшчтхфхь рэрыюушўэюх ёЁртэхэшх
  132.         cmp   ax,bx            ;ёЁртэшЄ№ ЁхушёЄЁ√
  133.         jl   check_box_mouse_end        ;хёыш ьхэ№°х
  134.         add   ebx,dword ch_size      ;фюсртшЄ№ фышэє ёЄюЁюэ√ яЁ ьюєуюы№эшър
  135.         add   ebx,esi          ;╙ўхёЄ№ т чэрўхэшш яю ї х∙х ш фышэє эрфяшёш ъ ўхъсюъёє
  136.         cmp   ax,bx            ;ёЄЁртэшЄ№ ЁхушёЄЁ√
  137.         jg   check_box_mouse_end        ;хёыш сюы№°х
  138.  
  139.         bts  dword ch_flags,1  ;шчтыхўхэшх чэрўхэш  чрфрээюую сшЄр т Їыру cf ш шчьхэхэшх хую чэрўхэш  эр 1.
  140.         jc   @f                ;CF=1 Єю яхЁхщЄш эр эшцэ■■ @@
  141.        
  142.         call check_box_draw_ch        ;юЄюсЁрчшЄ№ тъы■ўхээ√щ ўхъ сюъё
  143. ;        mov   dword [esp+24],1 ;фры№эхщ°р  яЁютхЁър ўхъ сюъёют схёь√ёыхэр, яю ¤Єюьє т ёЄхъ, уфх ЁрёяюырурхЄё  ecx яюьхёЄшЄь 0
  144.         jmp  check_box_mouse_end       ;т√щЄш
  145. @@:
  146.         btr   word ch_flags,1  ;шчтыхўхэшх чэрўхэш  чрфрээюую сшЄр т Їыру cf ш шчьхэхэшх хую чэрўхэш  эр эєыхтюх.
  147.         call check_box_clear_ch         ;т√ъы■ўшЄ№ ўхъ сюъё Є.х. эр ьхёЄх чръЁр°хээюую яЁ ьюєуюы№эшър юЄюсЁрчшЄ№ ЎтхЄ Їюэр.
  148. check_box_mouse_end:
  149. popa                                ;тюёёЄрэютшЄ№ ЁхушёЄЁ√ шч ёЄхър
  150. ret  4                              ;т√щЄш
  151. }