Rev 1686 | Rev 1702 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 1686 | Rev 1688 | ||
---|---|---|---|
Line 8... | Line 8... | ||
8 | aDecompress db 'DECOMPRESS',0 |
8 | aDecompress db 'DECOMPRESS',0 |
9 | definoutname db 0 |
9 | definoutname db 0 |
10 | defpath db '/RD/1/' |
10 | defpath db '/RD/1/' |
11 | ;curedit dd 0 |
11 | ;curedit dd 0 |
Line 12... | Line 12... | ||
12 | 12 | ||
13 | info_str db 'KPack - Kolibri Packer, version 0.13',10 |
13 | info_str db 'KPack - Kolibri Packer, version 0.15',10 |
14 | db 'Uses LZMA v4.32 compression library',10,10 |
14 | db 'Uses LZMA v4.32 compression library',10,10 |
15 | info_len = $ - info_str |
15 | info_len = $ - info_str |
- | 16 | usage_str db 'Written by diamond in 2006, 2007, 2009 specially for KolibriOS',10 |
|
- | 17 | db 'Disassembled code, using Box_Lib, Proc_Lib and OpenDialog',10 |
|
16 | usage_str db 'Written by diamond in 2006, 2007, 2009 specially for KolibriOS',10 |
18 | db ' by Mario79, 2010',10 |
17 | db 'LZMA is copyright (c) 1999-2005 by Igor Pavlov',10 |
19 | db 'LZMA is copyright (c) 1999-2005 by Igor Pavlov',10 |
18 | db 10 |
20 | db 10 |
19 | db 'Command-line usage:',10 |
21 | db 'Command-line usage:',10 |
20 | db ' kpack infile [outfile]',10 |
- | |
21 | db 'If no output file is specified,',10 |
- | |
22 | db ' packed data will be written back to input file',10 |
22 | db ' path_to_infile with zero',10 |
23 | db 10 |
23 | db 10 |
24 | db 'Window usage:',10 |
24 | db 'Window usage:',10 |
- | 25 | db 'Select file with PATH-button and press needed button',10 |
|
- | 26 | db ' or enter input and output file name,',10 |
|
25 | db " enter input file name, output file name and press needed button",10 |
27 | db ' enter path and press needed button',10 |
26 | usage_len = $ - usage_str |
28 | usage_len = $ - usage_str |
27 | errload_str db 'Cannot load input file',10 |
29 | errload_str db 'Cannot load input file',10 |
28 | errload_len = $ - errload_str |
30 | errload_len = $ - errload_str |
29 | outfileerr_str db 'Cannot save output file',10 |
31 | outfileerr_str db 'Cannot save output file',10 |
Line 123... | Line 125... | ||
123 | system_dir_Boxlib db '/sys/lib/box_lib.obj',0 |
125 | system_dir_Boxlib db '/sys/lib/box_lib.obj',0 |
124 | system_dir_ProcLib db '/sys/lib/proc_lib.obj',0 |
126 | system_dir_ProcLib db '/sys/lib/proc_lib.obj',0 |
125 | ;--------------------------------------------------------------------- |
127 | ;--------------------------------------------------------------------- |
126 | align 4 |
128 | align 4 |
127 | l_libs_start: |
129 | l_libs_start: |
128 | ; load_library boxlib_name,cur_dir_path,buf_cmd_lin,system_path,\ |
- | |
129 | ; err_message_found_lib,head_f_l,myimport,err_message_import,head_f_i |
- | |
Line 130... | Line 130... | ||
130 | 130 | ||
131 | library01 l_libs system_dir_Boxlib+9, cur_dir_path, library_path, system_dir_Boxlib, \ |
131 | library01 l_libs system_dir_Boxlib+9, cur_dir_path, library_path, system_dir_Boxlib, \ |
Line 132... | Line 132... | ||
132 | err_message_found_lib1, head_f_l, Box_lib_import, err_message_import1, head_f_i |
132 | err_message_found_lib1, head_f_l, Box_lib_import, err_message_import1, head_f_i |
Line 176... | Line 176... | ||
176 | 176 | ||
Line 177... | Line 177... | ||
177 | start_temp_file_name: db 'temp.bin',0 |
177 | start_temp_file_name: db 'temp.bin',0 |
178 | 178 | ||
179 | ;--------------------------------------------------------------------- |
179 | ;--------------------------------------------------------------------- |
180 | align 4 |
180 | align 4 |
181 | edit1 edit_box 160, 62, 1+22, 0xffffff, 0xff, 0x80ff, 0, 0x8000, 256, inname, mouse_dd, 0, 11,11 |
181 | edit1 edit_box 160, 60, 1, 0xffffff, 0xff, 0x80ff, 0, 0x8000, 256, inname, mouse_dd, 0, 11,11 |
182 | edit2 edit_box 160, 62, 17+22, 0xffffff, 0xff, 0x80ff, 0, 0x8000,256, outname, mouse_dd, 0, 7,7 |
182 | edit2 edit_box 160, 60, 17, 0xffffff, 0xff, 0x80ff, 0, 0x8000,256, outname, mouse_dd, 0, 7,7 |
Line 183... | Line 183... | ||
183 | edit3 edit_box 160, 62, 33+22, 0xffffff, 0xff, 0x80ff, 0, 0x8000,256, path, mouse_dd, 0, 6,6 |
183 | edit3 edit_box 160, 60, 33, 0xffffff, 0xff, 0x80ff, 0, 0x8000,256, path, mouse_dd, 0, 6,6 |
184 | editboxes_end: |
184 | editboxes_end: |
185 | 185 |