| 0,0 → 1,148 |
|---|
| ;ôàéë ñîçäàí 13.02.2009 <Lrz> Íà êîä ïðèìåíåíà GPL2 ëèöåíçèÿ |
| ;Ìàêðîñ äëÿ ñèñòåìíîé áèáëèîòåêè box_lib.obj |
| ;Checkbox |
| |
| macro use_checkbox_draw |
| { |
| check_box_draw: |
| ;ch_struc_size=24 |
| ch_left equ [edi] ;êîîðäèíàòà íà÷àëà ðèñîâàíèÿ ïî õ |
| ch_top equ [edi+2] ;êîîðäèíàòà íà÷àëà ðèñîâàíèÿ ïî ó |
| ch_text_margin equ [edi+4] ;=4 ðàññòîÿíèå îò ïðÿìîóãîëüíèêà ÷åê áîêñà äî íàäïèñè |
| ch_size equ [edi+8] ;12 ðàçìåð êâàäðàòà ÷åê áîêñà |
| ch_color equ [edi+12] |
| ch_border_color equ [edi+16] ; or [edi+4] ;öâåò ðàìêè checkbox åå ìîæíî çàäàòü ñàìîñòîÿòåëüíî |
| ch_text_color equ [edi+20];[edi+4] ;öâåò òåêñòà |
| ch_text_ptr equ [edi+24] ;óêàçàòåëü íà íà÷àëî òåêñòîâîé ñòðîêè |
| ch_text_length equ [edi+28] |
| ch_flags equ [edi+32] ;ôëàãè |
| |
| pusha ;ñîõðàíèì âñå ðåãèñòðû |
| mov edi,dword [esp+36] |
| mov eax,13 |
| movzx ebx,word ch_left |
| shl ebx,16 |
| add ebx,ch_size |
| mov ecx,ch_top |
| shl ecx,16 |
| add ecx,dword ch_size |
| mov edx,dword ch_border_color |
| mcall ;ðèñóåì ðàìêó |
| |
| mov edx,dword ch_color |
| add ebx,1 shl 16 - 2 |
| add ecx,1 shl 16 - 2 |
| mcall ;çàêðàøèâàåì âíóòðåííîñòè ÷åêáîêñà |
| |
| test dword ch_flags,2 ;äîñòàòü çíà÷åíèå áèòà èç ïåðåìåííîé è ïîìåñòèòü â ôëàã CF |
| jz @f ;â åñëè CF=1, òî âûïîëíèì ñëåäóþùóþ ïðîöåäóðó èíà÷å ïåðåéòè íà íèæíþþ @@ |
| call check_box_draw_ch ;íàðèñîâàòü âêëþ÷åííûé ÷åê áîêñ |
| @@: |
| ;---------------------------- |
| ;ðàñ÷åò êóäà áóäåò ïðîèçâåäåí âûâîä òåêñòà |
| ;---------------------------- |
| movzx ebx,word ch_left ;çàãðóçèòü çíà÷åíèå õ äëÿ ÷åê áîêñà |
| add ebx,dword ch_size |
| add ebx,dword ch_text_margin;äîáàâèòü ðàçìåð ñòîðîíû è ðàññòîÿíèå íà êîòîðîì íà÷íåòñÿ âûâîä òåêñòà |
| shl ebx,16 ;ñäâèíåì íà 16 ðàçðÿäîâ â ëåâî (óìíîæèì íà 65536) |
| mov bx,word ch_top ;çàãðóçèì çíà÷åíèå ïî y |
| add ebx,ch_size |
| mov ecx,dword ch_text_color ;çàãðóçèì öâåò íàäïèñè + flags |
| sub ebx,7 ;äîáàâèì çíà÷åíèå äëèíû ñòîðîíû -9+2 |
| |
| mov edx,dword ch_text_ptr ;óêàæåì àäðåñ îò êóäà íóæíî âûâîäèòü ñòðîêó |
| mov esi,dword ch_text_length |
| ;âíåñåì â eax çíà÷åíèå âûâîäà íàäïèñè íà êàíâó |
| mov eax,4 |
| mcall ;Âûâîä |
| popa ;âîññòàíîâèòü çíà÷åíèÿ ðåãèñòðîâ èç ñòåêà |
| ret 4 ;âûéäåì èç ïðîöåäóðû |
| |
| check_box_clear_ch: ;î÷èñòêà ÷åê áîêñà |
| mov edx,dword ch_color ;öâåò âíóòðè ÷åê áîêñà |
| jmp @f ;áåçóñëîâíûé ïðûæîê íà íèæíþþ ìåòêó @@ |
| check_box_draw_ch: ;íàðèñîâàòü âêëþ÷åííûé ÷åê áîêñ |
| mov edx,dword ch_border_color ;çàãðóçèòü öâåò |
| @@: |
| movzx ebx,word ch_left ;çàãðóçèòü êîîðäèíàòó ïî õ |
| mov eax,dword ch_size |
| push ax |
| shr eax,2 |
| add ebx,eax ;äîáàâèòü (ñòîðîíà ïðÿìîóãîëüíèêà/3) |
| shl ebx,16 ;ñäâèíåì íà 16 ðàçðÿäîâ â ëåâî (óìíîæèì íà 65536) |
| pop bx |
| shr bx,1 ;çàãðóçèòü (ñòîðîíà ïðÿìîóãîëüíèêà/2) |
| mov bp,bx ;ñîõðàíèì ðåãèñòð bx â ðåãèñòðå óêàçàòåëÿ áàçû |
| |
| movzx ecx,word ch_top ;çàãðóçèòü êîîðäèíàòó ïî ó |
| mov eax,dword ch_size |
| shr eax,2 |
| add ecx,eax ;äîáàâèòü (ñòîðîíà ïðÿìîóãîëüíèêà/4) |
| shl ecx,16 ;ñäâèíåì íà 16 ðàçðÿäîâ â ëåâî (óìíîæèì íà 65536) |
| mov cx,bp ;çàãðóçèì çíà÷åíèÿ ðåãèñòðà óêàçàòåëÿ áàçû â cx |
| mov eax,13 ;â eax - çíà÷åíèÿ ôóíêöèè äëÿ âûâîäà ïîëîñû ò.å. ïî ñóòè ïðÿìîóãîëüíèêà, êîòîðûé îòîáðàæàåò âêëþ÷åííûé êîìïîíåíò ÷åê áîêñ |
| mcall ;âûâîä |
| ret ;âûéòè èç ïðîöåäóðû |
| } |
| |
| |
| macro use_checkbox_mouse |
| { |
| |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| ;Îáðàáîò÷èê mouse |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| check_box_mouse: ;îáðàáîòêà ìûøè |
| pusha |
| mov edi,dword [esp+36] |
| mov eax,37 ;áóäåì ÷òî òî äåëàòü åñëè ó íàñ ÷òî - íèòü íàæàòî |
| mov ebx,2 ;âíåñòè â ðåãèñòð çíà÷åíèå 2 |
| mcall ;ïðîâåðêà íå íàæàë ëè ïîëüçîâàòåëü êíîïêó ìûøêè |
| test eax,eax ;ïðîâåðêà åñëè ó íàñ â eax=0, òî óñòàíîâèì ôëàã è âûéäåì |
| jnz @f ;ïåðåéòè íà íèæíþþ ìåòêó @@ |
| btr dword ch_flags,2 ;èçâëå÷åíèå çíà÷åíèÿ çàäàííîãî áèòà â ôëàã cf è èçìåíåíèå åãî çíà÷åíèÿ íà íóëåâîå. |
| jmp check_box_mouse_end |
| |
| @@: |
| bts dword ch_flags,2 ;ïðîâåðêà ôëàãà ò.å. ïåðåíîñ â cf çíà÷åíèå áèòà è óñòàíîâêà áèòà â ñîñòîÿíèå âêëþ÷åíî |
| jc check_box_mouse_end ;åñëè CF=1 òî ïåðåéòè â êîíåö ò.å. ýòî âûõîä |
| mov esi,dword ch_text_length ;çàãðóçèòü êîë-âî ñèìâîëîâ â òåêñòîâîé ñòðîêå |
| ;Óìíîæåíèå íà 6 Áûñòðîå óìíîæåíèå ìîæíî âîñïîëüçîâàòüñÿ ëþáûì ìç ìåòîäîâ, íî íà ñòàðûõ Ïðîöåññîðàõ (386,486,P1)áûñòðåå áóäåò ñ èíñòðóêöèåé Lea |
| ;lea esi,[eax*2+eax] |
| ;shl eax,1 |
| imul esi,6 ; èëè ìîæíî è òàê óìíîæèòü íà 6 |
| add esi,dword ch_text_margin ;äîáàâèòü 3 - ðàññòîÿíèå îò ÷åê áîêñà äî íàäïèñè |
| |
| mov eax,37 ;ïîëó÷èì êîîðäèíàòû ìûøêè |
| mov ebx,1 ;äîáàâèòü 1 |
| mcall ;ïîëó÷èòü êîîðäèíàòû êóðñîðà îòíîñèòåëüíî îêíà |
| |
| movzx ebx,word ch_top ;çàãðóçèòü â bx çíà÷åíèå êîîðäèíàòû ó |
| cmp ax,bx ;ñðàâíèòü ñ ñ êîîðäèíàòîé êóðñîðà |
| jl check_box_mouse_end ;SF <> OF åñëè ìåíüøå |
| add ebx,dword ch_size ;äîáàâèòü ðàçìåð |
| cmp ax,bx ;ñðàâíèòü |
| jg check_box_mouse_end ;ZF = 0 è SF = OF åñëè áîëüøå |
| |
| shr eax,16 ;ðàçäåëèì íà 65536 èëè ïðîñòî ñäâèíåì áèòû íà 16 çíà÷åíèé |
| movzx ebx,word ch_left ;ïðîèçâåäåì àíàëîãè÷íîå ñðàâíåíèå |
| cmp ax,bx ;ñðàâíèòü ðåãèñòðû |
| jl check_box_mouse_end ;åñëè ìåíüøå |
| add ebx,dword ch_size ;äîáàâèòü äëèíó ñòîðîíû ïðÿìîóãîëüíèêà |
| add ebx,esi ;Ó÷åñòü â çíà÷åíèè ïî õ åùå è äëèíó íàäïèñè ê ÷åêáîêñó |
| cmp ax,bx ;ñòðàâíèòü ðåãèñòðû |
| jg check_box_mouse_end ;åñëè áîëüøå |
| |
| bts dword ch_flags,1 ;èçâëå÷åíèå çíà÷åíèÿ çàäàííîãî áèòà â ôëàã cf è èçìåíåíèå åãî çíà÷åíèÿ íà 1. |
| jc @f ;CF=1 òî ïåðåéòè íà íèæíþþ @@ |
| |
| call check_box_draw_ch ;îòîáðàçèòü âêëþ÷åííûé ÷åê áîêñ |
| ; mov dword [esp+24],1 ;äàëüíåéøàÿ ïðîâåðêà ÷åê áîêñîâ áåñìûñëåíà, ïî ýòîìó â ñòåê, ãäå ðàñïîëàãàåòñÿ ecx ïîìåñòèòì 0 |
| jmp check_box_mouse_end ;âûéòè |
| @@: |
| btr word ch_flags,1 ;èçâëå÷åíèå çíà÷åíèÿ çàäàííîãî áèòà â ôëàã cf è èçìåíåíèå åãî çíà÷åíèÿ íà íóëåâîå. |
| call check_box_clear_ch ;âûêëþ÷èòü ÷åê áîêñ ò.å. íà ìåñòå çàêðàøåííîãî ïðÿìîóãîëüíèêà îòîáðàçèòü öâåò ôîíà. |
| check_box_mouse_end: |
| popa ;âîññòàíîâèòü ðåãèñòðû èç ñòåêà |
| ret 4 ;âûéòè |
| } |