易语言编写翻译小工具源码
@易小学生.版本 2
.支持库 EXMLParser
.支持库 spec
.支持库 EThread
.程序集 窗口程序集_启动窗口
.子程序 子程序_翻译
子程序_发送翻译 (1, 编码_URL编码 (编码_gb2312到utf8 (编辑框_输入.内容), 真, ))
子程序_发送翻译 (2, 编码_URL编码 (编码_gb2312到utf8 (编辑框_输入.内容), 真, ))
子程序_发送翻译 (3, 编码_URL编码 (编码_gb2312到utf8 (编辑框_输入.内容), 真, ))
' 有道: http://fanyi.youdao.com/translate?&doctype=json&type=AUTO&i=hello
' 百度: https://fanyi.baidu.com/transapi?from=auto&to=en&query=%E4%BD%A0%E5%A5%BD
' BING: http://api.microsofttranslator.com/v2/Http.svc/Translate?appId=AFC76A66CF4F434ED080D245C30CF1E71C22959C&from=&to=zh&text=hello
.子程序 子程序_发送翻译
.参数 翻译接口, 整数型, , 1 为百度,2 为有道,3 为Bing
.参数 翻译内容, 文本型
.局部变量 局_有道访问, 文本型
.局部变量 局_Bing访问, 文本型
.局部变量 局_百度访问, 文本型
.局部变量 局_返回文本, 文本型
.局部变量 局_地址, 文本型
.局部变量 JSON, 类_json
.局部变量 XML, XML树
.局部变量 局_源语种, 文本型
.局部变量 局_目标语种, 文本型
子程序_语种检测 (局_源语种, 局_目标语种)
.判断开始 (翻译接口 = 1)
局_百度访问 = “https://fanyi.baidu.com/transapi?from=%s&to=%s&query=%s”
局_地址 = 取文本 (局_百度访问, 局_源语种, 局_目标语种, 翻译内容)
.判断 (翻译接口 = 2)
局_地址