在 AkelPad 编辑器里运行代码的方法

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48

//根据文件扩展名调用对应的执行程序
//下面是扩展名和对应的执行程序的键值对
//简单修改即可让脚本支持其他语言或者调用其他程序
//只要添加新的扩展名和执行程序即可
//可执行程序的路径，如果是在环境变量‘path’里的话，可以直接写可执行程序的名字，比如‘python’
var exes = {
'dart': 'dart run',
'js': 'node',
'mjs': 'node',
'php': 'php',
'py': 'python',
'iss': 'iscc',
'lua': 'chcp 65001 && lua',
'txt': 'notepad'
};
//file_dir 为文件默认保存目录，可根据自己的情况决定，默认保存到d:\workspace目录下，所以请手动建立该目录
//如果喜欢，也可以保存到桌面，可以使用 desktop_dir来引用桌面路径
var desktop_dir = new ActiveXObject("Wscript.Shell").SpecialFolders("Desktop");
var file_dir = 'd:\\workspace\\';
//默认扩展名
var file_ext = 'txt';
var file_name =AkelPad.GetEditFile(0);
//如果‘file_name’为空的话，表示新建的文件，弹出文件名输入对话框
if(file_name == "") {
  var hMainWnd=AkelPad.GetMainWnd();
  var pText=AkelPad.InputBox(hMainWnd, "文件名", "请输入文件名（包括扩展名）", "");
if(pText != undefined) {
file_name = file_dir + pText;
}
}
//如果‘file_name’为空的话，表示新建的文件，并且用户没有输入有效的文件名，那么用扩展名加自增序号的规则来命名，自增序号根据该扩展名的文件数决定
if(file_name == "") {
//文件名格式为“扩展名_时间戳后五位数.扩展名”
//var time = new Date().getTime() + '';
//var ts = time.substring(8);
var  fso=new ActiveXObject("Scripting.FileSystemObject");
var fs=fso.getfolder(file_dir).files;
file_name = file_dir + file_ext + '_' + fs.count + '.' + file_ext;
}
var working_dir =AkelPad.GetFilePath(file_name, 1);
var codepage=AkelPad.GetEditCodePage(0);
var bomb=AkelPad.GetEditBOM(0);
//WScript.Echo(file_name);
//WScript.Echo(working_dir);
//WScript.Echo("Edit file: " + file_name + codepage + bomb);
var Result=AkelPad.SaveFile(0, file_name, codepage, bomb);
file_ext = file_name.split('.').pop();
AkelPad.Exec('%comspec% /k title=AkelPad run code & cd /D "' + working_dir + '" & ' + exes[file_ext] + ' "' + file_name + '" & pause & exit');