Описание команды


exect

Выполняет выражения функций Autoit.

exect=String1||...||StringN

Параметры:

String1||...||StringNСтрока выражения. String - строка, представляющая собой выражение в стиле Autoit, которое необходимо выполнить.

Примечания:

AutoIt является мощным скриптовым языком, при своём малом размере включает большую базу различных функций. При компиляции утилиты в неё входит основной движок Autoit. Команда exect позволяет вызывать функции Autoit на прямую, создавать переменные с данными и передавать их другим командам.

1. Функции.
  • В справку TCIMG.chm входят не все функции Autoit, только основные: для обработки строковых, математических действий и получения различной информации... Возможно (по мере необходимости) будут протестированы и добавлены другие.
  • Для ознакомления работы всех функций вы можете скачать справочный файл Autoit3.chm (русская версия для v3.3.8.1) или актуальную английскую версию Autoit.chm
  • Если у Вас появятся примеры вызова других функций через команду exect, высылайте, добавлю в справку...
  • Не все функции могут быть запущены через команду exect. Не поддерживаются циклы...

2. Макросы.
  • В команде exect можно использовать макросы Autoit
 Пример записи:

exect=@ProgramFilesDir GLOBALEXECT<a>

3. Переменные.
  • В команде exect можно создавать глобальные переменные.
  • Команда exect при запуске объявляет глобальные переменные для всех команд, в которых они используются (см. Дополнение №23)
 Описание и примеры
 • Переменная - это просто место для хранения данных в памяти, откуда они могут быть быстро получены. Думайте об этом, как о почтовом ящике, куда можно положить данные или забрать их. К примеру, вы можете создать переменную, хранящую в себе ответ пользователя на вопрос или результат математического выражения.

• Каждая переменная в команде exect имеет имя (снова схожесть с почтовым ящиком), которое начинается с префикса $var_ и может содержать цифры и символы латинского алфавита в нижнем регистре. Вот несколько примеров: $var_array, $var_number, $var_string1

• Все переменные в команде exect являются глобальными.

• Переменные сохраняются и сохраняют свои данные до завершения работы утилиты.

a) Присвоение данных переменным.
 Для того чтобы переменной присвоить данные необходимо в команде exect прописать имя переменной, знак равно и данные (или функцию, которая возвращает данные переменной)
Примеры:

exect=$var_i=1 ;; переменной $var_i присвоено значение 1
exect=$var_n=Sqrt(2) ;; переменной $var_n возвращается значение от результата вычисления функции Sqrt
exect=$var_a=StringSplit('1a|2a|3a','|',1) ;; переменной $var_а возвращается массив, созданный функцией StringSplit
exect=$var_s='привет~~мир!' ;; переменной $var_s присвоена строка


б.1) Изменение данных в переменных.
 Данные и тип переменной могут быть изменены только в команде exect. Переменные могут передавать данные друг другу.
Примеры:

exect=$var_i=1 ... exect=$var_i='привет~~мир!'
;; переменной $var_i присвоено значение 1,
;; далее $var_i была присвоена строка, и тип данный изменился с числового на строковый


exect=$var_i1=1 ... exect=$var_i2=$var_i1
;; переменной $var_i1 присвоено значение 1,
;; далее переменной $var_i2 присвоено значение переменной $var_i1

Так же поддерживается обмен данными между массивами и другими переменными.
Примеры:

exect=$var_a=StringSplit('1a|2a|3a','|',1) ... exect=$var_a='привет~~мир!'
;; переменной $var_а возвращается массив, созданный функцией StringSplit,
;; далее переменной $var_а присвоена строка и тип данный изменился с массива на строковый


exect=$var_a1=StringSplit('1a|2a|3a','|',1) ... exect=$var_a2=$var_a1
;; переменной $var_а1 возвращается массив, созданный функцией StringSplit,
;; далее переменной $var_а2 присвоен массив переменой $var_а1


exect=$var_a1=StringSplit('1a|2a|3a','|',1) ... exect=$var_a2=StringSplit('5b|6b|7b','|',1) ... exect=$var_s1=$var_a1[2] ... exect=$var_a1[1]=$var_a2[3]
;; переменные $var_а1 и $var_а2 являются массивами, переменной $var_s1 присваиваются данные из 2-й ячейки массива $var_a1
;; далее 1-й ячейке массива $var_а1 присваиваются данные 3-й ячейки массива $var_a2

б.2) Присвоение данных к существующим переменным.
 • Для сокращения длины командной строки при изменении уже существующих переменных можно воспользоваться операторами:

Оператор
Пример
Описание
+=
 $var_x+=xxx  Прибавляет к переменной $var_x заданные данные xxx
 Тоже самое, что $var_x=$var_x+xxx
-=
 $var_x-=xxx  Вычитает из переменной $var_x заданные данные xxx
 Тоже самое, что $var_x=$var_x-xxx
*=
 $var_x*=xxx  Умножает переменную $var_x на заданные данные xxx
 Тоже самое, что $var_x=$var_x*xxx
/=
 $var_x/=xxx  Делит переменную $var_x на заданные данные xxx
 Тоже самое, что $var_x=$var_x/xxx
&=
 $var_x&='xxx'  Присваивает в конец переменной $var_x заданные данные xxx
 Тоже самое, что $var_x=$var_x&'xxx'
@=
 $var_x@='xxx'  Присваивает в начало переменной $var_x заданные данные xxx
 Тоже самое, что $var_x='xxx'&$var_x

Примеры:

exect=$var_n=5||$var_n+=10||_ViewValues($var_n)
;; пример присвоения к существующей переменной

exect=$var_n=5||$var_n-=10||_ViewValues($var_n)
;; пример отнимания от существующей переменной

exect=$var_n=5||$var_n*=10||_ViewValues($var_n)
;; пример умножения существующей переменной

exect=$var_n=5||$var_n/=10||_ViewValues($var_n)
;; пример деления существующей переменной

exect=$var_s='play'||$var_s&='boy'||_ViewValues('$var_s')
;; пример присвоения строки к существующей переменной

exect=$var_a=StringSplit('1|2|3|4|5|6|7|8|9','|',1)||_ViewValues($var_a)||$var_a[2]+=500||_ViewValues($var_a)||$var_a[3]-=10||_ViewValues($var_a)||$var_a[4]*=15||_ViewValues($var_a)||$var_a[5]/=2||_ViewValues($var_a)||$var_a[6]&=100||_ViewValues($var_a)
;; пример присвоения данных к ячейке существующего 1D массива

exect=$var_aa=_ArrayCreate('5x2')||_ViewValues($var_aa)||$var_aa[1][0]=100||_ViewValues($var_aa)||$var_aa[1][0]+=500||_ViewValues($var_aa)||$var_aa[1][0]*=2||_ViewValues($var_aa)||$var_aa[1][0]/=5||_ViewValues($var_aa)||$var_aa[1][0]&='exit'||_ViewValues($var_aa)
;; пример присвоения данных к ячейке существующего 2D массива



в) Объединение, вычисление данных в переменных.
 Между переменными поддерживаются математические и строковые операции с помощью математических операторов, операторов присвоения и функций Autoit
• Строковый тип переменных необходимо заключать в одинарные кавычки.
• Числовой тип переменных не обязательно заключать в кавычки.
• Объединение, вычисление, присвоение данных переменным могут производится только в команде exect.
Примеры:

;; рассмотрим несколько вариантов из данных переменной первой строки:
exect=$var_i1=20 ... exect=$var_i2=5 ... exect=$var_s1='AAA'

exect=$var_i3=$var_i1+$var_i2 или exect=$var_i3='$var_i1'+'$var_i2' ;; результат $var_i3=25 - пример сложения числовых данных
exect=$var_i3=$var_i1*$var_i2 или exect=$var_i3='$var_i1'*'$var_i2' ;; результат $var_i3=100 - пример умножения числовых данных
exect=$var_i3=$var_i1/$var_i2 или exect=$var_i3='$var_i1'/'$var_i2' ;; результат $var_i3=4 - пример деления числовых данных
exect=$var_i3=$var_i1-$var_i2 или exect=$var_i3='$var_i1'-'$var_i2' ;; результат $var_i3=15 - пример вычитания числовых данных
exect=$var_i3=$var_i1^$var_i2 или exect=$var_i3='$var_i1'^'$var_i2' ;; результат $var_i3=3200000 - пример возведения в степень числовых данных

exect=$var_i3=$var_i1&$var_i2 или exect=$var_i3='$var_i1'&'$var_i2' ;; результат $var_i3=205 - пример объединения данных

exect=$var_i3=$var_i1+$var_s1 ;; результат $var_i3 пустая переменная, т.к. строковая переменная $var_s1 не заключена в одинарные кавычки
exect=$var_i3='$var_i1'+'$var_s1' ;; результат $var_i3=20, т.к. переменная $var_i1 числовой тип, а $var_s1 строковая
exect=$var_i3=$var_i1&$var_s1 ;; результат $var_i3 пустая переменная, т.к. строковая переменная $var_s1 не заключена в одинарные кавычки
exect=$var_i3='$var_i1'&'$var_s1' ;; результат $var_i3=20AAA

• Так же вы можете использовать скобки для более сложных математических выражений.
   exect=($var_n1+$var_n2)*$var_n3-$var_n4^2+($var_n1/2)*$var_n5

• В математических выражениях НЕ должно быть оператора присвоения (объединения) &
• Подобные примеры можно привести и для массивов, в которых участвуют ячейки массива $var_array[1], $var_array[2], ... $var_array[N]
• Т.к. массивы могут содержать разные типы данных, то не надо забывать заключать переменные в одинарные кавычки: '$var_array[1]'

г) Объединение, вычисление данных переменных в функциях.
 • Переменные могут передаваться в функции Autoit.
• Строковый тип переменных необходимо заключать в одинарные кавычки.
• Результаты строковых функций могут быть объедены оператором присвоения &
• Результаты числовых функций могут быть вычисляться в одном вызове с помощью математических операторов + - ^ \ *
• Функции могут быть вложены друг в друга.
Примеры:

exect=$var_s1='строка' ... exect=$var_s2=StringLeft('$var_s1',3) ;; передача значений переменной в функцию

exect=$var_s1='строка' ... exect=$var_s2=StringLeft('$var_s1',1)&StringRight('$var_s1',1) ;; объединение результатов функций &

exect=$var_i1=10||$var_i2=20 ... exect=Round(Exp($var_i1)+Sqrt($var_i2))
;; передача числовых переменных $var_i1 и $var_i2 функциям
;; вычисление результатов функций Exp() , Sqrt()
;; объединение числовых результатов Exp()+Sqrt()
;; передача результата функции Round()


д) Присвоение (вычисление) при условии...
 • В команде exect поддерживается тернарное условие присвоения при вычислении результатов.
• Примеры и описание смотрите в приложении

е) Передача данных переменных другим командам.
 • В любом месте командной строки переменные $var_... будут заменены на соответствующие значения переменных.
• При передаче переменных другим командам не надо заключать их в кавычки.
Примеры:

exect=$var_i=1 ... bufsr=##$var_i ;; переменная $var_i передана команде bufsr

exect=$var_stroka='привет~~мир!' ... bufsr=##$var_stroka ;; переменная $var_stroka передана команде bufsr

exect=$var_aa=StringSplit('1a|2a|3a|4a|5a|6a|7a|8a|9a','|',1) bufsr=##$var_aa[1]~~$var_aa[5]
;; ячейки массива так же могут быть переданы в командную строку

... copys=$var_array||%t
;; если переменная $var_array является массивом (в ячейках которых находятся пути объектов),
;; то без создания временного файла можно направить массив в команду copys (и подобные)
;; все команды работающие со списками могут принимать переменные (массивы)

;; Передача массива командам находится в тестировании. Возможно в каких-то командах пока она не сработает.

• Так же поддерживается передача данных через именную глобальную переменную GLOBALEXECT<> (см. Дополнение №23)
• Все результаты присвоения переменным (вычисления) в GLOBALEXECT записываются последовательно.
• Результат без присвоения (если в команде нет знака равно =) записывается в 1-ю ячейку.
• Так же в GLOBALEXECT записываются массивы созданные (переданные) в exect.
• Минус её в том, что она после каждого вызова команды exect перезаписывается, а переменные $var_ нет (если конечно запланировано).


ж) Рекомендации.
  • Рекомендуется использовать имена переменных одной длины (чтобы не было "пересечения" имён)
    ($var_i1, $var_n1 или $var_sline, $var_array ...)
  • Переменные могут содержать различные типы данных.
  • Для удобства понимания команд рекомендуется использовать суффиксы в переменных $var_
 a(Array) Массив данных ($var_a...)
 b(Binary data) Двоичные данные ($var_b...)
 h(File or window handle) Дескриптор файла, окна и т.д. ($var_h...)
 i(Integer) Целое число ($var_i...)
 f(Boolean) Логический тип, может принимать значения True или False ($var_f...)
 n(Floating point number) Число с плавающей точкой ($var_n...)
 s(String) Строка ($var_s...)
 v(Variant) Неопределенный или изменяющийся тип данных, базовый тип для Autoit ($var_v...)
 t(Struct) Структура в стиле C/C++, для использования в DllCall, в сообщениях WM_*, при обработке данных и т.п. ($var_t...)
 p(Pointer) Указатель на структуру или на её элемент ($var_p...)
 o(Object) Объект ($var_o...)
 
з) Переменных различных типов данных.
   • Есть особенности передачи переменных различного типа данных через команду exect.
  • Заключаются они в том, что при передаче через командную строку невозможно точно определить какого типа переменная передает данные.
  • В большинстве случаев это не принципиально, т.к. в основном передаются строковые или числовые данные.
  • Для точной передачи или определения типа данных необходимо воспользоваться командой Eval('имя_переменной').
  • Имя переменной прописывается БЕЗ знака $.
Примеры:

exect=$var_aa=StringSplit('1|2|3|4','|',2)||$var_i=IsArray(Eval('var_aa'))||_ViewValues($var_i) ;; пример проверки является переменная массивом или нет

exect=$var_aa='Привет'||$var_i=IsArray(Eval('var_aa'))||_ViewValues($var_i) ;; пример проверки является переменная массивом или нет



4. Синтаксис вызова функций и создания переменных.
  • В команде exect не должно быть пробелов и кавычек.
 Описание и примеры
  • Строковые переменные и строки должны быть заключены в одинарные кавычки (апострофы 'стока').
  • Если в строке необходим какой-либо специальный символ (пробел, кавычки...), то:
     - воспользуйтесь функцией Chr(), выделив её из общей строки операторами присвоения.
     - пробелы можно заменить двойным символом тильды ~~
     - кавычки можно заменить двойным символом апострофа ''
 Примеры:

exect=Sqrt( 2 ) ; не правильный вызов функции, т.к. есть пробелы
exect=Sqrt(2) ; правильный вызов функции

exect=$var_k1='строка с пробелами и с "кавычками"' ; не правильное присвоение строки, т.к. есть пробелы и кавычки
exect=$var_k1='строка'&Chr(32)&'с'&Chr(32)&'пробелами'&Chr(32)&'и'&Chr(32)&'с'&Chr(32)&Chr(34)&'кавычками'&Chr(34) ; правильное присвоение

exect=StringUpper('текст~~с~~пробелами~~и~~'''кавычками''') GLOBALEXECT<a>
;; правильный вызов функции



5. Получение данных.
  • В команду exect можно передавать различную информацию.
 Описание и примеры
  • Передача информации происходит только путём присвоения информации заданной переменной.
  • Перед параметрами необходимо добавлять символы ##
  • Перед некоторыми параметрами добавляется третий символ @, $, # и др.

 
##Ввод данных. ##Input!!Output или ##Input??Mode (рекомендуется)
Input - получение данных в команду, возможны варианты:

  строка - к примеру пароль

  @строка - к примеру @c:\test.txt (путь передаётся в виде строки)

  ?путь - к примеру ?%WINDIR%\test.txt (путь переводится в абсолютный и передаётся в виде строки).

  >Params - строка параметров без приставки info см. Дополнение №10
  >tcg<Name> - получение шаблона, прописанного в tcg файлах. см. Дополнение №31

  ^List - список путей файлов из которых будут взяты данные, возможны варианты:
    ^FilePath1/FilePath2/.../FilePath3 - пути файлов, прописанных через разделитель /.
    ^%WL - список полных путей выделенных файлов. см. Дополнение №7.
    ^PathList - путь к файлу со списком путей файлов.
    ^[tc] - различные списки панелей ([tc=AL]) см. Дополнение №12.
    ^различные списки ^PS<>, ^FOLDC<> ... см. Дополнение №22.
    ^$GLOBALNAME - данные, переданные глобальными переменными. см. Дополнение №23.

  -1 - данные будут взяты из буфера обмена.

  -2, -3, -4 - данные будут взяты из активного документа AkelPad:
    -2 - получить выделенное, если ничего не выделено, то весь текст.
    -3 - получить выделенное, если ничего не выделено, то ничего.
    -4 - получить весь текст.

  File - данные будут взяты из одного файла. Варианты:
    FilePath - полный путь к файлу. c:\Text.txt
    %WL - список полных путей выделенных объектов. см. Дополнение №7
    %WF - список имён выделенных объектов.

  Из различных параметров:
    GLOBALNAME - данные, переданные глобальными переменными. см. Дополнение №23
    <xfolder> - информация переданная параметром см. Дополнение №11
    <info> - информация переданная параметром см. Дополнение №10
    [tc] - различные списки панелей Total Commander ([tc=TL]) см. Дополнение №12

  Из различных параметров списков: см. Дополнение № 22
    $INI<> - информация из INI файла.
    $LISTF<> - список заданных объектов.
    $PS<> - список объектов каталога.
    $FOLDC<> - список объектов содержимого каталогов.
    $FOLDM<> - список выделенных объектов и всех объектов в подпапках.
    $LISTC<> - список объектов из выделенных без дубликатов.
    $cliplist - список полных путей объектов из буфера обмена.

  Из различных параметров диалогов: см. Дополнение № 18
    [input] - диалог ввода информации в InputBox.
    [combo] - диалог выбора информации в ComboBox.
    [group] - диалог выбора информации в GroupBox.
    [edits] - диалог выбора информации в EditBox.
    [sopen] - выбор файла для открытия.
    и др.
  #URL\\Code - исходный код html указанной URL ссылки,
    #$GLOBALNAME\\Code - исходный код html всех URL ссылок, переданных в глобальном массиве.
      (для отображения процесса можно воспользоваться параметром progres<>)
      Code [необязательный] - кодировка получаемых данных:
        1 - ANSI 1251 (по умолчанию), 2 - UTF-16 LE 1200, 3 - UTF-16 BE 1201, 4 - UTF-8
    #URL\\8 - открытие страницы в скрытом браузере IE и получение информации.
      есть возможность получать содержимое из chm файлов (ссылки вида: mk:@MSITStore:Path.chm::URL\\8)
    #TITLE\\9 - получение html кода содержимого открытого окна Explorer, CHM, ... где TITLE - заголовок или хендл окна.
    #URL\\10 - получение информации интернета с помощью объекта MSXML2.XMLHTTP.

  `File - к примеру `c:\test.htm - получение текстовой информации, относительно типа файла. см. Дополнение №37



Output - режим вывода данных (записи данных в глобальный массив GLOBALEXECT):
 -1 - разбить построчно

  1 - по умолчанию
 

 Примеры:

exect=$var_array=##$LISTF<c:\test1.txt/c:\test2.txt/c:\test3.txt>!!-1 GLOBALEXECT<$var_array>
;; пример передачи заданного списка объектов, поместив их в массив $var_array

exect=$var_array=##$PS<"%p"!!1!!0!!*.ini|*.txt*>!!-1 GLOBALEXECT<$var_array>
;; пример передачи путей файлов ini и txt в активной панели, поместив их в массив $var_array

exect=$var_array=##$FOLDC<%L!!0!!2>!!-1 GLOBALEXECT<$var_array>
;; пример передачи путей папок 1-го уровня выделенных каталогов, поместив их в массив $var_array

exect=$var_stroka=##[input=BOX1] GLOBALEXECT<a>
;; пример передачи введённых данных в диалоге input в переменную $var_stroka

exect=$var_array=##$INI<1!!%%COMMANDER_PATH%%\WinCmd.ini>!!-1 GLOBALEXECT<$var_array>
;; пример передачи всех имён секций (со скобками) файла WinCmd.ini построчно, поместив в массив $var_array

exect=$var_array=##%L!!-1 GLOBALEXECT<$var_array>
;; пример передачи списка выделенных объектов, поместив их в массив $var_array

exect=$var_array=##-1!!-1 GLOBALEXECT<$var_array>
;; пример передачи содержимого буфера обмена, построчно, поместив в массив $var_array

exect=$var_stroka=##@c:\Test\1.txt GLOBALEXECT<a>
;; пример передачи пути в переменную $var_stroka


  • Поддерживается многократное присвоение и использование параметров в одном запуске exect.
 Пример записи:

exect=$var_a1=##$PS<...>||$var_a2=##$PS<...>||$var_a3=##$PS<...> ...

 

6. Использование вспомогательных функций (UDF).
  • В команде exect могут быть задействованы вспомогательные функции.
  • UDF функции (User Defined Functions) - функции написанные пользователями Autoit для облегчения работы в скриптах.
  • Часть полезных функций будут вносится в справку по мере необходимости. (к примеру функции для работы с массивами)
  • Можно использовать только те, которые находятся в справке TCIMG.chm

7. Запись содержимого переменных в файл.
  • Для записи содержимого переменных $var_... в файл, можно воспользоваться командой asave

См. также:

Примеры:
 Как создать кнопку?

%Zexect=$var_i=##$INI<8//%%COMMANDER_INI%%//Configuration//CopyComments> tcimg=$cm516 buttn=TDLGCONFIGALL||+tcTCSBO22|$w|$h||+tcTCSBO27||+tcTCSBO24 exect=$var_s=$var_i=2?'desc_red'&'.ico!!desc_gren'&'.ico':'desc_gren'&'.ico!!desc_red'&'.ico' textt=%%COMMANDER_PATH%%\BAR\000_TCIMG_Test.bar||$var_s||backup<0> barupd ;; Переключение настройки копирования Descript.ion с изменением значка кнопки активной панели (значки desc_gren.ico и desc_red.ico необходимо положить в корень TC)

<FOR> 1 <TO> 5 exect=$var_sc=Mod(:INDEX:)=0?'blue-red':'red-blue'||_ViewValues('$var_sc') <NEXT> ;; пример получения разных значений переменной $var_sc при чётном/нечётном счётчике в цикле

<FOR> 1 <TO> 5 infbx=InfoBox_TEST1 exect=$var_n=0 $FORCONT=$var_n=1?0:1 infbx=InfoBox_TEST2 <NEXT> ;; пример использования тега $FORCONT в цикле

<FOR> 1 <TO> 9999999 exect=$var_i=@MIN=60?_CmdCm('$FOREXIT=1'):0 cends=<info=s30> await=0 aends=x||##rndm<3|10> creat=$f254||buf-GLOBALAENDS<1>.txt||content<$GLOBALAENDS[1]>||code<4>||owrite<1> bends=<info=o30$f254\buf-GLOBALAENDS<1>.txt> GLOBALCENDS<a> GLOBALBENDS<a> dends=<info=n49|GLOBALBENDS<1>-GLOBALCENDS<1>> GLOBALDENDS<a> exect=$var_trig=GLOBALDENDS<1>>=300?_CmdCm('infbx=InfoBox_TEST1'):0 delsm=$f254\buf-GLOBALAENDS<1>.txt||1 <NEXT> tempxx ;; запустить отслеживание времени для последнего доступа к буферу (на определенное время в минутах, максимально 60 минут) и если оно больше 5 минут, вывести уведомление

<HOTKEY=10> iniwr=%%TCIMG_PATH%%\TCIMGU.ini||Navigation||Path||"%P" <HOTKEY=X> exect=$var_path=##$INI<8//%%TCIMG_PATH%%\TCIMGU.ini//Navigation//Path> patha=$var_path ;; по зажатой клавише SHIFT запомнить путь активной панели; Простое нажатие - переход по запомненному пути

<IF> <info=f1%P%N//> = <info=f1%T%M//> <THEN> exect=MsgBox(64+4096,'Результат','Контрольные~~суммы~~совпадают.') <ELSE> exect=MsgBox(48+4096,'Результат','Контрольные~~суммы~~не~~совпадают.') <ENDIF> ;; сравнить контрольные суммы MD5 двух файлов в разных панелях, в сплывающем окне с ручным закрытием, сообщить результат (щелчок сначала по одному файлу, переход в другую панель к проверяемому файлу)

<IF> <info=o9"%pfiles1.f-l"> = 2 AND <info=o9"%pinfo.f-l"> = 0 <THEN> renmm="%p"journal.txt.bak||**0!! exect=$var_n=MsgBox(4+32+262144,'Сообщение','удалить~~файлы~~LOG.txt~~и~~LOG.old?')||$var_i=$var_n=7?_Exit():1 delss=LISTF<"%p"LOG.txt/"%p"LOG.old>||1||upd<1> <ENDIF> ;; если в активной панели есть файл files1.f-l и нет файла info.f-l, то переименовать файл journal.txt.bak в journal.txt и удалить (с подтверждением) файлы LOG.txt и LOG.old

<IF> <info=o9"%pfiles1.f-l"> = 2 AND <info=o9"%pinfo.f-l"> = 0 <THEN> renmm="%p"journal.txt.bak||**0!! exect=$var_n=MsgBox(4+32+262144,'Сообщение','удалить~~файлы~~LOG.txt~~и~~LOG.old?')||$var_i=$var_n=7?_Exit():1 delss=LISTF<"%p"LOG.txt/"%p"LOG.old>||1||upd<1> <ENDIF> ;; если в активной панели есть файл files1.f-l и нет файла info.f-l, то переименовать файл journal.txt.bak в journal.txt и удалить(с подтверждением) файлы LOG.txt и LOG.old

<PRESW=12> exect=$var_i+=1||ToolTip('Нажатие~~ALT~~'&$var_i,5,5) <PRESW=1B> infbx=||ESC~~ВЫХОД||3||170||60 :EXIT: <PRESWEND> ;; пример работы команды <PRESW> - количество нажатий в подсказке

<PRESW=12> exect=$var_i+=1||ToolTip('Нажатие~~ALT~~'&$var_i,5,5)+Sleep(99) <PRESW=1B> infbx=||ESC~~ВЫХОД||3||170||60 :EXIT: <PRESWEND> ;; пример работы команды <PRESW> - количество нажатий в подсказке с заданной задержкой между нажатиями

<PRESW=13> keybd=0~~^c exect=$var_s=StringRegExp(StringLeft(ClipGet(),1),'[а-яё]')?_CmdCm('bufsr=@@QWERTYinENG'):_CmdCm('bufsr=@@QWERTYinRUS') keybd=0~~+{INSERT} <PRESW=1B> :EXIT: <PRESWEND> ;; при нажатии на клавиши "Pause" проверяет буфер обмена: если первая буква русская, то переводит всё содержимое буфера обмена в клавиатурные английские буквы, если нет, то наоборот, затем вставляет текст в активный окно программы

<TRAY=~~CTRL+Q||1||TCIMG.dll,112> <PRESS=11,51> exect=MouseClick('right')||Sleep(300)||Send('SS{ENTER~~2}') <PRESS=1B> :EXIT: ;; по нажатию CTRL+Q в активном окне нажать ПКМ + 2 раза клавишу "S" + 2 раза "ENTER" (применяется для вызова настроенного контекстного меню FireFox для быстрого сохранения изображений)

<TRAY=~~CTRL+ЛКМ~~-~~Запись~~пикселя~~под~~курсором~~в~~файл@CRLF~~ESC~~-~~выход||1||TCIMG.dll,85> <PRESS=11,1> exect=$var_pos=MouseGetPos()||$var_hex=Hex(PixelGetColor($var_pos[0],$var_pos[1],0),6) bufsr=##<info=c12|2|$var_hex>||save<C:\Color.txt|2> <PRESS=1B> :EXIT: ;; При CTRL+ЛКМ (клик левой кнопки мыши) идёт дозапись RGB Value цвета под курсором в заданный файл, при работе отображается иконка и подсказка в трее, выход по ESC или через значок в трее...

<TRAY=HINT2||1||%%TCIMG_PATH%%\TCIMG.dll,38> <TIME=h00n01:h23n59:n06> exect=TraySetState(1)||TrayTip('***********Скоро~~Разминка***********','До~~начала~~разминки~~осталось~~10~~секунд'&@CRLF&'<info=s100dddd~~MMMM~~yyyy~~H:mm:ss>',5,1)||Sleep(1000) infbx=InfoBox16 sndps=D:\TCSibirnik\Files\Sound\Warmup\start.mp3||1 blist=PS<D:\Досуг\Музыка//1//-1//*.mp3|*.wma|*.wav> uends=x||##rndm<22|$GLOBALBLIST> sndps=GLOBALUENDS<1>||0 infos=3||1||GLOBALUENDS<1>||1 infht=GLOBALINFOS<28>||Приятной~~Разминки||@$f250\Files\Htm\Trec_Timer2.htm||500||40||65||840||set<FF033E|FDEE00|1,,,30,,,1>||style<2|1> sndps=D:\TCSibirnik\Files\Sound\Warmup\finish.mp3||1 ;; Вывод сообщения "Пора на разминку", проигрыш звукового файла, проигрывание случайного трека в бегущей строке, проигрыш звукового файла, закрытие и повтор цикла через 30 минут

aends=-1??-1 rends=$GLOBALAENDS??-1||?F54,com1||?T|c,2!!fun_l2 exect=$var_i=##-1 exect=$var_i=##<info=t1-1>||$var_s=$var_i=4?_CmdCm('rends=-1??-1¦¦?T|v,1,4¦¦?F63¦¦?E|1:-1'):($var_i>4?_CmdCm('rends=-1??-1¦¦?T|v,3,5'):0) vends=TOTALCMD#BAR#DATA@CRLF"%%COMMANDER_PATH%%\TCIMG.exe"@CRLFGLOBALRENDS<x1>@CRLFGLOBALAENDS<x4>@CRLFGLOBALRENDS<x2>??-2 kends=$GLOBALVENDS??-1||?T|a=0,5!!Новая~~кнопка|a=0,4!!shell32.dll,159 sends=<info=x50>??-1||&?(?mi)cmd\d+=(.+\.bar)$ GLOBALSENDS<b> barbt=1||-1||GLOBALARRAY<1>||butfrom<GLOBALKENDS<t>> ;; добавить кнопку с параметрами TCIMG (информация из буфера обмена) в конец выбранного BAR файла, который находится на активной панели инструментов

aends=-1??-1 rends=$GLOBALAENDS??-1||?F54,com1||?T|c,2!!fun_l2 exect=$var_i=##-1 exect=$var_i=##<info=t1-1>||$var_s=$var_i=4?_CmdCm('rends=-1??-1¦¦?T|v,1,4¦¦?F63¦¦?E|1:-1'):($var_i>4?_CmdCm('rends=-1??-1¦¦?T|v,3,5'):0) vends=TOTALCMD#BAR#DATA@CRLF"%%COMMANDER_PATH%%\TCIMG.exe"@CRLFGLOBALRENDS<x1>@CRLFGLOBALAENDS<x4>@CRLFGLOBALRENDS<x2>??-2 kends=$GLOBALVENDS??-1||?T|a=0,5!!Новая~~кнопка|a=0,4!!shell32.dll,159 sends=PS<$f300\Bar//1//0//*.bar>??-1 GLOBALSENDS<b> barbt=1||-1||GLOBALARRAY<1>||butfrom<GLOBALKENDS<t>> ;; добавить кнопку с параметрами TCIMG (информация из буфера обмена) в конец выбранного *.bar из списка BAR файлов находящихся в папке TC\Bar\

aends=-1??-1||&&([^=]+)(=)(.+)!!$1@CRLF$3 exect=$var_stroka=##GLOBALAENDS<1> GLOBALAENDS<c2> iniwr=$f257||Russian||$var_stroka||ClipGet() ;; добавить в TCIMGU.lng в секцию [Russian] содержимое буфера (ключ=значение)

alist=%WL slist=PS<"%T"//1//0>||##path<6>||&&^0*(\d*)(.*)$!!$1||formt<11> exect=$var_i=GLOBALSLIST<1>+1 xends=~~-~~ copys=$GLOBALALIST||"%t"//0||##cntr<$var_i|1|1> blist=$GLOBALCOPYS||##path<6> $GLOBALBLIST@$GLOBALALIST@GLOBALXENDS<1> sends=$GLOBALBLIST??1 asave=GLOBALSENDS||"%t"CopyLog.txt|2|@CRLF|2||upd<3> ;; копировать выделенные файлы в другую панель переименовав их в продолжение нумерации файлов другой панели и записать в файл CopyLog.txt имена новых файлов + откуда они были скопированы

alist=%WL slist=PS<$f200User//1//0>||##path<6>||&&[^\d]*!!||formt<11> exect=$var_i=GLOBALSLIST<1>+1 iends=<info=t60$GLOBALSLIST[-1]> moves=$GLOBALALIST||"%t"//0||##cntr<$var_i|1|GLOBALIENDS<1>> ;; переместить выделенные файлы в папку TCIMG\Files\User\ с именами крайнего цифрового фрагмента, от имён файлов в папке назначения, последовательно увеличенных на единицу

alist=@%P%N||&&\.bak$!!||**2!! listx=@GLOBALALIST<1>||2 <IF> <info=t61$GLOBALLISTX[1]> = 0 <THEN> copyy=%P%N||"%p"//1||&&\.bak$!!||**2!! <ELSE> exect=$var_n=MsgBox(4+32+262144,'Сообщение','Заменить~~существующий~~объект~~из~~*.bak?')||$var_i=$var_n=7?_Exit():1 copyy=%P%N||"%p"//1||&&\.bak$!!||**2!! <ENDIF> ;; восстановить объект из *.bak под курсором автоматически, если объект отсутствует, в случае наличия объекта выдать запрос на замену

alist=[tc=AF-1f]||<dellist=C:\files.txt|6> <IF> 0 <> <info=t61$GLOBALALIST[1]> <THEN> exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~файлы?')||$var_i=$var_n=7?_Exit():1 delss=$GLOBALALIST||1||recycle<1>||upd<1> <ELSE> infht=-1||Сообщение||Подобных~~файлов~~не~~найдено||230||60 <ENDIF> ;; удалить в корзину файлы активной панели по списку(имена с расширениями) C:\files.txt (требуется подтверждение удаления)

alist=[tc=AF-1f]||<dellist=C:\files.txt|6> <IF> 0 <> <info=t61$GLOBALALIST[1]> <THEN> exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~файлы?')||$var_i=$var_n=7?_Exit():1 delss=$GLOBALALIST||1||upd<1> <ELSE> infht=-1||Сообщение||Подобных~~файлов~~не~~найдено||230||60 <ENDIF> ;; удалить, минуя корзину, файлы в активной панели по списку(имена с расширениями) C:\files.txt (требуется подтверждение удаления)

alist=FOLDM<%WL//-1>||<dellist=$f212\Ffiles.txt|9> <IF> 0 <> <info=t61$GLOBALALIST[1]> <THEN> exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~файлы?')||$var_i=$var_n=7?_Exit():1 delss=$GLOBALALIST||1||upd<1> <ELSE> infht=-1||Сообщение||Подобных~~файлов~~не~~найдено||250||60 <ENDIF> ;; в выделенных папках с рекурсией удалить, минуя корзину, файлы в активной панели по списку Ffiles.txt (имена с расширениями) (требуется подтверждение удаления)

alist=PS<"%p"//1//-1//modin.db> exect=$var_i='GLOBALALIST<1>'=''''?_CmdCm('infbx=Сообщени妦Файл~~''modin.db''~~в~~открытой~~папке~~не~~найден¦¦3¦¦370¦¦50<¤>toexit'):1 slist=PS<"%p"//1//-1//modin.db>||##path<10> <FOR> 1 <TO> GLOBALSLIST<0> pathb=GLOBALSLIST<:INDEX:> <NEXT> ;; открыть в новых вкладках папки активной панели в которых есть файл modin.db, в случае отсутствия файла, выдать сообщение и выйти программы

alist=PS<"%p"//1//-1//modin.db> exect=$var_i='GLOBALALIST<1>'=''''?_CmdCm('infbx=Сообщени妦Файл~~''modin.db''~~в~~открытой~~папке~~не~~найден¦¦3¦¦370¦¦50<¤>toexit'):1 slist=PS<"%p"//1//-1//modin.db>||##path<10> <FOR> 1 <TO> GLOBALSLIST<0> pathu=GLOBALSLIST<:INDEX:> <NEXT> ;; открыть в новых вкладках неактивной панели папки активной панели в которых есть файл modin.db, в случае отсутствия файла, выдать сообщение и выйти программы

alist=PS<"%p"//2//0//date> exect=$var_i='GLOBALALIST<1>'=''''?_CmdCm('infbx=Сообщени妦Папка~~''date''~~в~~активной~~панели~~не~~найденদ3¦¦370¦¦50<¤>toexit'):1 slist=PS<"%p"//1//-1//modin.db>||##path<10> <FOR> 1 <TO> GLOBALSLIST<0> pathb=GLOBALSLIST<:INDEX:> <NEXT> ;; если в активной панели есть папка "date", то открыть в новых вкладках все папки активной панели в которых есть файл modin.db (3-х секундное сообщение, если папка "date" отсутствует)

bufsr=##<info=x5> exect=ToolTip(ClipGet(),800,500,'Информация',1,1)||Sleep(5000) ;; записать в буфер обмена количество файлов в активной панели и отобразить в информационном окне

close=ACTIVE exect=Run(_PathFull('%%COMMANDER_PATH%%\TOTALCMD.EXE'),'''',@SW_MAXIMIZE) ;; закрыть активное окно TC и запустить

dilog=[group=Rotate<#><#><#>Rotate90<<+>-rotate''~~''90<''<#>200<#>100] exect=$var_i='GLOBALGROUP1<1>'&'~~'''&'"%P%O_Rotate.%E"'||_ViewValues('$var_i') start=Magick||%P%N||$var_i ;; повернуть изображение под курсором, сохранив в той же панели с приставкой _Rotate с использовании Magick

dilog=[input=Относительный~~путь|Введите~~относительный~~путь] exect=MsgBox(0,'Абсолютный~~путь',_PathFull('GLOBALINPUT<1>')) ;; ввести относительный путь в диалоге, перевести в абсолютный и вывести в сообщении

dilog=[updwn=BOX1] sends=[tc=AF-1]??-1 bends=[tc=TF-1]??-1 cends=$GLOBALSENDS??-1||&?(?m)^(.{GLOBALUPDWN<1>})||?F1 dends=$GLOBALBENDS??-1||&?(?m)^(.{GLOBALUPDWN<1>})||?F1 eends=$GLOBALCENDS+$GLOBALDENDS||?F2 exect=$var_i='GLOBALEENDS<1>'?0:_Exit() count=$GLOBALSENDS||>>$GLOBALEENDS||0||countline<5> markn=2||GLOBALCOUNT<1> count=$GLOBALBENDS||>>$GLOBALEENDS||0||countline<5> markn=3||GLOBALCOUNT<1> ;; выделить в обеих панелях объекты, в начале имён которых совпадают первые N символов (число вводится в диалоге) (регистр символов не учитывается)

exect=$var_0=Assign('STRUCT_1',DllStructCreate('dword~~Size;hwnd~~hWndOwnder;handle~~hInstance;dword~~rgbResult;ptr~~CustColors;dword~~Flags;lparam~~lCustData;ptr~~lpfnHook;ptr~~lpTemplateName'),2)+Assign('STRUCT_2',DllStructCreate('dword[16]'),2)+DllStructSetData($STRUCT_1,'Size',DllStructGetSize($STRUCT_1))+DllStructSetData($STRUCT_1,'hWndOwnder',GUICreate(0,200,300,-1,-1))+DllStructSetData($STRUCT_1,'rgbResult','0xC5B248')+DllStructSetData($STRUCT_1,'CustColors',DllStructGetPtr($STRUCT_2))+DllStructSetData($STRUCT_1,'Flags',259)||$var_iyn=DllCall('comdlg32.dll','bool','ChooseColor','struct*',$STRUCT_1)[0]||$var_0=$var_iyn=0?_Exit():1||$var_num=DllStructGetData($STRUCT_1,'rgbResult')||$var_ibrg=Hex($var_num,6)||_ViewValues('$var_ibrg','BRG~~Color') ;; создание и запуск окна выбора цвета

exect=$var_0=Assign('STRUCT_1',DllStructCreate('wchar[256]'),2)+DllCall('Kernel32.dll','uint','GetTempFileNameW','wstr',@TempDir,'wstr','__','uint',0,'ptr',DllStructGetPtr($STRUCT_1))||$var_path=DllStructGetData($STRUCT_1,1)||_ViewValues('$var_path','temp_file') ;; получить временный файл

exect=$var_0=Assign('STRUCT_ICON',DllStructCreate('int'),2)+Assign('STRUCT_STRING',DllStructCreate('wchar[260]'),2)+DllStructSetData($STRUCT_STRING,1,@SystemDir&'\shell32.dll')||$var_iyn=DllCall('shell32.dll','int',62,'hwnd',GUICreate(0,400,400,-1,-1),'struct*',$STRUCT_STRING,'int',DllStructGetSize($STRUCT_STRING)/2,'struct*',$STRUCT_ICON)[0]||$var_0=$var_iyn=0?_Exit():1||$var_s=DllStructGetData($STRUCT_STRING,1)&','&DllStructGetData($STRUCT_ICON,1)||_ViewValues('$var_s','Путь~~и~~номер~~значка') ;; выбор значка в системном диалоге

exect=$var_0=Assign('STRUCT_N',DllStructCreate('struct;int~~var1;byte~~var2;uint~~var3;char~~var4[128];endstruct'),2)+DllStructSetData($STRUCT_N,1,-1)+DllStructSetData($STRUCT_N,'var2',255)+DllStructSetData($STRUCT_N,4,'Write-Data')||$var_s='Размер~~структуры:~~'&DllStructGetSize($STRUCT_N)&@CRLF&'Указатель~~структуры:~~'&DllStructGetPtr($STRUCT_N)&@CRLF&'Данные:'&@CRLF&DllStructGetData($STRUCT_N,1)&@CRLF&DllStructGetData($STRUCT_N,2)&@CRLF&DllStructGetData($STRUCT_N,3)&@CRLF&DllStructGetData($STRUCT_N,4)||_ViewValues('$var_s') ;; пример создания структуры, установки и получение данных

exect=$var_a=##@<info=o81D:\Test\!!Folder2\Name.au3//>??1||_ViewValues('$var_a') ;; получить путь без диска

exect=$var_a=_ArrayCreate('5x2')||_ViewValues($var_a)||$var_a[0][1]='data'||_ViewValues($var_a)||$var_a[1][0]=1000||_ViewValues($var_a)||_Swap($var_a[0][1],$var_a[1][0])||_ViewValues($var_a) ;; пример присвоения данных в двумерном массиве и обмен данными между ячейками

exect=$var_a=_InScript(0,'GetArrF','%P%N')||_ViewValues($var_a) ;; получить результат внешней vbs функции "GetArrF"

exect=$var_a=_InScript(0,'SpecFold')||_ViewValues($var_a) ;; получить результат внешней vbs функции "SpecFold"

exect=$var_a=_InScript(2,'_ProcessList')||_ViewValues($var_a) ;; получить результат внешней au3 функции "_ProcessList"

exect=$var_a=25||$var_b=5||$var_icheck=(Int($var_a/$var_b)<>$var_a/$var_b)?0:1||MsgBox(4096,'Сообщение','Делимость.~~Результат:~~'&$var_icheck) ;; определить делимость одного числа на другое (1 - делится, 0 - не делится)

exect=$var_a=5||$var_b=6||$var_imax=$var_a>$var_b?$var_a:$var_b||MsgBox(4096,'Сообщение','Максимальное~~число~~'&$var_imax) ;; определить максимальное число с помощью тернарного условия

exect=$var_a=5||$var_b=6||$var_imin=$var_a<$var_b?$var_a:$var_b||MsgBox(4096,'Сообщение','Минимальное~~число~~'&$var_imin) ;; определить минимальное число с помощью тернарного условия

exect=$var_a=DllCall('shell32.dll','int','PickIconDlg','hwnd',0,'wstr',@SystemDir&'\User32.dll','int',1000,'int*',0)||_ViewValues($var_a) ;; пример вызова системного диалога выбора значка из заданной библиотеки значков

exect=$var_a=DllCall('shell32.dll','int','PickIconDlg','hwnd',WinGetHandle('[ACTIVE]'),'wstr',@SystemDir&'\User32.dll','int',1000,'int*',0)||_ViewValues($var_a) ;; пример вызова системного диалога выбора значка из заданной библиотеки значков

exect=$var_a=DriveGetDrive('FIXED') anf2d=$var_a||1||##@@s151::|G;;$$~~GB GLOBALANF2D<a> ;; получить свободное место для разделов жесткого диска

exect=$var_a=IniReadSectionNames(EnvGet('COMMANDER_INI'))||_ViewValues($var_a) ;; считывает имена всех секций в Wincmd.ini

exect=$var_a=MouseGetPos() pause=5s exect=MouseMove($var_a[0],$var_a[1],0) ;; запомнить позицию курсора, через 5 секунд вернуть курсор в изначальное положение

exect=$var_a=MouseGetPos()||$var_s='---------------------------'&@CRLF&'%P%N'&@CRLF&'<info=o44%P%N//>'||ToolTip('$var_s',$var_a[0],$var_a[1],'Информация',1,1)||Sleep(5000) ;; создать всплывающую подсказку на 5 секунд в позиции курсора с информацией: Путь объекта под курсором и его даты создания

exect=$var_a=MouseGetPos()||_ViewValues($var_a) ;; получить массив координат курсора мыши

exect=$var_a=PixelSearch(0,0,20,300,0xFF0000)||IsArray($var_a)?_ViewValues($var_a):_ViewValues('цвет~~не~~найден') ;; получить массив координат пикселя красного цвета

exect=$var_a=StringRegExp(FileRead('%P%N'),'(?m)((?:[^\r\n]+(?:\r\n|$)+){5})',3)||_ViewValues($var_a) ;; разбить текстовый файл под курсором по 5 строк

exect=$var_a=StringRegExp(FileRead('%P%N'),'(?m)^([^\r\n]+)',3) funvb=ArrayFilter|$var_a|cliptext|0|0 GLOBALFUNVB1<a> ;; получить из файла под курсором строки, в которых нет фразы из буфера обмена (без учёта регистра)

exect=$var_a=StringRegExp(FileRead('%P%N'),'(?m)^([^\r\n]+)',3) funvb=ArrayFilter|$var_a|cliptext|0|1 GLOBALFUNVB1<a> ;; получить из файла под курсором строки, в которых нет фразы из буфера обмена (учитывая регистр)

exect=$var_a=StringRegExp(FileRead('%P%N'),'(?m)^([^\r\n]+)',3) funvb=ArrayFilter|$var_a|cliptext|1|0 GLOBALFUNVB1<a> ;; получить из файла под курсором строки, в которых есть фраза из буфера обмена (без учёта регистра)

exect=$var_a=StringRegExp(FileRead('%P%N'),'(?m)^([^\r\n]+)',3) funvb=ArrayFilter|$var_a|cliptext|1|1 GLOBALFUNVB1<a> ;; получить из файла под курсором строки, в которых есть фраза из буфера обмена (учитывая регистр)

exect=$var_a=StringRegExp(FileRead('%P%N'),'(?ms)@font-face(?:[\s]+)?\{[^\{]+\}',3)||_ViewValues($var_a) ;; разбить в массив файл css под курсором все фрагменты @font-face

exect=$var_a=StringRegExp(FileRead('%P%N'),'(?ms)@font-face(?:[\s]+)?\{[^\{]+\}',3)||_ViewValues($var_a)||$var_a=_ArrayUnique($var_a)||_ViewValues($var_a) ;; разбить в массив файл css под курсором все фрагменты @font-face и удалить дубликаты фрагментов

exect=$var_a=StringSplit('%%COMMANDER_PATH%%\Bar\000_TCIMG_Test.bar|%%COMMANDER_PATH%%\Bar\084_AU3.bar|%%COMMANDER_PATH%%\Bar\000_TCIMG_Test_Exe.bar','|')||$var_si=EnvGet('COMMANDER_PATH')&'\WinButtonBar.ini'||$var_sb=IniRead('$var_si','Buttonbar','Buttonbar',Null)||$var_i=Number(_ArraySearch($var_a,'$var_sb')+1)||$var_i=($var_i>3~~Or~~$var_i=0)?1:$var_i||IniWrite('$var_si','Buttonbar','Buttonbar','$var_a[$var_i]')||IniWrite('$var_si','Buttonbar','Buttonbar',Execute('$var_a[$var_i]')) ;; записать один из 3-х заданных путей .bar по кругу в WinButtonBar.ini в секцию [Buttonbar]

exect=$var_a=StringSplit('%P%N','\')||_ViewValues($var_a) ;; разбить путь файла под курсором по слешу

exect=$var_a=StringSplit('.txt|.jpg|.au3|.png|.chm','|',1)||_ViewValues($var_a,'Просмотр~~массива:ICON|e:') ;; просмотр массива (значки пунктов в таблице присваиваются относительно системной ассоциации типа файла)

exect=$var_a=StringSplit('1|2|3|4|5|6|7|8|9','|',1)||_ViewValues($var_a)||$var_a[2]+=500||_ViewValues($var_a)||$var_a[3]-=10||_ViewValues($var_a)||$var_a[4]*=15||_ViewValues($var_a)||$var_a[5]/=2||_ViewValues($var_a)||$var_a[6]&=100||_ViewValues($var_a) ;; пример присвоения данных к ячейке существующего 1D массива

exect=$var_a=StringSplit('1a|'&'|3a|4a|5a|6a|7a|8a|9a','|',2) GLOBALEXECT<a> exect=$var_name='GLOBALEXECT<2>'=''''?'*':'имя'||_ViewValues('$var_name') ;; пример проверки пустой ячейки

exect=$var_a=StringSplit('1a|2a|3a|4a|5a|6a|7a|8a|9a','|',1)||_ViewValues($var_a,'Просмотр~~массива:CHECKBOX:') ;; просмотр массива с возможностью выбора пунктов в чекбоксе

exect=$var_a=StringSplit('1a|2a|3a|4a|5a|6a|7a|8a|9a','|',1)||_ViewValues($var_a,'Просмотр~~массива:ICON|z|0|iA_2:') ;; просмотр массива с возможностью выбора пунктов в чекбоксе (в таблице настройки значков берутся из секции [InfoList] из ключа "iA_2")

exect=$var_a=StringSplit('1a|2a|3a|4a|5a|6a|7a|8a|9a','|',2) asave=var_a||"%p[info=s47].txt"|1||9,1||upd<1> ;; записать 1-ю и 9-ю ячейки массива var_a в файл, в активную панель именем системного времени + обновить активную панель

exect=$var_a=StringSplit('1a|2a|3a|4a|5a|6a|7a|8a|9a','|',2) asave=var_a||"%pList.txt"|1||1,9||upd<1> ;; записать 1-ю и 9-ю ячейки массива var_a в файл, в активную панель именем List.txt + обновить активную панель

exect=$var_a=StringSplit('1a|2a|3a|4a|5a|6a|7a|8a|9a','|',2) asave=var_a||"%pList.txt"|1||9,1||upd<1> ;; записать 1-ю и 9-ю ячейки массива var_a в файл, в активную панель именем List.txt + обновить активную панель

exect=$var_a=StringSplit('1a|2a|3a|4a|5a|6a|7a|8a|9a','|',2) asave=var_a||"%pList.txt"|1||upd<1> ;; записать все ячейки массива var_a в файл, в активную панель именем List.txt + обновить активную панель

exect=$var_a=StringSplit('1a|2a|3a|4a|5a|6a|7a|8a|9a','|',2) asave=var_a||"%pList.txt"|1||xline<^^---;;$$===>||upd<1> ;; записать все ячейки массива var_a в файл, в активную панель именем List.txt, в начало каждой строки добавить "---", в конец - "==="

exect=$var_a=StringSplit('1a|2a|3a|4a|5a|6a|7a|8a|9a','|',2) asave=var_a||"%pList.txt"|1||xline<^^enum[1|1|1]~~;;$$===>||upd<1> ;; записать все ячейки массива var_a в файл, в активную панель именем List.txt, в начало каждой строки добавить нумерацию, в конец - "==="

exect=$var_a=StringSplit('1a|2a|3a|4a|5a|6a|7a|8a|9a','|',2) asave=var_a||"%pList.txt"|2|@CRLF|1||upd<1> ;; записать (дописать в конец, если List.txt существует) все ячейки массива var_a в файл, в активную панель именем List.txt + обновить активную панель

exect=$var_a=StringSplit('1a|2a|3a|4a|5a|6a|7a|8a|9a','|',2) asave=var_a||"%pList.txt"|3|@CRLF|0||upd<1> ;; записать (дописать в начало, если List.txt существует) все ячейки массива var_a в файл, в активную панель именем List.txt + обновить активную панель

exect=$var_a=StringSplit('1a|2a|3a|4a|5a|6a|7a|8a|9a','|',2) asave=var_a||zebr<1|2|1>||"%pList.txt"|1||upd<1> ;; записать ячейки через одну массива var_a в файл, в активную панель именем List.txt + обновить активную панель

exect=$var_a=StringSplit(ClipGet(),@CR,2)||_ViewValues($var_a) ;; построчный просмотр буфера обмена в таблице

exect=$var_a=StringSplit(ClipGet(),Null,2)||$var_a=_ArrayUnique($var_a) asave=var_a||"%pListSym.txt"||upd<1>||all|| ;; записать в файл ListSym.txt в активную панель уникальные символы из содержимого буфера обмена

exect=$var_a=StringSplit(ClipGet(),Null,2)||$var_a=_ArrayUnique($var_a)||_ViewValues($var_a) ;; пример разбития содержимого буфера обмена посимвольно и удаления дубликатов

exect=$var_a=StringSplit(ClipGet(),Null,2)||_ViewValues($var_a) ;; пример разбития содержимого буфера обмена посимвольно

exect=$var_a=StringSplit('F|G|N|B|V|Y|F|A|Z','|',2) asave=var_a||"%pList.txt"|1||formt<1,3>||upd<1> GLOBALASAVE<a> ;; записать все ячейки массива var_a в файл, в активную панель именем List.txt, предварительно удалив дубликаты и отсортировав по возрастанию + обновить активную панель и получить путь созданного файла

exect=$var_a=StringSplit('F|G|N|B|V|Y|F|A|Z','|',2) asave=var_a||"%pList.txt"|1||formt<1,3>||upd<1> ;; записать все ячейки массива var_a в файл, в активную панель именем List.txt, предварительно удалив дубликаты и отсортировав по возрастанию + обновить активную панель

exect=$var_a=StringSplit(FileRead('%P%N'),'</p><p>',1)||_ViewValues($var_a) ;; разбить текстовый файл под курсором по фразе "</p><p>"

exect=$var_a=StringSplit(FileRead('%P%N'),Null,2)||$var_a=_ArrayUnique($var_a) asave=var_a||"%P%O_sym.%E"||upd<1>||all|| ;; записать в именной файл с приставкой _sym уникальные символы содержимого файла под курсором

exect=$var_a=StringSplit(StringReplace('??%%COMMANDER_PATH%%\TCIMG.exe?~~?openup??|??%%COMMANDER_PATH%%\Utilities\TotalCom\ChoiceEditor\ChoiceEditor.exe??','?',Chr(34)),'|')||$var_sc=EnvGet('COMMANDER_INI')||$var_sp=IniRead('$var_sc','Configuration','Editor',Null)||$var_is=StringInStr('$var_sp','TCIMG')?2:1||IniWrite('$var_sc','Configuration','Editor',$var_a[$var_is]) rstart ;; переключение программы просмотра по F4 с перезагрузкой

exect=$var_a=StringToASCIIArray(ClipGet())||_ViewValues($var_a) ;; отобразить в таблице коды ASCII символов строки буфера обмена

exect=$var_a1=FileReadToArray('%WL') GLOBALEXECT<a> ;; пример создания массива выделенных объектов

exect=$var_a1=StringSplit('%P%N','\',1) GLOBALEXECT<a> ;; пример создания массива из элементов пути

exect=$var_a1=StringSplit('1a|2a|3a|4a|5a|6a|7a|8a|9a','|',1) GLOBALEXECT<$var_a1> exect=$var_a2=StringSplit('1b,2b,3b,4b,5b,6b,7b,8b,9b',',',2)||$var_a1[6]=$var_a2[2] GLOBALEXECT<$var_a1> GLOBALEXECT<$var_a2> GLOBALEXECT<a> ;; пример создания двух массивов, изменение ячейки и просмотр каждого

exect=$var_a1=StringSplit('1a|2a|3a|4a|5a|6a|7a|8a|9a','|',1)||$var_a2=$var_a1 GLOBALEXECT<a> ;; пример создания массива в переменной $var_a1 и копирование его в переменную $var_a2

exect=$var_a1=StringSplit('1a|2a|3a|4a|5a|6a|7a|8a|9a','|',1)||$var_a2=StringSplit('1b,2b,3b,4b,5b,6b,7b,8b,9b',',',2) GLOBALEXECT<$var_a1> GLOBALEXECT<$var_a2> GLOBALEXECT<a> ;; пример создания двух массивов, отдельный просмотр каждого

exect=$var_a1=StringSplit('1a|2a|3a|4a|5a|6a|7a|8a|9a','|',2)||$var_n1='размер~~массива~~'&UBound($var_a1) GLOBALEXECT<a> ;; пример создания массива и получение его размера

exect=$var_a1=StringSplit(FileRead('%P%N'),'~~',1) GLOBALEXECT<a> ;; пример разбивки текстового файла в массив по пробелам

exect=$var_a1=StringToASCIIArray('abc')||$var_s1=StringFromASCIIArray($var_a1) GLOBALEXECT<a> ;; пример записи строки в массив в переменную $var_aa, содержащий код ASCII каждого символа и обратное преобразование массива кодов ASCII в строку

exect=$var_aa=_ArrayCreate(1,2) slist=PS<$f70//1//0//bar> forpgs <FOR> 1 <TO> GLOBALSLIST<0> sends=GLOBALSLIST<:INDEX:>||#Sbar5||@CRLF!!,~~ exect=$var_s='GLOBALSENDS<1>'=''''?'''':_ArrayAdd($var_aa,'GLOBALSLIST<:INDEX:>'&@CRLF&'GLOBALSENDS<1>') <NEXT> exect=||_ArrayToClip($var_aa,@CRLF) ;; записать в буфер обмена номера кнопок и имена панелей инструментов Total Commander, в которых в команде присутствует фраза из буфера

exect=$var_aa=_ArrayCreate(1,2) slist=PS<$f70//1//0//bar> forpgs <FOR> 1 <TO> GLOBALSLIST<0> sends=GLOBALSLIST<:INDEX:>||#Sbar5||@CRLF!!,~~ exect=$var_s='GLOBALSENDS<1>'=''''?'''':_ArrayAdd($var_aa,'GLOBALSLIST<:INDEX:>'&'~~'&'GLOBALSENDS<1>') <NEXT> exect=||_ViewValues($var_aa,'Поиск~~фразы~~'&ClipGet()&'~~в~~командах') ;; отобразить в таблице номера кнопок и имена панелей инструментов Total Commander, в которых в команде присутствует фраза из буфера

exect=$var_aa=_ArrayCreate('2x5')||_ViewValues($var_aa) ;; пример создания двумерного массива 2x5

exect=$var_aa=_ArrayCreate('2x5',1,'AA|BB|CC|DD|EE')||_ViewValues($var_aa) ;; пример создания двумерного массива 5x2 и заполнения данными

exect=$var_aa=_ArrayCreate('2x5',2)||_ViewValues($var_aa) ;; пример создания двумерного массива 2x5

exect=$var_aa=_ArrayCreate('2x5',2,'AA|BB|CC|DD|EE')||_ViewValues($var_aa) asave=var_aa||"%pList.txt"||upd<1> ;; пример создания двумерного массива 5x2 и заполнения данными и запись в файл

exect=$var_aa=_ArrayCreate('2x5',2,'AA|BB|CC|DD|EE')||_ViewValues($var_aa) ;; пример создания двумерного массива 5x2 и заполнения данными

exect=$var_aa=_ArrayCreate(5) GLOBALEXECT<$var_aa> ;; пример создания пустого массива

exect=$var_aa=_ArrayCreate(5)||_ViewValues($var_aa)||$var_aa[1]='data'||$var_aa[2]=1000||_ViewValues($var_aa)||$var_aa[2]=$var_aa[1]||_ViewValues($var_aa) ;; пример передачи данных между ячейкам в одномерном массиве

exect=$var_aa=_ArrayCreate(5)||_ViewValues($var_aa)||$var_aa[1]='data'||$var_aa[2]=1000||_ViewValues($var_aa)||_Swap($var_aa[1],$var_aa[2])||_ViewValues($var_aa) ;; пример присвоения данных в одномерном массиве и обмен данными между ячейками

exect=$var_aa=_ArrayCreate(5,2)||_ArrayDisplay($var_aa) ;; пример создания пустого массива

exect=$var_aa=_ArrayCreate('5x2')||_ViewValues($var_aa) ;; пример создания двумерного массива 5x2

exect=$var_aa=_ArrayCreate('5x2')||_ViewValues($var_aa)||$var_aa[0][1]='data'||_ViewValues($var_aa)||$var_aa[1][0]='1000'||_ViewValues($var_aa) ;; пример присвоения данных в двумерном массиве

exect=$var_aa=_ArrayCreate('5x2')||_ViewValues($var_aa)||$var_aa[0][1]='data'||_ViewValues($var_aa)||$var_aa[1][0]=1000||_ViewValues($var_aa)||_Swap($var_aa[0][1],$var_aa[1][0])||_ViewValues($var_aa) ;; пример присвоения данных в двумерном массиве и обмен данными между ячейками

exect=$var_aa=_ArrayCreate('5x2')||_ViewValues($var_aa)||$var_aa[0][1]='data'||_ViewValues($var_aa)||$var_aa[2][0]=$var_aa[0][1]||_ViewValues($var_aa) ;; пример передачи данных между ячейкам в двумерном массиве

exect=$var_aa=_ArrayCreate('5x2')||_ViewValues($var_aa)||$var_aa[1][0]=100||_ViewValues($var_aa)||$var_aa[1][0]+=500||_ViewValues($var_aa)||$var_aa[1][0]*=2||_ViewValues($var_aa)||$var_aa[1][0]/=5||_ViewValues($var_aa)||$var_aa[1][0]&='exit'||_ViewValues($var_aa) ;; пример присвоения данных к ячейке существующего 2D массива

exect=$var_aa=_ArrayCreate('5x2',1,'привет|пока')||_ViewValues($var_aa) ;; пример создания двумерного массива 5x2 и заполнения данными

exect=$var_aa=_ArrayCreate('5x2',2)||_ViewValues($var_aa) ;; пример создания двумерного массива 5x2

exect=$var_aa=_ArrayCreate('5x2',2,'привет|пока')||_ViewValues($var_aa) ;; пример создания двумерного массива 5x2 и заполнения данными

exect=$var_aa=_ArrayCreate(8,1,'A')||_ArrayDisplay($var_aa) ;; пример создания и заполнения массива

exect=$var_aa=128||$var_pwr=##[timen=5][group=Power~~Control<#>Please~~cancel~~if~~any~~app~~NOT~~saved.@CRLFIt~~would~~force~~to...<#><#>&Shutdown<+>9<+>&LOCK<+>128<+>:BREAK:<+>90<+>&Restart<+>6<+>S&uspend<+>16<+>:BREAK:<+>90<+>Lo&gout<+>0<+>S&leep<+>64<#>300<#>165]||$var_i=$GLOBALTIMEN[1]=1?$var_aa:$GLOBALGROUP1[1]||_ViewValues('$var_i') ;; пример использования данных глобальной переменной GLOBALTIMEN

exect=$var_aa=DriveGetDrive('ALL') GLOBALEXECT<$var_aa> ;; массив, содержащий список устройств

exect=$var_aa=DriveGetDrive('REMOVABLE') sends=$var_aa??-1 exect=$var_s=NOT~~'GLOBALSENDS<1>'?_Exit():0 GLOBALSENDS<b> zunpf=%%TCIMG_PATH%%\boot.zip||GLOBALARRAY<1>\//0||progres<>||foldname<1> ;; выбрать съемный носитель в окне и распаковать в корень этого носителя архив boot.zip в именную папку

exect=$var_aa=DriveGetDrive('REMOVABLE') sends=$var_aa??-1||#L1 exect=$var_s=NOT~~'GLOBALSENDS<1>'?_Exit():0 zunpf=%%TCIMG_PATH%%\boot.zip||GLOBALSENDS<1>\//0||progres<>||foldname<1> ;; распаковать в корень съемного носителя архив boot.zip (если носителей несколько, то первый по списку)

exect=$var_aa=FileReadToArray('%P%N')||$var_n=IsArray($var_aa)?UBound($var_aa):0||_ViewValues($var_n) ;; получить количество строк файла под курсором

exect=$var_aa=FileReadToArray('%P%N')||$var_n=UBound($var_aa)||_ViewValues($var_n) ;; получить количество строк файла под курсором

exect=$var_aa=IniReadSection(EnvGet('COMMANDER_INI'),'Configuration')||_ViewValues($var_aa) ;; считывает все пары параметр=значение в Wincmd.ini из секции Configuration

exect=$var_aa=MemGetStats() GLOBALEXECT<$var_aa> ;; массив информации, связанной с памятью

exect=$var_aa=Run('Explorer.exe~~/select,'&@ProgramFilesDir&'\Internet~~Explorer') GLOBALEXECT<a> ;; пример запуска программы

exect=$var_aa=StringSplit(_StringDuplication('blue-red|red-blue|',10),'|',1) GLOBALEXECT<$var_aa> <FOR> 1 <TO> 5 exect=$var_s=$var_aa[:INDEX:] exect=_ViewValues('$var_s') <NEXT> ;; пример создания массива из дублированной строки и передача элементов в массиве

exect=$var_aa=StringSplit(_StringDuplication('maroon-black|purple-MidnightBlue|DeepPink4-NavyBlue|navy-DarkRed|cyan3-DarkOrange3|',2),'|',1)||_ViewValues($var_aa) tends=$var_aa!!-1 GLOBALTENDS<a> ;; пример дублирования строки, разбивка её в массив и вывод в массивы

exect=$var_aa=StringSplit('0;1;2;3;4;5;6;7;8;9',';')||_ArrayDisplay($var_aa)||$var_an=StringSplit('3|5|9','|')||_ArrayDisplay($var_an)||_ArrayInsert($var_aa,$var_an,'Вставлена~~3-я~~ячейка|5-я|9-я')||_ArrayDisplay($var_aa) ;; пример вставки в массив $var_aa значений в заданные ячейки из массива $var_an

exect=$var_aa=StringSplit('0;1;2;3;4;5;6;7;8;9',';')||_ArrayDisplay($var_aa)||_ArrayInsert($var_aa,2,'Вставлена~~2-я~~ячейка')||_ArrayDisplay($var_aa) ;; пример вставки в массив $var_aa значения в заданную ячейку

exect=$var_aa=StringSplit('0;1;2;3;4;5;6;7;8;9',';')||_ArrayDisplay($var_an)||_ArrayInsert($var_aa,'3;5;9','Вставлена~~3-я~~ячейка|5-я|9-я')||_ArrayDisplay($var_aa) ;; пример вставки в массив $var_aa значений в заданные ячейки

exect=$var_aa=StringSplit('0;1;2;3;4;5;6;7;8;9',';',2)||_ArrayDisplay($var_aa)||_ArraySort($var_aa,1)||_ArrayDisplay($var_aa)||_ArraySort($var_aa)||_ArrayDisplay($var_aa) ;; пример сортировки массива

exect=$var_aa=StringSplit('1|2|3|4','|',2)||$var_ap=_ArrayPermute($var_aa,'-')||_ArrayDisplay($var_ap) ;; пример возвращения массива $var_ap перестановок всех элементов указанного массива $var_aa

exect=$var_aa=StringSplit('1|2|3|4','|',2)||$var_i=IsString(Eval('var_aa'))||_ViewValues($var_i)||$var_aa='Привет'||$var_i=IsString(Eval('var_aa'))||_ViewValues($var_i) ;; пример проверки является переменная строковым типом данных

exect=$var_aa=StringSplit('1|2|3|4|5|6|7|8|9|10','|',1)||_ArrayDisplay($var_aa)||_ArrayRandomize($var_aa,1)||_ArrayDisplay($var_aa) ;; пример распределения элементов массива случайным образом со 2-го элемента

exect=$var_aa=StringSplit('1|2|3|4|5|6|7|8|9|10','|',2)||_ArrayDisplay($var_aa)||_ArrayRandomize($var_aa)||_ArrayDisplay($var_aa) ;; пример распределения элементов массива случайным образом

exect=$var_aa=StringSplit('1a|2a|3a|4a','|',2)||_ArrayDisplay($var_aa)||$var_a2=StringSplit('5b|6b|7b|8b|9b','|',2)||_ArrayDisplay($var_a2)||_ArrayConcatenate($var_aa,$var_a2)||__ArrayDisplay($var_aa) ;; пример создания 2-х массивов и присоединение 2-го к первому

exect=$var_aa=StringSplit('1a|2a|3a|4a','|',2)||_ArrayDisplay($var_aa)||_ArrayDelete($var_aa,2)||_ArrayDisplay($var_aa) ;; пример создания массива и удаление заданной ячейки

exect=$var_aa=StringSplit('1a|2a|3a|4a|5a|6a|7a|8a|9a','|',1) GLOBALEXECT<$var_aa> <FOR> 1 <TO> 5 exect=$var_s=$var_aa[:INDEX:] exect=_ViewValues('$var_s') <NEXT> ;; пример создания массива и передача элементов в массиве

exect=$var_aa=StringSplit('1a|2a|3a|4a|5a|6a|7a|8a|9a','|',1) GLOBALEXECT<a> bufsr=##$var_aa[1]~~$var_aa[5] ;; пример создания массива и передача ячеек другим командам

exect=$var_aa=StringSplit('1a|2a|3a|4a|5a|6a|7a|8a|9a','|',2)||_ArrayDisplay($var_aa)||$var_a2=_ArrayExtract($var_aa,2,5)||_ArrayDisplay($var_a2) ;; пример создания массива $var_a2 из заданных ячеек массива $var_aa

exect=$var_aa=StringSplit('1a|2a|3a|4a|5a|6a|7a|8a|9a','|',2)||_ArrayDisplay($var_aa)||_ArrayAdd($var_aa,'88888')||_ArrayDisplay($var_aa) ;; пример создания массива и добавление в конец значения

exect=$var_aa=StringSplit('4,2,06,8,12,5',',')||_ArrayDisplay($var_aa) exect=$var_i1=_ArrayMaxIndex($var_aa,0,1)||$var_i2=_ArrayMaxIndex($var_aa,1,1) GLOBALEXECT<a> ;; пример возвращения индекса ячейки, в которой содержится наибольшее значение массива

exect=$var_aa=StringSplit('4,2,06,8,12,5',',')||_ArrayDisplay($var_aa) exect=$var_i1=_ArrayMin($var_aa,0,1)||$var_i2=_ArrayMin($var_aa,1,1) GLOBALEXECT<a> ;; пример возвращения наименьшего значения, содержащегося в массиве

exect=$var_aa=StringSplit('4,2,06,8,12,5',',')||_ArrayDisplay($var_aa) exect=$var_i1=_ArrayMinIndex($var_aa,0,1)||$var_i2=_ArrayMinIndex($var_aa,1,1) GLOBALEXECT<a> ;; пример возвращения индекса ячейки, в которой содержится наименьшее значение массива

exect=$var_aa=StringSplit('4|2|06|8|12|5','|')||_ArrayDisplay($var_aa) exect=$var_i1=_ArrayMax($var_aa,0,1)||$var_i2=_ArrayMax($var_aa,1,1) GLOBALEXECT<a> ;; пример возвращения наибольшего значения, содержащегося в массиве

exect=$var_aa=StringSplit('aa|bb|aa|cc|dd|aa|bb|ee|aa','|',2)||$var_i=IsArray(Eval('var_aa'))||_ViewValues($var_i)||$var_aa='Привет'||$var_i=IsArray(Eval('var_aa'))||_ViewValues($var_i) ;; пример проверки является переменная массивом или нет

exect=$var_aa=StringSplit('aa|bb|aa|cc|dd|aa|bb|ee|aa','|',2)||_ArrayDisplay($var_aa)||$var_a2=_ArrayFindAll($var_aa,'aa')||_ArrayDisplay($var_a2) ;; пример создания массива $var_a2 из индексов ячеек массива $var_aa в которых есть 'aa'

exect=$var_aa=StringSplit('aa|bb|aa|cc|dd|aa|bb|ee|aa','|',2)||_ArrayDisplay($var_aa)||$var_a2=_ArrayUnique($var_aa)||_ArrayDisplay($var_a2) ;; пример создания массива $var_a2 из массива $var_aa без повторов элементов

exect=$var_aa=StringSplit('aa|bb|aa|cc|dd|aa|bb|ee|aa','|',2)||_ArrayDisplay($var_aa)||_ReDim($var_aa,20)||_ArrayDisplay($var_aa)||_ReDim($var_aa,5)||_ArrayDisplay($var_aa) ;; пример изменения размера массива

exect=$var_aa=StringSplit('AA|BB|CC|DD|EE|','|',1) <FOR> 1 <TO> 10 exect=$var_sc=Mod(:INDEX:,5)||$var_sc=$var_sc=0?5:$var_sc||$var_sc=$var_aa[$var_sc]||_ViewValues('$var_sc') <NEXT> ;; пример поочерёдного использования значений массива $var_aa в цикле

exect=$var_aa=StringSplit('AAA|BBB|CCC|DDD','|',2)||_ArrayDisplay($var_aa)||$var_s1=_ArrayPop($var_aa)||MsgBox(4096,'Результат','$var_s1')||_ArrayDisplay($var_aa) ;; пример возвращения последнего элемента массива $var_aa, одновременно удаляя его из массива

exect=$var_aa=StringSplit('AAA|BBB|CCC|DDD','|',2)||_ArrayDisplay($var_aa)||_ArrayPush($var_aa,'EEE')||_ArrayDisplay($var_aa)||_ArrayPush($var_aa,'FFF')||_ArrayDisplay($var_aa) ;; пример добавления нового элемента в конец массива, смещая остальные вверх

exect=$var_aa=StringSplit('AAA|BBB|CCC|DDD','|',2)||_ArrayDisplay($var_aa)||_ArrayPush($var_aa,'EEE',1)||_ArrayDisplay($var_aa)||_ArrayPush($var_aa,'FFF',1)||_ArrayDisplay($var_aa) ;; пример добавления нового элемента в начало массива, смещая остальные вниз

exect=$var_aa=StringSplit('AAA|BBB|CCC|DDD|EEE|FFF','|',2)||_ArrayDisplay($var_aa)||$var_ii=_ArraySearch($var_aa,'DDD')||MsgBox(4096,'Результат','$var_ii') ;; пример поиска индекса ячейки, в которой находится фраза 'DDD'

exect=$var_aa=StringSplit('AAA|BBB|CCC|DDD|EEE|FFF','|',2)||_ArrayDisplay($var_aa)||$var_ss=_ArrayToString($var_aa,@TAB,1,5)||MsgBox(4096+64,'Результат','$var_ss') ;; пример объединение ячеек массива в одну строку, разделяя @TAB

exect=$var_aa=StringSplit('AAA|BBB|CCC|DDD|EEE|FFF','|',2)||_ArrayDisplay($var_aa)||_ArrayReverse($var_aa)||_ArrayDisplay($var_aa)||_ArrayReverse($var_aa)||_ArrayDisplay($var_aa) ;; пример изменения порядка следования элементов массива

exect=$var_aa=StringSplit('AAA|BBB|CCC|DDD|EEE|FFF','|',2)||_ArrayDisplay($var_aa)||_ArraySwap($var_aa,2,4)||_ArrayDisplay($var_aa)||_ArraySwap($var_aa,1,5)||_ArrayDisplay($var_aa) ;; пример замены местами две ячейки массива

exect=$var_aa=StringSplit('AAA|BBB|CCC|DDD|EEE|FFF','|',2)||_ArrayDisplay($var_aa)||_ArrayToClip($var_aa,'~~-~~',1,5) ;; пример записи элементов массива в буфер обмена

exect=$var_aa=StringSplit('AAA-|BBB-|CCC-|DDD-|EEE-|FFF-','|',2)||_ArrayDisplay($var_aa)||_ArrayTrim($var_aa,1,1,1,3)||_ArrayDisplay($var_aa) ;; пример удаления указанного количества символов из заданных элементов массива

exect=$var_aa=StringToASCIIArray('%N') GLOBALEXECT<a> ;; отобразить в таблице коды ASCII символов имени под курсором

exect=$var_aa=StringToASCIIArray('abc') GLOBALEXECT<a> ;; пример записи строки в массив в переменную $var_aa, содержащий код ASCII каждого символа

exect=$var_aa=ToolTip('Это~~подсказка',0,0) GLOBALEXECT<a> ;; пример вывода подсказки

exect=$var_ac=StringRegExp(ClipGet()&@CR&@CR,'(?m)^([^\r\n]*)',3)||$var_ab=StringSplit('TOTALCMD#BAR#DATA|%%COMMANDER_PATH%%\TCIMG.exe|#|Wcmicons.dll,0|','|',2)||$var_ab[2]=$var_ac[0]||$var_ab[4]=$var_ac[1]||_ArrayToClip($var_ab,@CRLF) ;; из 2-х строк в буфере обмена (команда и описание) создать кнопку TCIMG для Total Commander и записать в буфер обмена

exect=$var_aclass=StringSplit(WinGetClassList('[CLASS:TTOTAL_CMD]'),@LF)||_ViewValues($var_aclass) ;; возвращает массив всех классов элементов Total Commander

exect=$var_af=FileReadToArray('%P%N') GLOBALEXECT<a> ;; пример создания массива строк текстового файла под курсором и отображение переменной GLOBALEXECT

exect=$var_af=FileReadToArray('%P%N') GLOBALEXECT<c5> ;; записать в буфер обмена 5-ю строку файла под курсором

exect=$var_af=FileReadToArray('%P%N')||_ViewValues($var_af) ;; пример создания массива строк текстового файла под курсором и отображение всех элементов массива $var_af

exect=$var_af=FileReadToArray('%P%N')||ClipPut($var_af[5-1]) ;; записать в буфер обмена 5-ю строку файла под курсором

exect=$var_af=FileReadToArray('C:\test.txt') GLOBALEXECT<c5> ;; записать в буфер обмена 5-ю строку файла C:\test.txt

exect=$var_af=FileReadToArray('C:\test.txt')||ClipPut($var_af[5-1]) ;; записать в буфер обмена 5-ю строку файла C:\test.txt

exect=$var_alist=StringSplit('20150801153111|20160902163212','|') modfs=%WL||0||list<$var_alist> ;; изменить 2-м выделенным объектам дату модификации списком дат из переменной

exect=$var_an=##[input=BOX84]||$var_a1=StringSplit('a|b|c|','|',1)||ClipPut('$var_a1[$var_an]') ;; пример записи в буфер обмена заданной ячейки массива

exect=$var_apos=WinGetClientSize('[CLASS:TTOTAL_CMD]')||_ViewValues($var_apos) ;; получить массив с шириной и высотой клиентской области окна Total Commander

exect=$var_apos=WinGetPos('[CLASS:TTOTAL_CMD]')||_ViewValues($var_apos) ;; получить массив с шириной и высотой клиентской области окна Total Commander

exect=$var_array=##$FOLDC<%WL//0//2>??-1 GLOBALEXECT<$var_array> ;; пример передачи путей папок 1-го уровня выделенных каталогов, поместив их в массив $var_array

exect=$var_array=##$INI<1//%%COMMANDER_INI%%>??-1 GLOBALEXECT<$var_array> ;; пример передачи всех имён секций (со скобками) файла WinCmd.ini построчно, поместив в массив $var_array

exect=$var_array=##$INI<2//%%COMMANDER_INI%%>??-1 GLOBALEXECT<$var_array> ;; пример передачи всех имён секций (без скобками) файла WinCmd.ini построчно, поместив в массив $var_array

exect=$var_array=##$INI<3//%%COMMANDER_INI%%>??-1 GLOBALEXECT<$var_array> ;; пример передачи содержимого всех секций построчно, поместив в массив $var_array

exect=$var_array=##$INI<4//%%COMMANDER_INI%%//Configuration>??1 GLOBALEXECT<$var_array> ;; пример передачи содержимого секции с именем Configuration файла WinCmd.ini построчно, поместив в массив $var_array

exect=$var_array=##$INI<5//%%COMMANDER_INI%%//Configuration>??1 GLOBALEXECT<$var_array> ;; пример передачи содержимого секции без именем Configuration файла WinCmd.ini построчно, поместив в массив $var_array

exect=$var_array=##$INI<6//%%COMMANDER_INI%%//Configuration>??1 GLOBALEXECT<$var_array> ;; пример передачи всех ключей секции Configuration файла WinCmd.ini построчно, поместив в массив $var_array

exect=$var_array=##$INI<7//%%COMMANDER_INI%%//Configuration>??1 GLOBALEXECT<$var_array> ;; пример передачи всех значений секции Configuration файла WinCmd.ini построчно, поместив в массив $var_array

exect=$var_array=##$LISTF<c:\test1.txt/c:\test2.txt/c:\test3.txt>??-1 GLOBALEXECT<$var_array> ;; пример передачи заданного списка объектов, поместив их в массив $var_array

exect=$var_array=##$PS<"%p"//1//0//*.ini|*.txt*>??-1 GLOBALEXECT<$var_array> ;; пример передачи путей файлов ini и txt в активной панели, поместив их в массив $var_array

exect=$var_array=##%WF??-1 GLOBALEXECT<$var_array> ;; пример передачи списка имен выделенных объектов построчно, поместив в массив $var_array

exect=$var_array=##%WL??-1 GLOBALEXECT<$var_array> ;; пример передачи списка выделенных объектов, поместив их в массив $var_array

exect=$var_array=##[tc=LL-1]??-1 GLOBALEXECT<$var_array> ;; пример передачи списка объектов активной панели, поместив их в массив $var_array

exect=$var_array=##-1!!-1 GLOBALEXECT<$var_array> ;; пример передачи содержимого буфера обмена, построчно, поместив в массив $var_array

exect=$var_array=##c:\test\1.txt!!-1 GLOBALEXECT<$var_array> ;; пример передачи содержимого файла c:\test\1.txt, построчно, поместив в массив $var_array

exect=$var_array=$CmdLine||_ViewValues($var_i) параметр1 параметр2 параметр3 ;; присвоить переменной $var_array массив всех параметров, переданных утилите при запуске

exect=$var_array=ProcessGetStats('TOTALCMD.EXE')||_ViewValues($var_array) ;; получить массив информации о памяти процесса TOTALCMD.EXE

exect=$var_array=ProcessGetStats('TOTALCMD.EXE',1)||_ViewValues($var_array) ;; получить массив информации ввода-вывода процесса TOTALCMD.EXE

exect=$var_array=WinGetCaretPos()||_ViewValues($var_array) ;; получить массив координат курсора активного окна

exect=$var_asize=DirGetSize('C:\Test',1)||_ViewValues($var_asize)||_ViewValues($var_asize[0])||_ViewValues($var_asize[1])||_ViewValues($var_asize[2]) ;; возвращает массив с информацией о папке Test

exect=$var_atime=FileGetTime('C:\Test\test.txt')||_ViewValues($var_atime) ;; возвращает массив с временем последней модификации файла test.txt

exect=$var_b=Binary('0x00204060')||$var_i=BinaryLen(Eval('var_b'))||_ViewValues('Размер~~в~~байтах:~~'&$var_i) ;; возвращает число байтов

exect=$var_b=Binary('0x00204060')||$var_i=&#73sBinary(Eval('var_b'))||_ViewValues($var_i) ;; возвращает 1 , т.к. переменная $var_b является бинарным типом данных

exect=$var_b=InetRead('http://tc-image.3dn.ru')||_ViewValues('$var_b') ;; получить бинарные данные со страницы tc-image.3dn.ru

exect=$var_b=InetRead('http://tc-image.3dn.ru')||_ViewValues(BinaryToString('$var_b',4)) ;; получить текстовые данные со страницы tc-image.3dn.ru

exect=$var_b=StringToBinary('Привет!',1)||_ViewValues('$var_b')||$var_s=BinaryToString(Eval('var_b'),1)||_ViewValues('$var_s') ;; пример преобразования строки в бинарный тип ANSI и обратно

exect=$var_b=StringToBinary('Привет!',2)||_ViewValues('$var_b')||$var_s=BinaryToString(Eval('var_b'),2)||_ViewValues('$var_s') ;; пример преобразования строки в бинарный тип UTF-16 LE и обратно

exect=$var_b=StringToBinary('Привет!',3)||_ViewValues('$var_b')||$var_s=BinaryToString(Eval('var_b'),3)||_ViewValues('$var_s') ;; пример преобразования строки в бинарный тип UTF-16 BE и обратно

exect=$var_b=StringToBinary('Привет!',4)||_ViewValues('$var_b')||$var_s=BinaryToString(Eval('var_b'),4)||_ViewValues('$var_s') ;; пример преобразования строки в бинарный тип UTF-8 и обратно

exect=$var_b=True||$var_i=IsBool(Eval('var_b'))||_ViewValues($var_i) ;; проверяет является ли переменная булевым типом данных

exect=$var_b1=Binary('0x10203040')||$var_b2=BinaryMid(Eval('var_b1'),2,2)||_ViewValues(Eval('var_b2')) ;; возвращает 2-ой и 3-ий байты

exect=$var_d=##<info=o80"%t"//>||$var_s=$var_d='E:'?'D:':($var_d='G:'?'H:':($var_d='J:'?'Y:':'C:'))||_ViewValues('$var_s') ;; пример условия получения диска, относительно пути другой панели

exect=$var_d=##<info=o80"%t"//>||$var_s=$var_d='E:'?'D:':($var_d='G:'?'H:':'C:')||_ViewValues('$var_s') ;; пример условия получения диска, относительно пути другой панели

exect=$var_d=##<info=o80"%t"//>||$var_s=$var_d='E:'?'D:':'C:'||_ViewValues('$var_s') ;; пример условия получения диска, относительно пути другой панели

exect=$var_ext=##<info=o71%P%N//>||$var_i=StringInStr('ini|db|dll','$var_ext')?_CmdCm('infbx=InfoBox_TEST1'):_CmdCm('infbx=InfoBox_TEST2') ;; пример условия проверки расширения файла под курсором

exect=$var_fail=<info=t151%WL|PUBLIC>||_ViewValues($var_fail) ;; проверяет в выделенных текстовых файлах вхождение "PUBLIC", если есть хоть в одном файле, то возвращает 1, иначе 0

exect=$var_fail=<info=t151-1|PUBLIC>||_ViewValues($var_fail) ;; проверяет в текстовых файлах (список путей из буфера обмена) вхождение "PUBLIC", если есть хоть в одном файле, то возвращает 1, иначе 0

exect=$var_fail=<info=t251%WL|PUBLIC>||_ViewValues($var_fail) ;; проверяет в выделенных текстовых файлах вхождение "PUBLIC", если нет хоть в одном файле, то возвращает 1, иначе 0

exect=$var_fail=<info=t251-1|PUBLIC>||_ViewValues($var_fail) ;; проверяет в текстовых файлах (список путей из буфера обмена) вхождение "PUBLIC", если нет хоть в одном файле, то возвращает 1, иначе 0

exect=$var_fail=<info=t70%P%N|PUBLIC>||_ViewValues($var_fail) ;; проверяет в текстовом файле под курсором вхождение "PUBLIC" в каждой строке, если есть в каждой строке, то возвращает 1, иначе 0

exect=$var_fail=<info=t71%P%N|\d>||_ViewValues($var_fail) ;; проверяет в текстовом файле под курсором вхождение цифры в каждой строке, если есть в каждой строке, то возвращает 1, иначе 0

exect=$var_file='%%COMMANDER_PATH%%\Programs\Atlantis\Temp\Atlantis_Name.txt' sends=$var_file??-1 <FOR> 2 <TO> GLOBALSENDS<0> <STEP> 2 exect=$var_n=:INDEX:+1 renmm=GLOBALSENDS<:INDEX:>||##GLOBALSENDS<$var_n>||rflag<1> <NEXT> delsm=$var_file||1 ;; заменить файлы из списка Atlantis_Name.txt ... и удалить временный файл

exect=$var_h=@DesktopDir GLOBALEXECT<a> ;; получить путь "Рабочего стола"

exect=$var_h=_SendM(WinGetHandle('[CLASS:TTOTAL_CMD]'),1074,1,0)||_ViewValues('$var_h') ;; получить дескриптор левой файловой панели (TC9 и выше)

exect=$var_h=_SendM(WinGetHandle('[CLASS:TTOTAL_CMD]'),1074,2,0)||_ViewValues('$var_h') ;; получить дескриптор правой файловой панели (TC9 и выше)

exect=$var_h=_SendM(WinGetHandle('[CLASS:TTOTAL_CMD]'),1074,3,0)||_ViewValues('$var_h') ;; получить дескриптор активной файловой панели (TC9 и выше)

exect=$var_h=_SendM(WinGetHandle('[CLASS:TTOTAL_CMD]'),1074,4,0)||_ViewValues('$var_h') ;; получить дескриптор неактивной файловой панели (TC9 и выше)

exect=$var_h=_SendM(WinGetHandle('[CLASS:TTOTAL_CMD]'),1074,5,0)||_ViewValues('$var_h') ;; получить дескриптор заголовка левой файловой панели (TC9 и выше)

exect=$var_h='0x'&Hex(_SendM(WinGetHandle('[CLASS:TTOTAL_CMD]'),1074,1,0))||_ViewValues('$var_h') ;; получить Hex дескриптор левой файловой панели (TC9 и выше)

exect=$var_h='0x'&Hex(_SendM(WinGetHandle('[CLASS:TTOTAL_CMD]'),1074,2,0))||_ViewValues('$var_h') ;; получить Hex дескриптор правой файловой панели (TC9 и выше)

exect=$var_h='0x'&Hex(_SendM(WinGetHandle('[CLASS:TTOTAL_CMD]'),1074,3,0))||_ViewValues('$var_h') ;; получить Hex дескриптор активной файловой панели (TC9 и выше)

exect=$var_h='0x'&Hex(_SendM(WinGetHandle('[CLASS:TTOTAL_CMD]'),1074,4,0))||_ViewValues('$var_h') ;; получить Hex неактивной файловой панели (TC9 и выше)

exect=$var_h='0x'&Hex(_SendM(WinGetHandle('[CLASS:TTOTAL_CMD]'),1074,5,0))||_ViewValues('$var_h') ;; получить Hex дескриптор заголовка левой файловой панели (TC9 и выше)

exect=$var_h=ControlGetHandle('[CLASS:AkelPad4]',Null,'AkelEditW1') scren="%p"//1||$fname||sclas<$var_h> ;; создать в текущей панели скриншот экрана в jpg именем даты окна редактирования AkelPad

exect=$var_h=DllCall('user32.dll','hwnd','GetDesktopWindow')[0]||_ViewValues('16:~~'&'$var_h'&@CRLF&'10:~~'&$var_h,'Дескриптор~~окна~~рабочего~~стола') ;; получить дескриптор окна рабочего стола

exect=$var_h=FileFindFirstFile('C:\Test\*.*')||_ViewValues('$var_h')||$var_sfile=FileFindNextFile($var_h)||_ViewValues('$var_sfile')||FileClose($var_h) ;; пример поиска 1-го имени файла/папки в каталоге Test

exect=$var_h=FileOpen('%P%N',16)||$var_s=BinaryToString(FileRead($var_h),4)||FileClose($var_h)||_ViewValues('$var_s') ;; пример считывания данных файла под курсором в кодировке UTF-8

exect=$var_h=FileOpen('c:\Test\1.txt')||FileReadLine($var_h,5)||FileClose($var_h) GLOBALEXECT<a> ;; пример считывания 5-й строки из текстового файла

exect=$var_h=FileOpen('c:\Test\1.txt',1)||FileWrite($var_h,'Строка1'&@CRLF&'Строка2')||FileClose($var_h) GLOBALEXECT<a> ;; пример записи в конец файла многострочного текста

exect=$var_h=FileOpen('c:\Test\1.txt',1)||FileWriteLine($var_h,'Строка1')||FileClose($var_h) ;; пример записи в конец файла

exect=$var_h=FileOpen('c:\Test\1.txt',16)||$var_b=FileRead($var_h,5)||FileClose($var_h) GLOBALEXECT<a> ;; пример считывания 5 байтов из файла

exect=$var_h=InetGet('http://www.mozilla.org',@DesktopDir&'\mozilla.html',1,1)||Sleep(1000)||$var_a=InetGetInfo($var_h,-1)||_ViewValues($var_a)||InetClose($var_h) ;; скачать страницу на рабочий стол и выдать информацию

exect=$var_h=Ptr(-1)||$var_i=IsPtr(Eval('var_h'))||_ViewValues($var_i) ;; преобразует -1 в указатель

exect=$var_h=WinActivate('[CLASS:AkelPad4]')||WinWaitActive(Eval('var_h')) ;; активировать окно AkelPad, приостановить работу утилиты, пока окно не активируется

exect=$var_h=WinActivate('Безымянный~~~~Блокнот')||ControlSend(Eval('var_h'),Null,'[CLASS:Edit;INSTANCE:1]','Это~~некоторый~~текст') ;; активирует окно "Блокнота" и вставляет заданный текст (он должен быть запущен)

exect=$var_h=WinGetHandle('[CLASS:#32770;REGEXPTITLE:.*\((Копирование|Переименование/перемещение)\)]')||_ViewValues('$var_h') ;; получить дескриптор окна "Копирования" или "Переименование/перемещение" Total Commander в фоновом режиме или "очереди"

exect=$var_h=WinGetHandle('[CLASS:#32770;REGEXPTITLE:.*\((Копирование|Переименование/перемещение)\)]')||WinWaitClose(Eval('var_h')) infbx=InfoBox2 ;; получить дескриптор окна "Копирования" или "Переименование/перемещение" Total Commander в фоновом режиме или "очереди" + дождаться закрытия окна и выдать сообщение

exect=$var_h=WinGetHandle('[CLASS:#32770;REGEXPTITLE:.*\((Копирование|Переименование/перемещение)\)]')||WinWaitClose(Eval('var_h')) shutd=9 ;; получить дескриптор окна "Копирования" или "Переименование/перемещение" Total Commander в фоновом режиме или "очереди" + дождаться закрытия окна и выключить компьютер

exect=$var_h=WinGetHandle('[CLASS:#32770;REGEXPTITLE:.*\(Копирование\)]')||_ViewValues('$var_h') ;; получить дескриптор окна "Копирования" Total Commander в фоновом режиме или "очереди"

exect=$var_h=WinGetHandle('[CLASS:#32770;REGEXPTITLE:.*\(Переименование/перемещение\)]')||_ViewValues('$var_h') ;; получить дескриптор окна "Переименование/перемещение" Total Commander в фоновом режиме или "очереди"

exect=$var_h=WinGetHandle('[CLASS:AkelPad4]')||$var_n=Number(_SendM(Eval('var_h'),1222,153,0))||$var_i=$var_n=1?_SendM(Eval('var_h'),273,4256,0):0 start=%%COMMANDER_PATH%%\AkelFiles\Tools\AkelPadMin\AkelPadMin.exe||%P%N||&&procwait exect=$var_i=$var_n=1?_SendM(Eval('var_h'),273,4256,0):0 ;; открыть файл под курсором в AkelPadMin игнорируя настройку "Одна копия программы" уже запущенного AkelPad

exect=$var_h=WinGetHandle('[CLASS:Notepad]') iconw=$var_h||TCIMG.dll,8 ;; установить окна Notepad заданную иконку (передача команде хендла окна)

exect=$var_h=WinGetHandle('[CLASS:TTOTAL_CMD]')||$var_a=WinGetPos(Eval('var_h'))||WinMove(Eval('var_h'),Null,10,10,200,300,20)||Sleep(3000)||WinMove(Eval('var_h'),Null,$var_a[0],$var_a[1],$var_a[2],$var_a[3],20) ;; переместить окно Total Commander, через 3 секунды вернуть окно обратно

exect=$var_h=WinGetHandle('[CLASS:TTOTAL_CMD]')||$var_i=IsPtr(Eval('var_h'))||_ViewValues($var_i) ;; проверяется валидность Ptr указателя

exect=$var_h=WinGetHandle('[CLASS:TTOTAL_CMD]')||WinSetOnTop(Eval('var_h'),Null,1)||Sleep(3000)||WinSetOnTop(Eval('var_h'),Null,0) ;; включить на 3 секунды состояние окна "поверх всех окон" Total Commander

exect=$var_h=WinGetHandle('[CLASS:TTOTAL_CMD]')||WinSetState(Eval('var_h'),Null,@SW_HIDE)||Sleep(3000)||WinSetState(Eval('var_h'),Null,@SW_SHOW) ;; на 3 секунды скрыть окно Total Commander

exect=$var_h=WinGetHandle('[CLASS:TTOTAL_CMD]')||WinSetTrans(Eval('var_h'),Null,192)||Sleep(3000)||WinSetTrans(Eval('var_h'),Null,255) ;; на 3 секунды сделать окно Total Commander прозрачным на 25%

exect=$var_handle=WinClose('[CLASS:TTOTAL_CMD]')||WinWaitClose(Eval('var_handle')) infbx=||TC~~Закрыт||3||150||40 ;; закрытие Total Commander с ожиданием закрытия окна

exect=$var_handle=WinGetHandle('[CLASS:Notepad]')||$var_s=WinActive(Eval('var_handle'))?'активно':'не~~активно'||_ViewValues('$var_s') ;; проверяет активно ли окно "Блокнота"

exect=$var_handle=WinGetHandle('[CLASS:Notepad]')||$var_s=WinExists(Eval('var_handle'))?'существует':'не~~существует'||_ViewValues('$var_s') ;; проверяет существует ли окно "Блокнота"

exect=$var_handle=WinGetHandle('[CLASS:TTOTAL_CMD]')||$var_0=Assign('STRUCT_RECT',DllStructCreate(':tagRECT:'),2)+DllCall('user32.dll','bool','GetWindowRect','hwnd',Eval('var_handle'),'struct*',$STRUCT_RECT)||$var_s='Координаты~~углов~~TC:'&@CRLF&'X1:~~'&DllStructGetData($STRUCT_RECT,'Left')&@CRLF&'X2:~~'&DllStructGetData($STRUCT_RECT,'Right')&@CRLF&'Y1:~~'&DllStructGetData($STRUCT_RECT,'Top')&@CRLF&'Y2:~~'&DllStructGetData($STRUCT_RECT,'Bottom')||_ViewValues('$var_s') ;; получение координат окна Total Commander

exect=$var_handle=WinGetHandle('[CLASS:TTOTAL_CMD]')||$var_aclass=StringSplit(WinGetClassList(Eval('var_handle')),@LF)||_ViewValues($var_aclass) ;; возвращает массив всех классов элементов Total Commander

exect=$var_handle=WinGetHandle('Безымянный~~~~Блокнот')||WinClose(Eval('var_handle')) ;; определить дескриптор окна по его заголовку и закрыть

exect=$var_hdll=DllOpen('user32.dll')||$var_res=DllCall($var_hdll,'int','MessageBox','hwnd',0,'str','Текст','str','Заголовок','int',0)||$var_hdll=DllClose(($var_hdll)||_ViewValues($var_res) ;; пример вызова с помощью DLL

exect=$var_hex=Hex(PixelGetColor(730,176,0),6) bufsr=##<info=c12|2|$var_hex>||save<C:\Color.txt|2>||upd<1> ;; записать RGB Value цвет в файл Color.txt заданных координат (730,176)

exect=$var_hh=TimerInit() dilog=[combo=BOX1] exect=$var_nn=Round(TimerDiff($var_hh)/1000) GLOBALEXECT<a> ;; пример получения времени (в секундах) отображения диалога до его исчезновения

exect=$var_hh=TimerInit()||Sleep(2000)||$var_nn=TimerDiff($var_hh) GLOBALEXECT<a> ;; пример показывает сколько времени работала команда

exect=$var_htc=WinGetHandle('[CLASS:TTOTAL_CMD]')||_ViewValues('$var_htc') exect=$var_hss=DllCall('user32.dll','handle','SendMessage','hwnd',$var_htc,'uint',1074,'wparam',7,'lparam',0)[0]||_ViewValues('$var_hss') exect=$var_sss=DllCall('user32.dll','int','GetWindowTextW','hwnd',$var_hss,'wstr','''','int',4096)[2]||_ViewValues('$var_sss') ;; получить текст строки состояния левой файловой панели Total Commander

exect=$var_htc=WinGetHandle('[CLASS:TTOTAL_CMD]')||_ViewValues('$var_htc') ;; получить дескриптор Total Commander

exect=$var_hwhd=WinGetHandle('[CLASS:Progman;TITLE:Program~~Manager]')||$var_hcnt=ControlGetHandle(HWnd($var_hwhd),Null,'[CLASS:SysListView32;INSTANCE:1]')||ControlHide(HWnd($var_hwhd),Null,HWnd($var_hcnt))||Sleep(2000)||ControlShow(HWnd($var_hwhd),Null,HWnd($var_hcnt)) ;; скрыть на 2 секунды значки рабочего стола (Windows 7,10)

exect=$var_i=##$INI<8//%%COMMANDER_INI%%//Configuration//CopyComments>||$var_st=WinGetTitle('[ACTIVE]') tcimg=$cm516 buttn=TDLGCONFIGALL||+tcTCSBO22|$w|$h||+tcTCSBO27||+tcTCSBO24 exect=$var_s='Копирование~~Descript.ion~~'&($var_i=2?'ВКЛЮЧЕНО':'ОТКЛЮЧЕНО') pause=500 title=$var_s pause=5s title=$var_st ;; включить/выключить копирование Descript.ion + отобразить текущее состояние настройки в заголовке

exect=$var_i=##$INI<8//%%COMMANDER_INI%%//Configuration//CopyComments>||$var_st=WinGetTitle('[ACTIVE]')||$var_s='Копирование~~Descript.ion~~'&($var_i=10?'ВКЛЮЧЕНО':'ОТКЛЮЧЕНО') title=$var_s pause=5s title=$var_st ;; отобразить текущее состояние настройки в заголовке

exect=$var_i=##[combo=BOX16] copys=FOLDC<%WL//0//-1//png>||"%pTemp$var_i\"//0||test<1g!!$var_i!!3!!Width!!pixels//1g!!$var_i!!3!!Height!!pixels>||upd<1> ;; копировать из выделенных каталогов (с рекурсией) png файлы в создаваемую в активной панели папку Temp16, только те, ширина и высота которых равна 16 пикселям (MediaInfo.dll)

exect=$var_i=##[combo=BOX16] copys=FOLDC<%WL//0//-1//png>||"%pTemp$var_i\"//0||test<1m!!$var_i//4m!!$var_i>||upd<1> ;; копировать из выделенных каталогов (с рекурсией) png файлы в создаваемую в активной панели папку TempX, только те, ширина и высота которых равна пикселям выбранным в диалоге

exect=$var_i=##[group=BOX16] <IF> $var_i = 1 <THEN> iniwr=%%COMMANDER_PATH%%\WinColor.ini||Colors||ActiveTabColor||<info=c228> <ELSE> inidk=%%COMMANDER_PATH%%\WinColor.ini||Colors||ActiveTabColor <ENDIF> rstart ;; цвет активной вкладки включить/выключить

exect=$var_i=##[input=BOX68]||$var_m='n'&$var_i <TRAY=Трей||3||2> <TIME=n#1:h#+1:$var_m> sndps=1 ;; выдавать звуковой сигнал через заданное количество времени, выключение через значок в трее

exect=$var_i=##[input=BOX76] <FOR> 1 <TO> 10 sends=x??:INDEX:||##rndm<4|$var_i> <NEXT> GLOBALSENDS<a> ;; создать 10 паролей заданной, в диалоговом окне, длины и отобразить в таблице

exect=$var_i=##[input=BOX76] <FOR> 1 <TO> 10 sends=x??:INDEX:||##rndm<4|$var_i> <NEXT> GLOBALSENDS<c> ;; создать 10 паролей заданной, в диалоговом окне, длины и записать в буфер обмена

exect=$var_i=##[input=BOX76] bufsr=##rndm<3|$var_i>||#Eb64-||=!! ;; создать пароль случайными данными заданной длины и кодировать в MIME Base64

exect=$var_i=##[input=BOX77] exicn=%P%N||"%t"||$var_i||nodelim<> dubls=1 focusp tcimg=0~~$cm540 ;; извлечь в другую панель заданную иконку в диалоге именем библиотеки, без добавления счётчика и разделителя + обновить другую панель в другом процессе

exect=$var_i=##<info=t1-1>||$var_n=Mod(Round($var_i),2)||$var_s=$var_n=1?_Exit() sends=-1??-1||&&(.+)\R(.+)!!$1¤•¤$2 <FOR> 1 <TO> GLOBALSENDS<0> rends=GLOBALSENDS<x:INDEX:>!!-8¤•¤ vends=TOTALCMD#BAR#DATA@CRLF"%%COMMANDER_PATH%%\TCIMG.exe"@CRLFGLOBALRENDS<x1>@CRLFWCMICONS.dll,1@CRLFGLOBALRENDS<x2>??-2 barbt=1||-1||butfrom<GLOBALVENDS<t>> <NEXT> ;; из каждых двух строк ("параметры" и "подсказка") содержимого буфере обмена создать кнопки на панели инструментов TC

exect=$var_i=##<info=t1-1>||$var_n=Mod(Round($var_i),2)||$var_s=$var_n=1?_Exit() sends=-1??-1||&&(.+)\R(.+)!!$1¤•¤$2 <FOR> 1 <TO> GLOBALSENDS<0> rends=GLOBALSENDS<x:INDEX:>!!-8¤•¤ vends=TOTALCMD#BAR#DATA@CRLF"%%COMMANDER_PATH%%\TCIMG.exe"@CRLFGLOBALRENDS<x1>@CRLFWCMICONS.dll,1@CRLFGLOBALRENDS<x2>??-2 barbt=1||-1||butfrom<GLOBALVENDS<t>> <NEXT> ;; из каждых двух строк ("параметры" и "подсказка") содержимого буфере обмена создать кнопки на панели инструментов TC

exect=$var_i=##<info=t1-1>||$var_s=$var_i=4?_CmdCm('rends=-1??-1¦¦?T|v,1,4¦¦?F63¦¦?E|1:-1'):($var_i>4?_CmdCm('rends=-1??-1¦¦?T|v,3,5'):_Exit()) GLOBALRENDS<a> ;; если в буфера обмена 4 строки, то выполнить одну команду, если больше 4, то другую, если меньше, то выход

exect=$var_i=##<info=t1-1>||$var_s=$var_i=4?'v,1,4':($var_i>4?'v,3,5':_Exit())||_ViewValues('$var_s') rends=-1??-1||?T|$var_s GLOBALRENDS<a> ;; если в буфера обмена 4 строки, то выполнить одну команду, если больше 4, то другую, если меньше, то выход

exect=$var_i=##<info=t1-1>||$var_s=$var_i=4?'v,1,4':($var_i>4?'v,3,5':MsgBox(4096,'Ошибка','Э-э-э,~~а~~где~~нормальные~~данные?')&_Exit())||_ViewValues('$var_s') rends=-1??-1||?T|$var_s GLOBALRENDS<a> ;; если в буфера обмена 4 строки, то выполнить одну команду, если больше 4, то другую, если меньше, то сообщение с выходом

exect=$var_i=##<info=t1-1>||$var_s=$var_i=4?'v,1,4':'v,3,5'||_ViewValues('$var_s') rends=-1??-1||?T|$var_s GLOBALRENDS<a> ;; если в буфера обмена 4 строки, то выполнить одну команду, если нет, то другую

exect=$var_i=##<info=v0$f253//> infbx=InfoBox18 ;; показать в диалоге версию TCIMG

exect=$var_i=##<info=x1>||$var_n=$var_i=1?0:100 swcmd=sprtr=$var_n¦¦sprtr=50¦¦SeparatorAA ;; переключение размера ширины активной панели 100/50

exect=$var_i=$CmdLine[0]||_ViewValues($var_i) параметр1 параметр2 параметр3 ;; присвоить переменной $var_i количество параметров, переданных утилите при запуске

exect=$var_i='%E'='mid'?0:2 iniwr=%%COMMANDER_PATH%%\Wincmd.ini||Lister||PreloadFilterType32||$var_i tcimg=$cm304 ;; быстрый просмотр для файла под курсором, относительно расширения "mid"

exect=$var_i='%E'='mid'?0:2 iniwr=%%COMMANDER_PATH%%\Wincmd.ini||Lister||PreloadFilterType32||$var_i tcimg=$cm903 ;; просмотр для файла под курсором, относительно расширения "mid"

exect=$var_i=(<info=o9"%P"MKOFC.DLL>=0~~OR~~<info=o9"%P"MKOFC64.DLL>=0)?MsgBox(4096,'Ошибка','Нет~~файлов')&_Exit():0 infbx=InfoBox_TEST1 ;; пример: если в активной панели нет одного из заданных файлов, то сообщение и выход из команды

exect=$var_i=(5=5)AND(6=6)?1:0||_ViewValues($var_i) ;; пример вычисления нескольких условий

exect=$var_i=(5=6~~OR~~6=7)?1:0||_ViewValues($var_i) ;; пример вычисления нескольких условий

exect=$var_i=(StringInStr(FileGetAttrib('%P%N'),'D')~~AND~~FileExists('%P%N'))?'~~/D':Null cmdbt=cmd~~/c~~mklink$var_i~~''%T%N''~~''%P%N''||0 tcimg=$cm4006|540 ;; для объекта под курсором создать именную символическую ссылку в другой панели

exect=$var_i=(StringInStr(FileGetAttrib('%P%N'),'D')~~AND~~FileExists('%P%N'))?1:0||_ViewValues($var_i) ;; проверка: возвращает 1, если под курсором папка, 0 - если файл

exect=$var_i=(StringInStr(FileGetAttrib('%P%N'),'D')~~AND~~FileExists('%P%N'))?1:0||exect=DllCall('kernel32.dll','boolean','CreateSymbolicLinkW','wstr','%T%N','wstr','%P%N','dword',$var_i) tcimg=$cm4006|540 ;; для объекта под курсором создать именную символическую ссылку в другой панели

exect=$var_i=[info=x5] <SELECT> <CASE> $var_i > 0 AND $var_i < 5 <#> creat="%p"||Name.txt <CASE> $var_i > 10 AND $var_i < 15 <#> creat="%p"||Name.html <CASEELSE> creat="%p"||Name.ini <ENDSELECT> ;; если в активной панели от 0 до 5 файлов, то создаётся файл Name.txt, если от 10 до 15, то Name.html, иначе Name.ini

exect=$var_i=_InScript(2,'Min',5,8)||_ViewValues($var_i) ;; получить результат внешней au3 функции "Min"

exect=$var_i='<info=o87[tc=AA]//>'||_ViewValues('$var_i','$var_i',500,200) ;; получить расширение объекта под курсором, если папка, то "/"

exect=$var_i=<info=o9"%P"MKOFC.DLL>+<info=o9"%P"MKOFC64.DLL>=4?0:MsgBox(4096,'Ошибка','Нет~~файлов')&_Exit() infbx=InfoBox_TEST1 ;; пример: если в активной панели есть оба заданных файлов, то работа продолжается, иначе сообщение и выход из команды

exect=$var_i=<info=s70Notepad.exe>=1?_Exit():0 start=%%WINDIR%%\notepad.exe ;; если не существует процесса Notepad.exe, то запустить программу

exect=$var_i='0x'&Hex(0x00400000+0x1234ABCD)||_ViewValues($var_i) ;; сложение HEX чисел

exect=$var_i='0x'&Hex(0x00400000+0x1234ABCD,16)||_ViewValues($var_i) ;; сложение HEX чисел

exect=$var_i=10||$var_i=String($var_i)||_ViewValues(VarGetType(Eval('var_i'))) ;; пример преобразования переменной $var_i в строковый тип

exect=$var_i=2+5||$var_k=8 exect=$var_i=$var_k*$var_n+55 exect=MsgBox(4096,'Результат','$var_i') ;; пример работы с переменными и математическими действиями

exect=$var_i=4||Send('+{TAB~~'&$var_i&'}') ;; нажать TAB 4 раза

exect=$var_i=5||$var_s=StringFormat('%%.3f',$var_i)||_ViewValues($var_s) ;; пример добавление конечных нулей к цифре 5

exect=$var_i=5||$var_s=StringFormat('%%08s',$var_i)||_ViewValues('$var_s') ;; пример добавление ведущих нулей к цифре 5

exect=$var_i=BinaryLen(Binary('0x00204060'))||_ViewValues('Размер~~в~~байтах:~~'&$var_i) ;; возвращает число байтов

exect=$var_i=BinaryMid(Binary('0x10203040'),2,2)||_ViewValues('$var_i') ;; возвращает 2-ой и 3-ий байты

exect=$var_i=ControlCommand('[CLASS:AkelPad4]',Null,'AkelEditW1','GetCurrentLine',Null)||_ViewValues($var_i) ;; вставить слово "привет" в AkelPad

exect=$var_i=DirGetSize('%P%N')||_ViewValues('$var_i') ;; получить размер папки под курсором

exect=$var_i=DirGetSize('C:\Test')||_ViewValues('$var_i') ;; возвращает размер папки Test в байтах

exect=$var_i=DllCall('user32.dll','int','GetSystemMetrics','int',4)||_ViewValues($var_i) ;; получить высоту заголовка окна

exect=$var_i=Execute(@DesktopWidth/2+@DesktopHeight/2)||_ViewValues($var_i) ;; получить результат математического выражения с макросами ширины и высоты экрана

exect=$var_i=Execute(ClipGet())||MsgBox(4096,'Результат','$var_i') bufsr=##$var_i ;; выполнить математическое выражение в буфере обмена, к примеру: (1+2)*3+2^3

exect=$var_i=Execute(ClipGet()+1)||MsgBox(4096,'Результат','$var_i') bufsr=##$var_i ;; прибавить к числу в буфере обмена единицу

exect=$var_i=FileExists('"%T"PsiPhon.f_l')?0:MsgBox(4096,'Ошибка','Нет~~файла')+_Exit() infbx=InfoBox_TEST1 ;; если в неактивной панели нет файла PsiPhon.f_l, то выдать сообщение и выход, если есть запустить следующую команду

exect=$var_i=FileExists('"%T"PsiPhon.f_l')||_ViewValues('$var_i') ;; возвращает 1 - если файл PsiPhon.f_l существует в неактивной панели и 0, если нет

exect=$var_i=FileExists('C:\Test\test.txt')||_ViewValues('$var_i') ;; возвращает 1 - если файл test.txt существует и 0, если нет

exect=$var_i=FileGetSize('C:\Test\test.txt')||_ViewValues('$var_i') ;; возвращает размер файла test.txt в байтах

exect=$var_i=Hex(PixelGetColor(0,0),6)||_ViewValues(Eval('var_i')) ;; возвращает цвет указанного пикселя левого верхнего угла

exect=$var_i=Hex(PixelGetColor(0,0),6)||_ViewValues(Eval('var_i'))||Opt('PixelCoordMode',0)||$var_i=Hex(PixelGetColor(0,0,'[ACTIVE]'),6)||_ViewValues(Eval('var_i')) ;; возвращает цвет указанного пикселя 1) левого верхнего угла экранные координат 2) относительно координат активного окна

exect=$var_i=InetGetSize('http://tc-image.3dn.ru/Image/Sitelogo/TCImageGroup_18.png')||_ViewValues($var_i) ;; получить размер файла в байтах

exect=$var_i=&#73sBinary(Binary('0x00204060'))||_ViewValues($var_i) ;; возвращает 1 , т.к. бинарный тип

exect=$var_i=MouseGetCursor()||_ViewValues($var_i) ;; получить ID отображаемого состояния курсора мыши

exect=$var_i=Number(<info=t1-1>)||$var_n=Floor($var_i)-Mod(Floor($var_i),2) bufsr=#L1:$var_n||&&(.+)\R(.+)!!$2~~-~~$1 ;; в содержимом буфера обмена объединить каждые две строки в одну (нечётные - чётные)

exect=$var_i=Number(ClipGet())||$var_n=Floor($var_i)-Mod(Floor($var_i),2)||_ViewValues($var_n) ;; если в буфере обмена число нечётное или с плавающей точкой, то округлить его до ближайшего чётного числа в меньшую сторону

exect=$var_i=Number(ClipGet())||$var_n=Round($var_i)+Mod(Round($var_i),2)||_ViewValues($var_n) ;; если в буфере обмена число нечётное или с плавающей точкой, то округлить его до ближайшего чётного числа в большую сторону

exect=$var_i=Ping('tc-image.3dn.ru',250)||_ViewValues('$var_i') ;; возвращает задержки в миллисекундах

exect=$var_i=Round(DirGetSize('C:\Test')/1024)||_ViewValues('$var_i') ;; возвращает размер папки Test в килобайтах

exect=$var_i=Round(DirGetSize('C:\Test')/1024/1024)||_ViewValues('$var_i') ;; возвращает размер папки Test в мегабайтах

exect=$var_i=Round(FileGetSize('C:\Test\test.txt')/1024)||_ViewValues('$var_i') ;; возвращает размер файла test.txt в килобайтах

exect=$var_i=Round(FileGetSize('C:\Test\test.txt')/1024/1024)||_ViewValues('$var_i') ;; возвращает размер файла test.txt в мегабайтах

exect=$var_i=Sqrt(78)||$var_n=$var_i=Int($var_i)?1:0||_ViewValues($var_n) ;; проверяет является ли число 78 полным квадратом

exect=$var_i=Sqrt(ClipGet())||$var_n=$var_i=Int($var_i)?1:0||_ViewValues($var_n) ;; проверяет является ли число из буфера обмена полным квадратом

exect=$var_i=StringInStr('|jpg|gif|png|','|%E|')?_CmdCm('infbx=InfoBox_TEST1'):_CmdCm('infbx=InfoBox_TEST2') ;; пример проверки 3-х расширений, если под курсором расширение совпадает, то выдаётся сообщение №1, если нет - сообщение №2

exect=$var_i=StringRight('D:\Test\File.vhd',3)='vhd'?_CmdCm('команда'):_Exit() ;; проверить расширение файла, если совпадает, то запустить заданную команду, в ином случае выход

exect=$var_i=StringRight('D:\Test\File.vhd',3)='vhd'?1:0||_ViewValues($var_i) ;; проверить расширение файла (возвращается 1 или 0)

exect=$var_i=StringRight('D:\Test\File.vhd',3)='vhd'||_ViewValues($var_i) ;; проверить расширение файла (возвращается True или False)

exect=$var_i=StringSplit('%P%N','\')[0]-1||_ViewValues($var_i) ;; получить уровень вложенности пути под курсором

exect=$var_i1=[info=x10]||$var_i2=[info=x11]||$var_i3=($var_i1=0~~OR~~$var_i2=0)?_Exit():($var_i1>$var_i2?$var_i2:$var_i1) slist=[tc=AL] sends=[tc=TL]??-1 forpgs <FOR> 1 <TO> $var_i3 copyy=GLOBALSLIST<:INDEX:>||GLOBALSENDS<:INDEX:>//0 <NEXT> desel=10 ;; копировать выделенные файлы по одному в соответствующие порядку выделения папки другой панели

exect=$var_i1=[info=x10]||$var_i2=[info=x11]||$var_i3=($var_i1=0~~OR~~$var_i2=0)?_Exit():($var_i1>$var_i2?$var_i2:$var_i1) slist=[tc=AL] sends=[tc=TL]??-1 forpgs <FOR> 1 <TO> $var_i3 copyy=GLOBALSLIST<:INDEX:>||GLOBALSENDS<:INDEX:>//0 <NEXT> ;; копировать выделенные файлы по одному в соответствующие порядку выделения папки другой панели

exect=$var_i1=[info=x10]||$var_i2=[info=x11]||$var_i3=($var_i1=0~~OR~~$var_i2=0)?_Exit():($var_i1>$var_i2?$var_i2:$var_i1) slist=[tc=AL] sends=[tc=TL]??-1 forpgs <FOR> 1 <TO> $var_i3 movee=GLOBALSLIST<:INDEX:>||GLOBALSENDS<:INDEX:>//0 <NEXT> desel=10 ;; переместить выделенные файлы по одному в соответствующие порядку выделения папки другой панели

exect=$var_i1=1||$var_i2=2||$var_i3=3||$var_i4=4||$var_i5=($var_i1<>$var_i2~~AND~~$var_i3<>$var_i4)?10:20 GLOBALEXECT<a> ;; пример присвоение переменной $var_i5 значения, относительно условия (результат 10, т.к условие 1<>2 и 3<>4 верно)

exect=$var_i1=1||$var_i2=2||$var_i3=3||$var_i4=4||$var_i5=($var_i1=$var_i2~~AND~~$var_i3=$var_i4)?10:20 GLOBALEXECT<a> ;; пример присвоение переменной $var_i5 значения, относительно условия (результат 20, т.к условие 1=2 и 3=4 не верно)

exect=$var_i1=1||$var_i2=2||$var_i3=3||$var_i4=4||$var_i5=($var_i1=$var_i2~~OR~~$var_i3<>$var_i4)?10:20 GLOBALEXECT<a> ;; пример присвоение переменной $var_i5 значения, относительно условия (результат 10, т.к одно из условий 1=2 , 3<>4 верно)

exect=$var_i1=5||$var_i2=5||$var_i3=$var_i1<>$var_i2?10:20 GLOBALEXECT<a> ;; пример присвоение переменной $var_i3 значения, относительно условия (результат 20, т.к условие 5<>5 не верно)

exect=$var_i1=5||$var_i2=5||$var_i3=$var_i1=$var_i2?10:20 GLOBALEXECT<a> ;; пример присвоение переменной $var_i3 значения, относительно условия (результат 10, т.к условие 5=5 верно)

exect=$var_i1=StringIsLower('фывапр')||$var_i2=StringIsLower('Asdfghj') GLOBALEXECT<a> ;; проверяет наличие в строке только строчных букв (в нижнем регистре)

exect=$var_i1=StringIsUpper('фывапр')||$var_i2=StringIsUpper('ASDFG') GLOBALEXECT<a> ;; проверяет наличие в строке только заглавных букв (в верхнем регистре)

exect=$var_i1=StringIsXDigit('00FC')||$var_i2=StringIsXDigit('0x2570') GLOBALEXECT<a> ;; проверяет наличие в строке только шестнадцатеричных цифр (0-9, A-F)

exect=$var_ibit=##<info=z2%P%N|Bit~~rate|~~kb/s//> copys=%WL||"%t"$var_ibit\//0||test<1g!!$var_ibit!!2!!Bit~~rate!!~~kb/s>||upd<3> ;; копировать в другую панель из выделенного аудиофайлы, у которых битрейт такой же как у файла под курсором, создав папку именем битрейта (используется библиотека MediaInfo.dll)

exect=$var_ibit=##<info=z2%P%N|Bit~~rate|~~kb/s//> copys=PS<"%p"//1//0//*.mp3>||"%t"$var_ibit\//0||test<1g!!$var_ibit!!2!!Bit~~rate!!~~kb/s>||upd<3> ;; в активной панели найти все файлы mp3 (без рекурсии) и копировать в другую панель те, у которых битрейт такой же как у файла под курсором, создав папку именем битрейта (используется библиотека MediaInfo.dll)

exect=$var_ibit=##<info=z2%P%N|Bit~~rate|~~kb/s//>||_ViewValues('$var_ibit') ;; получить битрейт аудиофайла (используется библиотека MediaInfo.dll)

exect=$var_ibutton=MsgBox(4096,'Сообщение','Сделайте~~выбор.') GLOBALEXECT<a> ;; пример окна сообщения

exect=$var_ifile=##<info=x5>||$var_ifile=Floor($var_ifile/2) marks=1||numb<$var_ifile> ;; выделить первую половину файлов в активной панели

exect=$var_ifile=##<info=x5>||$var_stc=Floor($var_ifile/2)&'f' sends=[tc=AL$var_stc]??-1 GLOBALSENDS<a> ;; получить список первой половины файлов в активной панели

exect=$var_ii=##[input=BOX68]||$var_im=$var_ii&'n' pause=$var_im sndps=1 exect=MsgBox(262144+64,'Напоминаю','Прошло~~$var_ii~~минут(а/ы)~~!'&@CR&'Пора~~на~~кухню!') ;; через заданное количество минут выдать сообщение (количество вводится в диалоге)

exect=$var_ii=##[input=BOX68]||$var_im=$var_ii&'n' pause=$var_im sndps=1 exect=SplashTextOn('Напоминаю','Прошло~~$var_ii~~минут(ы)',200,50)&Sleep(10000)&SplashOff() ;; через заданное количество минут выдать сообщение (количество вводится в диалоге)

exect=$var_ii=##[input=BOX68]||$var_im=$var_ii&'n'||$var_pid=@AutoItPID pause=$var_im <TIME=h#-1:h#+1:s5> <IF> [info=s70*$var_pid] = 1 <THEN> sndps=1 <ELSE> close=&#58PID: <ENDIF> <TIMEEND> exect=MsgBox(262144+64,'Напоминаю','Прошло~~$var_ii~~минут~~!'&@CR&'Пора~~на~~кухню!') ;; через заданное количество минут выдать сообщение (количество вводится в диалоге) + в течении отображения диалога издавать звуковое уведомление $var_ii через каждые 5 секунд

exect=$var_ipid=Run('notepad.exe')||ProcessWaitClose($var_ipid)||MsgBox(4096,Null,'процесс~~завершился') ;; запускает "Блокнот" и ожидает его закрытия

exect=$var_ipid=Run('notepad.exe')||Sleep(3000)||ProcessClose($var_ipid) ;; запустить "Блокнот" и через 3 секунды завершить процесс

exect=$var_ipid=WinGetProcess('[CLASS:TTOTAL_CMD]') cmdbt=PowerShell~~-Command~~Get-Process~~-id~~$var_ipid|fl~~*~~-Force|Format-List|Out-String~~-Width~~4096||0||redir<1> anf2d=$GLOBALCMDBT||2||??ps3||begin<0> GLOBALANF2D<a> ;; получить информацию процесса Total Commander

exect=$var_ipid=WinGetProcess('[CLASS:TTOTAL_CMD]')||_ViewValues($var_ipid) ;; получить PID процесса Total Commander

exect=$var_is=StringIsDigit('12333')||$var_bb=StringIsDigit('1.2') GLOBALEXECT<a> ;; проверяет наличие в строке только цифр (0-9)

exect=$var_is=StringIsFloat('1.5')||$var_bb=StringIsFloat('2') GLOBALEXECT<a> ;; проверяет, является ли строка числом с плавающей точкой

exect=$var_is=StringIsInt('1.5')||$var_bb=StringIsInt('2') GLOBALEXECT<a> ;; проверяет, является ли строка целым числом

exect=$var_isize=DriveSpaceFree('C:\')||_ViewValues('На~~диске~~свободно~~'&'$var_isize'&'~~Mb') ;; возвращает размер свободного дискового пространства диска C:\

exect=$var_isize=DriveSpaceTotal('C:\')||_ViewValues('На~~диске~~занято~~'&'$var_isize'&'~~Mb') ;; возвращает размер занятого дискового пространства диска C:\ в Mb

exect=$var_isize=Round(DriveSpaceTotal('C:\')/1024,2)||_ViewValues('На~~диске~~занято~~'&'$var_isize'&'~~Gb') ;; возвращает размер занятого дискового пространства диска C:\ в Gb

exect=$var_istate=WinGetState('[CLASS:TTOTAL_CMD]')||$var_s=BitAND($var_istate,8)?'активно':'не~~активно'||_ViewValues('$var_s') ;; определяет активно или нет окно Total Commander

exect=$var_istate=WinGetState('[CLASS:TTOTAL_CMD]')||_ViewValues($var_istate) ;; возвращает значение, указывающее состояние окна Total Commander

exect=$var_item=ClipGet() folds="%p"||[combo=BOX_XX] ;; пример передачи буфера обмена в параметр [combo]

exect=$var_item=ClipGet() shape=1 sends=@[combo=BOX_U29.1]??1||^^~~ renms=%WL||GLOBALSENDS<1>||bkt<[combo=BOX_U5]!!!!!![combo=BOX_U4]!!1> renms=$GLOBALRENMS1||#G7||upd<1> ;; переименовать выделенные объекты в имя из буфера обмена, включается счетчик, выбор разделителя и разрядность счетчика в диалоговом окне

exect=$var_item=StringRegExpReplace(ClipGet(),'[\r\n]+','|') folds="%p"||[combo=BOX_XX] ;; пример передачи списка из буфера обмена в параметр [combo]

exect=$var_iw=10||$var_ih=5 sends=#??-6^||#K$var_ih*$var_iw!!%P%N^ imgnz=$GLOBALSENDS||"%t"//0||$var_iw,$var_ih||upd<3> ;; размножить изображение под курсором 10 раз по ширине и 5 по вертикали, создав в другой панели изображение именем файла

exect=$var_ix=<info=x165>||$var_iy=<info=x166>||$var_s='---------------------------'&@CRLF&'%P%N'&@CRLF&'<info=o44%P%N//>'||ToolTip('$var_s',$var_ix,$var_iy,'Информация',1,1)||Sleep(5000) ;; создать всплывающую подсказку на 5 секунд в позиции пункта с информацией: Путь объекта под курсором и его даты создания

exect=$var_k1=StringLen(ClipGet())*52&'x85' GLOBALEXECT<a> ;; записать в переменную $var_n1 количество символов строки буфера обмена, умноженное на 52 добавив строку "x85"

exect=$var_k1=StringLen('строка')||$var_k2=StringLen('строка~~с~~пробелами') GLOBALEXECT<a> ;; возвращает количество символов строки

exect=$var_lines1='111111'||$var_lines2='222222' dilog=[edits=BOX_N2] GLOBALEDITS<a> ;; пример ввода данных по умолчанию в диалог edits

exect=$var_list='20150801153111'&@CRLF&'20160902163212' modfs=%WL||0||list<$var_list> ;; изменить 2-м выделенным объектам дату модификации списком дат из переменной

exect=$var_list='20150801153111'&@CRLF&'20160902163212'||_ViewValues('$var_list') ;; создать и просмотреть список дат

exect=$var_n='"%O"' xlist=[tc=AM] sends=<info=t1$GLOBALXLIST//> count=GLOBALXLIST<t>||$var_n||0||countline<0> rends=$GLOBALXLIST??-1||?G|GLOBALCOUNT<1>:-1 winls=$GLOBALRENDS||800x600||GLOBALSENDS<1>||but<2> lbicl=$GLOBALWINLS||"%p$var_n".dll|1||0||progres<> delsm="%p$var_n"||1 exicn=GLOBALLBICL<1>||"%p$var_n"||upd<1> ;; открыть для просмотра и редактирования выделенные папки библиотек значков.

exect=$var_n=##$INI<8//$f99?Buttonbar//Buttonbar//Buttonheight>||$var_n=$var_n-5||$var_k=$var_n-9||$var_i=##[combo=BOX_U8] buttc=$var_i ;; установить размер значков на панели инструментов, выбор размера в диалоге

exect=$var_n=##>s87AkelPad.exe||$var_i=BitAND($var_n,16)?1:0||_ViewValues($var_i) ;; получить 1 - если окно свёрнуто, 0 - если окно AkelPad не свёрнуто

exect=$var_n=&#95;MsgBox()||_ViewValues('$var_n') ;; пример использования функции _MsgBox(), запускающий окно сообщения msgbx

exect=$var_n=&#95;MsgBox('BOX_TEST3')||_ViewValues('$var_n') ;; пример использования функции _MsgBox(), запускающий окно сообщения msgbx

exect=$var_n=0||$var_i=$var_n=1?_CmdCm('infbx=InfoBox_TEST1'):_CmdCm('infbx=InfoBox_TEST2') ;; пример: если $var_n=0 , то выполняется одна команда, в ином случае другая

exect=$var_n=1||$var_i=$var_n=1?_CmdCm('infbx=InfoBox_TEST1'):_CmdCm('infbx=InfoBox_TEST2') ;; пример: если $var_n=1 , то выполняется одна команда, в ином случае другая

exect=$var_n=1||$var_i=$var_n=1?_CmdCm('sends=%P%N??-1¦¦formt<1,63><¤>GLOBALSENDS<a>'):'''' ;; пример: если $var_n=1, то прочитать файл под курсором и вывести в таблице

exect=$var_n=3.14159||$var_i=IsFloat($var_n)||_ViewValues($var_i) ;; пример проверки является ли переменная с плавающей точкой

exect=$var_n=3.14159||$var_i=&#73sInt($var_n)||_ViewValues($var_i) ;; пример проверки является ли переменная целочисленным типом данных

exect=$var_n=3.14159||$var_i=IsNumber(Eval('var_n'))||_ViewValues($var_i)||$var_n='Привет'||$var_i=IsNumber(Eval('var_n'))||_ViewValues($var_i) ;; пример проверки является ли переменная числовым типом данных

exect=$var_n=3||$var_i=($var_n=1~~OR~~$var_n=2~~OR~~$var_n=5)?_CmdCm('infbx=InfoBox_TEST1'):_CmdCm('infbx=InfoBox_TEST2') ;; пример проверки условий с помощью

exect=$var_n=3||$var_i=StringInStr('1|2|5',$var_n)?_CmdCm('infbx=InfoBox_TEST1'):_CmdCm('infbx=InfoBox_TEST2') ;; пример проверки условий с помощью

exect=$var_n=5||$var_n*=10||_ViewValues($var_n) ;; пример умножения существующей переменной

exect=$var_n=5||$var_n/=10||_ViewValues($var_n) ;; пример деления существующей переменной

exect=$var_n=5||$var_n+=10||_ViewValues($var_n) ;; пример присвоения к существующей переменной

exect=$var_n=5||$var_n-=10||_ViewValues($var_n) ;; пример отнимания от существующей переменной

exect=$var_n=IsDeclared('var_s')||_ViewValues('$var_n') ;; переменная $var_n=0 , т.к переменной $var_s не существует

exect=$var_n=MsgBox(4+32+262144,'Сообщение','Заменить~~содержимое~~в~~папке~~ПН?')||$var_i=$var_n=7?_Exit():1 delss=PS<%T%M>||1 copys=FOLDC<%WL>||%T%M//0 beepss ;; заменить содержимое каталога в панели назначения на содержимое выделенных папок в активной панели

exect=$var_n=MsgBox(4+32+262144,'Сообщение','Отменить~~задачу?',20)||$var_i=$var_n=6?_Exit():1||_ViewValues('Работа~~продолжена') ;; пример вызова диалога, завершение при нажатии на кнопку "Да", продолжение при нажатии на кнопку "Нет", при истечении 20 секунд после появления диалога так же продолжения работы...

exect=$var_n=MsgBox(4+32+262144,'Сообщение','Отменить~~последнее~~переименование?')||$var_i=$var_n=7?_Exit():1 renms=$f200Lists\AfterRenaming.txt||list<$f200Lists\BeforeRenaming.txt>||upd<1> ;; отменить последнее переименование осуществленное командами TCIMG (требуется подтверждение)

exect=$var_n=MsgBox(4+32+262144,'Сообщение','Продолжить~~работу?',20)||$var_i=$var_n=7?_Exit():1||_ViewValues('Работа~~продолжена') ;; пример вызова диалога, завершение при нажатии на кнопку "Нет", продолжение при нажатии на кнопку "Да", при истечении 20 секунд после появления диалога так же продолжения работы...

exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~выделенные~~объекты?')||$var_i=$var_n=7?_Exit():1 delss=%WL||1 ;; удалить выделенные объекты минуя корзину (требуется подтверждение)

exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~текущую~~папку?')||$var_i=$var_n=7?_Exit():1 tcimg=$cm2002 delsm="%p"||1||upd<1> ;; удалить текущую папку (возможность отмены действия)

exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~файлы~~с~~счётчиком~~_№~~в~~конце~~имени?')||$var_i=$var_n=7?_Exit():1 delss=PS<"%p"//1//0>||1||test<1n!!_\d+$>||upd<1> ;; удалить файлы в активной панели с нумерацией _№ в конце имени (без рекурсии)

exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~файлы~~с~~цифрами~~в~~именах?')||$var_i=$var_n=7?_Exit():1 delss=PS<"%p"//1//0>||1||test<1n!!\d>||upd<1> ;; в активной панели удалить файлы в имени которых есть цифры (без рекурсии)

exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~файлы~~с~~цифрами~~в~~именах?')||$var_i=$var_n=7?_Exit():1 delss=PS<"%p"//1//0>||1||test<1n!!\d>||upd<1> ;; в активной панели удалить файлы в имени которых есть цифры (с запросом для подтверждения)

exect=$var_n=Number(WinGetHandle('[ACTIVE]')) dubls=3 infow=2||TitleWindow1||attach<@$var_n> tcimg=$cm540 ;; после заголовка активного окна создать информационную строку, настройки в секции [TitleWindow1], если включена, то выключить с обновлением заголовка

exect=$var_n=Number(WinGetHandle('[ACTIVE]'))||_ViewValues($var_n) ;; получить хендл активного окна в виде десятичного числа

exect=$var_n=UBound(FileReadToArray('%P%N'))||_ViewValues($var_n) ;; получить количество строк файла под курсором

exect=$var_n1=Int(10.793)||$var_n2=Int(1+2+10.8)||$var_n3=Int('-3.8') GLOBALEXECT<a> ;; возвращает числовое (целое) представление выражения

exect=$var_n1=Mod(4,7)||$var_n2=Mod(1,3/4)||$var_n3=Mod(4,2) GLOBALEXECT<a> ;; вычисляет остаток от деления

exect=$var_n1=Number('2,000')||$var_n2=Number('0x000009')||$var_n3=Number('3tmp')||$var_dd=Number('tmp3') GLOBALEXECT<a> ;; возвращает числовое представление выражения.

exect=$var_n1=StringCompare('MELУN','melуn')||$var_n2=StringCompare('MELУN','melуn',1)||$var_n3=StringCompare('MELУN','melуn',2) GLOBALEXECT<a> ;; сравнивает две строки с использованием дополнительных параметров

exect=$var_n1=StringLen(ClipGet()) GLOBALEXECT<a> ;; записать в переменную $var_n1 количество символов строки буфера обмена

exect=$var_n1=StringLen(ClipGet())*52 GLOBALEXECT<a> ;; записать в переменную $var_n1 количество символов строки буфера обмена, умноженное на 52

exect=$var_name='"%O"'||$var_path='%P%N' <IF> <info=n4|32-255??$var_name> = 0 <THEN> sends=$var_name??1||@@Diacritic!!1 copyy=%P%N||"%p"//4||##GLOBALSENDS<1> exect=$var_path='GLOBALCOPYY<1>' <ENDIF> start=%%COMMANDER_PATH%%\Programs\Atlantis\Atlantis.exe||$var_path ;; открыть файл под курсором в программе Atlantis, если имя файла имеет не ASCII-символы, то они заменяются и открывается дублированный файл с новым именем

exect=$var_name='"%O"'||$var_path='%P%N' <IF> <info=n4|32-255??$var_name> = 0 <THEN> sends=$var_name??1||@@Diacritic!!1 copyy=%P%N||"%p"//4||##GLOBALSENDS<1> exect=$var_path='GLOBALCOPYY<1>' textt=%%COMMANDER_PATH%%\Programs\Atlantis\Temp\Atlantis_Name.txt||$$@CRLF$var_path@CRLF"%O"||formt<60>||code<4>||backup<0> <ENDIF> start=%%COMMANDER_PATH%%\Programs\Atlantis\Atlantis.exe||$var_path ;; открыть файл под курсором в программе Atlantis, если имя файла имеет не ASCII-символы, то они заменяются и открывается дублированный файл с новым именем + записать с папку программы в папку Temp во временный файл Atlantis_Name.txt имена для последующего переименования

exect=$var_name=##<info=o72%P%N//> copys=%WL||"%p"//0||<input=Редактировать~~имя|Изменение~~базового~~имени|$var_name|500|100>||modfs<0||#SISDATE>||upd<1> ;; создать копию файла под курсором с именем вводимым в диалоге

exect=$var_name=##<info=o72%P%N//> renmm=%P%N||##<input=Редактировать~~имя|Изменение~~базового~~имени|$var_name|500|100>||modfs<0||#SISDATE>||upd<1> ;; Редактировать базовое имя объекта (без расширения) под курсором в диалоговом окне с изменением времени на текущее

exect=$var_name='%O' slist=%WL||sortnm<1> renms=$GLOBALSLIST||##cntr<$var_name|1|1> pause=500 renms=GLOBALRENMS<t>||&&(.*)_\d+!!$1||&&0(\d+)!!$1 ;; переименовать выделенные объекты по счётчику

exect=$var_name=InputBox('Запрос','Введите~~имя~~файла','<info=f*63,62,61*~~-~~*([tc=AP])>') <IF> $var_name = '''' <THEN> toexit <ENDIF> exect=_ViewValues($var_name) ;; ввести значение в диалоге, если же диалог закрывается или нажимается кнопка "Отмена", то выход из программы

exect=$var_name=InputBox('Запрос','Введите~~имя~~файла','<info=f*63,62,61*~~-~~*([tc=AP])>') <IF> $var_name > '''' <THEN> exect=_ViewValues($var_name) <ELSE> toexit <ENDIF> ;; ввести значение в диалоге, если же диалог закрывается или нажимается кнопка "Отмена", то выход из программы

exect=$var_name=InputBox('Запрос','Введите~~имя~~файла','<info=f*63,62,61*~~-~~*([tc=AP])>')||$var_i='$var_name'?1:_Exit()||_ViewValues($var_name) ;; ввести значение в диалоге, если же диалог закрывается или нажимается кнопка "Отмена", то выход из программы

exect=$var_ngrad=180||$var_nradian=$var_ngrad/57.2957795130823||MsgBox(4096,'Сообщение','Радианы:~~'&$var_nradian) ;; получить радианы из заданных градусов

exect=$var_nradian=3||$var_ngrad=$var_nradian*57.2957795130823||MsgBox(4096,'Сообщение','Градусы:~~'&$var_ngrad) ;; получить градусы из заданных радиан

exect=$var_num=##[input=BOX_V19] sends=-1||?F1,63,54,sps100 sends=!!2||#K$var_num!!@CRLFGLOBALSENDS<1> rends=GLOBALSENDS<t2>??-1||#N#@@#!!tnum[1|1|1] GLOBALRENDS<c> ;; простой генератор ССЫЛОК или ИМЕН из одной строки в буфере (число строк в запросе) с добавлением счетчика 1,2,3 к имени справа

exect=$var_o=ObjCreate('Shell.Application')||Eval('var_o').FileRun ;; запуск диалога "Выполнить" WIN+R

exect=$var_p=##FOLDM<%WL//2//-1>??-1 descl=$var_p beepss ;; в выделенных папках и их подпапках в файлах descript.ion удалить комментарии несуществующих объектов

exect=$var_p=ProcessExists('notepad.exe') iconw=$var_p||TCIMG.dll,9 ;; установить окна Notepad заданную иконку (передача команде PID окна)

exect=$var_path=##$INI<8//%%TCIMG_PATH%%\TCIMGU.ini//Navigation//Path> patha=$var_path ;; перейти в активной панели в папку, прописанную в файле TCIMGU.ini в секции [Navigation] в ключе Path

exect=$var_path='<info=x50>' rstart tcprm=OPENBAR~~''$var_path'' ;; перезапустить Total Commander и открыть активную до перезапуска панель инструментов

exect=$var_path=DllCall('kernel32.dll','uint','GetTempFileNameW','wstr','C:\','wstr','_','uint',0,'wstr','''')||_ViewValues($var_path[4],'temp_file') ;; получить временный файл

exect=$var_pi=2*ACos(0)||$var_nd=$var_pi/180||$var_nr=180/$var_pi||$var_na=&#65Cos(0.707106781186548)*$var_nr||$var_nb=&#65Cos(-1)*$var_nr||&#65Cos(0.5)/$var_nd GLOBALEXECT<a> ;; различные вычисления с использованием функции арккосинуса угла

exect=$var_pi=2*ASin(1)||$var_nd=$var_pi/180||$var_nr=180/$var_pi||$var_na=&#65Sin(0.707106781186547)/$var_nd||$var_nb=&#65Sin(1)*$var_nr||&#65Sin(0.5)*$var_nr GLOBALEXECT<a> ;; различные вычисления с использованием функции арксинуса угла

exect=$var_pi=3.14159265358979||$var_nd=$var_pi/180||$var_nr=180/$var_pi||$var_na=Cos($var_pi/4)||$var_nb=Cos(90*$var_nd)||Cos(30/$var_nr) GLOBALEXECT<a> ;; различные вычисления с использованием функции косинуса угла

exect=$var_pi=3.14159265358979||$var_nd=$var_pi/180||Sin(90*$var_nd) GLOBALEXECT<a> ;; различные вычисления с использованием функции синуса угла

exect=$var_pi=3.14159265358979||$var_nr=180/$var_pi||Tan(30/$var_nr) GLOBALEXECT<a> ;; различные вычисления с использованием функции тангенса угла

exect=$var_pi=4*ATan(1)||$var_nd=$var_pi/180||$var_nr=180/$var_pi||$var_na=&#65Tan(0.577350269189625)*$var_nr||$var_nb=&#65Tan(1)*$var_nr||&#65Tan(9999999999999999)/$var_nd GLOBALEXECT<a> ;; различные вычисления с использованием функции арктангенса угла

exect=$var_pid=##<info=x62> <TIME=n00> exect=ProcessExists($var_pid)?0:_CmdCm('close=&#58PID:') tcimg=$cm582 ;; каждый час сохранить историю каталогов в Total Commander, если окно TC нет, то процесс при проверке отключается.

exect=$var_pos=MouseGetPos()||$var_hex=Hex(PixelGetColor($var_pos[0],$var_pos[1],0),6) bufsr=##<info=c12|2|$var_hex>||save<C:\Color.txt|2> ;; записать RGB Value цвет в файл Color.txt пикселя под курсором

exect=$var_puser=DllCall('userenv.dll','bool','GetProfilesDirectoryW','wstr','''','dword*',4096)||_ViewValues($var_puser[1],'user_path') ;; получить папку пользователя

exect=$var_put=##@[tc=AP] sends=-1??-1||?F1,54,63,fun_heshcrc1 decod=2||x||$var_put||contentlst<$GLOBALSENDS> renms=$GLOBALDECOD||extplus<>||upd<1> ;; создать в активной панели файлы из кодированных строк b64 в буфере обмена

exect=$var_put=##@[tc=AP] sends=-1??-1||formt<54,1,63> <IF> <info=s70AdvOR.exe> = 0 <THEN> start=AdvOR||&&procwait buttn=GLOBALPROGR<2>||x|$l{DOWN~~5}||Button3||Button8 pause=5s <ENDIF> urlxt=$GLOBALSENDS||sagent<W4>||sproxy<1|2|127.0.0.1:9090>||$var_put//9//Magnet-link.txt||?Fserch119||delim<@CRLF!!1>||code<0>||pause<2-3>||owrite<2|1>||progres<> ;; запустить AdvOR (если он не запущен) и закачать из списка ссылок-топиков rutracker.org из буфера обмена магнет ссылки в создаваемый файл Magnet-link.txt в активной панели

exect=$var_put=##@[tc=AP] sends=-1??-1||formt<54,63> urlra=$GLOBALSENDS|4||$var_put::!!0!!(.+\\)(\w+\:/+)([^/]+).*!!$1$3\\vid-link.txt||?Fserch79,6,1||pause<1-2>||owrite<1>||progres<> GLOBALURLRA1<a> downl=@//9||listu<$GLOBALURLRA1>||pause<1-2>||owrite<2|1>||progres<> GLOBALDOWNL0<a> GLOBALDOWNL<a> GLOBALDOWNL1<a> GLOBALDOWNL2<a> ;; содержимое всех страниц интернет ссылок из буфера обмена сохранить в активную панель в создаваемые именные папки сайтов в именные файлы сайтов + закачать все ссылки из созданных файлов в соответствующие папки

exect=$var_put=##@[tc=AP] sends=-1??-1||formt<54,63> urlxt=$GLOBALSENDS|4||$f254//9//Summa.txt||pause<1-2>||?Fvid13,1,6||delim<@CRLF!!1>||owrite<1> downl=$var_put//9||GLOBALURLXT<1>||convert<##@@e67::;;$$@@e73::;;?F63;;/!!\>||uformat<0>||pause<1-2>||owrite<2|1> tempxx ;; закачать в активную панель, в создаваемые папки из части url, найденные на страницах с контентом - видео файлы

exect=$var_put=##@[tc=AP]||$var_put=StringReplace('$var_put','\\','/')||_ViewValues('$var_put') ;; заменить слеш в пути активной панели

exect=$var_put=##@[tc=AP]||$var_put=StringTrimRight('$var_put',1) movee=<xfolder=51//$f45>||$var_put//0 slist=GLOBALMOVEE1<t1>||test<1e!!zip> <IF> <info=f401GLOBALSLIST<1>//> < 2 AND <info=f402GLOBALSLIST<1>//> < 1 <THEN> zunpf=GLOBALSLIST<1>||$var_put//0 delsm=GLOBALZUNPF0<1>||1||upd<1> <ELSE> zunpf=GLOBALSLIST<1>||$var_put//0||foldname<1> delsm=GLOBALZUNPF0<1>||1||upd<1> <ENDIF> ;; переместить в активную панель последний архив из папки C:\Users\имя\Downloads и если это zip, то распаковать его в именной каталог или без него, в зависимости от условия

exect=$var_put=##@[tc=AP]||$var_put=StringTrimRight('$var_put',1) sends=-1??-1||formt<54,1,63,6> slist=$GLOBALSENDS||#Hcrc32|1|1 downl=$var_put//9||$GLOBALSENDS||convert<##<listx=$GLOBALSLIST>\;;$$file-rndm[3-|8].;;$$@@e71::>||uformat<0>||owrite<2|1>||pause<1-2>||progres<> ;; закачать список ссылок из буфера в создаваемые папки из значений ссылок в виде хеша crc32, в активной панели со случайными именами

exect=$var_put=##@[tc=AP]||$var_put=StringTrimRight('$var_put',1) xends=-1||formt<56,54,51> rends=GLOBALXENDS<1>??1||formt<lin131,63,56,54,51> rends=GLOBALXENDS<1>??2||formt<lin133,63,56,54,51> sends=#GLOBALRENDS<1>\\4||formt<serch48,lin132,lin135,1,63,56,54,51> sends=#GLOBALRENDS<2>\\4!!2||formt<serch49,lin132,lin134,lin135,1,63,56,54,51> zends=GLOBALSENDS<t1,2>??-1 GLOBALZENDS<c> creat=$var_put||Youtube-list-GLOBALXENDS<1>-@<info=s47>.txt||content<$GLOBALZENDS>||&#101mpty<1> ;; Создать в активной панели файл список со ссылками всех роликов и плейлистов на ютубе, пользователя, чье имя (например Thoisoi) находится в буфере обмена + копировать этот список в буфер

exect=$var_put=##@[tc=AP]||$var_put=StringTrimRight('$var_put',1)||_ViewValues('$var_put') ;; пример передачи пути активной панели без обратного слеша с помощью параметра [tc]

exect=$var_put=##@[tc=AP]||formt<54,63,U16> infht=-1||Образец~~буфера||@$f250\Files\Htm\Example2.htm||400||220||10||10||1||244 ;; вывести в информационном окне путь активной панели (в шаблоне указана вставка $var_put)

exect=$var_put=##@[tc=AP]||formt<54,63,U16> infht=-1||Образец~~буфера||@%%COMMANDER_PATH%%\commands\Example2.htm||400||220||10||10||1||244 ;; вывести в информационном окне путь активной панели (в шаблоне указана вставка $var_put)

exect=$var_put=FileOpenDialog('Select~~the~~file','::{450D8FBA-AD25-11D0-98A8-0800361B1103}','File~~Wallet(*.exe)',2)||_ViewValues('$var_put')||$var_put=$var_put=''''?_Exit():$var_put||_ViewValues('$var_put') ;; отображает диалог открытия файла. Если не выбран, то выход

exect=$var_put=StringTrimRight('"%P"',1) lists=PS<$var_put\images//1//0> ;; пример передачи пути активной панели без обратного слеша

exect=$var_pwr=##[timen=5][group=Power~~Control<#>Please~~cancel~~if~~any~~app~~NOT~~saved.@CRLFIt~~would~~force~~to...<#><#>&Shutdown<+>9<+>&LOCK<+>128<+>:BREAK:<+>90<+>&Restart<+>6<+>S&uspend<+>16<+>:BREAK:<+>90<+>Lo&gout<+>0<+>S&leep<+>64<#>300<#>165] GLOBALTIMEN<a> ;; пример вывода данных глобальной переменной GLOBALTIMEN (если нажата любая кнопка, то возвращается 0, если не нажата, то возвращается 1)

exect=$var_result=MsgBox(16384+4096+64+1,Null,'Hello',0,WinGetHandle('[CLASS:AkelPad4]'))||_ViewValues($var_result) ;; пример диалога с блокировкой окна (предотвращает доступ к указанному родительскому окну, пока существует MsgBox)

exect=$var_result=MsgBox(4096+64+1,Null,'Hello',0,WinGetHandle('[CLASS:TTOTAL_CMD]'))||_ViewValues($var_result) ;; пример диалога с блокировкой окна (предотвращает доступ к указанному родительскому окну, пока существует MsgBox)

exect=$var_s='"%%COMMANDER_PATH%%"' slist=PS<$var_s"\Bar"//-1//0> GLOBALSLIST<a> ;; получить список объектов в папке Total Commander в папке Bar

exect=$var_s='"%P"' slist=PS<$var_s"\Bar"//-1//0> GLOBALSLIST<a> ;; получить список объектов в активной панели в папке Bar

exect=$var_s=##$INI<8//$f302//Configuration//SortUpper//zzz>||_ViewValues('$var_s') ;; получить значение заданного ключа, если ключ не найден, то возвращается "zzz"

exect=$var_s=##$INI<8//$f302//Configuration//SortUpper>||$var_s=$var_s=3?1:($var_s+2) tcimg=$cm486 buttn=TDLGCONFIGALL||+tcTCSCP8|$p0|*c$var_s!!1|*x||+tcTCSCP23||+tcTCSCP20 ;; переключать метод сортировки по кругу

exect=$var_s=##@[tc=TA]||$var_p=StringRight('$var_s',1)='\'?'$var_s':'''' copyy=$f250TCIMGU.lng||$f250//1||**1!!?.bkk xends=[tc=TG]??1 rends=@$var_p??1||&&^(.).*!!$1||??2 textt=$f250TCIMGU.lng||§CKBU20GLOBALRENDS<1>§!!~~GLOBALXENDS<1>©$var_p©<+>$var_p<+>§CKBU20GLOBALRENDS<1>§ shape=U7 slist=%WL modfs=GLOBALSLIST<t>||0,1||#SISDATE cmdcm=[check=BOX_U20] sends=GLOBALCHECK1<t>??-1 cmdcm=[group=BOX_U17] cmdcm=[group=BOX_U18] cmdcm=[group=BOX_U21] ;; копирование и перемещение выделенных объектов с выбором папок назначения в диалоговом окне

exect=$var_s=##@[tc=TA]||$var_p=StringRight('$var_s',1)='\'?'$var_s':''''||_ViewValues('$var_p') ;; проверяет наличия папки под курсором в другой панели, если папка, то переменная $var_p содержит её путь, если файл, то пустоту

exect=$var_s=##[combo=BOX29] slist=FOLDC<LISTF<$var_s:\/>!!1!!-3> xlist=$GLOBALSLIST||$var_s:\!!"%T" start=NSCopy||list<$GLOBALSLIST>||list2<$GLOBALXLIST>''~~/e~~/u||&&quot||&&wait||&&min||progres<> ;; копирование "плохого" диска целиком с утилитой NSCopy в другую панель (сохраняя структуру, включая пустые папки)

exect=$var_s=##[input=BOX72]||$var_ap=_ArrayPermute(StringSplit('$var_s','"''"',2),'"''"',1)||_ViewValues($var_ap) ;; возвращает массив перестановок букв введённого слова, не добавляя количество в 1-й элемент

exect=$var_s=##[input=BOX72]||$var_ap=_ArrayPermute(StringSplit('$var_s',Null,2))||_ViewValues($var_ap) ;; анаграмма введённого слова в диалоге в виде массива. (В анаграмму входят слова, с перестановкой всех букв заданного слова без повторов букв и точной длины)

exect=$var_s=##[input=BOX72]||$var_ap=_ArrayPermute(StringSplit('$var_s',Null,2))||_ViewValues($var_ap)||$var_ss=_ArrayToString($var_ap,@CRLF,1)||_ViewValues('$var_ss ')||FileWrite('c:\Test\anagam.txt','$var_ss') ;; создание анаграммы в введённого слова в диалоге, просмотр результата на каждом этапе и сохранение в файл anagam.txt (В анаграмму входят слова, с перестановкой всех букв заданного слова без повторов букв и точной длины)

exect=$var_s=##[input=BOX72]||FileWrite('c:\Test\anagam.txt',_ArrayToString(_ArrayPermute(StringSplit('$var_s',Null,2)),@CRLF,1)) ;; создание анаграммы в введённого слова в диалоге и сохранение в файл anagam.txt

exect=$var_s=##[input=BOX72]||FileWrite('c:\Test\anagam_'&'$var_s'&'.txt',_ArrayToString(_ArrayPermute(StringSplit('$var_s',Null,2)),@CRLF,1)) ;; создание анаграммы в введённого слова в диалоге и сохранение в файл anagam_слово.txt

exect=$var_s=##[input=BOX73]||$var_ar=StringRegExp(@CRLF&FileRead('C:\dictionary.txt')&@CRLF,'[\r\n](['&'$var_s'&']{[input=BOX74],[input=BOX75]})[\r\n]',3)||_ViewValues($var_ar)||$var_s=_ArrayToString($var_ar,@CRLF) bufsr=##$var_s ;; отправить в буфер обмена все слова, составленные из введённых в диалоге букв, которые входят в состав словаря dictionary.txt (В список входят слова, с перестановкой всех букв заданного набора с повторами букв и длина задаётся в диалоге)

exect=$var_s=##[input=BOX73]||$var_ar=StringRegExp(@CRLF&FileRead('C:\dictionary.txt')&@CRLF,'[\r\n](['&'$var_s'&']{3,6})[\r\n]',3)||_ViewValues($var_ar)||$var_s=_ArrayToString($var_ar,@CRLF) bufsr=##$var_s ;; отправить в буфер обмена все слова, составленные из введённых в диалоге букв, которые входят в состав словаря dictionary.txt (В список входят слова, с перестановкой всех букв заданного набора с повторами букв и длина 5 символов)

exect=$var_s=##[input=BOX73]||$var_ar=StringRegExp(@CRLF&FileRead('C:\dictionary.txt')&@CRLF,'[\r\n](['&'$var_s'&']{5})[\r\n]',3)||_ViewValues($var_ar)||$var_s=_ArrayToString($var_ar,@CRLF) bufsr=##$var_s ;; отправить в буфер обмена все слова, составленные из введённых в диалоге букв, которые входят в состав словаря dictionary.txt (В список входят слова, с перестановкой всех букв заданного набора с повторами букв и длина от 3 до 6 символов)

exect=$var_s=##[input=BOX73]||$var_ar=StringRegExp(FileRead(@CRLF&'C:\dictionary.txt'&@CRLF),'[\r\n](['&'$var_s'&']+)[\r\n]',3)||_ViewValues($var_ar)||$var_s=_ArrayToString($var_ar,@CRLF) bufsr=##$var_s ;; отправить в буфер обмена все слова, составленные из введённых в диалоге букв, которые входят в состав словаря dictionary.txt (В список входят слова, с перестановкой всех букв заданного набора с повторами букв без точной длины)

exect=$var_s=##`%P%N||_ViewValues('$var_s') ;; получить текст из html и др. и записать в переменную $var_s

exect=$var_s=##<info=f25%P%N//>B marks=1||test<2r!!$var_s> focusp marks=1||test<2r!!$var_s> ;; выделить в обеих панелях файлы, размер которых равен размеру файла под курсором

exect=$var_s=##<info=f52%P%N//>||_ViewValues('$var_s') ;; записать в переменную параметры запуска ярлыка LNK под курсором

exect=$var_s=##<info=o71%P%N//> <IF> $var_s = zip OR $var_s = rar <THEN> copyy=%P%N||"%t"//0||upd<3> <ENDIF> ;; если расширение под курсором zip или rar, то копировать файл в другую панель

exect=$var_s=##-2||_ViewValues($var_s) ;; получить выделенный текст активного документа AkelPad, если ничего не выделено, то получить весь текст

exect=$var_s='---------------------------'&@CRLF&'%P%N'&@CRLF&'<info=o44%P%N//>'||_ViewValues('$var_s') ;; информацию объекта под~~курсором (путь и дату создания) отобразить в окне

exect=$var_s='---------------------------'&@CRLF&'%P%N'&@CRLF&'<info=o44%P%N//>'||ToolTip('$var_s',0,0,'Информация',1,1)||Sleep(5000) ;; создать всплывающую подсказку на 5 секунд в верхнем углу экрана с информацией: Путь объекта под курсором и его даты создания

exect=$var_s=@WindowsDir GLOBALEXECT<a> ;; путь к каталогу Windows

exect=$var_s=_GTR(ClipGet(),'en|ru',1,1) textv=$var_s ;; перевести фразу из буфера обмена с английского на русский в MS Bing

exect=$var_s=_GTR('Привет','ru|en',0) textv=$var_s ;; перевести слово "Привет" в Google (требуется подключение к интернету)

exect=$var_s=_GTR('Привет','ru|en',1) spech=$var_s ;; перевести слово "Привет" в Google со всеми вариантами перевода и открыть для прослушивания текста

exect=$var_s=_GTR('Привет','ru|en',1) textv=$var_s ;; перевести слово "Привет" в Google со всеми вариантами перевода (требуется подключение к интернету)

exect=$var_s=_GTR('утилита','ru|en',0,3)||_ViewValues('$var_s') ;; перевести слово "утилита" в MyMemory (требуется подключение к интернету)

exect=$var_s=_GTR('утилита','ru|en',1)||_ViewValues('$var_s') ;; перевести слово "утилита" в Google (требуется подключение к интернету)

exect=$var_s=_GTR('утилита','ru|en',1,1)||_ViewValues('$var_s') ;; перевести слово "утилита" в MS Bing

exect=$var_s=_InScript(1,'Translate','перевод~~слова','ru','en')||_ViewValues('$var_s') ;; получить результат внешней js функции "Translate"

exect=$var_s=_PathFull('$f202\Puzzle.bmp') sends=#??-6^||#K5!!$var_s^ GLOBALSENDS<a> ;; размножить заданный путь 5 раз

exect=$var_s=_StringConv(ClipGet(),'#Q')||_ViewValues('$var_s') ;; просмотреть кодированное в HEX содержимое буфера обмена

exect=$var_s=_StringDuplication('blue-red|red-blue|',10) exect=_ViewValues('$var_s') ;; пример дублирования строки

exect=$var_s=_StringDuplication('строка'&@CRLF,10) exect=_ViewValues('$var_s') ;; пример дублирования строки

exect=$var_s=_StringDuplication('строка',10) exect=_ViewValues('$var_s') ;; пример дублирования строки

exect=$var_s=''||$var_dlm='|'||$var_begin=0||$var_end=60 <FOR> $var_begin <TO> $var_end exect=$var_s='$var_s'&':INDEX:'&'$var_dlm' <NEXT> exect=_ViewValues('$var_s') ;; создать строку, размножив заданное количество раз счётчик и разделитель

exect=$var_s='<info=f52%P%N//>'||_ViewValues('$var_s') ;; записать в переменную параметры запуска ярлыка LNK под курсором

exect=$var_s=<info=o1%P%N>>26843545600?'[25GB+]':'[25GB-]' renmm=%P%N||??2||$$~~$var_s||upd<1> ;; переименовать папку под курсором в верхний регистр, с добавлением к имени "[25GB+]", если размер больше 25GB, если меньше, то с добавлением "[25GB-]"

exect=$var_s=<info=s110|11>=1?'"%T"':'"%P"' shape=11 folds=$var_s||[input=BOX6]||numb<[input=BOX4]>||upd<2> ;; если зажата клавиша CTRL, то создать папки в неактивной панели, если не зажата, то в активной

exect=$var_s=<info=s110|11>=1?'"%T"':'"%P"'||_ViewValues('$var_s') ;; если зажата клавиша CTRL, то возвращается путь неактивной панели, если не зажата, то путь активной

exect=$var_s=555 shape=1 dilog=[timen=5][combo=BOX_DEF1][combo=BOX_DEF2] GLOBALCOMBO<a> ;; получить значение по умолчанию, если диалог закрыт при истечении времени

exect=$var_s=555 shape=1 dilog=[timen=5][group=BOX_DEF1][group=BOX_DEF2] GLOBALGROUP<a> ;; получить значение по умолчанию, если диалог закрыт при истечении времени

exect=$var_s='C' <IF> <info=o80%P%N//> = C: <THEN> exect=$var_s='D' <ENDIF> focusp patha=$var_s:\<info=o151%P%N//> ;; перейти в другую панель в синхронизированный каталог на диске D:\ (если активная панель C:\) и на диске С:\ (если активная панель D:\)

exect=$var_s=Chr(152) folds=$f06||$var_s icoft=GLOBALFOLDS<1>||0||%%TCIMG_PATH%%\TCIMG.dll,65||foldicon<favicon!!1> ;; создать "невидимую" папку на рабочем столе

exect=$var_s=ClipGet() <IF> $var_s <> 320x240 <THEN> exect=$var_s='100x100' <ENDIF> GLOBALEXECT<a> ;; если содержимое буфера обмена не равно строке 320x240, то переменная $var_s=100x100

exect=$var_s=ClipGet()||$var_i=StringInStr('$var_s','\') <IF> $var_i = 0 <THEN> brwsr=$var_s <ELSE> openf=$var_s||x||explorer<open> <ENDIF> ;; открыть в зависимости содержимого буфера обмена: если ссылка, то в браузере, если путь то в редакторе

exect=$var_s=ClipGet()||$var_i=StringInStr('$var_s','\')||MsgBox(4096,'Результат','$var_i') GLOBALEXECT<a> ;; пример проверки нахождения в буфере обмена пути или ссылки, проверяется символ "\" , переменная $var_i либо 0 либо число больше 0

exect=$var_s=ClipGet()||$var_i=StringRegExp(ClipGet(),'([^A-Za-z\d])',0)?MsgBox(48+4096,'Результат','Число~~в~~буфере~~не~~является~~хэшем.')&_Exit():1||$var_i=StringLen('$var_s')||$var_n=$var_i=8?3:($var_i=32?1:($var_i=64?6:($var_i=128?8:MsgBox(48+4096,'Результат','Число~~в~~буфере~~не подходит~~под~~условие~~проверки.')&_Exit())))||$var_path=$var_n&'%P%N' <IF> <info=f$var_path|1//> = $var_s <THEN> exect=MsgBox(64+4096,'Результат','Контрольные~~суммы~~совпадают.') <ELSE> exect=MsgBox(48+4096,'Результат','Контрольные~~суммы~~не~~совпадают.') <ENDIF> ;; сравнить контрольные суммы файла под курсором и буфера обмена, в зависимости от длины строки буфера: если 8, то сравнение происходит по CRC32, если 32 - MD5, если 64 - SHA256, если 128 - SHA512, в сплывающем окне с ручным закрытием, сообщить результат

exect=$var_s=ClipGet()||$var_n=StringRegExp('$var_s','(\d{1,4}x\d{1,4})') <IF> $var_n = 0 <THEN> exect=$var_s='100x100' <ENDIF> exect=_ViewValues('$var_s') ;; если содержимое буфера обмена не является строкой вида 0x0 или 00x00 или 000x000 или 0000x0000 (где вместо нуля может быть любая цифра), то переменная $var_s=100x100

exect=$var_s=ControlGetText('[CLASS:AkelPad4]',Null,'AkelEditW1') GLOBALEXECT<a> ;; получить текст с элемента окна AkelPad (текст текущего документа)

exect=$var_s=EnvGet('COMMANDER_PATH') GLOBALEXECT<a> IniRead($var_s&'\Wincmd.ini','Configuration','Editor','#') GLOBALEXECT<a> ;; получение значения ключа Editor из файла файла Wincmd.ini из секции [Configuration]

exect=$var_s=FileExists(_PathFull('$f250\TCIMG_BLACK.chm'))?'TCIMG_BLACK':'TCIMG' runhp=x||$f250\$var_s.chm||Справка~~$var_s||1 ;; запустить тёмную справку TCIMG, если не обнаружена - светлую

exect=$var_s=FileGetAttrib('C:\pagefile.sys')||_ViewValues('$var_s') ;; возвращает строку, соответствующую атрибутам файла pagefile.sys

exect=$var_s=FileGetVersion('%P%N')||_ViewValues('$var_s') ;; получить информацию версии программы под курсором

exect=$var_s=FileGetVersion(@AutoItExe,'CompiledScript')||_ViewValues('$var_s') ;; получить информацию версии AutoIt3, которой компилировалась утилита TCIMG.exe

exect=$var_s=FileGetVersion(@ScriptName,'Version')||_ViewValues('$var_s') ;; получить информацию версии утилиты TCIMG.exe

exect=$var_s=FileOpenDialog('Выберите~~имя.','::{450D8FBA-AD25-11D0-98A8-0800361B1103}','Скрипт(*.aut;*.au3)|Текстовый~~файл(*.ini;*.txt)',2)||Eval('var_s')?_ViewValues('$var_s'):_Exit() ;; отображает диалог открытия файла. Если не выбран, то выход

exect=$var_s=FileOpenDialog('Выберите~~файл.','"%P"','(*.*)',2,Null,WinGetHandle('[CLASS:TTOTAL_CMD]')) ;; диалог открытия файла с блокировкой окна (предотвращает доступ к указанному родительскому окну, пока существует диалог)

exect=$var_s=FileOpenDialog('Выберите~~файл.','D:\','(*.*)',2)||Eval('var_s')?_ViewValues('$var_s'):_Exit() ;; отображает диалог открытия файла. Если не выбран, то выход

exect=$var_s=FileOpenDialog('Выберите~~файл.',Null,'(*.*)',2) ;; диалог открытия файла

exect=$var_s=FileRead('%P%N')||$var_s=StringReplace('$var_s',@CRLF,Null)||$var_s=StringReplace('$var_s','~~',Null)||$var_a=StringSplit('$var_s',Null,2)||$var_a=_ArrayUnique($var_a)||_ArraySort($var_a,0,1) asave=var_a||"%P%O_sym.%E"||upd<1>||all||||code<1> ;; записать в именной файл с приставкой _sym уникальные символы содержимого файла под курсором в кодировке UTF-16 LE 1200, предварительно удалив переносы строк и пробелы

exect=$var_s=FileSaveDialog('Выберите~~имя.','::{450D8FBA-AD25-11D0-98A8-0800361B1103}','Скрипт(*.aut;*.au3)|Текстовый~~файл(*.ini;*.txt)',2)||Eval('var_s')?_ViewValues('$var_s'):_Exit() ;; отображает диалог сохранения файла. Если не выбран, то выход

exect=$var_s=FileSaveDialog('Выберите~~файл.','"%P"','(*.*)',2,Null,WinGetHandle('[CLASS:TTOTAL_CMD]')) ;; диалог выбора сохранения файла с блокировкой окна (предотвращает доступ к указанному родительскому окну, пока существует диалог)

exect=$var_s=FileSaveDialog('Выберите~~файл.',Null,'(*.*)',2) ;; диалог выбора и сохранения файла

exect=$var_s=FileSelectFolder('Выберите~~каталог.','"%P"',1,Null,WinGetHandle('[CLASS:TTOTAL_CMD]')) ;; диалог выбора папки с блокировкой окна (предотвращает доступ к указанному родительскому окну, пока существует диалог)

exect=$var_s=FileSelectFolder('Выберите~~каталог.','::{450D8FBA-AD25-11D0-98A8-0800361B1103}',1)||Eval('var_s')?_ViewValues('$var_s'):_Exit() ;; отображает диалог выбора папки. Если не выбрана, то выход

exect=$var_s=FileSelectFolder('Выберите~~каталог.',Null,1) ;; диалог выбора папки

exect=$var_s=IniRead(EnvGet('COMMANDER_INI'),'WWW','Key','#')||_ViewValues('$var_s') ;; получение значения ключа Key из файла файла Wincmd.ini из секции [WWW]

exect=$var_s='list~~volume' cmdbt=diskpart||workdir<@SystemDir>||std<3>||stdwrite<$var_s> GLOBALCMDBT<a> ;; получить сведения о дисках системы

exect=$var_s=NOT~~ClipGet()?_Exit():0 ;; если буфер обмена пуст, то завершение работы (можно вставлять перед серией команд для проверки)

exect=$var_s=NOT~~ClipGet()?_Exit():'Буфер~~не~~пустой'||_ViewValues('$var_s') ;; если буфер обмена пуст, то завершение работы (можно вставлять перед серией команд для проверки)

exect=$var_s=PixelChecksum(0,0,50,50)||_ViewValues('$var_s') ;; получить начальную контрольную сумму

exect=$var_s='play'||$var_s&='boy'||_ViewValues('$var_s') ;; пример присвоения строки к существующей переменной

exect=$var_s='play'||$var_s@='boy'||_ViewValues('$var_s') ;; пример присвоения строки в начало данных существующей переменной

exect=$var_s=ProcessExists('notepad.exe')?'запущен':'не~~запущен'||_ViewValues('$var_s') ;; проверяет запущен ли процесс "Блокнота"

exect=$var_s=RegEnumKey('HKEY_LOCAL_MACHINE\SOFTWARE',1)||_ViewValues('$var_s') ;; возвращает имя 1-го подраздела

exect=$var_s=RegEnumVal('HKEY_LOCAL_MACHINE\SOFTWARE\7-Zip',1)||_ViewValues('$var_s') ;; возвращает имя 1-го параметра раздела 7-Zip

exect=$var_s=RegRead('HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion','ProgramFilesDir')||_ViewValues('$var_s') ;; получает путь к программной папке

exect=$var_s=RegRead('HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\Tcpip\Parameters','DhcpNameServer') brwsr=$var_s!!%%PROGRAMFILES%%\Internet~~Explorer\iexplore.exe ;; открыть настройки роутера в iexplore

exect=$var_s=RegRead('HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\Tcpip\Parameters','DhcpNameServer') brwsr=$var_s!!x ;; открыть настройки роутера в браузере

exect=$var_s=RegRead('HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\Tcpip\Parameters','DhcpNameServer') start=Explorer||$var_s~~-extoff ;; открыть настройки роутера в iexplore с отключенными настройками

exect=$var_s=StatusbarGetText('[CLASS:AkelPad4]')||_ViewValues('$var_s') ;; возвращает текст из 1-го раздела строки состояния AkelPad

exect=$var_s=String(ControlGetText('[CLASS:AkelPad4]',Null,'AkelEditW1'))||_ViewValues($var_s) ;; получить текст с элемента окна AkelPad (текст текущего документа)

exect=$var_s=StringFormat('%%02X%%02X%%02X',23,14,10)||_ViewValues('$var_s') ;; конвертировать числа в Hex

exect=$var_s=StringRegExp(ClipGet(),'(?i)^[a-z]',0)?'1,2':'2,1' sends=-1??-1||#L$var_s GLOBALSENDS<a> ;; если в буфере обмена первая буква кириллицы, то поменять 1-ю и 2-ю строки

exect=$var_s=StringReplace(StringFormat('%%100s',''''),'~~','abcde')||_ViewValues('$var_s') ;; размножить строку 100 раз

exect=$var_s='Text~~default' shape=1 dilog=[timen=5][input=BOX_DEF1][input=BOX_DEF2] GLOBALINPUT<a> ;; получить значение по умолчанию, если диалог закрыт при истечении времени

exect=$var_s='Text~~default' shape=1 dilog=[timen=5][richinput=BOX_DEF1][richinput=BOX_DEF2] GLOBALINPUT<a> ;; получить значение по умолчанию, если диалог закрыт при истечении времени

exect=$var_s='привет' asave=var_s||"%p[info=s47].txt"|1||noarray<1>||upd<1> ;; записать содержимое переменной $var_s в файл, в активную панель именем системного времени + обновить активную панель

exect=$var_s='строка'||$var_n=IsDeclared('var_s')||_ViewValues('$var_n') ;; переменная $var_n=1 , т.к переменная $var_s существует

exect=$var_s0=ClipGet()||$var_s1=StringRegExp('$var_s0','(\d{1,4}x\d{1,4})')=0?'100x100':'$var_s0'||_ViewValues('$var_s1') ;; если содержимое буфера обмена не является строкой вида 0x0 или 00x00 или 000x000 или 0000x0000 (где вместо нуля может быть любая цифра), то переменная $var_s=100x100

exect=$var_s1=ClipGet()||$var_bb=ClipPut('текст~~в~~буфер~~обмена')||$var_s2=ClipGet() GLOBALEXECT<a> ;; пример работы с буфером обмена

exect=$var_s1=StringLeft('строка',3)||$var_s2=StringLeft('строка~~с~~пробелами',8) GLOBALEXECT<a> ;; возвращает указанное число символов строки слева

exect=$var_s1=StringLower('Строка')||$var_s2=StringLower('Строка~~С~~Пробелами') GLOBALEXECT<a> ;; преобразует строку в нижний регистр

exect=$var_s1=StringMid('Строка',3)||$var_s2=StringMid('Строка~~С~~Пробелами',4,8) GLOBALEXECT<a> ;; извлекает часть символов в строке

exect=$var_s1=StringRegExp(ClipGet(),'(\d{1,4}x\d{1,4})')=0?'100x100':ClipGet()||_ViewValues('$var_s1') ;; если содержимое буфера обмена не является строкой вида 0x0 или 00x00 или 000x000 или 0000x0000 (где вместо нуля может быть любая цифра), то переменная $var_s=100x100

exect=$var_s1=StringRegExpReplace('test~~del~~char~~b~~abcdabcd','[b]',Null) GLOBALEXECT<a> ;; удалить символ "b" из строки

exect=$var_s1=StringRegExpReplace('замена~~гласных~~на~~символ~~-','[аяэеоёуюиы]','-')||$var_s2=StringRegExpReplace('Удаляет~~<i>теги</i>~~в~~html','<i>(.*?)</i>','$1') GLOBALEXECT<a> ;; заменяет текст строки, используя регулярное выражение

exect=$var_s1=StringReplace('это~~строка~~текста','с','---')||$var_s2=StringReplace('это~~строка~~текста',6,'+++') GLOBALEXECT<a> ;; заменяет фрагмент в строке

exect=$var_s1=StringRight('это~~строка~~текста',5)||$var_s2=StringRight('это~~строка~~текста',9) GLOBALEXECT<a> ;; возвращает указанное число символов строки справа

exect=$var_s1=StringStripWS('~~это~~строка~~текста~~',3)||$var_s2=StringStripWS('~~это~~строка~~текста~~',8) GLOBALEXECT<a> ;; удаляет пробельные символы в строке

exect=$var_s1=StringTrimLeft('~~это~~строка~~текста~~',3)||$var_s2=StringTrimLeft('~~это~~строка~~текста~~',8) GLOBALEXECT<a> ;; удаляет указанное количество символов строки слева

exect=$var_s1=StringTrimRight('~~это~~строка~~текста~~',3)||$var_s2=StringTrimRight('~~это~~строка~~текста~~',8) GLOBALEXECT<a> ;; удаляет указанное количество символов строки справа

exect=$var_s1='привет'||$var_s2=Eval('var'&'_'&'s1')||_ViewValues('$var_s2') ;; пример присвоения переменной $var_s2 содержимого переменной $var_s1 по её имени

exect=$var_s1='привет'||$var_s2='пока' exect=$var_s1='$var_s2'&'~~'&'$var_s1' exect=MsgBox(4096,'Результат','$var_s1') ;; пример работы с переменными и со строками

exect=$var_sbar=ControlGetText('[CLASS:TTOTAL_CMD]',Null,'TButtonBar1')||_ViewValues('$var_sbar') ;; получить имя панели инструментов BAR (если включена имя вертикальной, иначе основной)

exect=$var_sbar=ControlGetText('[CLASS:TTOTAL_CMD]',Null,'TButtonBar2')||_ViewValues('$var_sbar') ;; получить имя основной панели инструментов BAR (если включена вертикальная)

exect=$var_sec=Int(TimerDiff(0)/1000) GLOBALEXECT<a> ;; получить количество секунд работы компьютера

exect=$var_sec=Int(TimerDiff(0)/1000) sends=<info=s102|-GLOBALEXECT<1>s> GLOBALSENDS<a> ;; получить дату запуска системы

exect=$var_sec=Int(TimerDiff(0)/1000) sends=<info=s102|-GLOBALEXECT<1>s>||##@@s108|:: GLOBALSENDS<a> ;; получить время работы компьютера в формате: 0/00/00 00:00:00

exect=$var_section=@UserName='Андрей'?'F4':'Open_1' openz=%WL||$var_section ;; открыть выделенные файлы в заданных программах (настройки берутся относительно имени пользователя)

exect=$var_sext=##<info=f230%P%N//>||MsgBox(4096+64,'Информация',StringUpper('$var_sext')&'~~-~~оригинальное~~расширение~~файла:'&@CRLF&@CRLF&'%P%N') ;; получение оригинального расширения для файла под курсором

exect=$var_sf='%P%N'||$var_st='C:\TempHH\'||ShellExecuteWait('hh','-decompile~~'&'$var_st'&'~~'&'$var_sf') movee=$var_st||<info=o75%P%N//>//0||<info=o72%P%N//> delsm=%P%N||1||upd<1> ;; распаковать chm под курсором в активную панель в именную папку (с предварительной распаковкой в каталог TempHH и перемещением в активную панель) с удалением исходника

exect=$var_sf='%P%N'||$var_st='C:\TempHH\'||ShellExecuteWait('hh','-decompile~~'&'$var_st'&'~~'&'$var_sf') movee=$var_st||<info=o75%P%N//>//0||<info=o72%P%N//>||upd<1> ;; распаковать chm под курсором в активную панель в именную папку (с предварительной распаковкой в каталог TempHH и перемещением в активную панель)

exect=$var_slabel=DriveGetLabel('C:\')||_ViewValues('$var_slabel') ;; определяет метку диска

exect=$var_sline=FileReadLine('c:\Test\1.txt',4) GLOBALEXECT<a> ;; пример считывания 4-й строки из текстового файла

exect=$var_sp='"%P"ИМЯ.pdf'||$var_st=FileExists('$var_sp')?'"%P"ИМЯ_'&@YEAR&'_'&@MDAY&'_'&@HOUR&'.pdf':'$var_sp' wlist=[tc=AM]||formt<60,sps34,sps35> start=Magick||GLOBALWLIST<1>||-compress||Zip||$var_st||&&hide||&&wait||upd<1> ;; из выделенных изображений создать PDF файл в другой панели, если файл существует добавляется дата

exect=$var_sp='"%P"ИМЯ.pdf'||$var_st=FileExists('$var_sp')?'"%P"ИМЯ_'&@YEAR&'_'&@MDAY&'_'&@HOUR&'.pdf':'$var_sp'||_ViewValues('$var_st') ;; если в активной панели есть файл ИМЯ.pdf, то в переменную $var_st записывается путь имени с добавлением даты

exect=$var_sp=_PathFull('$f202\Puzzle.bmp')||$var_nw=1200||$var_nh=900 exect=$var_wh=StringSplit('<info=i3$var_sp//>','x') exect=$var_iw=Ceiling($var_nw/$var_wh[1])||$var_iw=Number($var_iw)||$var_ih=Ceiling($var_nh/$var_wh[2])||$var_ih=Number($var_ih) sends=#??-6^||#K$var_iw*$var_ih!!$var_sp^ imgnz=$GLOBALSENDS||"%t"//0||$var_iw,$var_ih imgcf=GLOBALIMGNZ<1>||"%t"//1||pruning<0,0,@H-900,@W-1200>||upd<3> ;; размножить небольшое изображение по ширине и по вертикали под минимальный заданный размер 1200х900 + обрезать до заданного размера, создав в другой панели изображение именем файла

exect=$var_sp=_PathFull('$f202\Puzzle.bmp')||$var_nw=1200||$var_nh=900 exect=$var_wh=StringSplit('<info=i3$var_sp//>','x') exect=$var_iw=Ceiling($var_nw/$var_wh[1])||$var_iw=Number($var_iw)||$var_ih=Ceiling($var_nh/$var_wh[2])||$var_ih=Number($var_ih) sends=#??-6^||#K$var_iw*$var_ih!!$var_sp^ imgnz=$GLOBALSENDS||"%t"//0||$var_iw,$var_ih||upd<3> ;; размножить небольшое изображение по ширине и по вертикали под минимальный заданный размер 1200х900, создав в другой панели изображение именем файла

exect=$var_sp=_PathFull('$f202\Puzzle.bmp')||$var_nw=1202||$var_nh=902 exect=$var_wh=StringSplit('<info=i3$var_sp//>','x') exect=$var_iw=Ceiling($var_nw/$var_wh[1])||$var_iw=Number($var_iw)||$var_ih=Ceiling($var_nh/$var_wh[2])||$var_ih=Number($var_ih) sends=#??-6^||#K$var_iw*$var_ih!!$var_sp^ imgnz=$GLOBALSENDS||"%p"//0||$var_iw,$var_ih||framewh<FF0000|2|2> imgcf=GLOBALIMGNZ<1>||"%p"//1||pruning<0,0,@H-902,@W-1202>||upd<1> ;; размножить небольшое изображение Puzzle.bmp по ширине и по вертикали с красной рамкой под минимальный заданный размер 1202х902 + обрезать до заданного размера, создав в другой панели изображение именем файла

exect=$var_sp=_PathFull('$f254?1')||_ViewValues('$var_sp') ;; получить путь временной папки Temp1

exect=$var_sp=_PathFull('$f302')||_ViewValues('$var_sp') ;; получить абсолютный путь, заданного сокращения

exect=$var_sp=_PathFull('%%TCIMG_TEMP%%\font.txt')||_ViewValues('$var_sp') ;; получить абсолютный путь заданного относительного

exect=$var_sp=_PathFull('%%TCIMG_TEMP%%1')||_ViewValues('$var_sp') ;; получить путь временной папки Temp1

exect=$var_sp=_PathFull('../../','"%P"') patha=$var_sp ;; перейти в активной панели на 2 уровня вверх

exect=$var_sp=_PathFull('../../file.txt','"%P"')||_ViewValues('$var_sp') ;; просмотр результата функции _PathFull() - возвращает путь относительно активной панели

exect=$var_sp=_PathFull('../../file.txt','"%T"')||_ViewValues('$var_sp') ;; просмотр результата функции _PathFull() - возвращает путь относительно другой панели

exect=$var_sp=_PathFull('../wlx','"%P"') patha=$var_sp ;; перейти в активной панели в параллельный каталог wlx

exect=$var_sp=_PathFull('C:\1\2\3\4\5\6\7\../')||_ViewValues('$var_sp') ;; просмотр результата функции _PathFull() - возвращает путь на 1 уровень вверх

exect=$var_sp=_PathFull('C:\1\2\3\4\5\6\7\../../')||_ViewValues('$var_sp') ;; просмотр результата функции _PathFull() - возвращает путь на 2 уровня вверх

exect=$var_sp=_StringConv('<info=o73[tc=AA]//>','#G7¤¤&&~~+!!.')||_ViewValues('$var_sp') ;; преобразовать имя объекта под курсором: удалить лишние пробелы и заменить пробелы на точку

exect=$var_sp='c:\Test\1.txt'||$var_st=FileRead('$var_sp')||$var_h=FileOpen('$var_sp',2)||FileWrite($var_h,'Строка1'&'$var_st')||FileClose($var_h) GLOBALEXECT<a> ;; пример записи в начало файла

exect=$var_spath='<info=o70[tc=AA]//>']||_ViewValues('$var_spath') ;; получение пути объекта под курсором активной панели

exect=$var_spath=FileGetLongName('D:\TCIMAG~1\')||_ViewValues('$var_spath') ;; возвращает длинный путь "D:\TC IMAGE\"

exect=$var_spath=FileGetShortName('D:\TC~~IMAGE\')||_ViewValues('$var_spath') ;; возвращает короткий путь "D:\TCIMAG~1\"

exect=$var_ss=##@[tc=AP]||_ViewValues('$var_ss') ;; записать в переменную $var_ss путь активной панели

exect=$var_ss=##@[tc=]||_ViewValues('$var_ss') ;; записать в переменную $var_ss путь объекта под курсором

exect=$var_ss=$CmdLine[$CmdLine[0]]||_ViewValues('$var_ss') параметр1 параметр2 параметр3 ;; присвоить переменной $var_array массив всех параметров, переданных утилите при запуске

exect=$var_ss=Chr(124)&Chr(124)||_ViewValues('$var_ss') ;; пример передачи переменной $var_ss 2-х символов ||

exect=$var_ss=Chr(Random(Asc('A'),Asc('Z'),1)) GLOBALEXECT<a> ;; случайная буква из диапазона A-Z

exect=$var_ss=StringStripCR('Это~~'&@CR&'строка')||MsgBox(4096,'Результат','$var_ss') ;; пример удаления символа возврата каретки

exect=$var_ss='привет#пока'||$var_ss=StringReplace('$var_ss','#',Chr(124)&Chr(124))||_ViewValues('$var_ss') ;; пример замены в строке переменной $var_ss символа # на 2-а символа ||

exect=$var_ss='привет'&Chr(124)&Chr(124)&'пока'||_ViewValues('$var_ss') ;; пример передачи переменной $var_ss строки, в которой есть 2-а символа ||

exect=$var_sseral=DriveGetSerial('C:\')||_ViewValues('$var_sseral') ;; определяет серийный номер системного диска

exect=$var_st=WinGetTitle('[CLASS:TLister]')||_ViewValues('$var_st') ;; получить заголовок окна Lister'a

exect=$var_st=WinGetTitle('[CLASS:TTOTAL_CMD]')||_ViewValues('$var_st') ;; получить заголовок окна Total Commander

exect=$var_status=DriveStatus('C:\')||_ViewValues('$var_status') ;; получает состояние диска C:\ в виде строки

exect=$var_stime=FileGetTime(_PathFull('$f302'),0,1)||_ViewValues('$var_stime') ;; получить время последней модификации заданного файла

exect=$var_stime=FileGetTime('C:\Test\test.txt',0,1)||_ViewValues('$var_stime') ;; возвращает строку с временем последней модификации файла test.txt

exect=$var_stip=DriveGetFileSystem(@HomeDrive&'\')||_ViewValues('$var_stip') ;; возвращает тип файловой системы системного диска

exect=$var_stip=DriveGetType('C:\')||_ViewValues('$var_stip') ;; определяет тип диска

exect=$var_stroka=###http://yandex.ru\\4 GLOBALEXECT<a> ;; пример передачи содержимого сайта в формате UTF8 в переменную $var_stroka

exect=$var_stroka=##$INI<8//%%COMMANDER_INI%%//Configuration//CompareTool> GLOBALEXECT<a> ;; пример передачи значения ключа CompareTool из секции Configuration файла WinCmd.ini в переменную $var_stroka

exect=$var_stroka=##%WF??1 GLOBALEXECT<a> ;; пример передачи списка имен выделенных объектов в переменную $var_stroka

exect=$var_stroka=##%WL??1 GLOBALEXECT<a> ;; пример передачи списка выделенных объектов в переменную $var_stroka

exect=$var_stroka=##@%P%N GLOBALEXECT<a> ;; пример передачи пути объекта под курсором в переменную

exect=$var_stroka=##@<info=x53> GLOBALEXECT<a> ;; абсолютный путь к родительской папке активной панели инструментов

exect=$var_stroka=##@<xfolder=21//%P%N> GLOBALEXECT<a> ;; пример передачи файла, у которого самая старая дата модификации внутри папки под курсором в переменную $var_stroka

exect=$var_stroka=##@<xfolder=25//$f201> sends=@$var_stroka??1 slist=GLOBALSENDS<t>||##path<0|0|1> GLOBALSLIST<a> ;; получить относительный путь нового файла в папке Bar

exect=$var_stroka=##@c:\Test\1.txt GLOBALEXECT<a> ;; пример передачи пути в переменную $var_stroka

exect=$var_stroka=##[combo=BOX1] exect=$var_s=_GTR('$var_stroka','ru|en',1,1) textv=$var_s||viewtext<Буфер|800|300|-1|-1|-1|14|993366|FFFFE0> ;; перевод русский в английский в MS Bing и открытие в просмотрщике

exect=$var_stroka=##[combo=BOX1] exect=$var_s=_GTR('$var_stroka','ru|en',1,1)||_ViewValues('$var_s') ;; перевод введенного в диалоге выражения с русского на английский в MS Bing

exect=$var_stroka=##[combo=BOX1] GLOBALEXECT<a> ;; пример передачи введённых данных в диалоге combo в переменную $var_stroka

exect=$var_stroka=##[edits=BOX4] GLOBALEXECT<a> ;; пример передачи введённых данных в диалоге edits в переменную $var_stroka

exect=$var_stroka=##[group=BOX1] GLOBALEXECT<a> ;; пример передачи введённых данных в диалоге group в переменную $var_stroka

exect=$var_stroka=##[input] slist=%WL xlist=GLOBALSLIST<t>||##path<6> <FOR> 1 <TO> GLOBALSLIST<0> count=GLOBALSLIST<:INDEX:>||$var_stroka||0||countline<0|2> sends=GLOBALCOUNT<t>??-1||formt<0!!(?m)$var_stroka[^\r\n]*>||?T|a,1:-1!!GLOBALXLIST<:INDEX:>~~ asave=GLOBALSENDS||"%pLinesTag.txt"|2|@CRLF|1 <NEXT> renmm="%pLinesTag.txt"||LinesTag||$$_$var_stroka||upd<1> ;; в выделенных файлах найти строки с меткой введенной в диалоговом окне, удалить в этих строках всё, по метку, добавить имя файла в начало строк и сохранить в файл LinesTag_(metka).txt в активной панели

exect=$var_stroka=##[input=BOX1] GLOBALEXECT<a> ;; пример передачи введённых данных в диалоге input в переменную $var_stroka

exect=$var_stroka=##[sopen=BOX1]??1 GLOBALEXECT<a> ;; пример передачи содержимого выбранного файла в диалоге в переменную $var_stroka

exect=$var_stroka=##[sopen=BOX1]??-1 GLOBALEXECT<a> ;; пример передачи содержимого выбранного файла в диалоге построчно, поместив в массив $var_array

exect=$var_stroka=##<info=f1%P%N|1//> GLOBALEXECT<a> ;; пример передачи параметров в команду exect

exect=$var_stroka=##-1 GLOBALEXECT<a> ;; пример передачи содержимого буфера обмена в переменную

exect=$var_stroka=##c:\test\1.txt GLOBALEXECT<a> ;; пример передачи содержимого файла в переменную $var_stroka

exect=$var_stroka='%P%N' GLOBALEXECT<a> ;; пример передачи пути объекта под курсором в переменную

exect=$var_stroka1=##@<info=f10%P%N//> exect=$var_stroka2=##@<info=f13%P%N//> exect=$var_stroka3=##@<info=x401%P%N//> sends=@||tcg<CreateShortcut> xends=$GLOBALSENDS||@#@#@!!$var_stroka1||@#@!!$var_stroka2||@##@!!$var_stroka3 lnkbt="%p"||butfrom<GLOBALXENDS<t>> ;; создать в активной панели ярлык файлу под курсором с возможностью открытия в ассоциированной TC программе

exect=$var_stxt=WinGetText('[CLASS:TTOTAL_CMD]')||_ViewValues('$var_stxt') ;; получить текст окна Total Commander

exect=$var_sys=@OSArch='X86'?'x86':'x64' start=%%COMMANDER_PATH%%\Neo\$var_sys\HexFrame.exe||workdir<%%COMMANDER_PATH%%\Neo\$var_sys> ;; запустить программу HexFrame, относительно системы x64/x86

exect=$var_tc=##<info=x60>||$var_rp=StringReplace($var_tc=32?'=TC_ICON.dll,,1!!=TC_ICON.dll,,2':'=TC_ICON.dll,,2!!=TC_ICON.dll,,1',',,',',') textt=$f85||$var_rp tc3264 ;; Перезапуск Total Commander с переключением x32/x64 и установкой иконки соответствующей разрядности на активной панели (библиотеку положите в корень TC http://tc-image.3dn.ru/Files/dll/TC_ICON.ZIP)

exect=$var_tcaa=##@[tc=AA]??1 GLOBALEXECT<a> ;; получить путь объекта под курсором активной панели и записать в переменную $var_tcaa

exect=$var_tcaa=##@[tc=AA]??1||_ViewValues('$var_tcaa') ;; получить путь объекта под курсором активной панели и записать в переменную $var_tcaa

exect=$var_tcan=##@[tc=AN] creat="%t"||xxx.txt||content<$vzar_tcan>||code<1>||owrite<1>||upd<3> ;; создать в другой панели файл с содержимым именем файла под курсором

exect=$var_time=StringRegExp(BinaryToString(InetRead('http://currenttimestamp.com')),'current_time\h*=\h*(\d{10});',1)[0]||_ViewValues('$var_time') ;; получить текущую дату unix timestame сегодняшнего дня

exect=$var_time=StringStripWS(DllCall('shlwapi.dll','int','StrFromTimeIntervalW','wstr','''','uint',1024,'dword',TimerDiff(0),'int',7)[1],3) GLOBALEXECT<a> ;; получить время работы компьютера в формате: часы, минуты, секунды

exect=$var_trig=0||$var_x=$var_trig=(1~~OR~~2)||_ViewValues('$var_x') ;; пример проверки числа

exect=$var_trig=1||$var_x=$var_trig=(1~~OR~~2)?1:0||_ViewValues('$var_x') ;; пример проверки числа

exect=$var_v=##[group=BOX_U34.1] watch=0||delbut<2>||metronome<$f206Timer.wav|$var_v> ;; звуковой сигнал через каждые выбранное в диалоговом окне количество минут

exect=$var_value=##$INI<8//%%TCIMG_PATH%%\TCIMGU.ini//SSS//Path> copyy=$var_value||"%t"//0 ;; пример считывания ключа Path из TCIMGU.ini из секции [SSS] и передача другим командам

exect=$var_value=##$INI<8//%%TCIMG_PATH%%\TCIMGU.ini//SSS//Path> GLOBALEXECT<a> ;; пример считывания ключа Path из TCIMGU.ini из секции [SSS]

exect=$var_vbutton=InputBox('Вопрос','Где~~вы~~родились?') GLOBALEXECT<a> ;; пример окна ввода информации

exect=$var_vbutton=InputBox('Вопрос','Где~~вы~~родились?')||$var_input=MsgBox(4096,'Сообщение','$var_button') GLOBALEXECT<a> ;; пример окна ввода информации и вывода в окне сообщения

exect=$var_vbutton=InputBox('Обрамление~~ссылки~~тегами~~[url]','Текст~~ссылки','Текст','''',300,140)||$var_i='$var_vbutton'?1:_Exit() bufsr=^^[url=||$$]GLOBALEXECT<1>[/url] ;; обрамить ссылку из буфера обмена тегами для вставки на сайт, текст ссылки вводится в диалоге

exect=$var_x=12345.001||_ViewValues(VarGetType(Eval('var_x')),'Тип~~данных~~переменной~~$var_x') ;; определение типа данных

exect=$var_x=12345||_ViewValues(VarGetType(Eval('var_x')),'Тип~~данных~~переменной~~$var_x') ;; определение типа данных

exect=$var_x='directupload' uplds=%WL||$var_x||1||progres<> ;; загрузить выделенные изображения на хостинг, передаваемый переменной $var_x

exect=$var_x=IsArray(DriveGetDrive('CDROM'))||_ViewValues($var_x) ;; возвращает 1, если CDROM есть, 0, если нет

exect=$var_x=StringSplit('1|2|3|4','|',2)||_ViewValues(VarGetType(Eval('var_x')),'Тип~~данных~~переменной~~$var_x') ;; определение типа данных

exect=$var_x='Привет!'||_ViewValues(VarGetType(Eval('var_x')),'Тип~~данных~~переменной~~$var_x') ;; определение типа данных

exect=(Int(Sqrt(78))+1)^2 GLOBALEXECT<a> ;; вычислить следующее число полного квадрата, относительно числа 78

exect=(Int(Sqrt(78))-1)^2 GLOBALEXECT<a> ;; вычислить предыдущее число полного квадрата, относительно числа 78

exect=(Int(Sqrt(ClipGet()))+1)^2 GLOBALEXECT<a> ;; вычислить следующее число полного квадрата, относительно числа из буфера обмена

exect=(Int(Sqrt(ClipGet()))-1)^2 GLOBALEXECT<a> ;; вычислить предыдущее число полного квадрата, относительно числа из буфера обмена

exect=@HOUR=5?MsgBox(4096,'Спать',@HOUR&'~~часов')+_Exit():0 ;; если 5 часов, то выдать сообщение

exect=_SendM(WinGetHandle('[CLASS:AkelPad4]'),273,4157,0) ;; выделить всё в AkelPad

exect=_ViewValues($CmdLine) параметр1 параметр2 параметр3 ;; просмотр параметров командной строки, переданных утилите при запуске

exect=_ViewValues($CmdLine[$CmdLine[0]]) параметр1 параметр2 параметр3 ;; просмотр последнего параметра командной строки, переданных утилите при запуске

exect=_ViewValues($CmdLine[0]) параметр1 параметр2 параметр3 ;; просмотр количества параметров командной строки, переданных утилите при запуске

exect=_ViewValues($CmdLineRaw) параметр1 параметр2 параметр3 ;; просмотр всей командной строки, переданных утилите при запуске

exect=_ViewValues('<info=n6|clpget|Russian|3>') ;; просмотр преобразования числа в денежном формате из буфера обмена прописью на русском, первая буква каждого слова в верхнем регистре

exect=_ViewValues(BitOR(4,64,768)) ;; вычисляет и показывает результат

exect=_ViewValues(Chr(65),'---',320,180,-1,-1,'Wingdings',72) ;; просмотр символа кода 65 шрифт "Wingdings"

exect=_ViewValues(ClipGet()) ;; просмотр содержимого буфера обмена

exect=_ViewValues(ClipGet())||redit<1> ;; просмотр содержимого буфера обмена, класс элемента просмотра RichEdit

exect=_ViewValues(ClipGet(),'Просмотр~~буфера~~обмена',600,500,0,0,-1,14,'FFFF00','050000') ;; просмотр содержимого буфера обмена

exect=_ViewValues(ClipGet(),'Просмотр~~буфера~~обмена',700,400) ;; просмотр содержимого буфера обмена с заданными размерами окна

exect=_ViewValues(ControlGetText('[CLASS:TTOTAL_CMD]',Null,'TButtonBar1')) ;; получить имя панели инструментов BAR (если включена имя вертикальной, иначе основной)

exect=_ViewValues(ControlGetText('[CLASS:TTOTAL_CMD]',Null,'TButtonBar2')) ;; получить имя основной панели инструментов BAR (если включена вертикальная)

exect=_ViewValues(DirGetSize('%P%N')) ;; получить размер папки под курсором

exect=_ViewValues(FileRead('%P%N'),'%P%N') ;; просмотр содержимого файла под курсором

exect=_ViewValues(FileRead('%P%N'),'%P%N',@DesktopWidth,@DesktopHeight) ;; просмотр содержимого файла под курсором, окно во весь экран

exect=_ViewValues(FileRead('%WL'),'"%P"',600,500,0,0,-1,14,'FFFF00','050000') ;; просмотр списка выделенных объектов с различными настройками окна

exect=_ViewValues(FileReadLine('%P%N',-1)) ;; получить последнюю строку файла под курсором

exect=_ViewValues(ProcessList()) ;; получить массив процессов

exect=_ViewValues(ProcessList('notepad.exe')) ;; получить массив данных для процессов notepad.exe

exect=_ViewValues(StringRegExp(ClipGet(),'(?m)^([^\r\n]*)',3)) ;; разбить содержимое буфера обмена в массив построчно и просмотр массива

exect=_ViewValues(StringRegExp(FileRead('%P%N'),'(?m)^([^\r\n]*)',3),'%P%N') ;; разбить содержимое файла под курсором в массив построчно и просмотр массива

exect=_ViewValues(StringStripWS(DllCall('shlwapi.dll','int','StrFromTimeIntervalW','wstr','''','uint',1024,'dword',TimerDiff(0),'int',7)[1],3)) ;; получить время работы компьютера в формате: часы, минуты, секунды

exect=_ViewValues(UBound(FileReadToArray('%P%N'))) ;; получить количество строк файла под курсором

exect=_ViewValues(WinList()) ;; получить массив из заголовков и дескрипторов окон

exect=_ViewValues(WinList('Total')) ;; получить массив из заголовков и дескрипторов окон (для окон с заголовком 'Total...')

exect=2*ACos(0) GLOBALEXECT<a> ;; получить число PI

exect=4*ATan(1) GLOBALEXECT<a> ;; получить число PI

exect=Abs(-123.45) GLOBALEXECT<a> ;; вычисляет абсолютное значение (модуль) числа.

exect=&#65Cos(-1) GLOBALEXECT<a> ;; получить число PI

exect=Asc('A') GLOBALEXECT<a> ;; возвращает ASCII-код символа

exect=AscW('A') GLOBALEXECT<a> ;; возвращает юникод-код символа

exect=Assign('STRUCT_N',DllStructCreate('wchar[256]'),2)||$var_i=IsDllStruct($STRUCT_N)||_ViewValues($var_i) ;; пример проверки переменной типом данных DllStruct

exect=Assign('var_s','привет',2)||_ViewValues('$var_s') ;; пример присваивания данных переменной с указанным именем

exect=Beep(261.63,200)+Beep(880,200)+Beep(880,200)+Beep(784,200)+Beep(880,200)+Beep(698.46,200)+Beep(261.63,200)+Beep(261.63,600)+Beep(261.63,200)+Beep(880,200)+Beep(880,200)+Beep(932.32,200)+Beep(784,200)+Beep(1046.5,600)+Beep(1046.5,200)+Beep(587.32,200)+Beep(587.32,200)+Beep(932.32,200)+Beep(932.32,200)+Beep(880,200)+Beep(784,200)+Beep(698.46,200)+Beep(261.63,200)+Beep(880,200)+Beep(880,200)+Beep(784,200)+Beep(880,200)+Beep(698.46,600) ;; пример воспроизведения мелодии

exect=Beep(329.63,200)+Beep(784,200)+Beep(987.75,200)+Beep(784,200)+Beep(1318.5,200)+Beep(784,200)+Beep(987.75,200)+Beep(784,200)+Beep(440,200)+Beep(880,200)+Beep(1046.5,200)+Beep(880,200)+Beep(1318.5,200)+Beep(880,200)+Beep(1046.5,200)+Beep(880,200)+Beep(587.32,200)+Beep(880,200)+Beep(1174.6,200)+Beep(880,200)+Beep(1480,200)+Beep(880,200)+Beep(1174.6,200)+Beep(880,200)+Beep(392,200)+Beep(784,200)+Beep(987.75,200)+Beep(784,200)+Beep(1568,800) ;; пример воспроизведения мелодии

exect=Beep(500,1000) ;; пример воспроизведения простого однотонного звука

exect=Beep(500,50)+Beep(600,50)+Beep(800,50) ;; пример воспроизведения однотонных звуков

exect=Beep(659.26,200)+Beep(659.26,200)+Beep(622.26,200)+Beep(659.26,200)+Beep(698.46,200)+Beep(659.26,400)+Sleep(200)+Beep(587.32,200)+Beep(523.25,200)+Beep(493.88,200)+Beep(523.25,200)+Beep(493.88,200)+Beep(440,400)+Sleep(200)+Beep(880,200)+Beep(880,200)+Beep(830.6,200)+Beep(880,200)+Beep(987.75,200)+Beep(880,200)+Beep(830.6,200)+Beep(880,200)+Beep(987.75,400) ;; пример воспроизведения мелодии

exect=Beep(659.26,800)+Beep(622.26,150)+Beep(659.26,150)+Beep(698.46,300)+Beep(659.26,300)+Beep(523.25,300)+Beep(523.25,150)+Beep(493.88,150)+Beep(440,800)+Beep(523.25,300)+Beep(659.26,250)+Beep(659.26,300)+Beep(880,800)+Beep(659.26,300)+Beep(784,400)+Beep(739.98,150)+Beep(698.46,800) ;; пример воспроизведения мелодии

exect=Beep(880,200)+Beep(659.26,200)+Beep(880,200)+Beep(659.26,200)+Beep(880,200)+Beep(830.6,200)+Beep(830.6,400)+Sleep(200)+Beep(830.6,200)+Beep(659.26,200)+Beep(830.6,200)+Beep(659.26,200)+Beep(830.6,200)+Beep(880,200)+Beep(880,600) ;; пример воспроизведения мелодии

exect=Beep(987.75,400)+Beep(880,400)+Beep(739.98,200)+Beep(784,200)+Beep(880,400)+Beep(739.98,200)+Beep(784,200)+Beep(880,400)+Beep(784,200)+Beep(739.98,200)+Beep(659.26,400)+Beep(1975.5,200)+Beep(1975.5,200)+Beep(1720,300)+Beep(1568,100)+Beep(1480,200)+Beep(1568,200)+Beep(1720,400)+Beep(1480,200)+Beep(1568,200)+Beep(1720,400)+Beep(1568,200)+Beep(1480,200)+Beep(1318.5,400) ;; пример воспроизведения мелодии

exect=BitAND(13,7) GLOBALEXECT<a> ;; выполняет операцию побитового умножения (арифметическое И) (возвращает 5)

exect=BitNOT(5) GLOBALEXECT<a> ;; выполняет операцию побитового отрицания (арифметическое НЕ) (возвращает -6)

exect=BitOR(3,6) GLOBALEXECT<a> ;; выполняет операцию побитового сложения (арифметическое ИЛИ). (возвращает 7)

exect=BitRotate(7,2) GLOBALEXECT<a> ;; выполняет операцию циклического побитового сдвига. (возвращает 28)

exect=BitShift(14,2) GLOBALEXECT<a> ;; выполняет операцию побитового сдвига. (возвращает 3)

exect=BitXOR(10,6) GLOBALEXECT<a> ;; выполняет операцию побитового исключающего ИЛИ. (12)

exect=BlockInput(1)||Sleep(3000)||BlockInput(0) ;; на 3 секунды отключить использование мыши и клавиатуры

exect=&#67DTray('F:','open') ;; открывает лоток CD привода F:

exect=Ceiling(-4.8) GLOBALEXECT<a> ;; округляет число до ближайшего целого в большую сторону (возвращает -4)

exect=Ceiling(4.8) GLOBALEXECT<a> ;; округляет число до ближайшего целого в большую сторону (возвращает 5)

exect=Chr(65) GLOBALEXECT<a> ;; возвращает символ, соответствующий указанному ASCII-коду

exect=ChrW(257) GLOBALEXECT<a> ;; возвращает символ, соответствующий указанному юникод-коду

exect=ClipPut(BinaryToString(StringToBinary(ClipGet(),2))) ;; декодировать в буфера обмена строку UTF-16 LE 1200 в ANSI 1251

exect=ControlClick('Калькулятор',Null,'[ID:139]') ;; эмулировать нажатие мыши на указанном элементе запущенного калькулятора (на Win10 не работает)

exect=ControlCommand('[CLASS:AkelPad4]',Null,'AkelEditW1','EditPaste','привет') ;; вставить слово "привет" в AkelPad

exect=ControlCommand('Безымянный~~~~Блокнот',Null,'Edit1','EditPaste','Это~~пример~~вставки~~текста'&@CRLF&~~переносом~~на~~новую~~строку') ;; пример вставки текста в "Блокнот" (он должен быть запущен)

exect=ControlDisable('[CLASS:TTOTAL_CMD]',Null,'TButtonBar1')||Sleep(2000)||ControlEnable('[CLASS:TTOTAL_CMD]',Null,'TButtonBar1') ;; на 2 секунды отключить панель инструментов Total Commander

exect=ControlHide('[CLASS:TTOTAL_CMD]',Null,'TButtonBar1')||Sleep(2000)||ControlShow('[CLASS:TTOTAL_CMD]',Null,'TButtonBar1') ;; на 2 секунды скрыть панель инструментов Total Commander

exect=ControlListView('[CLASS:My]',Null,'SysListView321','SelectAll') ;; выделить все пункты заданного ListView

exect=ControlMove('[CLASS:TTOTAL_CMD]',Null,'TButtonBar1',10,10)||Sleep(2000)||ControlMove('[CLASS:TTOTAL_CMD]',Null,'TButtonBar1',0,2) ;; на 2 секунды переместить панель инструментов (TC x32)

exect=ControlSend('[CLASS:Progman]','''','''','{F5}') ;; обновить рабочий стол

exect=ControlSend('Безымянный~~~~Блокнот',Null,'Edit1','привет') ;; вставляет текст "привет" в окно "Блокнота" (он должен быть запущен, может быть свёрнут)

exect=ControlSetText('[CLASS:Notepad]',Null,'Edit1','Новый~~текст~~уставленный~~в~~элемент~~Edit') ;; заменить текст на заданный в "Блокноте" (он должен быть запущен)

exect=ControlTreeView('[CLASS:My]',Null,'TreeView32','Uncheck','4') ;; Снять галочку с заданного пункта TreeView32

exect=Cos(ACos(-1)/4) GLOBALEXECT<a> ;; косинус 45 градусов

exect=Dec('FFFF') GLOBALEXECT<a> ;; преобразует строку содержащую шестнадцатеричное число в десятичное

exect=Dec('FFFF',Default) GLOBALEXECT<a> ;; возвращает число 65535

exect=DirCopy(@MyDocumentsDir,'C:\Backups\MyDocs',1) ;; копировать каталог "Мои документы" в папку MyDocs

exect=DirCopy('C:\Test','C:\Backups\MyDocs',1) ;; копировать каталог Test в папку MyDocs

exect=DirCreate('C:\Test1\Folder1\Folder2') ;; создать папку и недостающую структуру

exect=DirMove('C:\Test','C:\Backups\MyDocs',1) ;; переместить папку Test в папку MyDocs

exect=DirRemove('C:\Backups\MyDocs',1) ;; удалить папку MyDocs

exect=DllCall('kernel32.dll','bool','CopyFileExW','wstr','%P%N','wstr','%T%N','ptr',0,'struct*',0,'bool*',0,'dword',0) tcimg=$cm4006|540 ;; копировать файл под курсором в другую панель

exect=DllCall('kernel32.dll','bool','CreateDirectoryExW','wstr','"%P"','wstr','xxx','struct*',0) tcimg=$cm540 ;; в активной панели создать каталог "xxx"

exect=DllCall('kernel32.dll','bool','CreateDirectoryW','wstr','"%P"zzz','struct*',0) tcimg=$cm540 ;; в активной панели создать каталог "zzz"

exect=DllCall('kernel32.dll','bool','CreateHardLinkW','wstr','%T%N','wstr','%P%N','ptr',0) tcimg=$cm4006|540 ;; для файла под курсором создать именную жёсткую ссылку в другой панели (в рамках одного диска)

exect=DllCall('kernel32.dll','boolean','CreateSymbolicLinkW','wstr','"%P"xxx\','wstr','C:\','dword',1) tcimg=$cm540 ;; для диска C:\ создать символическую ссылку в активной панели именем "xxx"

exect=DllCall('kernel32.dll','boolean','CreateSymbolicLinkW','wstr','%T%N','wstr','%P%N','dword',0) tcimg=$cm4006|540 ;; для файла под курсором создать именную символическую ссылку в другой панели

exect=DllCall('kernel32.dll','boolean','CreateSymbolicLinkW','wstr','%T%N','wstr','%P%N','dword',1) tcimg=$cm4006|540 ;; для папки под курсором создать именную символическую ссылку в другой панели

exect=DllCall('kernel32.dll','dword','GetCurrentDirectoryW','dword',4096,'wstr','''')[2] GLOBALEXECT<a> ;; возвращает путь текущего каталога

exect=DllCall('kernel32.dll','dword','GetFileAttributesW','wstr','%P%N')[0] GLOBALEXECT<a> ;; получить флаги атрибутов объекта под курсором

exect=DllCall('kernel32.dll','handle','CreateFileW','wstr','"%P"test.txt','dword',0,'dword',0,'struct*',0,'dword',1,'dword',0,'handle',0) tcimg=$cm540 ;; в активной панели создать файл test.txt

exect=DllCall('kernel32.dll','int','Beep','dword',500,'dword',1000) ;; пример воспроизведения простого однотонного звука

exect=DllCall('kernel32.dll','int','SetFileAttributesW','wstr','%P%N','dword',2+4) tcimg=$cm540 ;; установить объекту под курсором атрибут "скрытый" (2) и "системный" (4) ("архивный" (32), "только для чтения" (1), "снять все атрибуты" (128))

exect=DllCall('shell32.dll','int','ShellAbout','hwnd',0,'str','xxx','str','zzz','ptr',0) ;; пример вызова системного диалога "О программе"

exect=DllCall('shell32.dll','int','ShellAboutW','hwnd',0,'wstr','TITLE#NAME','wstr','TEXT') ;; запуск диалога "O Windows"

exect=DllCall('shell32.dll','long','SHEmptyRecycleBinW','hwnd',0,'wstr','''','dword',0) ;; пример вызова диалога очистки корзины

exect=DllCall('shell32.dll','long','SHEmptyRecycleBinW','hwnd',0,'wstr',Null,'dword',0) ;; пример вызова диалога очистки корзины

exect=DllCall('user32.dll','bool','SystemParametersInfoW','uint',93,'uint',7,'struct*',0,'uint',0)||Sleep(5000)||DllCall('user32.dll','bool','SystemParametersInfoW','uint',93,'uint',0,'struct*',0,'uint',0) ;; включить след от указателя мыши на 5 секунд

exect=DllCall('user32.dll','int','MessageBoxW','hwnd',0,'wstr','ERROR','wstr',Null,'dword',4096) ;; пример сообщения с ошибкой

exect=DriveMapAdd('X:','\\myserver\stuff') ;; присоединить X диск в \\myserver\stuff для использования текущим пользователем

exect=DriveMapAdd('X:','\\myserver\stuff')||$var_sinfo=DriveMapGet('X:')||_ViewValues('$var_sinfo') ;; присоединяет X диск и получает информацию о подключении

exect=DriveMapAdd('X:','\\myserver2\stuff2',0,'domainx\jon','tickle') ;; присоединить X диск в \\myserver2\stuff2 для использования пользователем "jon" из домена "domainx" с паролем "tickle"

exect=DriveMapDel('X:') ;; отключить диск

exect=DriveSetLabel('C:\','Система') ;; установить метку "Система" для диска C:\

exect=EnvGet('COMMANDER_PATH')||EnvGet('WINDIR')||EnvGet('AppData') GLOBALEXECT<a> ;; пример получение значения переменной среды

exect=EnvSet('MYENV','это~~тест')||$var_s=EnvGet('MYENV')||_ViewValues('$var_s') ;; значение в переменную среды и прочитать её

exect=EnvSet('MYENV','это~~тест')||$var_s=EnvGet('MYENV')||_ViewValues('$var_s')||EnvSet('MYENV')||$var_s=EnvGet('MYENV')||_ViewValues('$var_s') ;; значение в переменную среды, прочитать её, удалить

exect=Execute(_StringDuplication('Random(0,9,1)&',100)&'Null') GLOBALEXECT<a> ;; получить строку случайных цифр, длина строки 100

exect=Exp(5) GLOBALEXECT<a> ;; возвращает число e, возведённое в указанную степень (возвращает 148.413159102577)

exect=FileChangeDir(@ScriptDir)+_ViewValues(@WorkingDir) ;; устанавливает текущий каталог папку скрипта

exect=FileCopy('C:\Temp\*.log','C:\Temp2\*.txt',9) ;; копирует все log-файлы папки Temp в txt-файлы папки Temp2, оставляя оригинальные имена прежними (Флаг 9 = 1 + 8, где 1 - перезаписывать файл, 8 - создать папку назначения)

exect=FileCopy('C:\Temp\*.txt','C:\Temp\TxtFiles\',1) ;; копирует все txt-файлы папки Temp с оригинальными именами в папку Temp\TxtFiles с заменой существующих файлов (без флага 8, если папка назначения не существует, то копирование не произойдёт)

exect=FileCopy('c:\Test\1.txt','c:\Test\1\') ;; пример копирования файла

exect=FileDelete('C:\Test\test.txt') ;; удаляет файл test.txt

exect=FileDelete('D:\*.tmp') ;; удаляет все файлы с расширением .tmp из корня диска D:\

exect=FileMove('C:\Test\*.txt','D:\TxtFiles\',9) ;; перемещение всех txt-файлов из папки Test в TxtFiles

exect=FileMove('C:\Test\test.txt','D:\My\test_bak.txt') ;; перемещение файла test.txt из папки Test в папку My с изменением имени в test_bak.txt (если папка D:\My\ не создана, то не перемещается)

exect=FileMove('C:\Test\test.txt','D:\My\test_bak.txt',8) ;; перемещение файла test.txt из папки Test в папку My с изменением имени в test_bak.txt (если папка D:\My\ не создана, то создаётся и файл не перемещается)

exect=FileMove('C:\Test\test.txt','D:\My\test_bak.txt',9) ;; перемещение файла test.txt из папки Test в папку My с изменением имени в test_bak.txt с заменой, если такой файл уже существует (если папка D:\My\ не создана, то создаётся и файл не перемещается)

exect=FileRead('D:\TC~~IMAGE\test.htm') GLOBALEXECT<a> ;; пример чтения файла

exect=FileRead(EnvGet('COMMANDER_PATH')&'\WinButtonBar.ini') GLOBALEXECT<a> ;; пример чтения файла с относительным путём

exect=FileRecycle('%P%N') ;; перемещает в корзину файл под курсором

exect=FileRecycle('C:\Test\test.txt') ;; перемещает в корзину файл test.txt

exect=FileRecycle('D:\*.tmp') ;; перемещает в корзину все файлы с расширением .tmp из корня диска D:\

exect=FileRecycleEmpty() ;; очищает корзину на всех дисках

exect=FileRecycleEmpty('C:\') ;; очищает корзину на диске C:\

exect=FileSetAttrib('C:\Test\*.txt','+RS') ;; установить всем файлам txt в папке Test атрибуты "Только чтение" и "Системный"

exect=FileSetAttrib('C:\Test\test.txt','-RS') ;; снять атрибуты с файла test.txt "Только чтение" и "Системный"

exect=FileSetTime('C:\Test.txt',Null) ;; установить файлу Test.txt текущую дату изменения

exect=FileSetTime('C:\Test\*.txt','20140101') ;; установить всем файлам txt в папке Test дату изменения 1-ое Января 2014

exect=FileSetTime('C:\Test\test.txt','20140101') ;; установить файлу test.txt дату изменения 1-ое Января 2014

exect=Floor(4.8) GLOBALEXECT<a> ;; округляет число до ближайшего целого в меньшую сторону (возвращает 4)

exect=Floor(-4.8) GLOBALEXECT<a> ;; округляет число до ближайшего целого в меньшую сторону (возвращает -5)

exect=FtpSetProxy(0) ;; использует настройки IE для прокси

exect=FtpSetProxy(1) ;; без прокси

exect=FtpSetProxy(2,'www-cache.myisp.net:8080') ;; использует прокси "www-cache.myisp.net" и порт 8080

exect=Hex(1033,4) GLOBALEXECT<a> ;; преобразует десятичное целое число или бинарные данные в шестнадцатеричный вид.

exect=HttpSetProxy(0) ;; использует настройки IE для прокси

exect=HttpSetProxy(1) ;; без прокси

exect=HttpSetProxy(2,'www-cache.myisp.net:8080') ;; использует прокси "www-cache.myisp.net" и порт 8080

exect=InetGet('http://www.mozilla.org',@DesktopDir&'\mozilla.html') ;; скачать страницу на рабочий стол

exect=IniDelete(EnvGet('COMMANDER_INI'),'WWW') ;; удалить из файла Wincmd.ini секцию [WWW]

exect=IniDelete(EnvGet('COMMANDER_INI'),'WWW','Key') ;; удалить из файла Wincmd.ini из секции [WWW] ключ Key

exect=IniRenameSection(EnvGet('COMMANDER_INI'),'WWW','XXX') ;; переименовать в Wincmd.ini секцию [WWW] в [XXX]

exect=IniWrite(EnvGet('COMMANDER_INI'),'WWW','Key',Chr(34)&'Это~~новое~~значение'&Chr(34)) ;; записать в файл Wincmd.ini в секцию [WWW] в ключ Key заданное значение в кавычках

exect=IniWrite(EnvGet('COMMANDER_INI'),'WWW','Key',Null) ;; записать в файл Wincmd.ini в секцию [WWW] ключ Key без значения

exect=IniWrite(EnvGet('COMMANDER_INI'),'WWW','Key','Это~~новое~~значение') ;; записать в файл Wincmd.ini в секцию [WWW] в ключ Key заданное значение

exect=IniWriteSection(EnvGet('COMMANDER_INI'),'WWW','k1=привет'&@LF&'k2=пока') ;; записать в Wincmd.ini в секцию [WWW] заданные ключи и значения

exect=Int(Sqrt(78))+1 GLOBALEXECT<a> ;; вычислить следующее число имеющее полный квадрат, относительно числа 78

exect=Int(Sqrt(78))-1 GLOBALEXECT<a> ;; вычислить предыдущее число имеющее полный квадрат, относительно числа 78

exect=Int(Sqrt(ClipGet()))+1 GLOBALEXECT<a> ;; вычислить следующее число имеющее полный квадрат, относительно числа из буфера обмена

exect=Int(Sqrt(ClipGet()))-1 GLOBALEXECT<a> ;; вычислить предыдущее число имеющее полный квадрат, относительно числа из буфера обмена

exect=Log(1000) GLOBALEXECT<a> ;; вычисляет натуральный логарифм числа (возвращает 6.90775527898214)

exect=MouseClick('left',0,500,2) ;; двойной клик в координатах x=0, y=500

exect=MouseClickDrag('left',0,200,600,700) ;; левое нажатие в координатах x=0, y=200 и отпуск в координатах x=600, y=700

exect=MouseDown('left')||Sleep(100)||MouseUp('left') ;; устанавливает левую кнопку мыши нажатой на 100 миллисекунд

exect=MouseMove(10,100) ;; перемещает курсор в координаты x=10, y=100

exect=MouseWheel('down',10) ;; прокручивает колёсико мыши 10 раз вниз

exect=MouseWheel('up',10) ;; прокручивает колёсико мыши 10 раз вверх

exect=MsgBox(4096,'Сообщение','Каталог_под_курсором_пустой?~~'&(DllCall('shlwapi.dll','bool','PathIsDirectoryEmptyW','wstr','%P%N')[0]?'Yes':'No')) ;; определяет, является ли указанный путь пустым каталогом

exect=MsgBox(4096,'Сообщение','Под_курсором_каталог_или_файл?~~'&(DllCall('shlwapi.dll','bool','PathIsDirectoryW','wstr','%P%N')[0]?'Каталог':'Файл')) ;; определяет, является ли указанный путь каталогом или файлом

exect=MsgBox(4096,'Сообщение','Файл_под_курсором_защищён_системой?~~'&(DllCall('sfc.dll','bool','SfcIsFileProtected','handle',0,'wstr','%P%N')[0]=0?'No':'Yes')) ;; проверить защищён ли файл под курсором и выдать сообщение

exect=MsgBox(4096+64,Default,'Hello') ;; пример сообщения с заголовком имени утилиты

exect=MsgBox(4096+64,Null,'Hello') ;; пример сообщения без названия заголовка

exect=MsgBox(4096+64,'Результат','Заданная~~фраза~~встречается~~в~~файле~~'&(StringSplit(FileRead('%P%N'),'привет',1)[0]-1)&'~~раз(а)') ;; получить количество раз встречающейся фразы в файле под курсором

exect=MsgBox(4096+64,'Результат','Фраза~~из~~буфера~~обмена~~встречается~~в~~файле~~'&(StringSplit(FileRead('%P%N'),ClipGet(),1)[0]-1)&'~~раз(а)') ;; получить количество раз встречающейся фразы из буфера обмена в файле под курсором

exect=ObjCreate('Shell.Application').FileRun ;; запуск диалога "Выполнить" WIN+R

exect=ObjCreate('Shell.Application').NameSpace('"%T"').CopyHere('%P%N',16) ;; копировать "большой" файл под курсором в другую панель с помощью проводника

exect=ProcessExists('AkelPad.exe')?0:MsgBox(4096+64,'Проверка','AkelPad~~не~~запущен',3)+_Exit() infbx=InfoBox_TEST1 ;; если процесс AkelPad существует, то выполнить дальнейшие команды (если не существует, то сообщение и выход)

exect=ProcessExists('AkelPad.exe')?MsgBox(4096+64,'Проверка','AkelPad~~запущен',3)+_Exit():0 infbx=InfoBox_TEST1 ;; если процесс AkelPad не существует, то выполнить дальнейшие команды (если существует, то сообщение и выход)

exect=ProcessSetPriority('TOTALCMD.EXE',3) ;; установить приоритет "выше среднего" процессу TOTALCMD.EXE

exect=ProcessWait('notepad.exe',3)||MsgBox(4096,Null,'процесс~~существует') ;; ожидает запуска "Блокнота"

exect=ProcessWaitClose('firefox2.exe')||ProcessClose('AdvOR.exe') ;; ожидание закрытия процесса firefox2.exe и далее закрытие процесса AdvOR.exe

exect=ProgressOn('Измеритель','Увеличивается','0~~процентов') <FOR> 1 <TO> 5 exect=ProgressSet(:INDEX:*20,:INDEX:*20&'~~процентов')&Sleep(1000) <NEXT> exect=ProgressOff() ;; пример прогресс бара

exect=RegDelete('HKCU\Software\Test','TestKey') ;; удаляет раздел TestKey

exect=RegWrite('HKEY_CURRENT_USER\Software\Test','TestKey','REG_SZ','Приветствую') ;; записывает в реестр единственное значение REG_SZ

exect=RegWrite('HKEY_CURRENT_USER\Software\Test','TestKey1','REG_MULTI_SZ','строка1'&@LF&'строка2') ;; записывает в реестр значение "строка1" и "строка2", тип REG_MULTI_SZ

exect=RegWrite('HKEY_CURRENT_USER\Software\Test','TestKey6','REG_BINARY',StringToBinary('Hello')) ;; создаёт параметр с бинарными данными

exect=RegWrite('HKEY_CURRENT_USER\Software\Test','TestKey7','REG_DWORD',17) ;; создаёт параметр с целым числом

exect=Round(-1.582,1) GLOBALEXECT<a> ;; округляет число до указанного числа знаков после запятой

exect=Run(@ComSpec&'~~/k~~'&ClipGet()) ;; вызов консоли и передача параметров из буфера обмена (консоль остаётся открытой)

exect=Run(@ComSpec&'~~/k~~'&'netsh~~interface~~ip~~show~~address') ;; вызов консоли и передача параметров (консоль остаётся открытой)

exect=Run(@ScriptDir&'\TCIMG.exe~~infbx=InfoBox_TEST1') ;; пример запуска утилиты с параметрами

exect=Run('calc')||Sleep(1000)||ControlClick('Калькулятор',Null,'[ID:139]') ;; запустить калькулятор и эмулировать нажатие мыши на указанном элементе (на Win10 не работает)

exect=Run('notepad.exe')||$var_h=WinWait('[CLASS:Notepad]',Null,5)||IsHWnd(Eval('var_h'))?_ViewValues('Это~~дескриптор~~HWND'):_ViewValues('Это~~НЕ~~дескриптор~~HWND') ;; запустить "Блокнот" и проверить дескриптор окна на валидность

exect=Run('notepad.exe')||$var_h=WinWait('[CLASS:Notepad]',Null,5)||SendKeepActive(HWnd($var_h)) <FOR> 1 <TO> 10 exect=Send('привет')||Sleep(500) <NEXT> exect=SendKeepActive(Null)||WinClose(HWnd($var_h)) ;; запустить "Блокнот" и удерживать окно блокнота активным при использовании функции Send()

exect=Run('notepad.exe')||$var_h=WinWait('[CLASS:Notepad]',Null,5)||WinSetState(HWnd($var_h),Null,@SW_MINIMIZE) ;; запускает "Блокнот", ожидает появление и сворачивает

exect=Run('notepad.exe')||$var_h=WinWaitActive('[CLASS:Notepad]')||ControlSend(Eval('var_h'),Null,'Edit1','закройте~~окно')||WinWaitClose(Eval('var_h'))||MsgBox(4096,Null,'окно~~закрыто') ;; запустить "Блокнот", дождаться закрытие окна пользователем

exect=Run('notepad.exe')||$var_h=WinWaitActive('[CLASS:Notepad]')||ControlSend(Eval('var_h'),Null,'Edit1','привет') ;; запустить "Блокнот", дождаться активизации и ввести слово "привет"

exect=Run('notepad.exe')||$var_h=WinWaitActive('[CLASS:Notepad]')||ControlSend(Eval('var_h'),Null,'Edit1','сверните~~окно')||WinWaitNotActive(Eval('var_h'))||MsgBox(4096,Null,'окно~~не~~активно') ;; запустить "Блокнот", дождаться когда окно не будет активным

exect=Run('notepad.exe')||WinWait('[CLASS:Notepad]')||Sleep(3000)||WinClose('[CLASS:Notepad]') ;; запустить "Блокнот", дождаться появления указанного окна и через 3 секунды закрыть окно

exect=Run('rundll32~~mshtml.dll,PrintHTML~~''%P%N''') ;; отправить файл под курсором на печать, выбор принтера

exect=RunAs('Username',@ComputerName,'Password',0,'notepad.exe',Null,@SW_SHOWMAXIMIZED) ;; запускает "Блокнот" развёрнутым на весь экран от имени указанного выше пользователя

exect=RunAsWait('Username',@ComputerName,'Password',0,'notepad.exe',Null,@SW_SHOWMAXIMIZED) ;; запускает "Блокнот" развёрнутым на весь экран от имени указанного выше пользователя и приостанавливает работу утилиты до его закрытия

exect=RunWait(@ComSpec&'~~/c~~Robocopy~~''D:\TC_Util\TCIMG\338_b3''~~''D:\EXTT\88_88\1''~~/NDL') ;; копировать папку в другую с заданными параметрами утилиты robocopy

exect=RunWait('notepad.exe')||MsgBox(4096,Null,'программа~~закрыта') ;; запускает "Блокнот" и приостанавливает работу утилиты до его закрытия

exect=Send('{TAB}') ;; нажать TAB

exect=ShellExecute('%P%N') ;; запустить файл под курсором

exect=ShellExecute('%P%N',Null,Null,'edit') ;; открыть файл под курсором в ассоциированном по умолчанию редакторе

exect=ShellExecute(''::{645FF040-5081-101B-9F08-00AA002F954E}'') ;; открыть "Корзину" в проводнике

exect=ShellExecute('::{7007ACC7-3202-11D1-AAD2-00805FC1270E}') ;; открыть окно "Сетевые подключения"

exect=ShellExecute(_PathFull('$f50')) ;; открыть "Мой Компьютер" в проводнике

exect=ShellExecute(_PathFull('$f51')) ;; открыть "Панель инструментов" в проводнике

exect=ShellExecute(_PathFull('$f57')) ;; открыть "Мои документы" в проводнике

exect=ShellExecute('C:\Test\Name.txt',Null,Null,'edit') ;; открыть .txt файл в ассоциированном по умолчанию редакторе

exect=ShellExecute('D:\FFOutput\Dust_Cloud.scr') ;; запустить скринсейвер

exect=ShellExecute('E:\TC~~IMAGE\MyFiles\lnk\slimjet.lnk') ;; запустить ярлык

exect=ShellExecute('http://tc-image.3dn.ru/forum/5-498-1') ;; открывает ссылку в браузере

exect=ShellExecute('mmsys.cpl') ;; запустить диалог "Настройки звука"

exect=ShellExecute('notepad.exe') ;; запускает "Блокнот"

exect=ShellExecuteWait('notepad.exe') ;; запускает "Блокнот" и приостанавливает работу утилиты до его закрытия

exect=Shutdown(6) ;; принудительная перезагрузка

exect=Sin(ATan(1)) GLOBALEXECT<a> ;; синус 45 градусов

exect=SoundPlay('c:\Music.mp3')||Sleep(10000) ;; воспроизводить звуковой файл 10 секунд (после звукового файла могут стоять и другие команды, он будет звучать до конца обработки всех команд)

exect=SoundPlay('c:\Music.mp3',1) ;; воспроизвести звуковой файл до конца

exect=SoundPlay('c:\Music1.mp3',1)||SoundPlay('c:\Music2.mp3',1) ;; воспроизвести 1-й звуковой файл до конца, затем 2-й

exect=SplashTextOn('Заголовок',StringReplace(ClipGet(),'&','&&'),200,50)&Sleep(3000)&SplashOff() ;; пример окна с текстом из буфера обмена (удвоение для корректного отображения символа "&")

exect=SplashTextOn('Заголовок','Дата:~~'&StringFormat('%%04d.%%02d.%%02d~~%%02d:%%02d:%%02d',@YEAR,@MON,@MDAY,@HOUR,@MIN,@SEC),300,200,-1,5,0,Null,38,700)+Sleep(3000)+SplashOff() ;; пример окна с датой

exect=SplashTextOn('Заголовок','Моё~~Сообщение...',200,50)&Sleep(3000)&SplashOff() ;; пример окна с текстом

exect=Sqrt(2)||Sqrt(9) GLOBALEXECT<a> ;; вычисляет квадратный корень выражения

exect=StringAddCR('Блокнот'&@LF&'ожидает'&@LF&'CRLF-текст.') GLOBALEXECT<c1> ;; пример добавления возврата каретки в текст

exect=StringFormat('%%04d.%%02d.%%02d~~%%02d:%%02d:%%02d',@YEAR,@MON,@MDAY,@HOUR,@MIN,@SEC) GLOBALEXECT<a> ;; получение преобразованной даты

exect=StringFormat('%%d',0xFF00FF) GLOBALEXECT<a> ;; возвращает десятичное число

exect=StringFormat('%%o',64) GLOBALEXECT<a> ;; возвращает восьмеричное число

exect=StringFormat('%%o~~%%09d~~%%d',64,Null,0x100) GLOBALEXECT<a> ;; возвращает строку заданную форматированием

exect=StringFormat('%%x<===>%%X',1233567,1233567) GLOBALEXECT<a> ;; возвращает шестнадцатеричное значение числа %x-нижний %X-верхний регистр

exect=StringFormat('[%%s]~~{%%s}','line1','line2') GLOBALEXECT<a> ;; обрамляет строку скобками

exect=StringFormat('{%%16.5f}',10.00) GLOBALEXECT<a> ;; преобразование числа с добавлением в начало пробелов

exect=StringInStr('Это~~строка','ОКА') GLOBALEXECT<a> ;; проверяет вхождение подстроки в указанную строку

exect=StringIsAlNum('Эта~~фраза~~содержит~~пробелы~~и~~точку.') GLOBALEXECT<a> ;; проверяет наличие в строке только букв и цифр

exect=StringIsAlpha('Эта~~фраза~~содержит~~пробелы~~и~~точку.') GLOBALEXECT<a> ;; проверяет наличие в строке только букв

exect=StringIsASCII('This~~is~~a~~sentence.') GLOBALEXECT<a> ;; проверяет наличие в строке только ASCII символы в диапазоне 0x00 - 0x7f (0 - 127)

exect=StringReverse(ClipGet()) GLOBALEXECT<c> ;; реверсирование содержимого буфера обмена

exect=StringReverse('Это~~строка') GLOBALEXECT<a> ;; реверс строки

exect=StringUpper('~~это~~строка~~текста~~') GLOBALEXECT<a> ;; преобразует строку в верхний регистр

exect=Tan(ATan(1)) GLOBALEXECT<a> ;; тангенс 45 градусов

exect=ToolTip('---------------------------'&@CRLF&'%P%N'&@CRLF&'<info=o44%P%N//>',<info=x165>,<info=x166>,'Информация',1,1)||Sleep(5000) ;; создать всплывающую подсказку на 5 секунд в позиции пункта с информацией: Путь объекта под курсором и его даты создания

exect=ToolTip('---------------------------'&@CRLF&'Длина~~пути:~~'&StringLen('%P%N')&'~~символа(ов)'&@CRLF&'Дата~~создания:~~<info=o44%P%N//>',<info=x165>,<info=x166>,'Информация',1,1)||Sleep(5000) ;; создать всплывающую подсказку на 5 секунд в позиции пункта с информацией: Длина пути объекта под курсором и его даты создания

exect=TraySetState(1)||TraySetIcon()||Sleep(5000) ;; пример установки значка в трее по умолчанию

exect=TraySetState(1)||TraySetIcon(@ScriptDir&'\TCIMG.dll',1)||Sleep(5000) ;; пример установки значка в трее

exect=TraySetState(1)||TrayTip(Null,'---------------------------'&@CRLF&'%P%N'&@CRLF&'<info=o44%P%N//>',5,1)||Sleep(5000) ;; создать всплывающую подсказку на 5 секунд в трее с информацией: Путь объекта под курсором и его даты создания (без заголовка)

exect=TraySetState(1)||TrayTip('Информация','---------------------------'&@CRLF&'%P%N'&@CRLF&'<info=o44%P%N//>',5,1)||Sleep(5000) ;; создать всплывающую подсказку на 5 секунд в трее с информацией: Путь объекта под курсором и его даты создания

exect=WinActivate('[CLASS:Notepad]') ;; активирует окно "Блокнота"

exect=WinClose('[CLASS:Notepad]') ;; закрывает окно "Блокнота"

exect=WinFlash('[CLASS:Notepad]') ;; Мигание окна на панели задач "Блокнота"

exect=WinKill('[CLASS:Notepad]') ;; закрывает окно "Блокнота"

exect=WinMenuSelectItem('[CLASS:TTOTAL_CMD]',Null,'&Файлы','Зап&уск~~файлов~~и~~программ','Запуск~~прогр&аммы~~от~~имени...') ;; вызвать заданный пункт меню Total Commander

exect=WinMinimizeAll() ;; свернуть все окна

exect=WinMinimizeAll()||Sleep(3000)||WinMinimizeAllUndo() ;; свернуть все окна, вернуть последнее открытое окно

exect=WinSetOnTop('[CLASS:Shell_TrayWnd]',Null,0) ;; снять атрибут "Поверх Всех окон" для панели задач

exect=WinSetOnTop('[CLASS:Shell_TrayWnd]',Null,1) ;; установить атрибут "Поверх Всех окон" для панели задач

exect=WinSetState('[CLASS:TfrmTabber.UnicodeClass]',Null,@SW_HIDE) ;; скрыть окно заданного класса

exect=WinSetState('[CLASS:TfrmTabber.UnicodeClass]',Null,@SW_SHOW) ;; показать ранее скрытое окно заданного класса

exect=WinSetTitle('[CLASS:TTOTAL_CMD]',Null,'НОВЫЙ~~ЗАГОЛОВОК') ;; установить окну Total Commander текст заголовка

exect=WinSetTrans('[CLASS:Shell_TrayWnd]',Null,128) ;; установить прозрачность 50% для панели задач

forpgs slist=[tc=AM] <FOR> 1 <TO> GLOBALSLIST<0> exect=$var_ext=##<info=o71GLOBALSLIST<:INDEX:>>||$var_i=StringInStr('ini|db|dll','$var_ext')?_CmdCm('rends=x¦¦##rndm<3-|10><¤>wends=@<**info=o75GXLOBALSLIST<:INDEX:>><**info=o73GXLOBALSLIST<:INDEX:>>-GXLOBALRENDS<1>.zip<¤>start=RAR¦¦-IBCK¦¦a¦¦-m5¦¦-ms¦¦-cfg-¦¦-s¦¦-rr3p¦¦GXLOBALWENDS<1>¦¦<**info=o73GXLOBALSLIST<:INDEX:>>¦¦&&wait<¤>renmm=GXLOBALWENDS<1>¦¦##<**info=f1GXLOBALWENDS<1>|1>'):_CmdCm('start=RAR¦¦-IBCK¦¦a¦¦-m5¦¦-ms¦¦-cfg-¦¦-s¦¦-rr3p¦¦<**info=o75GXLOBALSLIST<:INDEX:>><**info=o73GXLOBALSLIST<:INDEX:>>-<info=s47>.zip¦¦<**info=o73GXLOBALSLIST<:INDEX:>>¦¦&&wait') <NEXT> tcimg=$cm540 ;; упаковать все файлы с расширением ini, db или dll в отдельный архив с именем хеш суммы, а остальные файлы в архивы с исходным именем + дата в активную панель и 3% на восстановление

hends=@<info=o500|clpget|List1> exect=$var_i='GLOBALHENDS<1>'=''''?_CmdCm('infbx=InfoBox17<¤>toexit'):1 openf=GLOBALHENDS<1>||AkelPad ;; найти файл (имя из буфера обмена) в заданных папках и открыть в AkelPad (если файл не найден, то выдать сообщение и завершить процесс)

hends=@<info=o500|MENU.tcg|List1> exect=$var_i='GLOBALHENDS<1>'=''''?_CmdCm('infbx=InfoBox17<¤>toexit'):1 openf=GLOBALHENDS<1>||AkelPad ;; найти MENU.tcg в заданных папках и открыть в AkelPad (если файл не найден, то выдать сообщение и завершить процесс)

imgpr=1 <IF> <info=f1%P%N//> = clpget <THEN> exect=$var_ibutton=MsgBox(4096,'Сообщение','Контрольные~~суммы~~совпадают.') <ELSE> exect=$var_ibutton=MsgBox(4096,'Сообщение','Контрольные~~суммы~~не~~совпадают.') <ENDIF> ;; сравнить контрольную сумму MD5 файла с контрольной суммой из буфера обмена, сообщить результат в окне системного образца

imgpr=1 exect=$var_s=##[input=BOX72]||$var_ap=_ArrayPermute(StringSplit('$var_s','"''"',2),'"''"',1)||$var_af=FileReadToArray('C:\dictionary.txt')||$var_ae=_ArrayDublElem($var_ ap,$var_af,1)||$var_s=_ArrayToString($var_ae,@CRLF) bufsr=##$var_s ;; отправить в буфер обмена все слова анаграммы введённого в диалоге слова, которые входят в состав словаря dictionary.txt (В список входят слова, с перестановкой всех букв заданного слова без повторов букв и точной длины)

imgpr=1 exect=$var_s=ClipGet()||$var_sz=(_ArrayToString(_ArrayPermute(StringSplit('$var_s','"''"',2)),'~~',1)) bufsr=##$var_sz||formt<sps36> ;; записать в буфер обмена анаграмму слова, находящегося в буфере обмена и разбить по 10 слов в строке. Если в слове более 10 символов, то для создание анаграммы понадобится длительное время

imgpr=1 exect=$var_sz=(_ArrayToString(_ArrayPermute(StringSplit(ClipGet(),'"''"',2)),'~~',1)) bufsr=##$var_sz||formt<sps36> ;; записать в буфер обмена анаграмму слова, находящегося в буфере обмена и разбить по 10 слов в строке. Если в слове более 10 символов, то для создание анаграммы понадобится длительное время

imgpr=1 forpgs slist=%WL <FOR> 1 <TO> GLOBALSLIST<0> sends=x||##rndm<3|30>||#Hmd5|1 sends=@<info=o75GLOBALSLIST<:INDEX:>>??2 sends=@<info=o72GLOBALSLIST<:INDEX:>//>??3 sends=@<info=o91GLOBALSLIST<:INDEX:>//>??4 folds=GLOBALSENDS<2>||GLOBALSENDS<3>-GLOBALSENDS<1> start=FFmpeg||-i||GLOBALSLIST<:INDEX:>||-ss||00:00:05||-r||1||GLOBALFOLDS<1>/images%%d.jpg||-vn||-ar||22050||-ac||2||-ab||96k||-f||mp3||GLOBALFOLDS<1>/sound.mp3||&&hide||&&wait pause=1000 exect=$var_array=##$PS<GLOBALFOLDS<1>//1//0//jpg>!!-1||$var_n=Ceiling(UBound($var_array)/4) pause=1000 start=FFmpeg||-r||4||-i||GLOBALFOLDS<1>/images%%d.jpg||-ss||00:00:05||-t||$var_n||-i||GLOBALFOLDS<1>/sound.mp3||-y||-r||4||-s||320x240||-b||200k||GLOBALSENDS<2>/GLOBALSENDS<4>-GLOBALSENDS<3>.flv||&&hide||&&wait pause=500 delsm=GLOBALFOLDS<1>||1 <NEXT> ;; создание из выделенных видео файлов (проверено на wmv) под курсором видео клипов flv начиная с 5 секунды и далее каждый кадр раз с чередованием раз в секунду (объединенный по 4 кадра в секунду) с добавление аудио и сохранением рядом с исходным видео файлом с именем родительского каталога + имя исходного видео файла + удаление промежуточных файлов

imgpr=1 sends=#http://www.worldstatesmen.org/Argentina.html exect=||_ViewValues($GLOBALSENDS[1]) ;; просмотреть содержимое заданной страницы интернета

imgpr=1 shape=V08 exect=$var_time=##[combo=BOX_V19]||$var_clon=##[group=BOX_V07]||$var_anim=##[combo=BOX_V55]||$var_norm=##[group=BOX_V08]||$var_dup=##[group=BOX_V09]||$var_dup=StringReplace('$var_dup','**',Chr(124)&Chr(124))||$var_qual=##[combo=BOX_V07] forpgs slist=%WL <FOR> 1 <TO> GLOBALSLIST<0> sends=x||##rndm<3|20>||#Hcrc32|1 start=Magick||-delay||$var_time||GLOBALSLIST<:INDEX:>||(||+clone|$var_clon||)||-morph||$var_anim|$var_dup|$var_norm||-quality||$var_qual||"%pAnim-mirror-GLOBALSENDS<1>-<info=o72GLOBALSLIST<:INDEX:>//>.gif"||&&hide||&&wait <NEXT> ;; создание анимации для изображения под курсором на основе зеркалирования изображения

imgpr=1 shape=V09 exect=$var_qual=##[coimgpr=1 shape=V09 exect=$var_qual=##[combo=BOX_V07]||$var_rashir=##[combo=BOX_V32]||$var_size=##[combo=BOX_V06] forpgs slist=%WL <FOR> 1 <TO> GLOBALSLIST<0> sends=x||##rndm<3|30>||#Hcrc32|1 sends=@<info=i3GLOBALSLIST<:INDEX:>//>??2 start=Magick||GLOBALSLIST<:INDEX:>||-resize||$var_size||-normalize||-quality||$var_qual||"%pGLOBALSENDS<1>-GLOBALSENDS<2>-<info=o72GLOBALSLIST<:INDEX:>//>.$var_rashir"||&&hide||&&wait <NEXT> ;; конвертирование выделенных изображений (выбор типа, сжатия, обрезки в диалоге) в текущую панель с добавлением приставки к имени

imgpr=1 shape=V09 exect=$var_qual=##[coimgpr=1 shape=V09 exect=$var_qual=##[combo=BOX_V07]||$var_rashir=##[combo=BOX_V32]||$var_size=##[combo=BOX_V06] forpgs slist=%WL <FOR> 1 <TO> GLOBALSLIST<0> start=Magick||GLOBALSLIST<:INDEX:>||-resize||$var_size||-normalize||-quality||$var_qual||"%t<info=o72GLOBALSLIST<:INDEX:>//>.$var_rashir"||&&hide||&&wait <NEXT> ;; конвертирование выделенных изображений (выбор типа, сжатия, обрезки в диалоге) в другую панель

imgpr=1 slist=%WL xlist=%WL||##path<4> <FOR> 1 <TO> GLOBALSLIST<0> start=FFmpeg||-i||GLOBALSLIST<:INDEX:>||-acodec||libmp3lame||-q:a||[input=BOX84]||GLOBALXLIST<:INDEX:>.mp3||&&hide||&&wait <NEXT> exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~исходные~~файлы?')||$var_i=$var_n=7?_Exit():1 delss=$GLOBALSLIST||1||upd<1> ;; конвертировать выделенные файлы (медиаконтент) в mp3 с переменным битрейтом (выбор в диалоговом окне), с сохранением в активной панели + удаление исходных файлов (требуется подтверждение)

imgpr=1 slist=PS<"%T"//2//0>||test<1f!!1!!0!!Del.fl> exect=$var_i='GLOBALSLIST<1>'=''''?_CmdCm('infbx=InfoBox17<¤>toexit'):1 xlist=FOLDC<$GLOBALSLIST//0//0>||<dellist=C:\ListOfNames.txt|5> delss=$GLOBALXLIST||1 ;; в папках неактивной панели содержащих файл Del.fl удалить все объекты кроме указанных в списке имён из файла C:\ListOfNames.txt

imgpr=1 slist=PS<"%T"//2//0>||test<1f!!1!!0!!Del.fl> exect=$var_i='GLOBALSLIST<1>'=''''?_CmdCm('infbx=InfoBox17<¤>toexit'):1 xlist=FOLDC<$GLOBALSLIST//0//0>||<dellist=C:\ListOfNames.txt|5> exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~объекты?')||$var_i=$var_n=7?_Exit():1 delss=$GLOBALXLIST||1 ;; в папках неактивной панели содержащих файл Del.fl удалить все объекты кроме указанных в списке имён из файла C:\ListOfNames.txt (требуется подтверждение удаления)

imgpr=1 start=FLAC||-s||--ignore-chunk-sizes||-8||list<%WL>||%%d||&&hide||&&wait exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~исходные~~файлы~~WAV?')||$var_i=$var_n=7?_Exit():1 delss=%WL||1 ;; конвертировать выделенные файлы WAV в формат FLAC с максимальной компрессией с сохранением в активной панели, с удалением (требуется подтверждение) исходных WAV в корзину (используется кодер/декодер FLAC)

inbox=1||MY_BOX1||text_string dubls=1 inbox=3||MY_BOX1||var_s exect=_ViewValues('$var_s') ;; записать "text_string" в контейнер с адресом MY_BOX1, в другом процессе утилиты прочитать данные из контейнера в заданную переменную

infht=0||InfoHtml1 dubls=2 exect=RunWait(@ComSpec&'~~/k') ;; вывести сообщение и запустить командную консоль в другом процессе утилиты

infos=2||9||notepad.exe||1 <FOR> 1 <TO> GLOBALINFOS1<0> exect=WinSetState(HWnd('GLOBALINFOS1<:INDEX:>'),Null,@SW_MINIMIZE) <NEXT> ;; свернуть окна с заданным именем процесса notepad.exe

infos=2||9||notepad.exe||1 <FOR> 1 <TO> GLOBALINFOS1<0> exect=WinSetState(HWnd('GLOBALINFOS1<:INDEX:>'),Null,@SW_RESTORE) <NEXT> ;; восстановить свёрнутые или развёрнутые окна с заданным именем процесса notepad.exe

infos=2||9||TCIMG.exe||textv=x||1 <FOR> 1 <TO> GLOBALINFOS1<0> exect=WinSetState(HWnd('GLOBALINFOS1<:INDEX:>'),Null,@SW_MINIMIZE) <NEXT> ;; свернуть окна просмотрщика буфера обмена (команда textv)

infos=2||9||TCIMG.exe||textv=x||1 <FOR> 1 <TO> GLOBALINFOS1<0> exect=WinSetState(HWnd('GLOBALINFOS1<:INDEX:>'),Null,@SW_RESTORE) <NEXT> ;; развернуть свернутые окна просмотрщика буфера обмена (команда textv)

itray=3 exect=$var_i=Floor(Sqrt(<info=x10>)) slist=%WL wlist=$GLOBALSLIST||##<info=i1:://>||formt<1,21> xlist=$GLOBALSLIST||##<info=i2:://>||formt<1,21> imgnz=$GLOBALSLIST||"%p"//0//"%O"-max-@<info=s47>||GLOBALEXECT<1>x#||jpg||framewh<#|5|5>||resizeimg<GLOBALWLIST<1>|GLOBALXLIST<1>> wlist=$GLOBALWLIST||formt<1,5> xlist=$GLOBALXLIST||formt<1,5> imgnz=$GLOBALSLIST||"%p"//0//"%O"-min-@<info=s47>||GLOBALEXECT<1>x#||jpg||framewh<#|5|5>||resizeimg<GLOBALWLIST<1>|GLOBALXLIST<1>> ;; объединить выделенные изображения по высоте, создав в активной панели два вертикальных объединения с максимальным приближением выходного изображения к квадрату, с именем первого изображения + системное время (рамка в 5px по краям и между склеенными изображениями случайным цветом) и кадрирование всей группы перед объединением в размер наименьшего и наибольшего изображения

itray=3 exect=$var_put=##@[tc=AP] sends=-1??-1||formt<54,1,63> slist=$GLOBALSENDS||#Hmd5|1|1||$$\ downl=$var_put//1||$GLOBALSENDS||convert<##<listx=$GLOBALSLIST>;;$$test.html>||uformat<0> ;; Из ссылок в буфере, вычислить контрольную сумму и закачать все файлы с присваиваемым именем test + расширение html в создаваемые каталоги из этой контрольной суммы

itray=3 exect=$var_put=##@[tc=AP]||HttpSetUserAgent('Mozilla/5.0~~(Windows~~NT~~10.0;~~Win64;~~x64)~~AppleWebKit/537.36~~(KHTML,~~like~~Gecko)~~Chrome/42.0.2311.135~~Safari/537.36~~Edge/12.246') urlrf=http://www.fakenamegenerator.com/|4||$var_put\//1||convert<##full.txt>||formt<70,54,56,62> ;; получить данные о случайно сгенерированном профиле со страницы fakenamegenerator.com (сохранить в активной панели в файл full.txt), предварительно установить строку User-Agent

itray=3 exect=$var_put='%P%N' sends=-1||formt<lin44,lin60,lin61,lin62,lin37,1> sends=GLOBALSENDS<1>??2||formt<lin59,lin57> downh=$var_put//2||GLOBALSENDS<1>||pause<1-2>||progres<>||convert<#Hmd5> renmm=GLOBALDOWNH<1>||extplus<> iconf=GLOBALRENMM<1>||"$var_put//1"||32 renmm=GLOBALICONF<1>||GLOBALSENDS<2>||rflag<1> icoft=$var_put||0||ico,0,1 attrf=GLOBALRENMM<1>||+HS!!0 delsm=GLOBALDOWNH<1>||1||upd<1> ;; назначить каталогу под курсором иконку из URL в буфере с конвертацией в размер 32х32 и назначением атрибута скрытый

itray=3 exect=Floor(Sqrt(<info=x10>)) slist=%WL wlist=$GLOBALSLIST||##<info=i1:://>||formt<1,20> xlist=$GLOBALSLIST||##<info=i2:://>||formt<1,20> imgnz=%WL||"%t"//0//"%O"-@<info=s47>||GLOBALEXECT<1>x#||framewh<#|5|5>||resizeimg<GLOBALWLIST<1>|GLOBALXLIST<1>> ;; склеить выделенные изображения по высоте, создав в активной панели вертикальное объединение с максимальным приближением выходного изображения к квадрату, с именем первого изображения + системное время (рамка в 5px по краям и между склеенными изображениями случайным цветом) и кадрирование всей группы перед объединением в размер наименьшего изображения

itray=3 global copys=%WL||"%p"//0||copyn<[input=BOX11]> exect=_ArrayConcatenate($GLOBALCOPYS1,$GLOBALCOPYS0,1,2) GLOBALCOPYS1<a> ;; скопировать выделенные объекты заданное в диалоге количество раз и добавить к глобальному массиву GLOBALCOPYS1 массив GLOBALCOPYS0

itray=3 slist=cliplist||formt<1,63> <FOR> 1 <TO> GLOBALSLIST<0> rends=:INDEX: openf=GLOBALSLIST<:INDEX:>||Browser||&&wait exect=$var_trig1=(GLOBALRENDS<1><GLOBALSLIST<0>)?_CmdCm('await=30¦¦0¦¦24'):0 <NEXT> ;; поочередное открытие списка ссылок из буфера в браузере (последующая ссылка открывается после нажатия клавиши HOME)

itray=3 wends=-1||formt<63,56,54,51,55> slist=%WL <FOR> 1 <TO> GLOBALSLIST<0> exect=$var_n=Floor('<info=o3GLOBALSLIST<:INDEX:>//>')||$var_n=$var_n<=1?1:($var_n<=10?2:($var_n<=100?3:($var_n<=500?4:5)))||$var_p='%%COMMANDER_PATH%%\Personal\commands\fold\$var_n.ico' icoft=GLOBALSLIST<:INDEX:>||0||$var_p||foldicon<favicon!!1!!1> <NEXT> attrb=FOLDC<$GLOBALSLIST//1//0//Desktop.ini>||-HS!!0 textx=FOLDC<$GLOBALSLIST//1//0//Desktop.ini>||&&([^^]+)!!$1@CRLFInfoTip=GLOBALWENDS<1>||backup<0> attrb=FOLDC<$GLOBALSLIST//1//0//Desktop.ini>||+HS!!0 ;; назначить выделенным папкам иконки (в зависимости от размера папки будут назначены разные иконки) путь к папке с иконками %%COMMANDER_PATH%%\fold\ имена иконок 1,2,3,4,5

lists=%Z%WL||##path<4> exect=$var_s=_GTR(ClipGet(),'en|ru',0,1)||_ViewValues('$var_s') ;; перевод выделенных имен объектов с английского на русский в Google

lists=%Z%WL||##path<4> exect=$var_s=_GTR(ClipGet(),'en|ru',1,1)||_ViewValues('$var_s') ;; перевод выделенных имен объектов с английского на русский в MS Bing

lists=%Z%WL||##path<4> exect=$var_s=_GTR(ClipGet(),'ru|en',0,1)||_ViewValues('$var_s') ;; перевод выделенных имен объектов с русского на английский в Google

lists=%Z%WL||##path<4> exect=$var_s=_GTR(ClipGet(),'ru|en',1,1)||_ViewValues('$var_s') ;; перевести выделенные имена объектов без расширения в MS Bing

lists=%Z%WL||##path<4> exect=$var_s=_GTR(ClipGet(),'ru|en',1,1)||_ViewValues('$var_s') ;; перевод выделенных имен объектов с русского на английский в MS Bing

lists=%Z%WL||##path<4>||&&(?i)[^a-zа-яё\s]!!~~||#G7||&&(?i)([a-za-яёЁ]~~[a-za-яёЁ]+).*!!$1 exect=ToolTip(ClipGet(),<info=x165>,<info=x166>,'i',1,1)||Sleep(600) ;; копировать первые два слова имен выделенных объектов и отобразить в информационном окне

lists=%Z%WL||##path<4>||&&(?i)[^a-zа-яё\s]!!~~||#G7||&&(?i)([a-za-яёЁ]+).*!!$1 exect=ToolTip(ClipGet(),<info=x165>,<info=x166>,'i',1,1)||Sleep(600) ;; копировать первые слова имен выделенных объектов и отобразить в информационном окне

listx=[tc=AM]||1 <FOR> 1 <TO> GLOBALLISTX<0> slist=$GLOBALLISTX1[:INDEX:]||##<info=o85:://>||^^*||formt<1,63>||inline<!!|!!> zends=@<info=o75GLOBALSLIST0<1>> wlist=PS<GLOBALZENDS<1>//1//-1//GLOBALSLIST<1>>||<dellist=$GLOBALSLIST0|2> xlist=$GLOBALWLIST||##<info=o72:://>||formt<1,serch147,63,21> exect=$var_fail=<info=t61$GLOBALXLIST[1]>||$var_i=$var_fail=0?_CmdCm('xends=1<¤>xlist=$GXLOBALXENDS[1]'):0 renms=$GLOBALSLIST0||##cntr<GLOBALXLIST<1>+|1|1> <NEXT> ;; переименовать выделенные файлы по счетчику, с учетом продолжения номера после последнего пронумерованного файла в этом каталоге (для каждого расширения своя нумерация)

marks=1||test<1n!!\(\d+\)$> exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~файлы~~с~~счётчиком~~()~~в~~конце~~имён?')||$var_i=$var_n=7?_Exit():1 delss=[tc=AL]||1||upd<1> ;; удалить файлы с счётчиком (№) в конце имён

scale=1 exect=Execute(@DesktopWidth)&'x'&Execute(@DesktopHeight) GLOBALEXECT<a> ;; получить точную ширину и высоту монитора при масштабировании системы (125%, 150%)

sends=$f212\Ffiles.txt??-1||?Fslash1 alist=FOLDM<%WL//-3||0>||<dellist=$GLOBALSENDS|5> <IF> 0 <> <info=t61$GLOBALALIST[1]> <THEN> exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~объекты?')||$var_i=$var_n=7?_Exit():1 delss=$GLOBALALIST||1||upd<1> <ELSE> infht=-1||Сообщение||Подобных~~объектов~~не~~найдено||250||60 <ENDIF> ;; в выделенных папках без рекурсии удалить объекты, которых нет в списке Ffiles.txt (имена с расширениями и/или имена подпапок\ с конечным слешем)

sends=$f212\Ffiles.txt??-1||?Fslash1 alist=FOLDM<%WL//-3||0>||<dellist=$GLOBALSENDS|9> <IF> 0 <> <info=t61$GLOBALALIST[1]> <THEN> exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~объекты?')||$var_i=$var_n=7?_Exit():1 delss=$GLOBALALIST||1||upd<1> <ELSE> infht=-1||Сообщение||Подобных~~объектов~~не~~найдено||250||60 <ENDIF> ;; в выделенных папках без рекурсии удалить объекты, которые есть в списке Ffiles.txt (имена с расширениями и/или имена подпапок\ с конечным слешем)

sends=$f212\ForDel.txt??-1||?Fslash1 alist=PS<"%T"//0//0>||<dellist=$GLOBALSENDS|5> <IF> 0 <> <info=t61$GLOBALALIST[1]> <THEN> exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~объекты?')||$var_i=$var_n=7?_Exit():1 delss=$GLOBALALIST||1||upd<3> <ELSE> infht=-1||Сообщение||Подобных~~объектов~~не~~найдено||250||60 <ENDIF> ;; в противоположной панели удалить (без рекурсии) с подтверждением все объекты кроме тех, имена которых есть в "ForDel.txt"

sends=%N||&?^(.{4}) count=[tc=TF-1f]||GLOBALSENDS<1>||0||countline<1> exect=$var_i=GLOBALCOUNT<1>=0?_Exit():0 markp=1||numb<1> markn=3||GLOBALCOUNT<1> gotoc=3||GLOBALCOUNT<-1> ;; для файла под курсором выделить файлы в другой панели, в начале имён которых совпадают первые 4 символа и переместить курсор к последнему выделенному файлу

sends=%N||&?^(.{4}) count=[tc=TF-1f]||GLOBALSENDS<1>||0||countline<1> exect=$var_i=GLOBALCOUNT<1>=0?_Exit():0 markp=1||numb<1> markn=3||GLOBALCOUNT<1> ;; для файла под курсором выделить файлы в другой панели, в начале имён которых совпадают первые 4 символа

sends=%P%N??-1 exect=$var_i=Execute(GLOBALSENDS<1>+2) textt=%P%N||#L$var_i:-1 ;; в файле под курсором удалить первую строку + удалить следом идущие количество строк прописанные в первой строке

sends=%P%N??-1 exect=$var_s='GLOBALSENDS<1>'||$var_i=1 <FOR> 1 <TO> GLOBALSENDS<0> exect=$var_i='GLOBALSENDS<:INDEX:>'='$var_s'?$var_i+1:2||$var_s='GLOBALSENDS<:INDEX:>'='$var_s'?'$var_s':'GLOBALSENDS<:INDEX:>' rends=GLOBALSENDS<:INDEX:>??:INDEX:||§!!$var_i <NEXT> GLOBALRENDS<a> ;; в содержимом файла под курсором в одинаковых строках заменить символ § на счётчик, который начинается с 2-х с каждой строкой не совпадающей с предыдущей и отобразить конечный результат в таблице переменной GLOBALRENDS

sends=%P%N??-1||#L1 <IF> 1 <> <info=t51$GLOBALSENDS|[^\d]> <THEN> exect=$var_i=GLOBALSENDS<1>+2 textt=%P%N||#L$var_i:-1 <ENDIF> ;; если содержимым первой строки файла под курсором является одно целое число, то удалить количество строк равное этому числу включая первую строку, при другом содержимом первой строки выход из команды

sends=%P%N??-1||formt<6,1> exect=_ArrayDisplay($GLOBALSENDS,'Удерживая~~CTRL~~проверьте~~пункты') start=Explorer||list<$GLOBALARRAY>||spause<1000> ;; Из файла под курсором выбрать нужные ссылки и открыть их в браузере IE

sends=%WF??-1 GLOBALSENDS<b> exect=$var_s='GLOBALARRAY1<1>'?0:_Exit() GLOBALARRAY<a> ;; пример: из выделенных имён объектов выбрать нужные, если ничего не выбрано, то выход

sends=%WF??-1||&?(?m)^(.{[updwn=BOX1]}) count=[tc=TF-1]||>>$GLOBALSENDS||0||countline<5> exect=$var_i=GLOBALCOUNT<1>=0?_Exit():0 markn=3||GLOBALCOUNT<1> ;; для выделенных объектов (или объекта под курсором) выделить объекты другой панели, в начале имён которых совпадают первые N символов (число вводится в диалоге) (регистр символов не учитывается)

sends=%WF??-1||&?(?m)^(.{4}) count=[tc=TF-1]||>>$GLOBALSENDS||0||countline<5> exect=$var_i=GLOBALCOUNT<1>=0?_Exit():0 markn=3||GLOBALCOUNT<1> ;; для выделенных объектов выделить объекты другой панели, в начале имён которых совпадают первые 4 символа

sends=%WL??-1||&?(?m)^.+\.exe$ exect=$var_i='GLOBALSENDS<1>'?0:_Exit() <FOR> 1 <TO> GLOBALSENDS<0> regwr=HKLM\SOFTWARE\Microsoft\Windows~~NT\CurrentVersion\AppCompatFlags\Layers||''GLOBALSENDS<:INDEX:>''||SZ||RUNASADMIN <NEXT> ;; из выделенных фалов получить список только exe файлов и создать в реестре для них строковый параметр "Путь.exe" со значением RUNASADMIN

sends=?$f254?55 dilog=<sicon=%%WINDIR%%\System32\shell32.dll> exicn=%%WINDIR%%\System32\shell32.dll||GLOBALSENDS<1>1||GLOBALSICON1<3>||icn<0> $GLOBALICXXX=$GLOBALEXICN dilog=<sicon=%%COMMANDER_PATH%%\TCIMG.dll> exicn=%%COMMANDER_PATH%%\TCIMG.dll||GLOBALSENDS<1>2 exect=GLOBALSICON2<3>+1 $GLOBALEXICN[GLOBALEXECT<1>]=$GLOBALICXXX[1] lbicl=GLOBALEXICN<t>||"%p"xxx.dll||0||upd<1> delsm=GLOBALSENDS<1>||1 ;; из библиотеки shell32.dll выбрать значок и заменить значок выбранный в TCIMG.dll сохранив в новую библиотеку xxx.dll в активную панель

sends=?$f254?55 dilog=<sicon=[sopen=BOX8]> exicn=GLOBALSOPEN1<1>||GLOBALSENDS<1>1||GLOBALSICON1<3>||icn<0> $GLOBALICXXX=$GLOBALEXICN dilog=<sicon=[sopen=BOX8]> exicn=GLOBALSOPEN2<1>||GLOBALSENDS<1>2 exect=GLOBALSICON2<3>+1 $GLOBALEXICN[GLOBALEXECT<1>]=$GLOBALICXXX[1] lbicl=GLOBALEXICN<t>||"%p"xxx.dll||0||upd<1> delsm=GLOBALSENDS<1>||1 ;; из библиотеки №1 выбрать значок и заменить значок выбранный в библиотеке №2 сохранив в новую библиотеку xxx.dll в активную панель

sends=@%P%N exect=$var_i3=[info=i6GLOBALSENDS<1>]>1?_Exit():0 infbx=InfoBox_TEST1 ;; пример проверки: если под курсором анимированный GIF файл, то выход

sends=@%P%N??-1||&&(\w\:\\)(.+)!!$2||formt<0!!([^\\]+)> GLOBALSENDS<a> exect=_ArrayReverse($GLOBALSENDS,1) GLOBALSENDS<a> ;; разбить путь по слешам (кроме диска) и вывести перевёрнутый результат

sends=@<info=i1%P%N//>??1 sends=@<info=i2%P%N//>??2 sends=x??3||##rndm<3|30>||#Hcrc32|1 exect=$var_its=(GLOBALSENDS<1>>GLOBALSENDS<2>?GLOBALSENDS<2>:GLOBALSENDS<1>)/2 exect=$var_obch=$var_its*2 start=Magick||%P%N||-resize||"$var_obch"x"$var_obch"!||-matte||-fill||none||-draw||"color~~0,0~~reset"||-fill||white||-draw||"circle~~$var_its,$var_its~~0,$var_its"||&#37TCIMG_TEMP%\temp.png||&&hide||&&wait start=Magick||%P%N||-matte||%%TCIMG_TEMP%%\temp.png||-compose||DstIn||-composite||"%pOut-GLOBALSENDS<3>".png||&&hide||&&wait||upd<1> tempxx ;; создать из изображения под курсором круглое изображение в активной панели с взятием фрагмента из центра

sends=@<info=v0%%PROGRAMFILES%%\Internet~~Explorer\iexplore.exe>||&&(\d).*!!$1 <SWITCH> GLOBALSENDS<1> <CASE> 8 <#> exect=$var_su='http://ya.ru!!Explorer' <CASE> 9 <#> exect=$var_su='http://www.mail.ru' <ENDSWITCH> brwsr=$var_su ;; в зависимости от версии браузера открыть разные ссылки, если IE версии 9 - то яндекс, а если 8 то майл ру

sends=@c:\rar_xx dilog=[input=BOX64] slist=%WL forpgs <FOR> 1 <TO> GLOBALSLIST<0> start=RAR||-IBCK||-INUL||x||-pGLOBALINPUT<1>||GLOBALSLIST<:INDEX:>||GLOBALSENDS<1>\||&&wait exect=$var_i=GLOBALPROGR<1>=0?0:_CmdCm('delsm=GLOBALSENDS<1>¦¦1')+MsgBox(4096,'Ошибка','Ошибка~~~~GLOBALPROGR<1>'&@CR&'Работа~~прервана!')+_Exit() delsm=GLOBALSLIST<:INDEX:>||1 start=RAR||-IBCK||a||-r||-ep1||GLOBALSLIST<:INDEX:>||GLOBALSENDS<1>\||GLOBALSENDS<1>\*||&&wait delsm=GLOBALSENDS<1>||1 <NEXT> ;; выделенные запароленные архивы (пароль вводится в диалоге) перепаковать в именные архивы без пароля с заменой исходников, если при распаковке неверный пароль или какая-либо другая ошибка, то выдаётся сообщение и работа прекращается

sends=@c:\rar_xx slist=%WL forpgs <FOR> 1 <TO> GLOBALSLIST<0> start=RAR||-IBCK||-INUL||x||-p123456||GLOBALSLIST<:INDEX:>||GLOBALSENDS<1>\||&&wait exect=$var_i=GLOBALPROGR<1>=0?0:_CmdCm('delsm=GLOBALSENDS<1>¦¦1')+MsgBox(4096,'Ошибка','Ошибка~~~~GLOBALPROGR<1>'&@CR&'Работа~~прервана!')+_Exit() delsm=GLOBALSLIST<:INDEX:>||1 start=RAR||-IBCK||a||-r||-ep1||GLOBALSLIST<:INDEX:>||GLOBALSENDS<1>\||GLOBALSENDS<1>\*||&&wait delsm=GLOBALSENDS<1>||1 <NEXT> ;; выделенные запароленные архивы (пароль 123456) перепаковать в именные архивы без пароля с заменой исходников, если при распаковке неверный пароль или какая-либо другая ошибка, то выдаётся сообщение и работа прекращается

sends=@c:\rar_xx start=RAR||-IBCK||-INUL||x||-p1256||%P%N||GLOBALSENDS<1>\||&&wait exect=$var_i=GLOBALPROGR<1>=0?0:_CmdCm('delsm=GXLOBALSENDS<1>¦¦1')+MsgBox(4096,'Ошибка','Ошибка~~~~GLOBALPROGR<1>'&@CR&'Работа~~прервана!')+_Exit() delsm=GLOBALSENDS<1>||1||upd<1> ;; распаковать запароленный архив (пароль 1256) в папку "rar_xx", если неверный пароль или какая-либо другая ошибка, то выдаётся сообщение и работа прекращается

sends=@c:\rar_xx start=RAR||-IBCK||x||%P%N||GLOBALSENDS<1>\||&&wait exect=$var_i=GLOBALPROGR<1>=0?0:_CmdCm('delsm=GLOBALSENDS<1>¦¦1')+MsgBox(4096,'Ошибка','Ошибка~~~~GLOBALPROGR<1>'&@CR&'Работа~~прервана!')+_Exit() start=RAR||-IBCK||a||-r||-ep1||"%t%O".zip||GLOBALSENDS<1>\||GLOBALSENDS<1>\*||&&wait delsm=GLOBALSENDS<1>||1||upd<3> ;; архив под курсором распаковать во временную папку "c:\rar_xx" и запаковать объекты в другую панель в именной архив zip и удалить временную папку, если при распаковке какая-либо ошибка, то выдаётся сообщение и работа прекращается

sends=@c:\rar_xx start=RAR||-IBCK||x||-p123456||%P%N||GLOBALSENDS<1>\||&&wait exect=$var_i=GLOBALPROGR<1>=0?0:_CmdCm('delsm=GLOBALSENDS<1>¦¦1')+MsgBox(4096,'Ошибка','Ошибка~~~~GLOBALPROGR<1>'&@CR&'Работа~~прервана!')+_Exit() start=RAR||-IBCK||a||-r||-ep1||"%t%O".rar||GLOBALSENDS<1>\||GLOBALSENDS<1>\*||&&wait delsm=GLOBALSENDS<1>||1||upd<1> ;; запароленный (пароль 123456) архив под курсором распаковать во временную папку "c:\rar_xx" и запаковать объекты в другую панель в именной архив без пароля и удалить временную папку, если при распаковке неверный пароль или какая-либо другая ошибка, то выдаётся сообщение и работа прекращается

sends=[edits=BOX12]??-1 bends=$f212\FList.txt??-1 kends=$GLOBALSENDS??-1||?KGLOBALBENDS<0> $GLOBALBENDS&GLOBALSENDS<0> $GLOBALBENDS@$GLOBALKENDS exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~файлы?')||$var_i=$var_n=7?_Exit():1 delss=$GLOBALBENDS beepss ;; удалить введённые имена файлов в папках по списку из FList.txt

sends=[tc=AF-1]??-1 bends=[tc=TF-1]??-1 cends=$GLOBALSENDS??-1||&?(?m)^(.{4})||?F1 dends=$GLOBALBENDS??-1||&?(?m)^(.{4})||?F1 eends=$GLOBALCENDS+$GLOBALDENDS||?F2 exect=$var_i='GLOBALEENDS<1>'?0:_Exit() count=$GLOBALSENDS||>>$GLOBALEENDS||0||countline<5> markn=2||GLOBALCOUNT<1> count=$GLOBALBENDS||>>$GLOBALEENDS||0||countline<5> markn=3||GLOBALCOUNT<1> ;; выделить в обеих панелях объекты, в начале имён которых совпадают первые N символов (регистр символов не учитывается)

sends=[tc=LL]??-1 GLOBALSENDS<a> bends=[tc=RL]??-1 GLOBALBENDS<a> exect=$var_a=GLOBALSENDS<0>>GLOBALBENDS<0>?$GLOBALSENDS:$GLOBALBENDS||_ViewValues($var_a) ;; пример получения наибольшего массива

sends=\<link\h+rel\=[\''|\']?[^>]+\>??1 exect=$var_a=_ArrayUnique(StringRegExp(FileRead('%P%N'),$GLOBALSENDS[1],3))||_ViewValues($var_a) ;; получить заданные отрезки файла под курсором и отобразить их в таблице

sends=<info=o3%P%N//>??1 exect=$var_n=Floor('GLOBALSENDS<1>')||$var_n=$var_n<=1?1:($var_n<=10?2:($var_n<=100?3:($var_n<=500?4:5)))||_ViewValues($var_n) ;; пример получения размера папки и присвоения чисел диапазонов: меньше 1мб - 1, от 1 до 10мб - 2, от 10 до 100 мб -3, от 100 до 500мб, от 500 и выше - 5

sends=-1 exect=$var_a='GLOBALSENDS<1>' GLOBALEXECT<a> exect=$var_name=StringRegExp('GLOBALEXECT<1>','^[~~-_]?$',0)?'>':'test'||_ViewValues('$var_name') ;; пример проверки буфера обмена: если в буфере пробел, "-", "_" или пустой, то в $var_name записывается знак > , иначе test

sends=1,2,3??-6, GLOBALSENDS<a> <FOR> 1 <TO> GLOBALSENDS<0> exect=_ViewValues($GLOBALSENDS[:INDEX:]) <NEXT> ;; поочерёдно получить в цикле данные массива

sends=1,2,3??-6, GLOBALSENDS<a> exect=_ViewValues(_ArrayToString($GLOBALSENDS,'++',1)) ;; получить массив в строку с заданным разделителем

sends=-1??-1 exect=_ArrayDisplay($GLOBALSENDS,'Выберите~~пункты:CHECKBOX:') GLOBALARRAY<a> ;; вывести содержимое буфера обмена построчно в таблице, отметить галочками нужные и вывести оставшиеся в массив GLOBALARRAY

sends=-1??-1 exect=_ArrayDisplay($GLOBALSENDS,'Просмотр~~массива:ICON|e:') ;; вывести пути/имена файлов из буфера обмена построчно (значки пунктов в таблице присваиваются относительно системной ассоциации типа файла)

sends=-1??-1 exect=_ArrayDisplay($GLOBALSENDS,'Просмотр~~массива:ICON|z|0|iA_A:') ;; вывести содержимое буфера обмена построчно в таблице (в таблице настройки значков берутся из секции [InfoList] из ключа "iA_A")

sends=-1??-1 slist=FOLDC<%WL//0>||<dellist=$GLOBALSENDS|5> exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~GLOBALSLIST<0>~~объектов?')||$var_i=$var_n=7?_Exit():1 delss=$GLOBALSLIST||1||recycle<1> ;; в выделенных папках удалить в корзину объекты 1-го уровня имена которых не совпадают с именами из списка в буфера обмена

sends=-1??-1 slist=FOLDC<%WL//0>||<dellist=$GLOBALSENDS|9> exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~GLOBALSLIST<0>~~объектов?')||$var_i=$var_n=7?_Exit():1 delss=$GLOBALSLIST||1||recycle<1> ;; в выделенных папках удалить в корзину все объекты 1-го уровня с именами из списка буфера обмена

sends=-1??-1 slist=FOLDC<PS<"%p"//2//0>//0>||<dellist=$GLOBALSENDS|5> exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~GLOBALSLIST<0>~~объектов?')||$var_i=$var_n=7?_Exit():1 delss=$GLOBALSLIST||1||recycle<1> ;; во всех папках активной панели удалить в корзину объекты 1-го уровня имена которых не совпадают с именами из списка в буфера обмена

sends=-1??-1||&&(.+://)(.+)!!$2||formt<0!!([^/]+)> GLOBALSENDS<a> exect=_ArrayReverse($GLOBALSENDS,1) GLOBALSENDS<a> ;; разбить путь ссылки в буфере обмена по обратным слешам (кроме диска) и вывести перевёрнутый результат

sends=-1??-1||formt<23> GLOBALSENDS<a> exect=$var_s='GLOBALSENDS<0>x'&StringLen('GLOBALSENDS<1>') exect=_ViewValues('$var_s') ;; пример: 1. получения списка из буфера обмена; 2. сортировка по длине строк по убыванию и разбивка построчно; 3. присвоение переменной $var_s количества строк в буфере и числа (максимальная длинна строки в буфере)

sends=-1||?F2,sym1 exect=$var_i='GLOBALSENDS<1>'?1:_Exit() bufsr=&&(?s)(GLOBALSENDS<1>)(.+GLOBALSENDS<1>)(.*)!!$1$3||?F63 ;; в буфере обмена удалить информацию между повторяющимися строками (если они есть), оставив одну из них + удалить

sends=123456789??-3 exect=_ArrayDisplay($GLOBALSENDS,'Выберите~~пункты:CHECKBOX:') GLOBALARRAY<a> ;; вывести содержимое буфера обмена построчно в таблице, отметить галочками нужные и вывести оставшиеся в массив GLOBALARRAY

sends=123456789??-3 exect=_ArrayDisplay($GLOBALSENDS,'Выберите~~пункты:CHECKBOX:1:1:Hint3:') GLOBALARRAY<a> ;; пример параметров таблицы, в которой можно выбрать один пункт check-box и отображение заданной подсказки

sends=4,5,6,7!!-8, <FOR> 1 <TO> GLOBALSENDS<0> exect=$var_i=Execute($GLOBALSENDS[:INDEX:]+10) cends=$GLOBALEXECT??:INDEX: <NEXT> GLOBALCENDS<a> ;; прибавить к заданным числам десять и вывести результат в глобальную переменную

sends=4,5,6,7??-8, <FOR> 1 <TO> GLOBALSENDS<0> exect=$var_i=Execute($GLOBALSENDS[:INDEX:]+10) cends=$GLOBALEXECT??:INDEX: <NEXT> GLOBALCENDS<a> ;; увеличить цифры на 10

sends=4,5,6,7??-8, <FOR> 1 <TO> GLOBALSENDS<0> exect=$var_i=Execute('GLOBALSENDS<:INDEX:>'+10) cends=$GLOBALEXECT??:INDEX: <NEXT> GLOBALCENDS<a> ;; увеличить цифры на 10

sends=c:\файл-список№1.txt??-1 exect=$var_s='' <FOR> 1 <TO> GLOBALSENDS<0> xends=c:\документ№2.txt??-1||formt<0!!(?m)(GLOBALSENDS<:INDEX:>.+)> exect=$var_s=GLOBALXENDS<0>>=6?'$var_s'&_ArrayToString($GLOBALXENDS,@CRLF,1)&@CRLF:'$var_s' <NEXT> asave=var_s||c:\документ№2_rez.txt||noarray<1> ;; извлечь все строки из файла c:\документ№2.txt в которых есть фразы из файла c:\файл-список№1.txt (количество строк равно или более 6-ти) и записать результат в файл c:\документ№2_rez.txt

sends=c:\файл-список№1.txt??-1 exect=$var_s='' <FOR> 1 <TO> GLOBALSENDS<0> xends=c:\документ№2.txt??-1||formt<0!!(?m)(GLOBALSENDS<:INDEX:>.+)> exect=$var_s=GLOBALXENDS<0>>=6?'$var_s'&'GLOBALSENDS<:INDEX:>'&@CRLF:'$var_s' <NEXT> asave=var_s||c:\документ№2_rez2.txt||noarray<1> ;; записать в файл c:\документ№2_rez2.txt все слова из списка c:\файл-список№1.txt, которые встретились 6-ть и более раз в строках файла c:\документ№2.txt

sends=PS<"%T"//1//0//*.bck> exect=$var_i='GLOBALSENDS<1>'=''''?MsgBox(4096,'Ошибка','Нет~~файла')+_Exit():0 infbx=InfoBox_TEST1 ;; если в неактивной панели нет файла с расширением bck, то выдать сообщение и выход, если есть запустить следующую команду

sends=PS<%P%N//1//-1//exe>??-1 exect=$var_i='GLOBALSENDS<1>'?0:_Exit() <FOR> 1 <TO> GLOBALSENDS<0> regwr=HKLM\SOFTWARE\Microsoft\Windows~~NT\CurrentVersion\AppCompatFlags\Layers||''GLOBALSENDS<:INDEX:>''||SZ||RUNASADMIN <NEXT> ;; в папке под курсором найти все файлы exe и создать в реестре для них строковый параметр "Путь.exe" со значением RUNASADMIN

sends=x||##1 GLOBALSENDS<a> exect=$var_i=$GLOBALSENDS[1]=''''?_CmdCm('infbx=InfoBox_TEST1'):_CmdCm('infbx=InfoBox_TEST2') ;; пример выполнения условия: если 1-я ячейка массива GLOBALSENDS пустая, то выполняется 1-я команда, если нет, то 2-я

sends=zip|rar|7z|ace|arj|cab|gz|jar|lzh|tar|xz??-4 dilog=[combo=BOX36] sends=@c:\rar_xx start=RAR||-IBCK||x||%P%N||GLOBALSENDS<1>\||&&wait exect=$var_i=GLOBALPROGR<1>=0?0:_CmdCm('delsm=GLOBALSENDS<1>¦¦1')+MsgBox(4096,'Ошибка','Ошибка~~~~GLOBALPROGR<1>'&@CR&'Работа~~прервана!')+_Exit() start=RAR||-IBCK||a||-r||-ep1||"%t%O".GLOBALCOMBO<1>||GLOBALSENDS<1>\||GLOBALSENDS<1>\*||&&wait delsm=GLOBALSENDS<1>||1||upd<3> ;; архив под курсором распаковать во временную папку "c:\rar_xx" и запаковать объекты в другую панель в именной архив и удалить временную папку (тип архива вводится в диалоге), если при распаковке какая-либо ошибка, то выдаётся сообщение и работа прекращается

sends=zip|rar|7z|ace|arj|cab|gz|jar|lzh|tar|xz|wim??-4 dilog=[combo=BOX36] exect=StringInStr('|7z|zip|tar|wim|','|GLOBALCOMBO<1>|')?1:0 GLOBALEXECT<a> ;; выбрать в диалоге тип архива, переменная GLOBALEXECT<1> возвращает 1, если выбран тип 7z, zip, tar, wim или в ином случае 0

sends=zip|rar|7z|ace|arj|cab|gz|jar|lzh|tar|xz|wim??-4 dilog=[combo=BOX36] sends=@C:\rar_xx start=%%COMMANDER_PATH%%\Programs\Arhive\WinRAR\WinRAR.exe||x||%P%N||GLOBALSENDS<1>\||&&wait exect=$var_i=GLOBALPROGR<1>=0?0:_CmdCm('delsm=GLOBALSENDS<1>¦¦1')+MsgBox(4096,'Ошибка','Ошибка~~~~GLOBALPROGR<1>'&@CR&'Работа~~прервана!')+_Exit() exect=StringInStr('|7z|zip|tar|wim|','|GLOBALCOMBO<1>|')?1:0 <IF> GLOBALEXECT<1> = 1 <THEN> start=%%COMMANDER_PATH%%\Plugins\wcx\Total7zip\7zG.exe||a||-ad||"%t%O".GLOBALCOMBO<1>||GLOBALSENDS<1>\*||&&wait <ELSE> start=%%COMMANDER_PATH%%\Programs\Arhive\WinRAR\WinRAR.exe||a||-r||-ep1||"%t%O".GLOBALCOMBO<1>||GLOBALSENDS<1>\||GLOBALSENDS<1>\*||&&wait <ENDIF> delsm=GLOBALSENDS<1>||1||upd<3> ;; архив под курсором распаковать во временную папку "C:\rar_xx" с помощью WinRAR и запаковать объекты в другую панель в именной архив и удалить временную папку (тип нового архива вводится в диалоге); для упаковки 7z, zip, tar, wim используется 7zG.exe, в ином случае WinRAR; если при распаковке появляется какая-либо ошибка, то выдаётся сообщение и работа прекращается

sends=zip|rar|7z|ace|arj|cab|gz|jar|lzh|tar|xz|wim??-4 dilog=[combo=BOX36] sends=@C:\rar_xx start=%%COMMANDER_PATH%%\Programs\Arhive\WinRAR\WinRAR.exe||x||%P%N||GLOBALSENDS<1>\||&&wait exect=$var_i=GLOBALPROGR<1>=0?0:_CmdCm('delsm=GLOBALSENDS<1>¦¦1')+MsgBox(4096,'Ошибка','Ошибка~~~~GLOBALPROGR<1>'&@CR&'Работа~~прервана!')+_Exit() start=%%COMMANDER_PATH%%\Plugins\wcx\Total7zip\7zG.exe||a||-ad||"%t%O".GLOBALCOMBO<1>||GLOBALSENDS<1>\*||&&wait delsm=GLOBALSENDS<1>||1||upd<3> ;; архив под курсором распаковать во временную папку "C:\rar_xx" с помощью WinRAR и запаковать объекты в другую панель в именной архив и удалить временную папку (тип архива вводится в диалоге) с помощью 7zG.exe, если при распаковке какая-либо ошибка, то выдаётся сообщение и работа прекращается

shape=1 exect=$var_stroka1=##[combo=Выбор~~тега||Введите~~начальный~~тег:||||343||117] exect=$var_stroka2=##[combo=Выбор~~тега||Введите~~конечный~~тег:||||343||117] textx=%WL||&&($var_stroka1)([^\r\n]+)($var_stroka2)!!${1}~~cliptext~~${3}||upd<1> ;; замена в выделенных файлах фразы между введенными в диалоговом окне тегами на содержимое буфера обрамленного пробелами

shape=1 exect=$var_stroka1=##[combo=Выбор~~тега||Введите~~начальный~~тег:||||343||117] exect=$var_stroka2=##[combo=Выбор~~тега||Введите~~конечный~~тег:||||343||117] textx=%WL||&&(?s)(.*$var_stroka1)(.*)($var_stroka2.*)!!${1}cliptext${3}||upd<1> ;; замена в выделенных файлах текста между введенными в диалоговом окне тегами на содержимое буфера

shape=1 exect=$var_stroka1=##[combo=Выбор~~тега||Введите~~начальный~~тег:||||343||117||1||1] exect=$var_stroka2=##[combo=Выбор~~тега||Введите~~конечный~~тег:||||343||117||1||1] exect=$var_stroka3=##[combo=Заменяющая~~фраза||Введите~~Заменяющую~~фразу:||||343||117||1||1] textx=%WL||&&($var_stroka1)([^\r\n]+)($var_stroka2)!!${1}$var_stroka3${3}||upd<1> ;; замена в выделенных файлах фразы между введенными в диалоговом окне тегами на введенное в диалоговом окне заменяющую фразу

shape=1 exect=$var_stroka1=##[combo=Выбор~~тега||Введите~~начальный~~тег:||||343||117||1||1] exect=$var_stroka2=##[combo=Выбор~~тега||Введите~~конечный~~тег:||||343||117||1||1] textx=%WL||&&($var_stroka1)([^\r\n]+)($var_stroka2)!!${1}cliptext${3}||upd<1> ;; замена в выделенных файлах фразы между введенными в диалоговом окне тегами на содержимое буфера обмена

shape=1 exect=$var_stroka3=##[combo=BOX_U2] exect=$var_stroka1=##[combo=BOX_U5] exect=$var_stroka2=##[combo=BOX_U4] copys=%WL||"%p"||copyn<$var_stroka3>||[group=BOX_U22]||upd<1> ;; создание копий выделенных объектов с выбором условий в диалоговом окне

shape=14 exect=$var_sdisk=##[combo=BOX14]||$var_smetka=##[input=BOX69]||DriveSetLabel('$var_sdisk'&':\','$var_smetka') ;; диалог ввода метки для диска

shape=17 exect=$var_d=##[input=BOX78]||$var_i=##[input=BOX79] sends=x||##rndm<3|30>||#Hcrc32|1 start=Magick||-size||$var_d||gradient:$var_i||-colorspace||RGB||"%p"Gragient-$var_d-$var_i-@GLOBALSENDS<1>.png||&&hide||&&wait ;; создание вертикального градиента с вводом размера и диапазона цвета через дефис (двухцветный градиент)

shape=17 exect=$var_d=##[input=BOX78]||$var_i=##[input=BOX79] sends=x||##rndm<3|30>||#Hcrc32|1 start=Magick||-size||$var_d||gradient:$var_i||-rotate||90||-colorspace||RGB||"%p"Gragient-$var_d-$var_i-@GLOBALSENDS<1>.png||&&hide||&&wait ;; создание горизонтального градиента с вводом размера и диапазона цвета через дефис (двухцветный градиент)

shape=22 exect=$var_i=##[group=BOX12]||$var_n=##[combo=BOX24]||$var_j=##[combo=BOX25]||$var_s=$var_i?'#x'&$var_n:$var_n&'x#'||_ViewValues('$var_s') imgnz=%WL||"%t"//0||$var_s||framewh<#|$var_j|$var_j> ;; склеить выделенные изображения, создав в другой панели изображение именем первого изображения, дополнительные параметры вводятся в диалоге

shape=23 exect=$var_s=##[combo=BOX26]x[combo=BOX27] imgjs=%WL||"%t":://0//(.*)(\w:.*\\)([^\\]*)\.(.*)//$1$3\\||$var_s||progres<> ;; разрезать выделенные изображения, создав в другой панели именные изображения в именных папках, количество частей вводится в диалоге

shape=25 exect=$var_s=##[group=BOX13]||$var_i=##[combo=BOX25] imgnz=%WL||"%t"//0||$var_s||panorama<[combo=BOX31]>||framewh<#|$var_i|$var_i> ;; создание из выделенных изображений панорамы в другой панели (дополнительные параметры выбираются в диалоге)

shape=U11 exect=$var_stroka3=##[combo=BOX_U2] exect=$var_stroka1=##[combo=BOX_U5] exect=$var_stroka2=##[combo=BOX_U4] copys=%WL||"%p"||copyn<$var_stroka3>||[group=BOX_U22]||upd<1> ;; создание копий выделенным объектам (выбор условий в диалоге)

slist=%WL <FOR> 1 <TO> GLOBALSLIST<0> zlist=PS<GLOBALSLIST<:INDEX:>//1//0//nfo> exect=$var_path='GLOBALZLIST<1>'=''''?'GLOBALSLIST<:INDEX:>':'GLOBALZLIST<1>' modfs=PS<GLOBALSLIST<:INDEX:>//1>||0||<mdata=$var_path> <NEXT> ;; для всех файлов каждой выделенной папки изменить дату модификации с условием: если в папке есть файл .nfo, то дата модификации берётся из этого файла, если нет, то из родительской папки

slist=%WL <IF> <info=f1GLOBALSLIST<1>//> = <info=f1GLOBALSLIST<2>//> <THEN> exect=MsgBox(64+4096,'Результат','Контрольные~~суммы~~совпадают.') <ELSE> exect=MsgBox(48+4096,'Результат','Контрольные~~суммы~~не~~совпадают.') <ENDIF> ;; сравнить контрольные суммы MD5 двух выделенных файлов, в сплывающем окне с ручным закрытием, сообщить результат

slist=%WL exect=$var_a=StringRegExp(FileRead('GLOBALSLIST<t>'),'(?m)((?:[^\r\n]+(?:\r\n|$)+){1,5})',3) GLOBALEXECT<a> ;; разбить пути выделенных объектов на группы по 5 + остаток (если выделено не кратно 5)

slist=%WL exect=$var_a=StringRegExp(FileRead('GLOBALSLIST<t>'),'(?m)((?:[^\r\n]+(?:\r\n|$)+){5})',3) GLOBALEXECT<a> ;; разбить пути выделенных объектов на группы по 5

slist=%WL exect=$var_aa=_ArrayCreate(GLOBALSLIST<0>) <FOR> 1 <TO> GLOBALSLIST<0> exect=$var_aa[:INDEX:]=##$PS<GLOBALSLIST<:INDEX:>//1//-1//jpg//0//0//1//1> <NEXT> asave=var_aa||"%pList.txt"||upd<1> ;; создать список в активной панели List.txt - из выделенных папок по одному файлу jpg

slist=%WL exect=$var_fail=<info=t151$GLOBALSLIST[2:-1]|PUBLIC>||_ViewValues($var_fail) ;; проверяет в выделенных текстовых файлах (со 2-го) вхождение "PUBLIC", если есть хоть в одном файле, то возвращает 1, иначе 0

slist=%WL exect=$var_fail=<info=t151GLOBALSLIST<t2:-1>|PUBLIC>||_ViewValues($var_fail) ;; проверяет в выделенных текстовых файлах (со 2-го) вхождение "PUBLIC", если есть хоть в одном файле, то возвращает 1, иначе 0

slist=%WL exect=$var_fail=<info=t251$GLOBALSLIST[2:-1]|PUBLIC>||_ViewValues($var_fail) ;; проверяет в выделенных текстовых файлах (со 2-го) вхождение "PUBLIC", если нет хоть в одном файле, то возвращает 1, иначе 0

slist=%WL exect=$var_fail=<info=t251GLOBALSLIST<t2:-1>|PUBLIC>||_ViewValues($var_fail) ;; проверяет в выделенных текстовых файлах (со 2-го) вхождение "PUBLIC", если нет хоть в одном файле, то возвращает 1, иначе 0

slist=%WL exect=_ArrayRandomize($GLOBALSLIST,1) renms=$GLOBALSLIST||&&(\d+_)(.+)!!$2 renms=$GLOBALRENMS||^^cntr<1+|1|2>_||upd<1> ;; добавить в начало имен выделенных файлов счетчик, предварительно отсортировав их в случайном порядке (можно использовать многократно)

slist=%WL forpgs <FOR> 1 <TO> GLOBALSLIST<0> xlist=PS<GLOBALSLIST<:INDEX:>//1//0> exect=$var_ifile=Floor(GLOBALXLIST<0>/2) delss=GLOBALXLIST<t1:$var_ifile>||1 <NEXT> ;; в каждой из выделенной папки удалить в корне первую половину файлов

slist=%WL GLOBALSLIST<a> exect=_ArrayRandomize($GLOBALSLIST,1) GLOBALSLIST<a> ;; пример перемешивания списка случайным образом

slist=%WL||##<info=t52::|#L1:-1;;?F6,1> exect=_ArrayDisplay($GLOBALSLIST,'Удерживая~~CTRL~~проверьте~~пункты') start=Explorer||list<$GLOBALARRAY>||spause<1000> ;; Из выделенных файлов выбрать нужные ссылки и открыть их в браузере IE

slist=%WL||##path<0>||save<%%TCIMG_PATH%%\Files\Lists\BeforeRenaming.txt> lends=-1||#L1||sdel<> shape=1 exect=$var_stroka1=##[combo=BOX_U29.2] exect=$var_stroka2=##[combo=BOX_U4] aends=[combo=BOX_U5] alist=$GLOBALAENDS renms=%WL||$var_stroka1||[group=BOX_U15]||[double]||upd<1> creat=%%TCIMG_PATH%%\Files\Lists\||AfterRenaming||content<GLOBALRENMS<t>>||owrite<1> ;; переименовать выделенные объекты в имя из буфера обмена (условия в диалоговом окне)

slist=%WL||##path<0>||save<%%TCIMG_PATH%%\Files\Lists\BeforeRenaming.txt> lends=-1||#L1||sdel<> shape=U9 exect=$var_stroka1=##[combo=BOX_U29.1] exect=$var_stroka2=##[combo=BOX_U4] aends=[combo=BOX_U5] alist=$GLOBALAENDS renms=%WL||$var_stroka1||[group=BOX_U15]||[double]||upd<1> creat=%%TCIMG_PATH%%\Files\Lists\||AfterRenaming||content<GLOBALRENMS<t>>||owrite<1> ;; переименовать выделенные объекты в имя из буфера обмена или ввести своё имя(условия в диалоговом окне)

slist=%WL||##path<4> sends=$GLOBALSLIST??1 exect=StringReverse('GLOBALSENDS<1>') renms=%WL||list<$GLOBALEXECT>||upd<1> ;; переименование... реверсирование базовых имён выделенных объектов

slist=%WL||##path<4>||&&(?i)[^a-zа-яё\s]!!~~||formt<w002,1> exect=_ArrayDisplay($GLOBALSLIST,'Удерживая~~CTRL~~выберите~~слова') slist=$GLOBALARRAY||formt<sp57,fnc_symzagup> renms=%WL||<srlist=GLOBALSLIST<t>>||upd<1> ;; переименовать выделенные объекты заданными

slist=@%P%N||test<1i!!^prog-new.*exe> exect=$var_i='GLOBALSLIST<1>'=''''?_CmdCm('infbx=Сообщени妦Файл~~под~~курсором~~не~~подпадает~~под~~услови妦2¦¦400¦¦50<¤>toexit'):1 copyy=GLOBALSLIST<1>||"%t"//0 beepss ;; копировать файл под курсором, если его базовое имя начинается с "prog-new." и он имеет расширение *.exe, в противном случае выдать 2-х секундное сообщение

slist=@%P%N||test<1n!!^Win*> exect=$var_i='GLOBALSLIST<1>'=''''?_CmdCm('toexit'):1 copyy=%P%N||"%t"//0 ;; если базовое имя файла под курсором начинается с"Win", то копировать его в другую панель, в противном случае выйти из программы

slist=@<info=f50%P%N//> exect=$var_v='GLOBALSLIST<1>' versn=$var_v ;; отобразить информацию о программе ярлыка под курсором

slist=[tc=AM] <FOR> 1 <TO> GLOBALSLIST<0> exect=$var_i=<info=o9%%TCIMG_TEMP%%\link-font.txt//> $FORCONT=$var_i=2?0:1 downl=GLOBALSLIST<:INDEX:>fonts//2||%%TCIMG_TEMP%%\link-font.txt||pause<1-2>||progres<> <NEXT> ;; если файл link-font.txt со списком ссылок существует в папке TCIMG_TEMP то тогда начать закачку по списку и сохранить данные в папке fonts

slist=FOLDC<"C:\PathList.txt"//0//1>||<dellist=C:\DelList.txt|5> exect=$var_i='GLOBALSLIST<1>'=''''?_CmdCm('infht=-1¦¦Сообщени妦Список~~файлов~~для~~удаления~~пуст¦¦260¦¦70<¤>toexit'):1 exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~файлы?')||$var_i=$var_n=7?_Exit():1 delss=$GLOBALSLIST||1||recycle<1> beepss ;; удалить все файлы в каталогах из списка путей C:\PathList.txt исключая файлы, чьи имена совпадают с именами из списка имён C:\DelList.txt (в корзину с подтверждением)

slist=FOLDC<%WL//0>||<dellist=C:\DelList.txt|5> exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~GLOBALSLIST<0>~~объектов?')||$var_i=$var_n=7?_Exit():1 delss=$GLOBALSLIST||1||recycle<1> ;; в выделенных папках удалить в корзину объекты 1-го уровня имена которых не указаны в списке C:\DelList.txt

slist=FOLDC<%WL//0>||<dellist=C:\DelList.txt|9> exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~GLOBALSLIST<0>~~объектов?')||$var_i=$var_n=7?_Exit():1 delss=$GLOBALSLIST||1||recycle<1> ;; в выделенных папках удалить в корзину все объекты 1-го уровня с именами из списка C:\DelList.txt

slist=FOLDC<PS<"%p"//2//0>//0>||<dellist=C:\DelList.txt|5> exect=$var_n=MsgBox(4+32+262144,'Сообщение','Удалить~~GLOBALSLIST<0>~~объектов?')||$var_i=$var_n=7?_Exit():1 delss=$GLOBALSLIST||1||recycle<1> ;; во всех папках активной панели удалить в корзину объекты 1-го уровня имена которых не указаны в списке C:\DelList.txt

slist=PS<"%P"//0//0>||##path<6>||&&^0*(\d*)(.*)$!!$1||formt<11> exect=$var_i=GLOBALSLIST<1>+1 renms=%WL||^^cntr<$var_i|1|2>~~||upd<1> ;; переименовать выделенные объекты: добавить в начало последовательный счётчик, относительно максимального числа пронумерованных объектов в текущей папке

slist=PS<"%P"//1//0//*.fb2> <FOR> 1 <TO> GLOBALSLIST<0> sends=GLOBALSLIST<:INDEX:>||formt<fbt1:C:fbt2:C:fbt3:C:¤> zends=GLOBALSENDS<1>??-1||¤!!@CRLF exect=$var_i='GLOBALZENDS<0>'=1?_CmdCm('renmm=GLOBALSLIST<:INDEX:>¦¦##<info=t52GLOBALSLIST<:INDEX:>|?Ffbt1>¦¦sdel<>'):_CmdCm('movee=GLOBALSLIST<:INDEX:>¦¦"%pGLOBALZENDS<2>\"//1¦¦##GLOBALZENDS<3>.~~GLOBALZENDS<1>') pause=300 <NEXT> ;; переименовать (возможно с перемещением) *.fb2 активной панели согласно информации из тегов полученной регулярными выражениями| прописанными в ключах "fbt1, fbt2, fbt3" секции [FormatUser] файла TCIMGU.ini

slist=PS<"%p"//1//0//prog-new.*.exe|prog-next.*.exe> exect=$var_i='GLOBALSLIST<1>'=''''?_CmdCm('infbx=Сообщени妦Файлов~~с~~такими~~именами~~в~~АП~~не~~найден2¦¦370¦¦50<¤>toexit'):1 copyy=%P%N||"%t"//0 beepss ;; копировать файл под курсором в другую панель, если в активной панели есть файлы *.exe имена которых начинаются с "prog-new." или "prog-next.", в противном случае выдать 2-х секундное сообщение

slist=PS<"%p"//1//0//prog-new.*.exe> exect=$var_i='GLOBALSLIST<1>'=''''?_CmdCm('infbx=Сообщени妦Файлов~~с~~такими~~именами~~в~~АП~~не~~найден2¦¦370¦¦50<¤>toexit'):1 copys=$GLOBALSLIST||"%t"//0 beepss ;; копировать в другую панель все файлы *.exe активной панели чьи базовые имена начинаются с "prog-new.", в случае отсутствия подобных файлов выдать 2-х секундное сообщение

slist=PS<"%p"//1//0//prog-new.*.exe> xlist=PS<"%p"//1//0//prog-next.*.exe> exect=$var_i='GLOBALSLIST<1>'~~AND~~'GLOBALXLIST<1>'=''''?_CmdCm('infbx=Сообщени妦Файлов~~с~~такими~~именами~~в~~АП~~не~~найден2¦¦370¦¦50<¤>toexit'):1 copyy=%P%N||"%t"//0 beepss ;; копировать файл под курсором в другую панель, если в активной панели есть файлы *.exe имена которых начинаются с "prog-new." и "prog-next.", в противном случае выдать 2-х секундное сообщение

slist=PS<"%P"//1//0>||##path<6>||&&^0*(\d*)(.*)$!!$1||formt<11> exect=$var_i=GLOBALSLIST<1>+1 renms=%WL||^^cntr<$var_i|1|2>~~||upd<1> ;; переименовать выделенные объекты: добавить в начало последовательный счётчик, относительно максимального числа видимых пронумерованных объектов в текущей папке

slist=PS<"%T"//2//0>||test<1f!!1!!0!!Info.txt> exect=$var_i='GLOBALSLIST<1>'=''''?_CmdCm('infbx=InfoBox17<¤>toexit'):1 copys=%WL||x//1||allfold<GLOBALSLIST<t>> beepss ;; копировать выделенные объекты активной панели (с перезаписью) в папки неактивной панели содержащих файл Info.txt

slist=PS<"%T"//2//-1>||test<1f!!1!!0!!Doc.rtf> exect=$var_i='GLOBALSLIST<1>'=''''?_CmdCm('infbx=InfoBox17<¤>toexit'):1 copys=%WL||x//1||allfold<GLOBALSLIST<t>> beepss ;; копировать выделенные файлы в папки неактивной панели(с рекурсией) содержащих файл Doc.rtf

slist=PS<%P%N//2//0> exect=$var_aa=_ArrayCreate(GLOBALSLIST<0>) GLOBALEXECT<$var_aa> <FOR> 1 <TO> GLOBALSLIST<0> exect=$var_aa[:INDEX:]=##$PS<GLOBALSLIST<:INDEX:>//1//-1//jpg//0//0//1//1> GLOBALEXECT<$var_aa> <NEXT> copys=$var_aa||"%t"//0 ;; пример создания и заполнения массива данными, в данном случае в подпапках 1-го уровня папки под курсором отбирается по одному файлу jpg

slist=PS<[tc=TP]//2//-1>||test<1f!!1!!0!!Doc.rtf> exect=$var_i='GLOBALSLIST<1>'=''''?_CmdCm('infbx=InfoBox17<¤>toexit'):1 copys=%WL||x//1||allfold<GLOBALSLIST<t>> ;; копировать выделенные файлы в папки неактивной панели(с рекурсией) содержащих файл Doc.rtf

start=%%COMMANDER_PATH%%\PK\PK.exe exect=$var_h=WinWaitActive('[CLASS:ThunderRT6FormDC]')||ControlSetText(Eval('var_h'),Null,'ThunderRT6TextBox1','пароль') ;; запуск программы, ожидание открытия окна и ввод текста "пароль" в заданное поле

start=%%COMMANDER_PATH%%\PK\PK.exe exect=$var_h=WinWaitActive('[CLASS:ThunderRT6FormDC]')||ControlSetText(Eval('var_h'),Null,'ThunderRT6TextBox1','пароль')||ControlClick(Eval('var_h'),Null,'ThunderRT6CommandButton3') ;; запуск программы, ожидание открытия окна и ввод текста "пароль" в заданное поле и нажатие на кнопку OK

start=Explorer||$f254\bg.html||&&wait exect=ProcessWaitClose('iexplore.exe') tempxx ;; просмотреть файл в Explorer и удалить файл по закрытию окна

style=U14 textt=$f200Lists\TempClipboard.txt||##||backup<0> dilog=[check=BOX_UR6] dends=$GLOBALCHECR1??-1||@CRLF!!,||,:!!: pends=-1??-1||formt<54,56,63> exect=$var_i=<info=t1-1> clpclr iends=1-$var_i!!-1||?H|5||,!!@CRLF <FOR> 1 <TO> GLOBALIENDS<0> xends=GLOBALPENDS<GLOBALIENDS<:INDEX:>>??-1||~~!!@CRLF||#LGLOBALDENDS<1> kends=$GLOBALXENDS??-1||@CRLF!!~~ asave=GLOBALKENDS||$f200Lists\TempClipboard.txt|2|@CRLF|2 <NEXT> bufsr=##<ifile=$f200Lists\TempClipboard.txt>||?F63 ;; в буфере обмена построчно оставить выбранные номера слов разделенные пробелом

tcimg=$cm498 pause=200 exect=ControlFocus('[CLASS:TBUTTONCHANGEDLG]',Null,'TAltEdit1') ;; вызвать панель инструментов и установить фокус в поле "Подсказка" (TC x32)

tcimg=$cm498 pause=500 exect=$var_array=ControlGetPos('[CLASS:TBUTTONCHANGEDLG]',Null,'TListBox2')||_ViewValues($var_array) ;; вызвать панель инструментов и получить массив координат заданного элемента (TC x32)

tcimg=$cm498 pause=500 exect=$var_scontrol=ControlGetFocus('[CLASS:TBUTTONCHANGEDLG]')||_ViewValues('$var_scontrol') ;; вызвать панель инструментов и получить Control элемента, который имеет фокус

tcimg=$cm498 pause=500 exect=$var_stxt=ControlGetText('[CLASS:TBUTTONCHANGEDLG]',Null,'TMyPanel1')||_ViewValues('$var_stxt') ;; вызвать панель инструментов и получить текст заданного элемента (TC x32)

tcimg=$cm498 pause=500 exect=ControlSend('[CLASS:TBUTTONCHANGEDLG]',Null,'TAltEdit1','+{INSERT}',0) ;; вызвать панель инструментов и ввести текст из буфера обмена в поле "Подсказка" (TC x32)

textt=$f200Lists\TempClipboard.txt||##||backup<0> style=U18 dilog=[check=BOX_UR6] dends=$GLOBALCHECR1??-1||@CRLF!!,||,:!!: pends=-1??-1||formt<54,56,63> exect=$var_i=<info=t1-1> clpclr iends=1-$var_i!!-1||?H|5||,!!@CRLF <FOR> 1 <TO> GLOBALIENDS<0> xends=GLOBALPENDS<GLOBALIENDS<:INDEX:>>??-1||~~!!@CRLF||#LGLOBALDENDS<1> kends=$GLOBALXENDS??-1||@CRLF!!~~ asave=GLOBALKENDS||$f200Lists\TempClipboard.txt|2|@CRLF|2 <NEXT> bufsr=##<ifile=$f200Lists\TempClipboard.txt> ;; в буфере обмена построчно оставить выбранные номера слов разделенные пробелом

textv=C:\Test.txt exect=$var_n=MsgBox(4+32+262144,'Сообщение','Продолжить~~выполнение~~команды?')||$var_i=$var_n=7?_Exit():1 sends=C:\Test.txt??-1||&&[^\r\n]+=!! textt=C:\Test.txt||##TOTALCMD#BAR#DATA@CRLFGLOBALSENDS<x2>@CRLFGLOBALSENDS<x3>@CRLFGLOBALSENDS<x1>@CRLFGLOBALSENDS<x6>@CRLFGLOBALSENDS<x4> ;; открыть в просмотрщике файл C:\Test.txt , закрыть просмотрщик, в появившемся диалоговом окне выбрать продолжение команды или отмена, если продолжить, то в содержимом файла C:\Test.txt оставить все, что после первого знака равенства и манипулируя полученными строками привести их к желаемому виду

vends=@D:\Test.bar exect=$var_n=##$INI<8//GLOBALVENDS<1>//Buttonbar//Buttoncount> rends=-1??-1 <FOR> 1 <TO> GLOBALRENDS<0> sends=GLOBALRENDS<x:INDEX:>??-1||formt<ex1> exect=$var_i=$var_n+:INDEX:||$var_j=1+:INDEX: zends=button$N$=Wcmicons.dll,1@CRLF!!$var_j||$$cmd$N$=%%COMMANDER_PATH%%\TCIMG.exe@CRLF||$$param$N$=GLOBALSENDS<x1>@CRLF||$$menu$N$=GLOBALSENDS<x2>@CRLF||$N$!!$var_i <NEXT> zends=GLOBALVENDS<1> asave=GLOBALZENDS||GLOBALVENDS<1>|1||2:-1||code<1> iniwr=GLOBALVENDS<1>||Buttonbar||Buttoncount||$var_i ;; в D:\Test.bar добавить кнопки из строк команд TCIMG.txt в буфере обмена

versn=%P%N||1 arr2d=$GLOBALVERSN||50|1,2 exect=_ViewValues($GLOBALARR2D,'~~[%P%N]') ;; удалить заданные строки из 2D массива и отобразить окно с заданным заголовком

watch=0 exect=$var_i=DirGetSize('%P%N') pause=1s watch=24 exect=_ViewValues('$var_i') watch=20 ;; получить размер папки под курсором с отображением времени

wends=@[tc=AA] mends=<info=i6GLOBALWENDS<1>//> exect=$var_rez=(Ceiling(GLOBALMENDS<1>/7)) xends=??-1||#K$var_rez!!@CRLF0 slist=$GLOBALXENDS||##--delay=15~~''||$$Number(:NUMBER:*7-7)-Number(:NUMBER:*7-2)''~~--delay=250~~''Number(:NUMBER:*7-1)'' GLOBALSLIST<a> ;; для анимационного gif файла под курсором получить специальные параметры

xlist=PS<%P%N//1//0> exect=$var_ifile=Floor(GLOBALXLIST<0>/2) delss=GLOBALXLIST<t1:$var_ifile>||1 ;; удалить первую половину файлов в корне папки под курсором

xlist=PS<%P%N//1> exect=$var_ifile=Floor(GLOBALXLIST<0>/2) delss=GLOBALXLIST<t1:$var_ifile> ;; получить список первой половины файлов папки под курсором

xlist=PS<%P%N//1> exect=$var_ifile=Floor(GLOBALXLIST<0>/2) GLOBALXLIST<a1:$var_ifile> ;; получить список первой половины файлов папки под курсором

xypos=0 GLOBALXYPOS<a> GLOBALXYPOS1<a> GLOBALXYPOS2<a> exect=$var_i=Round(GLOBALXYPOS1<7>*2/59,2)||_ViewValues($var_i) ;; пример получения координат выбранных областей (при нажатии ПРОБЕЛА) и вычисление данных

zlist=PS<%P%N//1//0//nfo> exect=$var_path='GLOBALZLIST<1>'=''''?'%P%N':'GLOBALZLIST<1>' modfs=PS<%P%N//1>||0||<mdata=$var_path> ;; для всех файлов папки под курсором изменить дату модификации с условием: если в папке есть файл .nfo, то дата модификации берётся из этого файла, если нет, то из папки под курсором


© Аверин Андрей для Total Commander Image  Averin-And@yandex.ru