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


wlist

Создание различных списков, преобразование и передача их в другие команды и параметры.
Аналог команды slist

wlist=Analog

Параметры:

AnalogВсе параметры аналогичны команде slist.

Примечания:

Дополнительные символы, которые можно использовать в строке: "@CR" - Символ возврата каретки, Chr(13), "@LF" - Символ перевода строки, Chr(10), "@CRLF" = @CR & @LF, "@TAB" - Символ Tab, Chr(9).

Если в команде(ах) необходимы кавычки, то используются две одинарных кавычки (апострофа) '' , если в команде необходим пробел - используются два символа тильды ~~.

Команда имеет возможность передавать другим командам информацию через именные глобальные переменные. см. Дополнение №23

Имя переменнойОписание
GLOBALWLIST0массив входных данных (список исходных путей объектов)
GLOBALWLISTмассив выходных данных (список преобразованных по заданным условиям путей объектов)
GLOBALWLIST1массив вошедших в список объектов (список путей объектов, которые вошли в список)
GLOBALWLIST2массив не вошедших в список объектов (список путей объектов, которые не вошли в список)
GLOBALWLIST3массив выходных данных (в первой ячейке путь созданного файла при использовании параметра save<>)

См. также:

alist, blist, clist, dlist, elist, flist, glist, hlist, ilist, jlist, klist, llist, mlist, nlist, olist, plist, qlist, rlist, slist, tlist, ulist, vlist, xlist, ylist, zlist

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

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=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 rlist=%WL||##path<0>||formt<1> xlist=$GLOBALRLIST||##path<6> wlist=$GLOBALXLIST||formt<lin44,lin60,lin61,lin62,lin37,1> <FOR> 1 <TO> GLOBALWLIST<0> downh=GLOBALRLIST<:INDEX:>//2||GLOBALWLIST<:INDEX:>||pause<1-2>||progres<>||convert<#Hmd5> renmm=GLOBALDOWNH<1>||extplus<> slist=$GLOBALRENMM iconf=GLOBALRENMM<1>||:://1//(\w:.*\\)([^\\]*)\.(.*)//$1favicon.ico||32 pause=500 icoft=GLOBALRLIST<:INDEX:>||0||favicon.ico attrf=GLOBALICONF<1>||+HS!!0 delsm=GLOBALSLIST<1>||1 <NEXT> tcimg=50~~$cm540 ;; назначение выделенным каталогам (например twitter.com, cryptocoincharts.info) иконок взятых из URL и присвоение значкам атрибутов скрытый, системный

itray=3 sends=<info=o73%P%N//> slist=PS<$f250\log//1//-1//*.log>||test<1t!!GLOBALSENDS<1>> wlist=$GLOBALSLIST||##<info=t52::|?Flog23> GLOBALWLIST<c|1|x|3> ;; отправить в буфер ссылки из лог файлов для изображения под курсором

itray=3 sends=-1!!-1||formt<lin44,lin60,lin61,lin62,lin37,1> wlist=$GLOBALSENDS||formt<lin59,lin57> slist=$GLOBALSENDS||formt<lin58,lin57> downl="%p"//1||$GLOBALSENDS||pause<1-2>||progres<>||convert<#Hmd5> pause=500 renms=$GLOBALDOWNL||extplus<> lists=$GLOBALRENMS iconv=$GLOBALRENMS||"%p":://1//(.*)(\w:.*\\)([^\\]*)\.(.*)//$1$3||32 xlist=$GLOBALICONV||##<info=o76:://> renms=$GLOBALICONV||list<$GLOBALSLIST>||rflag<1> pause=500 renms=$GLOBALXLIST||list<$GLOBALWLIST> delss=$GLOBALLISTS||1 slist=FOLDC<$GLOBALRENMS//1//0//*.ico//0>||##<info=o75:://> pause=500 icofs=$GLOBALSLIST||0||ico,0,1 attrb=FOLDC<$GLOBALSLIST//1//0//*.ico//0>||+HS!!0||upd<1> ;; создание каталогов и назначение им иконок из списка ссылок в буфере

itray=3 sends=-1!!-1||formt<lin44,lin60,lin61,lin62,lin37,1> wlist=$GLOBALSENDS||formt<lin59,lin57> slist=$GLOBALSENDS||formt<lin58,lin57> downl="%p"//1||$GLOBALSENDS||pause<1-2>||progres<>||convert<#Hmd5> pause=500 renms=$GLOBALDOWNL||extplus<> lists=$GLOBALRENMS iconv=$GLOBALRENMS||"%p":://1//(.*)(\w:.*\\)([^\\]*)\.(.*)//$1$3||32 xlist=$GLOBALICONV||##<info=o76:://> renms=$GLOBALICONV||list<GLOBALSLIST<t>>||rflag<1> pause=500 renms=$GLOBALXLIST||list<GLOBALWLIST<t>> delss=$GLOBALLISTS||1 slist=FOLDC<GLOBALRENMS<t>//1//0//*.ico//0>||##<info=o75::> pause=500 icofs=GLOBALSLIST<t>||0||ico,0,1 attrb=FOLDC<GLOBALSLIST<t>//1//0//*.ico//0>||+HS!!0||upd<1> ;; создание каталогов и назначение им иконок из списка ссылок в буфере

itray=3 slist=%WL wlist=$GLOBALSLIST||##<info=i1:://>||formt<1,20> xlist=$GLOBALSLIST||##<info=i2:://>||formt<1,20> imgnz=%WL||"%p"//0//"%O"-@<info=s47>!!||2x#||framewh<#|5|5>||resizeimg<GLOBALWLIST<1>|GLOBALXLIST<1>> ;; склеить выделенные изображения по высоте, создав в активной панели вертикальное объединение в два ряда с именем первого изображения + системное время (рамка в 5px по краям и между склеенными изображениями случайным цветом) и кадрирование всей группы перед объединением в размер наименьшего изображения.

itray=3 slist=%WL wlist=%WL||##path<4>||formt<lst10> <FOR> 1 <TO> GLOBALSLIST<0> xends=-1||formt<0!!(?m)^(.+GLOBALWLIST<:INDEX:>)> copyy=GLOBALSLIST<:INDEX:>||GLOBALXENDS<1>//4 <NEXT> ;; копировать выделенные каталоги согласно путям в буфере обмена, если имя каталога совпадает с именем в буфере, то он будет скопирован внутрь

itray=3 slist=%WL||##<info=f1::|1//>||formt<2> wlist=%WL||test<1h!!1!!$GLOBALSLIST> GLOBALWLIST<a> ;; получить список файлов с полными путями, с выводом в окно утилиты из выделенного, с одинаковыми хэш суммами MD5

itray=3 slist=%WL||##<info=f1::|1//>||formt<9> wlist=%WL||test<1h!!1!!$GLOBALSLIST> GLOBALWLIST<a> ;; получить список файлов с полными путями, с выводом в окно утилиты из выделенного, с уникальными хэш суммами MD5

itray=3 stext=FOLDC<%WL//1//-1//*.css>||x||?Ftag458||formt<1>||xline<^^¤;;^^@@o75::;;?F63,fnc_path>||clip<> listx=cliplist||2 xlist=$GLOBALLISTX1 wlist=$GLOBALLISTX GLOBALXLIST<a> GLOBALWLIST<a> ;; извлечь в буфер из файлов css внутри выделенных каталогов, пути к изображениям (jpg,png,gif) и заменить относительный путь к изображению (../) на абсолютный путь, исходя из расположения каждого файла css + проверить пути на существование и вывести результат - GLOBALXLIST - не существующие пути, а GLOBALWLIST - пути к реальным файлам

itray=3 wlist=FOLDC<%WL//1//-1> slist=$GLOBALWLIST||##¤<info=f12:://>¤=<info=f1::|1//> xlist=$GLOBALWLIST||##¤<info=f1::|1//>¤=<info=f12:://> renms=$GLOBALWLIST||^^¤||||<srlist=$GLOBALSLIST>||rflag<1> renms=$GLOBALRENMS1||^^¤||||<srlist=$GLOBALXLIST>||rflag<1>||upd<1>
;; Удаление в выделенных каталогах всех дубликатов файлов (ориентир по контрольной сумме MD5)

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> ;; переименовать выделенные файлы по счетчику, с учетом продолжения номера после последнего пронумерованного файла в этом каталоге (для каждого расширения своя нумерация)

sends=-1!!-2||?T|a=0,1:-1!!¤ wlist=$GLOBALSENDS||##<info=o72::> sends=$GLOBALWLIST!!-2||¤!! GLOBALSENDS<a> ;; преобразовать пути из буфера обмена с учётом пустых строк

slist=%WL wlist=%WL alist=$GLOBALSLIST+$GLOBALWLIST||^^слепилось))~~ GLOBALALIST<a> GLOBALSLIST<a> GLOBALWLIST<a> ;; пример передачи данных 2-х переменных команде (выделенных объектов активной панели)

slist=%WL wlist=%WL zlist=%WL alist=$GLOBALSLIST+$GLOBALWLIST+$GLOBALZLIST||^^слепилось))~~ GLOBALALIST<a> GLOBALSLIST<a> GLOBALWLIST<a> GLOBALZLIST<a> ;; пример передачи данных 3-х переменных команде (выделенных объектов активной панели)

slist=[tc=AF-1] GLOBALSLIST<a> plist=[tc=TF-1] GLOBALPLIST<a> wlist=$GLOBALSLIST||<dellist=$GLOBALPLIST|2> GLOBALWLIST<a> ;; передать в глобальную переменную список имен файлов активной панели, которых нет в другой панели

slist=[tc=AM] <FOR> 1 <TO> GLOBALSLIST<0> sends=x||##rndm<3-|2> mends=@<info=o75GLOBALSLIST<:INDEX:>//> nends=<info=o72GLOBALSLIST<:INDEX:>//>||?M1:12 folds=GLOBALMENDS<1>||GLOBALNENDS<1>-GLOBALSENDS<1> vends=1.1/1.1/1.1;1.2/1.2/1.2;1.3/1.3/1.3;1.4/1.4/1.4;1.5/1.5/1.5;1.6/1.6/1.6;1.7/1.7/1.7;1.8/1.8/1.8;1.9/1.9/1.9;2.0/2.0/2.0??-6; rends=$GLOBALVENDS??-1||?Fimg42 kends=??-1||#KGLOBALVENDS<0>!!@CRLFstart=Magick~GLOBALSLIST<:INDEX:>~-gamma~GLOBALVENDS©§#~GLOBALFOLDS<1>Gamma-plus-GLOBALRENDS©§#<info=o85GLOBALSLIST<:INDEX:>//>~&&hide~&&wait wlist=$GLOBALKENDS||§!!cntr<1|1|1>||©!!Chr(60)||#!!Chr(62)||~!!Chr(124)Chr(124) creat=$f254||temp.tcg||code<4>||content<$GLOBALWLIST>||formt<1,63>||owrite<1> macro=$f254\temp.tcg||1 <NEXT> ;; поднять гамму для выделенных изображений и сохранить результат в отдельную папку (диапазон увеличения от 1.1 до 2.0) с помощью утилиты Magick

slist=[tc=AM] wlist=$GLOBALSLIST||##<info=o72:://>||$$-rndm<2-|3> start=Xps2img||list<$GLOBALSLIST>||--file-type=jpeg||--jpeg-quality=100||list2<$GLOBALWLIST>||&&hide||&&wait ;; конвертировать выделенные файлы .xps в изображения jpg качество 100% Каждый результат в свою папку

slist=[tc=AM] wlist=$GLOBALSLIST||##<info=o72:://>||?M1:10||$$_rndm<3-|2>-:NUMBER:.png||^^<info=o75:://>Separete-gray- start=Magic||-alpha||off||list<$GLOBALSLIST>||-separate||-alpha||on||list2<$GLOBALWLIST>||&&hide||&&wait ;; разобрать выделенные изображения на 3 спектра серого цвета (с сохранением прозрачности)

wlist=%WL GLOBALWLIST<a> ;; отобразить в таблице пути выделенных объектов

wlist=%WL xlist=%WL $GLOBALWLIST@$GLOBALXLIST@=== GLOBALWLIST<a> ;; объединить поэлементно данные 2-х глобальных массивов и записать результат в 1-й

wlist=%WL xlist=%WL glist=$GLOBALWLIST@$GLOBALXLIST@=== GLOBALGLIST<a> ;; передать поэлементное объединение данных 2-х глобальных массивов в команду glist

wlist=%WL xlist=%WL||##path<4> glist=$GLOBALWLIST@$GLOBALXLIST@= GLOBALGLIST<c> ;; записать в буфер обмена пути выделенных объектов с добавлением в конец, через знак равенства, имени объекта

wlist=%WL||##<info=o72:://>||$$cntr<1-_|1|1> GLOBALWLIST<a> ;; получить список имён выделенных объектов с прибавлением счётчика

wlist=%WL||save<"%pList.txt"|0>||attr<+SH>||upd<1> ;; сохранить выделенные объекты в файл List.txt в активной панели с атрибутами системный и скрытый

wlist=%WL||save<"%pList.txt"|0>||owrite<3|1>||upd<1> ;; сохранить выделенные объекты в файл List.txt в активной панели с условиями при его существовании: если контрольные суммы не совпадают, то прибавить счётчик, если совпадают, то перезаписать

wlist=%WL||save<"%pListL.txt"|0> GLOBALWLIST3<a> ;; сохранить выделенные объекты в файл в активной панели и записать путь в глобальную переменную

wlist=[tc=AM] fends=<info=i400$GLOBALWLIST|#1/2,#3/2>??-4 GLOBALFENDS<a> ;; получить наибольшую половинную ширину и высоту выделенных изображений

wlist=[tc=AM] fends=<info=i400$GLOBALWLIST|1,3>??-4 GLOBALFENDS<a> ;; получить наибольшую ширину и высоту выделенных изображений

wlist=[tc=AM] fends=<info=i400$GLOBALWLIST|1,x,3>??-4 GLOBALFENDS<a> ;; получить наибольшую ширину и высоту выделенных изображений, разделитель "x"

wlist=[tc=AM] fends=<info=i400$GLOBALWLIST|1+3,>??-4 GLOBALFENDS<a> ;; получить сумму наибольшей ширины и высоты выделенных изображений

wlist=[tc=AM] fends=<info=i400$GLOBALWLIST|1+3,2+4>??-4 GLOBALFENDS<a> ;; получить сумму наибольшей ширины и высоты|сумму наименьшей ширины и высоты выделенных изображений

wlist=[tc=AM] fends=<info=i400$GLOBALWLIST|Floor(#1/2),Floor(#3/2)>??-4 GLOBALFENDS<a> ;; получить наибольшую половинную ширину и высоту выделенных изображений округлённую в меньшую сторону

wlist=[tc=AM]||formt<60,sps34,sps35> start=Magick||-density||300||GLOBALWLIST<1>||-compress||Zip||-adjoin||"%t"full-img-<info=s47>.pdf||&&hide||&&wait||upd<3> ;; из выделенных изображений создать PDF файл в другой панели

wlist=[tc=TF-1f] GLOBALWLIST<a> ;; получить список имён всех файлов другой панели

wlist=[tc=TF-1f]||formt<sps121,1,sort_n1> GLOBALWLIST<a> ;; получить список имён всех файлов без расширений другой панели в которых только цифры без дубликатов + сортировка по возрастанию по первой цифре

wlist=[tc=TL-1f] GLOBALWLIST<a> ;; получить список путей всех файлов другой панели

wlist=[tc=TL-1f]||##path<4> GLOBALWLIST<a> ;; получить список имён всех файлов без расширений другой панели

wlist=PS<"%P"//1//0> rlist=$GLOBALWLIST||##path<4>||^^\Q||$$\E||formt<2> rends=$GLOBALRLIST||@CRLF!!| marks=$GLOBALWLIST||test<1n!!^(GLOBALRENDS<1>)$> ;; выделить в активной панели повторяющиеся имена


© Аверин Андрей для Total Commander Image  Averin-And@yandex.ru