et助手插件，替换新建窗口开源

pWndProc ＝ SetWindowLongA (全_主窗口句柄, -4, 到整数 (&WindowProc))
.判断 (树型框_选择.取项目文本 (树型框_选择.现行选中项) ＝ “历史记录”)
当前选中文件 ＝ 列表框1.取项目文本 (超级列表框_文件浏览.现行选中项)
.如果 (文件是否存在 (当前选中文件) ＝ 真)
ET.打开易源码 (当前选中文件)
.否则
信息框 (“该文件已不存在，删除此条记录（待完善）”, 0, “提示”, )
返回 ()
.如果结束

.默认
.如果真 (取文本右边 (当前选中目录, 1) ≠ “\”)
当前选中目录 ＝ 当前选中目录 ＋ “\”
.如果真结束
当前选中文件 ＝ 当前选中目录 ＋ 超级列表框_文件浏览.取标题 (超级列表框_文件浏览.现行选中项, ) ＋ “.e”
ET.打开易源码 (当前选中文件)
.判断结束
ET.写配置 (“System”, “上次选中列表”, 到文本 (树型框_选择.现行选中项))
ET.写配置 (“System”, “上次选中程序”, 到文本 (超级列表框_文件浏览.现行选中项))