Subversion Repositories Kolibri OS

Rev

Rev 1214 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1214 Rev 1372
Line 1... Line 1...
1 
;ôàéë ñîçäàí 13.02.2009  Íà êîä ïðèìåíåíà GPL2 ëèöåíçèÿ
 1 
;ôàéë ñîçäàí 13.02.2009  Íà êîä ïðèìåíåíà GPL2 ëèöåíçèÿ
2 
;Ìàêðîñ äëÿ ñèñòåìíîé áèáëèîòåêè box_lib.obj
 2 
;Ìàêðîñ äëÿ ñèñòåìíîé áèáëèîòåêè box_lib.obj
3 
;Checkbox
 3 
;Checkbox
Line -... Line 4...
- 
 
 4 
 
- 
 
 5 
ch_struc_size=36
- 
 
 6 
ch_flag_en=10b
- 
 
 7 
 
- 
 
 8 
ch_left  equ [edi]         ;ª®®à¤¨­ â  ­ ç «  à¨á®¢ ­¨ï ¯® å
- 
 
 9 
ch_top   equ [edi+2]       ;ª®®à¤¨­ â  ­ ç «  à¨á®¢ ­¨ï ¯® ã
- 
 
 10 
ch_text_margin equ [edi+4] ;=4 à ááâ®ï­¨¥ ®â ¯àאַ㣮«ì­¨ª  祪 ¡®ªá  ¤® ­ ¤¯¨á¨
- 
 
 11 
ch_size  equ [edi+8]       ;12 à §¬¥à ª¢ ¤à â  祪 ¡®ªá 
- 
 
 12 
ch_color equ [edi+12]      ;梥⠢­ãâਠcheckbox
- 
 
 13 
ch_border_color equ [edi+16] ; or [edi+4] ;梥â à ¬ª¨ checkbox ¥¥ ¬®¦­® § ¤ âì á ¬®áâ®ï⥫쭮
- 
 
 14 
ch_text_color   equ [edi+20] ;[edi+4]  ;梥â ⥪áâ 
4 
 
 15 
ch_text_ptr     equ [edi+24] ;㪠§ â¥«ì ­  ­ ç «® ⥪á⮢®© áâப¨
- 
 
 16 
ch_text_length  equ [edi+28]
- 
 
 17 
ch_flags equ [edi+32]      ;ä« £¨
- 
 
 18 
 
5 
macro use_checkbox_draw
 19 
macro check_boxes_set_sys_color start,end,color_table
6 
{
 - 
 
7 
check_box_draw:
 - 
 
8 
;ch_struc_size=24
 20 
{
9 
ch_left equ [edi]    ;êîîðäèíàòà íà÷àëà ðèñîâàíèÿ ïî õ
 21 
ch_left equ [edi]    ;ª®®à¤¨­ â  ­ ç «  à¨á®¢ ­¨ï ¯® å
10 
ch_top equ [edi+2]   ;êîîðäèíàòà íà÷àëà ðèñîâàíèÿ ïî ó
 22 
ch_top equ [edi+2]   ;ª®®à¤¨­ â  ­ ç «  à¨á®¢ ­¨ï ¯® ã
11 
ch_text_margin equ [edi+4]      ;=4 ðàññòîÿíèå îò ïðÿìîóãîëüíèêà ÷åê áîêñà äî íàäïèñè
23 
ch_text_margin equ [edi+4]      ;=4 à ááâ®ï­¨¥ ®â ¯àאַ㣮«ì­¨ª  祪 ¡®ªá  ¤® ­ ¤¯¨á¨
12 
ch_size equ [edi+8]             ;12 ðàçìåð êâàäðàòà ÷åê áîêñà
24 
ch_size equ [edi+8]             ;12 à §¬¥à ª¢ ¤à â  祪 ¡®ªá 
13 
ch_color equ [edi+12]
 25 
ch_color equ [edi+12]           ;梥⠢­ãâਠcheckbox
14 
ch_border_color equ [edi+16] ; or [edi+4] ;öâåò ðàìêè checkbox åå ìîæíî çàäàòü ñàìîñòîÿòåëüíî
 26 
ch_border_color equ [edi+16] ; or [edi+4] ;梥â à ¬ª¨ checkbox ¥¥ ¬®¦­® § ¤ âì á ¬®áâ®ï⥫쭮
15 
ch_text_color equ   [edi+20];[edi+4]  ;öâåò òåêñòà
 27 
ch_text_color equ   [edi+20];[edi+4]  ;梥â ⥪áâ 
16 
ch_text_ptr equ [edi+24]    ;óêàçàòåëü íà íà÷àëî òåêñòîâîé ñòðîêè
28 
ch_text_ptr equ [edi+24]    ;㪠§ â¥«ì ­  ­ ç «® ⥪á⮢®© áâப¨
17 
ch_text_length equ [edi+28]
 29 
ch_text_length equ [edi+28]
Line -... Line 30...
- 
 
 30 
ch_flags equ [edi+32]       ;ä« £¨
- 
 
 31 
 
- 
 
 32 
        mov     edi,start
- 
 
 33 
        mov     ecx,((end-start)/ch_struc_size)
- 
 
 34 
        mov     esi,color_table
- 
 
 35 
@@:
- 
 
 36 
        push    dword [esi+32]
- 
 
 37 
        pop     dword ch_text_color
- 
 
 38 
        push    dword [esi+36]
- 
 
 39 
        pop     dword ch_border_color
- 
 
 40 
        add     edi,ch_struc_size
- 
 
 41 
        loop    @b
- 
 
 42 
}
- 
 
 43 
struc check_box left,top,ch_text_margin,ch_size,color,border_color,text_color,text,ch_text_length,flags
- 
 
 44 
{        ;áâàãªâãà  ¯ à ¬¥â஢ ¤«ï 祪 ¡®ªá 
- 
 
 45 
ch_flag_en=10b
- 
 
 46 
.left: dw left      ;+0        ;¯®«®¦¥­¨¥ ¯® å
- 
 
 47 
.top: dw top        ;¯®«®¦¥­¨¥ ¯® ã
- 
 
 48 
.ch_text_margin:  dd ch_text_margin ;à ááâ®ï­¨¥ ®â ¯àאַ㣮«ì­¨ª  祪 ¡®ªá  ¤® ­ ¤¯¨á¨
- 
 
 49 
.ch_size: dd ch_size ;à §¬¥à ª¢ ¤à â  祪 ¡®ªá , ¤«ï ¯à¨¬¥à  12
- 
 
 50 
.color: dd color    ;梥⠢­ãâਠ祪¡®ªá 
- 
 
 51 
.border_color: dd border_color ;梥â à ¬ª¨
- 
 
 52 
.text_color: dd text_color     ;梥⠭ ¤¯¨á¨
- 
 
 53 
.text: dd text                 ; ¤à¥á ¢ ª®¤¥ ¯à®£à ¬¬ë £¤¥ à á¯®«®¦¥­ ⥪áâ
- 
 
 54 
.ch_text_length: dd ch_text_length ;¤«¨­­  áâப¨ á ᨬ¢®« ¬¨
- 
 
 55 
.flags: dd flags+0   ; ä« £¨
- 
 
 56 
}
- 
 
 57 
 
- 
 
 58 
macro use_checkbox_draw
18 
ch_flags equ [edi+32]       ;ôëàãè
59 
{
19 
 
 60 
check_box_draw:
20 
       pusha   ;ñîõðàíèì âñå ðåãèñòðû
 61 
       pusha   ;ñîõðàíèì âñå ðåãèñòðû
21 
       mov     edi,dword [esp+36]
 62 
       mov     edi,dword [esp+36]
22 
       mov eax,13
63 
       mov eax,13