|
|
| Название | MultiCopy |
| Имя файла (*.txt) | MultiCopy.txt |
| Описание | Копирует выделенные файлы во все вкладки на противоположной панели |
| Автор | Вахмурка |
| Параметры | ("%L") |
| Вызываемые плагины | win, tc, file, vec, osd |
| Иконка |
|
| Версия | 2.0 |
| Дата обновления | 08.06.2009 |
global Config = "путь/wincmd.ini"
local hwnd = win.handle("c=TTOTAL_CMD")
local i, j, T, Target, Panel, Opp
global TT = cl.Create("Tabs", 1)
win.sendmessage(hwnd, 0x400+51, 580, 0)
;Sub_ReadTabs - имя скрипта ReadTabs
if(tc.active(hwnd) == "left") do
T = runfile.Subs\Sub_ReadTabs("right")
Opp = 2
else
T = runfile.Subs\Sub_ReadTabs("left")
Opp = 1
endif
if(T == 1) do
win.sendmessage(hwnd, 0x400+51, 3101, 0)
quit
endif
local Str = file.readall(arg(1))
local v = vec.createfromlines(Str)
if(v <= 0) do
messagebox("ok error", "Vector not created", "VEC plugin error #1")
quit
endif
local Counter = vec.length(v)
local Total = T*Counter
for(i = 0; i < TT.Length; i++)
Target = TT.GetId(i)
T = TT.GetMiddleCmd(i)
if(T == Opp && validpath(Target)) do
for(j = 0; j < Counter; j++)
Str = Panel*Counter + j + 1
Str = Str ++ " of " ++ Total ++ " files copied"
osd.show(Str, "INFINITE", "30", "Arial", "-1", "255 000 000")
file.copy(v[j], Target)
endfor
Panel++
endif
endfor
osd.unload
vec.unload
Внимание! Скрипт не работает в Total Commander 7.5 pb1 и pb2!
Все предельно просто - в текущей панели выделяем группу файлов и запускаем скрипт. Все файлы (или один, если ничего не выделено) будут скопированы во все директории, которым соответствуют вкладки противоположной панели.
|
На главную |
|
Все о Total Commander |
|
PowerPro |
|
PowerPro & Total Commander |