48,7 → 48,7 |
dd 0x0 ;buf_cmd_lin |
dd cur_dir_path |
|
_title equ 'HeEd 0.15' |
_title equ 'HeEd 0.15', 0 |
|
include 'lang.inc' |
include '../../../macros.inc' |
178,17 → 178,17 |
mov esi,-1 |
mov eax,procinfo |
mov eax,[eax+46] |
cmp eax,200 |
cmp eax,299 |
jae @f |
mov esi,200 |
mov esi,299 |
mcall 67,-1,ebx,ebx |
@@: |
mov edx,-1 |
mov eax,procinfo |
mov eax,[eax+42] |
cmp eax,300 |
cmp eax,399 |
jae @f |
mov edx,300 |
mov edx,399 |
mcall 67,-1,ebx,,ebx |
@@: |
.end: |
315,6 → 315,7 |
mcall 17 |
dec ah |
jnz still |
|
jmp close_prog |
|
align 4 |
1613,7 → 1614,18 |
;help window |
create_help_window: |
pushad |
cmp [help_is_open_already], 1 |
jne @f |
mov ECX, [help_window_pid] |
mcall 18, 21 |
xchg EAX, ECX |
mcall 18, 3 |
popad |
ret |
@@: |
mcall 51,1,.thread,(.threat_stack+16*4) |
mov [help_is_open_already], 1 |
mov [help_window_pid], EAX |
popad |
ret |
.thread: |
1627,11 → 1639,13 |
dec al |
jz .button |
jmp .still |
and [help_is_open_already], 0 |
mcall -1 |
.button: |
mcall 17,1 |
cmp ah,1 |
jne @f |
and [help_is_open_already], 0 |
mcall -1 |
@@: |
cmp ah,2 |
2953,7 → 2967,11 |
.mouse_pos dd 0 ;+24 |
.mouse_keys dd 0 ;+28 |
.x1: |
if lang eq ru |
.size_x1 dw 4*2+9*6 ;+32 |
else |
.size_x1 dw 40 ;+32 |
end if |
.start_x1 dw 2 ;+34 |
.y1: |
.size_y1 dw 100 ;+36 |
2980,13 → 2998,22 |
.get_mouse_flag dd 0 ;+116 |
|
menu_text_area: |
if lang eq ru |
db ' ©«',0 |
.1: |
db 'âªàëâì',0 |
db '®åà ¨âì',0 |
db 'ë室',0 |
else |
db 'File',0 |
.1: |
db 'Open',0 |
db 'Save',0 |
db 'Exit',0 |
end if |
.end: |
db 0 |
|
;--------------------------------------------------------------------- |
align 4 |
menu_data_2: |
3003,7 → 3030,7 |
.mouse_pos dd 0 ;+24 |
.mouse_keys dd 0 ;+28 |
.x1: |
.size_x1 dw 50 ;+32 |
.size_x1 dw 4*2+5*6 ;+32 |
.start_x1 dw 43 ;+34 |
.y1: |
.size_y1 dw 100 ;+36 |
3030,8 → 3057,13 |
.get_mouse_flag dd 0 ;+116 |
|
menu_text_area_2: |
if lang eq ru |
db '¨¤',0 |
.1: |
else |
db 'View',0 |
.1: |
end if |
db 'Add 4',0 |
db 'Add 8',0 |
db 'Sub 4',0 |
3038,12 → 3070,17 |
db 'Sub 8',0 |
.end: |
db 0 |
|
;--------------------------------------------------------------------- |
align 4 |
menu_data_3: |
.type: dd 0 ;+0 |
.x: |
if lang eq ru |
.size_x dw 4*2+7*6 ;+32 |
else |
.size_x dw 40 ;+4 |
end if |
.start_x dw 84 ;+6 |
.y: |
.size_y dw 15 ;+8 |
3054,7 → 3091,11 |
.mouse_pos dd 0 ;+24 |
.mouse_keys dd 0 ;+28 |
.x1: |
if lang eq ru |
.size_x1 dw 4*2+7*6 ;+32 |
else |
.size_x1 dw 40 ;+32 |
end if |
.start_x1 dw 84 ;+34 |
.y1: |
.size_y1 dw 100 ;+36 |
3081,21 → 3122,27 |
.get_mouse_flag dd 0 ;+116 |
|
menu_text_area_3: |
if lang eq ru |
db '¯à ¢ª ',0 |
.1: |
db '¯à ¢ª ',0 |
else |
db 'Help',0 |
.1: |
db 'Help',0 |
end if |
.end: |
db 0 |
;--------------------------------------------------------------------- |
edit1 edit_box 200,190,27,0xffffff,0x6a9480,0,0xAABBCC,0,134,cur_dir_path,ed_focus,ed_focus,6,6 ;ä ©« ®âªàëâì\á®åà ¨âì |
edit2 edit_box 55,260,29,0xeeeeee,0x6a9480,0,0xAABBCC,4,8,go_to_string,ed_focus,ed_focus,0,0 ;¯¥à¥å®¦¤ ᬥ饨¥ |
edit3 edit_box 55,260,29,0xeeeeee,0x6a9480,0,0xAABBCC,4,8,find_string,ed_focus,ed_focus,0,0 ;¯®¨áª |
edit2 edit_box 55,270,29,0xeeeeee,0x6a9480,0,0xAABBCC,4,8,go_to_string,ed_focus,ed_focus,0,0 ;¯¥à¥å®¦¤ ᬥ饨¥ |
edit3 edit_box 55,270,29,0xeeeeee,0x6a9480,0,0xAABBCC,4,8,find_string,ed_focus,ed_focus,0,0 ;¯®¨áª |
edit4 edit_box 55,220,49,0xeeeeee,0x6a9480,0,0xAABBCC,4,8,sel1_string,ed_focus,ed_focus,0,0 ;¢ë¤¥«¨âì ¡«®ª ç.ᬥé. |
edit5 edit_box 55,300,49,0xeeeeee,0x6a9480,0,0xAABBCC,4,8,sel2_string,ed_focus,0,0,0 ;¢ë¤¥«¨âì ¡«®ª ª®.ᬥé. |
|
op1 option_box option_group1,210,50,6,12,0xffffff,0,0,op_text.1,op_text.e1-op_text.1,1 |
op2 option_box option_group1,310,50,6,12,0xFFFFFF,0,0,op_text.2,op_text.e2-op_text.2 |
op3 option_box option_group1,210,65,6,12,0xffffff,0,0,op_text.3,op_text.e3-op_text.3 |
op3 option_box option_group1,310,65,6,12,0xffffff,0,0,op_text.3,op_text.e3-op_text.3 |
op11 option_box option_group2,210,50,6,12,0xffffff,0,0,op_text2.11,op_text2.e11-op_text2.11 |
op12 option_box option_group2,310,50,6,12,0xffffff,0,0,op_text2.21,op_text2.e21-op_text2.21 |
|
3105,6 → 3152,14 |
Option_boxs2 dd op11,op12,0 |
|
op_text: ; ®¯à®¢®¦¤ î騩 ⥪áâ ¤«ï 祪 ¡®ªá®¢ |
if lang eq ru |
.1 db '¡á®«î⮥' |
.e1: |
.2 db '¯¥à¥¤' |
.e2: |
.3 db ' § ¤' |
.e3: |
else |
.1 db 'Absolutely' |
.e1: |
.2 db 'Forward' |
3111,6 → 3166,7 |
.e2: |
.3 db 'Back' |
.e3: |
end if |
|
op_text2: |
.11 db 'Hex' |
3122,7 → 3178,22 |
system_dir_Boxlib db '/sys/lib/box_lib.obj',0 |
system_dir_ProcLib db '/sys/lib/proc_lib.obj',0 |
|
sel_text db "From to",0 |
|
help_but_text = menu_text_area_3 ;db 'Help',0 |
|
head_f_i: |
if lang eq ru |
head_f_l db '®è¨¡ª ',0 |
err_message_found_lib1 db 'box_lib.obj - ¥ ©¤¥!',0 |
err_message_found_lib2 db 'proc_lib.obj - ¥ ©¤¥!',0 |
|
err_message_import1 db 'box_lib.obj - 訡ª ¨¬¯®àâ !',0 |
err_message_import2 db 'proc_lib.obj - 訡ª ¨¬¯®àâ !',0 |
|
error_open_file_string db " ©« ¥ ©¤¥!",0 |
error_save_file_string db " ©« ¥ á®åà ¥!",0 |
else |
head_f_l db 'error',0 |
err_message_found_lib1 db 'box_lib.obj - Not found!',0 |
err_message_found_lib2 db 'proc_lib.obj - Not found!',0 |
3130,11 → 3201,9 |
err_message_import1 db 'box_lib.obj - Wrong import!',0 |
err_message_import2 db 'proc_lib.obj - Wrong import!',0 |
|
sel_text db "From to",0 |
|
help_but_text = menu_text_area_3 ;db 'Help',0 |
error_open_file_string db "Isn't found!",0 |
error_save_file_string db "Isn't saved!",0 |
end if |
string_cp866 db ' cp866' |
string_cp1251 db 'cp1251' |
string_koi8r db 'koi8-r' |
3223,32 → 3292,6 |
cp1251 file 'cp1251-8x16' |
koi8_r file 'koi8-r-8x16' |
|
|
;########################## open_dial |
get_loops dd 0 |
dlg_pid_get dd 0 |
DLGPID dd 0 |
param: |
dd 0 ; My dec PID |
dd 0,0 ; Type of dialog |
run_fileinfo: |
dd 7 |
dd 0 |
dd param |
dd 0 |
dd 0 |
;run_filepath |
db '/sys/SYSXTREE',0 |
readdir_fileinfo: |
dd 1 |
dd 0 |
dd 0 |
readblocks dd 0 |
directory_ptr dd 0 |
|
;########################## |
|
|
title db _title |
;--------------------------------------------------------------------- |
l_libs_start: |
3347,6 → 3390,9 |
sel2_string rb 9 |
cur_help_string rb 1 ;®¬¥à áâப¨, á ª®â®à®© ¢ë¢®¤¨âáï ⥪áâ ¢ help - ®ª¥ |
|
help_is_open_already db ? ;¥á«¨ ®ª® á¯à ¢ª¨ ®âªàëâ®, â® §¤¥áì 1 |
help_window_pid dd ? |
|
func_70 f70 |
;--------------------------------------------------------------------- |
fname_buf: |