百度翻译源码

liu307921917

是这样的，由于精易编程助手 - 2.36的【中英翻译】失效，最常用的4个功能网页分析、中英翻译、编码转换、正则调试，而其中
【中英翻译】失效，官方也一直无视这个问题，特贴出翻译源码，望精易编程助手作者能看到，修复下，或者把助手开源也行啊，同意的顶起！

之前反应的帖子http://bbs.125.la/thread-13869994-1-1.html

  

子程序名	返回值类型	公开	备 注
百度翻译	文本型
参数名	类 型	参考	可空	数组	备 注
内容	文本型

变量名	类 型	静态	数组	备 注
str	文本型
lan	文本型		2
dst	文本型

判断 (文本_是否为汉字 (内容))
lan [1] ＝ “zh”
lan [2] ＝ “en”
lan [1] ＝ “en”
lan [2] ＝ “zh”
str ＝ 编码_usc2到ansi (网页_访问s (“http://fanyi.baidu.com/v2transapi”, 1, “from=” ＋ lan [1] ＋ “&to=” ＋ lan [2] ＋ “&query=” ＋ 编码_URL编码 (内容, 真, 真) ＋ “&transtype=realtime&simple_means_flag=3”))
dst ＝ 文本_取出中间文本 (str, “dst” ＋ #引号 ＋ “:” ＋ #引号, #引号 )
返回 (dst)

.版本 2<br /> <br /> .子程序 百度翻译, 文本型<br /> .参数 内容, 文本型<br /> .局部变量 str, 文本型<br /> .局部变量 lan, 文本型, , "2"<br /> .局部变量 dst, 文本型<br /> <br /> .判断开始 (文本_是否为汉字 (内容))<br />     lan [1] ＝ “zh”<br />     lan [2] ＝ “en”<br /> .默认<br />     lan [1] ＝ “en”<br />     lan [2] ＝ “zh”<br /> .判断结束<br /> str ＝ 编码_usc2到ansi (网页_访问s (“<a href="http://fanyi.baidu.com/v2transapi" rel="nofollow" rel="nofollow" target="_blank">http://fanyi.baidu.com/v2transapi</a>”, 1, “from=” ＋ lan [1] ＋ “&to=” ＋ lan [2] ＋ “&query=” ＋ 编码_URL编码 (内容, 真, 真) ＋ “&transtype=realtime&simple_means_flag=3”))<br /> dst ＝ 文本_取出中间文本 (str, “dst” ＋ #引号 ＋ “:” ＋ #引号, #引号)<br /> 返回 (dst)

q519584784

百度翻译百度翻译百度翻译百度翻译

噢噢

挺好的,学习

易语言血洗

楼主不行啊，文本中有回车就不行，后面都不翻译是怎么了？

ninesister

找到解决方案了！由于原作者，在翻译后，取文本的过程中，忽略了一个问题：有时候被翻译的文本是带有引号的，所以，容易造成取翻译文本的错误，我把代码做了一些略微的改动，就不会出错了。再次感谢作者分享，我也只是跟着你来学习。
子程序名 返回值类型 公开 备 注
百度翻译 文本型   
参数名 类 型 参考 可空 数组 备 注
内容 文本型        
变量名 类 型 静态 数组 备 注
str 文本型      
lan 文本型   2  
dst 文本型      
判断 (文本_是否为汉字 (内容))
lan [1] ＝ “zh”
lan [2] ＝ “en”
lan [1] ＝ “en”
lan [2] ＝ “zh”
str ＝ 编码_usc2到ansi (网页_访问s (“http://fanyi.baidu.com/v2transapi”, 1, “from=” ＋ lan [1] ＋ “&to=” ＋ lan [2] ＋ “&query=” ＋ 编码_URL编码 (内容, 真, 真) ＋ “&transtype=realtime&simple_means_flag=3”))
dst ＝ 文本_取出中间文本 (str, “dst” ＋ #引号 ＋ “:” ＋ #引号, #引号+“，”+#引号 )
返回 (dst)

ninesister

楼主的方法，学习中，但是发现一个bug，对于长度超过[取文本长度（）]327的没法，完全翻译！

xshun825

挺好的,学习

ylcc2008

有韩语翻译吗？是不是乱码或者没内容

xiaoyao01

支持 支持         

liu307921917

飘零殇 发表于 2016-5-28 09:53
可能是网络的问题，反正翻译的比较慢，我昨天翻译很久没有出来。以为翻译不了。今天测试了一下。还是要延 ...

  

子程序名	返回值类型	公开	备 注
百度翻译	文本型
参数名	类 型	参考	可空	数组	备 注
内容	文本型

变量名	类 型	静态	数组	备 注
str	文本型
lan	文本型		2
dst	文本型

判断 (文本_是否为汉字 (内容))
lan [1] ＝ “zh”
lan [2] ＝ “en”
lan [1] ＝ “en”
lan [2] ＝ “zh”
str ＝ 编码_usc2到ansi (网页_访问s (“http://fanyi.baidu.com/v2transapi”, 1, “from=” ＋ lan [1] ＋ “&to=” ＋ lan [2] ＋ “&query=” ＋ 编码_URL编码 (内容, 真, 真) ＋ “&transtype=realtime&simple_means_flag=3”))
dst ＝ 文本_取出中间文本 (str, “dst” ＋ #引号 ＋ “:” ＋ #引号, #引号 )
返回 (dst)

.版本 2<br /> <br /> .子程序 百度翻译, 文本型<br /> .参数 内容, 文本型<br /> .局部变量 str, 文本型<br /> .局部变量 lan, 文本型, , "2"<br /> .局部变量 dst, 文本型<br /> <br /> .判断开始 (文本_是否为汉字 (内容))<br />     lan [1] ＝ “zh”<br />     lan [2] ＝ “en”<br /> .默认<br />     lan [1] ＝ “en”<br />     lan [2] ＝ “zh”<br /> .判断结束<br /> str ＝ 编码_usc2到ansi (网页_访问s (“<a href="http://fanyi.baidu.com/v2transapi" rel="nofollow" rel="nofollow" target="_blank">http://fanyi.baidu.com/v2transapi</a>”, 1, “from=” ＋ lan [1] ＋ “&to=” ＋ lan [2] ＋ “&query=” ＋ 编码_URL编码 (内容, 真, 真) ＋ “&transtype=realtime&simple_means_flag=3”))<br /> dst ＝ 文本_取出中间文本 (str, “dst” ＋ #引号 ＋ “:” ＋ #引号, #引号)<br /> 返回 (dst)

liu307921917

飘零殇 发表于 2016-5-28 09:53
可能是网络的问题，反正翻译的比较慢，我昨天翻译很久没有出来。以为翻译不了。今天测试了一下。还是要延 ...

  

子程序名	返回值类型	公开	备 注
百度翻译	文本型
参数名	类 型	参考	可空	数组	备 注
内容	文本型

变量名	类 型	静态	数组	备 注
str	文本型
lan	文本型		2
dst	文本型

判断 (文本_是否为汉字 (内容))
lan [1] ＝ “zh”
lan [2] ＝ “en”
lan [1] ＝ “en”
lan [2] ＝ “zh”
str ＝ 编码_usc2到ansi (网页_访问s (“http://fanyi.baidu.com/v2transapi”, 1, “from=” ＋ lan [1] ＋ “&to=” ＋ lan [2] ＋ “&query=” ＋ 编码_URL编码 (内容, 真, 真) ＋ “&transtype=realtime&simple_means_flag=3”))
dst ＝ 文本_取出中间文本 (str, “dst” ＋ #引号 ＋ “:” ＋ #引号, #引号 )
返回 (dst)

.版本 2<br /> <br /> .子程序 百度翻译, 文本型<br /> .参数 内容, 文本型<br /> .局部变量 str, 文本型<br /> .局部变量 lan, 文本型, , "2"<br /> .局部变量 dst, 文本型<br /> <br /> .判断开始 (文本_是否为汉字 (内容))<br />     lan [1] ＝ “zh”<br />     lan [2] ＝ “en”<br /> .默认<br />     lan [1] ＝ “en”<br />     lan [2] ＝ “zh”<br /> .判断结束<br /> str ＝ 编码_usc2到ansi (网页_访问s (“<a href="http://fanyi.baidu.com/v2transapi" rel="nofollow" rel="nofollow" target="_blank">http://fanyi.baidu.com/v2transapi</a>”, 1, “from=” ＋ lan [1] ＋ “&to=” ＋ lan [2] ＋ “&query=” ＋ 编码_URL编码 (内容, 真, 真) ＋ “&transtype=realtime&simple_means_flag=3”))<br /> dst ＝ 文本_取出中间文本 (str, “dst” ＋ #引号 ＋ “:” ＋ #引号, #引号)<br /> 返回 (dst)