Rev 8236 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 8236 | Rev 9568 | ||
---|---|---|---|
Line 11... | Line 11... | ||
11 | ;; 16.11.2006 ;; |
11 | ;; 16.11.2006 ;; |
Line 12... | Line 12... | ||
12 | 12 | ||
Line 13... | Line 13... | ||
13 | WIN_W = 364 |
13 | WIN_W = 364 |
14 | 14 | ||
15 | use32 |
15 | use32 |
16 | org 0x0 |
16 | org 0 |
Line 17... | Line 17... | ||
17 | db 'MENUET01' |
17 | db 'MENUET01' |
18 | dd 0x01,start,i_end,e_end,e_end,0,sys_path |
18 | dd 1,start,i_end,e_end,e_end,0,sys_path |
19 | 19 | ||
20 | include '../../../proc32.inc' |
20 | include '../../../proc32.inc' |
Line 30... | Line 30... | ||
30 | load_libraries l_libs_start,l_libs_end |
30 | load_libraries l_libs_start,l_libs_end |
31 | ;¯à®¢¥àª ᪮«ìª® ã¤ ç® § £ã§¨« áì è ¡¨¡«¨®â¥ª |
31 | ;¯à®¢¥àª ᪮«ìª® ã¤ ç® § £ã§¨« áì è ¡¨¡«¨®â¥ª |
32 | mov ebp,lib_0 |
32 | mov ebp,lib_0 |
33 | cmp dword [ebp+ll_struc_size-4],0 |
33 | cmp dword [ebp+ll_struc_size-4],0 |
34 | jz @f |
34 | jz @f |
35 | mcall -1 ;exit not correct |
35 | mcall SF_TERMINATE_PROCESS |
36 | @@: |
36 | @@: |
37 | mcall 40,0x80000027 |
37 | mcall SF_SET_EVENTS_MASK,0x80000027 |
38 | mcall 48, 3, sys_colors, 40 |
38 | mcall SF_STYLE_SETTINGS, SSF_GET_COLORS, sys_colors, 40 |
39 | edit_boxes_set_sys_color edit1,editboxes_end,sys_colors |
39 | edit_boxes_set_sys_color edit1,editboxes_end,sys_colors |
Line 40... | Line 40... | ||
40 | 40 | ||
41 | red: |
41 | red: |
Line -... | Line 42... | ||
- | 42 | call draw_window |
|
42 | call draw_window |
43 | |
43 | 44 | align 4 |
|
Line 44... | Line 45... | ||
44 | still: |
45 | still: |
45 | mcall 10 ; äãªæ¨ï 10 - ¦¤ âì ᮡëâ¨ï |
46 | mcall SF_WAIT_EVENT |
46 | 47 | ||
47 | cmp eax,1 ; ¯¥à¥à¨á®¢ âì ®ª® ? |
48 | cmp eax,1 ; ¯¥à¥à¨á®¢ âì ®ª® ? |
Line 56... | Line 57... | ||
56 | jmp still ; ¥á«¨ ¤à㣮¥ ᮡë⨥ - ¢ ç «® 横« |
57 | jmp still ; ¥á«¨ ¤à㣮¥ ᮡë⨥ - ¢ ç «® 横« |
Line 57... | Line 58... | ||
57 | 58 | ||
Line 58... | Line 59... | ||
58 | ;--------------------------------------------------------------------- |
59 | ;--------------------------------------------------------------------- |
59 | 60 | ||
60 | key: ; ¦ â ª« ¢¨è ª« ¢¨ âãॠ|
61 | key: ; ¦ â ª« ¢¨è ª« ¢¨ âãॠ|
61 | mcall 2 |
62 | mcall SF_GET_KEY |
62 | cmp ah,13 ;®¡à ¡®âª ª®¯ª¨ Enter |
63 | cmp ah,13 ;®¡à ¡®âª ª®¯ª¨ Enter |
63 | je @f |
64 | je @f |
64 | stdcall [edit_box_key], dword edit1 |
65 | stdcall [edit_box_key], dword edit1 |
Line 122... | Line 123... | ||
122 | jmp red |
123 | jmp red |
Line 123... | Line 124... | ||
123 | 124 | ||
Line 124... | Line 125... | ||
124 | ;--------------------------------------------------------------------- |
125 | ;--------------------------------------------------------------------- |
125 | 126 | ||
126 | button: |
127 | button: |
127 | mcall 17 ; 17 - ¯®«ãç¨âì ¨¤¥â¨ä¨ª â®à ¦ ⮩ ª®¯ª¨ |
128 | mcall SF_GET_BUTTON |
128 | cmp ah, 1 ; ¥á«¨ ¦ â ª®¯ª á ®¬¥à®¬ 1, |
129 | cmp ah, 1 ; ¥á«¨ ¦ â ª®¯ª á ®¬¥à®¬ 1, |
129 | jne @f |
130 | jne @f |
130 | mcall -1 |
131 | mcall SF_TERMINATE_PROCESS |
131 | @@: |
132 | @@: |
132 | cmp ah, 2 |
133 | cmp ah, 2 |
133 | jne @f |
134 | jne @f |
Line 158... | Line 159... | ||
158 | jmp still |
159 | jmp still |
Line 159... | Line 160... | ||
159 | 160 | ||
160 | ;------------------------------------------------ |
161 | ;------------------------------------------------ |
161 | draw_window: |
162 | draw_window: |
162 | ;------------------------------------------------ |
163 | ;------------------------------------------------ |
Line 163... | Line 164... | ||
163 | mcall 48, 3, sys_colors, 40 |
164 | mcall SF_STYLE_SETTINGS, SSF_GET_COLORS, sys_colors, 40 |
164 | 165 | ||
165 | mcall 12, 1 |
166 | mcall SF_REDRAW, SSF_BEGIN_DRAW |
166 | mov edx, 0x14000000 |
167 | mov edx, 0x14000000 |
167 | or edx, [sys_colors.work] |
168 | or edx, [sys_colors.work] |
168 | ;mov esi, 0x80000000 |
169 | ;mov esi, 0x80000000 |
Line 169... | Line 170... | ||
169 | ;or esi, [sys_colors.grab_text] |
170 | ;or esi, [sys_colors.grab_text] |
170 | mcall 0, 200*65536+WIN_W, 200*65536+179, ,,title |
171 | mcall SF_CREATE_WINDOW, 200*65536+WIN_W, 200*65536+179, ,,title |
171 | 172 | ||
172 | 173 | ||
173 | mcall 8, 15*65536+42,106*65536+ 21, 2, [sys_colors.work_button] ; ª®¯ª shl |
174 | mcall SF_DEFINE_BUTTON, 15*65536+42,106*65536+ 21, 2, [sys_colors.work_button] ; ª®¯ª shl |
Line 174... | Line 175... | ||
174 | mcall , 70*65536+42, , , ; ª®¯ª sal |
175 | mcall , 70*65536+42, , , ; ª®¯ª sal |
175 | mcall , (WIN_W-55)*65536+42, , 3, ; ª®¯ª shr |
176 | mcall , (WIN_W-55)*65536+42, , 3, ; ª®¯ª shr |
176 | mcall ,(WIN_W-111)*65536+42, , 4, ; ª®¯ª sar |
177 | mcall ,(WIN_W-111)*65536+42, , 4, ; ª®¯ª sar |
177 | mcall , (WIN_W-72)*65536+58,145*65536+ 21, 5, ; ª®¯ª Ok |
178 | mcall , (WIN_W-72)*65536+58,145*65536+ 21, 5, ; ª®¯ª Ok |
178 | 179 | ||
179 | mov ecx, 0x90000000 |
180 | mov ecx, 0x90000000 |
180 | or ecx, [sys_colors.work_text] |
181 | or ecx, [sys_colors.work_text] |
Line 191... | Line 192... | ||
191 | mov ecx, [num] |
192 | mov ecx, [num] |
Line 192... | Line 193... | ||
192 | 193 | ||
193 | mov esi, [sys_colors.work_text] |
194 | mov esi, [sys_colors.work_text] |
Line 194... | Line 195... | ||
194 | or esi, 0x90000000 |
195 | or esi, 0x90000000 |
195 | 196 | ||
196 | mcall 47, 10*65536, ,(WIN_W-92)*65536+62, ; 10- ï á® § ª®¬ |
197 | mcall SF_DRAW_NUMBER, 10*65536, ,(WIN_W-92)*65536+62, ; 10- ï á® § ª®¬ |
197 | BIN_LINE_BLOCK_W = 76 |
198 | BIN_LINE_BLOCK_W = 76 |
198 | mcall 47, 8*65536+512,,(WIN_W-BIN_LINE_BLOCK_W)*65536+30 ; 2- ï |
199 | mcall SF_DRAW_NUMBER, 8*65536+512,,(WIN_W-BIN_LINE_BLOCK_W)*65536+30 ; 2- ï |
199 | ror ecx, 8 |
200 | ror ecx, 8 |
200 | mov edx, (WIN_W-BIN_LINE_BLOCK_W*2)*65536+30 |
201 | mov edx, (WIN_W-BIN_LINE_BLOCK_W*2)*65536+30 |
201 | mcall |
202 | mcall |
Line 212... | Line 213... | ||
212 | neg ecx |
213 | neg ecx |
213 | @@: |
214 | @@: |
214 | mcall , 10*65536, ,(WIN_W-92)*65536+46, ; 10- ï |
215 | mcall , 10*65536, ,(WIN_W-92)*65536+46, ; 10- ï |
215 | mcall , 8*65536+256,,(WIN_W-76)*65536+78, ; 16- ï |
216 | mcall , 8*65536+256,,(WIN_W-76)*65536+78, ; 16- ï |
216 | mov ecx,esi |
217 | mov ecx,esi |
217 | mcall 4, (WIN_W-102)*65536+61, , minus, 1 |
218 | mcall SF_DRAW_TEXT, (WIN_W-102)*65536+61, , minus, 1 |
218 | mcall 38, 15*65536+WIN_W-15, 137*65536+137, [sys_colors.work_graph] |
219 | mcall SF_DRAW_LINE, 15*65536+WIN_W-15, 137*65536+137, [sys_colors.work_graph] |
219 | stdcall [edit_box_draw], edit1 |
220 | stdcall [edit_box_draw], edit1 |
220 | mcall 12, 2 ; äãªæ¨ï 12: á®®¡é¨âì ®¡ ®âà¨á®¢ª¥ ®ª |
221 | mcall SF_REDRAW, SSF_END_DRAW |
Line 221... | Line 222... | ||
221 | 222 | ||
Line 222... | Line 223... | ||
222 | ret |
223 | ret |
Line 272... | Line 273... | ||
272 | shl_sal_sar_shr_button_caption db 'shl sal sar shr',0 |
273 | shl_sal_sar_shr_button_caption db 'shl sal sar shr',0 |
Line 273... | Line 274... | ||
273 | 274 | ||
274 | if lang eq ru |
275 | if lang eq ru |
275 | numstr db '¨á«®:',0 |
276 | numstr db '¨á«®:',0 |
276 | Okstr db '¢®¤',0 |
- | |
277 | head_f_i: |
- | |
278 | head_f_l db '¨á⥬ ï ®è¨¡ª ',0 |
277 | Okstr db '¢®¤',0 |
279 | else |
278 | else |
280 | numstr db 'Number:',0 |
279 | numstr db 'Number:',0 |
281 | Okstr db 'Enter',0 |
- | |
282 | head_f_i: |
- | |
283 | head_f_l db 'System error',0 |
280 | Okstr db 'Enter',0 |
Line 284... | Line 281... | ||
284 | end if |
281 | end if |
285 | 282 | ||
Line 302... | Line 299... | ||
302 | edit_box_key dd sz_edit_box_key |
299 | edit_box_key dd sz_edit_box_key |
303 | edit_box_mouse dd sz_edit_box_mouse |
300 | edit_box_mouse dd sz_edit_box_mouse |
304 | ;edit_box_set_text dd sz_edit_box_set_text |
301 | ;edit_box_set_text dd sz_edit_box_set_text |
305 | dd 0,0 |
302 | dd 0,0 |
306 | ;sz_init1 db 'lib_init',0 |
303 | ;sz_init1 db 'lib_init',0 |
307 | sz_edit_box_draw db 'edit_box',0 |
304 | sz_edit_box_draw db 'edit_box_draw',0 |
308 | sz_edit_box_key db 'edit_box_key',0 |
305 | sz_edit_box_key db 'edit_box_key',0 |
309 | sz_edit_box_mouse db 'edit_box_mouse',0 |
306 | sz_edit_box_mouse db 'edit_box_mouse',0 |
310 | ;sz_edit_box_set_text db 'edit_box_set_text',0 |
307 | ;sz_edit_box_set_text db 'edit_box_set_text',0 |
Line 311... | Line 308... | ||
311 | 308 |