| 0,0 → 1,271 |
|---|
| ;----------------------------------------------------------------------------- |
| lsz s_text,\ |
| ru,'ë¡®à ä ©« ',\ |
| en,'Select file' |
| ;----------------------------------------------------------------------------- |
| lsz r_text,\ |
| ru,'ãáª',\ |
| en,'Start' |
| ;----------------------------------------------------------------------------- |
| title db 'File Speed v0.1',0 |
| ;----------------------------------------------------------------------------- |
| include_debug_strings |
| ;----------------------------------------------------------------------------- |
| l_libs_start: |
| |
| library01 l_libs system_dir_Boxlib+9, cur_dir_path, library_path, system_dir_Boxlib, \ |
| err_message_found_lib1, head_f_l, Box_lib_import, err_message_import1, head_f_i |
| |
| library02 l_libs system_dir_ProcLib+9, cur_dir_path, library_path, system_dir_ProcLib, \ |
| err_message_found_lib2, head_f_l, ProcLib_import, err_message_import2, head_f_i |
| |
| end_l_libs: |
| ;----------------------------------------------------------------------------- |
| system_dir_Boxlib db '/sys/lib/box_lib.obj',0 |
| system_dir_ProcLib db '/sys/lib/proc_lib.obj',0 |
| |
| head_f_i: |
| head_f_l db 'System error',0 |
| |
| err_message_found_lib1 db 'box_lib.obj - Not found!',0 |
| err_message_found_lib2 db 'proc_lib.obj - Not found!',0 |
| |
| err_message_import1 db 'box_lib.obj - Wrong import!',0 |
| err_message_import2 db 'proc_lib.obj - Wrong import!',0 |
| |
| ;----------------------------------------------------------------------------- |
| align 4 |
| ProcLib_import: |
| OpenDialog_Init dd aOpenDialog_Init |
| OpenDialog_Start dd aOpenDialog_Start |
| ;OpenDialog_Version dd aOpenDialog_Version |
| |
| ;ColorDialog_Init dd aColorDialog_Init |
| ;ColorDialog_Start dd aColorDialog_Start |
| ;ColorDialog_Version dd aColorDialog_Version |
| |
| dd 0 |
| dd 0 |
| |
| aOpenDialog_Init db 'OpenDialog_init',0 |
| aOpenDialog_Start db 'OpenDialog_start',0 |
| ;aOpenDialog_Version db 'Version_OpenDialog',0 |
| |
| ;aColorDialog_Init db 'ColorDialog_init',0 |
| ;aColorDialog_Start db 'ColorDialog_start',0 |
| ;aColorDialog_Version db 'Version_ColorDialog',0 |
| ;----------------------------------------------------------------------------- |
| align 4 |
| Box_lib_import: |
| ;init_lib dd a_init |
| ;version_lib dd a_version |
| |
| |
| ;edit_box_draw dd aEdit_box_draw |
| ;edit_box_key dd aEdit_box_key |
| ;edit_box_mouse dd aEdit_box_mouse |
| ;version_ed dd aVersion_ed |
| |
| ;check_box_draw dd aCheck_box_draw |
| ;check_box_mouse dd aCheck_box_mouse |
| ;version_ch dd aVersion_ch |
| |
| ;option_box_draw dd aOption_box_draw |
| ;option_box_mouse dd aOption_box_mouse |
| ;version_op dd aVersion_op |
| |
| ;scrollbar_ver_draw dd aScrollbar_ver_draw |
| ;scrollbar_ver_mouse dd aScrollbar_ver_mouse |
| ;scrollbar_hor_draw dd aScrollbar_hor_draw |
| ;scrollbar_hor_mouse dd aScrollbar_hor_mouse |
| ;version_scrollbar dd aVersion_scrollbar |
| |
| ;dinamic_button_draw dd aDbutton_draw |
| ;dinamic_button_mouse dd aDbutton_mouse |
| ;version_dbutton dd aVersion_dbutton |
| |
| ;menu_bar_draw dd aMenu_bar_draw |
| ;menu_bar_mouse dd aMenu_bar_mouse |
| ;menu_bar_activate dd aMenu_bar_activate |
| ;version_menu_bar dd aVersion_menu_bar |
| |
| ;FileBrowser_draw dd aFileBrowser_draw |
| ;FileBrowser_mouse dd aFileBrowser_mouse |
| ;FileBrowser_key dd aFileBrowser_key |
| ;Version_FileBrowser dd aVersion_FileBrowser |
| |
| PathShow_prepare dd sz_PathShow_prepare |
| PathShow_draw dd sz_PathShow_draw |
| ;Version_path_show dd szVersion_path_show |
| |
| ;Frame_draw dd sz_Frame_draw |
| ;Version_frame dd szVersion_frame |
| |
| dd 0 |
| dd 0 |
| |
| ;a_init db 'lib_init',0 |
| ;a_version db 'version',0 |
| |
| ;aEdit_box_draw db 'edit_box',0 |
| ;aEdit_box_key db 'edit_box_key',0 |
| ;aEdit_box_mouse db 'edit_box_mouse',0 |
| ;aVersion_ed db 'version_ed',0 |
| |
| ;aCheck_box_draw db 'check_box_draw',0 |
| ;aCheck_box_mouse db 'check_box_mouse',0 |
| ;aVersion_ch db 'version_ch',0 |
| |
| ;aOption_box_draw db 'option_box_draw',0 |
| ;aOption_box_mouse db 'option_box_mouse',0 |
| ;aVersion_op db 'version_op',0 |
| |
| ;aScrollbar_ver_draw db 'scrollbar_v_draw',0 |
| ;aScrollbar_ver_mouse db 'scrollbar_v_mouse',0 |
| ;aScrollbar_hor_draw db 'scrollbar_h_draw',0 |
| ;aScrollbar_hor_mouse db 'scrollbar_h_mouse',0 |
| ;aVersion_scrollbar db 'version_scrollbar',0 |
| |
| ;aDbutton_draw db 'dbutton_draw',0 |
| ;aDbutton_mouse db 'dbutton_mouse',0 |
| ;aVersion_dbutton db 'version_dbutton',0 |
| |
| ;aMenu_bar_draw db 'menu_bar_draw',0 |
| ;aMenu_bar_mouse db 'menu_bar_mouse',0 |
| ;aMenu_bar_activate db 'menu_bar_activate',0 |
| ;aVersion_menu_bar db 'version_menu_bar',0 |
| |
| ;aFileBrowser_draw db 'FileBrowser_draw',0 |
| ;aFileBrowser_mouse db 'FileBrowser_mouse',0 |
| ;aFileBrowser_key db 'FileBrowser_key',0 |
| ;aVersion_FileBrowser db 'version_FileBrowser',0 |
| |
| sz_PathShow_prepare db 'PathShow_prepare',0 |
| sz_PathShow_draw db 'PathShow_draw',0 |
| ;szVersion_path_show db 'version_PathShow',0 |
| |
| ;sz_Frame_draw db 'frame_draw',0 |
| ;szVersion_frame db 'version_frame',0 |
| ;----------------------------------------------------------------------------- |
| PathShow_data: |
| .type dd 0 ;+0 |
| .start_y dw 5+4 ;+4 |
| .start_x dw 5+5 ;+6 |
| .font_size_x dw 6 ;+8 ; 6 - for font 0, 8 - for font 1 |
| .area_size_x dw 400-30 ;+10 |
| .font_number dd 0 ;+12 ; 0 - monospace, 1 - variable |
| .background_flag dd 0 ;+16 |
| .font_color dd 0x0 ;+20 |
| .background_color dd 0x0 ;+24 |
| .text_pointer dd fname ;+28 |
| .work_area_pointer dd text_work_area ;+32 |
| .temp_text_length dd 0 ;+36 |
| ;----------------------------------------------------------------------------- |
| OpenDialog_data: |
| .type dd 0 |
| .procinfo dd process_info ;+4 |
| .com_area_name dd communication_area_name ;+8 |
| .com_area dd 0 ;+12 |
| .opendir_pach dd temp_dir_pach ;+16 |
| .dir_default_pach dd communication_area_default_pach ;+20 |
| .start_path dd open_dialog_path ;+24 |
| .draw_window dd draw_window ;+28 |
| .status dd 0 ;+32 |
| .openfile_pach dd fname ;+36 |
| .filename_area dd filename_area ;+40 |
| .filter_area dd Filter |
| .x: |
| .x_size dw 420 ;+48 ; Window X size |
| .x_start dw 10 ;+50 ; Window X position |
| .y: |
| .y_size dw 320 ;+52 ; Window y size |
| .y_start dw 10 ;+54 ; Window Y position |
| |
| communication_area_name: |
| db 'FFFFFFFF_open_dialog2',0 |
| |
| open_dialog_path: |
| if __nightbuild eq yes |
| db '/sys/MANAGERS/opendial',0 |
| else |
| db '/sys/File Managers/opendial',0 |
| end if |
| |
| communication_area_default_pach: |
| db '/sys',0 |
| |
| Filter: |
| dd Filter.end - Filter.1 |
| .1: |
| ;db 'BIN',0 |
| ;db 'DAT',0 |
| .end: |
| db 0 |
| |
| start_temp_file_name: |
| db 'default.dtp',0 |
| |
| default_dtp: |
| db '/sys/default.dtp',0 |
| ;----------------------------------------------------------------------------- |
| sector equ 512 |
| ;-------------------------------------- |
| result_table: |
| dd a512b, 0, sector*1 |
| dd a1K, 1, sector*2 |
| dd a2K, 2, sector*4 |
| dd a4K, 3, sector*8 |
| dd a8K, 4, sector*16 |
| dd a16K, 5, sector*32 |
| dd a32K, 6, sector*64 |
| dd a64K, 7, sector*128 |
| dd a128K, 8, sector*256 |
| dd a256K, 9, sector*512 |
| dd a512K, 10, sector*1024 |
| dd a1M, 11, sector*2*1024 |
| dd a2M, 12, sector*4*1024 |
| dd a4M, 13, sector*8*1024 |
| dd a8M, 14, sector*16*1024 |
| dd a16M, 15, sector*32*1024 |
| dd a32M, 16, sector*64*1024 |
| dd a64M, -1, sector*128*1024 |
| ;----------------------------------------------------------------------------- |
| a512b db ' 512',0 |
| a1K db ' 1K',0 |
| a2K db ' 2K',0 |
| a4K db ' 4K',0 |
| a8K db ' 8K',0 |
| a16K db ' 16K',0 |
| a32K db ' 32K',0 |
| a64K db ' 64K',0 |
| a128K db '128K',0 |
| a256K db '256K',0 |
| a512K db '512K',0 |
| a1M db ' 1M',0 |
| a2M db ' 2M',0 |
| a4M db ' 4M',0 |
| a8M db ' 8M',0 |
| a16M db ' 16M',0 |
| a32M db ' 32M',0 |
| a64M db ' 64M',0 |
| ;----------------------------------------------------------------------------- |
| align 4 |
| fileinfo: |
| .subfunction dd 5 |
| .offset dd 0 |
| .offset_1 dd 0 |
| .size dd 0 |
| .return dd file_info |
| db 0 |
| .name: dd fname |
| ;----------------------------------------------------------------------------- |
| align 4 |
| fileread: |
| .subfunction dd 0 |
| .offset dd 0 |
| .offset_1 dd 0 |
| .size dd 0 |
| .return dd process_info |
| db 0 |
| .name: dd fname |
| ;----------------------------------------------------------------------------- |