Subversion Repositories Kolibri OS

Rev

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

Rev 1266 Rev 1372
Line -... Line 1...
- 
 
 1 
include '../../trunk/editbox.mac'
- 
 
 2 
include '../../trunk/checkbox.mac'
- 
 
 3 
include '../../trunk/optionbox.mac'
Line 1... Line -...
1 
ch_struc_size=36
 - 
 
2 
ed_struc_size=76
 - 
 
3 
ch_flag_en=10b
 - 
 
4 
 
 - 
 
5 
ch_left equ [edi]    ;ª®®à¤¨­ â  ­ ç «  à¨á®¢ ­¨ï ¯® å
 - 
 
6 
ch_top equ [edi+2]   ;ª®®à¤¨­ â  ­ ç «  à¨á®¢ ­¨ï ¯® ã
 - 
 
7 
ch_text_margin equ [edi+4]      ;=4 à ááâ®ï­¨¥ ®â ¯àאַ㣮«ì­¨ª  祪 ¡®ªá  ¤® ­ ¤¯¨á¨
- 
 
8 
ch_size equ [edi+8]             ;12 à §¬¥à ª¢ ¤à â  祪 ¡®ªá 
- 
 
9 
ch_color equ [edi+12]           ;梥⠢­ãâਠcheckbox
 - 
 
10 
ch_border_color equ [edi+16] ; or [edi+4] ;梥â à ¬ª¨ checkbox ¥¥ ¬®¦­® § ¤ âì á ¬®áâ®ï⥫쭮
 - 
 
11 
ch_text_color equ   [edi+20];[edi+4]  ;梥â ⥪áâ 
 - 
 
12 
ch_text_ptr equ [edi+24]    ;㪠§ â¥«ì ­  ­ ç «® ⥪á⮢®© áâப¨
- 
 
13 
ch_text_length equ [edi+28]
 - 
 
14 
ch_flags equ [edi+32]       ;ä« £¨
- 
 
15 
 
 - 
 
16 
ed_width        equ [edi]               ;è¨à¨­  ª®¬¯®­¥­â 
 - 
 
17 
ed_left         equ [edi+4]             ;¯®«®¦¥­¨¥ ¯® ®á¨ å
 - 
 
18 
ed_top          equ [edi+8]             ;¯®«®¦¥­¨¥ ¯® ®á¨ ã
 - 
 
19 
ed_color        equ [edi+12]            ;梥â ä®­  ª®¬¯®­¥­â 
 - 
 
20 
shift_color     equ [edi+16]            ;=0x6a9480 ¤«ï ¯à¨¬¥à  ¢®§ì¥¬ ¦¥«¥­ë© 梥⠡®ªá 
 - 
 
21 
ed_focus_border_color   equ [edi+20]    ;梥â à ¬ª¨ ª®¬¯®­¥­â 
 - 
 
22 
ed_blur_border_color    equ [edi+24]    ;梥⠭¥  ªâ¨¢­®£® ª®¬¯®­¥­â 
 - 
 
23 
ed_text_color   equ [edi+28]            ;梥â ⥪áâ 
 - 
 
24 
ed_max          equ [edi+32]                    ;ª®«-¢® ᨬ¢®«®¢ ª®â®àë¥ ¬®¦­® ¬ ªá¨¬ «ì­® ¢¢¥áâ¨
 - 
 
25 
ed_text         equ [edi+36]                    ;㪠§ â¥«ì ­  ¡ãä¥à
 - 
 
26 
ed_mouse_variable 	equ [edi+40]	; 㪠§ â¥«ì ­  ¯¥à¥¬¥­­ãî ¤«ï ¡®ªá /£à㯯ë
- 
 
27 
ed_flags        equ [edi+44]            ;ä« £¨
 - 
 
28 
bp_flags	equ [ebp+44]		;¢ ­¥ª®â®àëå ¯à®æ¥¤ãà å edi ¨á¯®«ì§ã¥âáï, ¢§ ¬¥­ 㪠§ â¥«ì åà ­¨âìáï ¢ ebp
 - 
 
29 
ed_size equ [edi+48]                    ;ª®«-¢® ᨬ¢®«®¢
 - 
 
30 
bp_size equ [ebp+48]			;ª®«-¢® ᨬ¢¯®«®¢, ¤«ï  ¤à¥á æ¨¨ ¨á¯«ì§ã¥âáï ebp¡ edi § ­ïâ
 - 
 
31 
ed_pos  equ [edi+52]                    ;¯®§¨æ¨ï ªãàá®à 
 - 
 
32 
ed_offset       equ [edi+56]            ;ᬥ饭¨¥
 - 
 
33 
cl_curs_x       equ [edi+60]            ;¯à¥¤ë¤ã饥 ª®®à¤¨­ â  ªãàá®à  ¯® å
 - 
 
34 
cl_curs_y       equ [edi+64]            ;¯à¥¤ë¤ã饥 ª®®à¤¨­ â  ªãàá®à  ¯® ã
 - 
 
35 
ed_shift_pos    equ [edi+68]            ;¯®«®¦¥­¨¥ ªãàá®à 
 - 
 
36 
ed_shift_pos_old equ [edi+72]           ;áâ à®¥ ¯®«®¦¥­¨¥ ªãàá®à 
 - 
 
37 
 
 - 
 
38 
ed_struc_size=76
 - 
 
39 
struc  edit_box width,left,top,color,shift_color,focus_border_color,\
 - 
 
40 
       blur_border_color,text_color,max,text,mouse_variable,flags,size,pos
 - 
 
41 
{
 - 
 
42 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 - 
 
43 
;Bit mask from editbox
- 
 
44 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 - 
 
45 
ed_figure_only= 1000000000000000b   ;®¤­¨ ᨬ¢®«ë
- 
 
46 
ed_always_focus= 100000000000000b
 - 
 
47 
ed_focus=                     10b   ;䮪ãá ¯à¨«®¦¥­¨ï
 - 
 
48 
ed_shift_on=                1000b   ;¥á«¨ ­¥ ãáâ ­®¢«¥­ -§­ ç¨â ¢¯¥à¢ë¥ ­ ¦ â shift,¥á«¨ ¡ë« ãáâ ­®¢«¥­, §­ ç¨â ¬ë 㦥 çâ® - â® ¤¥« «¨ 㤥ন¢ ï shift
 - 
 
49 
ed_shift_on_off=1111111111110111b
 - 
 
50 
ed_shift=                    100b   ;¢ª«îç ¥âáï ¯à¨ ­ ¦ â¨¨ ­  shift â.¥. ¥á«¨ ­ ¦¨¬ î
 - 
 
51 
ed_shift_off=   1111111111111011b
 - 
 
52 
ed_shift_bac=              10000b   ;¡¨â ¤«ï ®ç¨á⪨ ¢ë¤¥«¥­®£® shift â.¥. ¯à¨ ãáâ ­®¢ª¥ £®¢®à¨â çâ® ¥áâì ¢ë¤¥«¥­¨¥
 - 
 
53 
ed_shift_bac_cl=1111111111101111b   ;®ç¨á⪠ ¯à¨ 㤠«¥­¨¨ ¢ë¤¥«¥­¨ï
 - 
 
54 
ed_shift_cl=    1111111111100011b
 - 
 
55 
ed_shift_mcl=   1111111111111011b
 - 
 
56 
ed_left_fl=               100000b
 - 
 
57 
ed_right_fl=    1111111111011111b
 - 
 
58 
ed_offset_fl=            1000000b
 - 
 
59 
ed_offset_cl=   1111111110111111b
 - 
 
60 
ed_insert=              10000000b
 - 
 
61 
ed_insert_cl=   1111111101111111b
 - 
 
62 
ed_mouse_on =          100000000b
 - 
 
63 
ed_mous_adn_b=         100011000b
 - 
 
64 
ed_mouse_on_off=1111111011111111b
 - 
 
65 
ed_height=14 ; ¢ëá®â 
 - 
 
66 
 
 - 
 
67 
.width dd width
 - 
 
68 
.left dd left
 - 
 
69 
.top dd top
 - 
 
70 
.color dd color
 - 
 
71 
.shift_color dd shift_color
 - 
 
72 
.focus_border_color dd focus_border_color
 - 
 
73 
.blur_border_color dd blur_border_color
 - 
 
74 
.text_color dd text_color
 - 
 
75 
.max dd max
 - 
 
76 
.text dd text
 - 
 
77 
.mouse_variable dd mouse_variable
 - 
 
78 
.flags dd flags+0
 - 
 
79 
.size dd size+0
 - 
 
80 
.pos dd pos+0
 - 
 
81 
.offset dd 0
 - 
 
82 
.cl_curs_x dd 0
 - 
 
83 
.cl_curs_y dd 0
 - 
 
84 
.shift   dd 0
 - 
 
85 
.shift_old   dd 0
 - 
 
86 
}
 - 
 
87 
macro edit_boxes_set_sys_color start,end,color_table
 - 
 
88 
{
 - 
 
89 
        mov     edi,start
 - 
 
90 
        mov     ecx,((end-start)/ed_struc_size)
 - 
 
91 
        mov     esi,color_table
 - 
 
92 
@@:
 - 
 
93 
        mov     eax,dword [esi+36]
 - 
 
94 
        mov     ebx,dword [esi+20]
 - 
 
95 
        push	dword eax
 - 
 
96 
	pop     dword ed_focus_border_color
 - 
 
97 
        shr     bh,1
 - 
 
98 
        shr     bl,1
 - 
 
99 
        shr     ah,1
 - 
 
100 
        shr     al,1
 - 
 
101 
        add     ah,bh
 - 
 
102 
        add     al,bl
 - 
 
103 
        ror     eax,16
 - 
 
104 
        ror     ebx,16
 - 
 
105 
        shr     bl,1
 - 
 
106 
        shr     al,1
 - 
 
107 
        add     al,bl
 - 
 
108 
        ror     eax,16
 - 
 
109 
	mov	dword ed_blur_border_color,eax
 - 
 
110 
	mov	dword shift_color,eax
 - 
 
111 
        add     edi,ed_struc_size
 - 
 
112 
        loop    @b
 - 
 
113 
}
 - 
 
114 
macro get_sys_colors col_buf
 4 
 
115 
{
 5 
macro get_sys_colors col_buf
116 
        ;mov     eax,48
 6 
{
117 
        push    48
 7 
        ;mov     eax,48
118 
        pop     eax
 8 
        push    48
Line 126... Line 16...
126 
        push    40
 16 
        ;mov     edx,40
127 
        pop     edx
 17 
        push    40
128 
        mcall
 18 
        pop     edx
129 
}
 19 
        mcall
130 
macro check_boxes_set_sys_color start,end,color_table
 20 
}
131 
{
 - 
 
132 
ch_left equ [edi]    ;ª®®à¤¨­ â  ­ ç «  à¨á®¢ ­¨ï ¯® å
 - 
 
133 
ch_top equ [edi+2]   ;ª®®à¤¨­ â  ­ ç «  à¨á®¢ ­¨ï ¯® ã
 - 
 
134 
ch_text_margin equ [edi+4]      ;=4 à ááâ®ï­¨¥ ®â ¯àאַ㣮«ì­¨ª  祪 ¡®ªá  ¤® ­ ¤¯¨á¨
- 
 
135 
ch_size equ [edi+8]             ;12 à §¬¥à ª¢ ¤à â  祪 ¡®ªá 
- 
 
136 
ch_color equ [edi+12]           ;梥⠢­ãâਠcheckbox
 - 
 
137 
ch_border_color equ [edi+16] ; or [edi+4] ;梥â à ¬ª¨ checkbox ¥¥ ¬®¦­® § ¤ âì á ¬®áâ®ï⥫쭮
 - 
 
138 
ch_text_color equ   [edi+20];[edi+4]  ;梥â ⥪áâ 
 - 
 
139 
ch_text_ptr equ [edi+24]    ;㪠§ â¥«ì ­  ­ ç «® ⥪á⮢®© áâப¨
- 
 
140 
ch_text_length equ [edi+28]
 - 
 
141 
ch_flags equ [edi+32]       ;ä« £¨
- 
 
142 
 
 - 
 
143 
 
 - 
 
144 
;ch_left equ [edi]    ;ª®®à¤¨­ â  ­ ç «  à¨á®¢ ­¨ï ¯® å
 - 
 
145 
;ch_top equ [edi+2]   ;ª®®à¤¨­ â  ­ ç «  à¨á®¢ ­¨ï ¯® ã
 - 
 
146 
;ch_color equ [edi+4] ;梥⠢­ãâਠcheckbox
 - 
 
147 
;ch_border_color equ [edi+8] ;梥â à ¬ª¨ checkbox
 - 
 
148 
;ch_text_color equ [edi+12]  ;梥â ⥪áâ 
 - 
 
149 
;ch_text_ptr equ [edi+16]    ;㪠§ â¥«ì ­  ­ ç «® ⥪á⮢®© áâப¨
 - 
 
150 
;ch_text_length equ [edi+20] ;¤«¨­  ­ ¤¯¨á¨ (2^64 â ª®© ¤«¨­ë ¬®¦¥â ¡ëâì ⥪áâ)
 - 
 
151 
;ch_flags equ [edi+24]       ;ä« £¨
 - 
 
152 
 
 - 
 
153 
        mov     edi,start
 - 
 
154 
        mov     ecx,((end-start)/ch_struc_size)
 - 
 
155 
        mov     esi,color_table
 - 
 
156 
@@:
 - 
 
157 
        push    dword [esi+32]
 - 
 
158 
        pop     dword ch_text_color
 - 
 
159 
        push    dword [esi+36]
 - 
 
160 
        pop     dword ch_border_color
 - 
 
161 
        add     edi,ch_struc_size
 - 
 
162 
        loop    @b
 - 
 
163 
}
 - 
 
164 
struc check_box left,top,ch_text_margin,ch_size,color,border_color,text_color,text,ch_text_length,flags
 - 
 
165 
{        ;áâàãªâãà  ¯ à ¬¥â஢ ¤«ï 祪 ¡®ªá 
 - 
 
166 
ch_flag_en=10b
 - 
 
167 
.left: dw left      ;+0        ;¯®«®¦¥­¨¥ ¯® å
 - 
 
168 
.top: dw top        ;¯®«®¦¥­¨¥ ¯® ã
 - 
 
169 
.ch_text_margin:  dd ch_text_margin ;à ááâ®ï­¨¥ ®â ¯àאַ㣮«ì­¨ª  祪 ¡®ªá  ¤® ­ ¤¯¨á¨
 - 
 
170 
.ch_size: dd ch_size ;à §¬¥à ª¢ ¤à â  祪 ¡®ªá , ¤«ï ¯à¨¬¥à  12
 - 
 
171 
.color: dd color    ;梥⠢­ãâਠ祪¡®ªá 
 - 
 
172 
.border_color: dd border_color ;梥â à ¬ª¨
 - 
 
173 
.text_color: dd text_color     ;梥⠭ ¤¯¨á¨
 - 
 
174 
.text: dd text                 ; ¤à¥á ¢ ª®¤¥ ¯à®£à ¬¬ë £¤¥ à á¯®«®¦¥­ ⥪áâ
 - 
 
175 
.ch_text_length: dd ch_text_length ;¤«¨­­  áâப¨ á ᨬ¢®« ¬¨
 - 
 
176 
.flags: dd flags+0   ; ä« £¨
- 
 
177 
}
 - 
 
178 
struc option_box point_gr,left,top,op_text_margin,op_size,color,border_color,text_color,text,op_text_length,flags
 - 
 
179 
{        ;áâàãªâãà  ¯ à ¬¥â஢ ¤«ï 祪 ¡®ªá 
 - 
 
180 
op_flag_en=10b
 - 
 
181 
.option_group: dd point_gr
 - 
 
182 
.left: dw left      ;+0        ;¯®«®¦¥­¨¥ ¯® å
 - 
 
183 
.top: dw top        ;¯®«®¦¥­¨¥ ¯® ã
 - 
 
184 
.ch_text_margin:  dd op_text_margin ;à ááâ®ï­¨¥ ®â ¯àאַ㣮«ì­¨ª  祪 ¡®ªá  ¤® ­ ¤¯¨á¨
 - 
 
185 
.ch_size: dd op_size ;à §¬¥à ª¢ ¤à â  祪 ¡®ªá , ¤«ï ¯à¨¬¥à  12
 - 
 
186 
.color: dd color    ;梥⠢­ãâਠ祪¡®ªá 
 - 
 
187 
.border_color: dd border_color ;梥â à ¬ª¨
 - 
 
188 
.text_color: dd text_color     ;梥⠭ ¤¯¨á¨
 - 
 
189 
.text: dd text                 ; ¤à¥á ¢ ª®¤¥ ¯à®£à ¬¬ë £¤¥ à á¯®«®¦¥­ ⥪áâ
 - 
 
190 
.ch_text_length: dd op_text_length ;¤«¨­­  áâப¨ á ᨬ¢®« ¬¨
 - 
 
191 
.flags: dd flags+0   ; ä« £¨
- 
 
192 
}
 - 
 
193 

            -