Описание команды | |
exect |
Выполняет выражения функций Autoit.
exect=String1||...||StringN
Параметры:
String1||...||StringN | Строка выражения. String - строка, представляющая собой выражение в стиле Autoit, которое необходимо выполнить. |
Примечания:
AutoIt является мощным скриптовым языком, при своём малом размере включает большую базу различных функций. При компиляции утилиты в неё входит основной движок Autoit. Команда exect позволяет вызывать функции Autoit на прямую, создавать переменные с данными и передавать их другим командам.Пример записи: exect=@ProgramFilesDir GLOBALEXECT<a> |
См. также:
Примеры: | Как создать кнопку? |
%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=StringIsUpper(StringLeft(ClipGet(),1))||_ViewValues($var_n) ;; проверить является первая буква буфера обмена заглавной, возвращает 1 или 0
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||&"||&&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=StringLeft(ClipGet(),1)||$var_n=StringIsLower('$var_s')||$var_k=StringRegExp('$var_s','(?i)[A-Z]')?$var_n:$var_n+2||$var_z=StringRight(ClipGet(),1)||$var_n=StringIsLower('$var_z')||$var_m=StringRegExp('$var_z','(?i)[A-Z]')?$var_n:$var_n+2 bends=<info=n92|$var_k|1|$var_s|$var_z>??-6,||$$,<info=n92|$var_m|1|$var_s|$var_z> GLOBALBENDS<a> ;; из строки "A-o" в буфере обмена получить символы в верхнем и нижнем регистре
exect=$var_s=StringLeft(ClipGet(),1)||$var_n=StringIsLower('$var_s')||$var_k=StringRegExp('$var_s','(?i)[A-Z]')?$var_n:$var_n+2||_ViewValues($var_k) ;; проверить является первая буква буфера обмена заглавной и латинской, возвращает 0, 1, 2 или 3
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=AА]||_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) ;