易语言制作方言版语音合成工具

.版本 2
.支持库 exui
.支持库 iext
.程序集 窗口程序集_启动窗口
.程序集变量 音乐, 文本型
.子程序 __启动窗口_创建完毕
云语音_初始化 (“dev.voicecloud.cn:80/index.htm”, “5476b55d”, “10000”, “speex.dll”, “2048”)
时钟1.时钟周期 ＝ 100
组合框_语言.加入项目 (“女声.标准普通话”, , , )
组合框_语言.加入项目 (“男声.标准普通话”, , , )
组合框_语言.加入项目 (“女声.英文”, , , )
组合框_语言.加入项目 (“男声.英文”, , , )
组合框_语言.加入项目 (“女声.粤语”, , , )
组合框_语言.加入项目 (“台湾.普通话”, , , )
组合框_语言.加入项目 (“女声.四川普通话”, , , )
组合框_语言.加入项目 (“女声.东北普通话”, , , )
组合框_语言.现行选中项 ＝ 1
.子程序 _时钟1_周期事件
.如果真 (组合框_语言.现行选中项 ＝ 1)
  编辑框2.内容 ＝ “xiaoyan”
.如果真结束
.如果真 (组合框_语言.现行选中项 ＝ 2)
  编辑框2.内容 ＝ “xiaoyu”
.如果真结束
.如果真 (组合框_语言.现行选中项 ＝ 3)
  编辑框2.内容 ＝ “Catherine”
.如果真结束
.如果真 (组合框_语言.现行选中项 ＝ 4)
  编辑框2.内容 ＝ “henry”
.如果真结束
.如果真 (组合框_语言.现行选中项 ＝ 5)
  编辑框2.内容 ＝ “vixm”
.如果真结束
.如果真 (组合框_语言.现行选中项 ＝ 6)
  编辑框2.内容 ＝ “vixl”
.如果真结束
.如果真 (组合框_语言.现行选中项 ＝ 7)
  编辑框2.内容 ＝ “vixr”
.如果真结束
.如果真 (组合框_语言.现行选中项 ＝ 8)
  编辑框2.内容 ＝ “vixyun”
.如果真结束
透明标签1.标题 ＝ 到文本 (滑块条_音量.位置)
透明标签2.标题 ＝ 到文本 (滑块条_语速.位置)
.判断开始 (选择框_音乐.选中 ＝ 真)
  音乐 ＝ “1”
.默认
  音乐 ＝ “0”
.判断结束
.子程序 _按钮1_被单击
.如果真 (通用对话框1.打开 ())
  复制文件 (取运行目录 () ＋ “\麦霸传说语音文件.wav”, 通用对话框1.文件名)
.如果真结束
.子程序 _按钮_朗读_左键单击
云语音_合成语音 (编辑框_内容.内容, “1”, “intp”, 编辑框2.内容, 透明标签2.标题, 透明标签1.标题, “text”, “GB2312”, 音乐, “raw”, “0”, “audio/L16;rate=16000”, 真, 取运行目录 () ＋ “\麦霸传说语音文件.wav”)
.子程序 _按钮_保存_左键单击
.如果真 (通用对话框1.打开 ())
  复制文件 (取运行目录 () ＋ “\麦霸传说语音文件.wav”, 通用对话框1.文件名)
.如果真结束