Subversion Repositories Kolibri OS

Rev

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