将文本内容转换成语音

本代码是利用百度将文本内容转换为语音，使用的过程中需要链接互联网！

ug(id,"text",a)

//输入编辑框id
f(a=="")
{
tw("请输入文字")
}
else
{
stobm(a,"utf-8",a)
sr(a," ","",a)
t()
{
ss("http://tts.baidu.com/text2audio?ie=UTF-8&lan=zh&text="+a,a)
ufnsui()
{
tw("下载中...",0)
}
hd(a,"%iappsj/转语音/转换后.mp3",true,b)
f(b==0)
{
ufnsui()
{
tw("已保存到根目录的%iappsj/转换后目录里面",0)
}
bfm("%iappsj/转语音/转换后.mp3",c)
bfms(c,"st")
}
}
}