AkelPad - 免费的文本编辑器.
AkelPad Image - AkelPad文本编辑器的独特定制版.
在AkelPad中使用"TCIMG"的示例:
-"打开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)
-"打开TCIMG中的当前RTF文件" 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的屏幕截图" 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屏幕截图" 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的屏幕截图" 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)
-"在帮助命令.htm中打开所选命令Total Commander" 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)
-"从TCIMG播放器中的文件夹E:\Music\vk\播放曲目" 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图像与系统" 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)
-"重新加载浏览器" 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)
-"在AutoIt3帮助帮助中打开所选短语" 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切换器" 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"的命令行并运行它:
'======================== 描述 =====================================
' 用于使用各种参数调用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)
' 作者:Averin Andrey
' 版本: 1.4 (06.04.2013 - 22.01.2016)
' 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
' 最新版本的"TCIMG"可以下载 http://wincmd.ru/plugring/TCIMG.html
' 在主题中提出问题 http://tc-image.3dn.ru/forum/5-498-1
' 说明在实用程序TCIMG.chm或 http://tc-image.zz.mu/TCIMG_ONLINE.html
'===========================================================================
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
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
© Аверин Андрей для Total Commander Image Averin-And@yandex.ru