Использование утилиты в AkelPad


Команды утилиты можно использовать в приложениях.

AkelPad - бесплатный, текстовый редактор.
AkelPad Image - уникальная сборка текстового редактора.


Примеры использования утилиты в AkelPad:

-"Перейти в справке TCIMG.chm к описанию выделенной команды TC (2002 или $7D2 или cm_GoToParent)" Call("Scripts::Main", 1, "TCIMG.vbs", `"start=HH||mk:@MSITStore:$f250\TCIMG.chm::/html/html/add/add_commands.htm##stext#"`) Icon("%a\AkelPadImage.dll",1592)

-"В выделенном тексте заменить диакритические символы на латинские" Call("Scripts::Main", 1, "TCIMG.vbs", `"sends=-2||@@Diacritic!!1<X>GLOBALSENDS<d>"`) Icon("%a\AkelPadImage.dll",1245)

-"Замена в выделенном 'a' на 'b' через TCIMG " Call("Scripts::Main", 1, "TCIMG.vbs", `"yends=-2||a!!b<X>GLOBALYENDS<d>"`) Icon("%a\AkelPadImage.dll",188)

-"Вставка через TCIMG" Call("Scripts::Main", 1, "TCIMG.vbs", `"yends=привет<X>GLOBALYENDS<d>"`) Icon("%a\AkelPadImage.dll",1)

-"Открыть HTML в... Hp + установить значок окну" Call("Scripts::Main", 1, "TCIMG.vbs", `"global<X>start=$f25\hh.exe||param<-800~~%f>||&&procwait<X>iconw=GLOBALPROGR<2>||TCIMG.dll,69"`) Icon("%a\AkelPadImage.dll",180)

-"Вернуть AkelPad иконку по умолчанию" Call("Scripts::Main", 1, "TCIMG.vbs", `"iconw=ACTIVE||AkelPad.exe,0"`) Icon("%a\AkelPad.exe",0)

-"Назначить свою иконку окну AkelPad" Call("Scripts::Main", 1, "TCIMG.vbs", `"iconw=ACTIVE||AkelPadImage.dll,583"`) Icon("%a\AkelPadImage.dll",583)

-"Открыть выделенную фразу в справке TCIMG + установить значок окну" Call("Scripts::Main", 1, "TCIMG.vbs", `"runhp=#sline#||wicon<TCIMG.dll,115>"`) Icon("%a\AkelPadImage.dll",1223)

-"Открыть выделенную фразу в справке TCIMG в 'Поиске' + установить значок окну" Call("Scripts::Main", 1, "TCIMG.vbs", `"runhp=#sline#||$f250\TCIMG.chm||Справка~~TCIMG||3||wicon<TCIMG.dll,115>"`) Icon("%a\AkelPadImage.dll",1223)

-"Открыть выделенную фразу в справке AutoIt3Help + установить значок окну" Call("Scripts::Main", 1, "TCIMG.vbs", `"runhp=#sline#||%COMMANDER_PATH%\Utilities\Scripting\AutoIt\AutoIt3Help.exe||Справка~~AutoIt||wicon<TCIMG.dll,12>"`) Icon("%a\AkelPadImage.dll",190)

-"Открыть выделенную фразу в справке AutoIt3Help + установить значок окну" Call("Scripts::Main", 1, "TCIMG.vbs", `"runhp=#sline#||%COMMANDER_PATH%\Utilities\Scripting\AutoIt\AutoIt3_3_15.chm||AutoIt~~Help~~(v3.3.15.0)||wicon<TCIMG.dll,10>"`) Icon("%a\AkelPadImage.dll",190)

-"Таблица кодов ASCII буфера обмена" Call("Scripts::Main", 1, "TCIMG.vbs", `"exect=$var_a=StringToASCIIArray(ClipGet())||_ViewValues($var_a)"`) Icon("%a\AkelPadImage.dll",1401)

-"Просмотр символов" Call("Scripts::Main", 1, "TCIMG.vbs", `"symvw=x"`) Icon("%a\AkelPadImage.dll",1528)

-"Открыть выделенную фразу в справке TCIMG в 'Поиске'" Call("Scripts::Main", 1, "TCIMG.vbs", `"runhp=#sline#||$f250\TCIMG.chm||Справка~~TCIMG||3"`) Icon("%a\AkelPadImage.dll",1223)

-"Копировать полный путь в буфер" Call("Scripts::Main", 1, "TCIMG.vbs", `"exect=ClipPut('%f')"`) Icon("%a\AkelPadImage.dll",203)

-"Закрыть все окна AkelPad, кроме активного" Call("Scripts::Main", 1, "TCIMG.vbs", `close=??AkelPad4`) Icon("%a\AkelPadImage.dll",1482)

-"Генератор паролей" Call("Scripts::Main", 1, "TCIMG.vbs", `pasgen`) Icon("%a\AkelPadImage.dll",1483)

-"Вычисление разницы дат" Call("Scripts::Main", 1, "TCIMG.vbs", `diffd=x`) Icon("%a\AkelPadImage.dll",1484)

-"Смена обоев : выбор папки с фото" Call("Scripts::Main", 1, "TCIMG.vbs", `"sdess=PS<[sfold=BOX4]>||30s||2"`) Icon("%a\TCIMG.dll",54)

-"Замена выделенного числа в денежном формате прописью (русский)" Call("Scripts::Main", 1, "TCIMG.vbs", `"bufsr=##<info=n6|#stext#|Russian><X>exect=_SendM(#hendl#,273,4155,0)"`) Icon("%a\AkelPadImage.dll",1509)

-"Замена выделенного числа в денежном формате прописью (английский)" Call("Scripts::Main", 1, "TCIMG.vbs", `"bufsr=##<info=n6|#stext#|English><X>exect=_SendM(#hendl#,273,4155,0)"`) Icon("%a\AkelPadImage.dll",1510)

-"Замена выделенного числа прописью (русский)" Call("Scripts::Main", 1, "TCIMG.vbs", `"bufsr=##<info=n1|#stext#|Russian><X>exect=_SendM(#hendl#,273,4155,0)"`) Icon("%a\AkelPadImage.dll",1512)

-"Замена выделенного числа прописью (английский)" Call("Scripts::Main", 1, "TCIMG.vbs", `"bufsr=##<info=n1|#stext#|English><X>exect=_SendM(#hendl#,273,4155,0)"`) Icon("%a\AkelPadImage.dll",1513)

-"Информационная строка в заголовке Вкл./Выкл." Call("Scripts::Main", 1, "TCIMG.vbs", `"infow=2||attach<AkelPad4>||titlx<AkelPad><X>title=AkelPad||$AkelPad4"`) Icon("%a\AkelPadImage.dll",1515)

-"Открыть текущий RTF файл в TCIMG" Call("Scripts::Main", 1, "TCIMG.vbs", `"textv=%f||redit<1>"`) Icon("%a\AkelPadImage.dll",1360)

-"Просмотр буфера обмена" Call("Scripts::Main", 1, "TCIMG.vbs", `"vclip=x"`) Icon("%a\AkelPadImage.dll",1516)

-"Кодировать текущий файл в b64 в папку файла" Call("Scripts::Main", 1, "TCIMG.vbs", `"global<X>enctd=%f||b64||%d<X>start=%a\#akelname#||GLOBALENCTD1<1>"`) Icon("%a\AkelPadImage.dll",1517)

-"Кодировать текущий файл в UUE в папку файла" Call("Scripts::Main", 1, "TCIMG.vbs", `"global<X>enctd=%f||uue||%d<X>start=%a\#akelname#||GLOBALENCTD1<1>"`) Icon("%a\AkelPadImage.dll",1517)

-"Кодировать текущий файл в XXE в папку файла" Call("Scripts::Main", 1, "TCIMG.vbs", `"global<X>enctd=%f||xxe||%d<X>start=%a\#akelname#||GLOBALENCTD1<1>"`) Icon("%a\AkelPadImage.dll",1517)

-"Декодировать текущий b64, UUE, XXE файл в папку файла" Call("Scripts::Main", 1, "TCIMG.vbs", `"global<X>dectd=%f||x||%d<X>start=%a\#akelname#||GLOBALDECTD1<1>"`) Icon("%a\AkelPadImage.dll",1518)

-"Скриншот BMP текущего файла в папке файла" Call("Scripts::Main", 1, "TCIMG.vbs", `"webss=%f||%d"`) Icon("%a\AkelPadImage.dll",1502)

-"Скриншот BMP текущего файла на рабочем столе" Call("Scripts::Main", 1, "TCIMG.vbs", `"webss=%f||$f06"`) Icon("%a\AkelPadImage.dll",1502)

-"Скриншот BMP текущего файла в папке Screen" Call("Scripts::Main", 1, "TCIMG.vbs", `"webss=%f||%a\Screen"`) Icon("%a\AkelPadImage.dll",1502)

-"Скриншот PNG текущего файла в папке файла" Call("Scripts::Main", 1, "TCIMG.vbs", `"webss=%f||%d||x|png"`) Icon("%a\AkelPadImage.dll",1502)

-"Скриншот PNG текущего файла на рабочем столе" Call("Scripts::Main", 1, "TCIMG.vbs", `"webss=%f||$f06||x|png"`) Icon("%a\AkelPadImage.dll",1502)

-"Скриншот PNG текущего файла в папке Screen" Call("Scripts::Main", 1, "TCIMG.vbs", `"webss=%f||%a\Screen||x|png"`) Icon("%a\AkelPadImage.dll",1502)

-"Скриншот JPG текущего файла в папке файла" Call("Scripts::Main", 1, "TCIMG.vbs", `"webss=%f||%d||x|jpg"`) Icon("%a\AkelPadImage.dll",1502)

-"Скриншот JPG текущего файла на рабочем столе" Call("Scripts::Main", 1, "TCIMG.vbs", `"webss=%f||$f06||x|jpg"`) Icon("%a\AkelPadImage.dll",1502)

-"Скриншот JPG текущего файла в папке Screen" Call("Scripts::Main", 1, "TCIMG.vbs", `"webss=%f||%a\Screen||x|jpg"`) Icon("%a\AkelPadImage.dll",1502)

-"Скриншот окна редактирования в папке активного файла" Call("Scripts::Main", 1, "TCIMG.vbs", `"scren=%d||$fname||sclas<#ahendl#><X>sndps=2"`) Icon("%a\AkelPadImage.dll",1501)

-"Скриншот окна редактирования в папке активного файла" Call("Scripts::Main", 1, "TCIMG.vbs", `"scren=$06||$fname||sclas<#ahendl#><X>sndps=2"`) Icon("%a\AkelPadImage.dll",1501)

-"Скриншот окна редактирования в папке активного файла" Call("Scripts::Main", 1, "TCIMG.vbs", `"scren=%a\Screen||$fname||sclas<#ahendl#><X>sndps=2"`) Icon("%a\AkelPadImage.dll",1501)

-"Скриншот полного экрана в папке активного файла и загрузить на хостинг imgur.com" Call("Scripts::Main", 1, "TCIMG.vbs", `"global<X>scren=%d||$fname<X>picup=GLOBALSCREN<1>||1||x||urlview<4>"`) Icon("%a\AkelPadImage.dll",1500)

-"Скриншот AkelPad в папке активного файла и загрузить на хостинг imgur.com" Call("Scripts::Main", 1, "TCIMG.vbs", `"global<X>scren=%d||$fname||sclas<ACTIVE><X>picup=GLOBALSCREN<1>||1||x||urlview<4>"`) Icon("%a\AkelPadImage.dll",1501)

-"Скриншот выбранной области в папке активного файла и загрузить на хостинг imgur.com" Call("Scripts::Main", 1, "TCIMG.vbs", `"global<X>scren=%d||$fname|png||snap<1><X>picup=GLOBALSCREN<1>||1||x||urlview<4>"`) Icon("%a\AkelPadImage.dll",1503)

-"Скриншот по точкам в папке активного файла и загрузить на хостинг imgur.com" Call("Scripts::Main", 1, "TCIMG.vbs", `"global<X>scren=%d||$fname|png||snap<4><X>picup=GLOBALSCREN<1>||1||x||urlview<4>"`) Icon("%a\AkelPadImage.dll",1505)

-"Скриншот окружности в папке активного файла и загрузить на хостинг imgur.com" Call("Scripts::Main", 1, "TCIMG.vbs", `"global<X>scren=%d||$fname|png||snap<5><X>picup=GLOBALSCREN<1>||1||x||urlview<4>"`) Icon("%a\AkelPadImage.dll",1506)

-"Скриншот эллипса в папке активного файла и загрузить на хостинг imgur.com" Call("Scripts::Main", 1, "TCIMG.vbs", `"global<X>scren=%d||$fname|png||snap<6><X>picup=GLOBALSCREN<1>||1||x||urlview<4>"`) Icon("%a\AkelPadImage.dll",1507)

-"Скриншот полного экрана в папке активного файла" Call("Scripts::Main", 1, "TCIMG.vbs", `"scren=%d||$fname<X>sndps=2"`) Icon("%a\AkelPadImage.dll",1500)

-"Скриншот AkelPad в папке активного файла" Call("Scripts::Main", 1, "TCIMG.vbs", `"scren=%d||$fname||sclas<ACTIVE><X>sndps=2"`) Icon("%a\AkelPadImage.dll",1501)

-"Скриншот выбранной области в папке активного файла" Call("Scripts::Main", 1, "TCIMG.vbs", `"scren=%d||$fname|png||snap<1><X>sndps=2"`) Icon("%a\AkelPadImage.dll",1503)

-"Скриншот произвольной области в папке активного файла" Call("Scripts::Main", 1, "TCIMG.vbs", `"scren=%d||$fname|png||snap<3><X>sndps=2"`) Icon("%a\AkelPadImage.dll",1514)

-"Скриншот по точкам в папке активного файла" Call("Scripts::Main", 1, "TCIMG.vbs", `"scren=%d||$fname|png||snap<4><X>sndps=2"`) Icon("%a\AkelPadImage.dll",1505)

-"Скриншот окружности в папке активного файла" Call("Scripts::Main", 1, "TCIMG.vbs", `"scren=%d||$fname|png||snap<5><X>sndps=2"`) Icon("%a\AkelPadImage.dll",1506)

-"Скриншот эллипса в папке активного файла" Call("Scripts::Main", 1, "TCIMG.vbs", `"scren=%d||$fname|png||snap<6><X>sndps=2"`) Icon("%a\AkelPadImage.dll",1507)

-"Запустить панель и прикрепить к AkelPad" Call("Scripts::Main", 1, "TCIMG.vbs", `"xbarx=%a\Files\Bar\Example_1.bar||attach<AkelPad4|0|0>"`) Icon("%a\AkelPadImage.dll",869)

-"Создать копию SearchReplace.ini" Call("Scripts::Main", 1, "TCIMG.vbs", `"copyy=%a\AkelFiles\Plugs\Scripts\SearchReplace.ini||%a\AkelFiles\Plugs\Scripts\"`) Icon("%a\AkelPadImage.dll",36)

-"Создать копию SearchReplace.ini" Exec(`"TCIMG.exe" "copyy=%a\AkelFiles\Plugs\Scripts\SearchReplace.ini||%a\AkelFiles\Plugs\Scripts\"`) Icon("%a\AkelPadImage.dll",36)

-"Создать копию SearchReplace.ini и копию реестра AkelPad" Call("Scripts::Main", 1, "TCIMG.vbs", `"copyy=%a\AkelFiles\Plugs\Scripts\SearchReplace.ini||%a\AkelFiles\Plugs\Scripts\<X>regxt=%a\AkelFiles\Plugs\Scripts\SearchReplace_Akel.reg||HKEY_CURRENT_USER\Software\Akelsoft"`) Icon("%a\AkelPadImage.dll",36)

-"Объединить все файлы папки текущего документа, сохранить и открыть" Call("Scripts::Main", 1, "TCIMG.vbs", `"global<X>joinz=PS<%d!!1>||%d!!0!!Summa.txt!!||progres<><X>start=%a\AkelPad.exe||GLOBALJOINZ<1>"`) Icon("%a\AkelPadImage.dll",50)

-"Извлечь ссылки тега href из всех файлов папки текущего документа, сохранить их в файл и открыть" Call("Scripts::Main", 1, "TCIMG.vbs", `"stext=PS<%d!!1>||%d!!0!!Summa!!||formt<html1,1>||openn<%a\AkelPad.exe|1>||progres<>"`) Icon("%a\AkelPadImage.dll",181)

-"Короткие имена вкладок Вкл./Выкл. (перезапуск)" Call("Scripts::Main", 1, "TCIMG.vbs", `"iniww=%a\AkelPad.ini||Options||TabNameFind||||^(?(^[^\n]{15,})([^.\n]{1,5}+)([^\n](?!\.[^.\n]+$))*+(.\.[^.\n]{1,4}+)?+([^\n]*?))<X>iniww=%a\AkelPad.ini||Options||TabNameRep||||\1...\3<X>resrt=#akelname#||1"`) Icon("%a\AkelPadImage.dll",1430)

-"Открыть выделенную команду Total Commander в справке commands.htm" Call("Scripts::Main", 1, "TCIMG.vbs", `"brwsr=http://tc-image.zz.mu/TCIMG_ONLINE/html/html/add/add_commands.htm##stext#"`) Icon("%a\AkelPadImage.dll",826)

-"Вычислить и вставить выделенное выражение AU3" Call("Scripts::Main", 1, "TCIMG.vbs", `"exect=ControlCommand('[ACTIVE]','''','AkelEditW1','EditPaste',#stext#)"`) Icon("%a\AkelPadImage.dll",1427)

"Таблица ASCII символов" Exec(`"%a\TCIMG.exe" "infos=2||4"`) Icon("%a\AkelPadImage.dll",1401)

-"Погасить монитор Включение ESC" Exec(`"%a\TCIMG.exe" "monof=2"`) Icon("%a\ASImage.dll",152)

-"&Конфигурация системы" Exec(`"%a\TCIMG.exe" "runcm=2"`) Icon("%a\ASImage.dll",47)

-"Показать свойства файла" Call("Scripts::Main", 1, "TCIMG.vbs", `"runcm=3||%f"`) Icon("%a\AkelPadImage.dll",1382)

-"Показать свойства папки файла" Call("Scripts::Main", 1, "TCIMG.vbs", `"runcm=3||%d"`) Icon("%a\AkelPadImage.dll",1384)

-"Захват текста с окон" Exec(`"%a\TCIMG.exe" "captxt"`) Icon("%a\AkelPadImage.dll",1378)

-"Слушать радио" Exec(`"%a\TCIMG.exe" "radio=playlists"`) Icon("%a\AkelPadImage.dll",1379)

-"Таймер. Секундомер. Будильник" Exec(`"%a\TCIMG.exe" "timesx"`) Icon("%a\AkelPadImage.dll",1380)

-"Просмотр шрифтов" Exec(`"%a\TCIMG.exe" "fonts=viewer||FontViewer"`) Icon("%a\AkelPadImage.dll",181)

-"Проигрывание треков из папки E:\Музыка\vk\ в плеере TCIMG" Exec(`"%a\TCIMG.exe" "plays=E:\Музыка\vk\"`) Icon("%a\AkelPadImage.dll",1377)

-"Переключить плеер TCIMG на предыдущий трек" Exec(`"%a\TCIMG.exe" "playn=1"`) Icon("%a\AkelPadImage.dll",648)

-"Пауза/Воспроизведение плеера TCIMG" Exec(`"%a\TCIMG.exe" "playn=4"`) Icon("%a\AkelPadImage.dll",646)

-"Переключить плеер TCIMG на следующий трек" Exec(`"%a\TCIMG.exe" "playn=6"`) Icon("%a\AkelPadImage.dll",649)

-"Запускать AkelPad Image с системой" Call("Scripts::Main", 1, "TCIMG.vbs", `"regwr=HKCU\Software\Microsoft\Windows\CurrentVersion\Run||AkelPad~~Image||SZ||%a\AkelPad.exe"`) Icon("%a\AkelPadImage.dll",1072)

-"Рестарт AkelPad" Call("Scripts::Main", 1, "TCIMG.vbs", `"resrt=#akelname#||1"`) Icon("%a\AkelPadImage.dll",45)

-"Рестарт без сохранения сессии" Call("Scripts::Main", 1, "TCIMG.vbs", `"resrt=#akelname#"`) Icon("%a\AkelPadImage.dll",45)

-"Выход без сохранения сессии" Call("Scripts::Main", 1, "TCIMG.vbs", `"close=#akelname#"`) Icon("%a\AkelPadImage.dll",388)

-"Запуск Explorer.exe" Call("Scripts::Main", 1, "TCIMG.vbs", `"start=explorer.exe"`) Icon("%a\AkelPadImage.dll",839)

-"Перезагрузка Explorer'a" Call("Scripts::Main", 1, "TCIMG.vbs", `"resrt=explorer.exe"`) Icon("%a\AkelPadImage.dll",45)

-"Перезагрузка Totalcmd.exe" Call("Scripts::Main", 1, "TCIMG.vbs", `"rstart"`) Icon("%a\AkelPadImage.dll",45)

-"Перезагрузка AkelPad" Call("Scripts::Main", 1, "TCIMG.vbs", `"resrt=#akelname#||1"`) Icon("%a\AkelPadImage.dll",45)

-"Завершить процесс Explorer.exe" Call("Scripts::Main", 1, "TCIMG.vbs", `"close=explorer.exe"`) Icon("%a\AkelPadImage.dll",840)

-"Завершить процесс Wscript.exe Ctrl+Shift+Alt+W" Call("Scripts::Main", 1, "TCIMG.vbs", `"close=wscript.exe"`) Icon("%a\AkelPadImage.dll",840)

-"&Отправить в реестр открытый на редактирование .reg файл" Call("Scripts::Main", 1, "TCIMG.vbs", `"regim=%f"`) Icon("%a\AkelPadImage.dll",841)

-"Открыть выделенную &ветвь в реестре Ctrl+Shift+R" Call("Scripts::Main", 1, "TCIMG.vbs", `"regup=#sline#"`) Icon("%a\AkelPadImage.dll",565)

-"Открыть ветвь из буфера в реестре" Call("Scripts::Main", 1, "TCIMG.vbs", `"regup=clpget"`) Icon("%a\AkelPadImage.dll",565)

-"Сделать окно не прозрачным" Call("Scripts::Main", 1, "TCIMG.vbs", `"trans=255"`) Icon("%a\AkelPadImage.dll",543)

-"Сделать окно прозрачным на 10%" Call("Scripts::Main", 1, "TCIMG.vbs", `"trans=230"`) Icon("%a\AkelPadImage.dll",542)

-"Сделать окно прозрачным на 25%" Call("Scripts::Main", 1, "TCIMG.vbs", `"trans=192"`) Icon("%a\AkelPadImage.dll",541)

-"Сделать окно прозрачным на 35%" Call("Scripts::Main", 1, "TCIMG.vbs", `"trans=168"`) Icon("%a\AkelPadImage.dll",540)

-"Сделать окно прозрачным на 50%" Call("Scripts::Main", 1, "TCIMG.vbs", `"trans=128"`) Icon("%a\AkelPadImage.dll",539)

-"Сделать окно прозрачным на 75%" Call("Scripts::Main", 1, "TCIMG.vbs", `"trans=64"`) Icon("%a\AkelPadImage.dll",538)

-"Исчезновение на 5 сек." Call("Scripts::Main", 1, "TCIMG.vbs", `"trans=0<X>pause=5000<X>trans=255||$AkelPad4"`) Icon("%a\AkelPadImage.dll",538)

-"&Скрыть окно Рабочего стола" Call("Scripts::Main", 1, "TCIMG.vbs", `"whide=$Progman"`) Icon("%a\AkelPadImage.dll",545)

-"&Показать окно Рабочего стола" Call("Scripts::Main", 1, "TCIMG.vbs", `"wshow=$Progman"`) Icon("%a\AkelPadImage.dll",546)

-"Инфо о символе в заголовке окна" Call("Scripts::Main", 1, "TCIMG.vbs", `"title=#symbols#||$AkelPad4"`) Icon("%a\AkelPadImage.dll",893)

-"Инфо о файле в заголовке окна" Call("Scripts::Main", 1, "TCIMG.vbs", `"title=#file#||$AkelPad4"`) Icon("%a\AkelPadImage.dll",892)

-"Инфо о папке AkelPad заголовке окна и TC" Call("Scripts::Main", 1, "TCIMG.vbs", `"title=#akeltotal#||$AkelPad4"`) Icon("%a\AkelPadImage.dll",893)

"Отображение информации процессов" Exec(`"%a\TCIMG.exe" "infos=2||1"`) Icon("%a\AkelPadImage.dll",155)

"Отображение информации об окнах" Exec(`"%a\TCIMG.exe" "infos=2||2"`) Icon("%a\AkelPadImage.dll",156)

-"Открыть выделенную фразу в справке TCIMG" Call("Scripts::Main", 1, "TCIMG.vbs", `"runhp=#sline#"`) Icon("%a\AkelPadImage.dll",1223)

-"Открыть выделенную фразу в справке AutoIt3Help" Call("Scripts::Main", 1, "TCIMG.vbs", `"runhp=#sline#||%COMMANDER_PATH%\Utilities\Scripting\AutoIt\AutoIt3Help.exe||Справка~~AutoIt"`) Icon("%a\AkelPadImage.dll",190)

-"Открыть выделенную фразу в справке WSO" Call("Scripts::Main", 1, "TCIMG.vbs", `"runhp=#sline#||%a\AkelFiles\Help\WSO.chm||WSO~~1.1"`) Icon("%a\AkelPadImage.dll",189)

-"Открыть выделенную фразу в справке WSH" Call("Scripts::Main", 1, "TCIMG.vbs", `"runhp=#sline#||%a\AkelFiles\Help\WSH.chm||Windows~~Script~~Technologies"`) Icon("%a\AkelPadImage.dll",189)

-"Открыть выделенную фразу в справке VBS" Call("Scripts::Main", 1, "TCIMG.vbs", `"runhp=#sline#||%a\AkelFiles\Help\VBS.chm||Некоторые~~объекты~~Automation"`) Icon("%a\AkelPadImage.dll",189)

-"Открыть выделенную фразу в справке CMD" Call("Scripts::Main", 1, "TCIMG.vbs", `"runhp=#sline#||%a\AkelFiles\Help\Cmd.chm||Справочник~~параметров~~командной~~строки~~v1.1"`) Icon("%a\AkelPadImage.dll",189)

-"Открыть выделенную фразу в справке CSS" Call("Scripts::Main", 1, "TCIMG.vbs", `"runhp=#sline#||%a\AkelFiles\Help\CSS.chm||Как~~пользоваться~~справочником"`) Icon("%a\AkelPadImage.dll",189)

-"Открыть выделенную фразу в справке HTML" Call("Scripts::Main", 1, "TCIMG.vbs", `"runhp=#sline#||%a\AkelFiles\Help\HTML.chm||Справочник~~HTML"`) Icon("%a\AkelPadImage.dll",189)

-"Открыть выделенную фразу в справке JS" Call("Scripts::Main", 1, "TCIMG.vbs", `"runhp=#sline#||%a\AkelFiles\Help\JS.chm||Справка"`) Icon("%a\AkelPadImage.dll",189)

-"Открыть выделенную фразу в справке WEB-RU" Call("Scripts::Main", 1, "TCIMG.vbs", `"runhp=#sline#||%a\AkelFiles\Help\spravkaweb-ru.chm||SpravkaWeb.ru||1"`) Icon("%a\AkelPadImage.dll",189)

-"Завершить процесс AutoIt3.exe" Exec(`"%a\TCIMG.exe" "close=AutoIt3.exe" "close=AutoIt3_x64.exe"`) Icon("%a\AkelPadImage.dll",840)

-"Отключить Punto Switcher" Call("Scripts::Main", 1, "TCIMG.vbs", `"close=Punto.exe"`) Icon("%a\AkelPadImage.dll",84)

-"Просмотр значков библиотеки AkelPadImage.dll" Exec(`"%a\TCIMG.exe" "icovw=%a\AkelPadImage.dll"`) Icon("%a\AkelPadImage.dll",105)

-"Копировать исправленный путь текущего файла" Exec(`"%a\TCIMG.exe" "listt=%f||##path<0|0|1>"`) Icon("%a\AkelPadImage.dll",339)


Можно использовать напрямую или с помощью скрипта, позволяющего вставлять в командную строку утилиты необходимые данные и запускать её:

' TCIMG.vbs
'======================== Описание =====================================
' Скрипт для вызова утилиты TCIMG с различными параметрами
'================== Дополнительные Параметры ==============================
' В строке параметров можно использовать следующие теги:
' #stext# - будет заменён выделенным текстом
' #sline# - будет заменён выделенной строкой
' #akelname# - будет заменён текущим именем редактора (AkelPad.exe)
' #symbols# - будет заменён символом
' #file# - будет заменён путём файла открытого на редактирование
' #hendl# - будет заменён дескриптором главного окна
' #ahendl# - будет заменён дескриптором активного окна редактирования
' <X> - разделитель между командами
'======================== Примеры ======================================
' -"Выход без сохранения сессии" Call("Scripts::Main", 1, "TCIMG.vbs", `"close=#akelname#"`) Icon("%a\AkelPadImage.dll",388)
' -"Рестарт без сохранения сессии" Call("Scripts::Main", 1, "TCIMG.vbs", `"resrt=#akelname#"`) Icon("%a\AkelPadImage.dll",45)
' -"Рестарт AkelPad" Call("Scripts::Main", 1, "TCIMG.vbs", `"resrt=#akelname#||1"`) Icon("%a\AkelPadImage.dll",45)

' Автор: Аверин Андрей
' Версия: 1.5 (06.04.2013 - 04.07.2018)
' Mail: Averin-And@yandex.ru
' Site: http://tc-image.3dn.ru/forum/9-822-5936-16-1365322478
'===========================================================================
' используется Functions.vbs, который следует положить в ...AkelFiles\Plugs\Scripts\Include\
' http://tc-image.3dn.ru/forum/9-346-1076-16-1333500845
' используется утилита TCIMG.exe - путь берётся из AkelPadImage.ini

' Актуальную версию утилиты можно скачать http://wincmd.ru/plugring/TCIMG.html
' Задать вопросы можно в теме №1 http://tc-image.3dn.ru/forum/5-498-1
' Задать вопросы можно в теме №2 http://forum.ru-board.com/topic.cgi?forum=5&topic=50714&start=0
' Задать вопросы можно в теме №3 https://t.me/tcimg (Telegram)
' Описание в справке утилиты TCIMG.chm или http://tcimg.dreamlair.net/TCIMG_ONLINE.html
' Дополнительные примеры с использованием скрипта http://tcimg.dreamlair.net/TCIMG_ONLINE/html/html/int/akelpad.htm
'===========================================================================
With WScript Cnt = .Arguments.Count
  If Cnt = 0 Then .Quit ' если параметр не передаётся, то выход
  P = .Arguments(0)
End With

With AkelPad .Include("Functions.vbs")
  TCIMG = Chr(34) & GetPath(ReadOption("IMAGE", "TCIMG", 3)) & Chr(34) ' путь к утилите TCIMG, берётся из AkelPadImage.ini
  
  If InStr(P, "#hendl#") > 0 Then ' дескриптор главного окна
    T = .GetMainWnd()
    If Len(T) = 0 Then WScript.Quit
    P = Replace(P, "#hendl#", T)
  End If
  
  If InStr(P, "#ahendl#") > 0 Then ' дескриптор активного окна редактирования
    T = .GetEditWnd()
    If Len(T) = 0 Then WScript.Quit
    P = Replace(P, "#ahendl#", T)
  End If
  
  If InStr(P, "#stext#") > 0 Then
    T = .GetSelText ' получение выделенного текста
    If Len(T) = 0 Then T = .GetTextRange(0, -1) ' если нет выделения берётся весь текст
    If Len(T) = 0 Then Wscript.Quit
    P = Replace(P, "#stext#", T)
  End If

  If InStr(P, "#sline#") > 0 Then
    T = .GetSelText ' получение выделенного текста
    If Len(T) = 0 Then T = GetLine ' если нет выделения берётся активная строка
    If Len(T) = 0 Then Wscript.Quit
    P = Replace(P, "#sline#", T)
  End If

  If InStr(P, "#akelname#") > 0 Then P = Replace(P, "#akelname#", GetFF(GetExeAkel, 3))

  If InStr(P, "#symbols#") > 0 Then ' получение символа
    If Len(Sym) = 0 Then Sym = GetSymLeft
    If Len(Sym) = 0 Then WScript.Quit
    If Len(Sym) > 1 Then Sym = Left(Sym, 1)
    If Len(RegExpSearchInText(Sym, "[a-z]")) > 0 Then : Lng = "'английский']" : Else : Lng = "'русский']" : End If
    P = Replace(P, "#symbols#", "AkelPad - [Символ '"& Sym & "' Chr(" & Asc(Sym) & ") Язык:" & Lng) : W = 1
  End If

  If InStr(P, "#file#") > 0 Then ' путь файла открытого на редактирование
    pFile = .GetEditFile(0)
    If Len(pFile) = 0 Then WScript.Quit
    T = "AkelPad - [Дата создания : " & GetFF(pFile, 9) & " Изменён: " & GetFF(pFile, 11) & " Размер: " & GetFF(pFile, 12) & " байт]"
    P = Replace(P, "#file#", T)
    W = 1
  End If

  If InStr(P, "#akeltotal#") > 0 Then : P = Replace(P, "#akeltotal#", "AkelPad - [Папка AkelPad " & .GetAkelDir(0) & " : Папка Total Commander " & CreateObject("WScript.Shell").ExpandEnvironmentStrings("%COMMANDER_PATH%") & "]") : W = 1 : End If

  P = """" & Replace(Replace(P, " ", "~~"), "<X>", """ """) & """"

  TCIMGRUN(P)

  If W > 0 Then WScript.Sleep 5000 : TCIMGRUN("title=AkelPad||$AkelPad4") : End If
End With

Sub TCIMGRUN(C) CreateObject("WScript.Shell").Run TCIMG & C, 1, False End Sub
' Sub TCIMGRUN(C) CreateObject("WScript.Shell").Run TCIMG & " " & C, 1, False End Sub


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