Subversion Repositories Kolibri OS

Rev

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

Rev 1372 Rev 1373
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 4... Line 4...
4
 
4
 
5
ch_struc_size=36
5
ch_struc_size=36
Line 6... Line 6...
6
ch_flag_en=10b
6
ch_flag_en=10b ;ýëåìåíò âûáðàí
7
 
7
 
8
ch_left  equ [edi]         ;ª®®à¤¨­ â  ­ ç «  à¨á®¢ ­¨ï ¯® å
8
ch_left  equ [edi]         ;ª®®à¤¨­ â  ­ ç «  à¨á®¢ ­¨ï ¯® å
9
ch_top   equ [edi+2]       ;ª®®à¤¨­ â  ­ ç «  à¨á®¢ ­¨ï ¯® ã
9
ch_top   equ [edi+2]       ;ª®®à¤¨­ â  ­ ç «  à¨á®¢ ­¨ï ¯® ã
Line 16... Line 16...
16
ch_text_length  equ [edi+28]
16
ch_text_length  equ [edi+28]
17
ch_flags equ [edi+32]      ;ä« £¨ 
17
ch_flags equ [edi+32]      ;ä« £¨ 
Line 18... Line 18...
18
 
18
 
19
macro check_boxes_set_sys_color start,end,color_table
19
macro check_boxes_set_sys_color start,end,color_table
20
{
-
 
21
ch_left equ [edi]    ;ª®®à¤¨­ â  ­ ç «  à¨á®¢ ­¨ï ¯® å
-
 
22
ch_top equ [edi+2]   ;ª®®à¤¨­ â  ­ ç «  à¨á®¢ ­¨ï ¯® ã
-
 
23
ch_text_margin equ [edi+4]      ;=4 à ááâ®ï­¨¥ ®â ¯àאַ㣮«ì­¨ª  祪 ¡®ªá  ¤® ­ ¤¯¨á¨ 
-
 
24
ch_size equ [edi+8]             ;12 à §¬¥à ª¢ ¤à â  祪 ¡®ªá  
-
 
25
ch_color equ [edi+12]           ;梥⠢­ãâਠcheckbox
-
 
26
ch_border_color equ [edi+16] ; or [edi+4] ;梥â à ¬ª¨ checkbox ¥¥ ¬®¦­® § ¤ âì á ¬®áâ®ï⥫쭮
-
 
27
ch_text_color equ   [edi+20];[edi+4]  ;梥â ⥪áâ 
-
 
28
ch_text_ptr equ [edi+24]    ;㪠§ â¥«ì ­  ­ ç «® ⥪á⮢®© áâப¨ 
-
 
29
ch_text_length equ [edi+28]
-
 
30
ch_flags equ [edi+32]       ;ä« £¨ 
-
 
31
 
20
{
32
        mov     edi,start
21
    mov     edi,start
33
        mov     ecx,((end-start)/ch_struc_size)
22
    mov     ecx,((end-start)/ch_struc_size)
34
        mov     esi,color_table
23
    mov     esi,color_table
-
 
24
@@:
35
@@:
25
;    push    dword [esi+20] ;梥â à ¡®ç¥© ®¡« á⨠®ª­ 
-
 
26
;    pop     dword ch_color
36
        push    dword [esi+32]
27
    push    dword [esi+32] ;梥â ⥪áâ  ¢ à ¡®ç¥© ®¡« á⨠®ª­ 
37
        pop     dword ch_text_color
28
    pop     dword ch_text_color
38
        push    dword [esi+36]
29
    push    dword [esi+36] ;梥⠣à ä¨ª¨ ¢ ®ª­¥ (à §¤¥«¨â¥«ì­ë¥ «¨­¨¨ ¨ â.¯.)
39
        pop     dword ch_border_color
30
    pop     dword ch_border_color
40
        add     edi,ch_struc_size
31
    add     edi,ch_struc_size
41
        loop    @b
32
    loop    @b
42
}
33
}
43
struc check_box left,top,ch_text_margin,ch_size,color,border_color,text_color,text,ch_text_length,flags
34
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
35
{        ;áâàãªâãà  ¯ à ¬¥â஢ ¤«ï 祪 ¡®ªá 
46
.left: dw left      ;+0        ;¯®«®¦¥­¨¥ ¯® å
36
.left: dw left      ;+0 ¯®«®¦¥­¨¥ ¯® å
47
.top: dw top        ;¯®«®¦¥­¨¥ ¯® ã
37
.top:  dw top       ;+2 ¯®«®¦¥­¨¥ ¯® ã
48
.ch_text_margin:  dd ch_text_margin ;à ááâ®ï­¨¥ ®â ¯àאַ㣮«ì­¨ª  祪 ¡®ªá  ¤® ­ ¤¯¨á¨
38
.ch_text_margin:  dd ch_text_margin ;à ááâ®ï­¨¥ ®â ¯àאַ㣮«ì­¨ª  祪 ¡®ªá  ¤® ­ ¤¯¨á¨
49
.ch_size: dd ch_size ;à §¬¥à ª¢ ¤à â  祪 ¡®ªá , ¤«ï ¯à¨¬¥à  12
39
.ch_size: dd ch_size ;à §¬¥à ª¢ ¤à â  祪 ¡®ªá , ¤«ï ¯à¨¬¥à  12
50
.color: dd color    ;梥⠢­ãâਠ祪¡®ªá 
40
.color:   dd color   ;梥⠢­ãâਠ祪¡®ªá 
51
.border_color: dd border_color ;梥â à ¬ª¨
41
.border_color: dd border_color ;梥â à ¬ª¨