Updated to v4.1
TeraCopy Integration v4.1
You need XYplorer 7.30.0008 and Teracopy v2.0 beta3.
Now the script uses only one file.
Cut
Code: Select all
//copy list of items to a variable
#101;
set $items, <clipboard>;
//save list path
set $list, <xypath>\teracopylist.tmp;
//delete old list
setkey avoid possible, error, message, $list;
delete 0,0, $list;
//save operation and list of items
setkey move, teracopyop, tc, $list;
setkey <crlf>$items, teracopylist, tc, $list;
status TeraCopy: Cut, , ready;
Copy
Code: Select all
//copy list of items to a variable
#101;
set $items, <clipboard>;
//save list path
set $list, <xypath>\teracopylist.tmp;
//delete old list
setkey avoid possible, error, message, $list;
delete 0,0, $list;
//save operation and list of items
setkey copy, teracopyop, tc, $list;
setkey <crlf>$items, teracopylist, tc, $list;
status TeraCopy: Copy, , ready;
Paste
Change teracopy.exe path if necessary.
Code: Select all
//save current path. this will be the target folder
set $path, <curpath>;
//restore operation type
getkey $op, teracopyop, tc, <xypath>\teracopylist.tmp;
//run teracopy.exe using command line parameters
//teracopy.exe [operation] *[list of source files] [target]
run ""%programfiles%\TeraCopy\teracopy.exe" $op *"<xypath>\teracopylist.tmp" "$path\"";
status TeraCopy: Paste, , ready;