TTS机读文本

TTS文本语言基本功能，语数设定 -1 标准、声音大小 100
tmp [2] ＝ 代码编辑框1.取文本 (代码编辑框1.取长度 ())
.如果 (删全部空 (tmp [2]) ≠ “”)
.如果真 (通用对话框1.打开 () ＝ 真)
tmp [1] ＝ 通用对话框1.文件名
.如果真 (到小写 (取文本右边 (tmp [1], 4)) ≠ “.wav”)
tmp [1] ＝ tmp [1] ＋ “.wav”
.如果真结束
.如果 (TTS.输出声音文件 (0, tmp [2], tmp [1]) ＝ 真)
信息框 (“输出成功”, 64, )
.否则
信息框 (“输出失败”, 64, )
.如果结束

.如果真结束

.否则
信息框 (“请输入文本”, 64, )