Rev 1636 | Rev 6328 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 1632 | mario79 | 1 | ;--------------------------------------------------------------------- |
| 2 | system_dir_ProcLib db '/sys/lib/proc_lib.obj',0 |
||
| 3 | ;--------------------------------------------------------------------- |
||
| 4 | head_f_i: |
||
| 5 | head_f_l db 'System error',0 |
||
| 6 | |||
| 7 | err_message_found_lib2 db 'proc_lib.obj - Not found!',0 |
||
| 8 | |||
| 9 | err_message_import2 db 'proc_lib.obj - Wrong import!',0 |
||
| 10 | ;--------------------------------------------------------------------- |
||
| 11 | align 4 |
||
| 12 | l_libs_start: |
||
| 13 | |||
| 14 | library02 l_libs system_dir_ProcLib+9, cur_dir_path, library_path, system_dir_ProcLib, \ |
||
| 15 | err_message_found_lib2, head_f_l, ProcLib_import, err_message_import2, head_f_i |
||
| 16 | |||
| 17 | end_l_libs: |
||
| 18 | ;--------------------------------------------------------------------- |
||
| 19 | align 4 |
||
| 20 | OpenDialog_data: |
||
| 21 | .type dd 1 ; Save |
||
| 22 | .procinfo dd procinfo ;+4 |
||
| 23 | .com_area_name dd communication_area_name ;+8 |
||
| 24 | .com_area dd 0 ;+12 |
||
| 25 | .opendir_pach dd temp_dir_pach ;+16 |
||
| 26 | .dir_default_pach dd communication_area_default_pach ;+20 |
||
| 27 | .start_path dd open_dialog_path ;+24 |
||
| 28 | .draw_window dd drawwin ;+28 |
||
| 29 | .status dd 0 ;+32 |
||
| 30 | .openfile_pach dd file_path ;+36 |
||
| 31 | .filename_area dd filename_area ;+40 |
||
| 32 | .filter_area dd Filter |
||
| 33 | .x: |
||
| 34 | .x_size dw 420 ;+48 ; Window X size |
||
| 35 | .x_start dw 10 ;+50 ; Window X position |
||
| 36 | .y: |
||
| 37 | .y_size dw 320 ;+52 ; Window y size |
||
| 38 | .y_start dw 10 ;+54 ; Window Y position |
||
| 39 | |||
| 40 | communication_area_name: |
||
| 41 | db 'FFFFFFFF_open_dialog',0 |
||
| 42 | open_dialog_path: |
||
| 1702 | Lrz | 43 | if __nightbuild eq yes |
| 44 | db '/sys/MANAGERS/opendial',0 |
||
| 45 | else |
||
| 46 | db '/sys/File Managers/opendial',0 |
||
| 47 | end if |
||
| 1632 | mario79 | 48 | communication_area_default_pach: |
| 49 | db '/rd0/1/',0 |
||
| 50 | |||
| 51 | Filter: |
||
| 52 | dd Filter.end - Filter |
||
| 53 | .1: |
||
| 1636 | mario79 | 54 | db 'BMP',0 |
| 55 | db 'GIF',0 |
||
| 1632 | mario79 | 56 | .end: |
| 57 | db 0 |
||
| 58 | |||
| 59 | ;start_temp_file_name: db 'pattern.mgb',0 |
||
| 60 | |||
| 61 | path4 db '/sys/noname.bmp',0 |
||
| 62 | ;--------------------------------------------------------------------- |
||
| 63 | align 4 |
||
| 64 | ProcLib_import: |
||
| 65 | OpenDialog_Init dd aOpenDialog_Init |
||
| 66 | OpenDialog_Start dd aOpenDialog_Start |
||
| 67 | ;OpenDialog__Version dd aOpenDialog_Version |
||
| 68 | dd 0 |
||
| 69 | dd 0 |
||
| 70 | aOpenDialog_Init db 'OpenDialog_init',0 |
||
| 71 | aOpenDialog_Start db 'OpenDialog_start',0 |
||
| 72 | ;aOpenDialog_Version db 'Version_OpenDialog',0 |
||
| 73 | ;--------------------------------------------------------------------- |