mirror of
https://github.com/KolibriOS/kolibrios.git
synced 2024-12-16 11:52:34 +03:00
8df9a500b6
git-svn-id: svn://kolibrios.org@362 a494cfbc-eb01-0410-851d-a64ba20cac60
204 lines
8.5 KiB
PHP
204 lines
8.5 KiB
PHP
;ª®¬¯®¥â OptionBox (Žá®¢ Checkbox)
|
||
;Ž£à®¬ ï ¡« £®¤ à®áâì Maxxxx32, Diamond, Heavyiron, ¨ ¤à㣨¬ ¯à®£à ¬¬¨áâ ¬, ¨ ¨å ¯à®£à ¬¬ ¬, ¡¥§
|
||
;ª®â®àëå ï ¥ ᬮ£ ¡ë ¯¨á âì íâ®â ª®¬¯®¥â.
|
||
;19.02.2007 ®¡é¥¥ ã«ãç襨¥ ª®¤ , 㬥ì襨¥ à §¬¥à ¨ ¨á¯®«ì§®¢ ¨¥ á¨á⥬ëå 梥⮢ ¤«ï ®â®¡à ¦¥¨ï optionkbox
|
||
;16.02.2007 ¤ â ᮧ¤ ¨ï ª®¬¯®¥â
|
||
;<Lrz> - ’¥¯«®¢ €«¥ªá¥© www.lrz.land.ru
|
||
|
||
macro use_option_box
|
||
{
|
||
op_text_margin=4 ;à ááâ®ï¨¥ ®â ¯àאַ㣮«ì¨ª 祪 ¡®ªá ¤® ¤¯¨á¨
|
||
op_size=10 ;à §¬¥à ª¢ ¤à â 祪 ¡®ªá
|
||
op_left equ [edi] ;ª®®à¤¨ â ç « à¨á®¢ ¨ï ¯® å
|
||
op_top equ [edi+2] ;ª®®à¤¨ â ç « à¨á®¢ ¨ï ¯® ã
|
||
op_border_color equ [sc.work_graph] ; or [edi+4] ;梥â à ¬ª¨ checkbox ¥¥ ¬®¦® § ¤ âì á ¬®áâ®ï⥫ì®
|
||
op_text_color equ [sc.work_text];[edi+4] ;梥â ⥪áâ
|
||
;op_border_color equ [edi+4] ;梥â à ¬ª¨ optionbox
|
||
;op_text_color equ [edi+8] ;梥â ⥪áâ
|
||
op_text_ptr equ [edi+4] ;㪠§ ⥫ì ç «® ⥪á⮢®© áâப¨
|
||
op_text_length equ [edi+8] ;¤«¨ ¤¯¨á¨ (2^64 â ª®© ¤«¨ë ¬®¦¥â ¡ëâì ⥪áâ)
|
||
op_optibox_gr equ [edi+10]
|
||
option_box:
|
||
.draw:
|
||
pusha ;á®åà ¨¬ ¢á¥ ॣ¨áâàë
|
||
mov eax,38 ;à¨á®¢ ¨¥ «¨¨¨
|
||
movzx ebx,word op_left ;¯®«®¦¥¨¥ ¯® å
|
||
mov ecx,ebx ;á®åà ¨¬ ¢ ॣ¨áâॠcx § 票¥ bx 1 ¬¨ªà®®¯¥à æ¨ï
|
||
;push bx ;3 - ¬¨ªà®®¯¥à 樨 ¨á¯®«ì§ãï á⥪ ¬®¦® ¢ë¨£à âì ¢ à §¬¥à¥, ¨á¯®«ì§ãï ॣ¨áâàë - ¢ ᪮à®áâ¨
|
||
shl ebx,16 ;ᤢ¨¥¬ 16 à §à冷¢ ¢ «¥¢® (㬮¦¨¬ 65536)
|
||
;pop bx ;2 - ¬¨ªà®®¯¥à 樨 ¤ ë© ¬®¬¥â áä®à¬¨à®¢ [ª®®à¤¨ â ç « ¯® ®á¨ x]*65536 + [ª®®à¤¨ â ç « ¯® ®á¨ x]
|
||
mov bx,cx ;¢®ááâ ®¢¨¬ § 票¥ bx
|
||
movzx ecx,word op_top ;§ £à㧨¬ ¢ cx § 票¥ y
|
||
mov esi,ecx ;á®åà ¨¬ § 票¥ ॣ¨áâà cx ¢ ॣ¨áâà 㪠§ ⥫ì si
|
||
;push cx
|
||
shl ecx,16 ; ᤢ¨¥¬ 16 à §à冷¢ ¢ «¥¢® (㬮¦¨¬ 65536) mov cx,si ;¢®ááâ ®¢¨¬ § 票¥ ॣ¨áâà cx
|
||
mov cx,si ;¢®ááâ ®¢¨¬ § 票¥ ॣ¨áâà cx
|
||
;pop cx ;[ª®®à¤¨ â ç « ¯® ®á¨ y]*65536 + [ª®®à¤¨ â ç « ¯® ®á¨ y]
|
||
;push cx
|
||
add ecx,op_size ;[ª®®à¤¨ â ç « ¯® ®á¨ y]*65536 + [ª®®à¤¨ â ª®æ ¯® ®á¨ y]
|
||
mov edx,dword op_border_color ;–¢¥â «¨¨¨
|
||
int 0x40 ;à¨á®¢ ¨¥ ¢¥à⨪ «ì®© «¥¢®© «¨¨¨ ª¢ ¤à â (¯àאַ㣮«ì¨ª )
|
||
;
|
||
mov ebp,ebx ;á®åà ¨¬ ॣ¨áâà bx ¢ ॣ¨áâॠ㪠§ â¥«ï ¡ §ë
|
||
;push bx ;¢â®«ªãâì ¢ bx [ª®®à¤¨ â ç « ¯® ®á¨ å]*65536 + [ª®®à¤¨ â ç « ¯® ®á¨ x]
|
||
add ebx,op_size ;[ª®®à¤¨ â ç « + ¤«¨ áâ®à®ë ¯® ®á¨ å]
|
||
ror ebx,16 ;[ª®®à¤¨ â ç « + ¤¨ áâ®à®ë ¯® ®á¨ å]*65536
|
||
add ebx,op_size ;[ª®®à¤¨ â ç « +¤«¨ áâ®à®ë ¯® ®á¨ å]*65536 + [ª®®à¤¨ â ç « +¤«¨ áâ®à®ë ¯® ®á¨ x]
|
||
int 0x40
|
||
|
||
mov bx,bp ;¢®ááâ ®¢¨¬ § 票¥ ॣ¨áâà bx
|
||
;pop bx
|
||
mov cx,si ;á®åà ¨¬ § 票¥ ॣ¨áâà cx ¢ ॣ¨áâà 㪠§ ⥫ì
|
||
;pop cx
|
||
int 0x40
|
||
add ecx,op_size ;¤®¡ ¢¨¬ à §¬¥à áâ®à®ë
|
||
mov esi,ecx ;á®åà ¨¬ § 票¥ ॣ¨áâà cx ¢ ॣ¨áâà 㪠§ ⥫ì si
|
||
;push cx
|
||
shl ecx,16
|
||
mov cx,si
|
||
;pop cx
|
||
int 0x40 ; à¨á®¢ «¨ ¯àאַ㣮«ì¨ª
|
||
|
||
call .clear_op ;®ç¨á⪠®¡« áâ¨
|
||
|
||
mov eax,dword op_optibox_gr
|
||
mov dword eax,[eax]
|
||
cmp eax,edi
|
||
jne @f
|
||
call .draw_op ; à¨á®¢ âì ¢ª«îç¥ë© 祪 ¡®ªá
|
||
;----------------------------
|
||
;à áç¥â ªã¤ ¡ã¤¥â ¯à®¨§¢¥¤¥ ¢ë¢®¤ ⥪áâ
|
||
;----------------------------
|
||
@@: movzx ebx,word op_left ;§ £à㧨âì § 票¥ å ¤«ï 祪 ¡®ªá
|
||
add ebx,(op_size+op_text_margin) ;¤®¡ ¢¨âì à §¬¥à áâ®à®ë ¨ à ááâ®ï¨¥ ª®â®à®¬ ç¥âáï ¢ë¢®¤ ⥪áâ
|
||
shl ebx,16 ;ᤢ¨¥¬ 16 à §à冷¢ ¢ «¥¢® (㬮¦¨¬ 65536)
|
||
mov bx,op_top ;§ £à㧨¬ § 票¥ ¯® y
|
||
add ebx,(op_size-9+2) ;¤®¡ ¢¨¬ § 票¥ ¤«¨ë áâ®à®ë -9+2
|
||
mov ecx,op_text_color ;§ £à㧨¬ 梥⠤¯¨á¨
|
||
|
||
mov edx,op_text_ptr ;㪠¦¥¬ ¤à¥á ®â ªã¤ 㦮 ¢ë¢®¤¨âì áâபã
|
||
movzx esi,word op_text_length ;‡ £à㧨¬ ¤«¨ã ¤¯¨á¨ ¢ esi
|
||
;¢¥á¥¬ ¢ eax § 票¥ ¢ë¢®¤ ¤¯¨á¨ ª ¢ã
|
||
mov eax,4
|
||
int 0x40 ;‚뢮¤
|
||
popa ;¢®ááâ ®¢¨âì § 票ï ॣ¨áâ஢ ¨§ á⥪
|
||
ret ;¢ë©¤¥¬ ¨§ ¯à®æ¥¤ãàë
|
||
|
||
.clear_op: ;®ç¨á⪠祪 ¡®ªá
|
||
mov edx,dword [sc.work] ;梥⠢ãâਠ祪 ¡®ªá
|
||
jmp @f ;¡¥§ãá«®¢ë© ¯à릮ª ¨¦îî ¬¥âªã @@
|
||
|
||
.draw_op: ; à¨á®¢ âì ¢ª«îç¥ë© 祪 ¡®ªá
|
||
mov edx,op_border_color ;§ £à㧨âì 梥â
|
||
@@:
|
||
movzx ebx,word op_left ;§ £à㧨âì ª®®à¤¨ âã ¯® å
|
||
add ebx,(op_size/3) ;¤®¡ ¢¨âì (áâ®à® ¯àאַ㣮«ì¨ª /3)
|
||
shl ebx,16 ;ᤢ¨¥¬ 16 à §à冷¢ ¢ «¥¢® (㬮¦¨¬ 65536)
|
||
mov bx,(op_size/2) ;§ £à㧨âì (áâ®à® ¯àאַ㣮«ì¨ª /2)
|
||
mov bp,bx ;á®åà ¨¬ ॣ¨áâà bx ¢ ॣ¨áâॠ㪠§ â¥«ï ¡ §ë
|
||
;push bx
|
||
movzx ecx,word op_top ;§ £à㧨âì ª®®à¤¨ âã ¯® ã
|
||
mov eax,13 ;¢ eax - § 票ï äãªæ¨¨ ¤«ï ¢ë¢®¤ ¯®«®áë â.¥. ¯® áã⨠¯àאַ㣮«ì¨ª , ª®â®àë© ®â®¡à ¦ ¥â ¢ª«îç¥ë© ª®¬¯®¥â 祪 ¡®ªá
|
||
add ecx,(op_size/3) ;¤®¡ ¢¨âì (áâ®à® ¯àאַ㣮«ì¨ª /3)
|
||
shl ecx,16 ;ᤢ¨¥¬ 16 à §à冷¢ ¢ «¥¢® (㬮¦¨¬ 65536)
|
||
mov cx,bp ;§ £à㧨¬ § 票ï ॣ¨áâà 㪠§ â¥«ï ¡ §ë ¢ cx
|
||
;pop cx
|
||
int 0x40 ;¢ë¢®¤
|
||
ret ;¢ë©â¨ ¨§ ¯à®æ¥¤ãàë
|
||
|
||
.mouse: ;®¡à ¡®âª ¬ëè¨
|
||
pusha
|
||
mov eax,37 ;¡ã¤¥¬ çâ® â® ¤¥« âì ¥á«¨ ã á çâ® - ¨âì ¦ â®
|
||
mov ebx,2 ;¢¥á⨠¢ ॣ¨áâà § 票¥ 2
|
||
int 0x40 ;¯à®¢¥àª ¥ ¦ « «¨ ¯®«ì§®¢ â¥«ì ª®¯ªã ¬ë誨
|
||
test eax,eax ;¯à®¢¥àª ¥á«¨ ã á ¢ eax=0, â® ãáâ ®¢¨¬ ä« £ ¨ ¢ë©¤¥¬
|
||
jnz @f ;¯¥à¥©â¨ ¨¦îî ¬¥âªã @@
|
||
popa ;¥á«¨ ¨ç¥£® ¥ ¯à®¨§®è«®, â® ¢®ááâ ®¢¨¬ § 票ï ॣ¨áâ஢ ¨§ á⥪
|
||
ret ;¢ë室
|
||
@@:
|
||
movzx esi,word op_text_length ;§ £à㧨âì ª®«-¢® ᨬ¢®«®¢ ¢ ⥪á⮢®© áâப¥
|
||
;“¬®¦¥¨¥ 6 <EFBFBD>ëáâ஥ 㬮¦¥¨¥ ¬®¦® ¢®á¯®«ì§®¢ âìáï «î¡ë¬ ¬§ ¬¥â®¤®¢, ® áâ àëå <EFBFBD>à®æ¥áá®à å (386,486,P1)¡ëáâ॥ ¡ã¤¥â á ¨áâàãªæ¨¥© Lea
|
||
;lea esi,[eax*2+eax]
|
||
;shl eax,1
|
||
imul esi,6 ; ¨«¨ ¬®¦® ¨ â ª 㬮¦¨âì 6
|
||
xor ebx,ebx
|
||
add esi,op_text_margin ;¤®¡ ¢¨âì 3 - à ááâ®ï¨¥ ®â 祪 ¡®ªá ¤® ¤¯¨á¨
|
||
|
||
mov eax,37 ;¯®«ã稬 ª®®à¤¨ âë ¬ë誨
|
||
inc ebx ;¤®¡ ¢¨âì 1
|
||
int 0x40 ;¯®«ãç¨âì ª®®à¤¨ âë ªãàá®à ®â®á¨â¥«ì® ®ª
|
||
|
||
movzx ebx,word op_top ;§ £à㧨âì ¢ bx § 票¥ ª®®à¤¨ âë ã
|
||
cmp ax,bx ;áà ¢¨âì á á ª®®à¤¨ ⮩ ªãàá®à
|
||
jl .mouse_end ;SF <> OF ¥á«¨ ¬¥ìè¥
|
||
add ebx,op_size ;¤®¡ ¢¨âì à §¬¥à
|
||
cmp ax,bx ;áà ¢¨âì
|
||
jg .mouse_end ;ZF = 0 ¨ SF = OF ¥á«¨ ¡®«ìè¥
|
||
|
||
shr eax,16 ;à §¤¥«¨¬ 65536 ¨«¨ ¯à®á⮠ᤢ¨¥¬ ¡¨âë 16 § 票©
|
||
movzx ebx,word op_left ;¯à®¨§¢¥¤¥¬ «®£¨ç®¥ áà ¢¥¨¥
|
||
cmp ax,bx ;áà ¢¨âì ॣ¨áâàë
|
||
jl .mouse_end ;¥á«¨ ¬¥ìè¥
|
||
add ebx,op_size ;¤®¡ ¢¨âì ¤«¨ã áâ®à®ë ¯àאַ㣮«ì¨ª
|
||
add ebx,esi ;“ç¥áâì ¢ § 票¨ ¯® å ¥é¥ ¨ ¤«¨ã ¤¯¨á¨ ª 祪¡®ªáã
|
||
cmp ax,bx ;áâà ¢¨âì ॣ¨áâàë
|
||
jg .mouse_end ;¥á«¨ ¡®«ìè¥
|
||
mov eax,dword op_optibox_gr
|
||
mov [eax],edi
|
||
|
||
.mouse_end:
|
||
popa ;¢®ááâ ®¢¨âì ॣ¨áâàë ¨§ á⥪
|
||
ret ;¢ë©â¨
|
||
}
|
||
|
||
struc option_box left,top,text,text_length,point_gr
|
||
{ ;áâàãªâãà ¯ à ¬¥â஢ ¤«ï 祪 ¡®ªá
|
||
.left: dw left ;+0 ;¯®«®¦¥¨¥ ¯® å
|
||
.top: dw top ;+2 ;¯®«®¦¥¨¥ ¯® ã
|
||
;.border_color: dd border_color ;+8 梥â à ¬ª¨
|
||
;.text_color: dd text_color ;+12 梥â ⥪áâ ¤¯¨á¨
|
||
.text: dd text ;+16 ¤à¥á ¢ ª®¤¥ ¯à®£à ¬¬ë £¤¥ à ᯮ«®¦¥ ⥪áâà
|
||
.text_length: dw text_length ; +20 ¤«¨ ⥪áâ
|
||
.option_group: dd point_gr ;㪠§ ⥫ì à §¬¥é¥¨¥ edi - ¨¤¥â¨ä¨ª â®à optibox
|
||
}
|
||
op_struc_size=14 ;®¡é ï áâàãªâãà 24 ¡ ©â
|
||
op_flag_en=10b
|
||
macro draw_option_boxes start,end ;à¨á®¢ âì 祪 ¡®ªáë
|
||
{
|
||
mov edi,start ;“ª § ⥫ì ç «® ¤ ëå 祪 ¡®ªá®¢ â.¥. ç «® ¤ ëå ¯¥à¢®£® 祪¡®ªá
|
||
mov ecx,((end-start)/op_struc_size) ;Š®«¨ç¥á⢮ 祪 ¡®ªá®¢
|
||
@@:
|
||
call option_box.draw ;Žâ®¡à §¨âì 祪 ¡®ªá
|
||
add edi,op_struc_size ;“ª § â¥«ì ¯®á«¥¤ãî騥 祪 ¡®ªáë â.¥. +28
|
||
loop @b ;¯àë£ãâì ¥á«¨ ¢ ecx/cx § 票¥ ¥ 0 ¢¥àåîî @@
|
||
}
|
||
macro mouse_option_boxes start,end ;ãáâ ®¢ª 祪 ¡®ªá®¢, ¢ § ¢¨á¨¬®á⨠®â ᮡëâ¨ï
|
||
{
|
||
mov edi,start ; “ª § ⥫ì ç «® ¤ ëå 祪 ¡®ªá®¢ â.¥. ç «® ¤ ëå ¯¥à¢®£® 祪¡®ªá
|
||
mov ecx,((end-start)/op_struc_size) ;Š®«¨ç¥á⢮ 祪 ¡®ªá®¢
|
||
@@:
|
||
call option_box.mouse ;¯à®¢¥àª ¬ë誨 ¨ ®¡à ¡®âª ᮡë⨩
|
||
add edi,op_struc_size ;“ª § â¥«ì ¯®á«¥¤ãî騥 祪 ¡®ªáë
|
||
loop @b ;¯àë£ãâì ¥á«¨ ¢ ecx/cx § 票¥ ¥ 0 ¢¥àåîî @@
|
||
|
||
mov edi,start ; “ª § ⥫ì ç «® ¤ ëå 祪 ¡®ªá®¢ â.¥. ç «® ¤ ëå ¯¥à¢®£® 祪¡®ªá
|
||
mov ecx,((end-start)/op_struc_size) ;Š®«¨ç¥á⢮ 祪 ¡®ªá®¢
|
||
|
||
.home:
|
||
mov eax,[edi+10] ;op_optibox_gr
|
||
mov dword eax,[eax]
|
||
|
||
pusha
|
||
|
||
cmp eax,edi
|
||
jne @f
|
||
|
||
call option_box.draw_op
|
||
jmp .nxtm
|
||
@@: call option_box.clear_op
|
||
|
||
.nxtm: popa
|
||
add edi,op_struc_size ;“ª § â¥«ì ¯®á«¥¤ãî騥 祪 ¡®ªáë â.¥. +28
|
||
loop .home
|
||
|
||
} |