Скрипты для Total Commander

RSS-лента темы

Offline

Andrey_A

Пользователь

Posts: 275

Скрипты - уникальный инструмент для достижения различных целей в работе с файлами и не только, особенно в файловом менеджере, даже если вы раньше об этом ничего не слышали и не знали, то путём простых движений вы можете оптимизировать свои действия
Тема тестирования скриптов создана для увеличения функциональности Total Commander
Всё это делается для тех, кто хочет экономить время и автоматизировать работу
Огромное спасибо участникам, авторам и всем повлиявшим на тему
#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#
В этой теме Каждый может выложить свой скрипт, написанный на любом языке: vbs, js, hta, au3,ahk, bat,cmd... - главное, чтобы он относился как-то к Total Commander, можно было им воспользоваться и к нему было должное описание к применению.
#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#
В теме "Тестирование и заказ скриптов" Каждый может протестировать, дать свой комментарий (все комментарии из этой темы будут удаляться)...если есть интересная идея, вы так же можете поделиться ей в соседней теме и заказать скрипт, а вдруг она покажется интересной для авторов...
#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#/#
Важная информация:
Перед использованием скриптов, проэкспериментируйте сначала на "ненужных" файлах
(у меня на разных дисках есть несколько папок с разными файлами для экспериментов)
Как только вы убедитесь, что скрипт работает как надо, пользуйтесь на реальных файлах

- ряд скриптов могут не сработать:
1. Из-за раскладки клавиатуры (переключите раскладку, повторите заново)
2. Из-за неправильно указанных параметров (внимательно читайте комментарии внутри скриптов)
3. Из-за параметров %p и %P в командной строке и тому подобных (на практике иногда надо их брать кавычки "%P")
4. Из-за 2-х запущенных копий Total Commander (редко, но бывает)
5. Из-за неверно указанных путей использованных файлов (внимательно проверьте пути)
6. Из-за недостающих дополнительных утилит, использующих скриптом (проверьте есть ли они у вас)
7. Из-за очень большого количества файлов, посланных для обработки скрипту
- Может показаться, что скрипт не сработал, возможно он ещё работает. Чтобы в этом убедится откройте Диспетчер задач и посмотрите процесс
- Скрипты, связанные с посланием команд Total Commander'y при очень большом количестве файлов работают неадекватно.
(попробуйте в Тотале просто выделить 100.000 файлов - это займёт несколько секунд, сколько точно, никто сказать не может - это зависит от многих факторов. Так же и скрипты, связанные с фильтрацией, выделением... может показаться, что глючат - на самом деле сам Тотал не справляется с посланной ему командой, если речь идёт об обработке большого количества файлов)
-----------------------------------------------------------------------------------------------------------------------------
8. Из-за ошибки автора - Сообщайте об ошибках

Параметры командной строки TC:
Для вызова скриптов в пользовательских командах или кнопках Total Commander используются параметры:

? - В качестве первого параметра вызывает перед стартом программы диалоговое окно, содержащее указанные далее параметры. Вы можете изменить их перед стартом программы и даже отменить запуск

%P - Вставляет в командную строку исходный путь, включая обратную косую черту (\) в конце
%N - Помещает в командную строку имя файла с расширением под курсором
%O - Помещает в командную строку текущее имя файла без расширения
%E - Помещает в командную строку текущее расширение (без предшествующей точки).

%T - Вставляет текущий каталог назначения
%M - Помещает в командную строку текущее имя с расширением файла в каталоге назначения

%S - Помещает в командную строку имена всех выделенных файлов. Имена, содержащие пробелы, будут взяты в кавычки. Имейте в виду, что длина командной строки не может превышать 32767 символов
%S10 - Помещает в командную строку имена не более чем 10 первых выделенных файлов. Вы можете использовать любое другое число для ограничения количества файлов, передаваемых в программу

%R - Работает аналогично %S, но для выделенных файлов в целевой панели

Замечания:

• %N и %M вставляют длинное имя, в то время как %n и %m вставляют имя DOS (8.3)
%P и %T вставляют пути с длинными именами каталогов, а %p и %t — с короткими
То же самое для %o, %e и %s и %r

• Если приписать %P, %p, %T или %t непосредственно перед %S или %s (без пробела между ними!), то к имени каждого файла из списка будет добавлен путь. При наличии пробелов полный путь автоматически заключается в кавычки. Пример: %P%S помещает в командную строку список всех выделенных файлов с полными путями

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

%L, %l, %F, %f, %D, %d, %WL, %WF, %UL, %UF - Создаётфайл списка в каталоге, заданном переменной TEMP, с именами выделенных файлов и каталогов и добавляет имя этого файла списка в командную строку. Список удаляется автоматически, когда запущенная программа завершается. Можно создать файл списка в одном из 10-ти форматов:

%L - Длинные имена файлов, включая полный путь, например, c:\Program Files\Long name.exe
%l - (L в нижнем регистре) Короткие имена файлов, включая полный путь, например, C:\PROGRA~1\LONGNA~1.EXE.

%F - Длинные имена файлов без пути, например, Long name.exe.
%f - Короткие имена файлов без пути, например, LONGNA~1.EXE.

%D - Короткие имена файлов, включая полный путь, но с использованием набора символов DOS для диакритических знаков.
%d - Короткие имена файлов без пути, но с использованием набора символов DOS для диакритических знаков.

%UL, %UF - Аналогично %L и %F, но файлы списка создаются в Unicode-формате UTF-8 (с сигнатурой).
%WL, %WF - Аналогично %L и %F, но файлы списка создаются в Unicode-формате UTF-16 (с сигнатурой).

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

%v - Помещает в командную строку имя виртуального файла при работе с FS-плагинами виртуальных панелей, для которых %N вставляет имя реального файла (в файловой системе), на который указывает выбранный элемент.
%V - То же, что и %v, но с полным путём (включая имя плагина).

%X - Трактует последующие параметры как относящиеся к левой/правой панелям вместо исходной/целевой:
%P, %p (путь слева), %T, %t (путь справа), %N, %n (имя слева), %M, %m (имя справа),
%S, %s (выделенные слева), %R, %r (выделенные справа).
Пример: %X%P %T - передаёт текущий путь слева и справа, например, для внешнего инструмента синхронизации.

%x - Трактует последующие параметры снова как относящиеся к исходной/целевой панелям.
Пример: %X%P %x%P - передаёт текущий путь в левой панели и в исходной.

%Z - Будучи указан в любом месте в списке параметров, разрешает передавать архивы в качестве части пути во внешние программы для %P и %T, когда в панели открыто содержимое архива.
Пример: %Z%P - передаёт имя открытого в панели архива во внешнюю программу.

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
%% - Вставляет одиночный знак процента, важно для переменных окружения, которые прописываются в параметрах
Пример: %%COMMANDER_PATH%%\

Как использовать скрипты:
1. Указанный в секциях "код" текст необходимо сохранить в виде текстового файла с именем и расширением, указанным в начале кода.
2. Затем нужно перетащить этот файл на панель инструментов Total Commander - создастся кнопка.
3. Созданную кнопку необходимо подредактировать - нажать правой кнопкой мыши на созданной кнопке - выбрать "Изменить".
4. Изменение полей
. а) Команда: путь\к\скрипту (обычно он уже есть)
для скриптов au3, ahk перед скриптом необходимо поставить путь запускаемого преложения
пример: %COMMANDER_PATH%\Utilities\Scripting\AutoIt\AutoIt3.exe "%COMMANDER_PATH%\Scripts\TextWork\InsertText.au3"
. б) Параметры: строку нужно заполнить согласно описанию в шапке скрипта. пример: %L
. в) Путь запуска: лучше это поле очищать (для bat, cmd и некоторых скриптов он необходим)
. г) Файл значка: редактируются "по вкусу"
. д) Подсказка: берётся из описания к скрипту, с учётом тех или иных параметров

Дополнительные инструменты скриптинга:
1. В связи с тем, что функции во многих скриптах повторяются, ряд из них вынесены в отдельные файлы
Рекомендую создать папку Include скачайте и положите туда эти файлы:

Скачать FunctionsPlus.vbs (Версия: 2.3 от 22.03.2012) - файл с различными функциями, которые можно использовать в других скриптах
Скачать FunctionsINIRWS.vbs (Версия: 1.4 от 19.03.2012) - файл с функциями чтения и записи INI файлов + FunctionsINITextRWS.vbs
Дополнительные скрипты для TC Image

2. В связи с дополнительными действиями в ряде скриптов участвуют следующие утилиты

NirCmd - утилита помогающая выполнить некоторые полезные задачи, в частности работа с буфером обмена

TCFS2 - Утилита позволяет управлять режимами окна

Скачать: TCMCWindow (Версия 1.3. от 31.01.2012)
Скачать: TCMCWindow (Версия 1.5. от 22.03.2012)

Что может утилита совместно с TCMC
- посылать команды Total Commander
- посылать клавиатурные нажатия окнам
- вводить строки в окна
- посылать текст в буфер обмена
- возвращать текст из буфера обмена
- устанавливать необходимую паузу между любыми действиями
...

Описание прилагается в архиве с программой
TCMC - Так же в архиве находится утилита TCMC

Сообщение отредактировал LonerD 25 апреля 2017 - 04:38

Читайте: Справочные материалы по работе c TC + Онлайн справка TC

22 ноября 2011 - 13:03 / #1
Offline

371121

Пользователь

Posts: 33

Flasher
В скрипте 'Выделить папки с одинаковой иконкой' не написано с каким именем и с каким расширением его сохранять
С расширением vbs. Забываю, что не все тут на форуме wincmd.ru бывают. Базовое имя файла скрипта никогда и нигде роли не играло.

Всё сделал как написано,начинаю пробовать использовать получается вот это -

За скрипт Переместить выделенные mp3 в папки "...\ - \\" огромное спасибо - всё получилось
Сообщение отредактировал 371121 20 февраля 2012 - 09:38

20 февраля 2012 - 09:11 / #111
Offline

Flasher

Пользователь

Posts: 95

Цитата: 371121
начинаю пробовать использовать получается вот это
Просьба привести содержимое файла "папка под курсором\Desktop.ini".

Цитата: 371121
всё получилось
Ок. Я, кстати, немного не так название написал. Поправил.
Сообщение отредактировал Flasher 20 февраля 2012 - 10:17

20 февраля 2012 - 10:13 / #112
Offline

371121

Пользователь

Posts: 33

Flasher

Просьба привести содержимое файла "папка под курсором\Desktop.ini".

[.ShellClassInfo]
IconFile=FolderMarker.ico
IconIndex=0

20 февраля 2012 - 12:07 / #113
Offline

Flasher

Пользователь

Posts: 95

Ясно. Упростил подход (ссылка).
Сообщение отредактировал Flasher 21 февраля 2012 - 00:51

20 февраля 2012 - 12:31 / #114
Offline

371121

Пользователь

Posts: 33

Flasher

Ясно. Упростил подход (ссылка).

Создал кнопку ,запустил скрипт - выделяет все папки изменённые Folder Marker,а возможно , чтобы выделялись по-отдельности красные зелёные и т.д ?

Ещё бы вот такой скрипт- Переименование выделенных mp3-файлов (артист - название композиции)
Выделить mp3 по исполнителю
Выделить mp3 по альбому
Оромное спасибо за Ваш труд
Сообщение отредактировал 371121 21 февраля 2012 - 13:40

21 февраля 2012 - 11:41 / #115
Offline

Flasher

Пользователь

Posts: 95

Цитата: 371121
а возможно , чтобы выделялись по-отдельности красные зелёные и т.д ?
Секундочку, но именно так и должно выделяться. Я у себя проверял, всё работает.

По переименованию: выделяются файлы, открывается ИГП (Ctrl+M), там нажимается кнопка "Плагин", из списка выбирается любой плагин, выводящий теги (у меня их 10, тут не знаю; decid3wdx, например, должен быть) и выбирается сперва один тег, потом ставится тире с пробелами, потом выбирается второй тег (пример маски: [=decid3wdx.Исполнитель] - [=decid3wdx.Название]), после удовлетворительной оценки содержимого колонки "Новое имя" можно создать шаблон, нажав F2 и т.п., далее жмётся кн. "Выполнить". После этого можно создать кнопку с командой MULTIRENAME *имя шаблона* для быстрого вызова.

По артисту/альбому: что мешает отсортировать по соотв. колонкам соотв. набора (Shift+F1) для аудио/музыки и выделить нужное самостоятельно в один прихват?
Сообщение отредактировал Flasher 21 февраля 2012 - 14:53

21 февраля 2012 - 14:10 / #116
Offline

371121

Пользователь

Posts: 33

Flasher
По переименованию: выделяются файлы, открывается ИГП (Ctrl+M), там нажимается кнопка "Плагин", из списка выбирается любой плагин, выводящий теги (у меня их 10, тут не знаю; decid3wdx, например, должен быть) и выбирается сперва один тег, потом ставится тире с пробелами, потом выбирается второй тег (пример маски: [=decid3wdx.Исполнитель] - [=decid3wdx.Название]), после удовлетворительной оценки содержимого колонки "Новое имя" можно создать шаблон, нажав F2 и т.п., далее жмётся кн. "Выполнить". После этого можно создать кнопку с командой MULTIRENAME *имя шаблона* для быстрого вызова

Спасибо,здесь всё ясно

По артисту/альбому: что мешает отсортировать по соотв. колонкам соотв. набора (Shift+F1) для аудио/музыки и выделить нужное самостоятельно в один прихват?
Здесь тоже понятно,но не удобно-лучше одной кнопкой

Секундочку, но именно так и должно выделяться. Я у себя проверял, всё работает.

Всё разобрался, скрипт работает когда в программе Folder Marker не стоит галка на 'Делать папки переносимыми по-умолчанию',а возможно сделать скрипт,чтобы работал когда отмечен этот пункт?

21 февраля 2012 - 20:26 / #117
Offline

Flasher

Пользователь

Posts: 95

Цитата: 371121
но не удобно-лучше одной кнопкой
Ок. Сделал.
Выделить mp3 по тегу
'================================================================================
' Назначение: Выделить mp3-файлы в активной папке по тегу файла под курсором
' Параметры:  %N "%P" <тип тега>
' Тип тега принимает следующие значения:
'  13 - Исполнители
'  14 - Альбом
'  15 - Год
'  16 - Жанр
'  17 - Дирижер
'  20 - Авторы
'=================================================================================
With WScript.Arguments
  If .Count < 3 Then MsgBox "Укажите все требуемые параметры!", 48,_
  Space(16) & "Выделение файлов по тегам" : WScript.Quit
  Name = .Item(0) : P = .Item(1) : N = .Item(2)
End With : FP = P & Name
With CreateObject("Scripting.FileSystemObject")
  If Not .FileExists(FP) Then WScript.Quit
  If StrComp(.GetExtensionName(FP), "mp3", 1) <> 0 Then WScript.Quit
  Set Fd = CreateObject("Shell.Application").NameSpace(P)
  FTag   = Fd.GetDetailsOf(Fd.ParseName(Name), N) : If FTag = "" Then WScript.Quit
  For Each F in .GetFolder(P).Files
    If StrComp(.GetExtensionName(F), "mp3", 1) = 0 Then
  If Fd.GetDetailsOf(Fd.ParseName(F.Name), N) = FTag Then Sel = F & vbNewLine & Sel
    End If
  Next
End With
R = "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\1407"
With CreateObject("WScript.Shell")
  A = .RegRead(R) : If A > 0 Then .RegWrite R, 0, "REG_DWORD"
End With
With CreateObject("InternetExplorer.Application")
  .Navigate("about:blank")
  T = .Document.ParentWindow.ClipboardData.GetData("text")
  .Document.ParentWindow.ClipboardData.SetData "text", Sel
  CreateObject("WScript.Shell").Exec"%COMMANDER_PATH%\Utilities\TotalCom\TCMC\TCMC.exe CM2033"
  Wscript.Sleep(50) : .Document.ParentWindow.ClipboardData.SetData "text", T : .Quit
End With : If A > 0 Then CreateObject("WScript.Shell").RegWrite R, A, "REG_DWORD"

Цитата: 371121
а возможно сделать скрипт,чтобы работал когда отмечен этот пункт?
Хм. Как он называется? Что-то не могу найти. На всякий прошу прислать мне содержимое файла Desktop.ini в обоих режимах.
Сообщение отредактировал Flasher 23 февраля 2012 - 18:41

22 февраля 2012 - 13:45 / #118
Offline

371121

Пользователь

Posts: 33

Flasher
Как он называется? Что-то не могу найти. На всякий прошу прислать мне содержимое файла Desktop.ini в обоих режимах

Выделить mp3 по тегу -Появляется окошко -

наверное неправильно ввёл параметры,если можно на примере,допустим с 13 значением параметра,чтоб тупо скопировать мышкой

Спасибо

22 февраля 2012 - 14:53 / #119
Offline

Flasher

Пользователь

Posts: 95

371121,
Просьба больше скриншоты не делать. Копипастом и проще и наглядней. Советую научиться пользоваться BB-кодами на форуме.
И я просил для одной папки сделать, а не разных. Насчёт программы понял, эта функция есть только в Pro, а у меня - Free.

Касаемо скрипта выделения по тегам:
Параметры указаны во второй строке шапки скрипта. Их три (пример: %N "%P" 13).
Житейский совет: не нужно всегда ждать, что за тебя придут и сделают даже самое элементарное, нужно посмотреть внимательно на прилагаемую информацию и реализовать, иначе прогресса никакого не будет.

В скрипте кое-что поправил.
Сообщение отредактировал Flasher 23 февраля 2012 - 18:43

22 февраля 2012 - 15:48 / #120