home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Frozen Fish 2: PC
/
frozenfish_august_1995.bin
/
bbs
/
d09xx
/
d0928.lha
/
AddTools
/
MTCopy
< prev
next >
Wrap
AmigaDOS Script File
|
1993-10-07
|
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