Aren/kolibrios
1
0
Fork 0
mirror of https://github.com/KolibriOS/kolibrios.git synced 2024-11-28 19:53:12 +03:00
Code Issues Packages Projects Releases Wiki Activity

update checkbox

Browse Source 
git-svn-id: svn://kolibrios.org@1099 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Alexey Teplov ( 2009-06-01 18:30:25 +00:00
parent 955ef786b3
commit d912f84b17
1 changed files with 11 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
programs/develop/libraries/box_lib/trunk/checkbox.mac
View File

@ -66,18 +66,21 @@ check_box_draw_ch: ;
@@: @@:
movzx ebx,word ch_left ;загрузить координату по х movzx ebx,word ch_left ;загрузить координату по х
mov eax,dword ch_size mov eax,dword ch_size
push ax mov bp,ax
shr eax,2 shr eax,2
add ebx,eax ;добавить (сторона прямоугольника/3) push ax
push ax
add ebx,eax
shl ebx,16 ;сдвинем на 16 разрядов в лево (умножим на 65536) shl ebx,16 ;сдвинем на 16 разрядов в лево (умножим на 65536)
pop bx pop ax
shr bx,1 ;загрузить (сторона прямоугольника/2) lea eax,[eax*2]
mov bp,bx ;сохраним регистр bx в регистре указателя базы sub bp,ax ;сохраним регистр bx в регистре указателя базы
mov bx,bp
movzx ecx,word ch_top ;загрузить координату по у movzx ecx,word ch_top ;загрузить координату по у
mov eax,dword ch_size pop ax
shr eax,2 add cx,ax
add ecx,eax ;добавить (сторона прямоугольника/4)
shl ecx,16 ;сдвинем на 16 разрядов в лево (умножим на 65536) shl ecx,16 ;сдвинем на 16 разрядов в лево (умножим на 65536)
mov cx,bp ;загрузим значения регистра указателя базы в cx mov cx,bp ;загрузим значения регистра указателя базы в cx
mov eax,13 ;в eax - значения функции для вывода полосы т.е. по сути прямоугольника, который отображает включенный компонент чек бокс mov eax,13 ;в eax - значения функции для вывода полосы т.е. по сути прямоугольника, который отображает включенный компонент чек бокс