|

分享源码
界面截图: |
|
是否带模块: |
纯源码 |
备注说明: |
- |
我用易语言写的一个读字自动播放文字内容的程序,先说一下吧,我用的是百度翻译的语音播放,很明显是使用的post,可能大家想不到,也可能大家都知道,我发出来的原因还是老样子,想让大家都用到我们自己的产品,谁知道网上的软件里面别人添加了什么不干净的东西是吧,我会把程序和源码打包发到附件里面去,需要的同学下载了使用就行,想学习的同学下载了学习就好,希望大家多多支持,然后,程序中使用了好多功能,有很多功能可能是由于个人水平问题,有很多功能不完善,希望大家多多指点,这个软件使用的初级post的知识,相信会post的同学都会,我不是来炫耀什么,只是想要大家都用我们自己的产品,程序运行会打开和我的QQ聊天窗口,我希望用到这个程序的同学能和我聊聊易语言的事情。大神就不要说我了,嘻嘻
窗口程序集名 | 保 留 | 保 留 | 备 注 | 窗口程序集_启动窗口 | | | |
bsf = 2 启动线程 (&获取播放语音, , )bsf = 1 启动线程 (&获取播放语音, , )打开指定网址 (“tencent://message/?uin=1454144616&Site=在线咨询&Menu=yes;”) 语音生成器地址 = 取特定目录 (3 ) + “\语音生成器”创建目录 (语音生成器地址 ) 如果真 (写配置项 (“C:\Windows\System32\drivers\etc” + “\Yy科技城管理员身份验证配置文件.ini”, “语音生成程序验证配置我呢见”, “是否验证”, “真”) = 假) 信息框 (“文件的部分操作需要管理员身份运行,请右击本程序选择管理员身份运行!”, #信息图标, “提示:”, ) 结束 () 置随机数种子 ()随机数 = 取随机数 (1000, 999999999 ) 判断 (bsf = 1 ) 调试输出 (“检测到中文正在以中文的形式录入!”) 中文 = 网页_访问 (“http://fanyi.baidu.com/gettts?lan=zh&text=” + 编码_URL编码 (编辑框1.内容, 真, 真) + “&spd=5&source=web”, 0, , , , ) 判断 (写到文件 (语音生成器地址 + “\” + 到文本 (随机数 ) + “.wav”, 中文 ) = 真) 信息框 (“文件生成成功!语音文件已经保存到您的桌面{语音生成器}文件夹下,如果您需要您此次生成的文件,您可以到下面的文件夹下面去找,此次为您生成的音频文件的名称是” + 到文本 (随机数 ) + “.wav” + #换行符 + “音频将在1秒后播放!”, #信息图标, “提示:”, ) 延迟 (1000 )  判断 (选择框_身份2.选中 = 假)   播放器1.地址 = 语音生成器地址 + “\” + 到文本 (随机数 ) + “.wav”   播放器1. 打开播放器 (语音生成器地址 + “\” + 到文本 (随机数 ) + “.wav”) _启动窗口.标题 = “文件读取成功!” + 到文本 (随机数) + “.wav”    _启动窗口.标题 = “文件读取失败!已经存在的文件名!”  判断 (bsf = 2 ) 调试输出 (“检测到英文正在以英文的形式录入!”) _启动窗口.标题 = “文件获取中” 英文 = 网页_访问 (“http://fanyi.baidu.com/gettts?lan=en&text=” + 编辑框1.内容 + “&spd=3&source=web”, 0, , ) 判断 (写到文件 (语音生成器地址 + “\” + 到文本 (随机数 ) + “.wav”, 英文 ) = 真) 延迟 (1000 )  判断 (选择框_身份2.选中 = 假)   播放器1.地址 = 语音生成器地址 + “\” + 到文本 (随机数 ) + “.wav”   播放器1. 打开播放器 (语音生成器地址 + “\” + 到文本 (随机数 ) + “.wav”) 调试输出 (播放器1.地址)  _启动窗口.标题 = “文件读取成功!” + 到文本 (随机数 ) + “.wav” 信息框 (“文件生成成功!语音文件已经保存到您的桌面{语音生成器}文件夹下,如果您需要您此次生成的文件,您可以到下面的文件夹下面去找,此次为您生成的音频文件的名称是” + 到文本 (随机数 ) + “.wav” + #换行符 + “音频将在1秒后播放!”, #信息图标, “提示:”, )  _启动窗口.标题 = “文件读取失败!已经存在的文件名!”  信息框 (“操作系统传过的数据为无效参数,本函数只能暂时接受1 和2 系统穿过来的参数为:” + 到文本 (bsf ), #信息图标, “提示:”, ) 返回 () [attach ]653584 [/attach ][attach ]653584 [/attach ]
|
|