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 |