按键小小生:
近日整理硬盘发现以前写的一个语音朗读制作小程序。如果有朋友记得我以前发过的一个关于诛仙的帖子,其中所展示的视频中,伴随脚本运行时所使用的女生语音提示就是用这个做的,那个时候主要是自己用,没有发布。今天队里的挖掘机故障,不用上班,就把这个程序改成插件了。由于所处环境网络条件不佳,我只能有手机浏览和回复论坛帖子,所以还是拜托01帮我发布。
该插件是调用系统中已经安装的语音朗读引擎来实现功能的。所以使用本插件朗读或者制作声音文件,需要确保系统中已经安装有语音朗读引擎。本插件总共提供了四个命令:一个检测命令来获取这方面的信息,让使用者知道当前系统能否使用本插件的朗读和制作声音文件功能;一个取出已经安装的语音库名称的命令,用来取得当前系统中所有已安装的语音库,在装有多个语音库的情况下尤其有用;还有两个命令,分别是朗读和制作声音文件命令。
朗读命令可以朗读文本和文件
[纯文本文件和XML文件],制作声音文件命令可以将文本或者文件制作成相同内容的Wav格式的声音文件,以方便脚本作者将脚本发布给那些没有安装语音库文件的用户使用。
我自己所使用的语音库是NeoSpeech语音合成引擎中的Lily中文女声语音库。当然网络上有很多这样的语音库,还是由于我所处环境的网络状况不佳的缘故,我不能给出有效的下载链接给大家,只能靠大家自行百度或者谷歌了。
最后,再次感谢01帮我发帖。有鲜花的给鲜花,有钱的给钱,想砸鸡蛋的砸鸡蛋,来者不拒,多多益善。
使用说明:AutoSpeak.dll使用说明.txt中的内容。附件:
1、AutoSpeak.dll
2、AutoSpeak.dll使用说明.txt
3、AutoSpeak.html
----------------------------------------------------------------------------------------------------------
◆AutoSpeak.dll使用说明:★重要说明:本插件用易语言编写,按键8.2及以上版本可用★
☆功能描述:该插件能够朗读指定的文本或文件,或者将其制作为wav格式文件☆
△命令调用及参数参数说明:参考AutoSpeak.html中内容。
◇示例(首先将本插件放入Plugin文件夹下,然后启动按键,将以下代码复制到按键源码编辑区中即可):- test = Plugin.AutoSpeak.DetectReadEnv()
- If test=1 Then
- speaklib = Plugin.AutoSpeak.GetSpeechLibInfo()
- If Len(speaklib)=0 Then
- MsgBox "没有找到语音库"
- Else
- Mylib = Split(speaklib, "|")
- count = ubound(Mylib)+1
- MsgBox "所有的语音库:"&speaklib&"共计:"&cstr(count)&"个。"
- i=1
- For count
- MsgBox "第" & Cstr(i) & "个语音库:" & Mylib(i-1)
- i=i+1
- Next
- MsgBox "下面将使用第一个语音库进行朗读测试。"
- read = Plugin.AutoSpeak.RobotSpeak(Mylib(0), 0, "Very good!", 2000, 1, 100)
- if read = 1 Then
- MsgBox "朗读成功"
- Else
- MsgBox "朗读失败"
- End If
- MsgBox "下面将把测试文本制作成声音文件。"
- makefile = Plugin.AutoSpeak.MakeWavFile(0,"Very good!","C:\verygood.wav",Mylib(0))
- if makefile = 1 Then
- MsgBox "制作成功,请打开文件测试。"
- Else
- MsgBox "制作失败"
- End If
- End If
- Else
- MsgBox "不能使用本语音朗读插件。"
- End If
复制代码△特别说明:本插件在首次加载使用时会自动在插件目录下生成对应的插件函数Html格式使用
说明,在全部命令→按键精灵插件命令 中选中本插件,点击对应命令即可在命令提示中看见详
细的使用说明。
按键小小生
2011年6月19日