大家一定对文本转语音朗读器不陌生吧。可是大家想过自己制作一个吗?今天我就教大家制作文本转语音朗读器。
工具/原料
易语言
语音模块
皮肤模块(可用可不用)
方法/步骤
1、首先,我们下载一个语音模块。
2、打开易语言,新建Windows窗口程序。
3、单击“程序”,打开语音朗读易模块和皮肤模块。
4、绘制好组件。
5、双击启动窗口,写代码:皮肤_资源加载(#皮肤_呵呵黑色)'注:呵呵黑色只是我选的联羧讳奁皮肤,大家可以用别的。不想添加皮肤的可以跳过此步骤。
6、按快捷键Ctrl+G键插入一个全局变量,命名为“朗读”,类型为“机读文本”。
7、然后选择窗口程序集_启动窗口,进去写代码:.版本2.支持库ESpeechE艘绒庳焰ngine组合框1.现行选中项=0_确定设置傥态尬锪语音库_被单击()'设置默认语音库为MicrosoftSimplifiedChinese朗读.重新创建并初始化()编辑框1.内容=“现在是:”+到文本(取现行时间())朗读.文本到语音(0,“现在是:”+到文本(取现行时间()),,)'朗读现在的时间.子程序_确定设置语音库_被单击朗读.设置语音库(组合框1.取项目文本(组合框1.现行选中项))'设置语音库.子程序_开始朗读_被单击朗读.文本到语音(0,编辑框1.内容,,)'朗读编辑框1的内容.子程序_暂停朗读_被单击朗读.暂停发音()'暂停.子程序_继续朗读_被单击朗读.恢复发音()'继续.子程序_停止朗读_被单击朗读.停止发音()'停止.子程序_语速滑块条_位置被改变语速标签.标题=到文本(语速滑块条.位置-11)'设置速度.如果(语速标签.标题=“0”)'如果速度为0语速标签.标题=“0(标准速度)”'加入“标准速度”.否则.如果结束朗读.设置语速(语速滑块条.位置-11)'-11是因为速度有负.子程序_导出音频_被单击通用对话框1.过滤器=“wav音频文件(*.wav)|*.wav”'设置过滤器通用对话框1.类型=1'设置类型为保存文件.如果真(通用对话框1.打开())朗读.输出声音文件(0,编辑框1.内容,通用对话框1.文件名+“.wav”)'保存文件.如果真结束.子程序_导入txt_被单击通用对话框1.过滤器=“文本文档(*.txt)|*.txt”'设置过滤器通用对话框1.类型=0'设置类型为打开文件.如果真(通用对话框1.打开())编辑框1.内容=到文本(读入文件(通用对话框1.文件名))'打开文件.如果真结束