| 50,19 → 50,18 |
|---|
| dd esp_end ; ª®«¨ç¥á⢮ ¯ ¬ï⨠|
| dd sys_mem ; ¤à¥á ¢¥àè¨ë áâíª |
| dd fname_buf ; ¤à¥á ¡ãä¥à ¤«ï ¯ à ¬¥â஢ (¥ ¨á¯®«ì§ã¥âáï) |
| dd 0x0 ; § १¥à¢¨à®¢ ® |
| dd cur_dir_path ; § १¥à¢¨à®¢ ® |
| |
| include '..\..\..\MACROS.INC' ; ¬ ªà®áë ®¡«¥£ç îâ ¦¨§ì áᥬ¡«¥à騪®¢! |
| include '..\..\..\macros.inc' ; ¬ ªà®áë ®¡«¥£ç îâ ¦¨§ì áᥬ¡«¥à騪®¢! |
| include '..\..\..\develop\libraries\box_lib\load_lib.mac' |
| include '..\..\..\develop\libraries\box_lib\asm\trunk\opendial.mac' |
| |
| ;include 'MACROS.INC' |
| ;include 'load_lib.mac' |
| ;include 'opendial.mac' |
| |
| @use_library |
| |
| include 'debug.inc' |
| |
| use_OpenDialog |
| if ~ RENDER eq PIX |
| TOP=TOP+4 |
| include 'bgifont.inc' |
| 78,8 → 77,12 |
|---|
| |
| START: |
| mcall 68, 11 |
| |
| load_libraries l_libs_start,end_l_libs |
| |
| ;OpenDialog initialisation |
| init_OpenDialog OpenDialog_data |
| push dword OpenDialog_data |
| call [OpenDialog_Init] |
| |
| mov [pitch],2 |
| if ~ RENDER eq PIX |
| 257,28 → 260,29 |
|---|
| .nominus: |
| end if |
| cmp ah,108 ; L - load |
| jne stilld |
| jne still |
| .file_open: |
| ;--------------------------------------------------------------------- |
| ;OpenDialog_start: |
| ; copy_path open_dialog_name,path,library_path,0 |
| |
| start_OpenDialog OpenDialog_data |
| push dword OpenDialog_data |
| call [OpenDialog_Start] |
| |
| cmp [OpenDialog_data.status],2 ; OpenDialog does not start |
| je .sysxtree ; some kind of alternative, instead OpenDialog |
| ; cmp [OpenDialog_data.status],2 ; OpenDialog does not start |
| ; je .sysxtree ; some kind of alternative, instead OpenDialog |
| cmp [OpenDialog_data.status],1 |
| je prep_load |
| jmp still |
| ;--------------------------------------------------------------------- |
| .sysxtree: |
| or [mode],RTF_OPENING |
| opendialog draw_window, prep_load, st_1, fname_buf |
| st_1: |
| and [mode],not RTF_OPENING |
| jmp still;red |
| stilld: |
| jmp still |
| ;.sysxtree: |
| ; or [mode],RTF_OPENING |
| ; opendialog draw_window, prep_load, st_1, fname_buf |
| ; st_1: |
| ; and [mode],not RTF_OPENING |
| ; jmp still;red |
| ; stilld: |
| ; jmp still |
| ;--------------------------------------------------------------------- |
| |
| button: |
| 529,6 → 533,34 |
|---|
| end if |
| btn_end: |
| ;--------------------------------------------------------------------- |
| l_libs_start: |
| |
| library01 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_ProcLib db '/sys/lib/proc_lib.obj',0 |
| |
| head_f_i: |
| head_f_l db 'error',0 |
| |
| err_message_found_lib2 db 'proc_lib.obj - Not found!',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 |
| dd 0 |
| dd 0 |
| aOpenDialog_Init db 'OpenDialog_init',0 |
| aOpenDialog_Start db 'OpenDialog_start',0 |
| ;aOpenDialog_Version db 'Version_OpenDialog',0 |
| ;--------------------------------------------------------------------- |
| OpenDialog_data: |
| .type dd 0 |
| .procinfo dd procinfo ;+4 |
| 679,5 → 711,9 |
|---|
| ;--------------------------------------------------------------------- |
| temp_dir_pach: |
| rb 4096 |
| cur_dir_path: |
| rb 4096 |
| library_path: |
| rb 4096 |
| ;--------------------------------------------------------------------- |
| esp_end: |