【2023开源大赛】文字转语音

yokie

用的bai度接口，里面的client_id 和client_secret
在百du可以随便申请
模块调用了精易模块
这个我忘记是哪位大佬的了

  

子程序名	返回值类型	公开	备 注
百du语音播报	逻辑型
参数名	类 型	参考	可空	数组	备 注
朗读文本	文本型				合成的文本，使用UTF-8编码。小于512个中文字或者英文数字。（文本在百du服务器内转换为GBK后，长度必须小于1024字节）
ctp	文本型				客户Duan类型选择，web端填写固定值1
lan	文本型				固定值zh。语言选择,目前只有中英文混合模式，填写固定值zh
spd	文本型				语速，取值0-9，默认为5中语速
pit	文本型				音调，取值0-9，默认为5中语调
vol	文本型				音量，取值0-15，默认为5中音量
per	整数型				发音人选择, 0为普通女声，1为普通男生，3为情感合成-度逍遥，4为情感合成-度丫丫，默认为普通女声

变量名	类 型	静态	数组	备 注
access_token	文本型
局_提交内容	文本型
局_返回的语音	字节集
局_返回协议头	文本型
局_写到文件路径	文本型
client_id	文本型
client_secret	文本型

client_id ＝ “XXXXXXXXXXXXX”
client_secret ＝ “XXXXXXXXXX”
access_token ＝ 编码_Utf8到Ansi (网页_访问_对象 (“https://openapi.baidu.com/oauth/ ... dentials&client_id=” ＋ client_id ＋ “&client_secret=” ＋ client_secret, 0, , , , ))
access_token ＝ 文本_取出中间文本 (access_token, “access_token” ＋ #引号 ＋ “:” ＋ #引号, #引号, , )
局_提交内容 ＝ “tex=” ＋ 编码_URL编码 (朗读文本, , 真) ＋ “&tok=” ＋ access_token ＋ “&cuid=” ＋ 文本_取随机字符 (10) ＋ “&ctp=1” ＋ “&lan=zh&vol=5&per=” ＋ 到文本 (per)
局_返回的语音 ＝ 网页_访问_对象 (“http://tsn.baidu.com/text2audio?” ＋ 局_提交内容, 0, , , , , 局_返回协议头)
如果真 (寻找文本 (局_返回协议头, “audio/mp3”, , 假) ≠ -1)
局_写到文件路径 ＝ 取特定目录 (3) ＋ “baidu_yuyin_” ＋ 文本_取随机字符 (8) ＋ “.mp3”
写到文件 (局_写到文件路径, 局_返回的语音)
调试输出 (局_写到文件路径)
媒体播放1.打开 (局_写到文件路径)
媒体播放1.播放 (-1, )
返回 (真)

i支持库列表	支持库注释
shell	操作系统界面功能支持库
spec	特殊功能支持库
eMMedia	多媒体支持库

.版本 2<br /> .支持库 shell<br /> .支持库 spec<br /> .支持库 eMMedia<br /> <br /> .子程序 百du语音播报, 逻辑型<br /> .参数 朗读文本, 文本型, , 合成的文本，使用UTF-8编码。小于512个中文字或者英文数字。（文本在百du服务器内转换为GBK后，长度必须小于1024字节）<br /> .参数 ctp, 文本型, 可空, 客户Duan类型选择，web端填写固定值1<br /> .参数 lan, 文本型, 可空, 固定值zh。语言选择,目前只有中英文混合模式，填写固定值zh<br /> .参数 spd, 文本型, 可空, 语速，取值0-9，默认为5中语速<br /> .参数 pit, 文本型, 可空, 音调，取值0-9，默认为5中语调<br /> .参数 vol, 文本型, 可空, 音量，取值0-15，默认为5中音量<br /> .参数 per, 整数型, 可空, 发音人选择, 0为普通女声，1为普通男生，3为情感合成-度逍遥，4为情感合成-度丫丫，默认为普通女声<br /> .局部变量 access_token, 文本型, 静态<br /> .局部变量 局_提交内容, 文本型<br /> .局部变量 局_返回的语音, 字节集<br /> .局部变量 局_返回协议头, 文本型<br /> .局部变量 局_写到文件路径, 文本型<br /> .局部变量 client_id, 文本型<br /> .局部变量 client_secret, 文本型<br /> <br /> <br /> client_id ＝ “XXXXXXXXXXXXX”<br /> client_secret ＝ “XXXXXXXXXX”<br /> <br /> access_token ＝ 编码_Utf8到Ansi (网页_访问_对象 (“<a href="https://openapi.baidu.com/oauth/2.0/token?grant_type=client_credentials&client_id=" rel="nofollow" rel="nofollow" target="_blank">https://openapi.baidu.com/oauth/ ... dentials&client_id=</a>” ＋ client_id ＋ “&client_secret=” ＋ client_secret, 0, , , , ))<br /> access_token ＝ 文本_取出中间文本 (access_token, “access_token” ＋ #引号 ＋ “:” ＋ #引号, #引号, , )<br /> <br /> 局_提交内容 ＝ “tex=” ＋ 编码_URL编码 (朗读文本, , 真) ＋ “&tok=” ＋ access_token ＋ “&cuid=” ＋ 文本_取随机字符 (10) ＋ “&ctp=1” ＋ “&lan=zh&vol=5&per=” ＋ 到文本 (per)<br /> <br /> 局_返回的语音 ＝ 网页_访问_对象 (“<a href="http://tsn.baidu.com/text2audio?" rel="nofollow" rel="nofollow" target="_blank">http://tsn.baidu.com/text2audio?</a>” ＋ 局_提交内容, 0, , , , , 局_返回协议头)<br /> <br /> .如果真 (寻找文本 (局_返回协议头, “audio/mp3”, , 假) ≠ -1)<br />     局_写到文件路径 ＝ 取特定目录 (3) ＋ “baidu_yuyin_” ＋ 文本_取随机字符 (8) ＋ “.mp3”<br />     写到文件 (局_写到文件路径, 局_返回的语音)<br />     调试输出 (局_写到文件路径)<br />     媒体播放1.打开 (局_写到文件路径)<br />     媒体播放1.播放 (-1, )<br /> .如果真结束<br /> 返回 (真)

遵义静以修身

很牛我要学习一下

无名霸道

感谢分享，很给力！~

asmsr

6666666666666666666666

SHIWOOOO

好好好好

火龙果s

66666666666666

gp8655

百du的api得申请

dxc324

这个是收费的吗

lmwdz

感谢分享~~~~~

BG专业引流

636666666666666666666666

chenhaonb

学习一下