kxing 发表于 2012-4-6 17:10:41

一个txt to wav 的例子


$obj=ObjCreate("SAPI.SpVoice")
$obj.Voice=$obj.GetVoices().Item(0)
$obj.AssignFormat(21);关键在此,设置无效

$spfs=objcreate("SAPI.SpFileStream")
$spfs.Open(@scriptdir&"\mystream.wav",3,false)
$obj.AudioOutputStream=$spfs
$obj.Speak("测试输出wav文件",0)
$spfs.Close();
能生成wav文件了,但是就是音质很差,网上搜了下,可用assignformat来设置,但是不会用。还请高人出手,多谢!

kxing 发表于 2012-4-7 17:38:36

有高手指点下吗!!!!
页: [1]
查看完整版本: 一个txt to wav 的例子