home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Creative Computers
/
CreativeComputers.iso
/
shareware
/
menu
/
addtools_1.11
/
mtcopy
< prev
Wrap
AmigaDOS Script File
|
1994-11-17
|
550b
|
26 lines
.KEY FROM/A,TO/A
;
; Example script to execute a multitasking copy from Workbench using AddTools
; By Alessandro Sala ⌐ 1993
; Usage: Copy this file into your S: volume; select the source icon, the
; destination icon (if this is a file, only its path will be
; considered) and choose Copy from the Tools menu.
;
.BRA {
.KET }
list >T:mtc_destp "{TO}" lformat="%P"
set <T:mtc_destp >NIL: destP ?
delete >NIL: T:mtc_destp
if exists "{FROM}"
copy FROM "{FROM}" TO "$destP"
endif
if exists "{FROM}.info"
copy FROM "{FROM}.info" TO "$destP"
endif