易语言外部插件易之源模块转源码工具

.子程序 _EC转E独语版_被选择
.局部变量 结果, 字节集
.局部变量 错误, 文本型

.如果 (路径0 ≠ “”)
.如果真 (易基本.E文件类型 (dat) ＝ “ERROR”)
信息框 (“文件数据错误.”, 16, “错误”, )
返回 ()
.如果真结束
通用对话框1.类型 ＝ 1
通用对话框1.过滤器 ＝ “易源码|*.E”
通用对话框1.文件名 ＝ “”
通用对话框1.打开 ()
.如果真 (通用对话框1.文件名 ＝ “”)
返回 ()
.如果真结束
.如果真 (写到文件 (通用对话框1.文件名, 易独语.分析E源码 (dat, 错误)) ＝ 假)
信息框 (“写出失败!”, 16, “错误”, )
返回 ()
.如果真结束
.如果真 (错误 ≠ “”)
信息框 (“错误:” ＋ #换行符 ＋ 错误 ＋ “.”, 16, “错误”, )
.如果真结束
信息框 (“操作完毕!”, #信息图标, “提示”, )
.否则
信息框 (“文件不存在!”, 16, “错误”, )