Subversion Repositories Kolibri OS

Rev

Rev 3177 | Rev 7834 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3177 Rev 7829
Line 1... Line 1...
1
;---------------------------------------------------------------------
1
;---------------------------------------------------------------------
2
aQuestion	db '?'
2
aQuestion	db '?',0
3
caption_str	db 'KPack',0
3
caption_str	db 'KPack - Kolibri Packer',0
4
buttons1names	db ' InFile:'
4
buttons1names	db ' InFile:'
5
		db 'OutFile:'
5
		db 'OutFile:'
6
		db '   Path:'
6
		db '   Path:'
7
aCompress	db 'COMPRESS',0
7
aCompress	db ' Compress',0
8
aDecompress	db 'DECOMPRESS',0
8
aDecompress	db 'Decompress',0
9
definoutname	db 0
9
definoutname	db 0
10
defpath		db '/rd/1',0
10
defpath		db '/rd/1',0
11
;curedit		dd 0
11
;curedit		dd 0
Line 12... Line 12...
12
 
12
 
13
info_str	db 'KPack - Kolibri Packer, version 0.20',10
13
info_str	db 'KPack - Kolibri Packer, version 0.21',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
16
usage_str	db 'Written by diamond in 2006-2009 specially for KolibriOS',10
17
		db 'Disassembled code, using Box_Lib, Proc_Lib and OpenDialog',10
17
		db 'Disassembled code, using Box_Lib, Proc_Lib and OpenDialog',10
18
		db '    by Mario79, 2010',10
18
		db 'by Mario79, 2010',10
19
		db 'LZMA  is copyright (c) 1999-2005 by Igor Pavlov',10
19
		db 'LZMA is copyright (c) 1999-2005 by Igor Pavlov',10
20
		db 10
20
		db 10
21
		db 'Command-line usage:',10
21
		db 'Command-line usage:',10
22
		db ' path_to_infile with zero',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 '   Select file with PATH-button or set all data in the',10
27
		db ' enter path and press needed button',10
26
		db '   text fileds manually, then press an appropriate button',10
28
usage_len	= $ - usage_str
27
usage_len	= $ - usage_str
29
already_str	db 'Already packed kernel.mnt file',10
28
already_str	db 'Already packed kernel.mnt file',10
30
already_len	= $ - already_str
29
already_len	= $ - already_str
31
notkernel_str	db 'This is not kernel.mnt file',10
30
notkernel_str	db 'This is not kernel.mnt file',10
Line 77... Line 76...
77
align	4
76
align	4
78
Box_lib_import:
77
Box_lib_import:
79
edit_box_draw		dd aEdit_box_draw
78
edit_box_draw		dd aEdit_box_draw
80
edit_box_key		dd aEdit_box_key
79
edit_box_key		dd aEdit_box_key
81
edit_box_mouse		dd aEdit_box_mouse
80
edit_box_mouse		dd aEdit_box_mouse
82
;version_ed		dd aVersion_ed
-
 
Line 83... Line 81...
83
 
81
 
84
init_checkbox		dd aInit_checkbox
82
init_checkbox		dd aInit_checkbox
85
check_box_draw		dd aCheck_box_draw
83
check_box_draw		dd aCheck_box_draw
86
check_box_mouse		dd aCheck_box_mouse
-
 
87
;version_ch		dd aVersion_ch
-
 
88
 
-
 
89
;option_box_draw	dd aOption_box_draw
-
 
90
;option_box_mouse	dd aOption_box_mouse
-
 
91
;version_op		dd aVersion_op
-
 
92
 
-
 
93
;scrollbar_ver_draw	dd aScrollbar_ver_draw
-
 
94
;scrollbar_ver_mouse	dd aScrollbar_ver_mouse
-
 
95
;scrollbar_hor_draw	dd aScrollbar_hor_draw
-
 
96
;scrollbar_hor_mouse	dd aScrollbar_hor_mouse
-
 
97
;version_scrollbar	dd aVersion_scrollbar
-
 
98
 
-
 
99
;menu_bar_draw		dd aMenu_bar_draw
-
 
100
;menu_bar_mouse		dd aMenu_bar_mouse
-
 
Line 101... Line 84...
101
;version_menu_bar	dd aVersion_menu_bar
84
check_box_mouse		dd aCheck_box_mouse
102
 
85
 
Line 103... Line 86...
103
	dd 0
86
	dd 0
104
	dd 0
87
	dd 0
105
 
88
 
106
aEdit_box_draw		db 'edit_box',0
-
 
Line 107... Line 89...
107
aEdit_box_key		db 'edit_box_key',0
89
aEdit_box_draw		db 'edit_box',0
108
aEdit_box_mouse		db 'edit_box_mouse',0
90
aEdit_box_key		db 'edit_box_key',0
109
;aVersion_ed		db 'version_ed',0
91
aEdit_box_mouse		db 'edit_box_mouse',0
110
 
-
 
Line 111... Line -...
111
aInit_checkbox		db 'init_checkbox2',0
-
 
112
aCheck_box_draw		db 'check_box_draw2',0
-
 
113
aCheck_box_mouse	db 'check_box_mouse2',0
-
 
114
;aVersion_ch		db 'version_ch',0
-
 
115
 
-
 
116
;aOption_box_draw	db 'option_box_draw',0
-
 
117
;aOption_box_mouse	db 'option_box_mouse',0
-
 
118
;aVersion_op		db 'version_op',0
-
 
119
 
-
 
120
;aScrollbar_ver_draw	db 'scrollbar_v_draw',0
-
 
121
;aScrollbar_ver_mouse	db 'scrollbar_v_mouse',0
-
 
122
;aScrollbar_hor_draw	db 'scrollbar_h_draw',0
-
 
123
;aScrollbar_hor_mouse	db 'scrollbar_h_mouse',0
-
 
124
;aVersion_scrollbar	db 'version_scrollbar',0
92
 
125
 
93
aInit_checkbox		db 'init_checkbox2',0
126
;aMenu_bar_draw		db 'menu_bar_draw',0
94
aCheck_box_draw		db 'check_box_draw2',0
Line 127... Line 95...
127
;aMenu_bar_mouse		db 'menu_bar_mouse',0
95
aCheck_box_mouse	db 'check_box_mouse2',0
Line 190... Line 158...
190
;db	'BIN',0
158
;db	'BIN',0
191
;db	'DAT',0
159
;db	'DAT',0
192
.end:
160
.end:
193
db	0
161
db	0
Line -... Line 162...
-
 
162
 
-
 
163
WIN_W = 490
-
 
164
WIN_H = 350
-
 
165
LINE_H = 25
-
 
166
RIGHT_BTN_W = 103
-
 
167
EDIT_X = 76
-
 
168
LOG_Y = LINE_H*3+5
-
 
169
LOG_H = WIN_H-LOG_Y-9
194
 
170
 
Line 195... Line 171...
195
start_temp_file_name:	db 'temp.bin',0
171
start_temp_file_name:	db 'temp.bin',0
196
 
172
 
-
 
173
;---------------------------------------------------------------------
197
;---------------------------------------------------------------------
174
align 4
-
 
175
edit1 edit_box WIN_W-EDIT_X-RIGHT_BTN_W-12, EDIT_X, 3,          0xffffff,\ 
198
align 4
176
        0xA4C4E4, 0x80ff, 0, 0x10000000, 256, inname,  mouse_dd, 0, 11,11
-
 
177
edit2 edit_box WIN_W-EDIT_X-RIGHT_BTN_W-12, EDIT_X, LINE_H+3,   0xffffff,\
199
edit1 edit_box 160, 60, 1, 0xffffff, 0xff, 0x80ff, 0, 0x8000, 256, inname, mouse_dd, 0, 11,11
178
        0xA4C4E4, 0x80ff, 0, 0x10000000, 256, outname, mouse_dd, 0, 7,7
200
edit2 edit_box 160, 60, 17, 0xffffff, 0xff, 0x80ff, 0, 0x8000,256, outname, mouse_dd, 0, 7,7
179
edit3 edit_box WIN_W-EDIT_X-RIGHT_BTN_W-12, EDIT_X, LINE_H*2+3, 0xffffff,\
Line 201... Line 180...
201
edit3 edit_box 160, 60, 33, 0xffffff, 0xff, 0x80ff, 0, 0x8000,256, path, mouse_dd, 0, 6,6
180
        0xA4C4E4, 0x80ff, 0, 0x10000000, 256, path,    mouse_dd, 0, 6,6
202
editboxes_end:
181
editboxes_end:
Line 203... Line 182...
203
 
182
 
-
 
183
mouse_dd dd 0
204
mouse_dd dd 0
184
;---------------------------------------------------------------------
Line 205... Line 185...
205
;---------------------------------------------------------------------
185
 
206
 
186
check1 check_box2 ((WIN_W - RIGHT_BTN_W - 5) shl 16)+15, ((LINE_H*2+6) shl 16)+15, 6, 0xffffff,\
207
check1 check_box2 (353 shl 16)+10,  (39 shl 16)+10, 4, 0x80FFFFFF, 0, 0, check_text, ch_flag_bottom
187
        0x80ff, 0x10000000, check_text,ch_flag_top