Rev 4290 | Rev 4811 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 4290 | Rev 4319 | ||
---|---|---|---|
Line 6... | Line 6... | ||
6 | ; |
6 | ; |
7 | ; Mario79 08.09.2010 - select path with OpenDialog,keys 1,2,3,4 for select options |
7 | ; Mario79 08.09.2010 - select path with OpenDialog,keys 1,2,3,4 for select options |
8 | ; Heavyiron 01.12.2013 - new logic |
8 | ; Heavyiron 01.12.2013 - new logic |
9 | ;--------------------------------------------------------------------- |
9 | ;--------------------------------------------------------------------- |
10 | appname equ 'RDsave ' |
10 | appname equ 'RDsave ' |
11 | version equ '1.42' |
11 | version equ '1.43' |
12 | debug equ no |
12 | debug equ no |
Line 13... | Line 13... | ||
13 | 13 | ||
14 | use32 ; ¢ª«îç¨âì 32-¡¨âë© à¥¦¨¬ áᥬ¡«¥à |
14 | use32 ; ¢ª«îç¨âì 32-¡¨âë© à¥¦¨¬ áᥬ¡«¥à |
Line 206... | Line 206... | ||
206 | jmp still |
206 | jmp still |
207 | not_rd: |
207 | not_rd: |
208 | cmp [hidden],0 |
208 | cmp [hidden],0 |
209 | jne @f |
209 | jne @f |
210 | pusha |
210 | pusha |
- | 211 | stdcall _lstrcpy,msg,label2 |
|
211 | mov ecx,[sc.work_text] |
212 | mov eax,[sc.work_text] |
212 | or ecx,0xc0000088 |
213 | or eax,0xc0000088 |
- | 214 | mov [color],eax |
|
213 | mcall 4,<132,96>, ,label2, ,[sc.work] |
215 | call print_msg |
214 | popa |
216 | popa |
215 | @@: |
217 | @@: |
216 | pop eax |
218 | pop eax |
217 | mcall |
219 | mcall |
218 | call check_for_error |
220 | call check_for_error |
Line 228... | Line 230... | ||
228 | jmp print_err |
230 | jmp print_err |
229 | @@: |
231 | @@: |
230 | cmp eax, 11 |
232 | cmp eax, 11 |
231 | ja .unknown |
233 | ja .unknown |
232 | mov edx, [errors+eax*4] |
234 | mov edx, [errors+eax*4] |
233 | stdcall _lstrcpy,error_msg,error |
235 | stdcall _lstrcpy,msg,error |
234 | stdcall _lstrcat,error_msg,edx |
236 | stdcall _lstrcat,msg,edx |
235 | mov edx, error_msg |
237 | mov edx,msg |
236 | jmp print_err |
238 | jmp print_err |
237 | .unknown: |
239 | .unknown: |
238 | mov edx, aUnknownError |
240 | mov edx, aUnknownError |
Line 239... | Line 241... | ||
239 | 241 | ||
240 | print_err: |
242 | print_err: |
241 | stdcall _lstrlen,ini_path |
243 | stdcall _lstrlen,ini_path |
242 | pusha |
244 | pusha |
243 | invoke ini_set_str,ini_file,apath,apath,ini_path,eax |
245 | invoke ini_set_str,ini_file,apath,apath,ini_path,eax |
- | 246 | popa |
|
244 | popa |
247 | stdcall _lstrcpy,msg,edx |
245 | cmp [hidden],1 |
248 | cmp [hidden],1 |
246 | je @f |
249 | je @f |
247 | cmp [param],1 |
250 | cmp [param],1 |
248 | je @f |
- | |
249 | stdcall _lstrlen,edx |
- | |
250 | imul eax,6 |
- | |
251 | mov ebx,390 |
- | |
252 | sub ebx,eax |
- | |
253 | shl ebx,15 |
- | |
254 | add ebx,96 |
251 | je @f |
255 | mov ecx,[sc.work_text] |
252 | mov ecx,[sc.work_text] |
- | 253 | or ecx,0xc0880000 |
|
256 | or ecx,0xc0880000 |
254 | mov [color],ecx |
257 | mcall 4, , , , ,[sc.work] |
255 | call print_msg |
258 | ret |
256 | ret |
259 | @@: |
257 | @@: |
260 | mov dword [is_notify + 8], edx |
258 | mov dword [is_notify + 8], edx |
261 | mcall 70, is_notify |
259 | mcall 70, is_notify |
Line 267... | Line 265... | ||
267 | print_ok: |
265 | print_ok: |
268 | cmp [hidden],1 |
266 | cmp [hidden],1 |
269 | je @f |
267 | je @f |
270 | cmp [param],1 |
268 | cmp [param],1 |
271 | je @f |
269 | je @f |
272 | mov edx,ok |
- | |
273 | stdcall _lstrlen,edx |
270 | stdcall _lstrcpy,msg,ok |
274 | imul eax,6 |
- | |
275 | mov ebx,390 |
- | |
276 | sub ebx,eax |
- | |
277 | shl ebx,15 |
- | |
278 | add ebx,96 |
- | |
279 | mov ecx,[sc.work_text] |
271 | mov ecx,[sc.work_text] |
280 | or ecx,0xc0008800 |
272 | or ecx,0xc0008800 |
- | 273 | mov [color],ecx |
|
281 | mcall 4, , , , ,[sc.work] |
274 | call print_msg |
282 | mcall 5,200 |
275 | mcall 5,100 |
283 | cmp [autoclose],1 |
276 | cmp [autoclose],1 |
284 | je close |
277 | je close |
285 | ret |
278 | ret |
286 | @@: |
279 | @@: |
287 | stdcall _lstrcpy,check_dir,ok |
280 | stdcall _lstrcpy,msg,ok |
288 | stdcall _lstrcat,check_dir,fname_buf |
281 | stdcall _lstrcat,msg,fname_buf |
289 | mov edx,check_dir |
282 | mov edx,msg |
290 | mov dword [is_notify + 8], edx |
283 | mov dword [is_notify + 8], edx |
291 | mcall 70, is_notify |
284 | mcall 70, is_notify |
- | 285 | mcall 5,100 |
|
292 | jmp close |
286 | jmp close |
- | 287 | ;--------------------------------------------------------------------- |
|
293 | 288 | print_msg: |
|
- | 289 | mcall 13,<5,380>,<96,10>,[sc.work] |
|
- | 290 | stdcall _lstrlen,msg |
|
- | 291 | lea eax,[eax+eax*2] |
|
- | 292 | add eax,eax |
|
- | 293 | mov ebx,390 |
|
- | 294 | sub ebx,eax |
|
- | 295 | shl ebx,15 |
|
- | 296 | add ebx,96 |
|
- | 297 | mcall 4, ,[color],msg, ,[sc.work] |
|
- | 298 | ret |
|
294 | ;--------------------------------------------------------------------- |
299 | ;--------------------------------------------------------------------- |
295 | draw_PathShow: |
300 | draw_PathShow: |
296 | pusha |
301 | pusha |
297 | mcall 13,<15,280>,<32,16>,0xffffff |
302 | mcall 13,<15,280>,<32,16>,0xffffff |
298 | push dword PathShow_data_1 |
303 | push dword PathShow_data_1 |
Line 347... | Line 352... | ||
347 | mov dword [frame_data.font_backgr_color],ecx |
352 | mov dword [frame_data.font_backgr_color],ecx |
348 | push dword frame_data |
353 | push dword frame_data |
349 | call [Frame_draw] |
354 | call [Frame_draw] |
Line 350... | Line 355... | ||
350 | 355 | ||
- | 356 | call draw_PathShow |
|
Line 351... | Line 357... | ||
351 | call draw_PathShow |
357 | call print_msg |
352 | 358 | ||
Line 353... | Line 359... | ||
353 | mcall 12,2 |
359 | mcall 12,2 |
Line 650... | Line 656... | ||
650 | 656 | ||
Line 651... | Line 657... | ||
651 | sc system_colors |
657 | sc system_colors |
Line -... | Line 658... | ||
- | 658 | ||
- | 659 | autoclose rd 1 |
|
652 | 660 | ||
653 | autoclose rd 1 |
661 | color rd 1 |
Line 654... | Line 662... | ||
654 | 662 | ||
655 | error_msg: |
663 | msg: |
656 | rb 1024 |
664 | rb 1024 |
Line 680... | Line 688... | ||
680 | rb 1024 |
688 | rb 1024 |
681 | ;--------------------------------------------------------------------- |
689 | ;--------------------------------------------------------------------- |
682 | align 32 |
690 | align 32 |
683 | rb 4096 |
691 | rb 4096 |
684 | stacktop: |
692 | stacktop: |
685 | I_END: ; ¬¥âª ª®æ ¯à®£à ¬¬ë315,36>215,75>134,75>30,20>300,75>125,70>68,20>198,70>200,130>200,400>32,16>15,280>132,96> |
- | |
686 | 693 | I_END:315,36>215,75>134,75>30,20>300,75>125,70>68,20>198,70>200,130>200,400>32,16>15,280>96,10>5,380> |
|
- | 694 | ||
687 | 695 |