PL_自用模块v1.0.181203 百度、蓝奏云、音乐解析、影片采集、多模块整合。

sj13144844970

在新的模块中，没有增加命令；但我增加了提示，一些演示例子。希望各位新手们可以看得懂、因为子程序比较多所以也没时间一个个标记提示、

  

' 需要运行演示子程序，请解除指定代码的屏蔽！！！！
蓝奏云_直链 ＝ PL_蓝奏云解析 (“https://lanzoux.com/i2ilqpc”)
调试输出 (“蓝奏云_直链地址：” ＋ 蓝奏云_直链)
调试输出 (“URL短链接：” ＋ PL_URL压缩T (蓝奏云_直链), PL_URL压缩 (“https://lanzoux.com/i2ilqpc”))
是否通过 ＝ PL_QQ群认证 (“861203848”)  ' 演示范例
调试输出 (“是否通过：”, 是否通过)
PL_发起QQ群聊 (“861203848”)  ' 演示范例
PL_音乐解析_演示范例 ()
PL_酷狗_模块类_演示范例 ()
PL_蓝奏云_模块类_演示范例 ()
PL_阿里_Ocr高精版_演示范例 ()
PL_ico采集_演示范例 ()
百度模块类之语音合成与识别_演示范例 ()
PL_影片采集_模块类_演示范例 ()
' 后台更新演示，后台地址：http://2018k.cn
PL_检测版本更新 (“18dac500969544558c90db9ee2cbf730”, “1.0”)  ' 当版本号小于后台版本号时触发更新、

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> ' 需要运行演示子程序，请解除指定代码的屏蔽！！！！<br /> <br /> 蓝奏云_直链 ＝ PL_蓝奏云解析 (“https://lanzoux.com/i2ilqpc”)<br /> 调试输出 (“蓝奏云_直链地址：” ＋ 蓝奏云_直链)<br /> 调试输出 (“URL短链接：” ＋ PL_URL压缩T (蓝奏云_直链), PL_URL压缩 (“https://lanzoux.com/i2ilqpc”))<br /> <br /> 是否通过 ＝ PL_QQ群认证 (“861203848”)  ' 演示范例<br /> 调试输出 (“是否通过：”, 是否通过)<br /> <br /> PL_发起QQ群聊 (“861203848”)  ' 演示范例<br /> <br /> PL_音乐解析_演示范例 ()<br /> <br /> PL_酷狗_模块类_演示范例 ()<br /> <br /> PL_蓝奏云_模块类_演示范例 ()<br /> <br /> PL_阿里_Ocr高精版_演示范例 ()<br /> <br /> PL_ico采集_演示范例 ()<br /> <br /> 百度模块类之语音合成与识别_演示范例 ()<br /> <br /> PL_影片采集_模块类_演示范例 ()<br /> <br /> ' 后台更新演示，后台地址：http://2018k.cn<br /> PL_检测版本更新 (“18dac500969544558c90db9ee2cbf730”, “1.0”)  ' 当版本号小于后台版本号时触发更新、

  

窗口程序集名	保 留	保 留	备 注
模块测试及演示

子程序名	返回值类型	公开	备 注
PL_音乐解析_演示范例			演示范例 ——

变量名	类 型	静态	数组	备 注
匹配数量	整数型
音乐解析	PL_音乐解析_数据类		0
i	整数型

匹配数量 ＝ PL_音乐解析 (“我已经”, , 音乐解析)
计次循环首 (匹配数量, i)
调试输出 (i, 音乐解析 [i].ID, 音乐解析 [i].作者, 音乐解析 [i].歌曲名)
调试输出 (“— ” ＋ 音乐解析 [i].直链)
计次循环尾 ()

子程序名	返回值类型	公开	备 注
PL_酷狗_模块类_演示范例			演示范例 ——

变量名	类 型	静态	数组	备 注
酷狗	PL_酷狗_模块类
歌曲列表	PL_酷狗_搜索_数据类		0
解析	PL_酷狗_解析_数据类
解析_数组	PL_酷狗_解析_数据类		0
匹配数量	整数型
i	整数型

' 方法一：搜索歌曲，取列表、
匹配数量 ＝ 酷狗.搜索 (“答案”, 歌曲列表, , )
计次循环首 (匹配数量, i)
调试输出 (i, 歌曲列表 [i].ID, 歌曲列表 [i].歌名, 歌曲列表 [i].地址)
' 可继续取歌曲详细、
酷狗.音乐解析 (歌曲列表 [i].ID, 歌曲列表 [i].专辑ID, 解析)
调试输出 (“— ” ＋ 酷狗.取_时长 (解析.时长, , ), 解析.直链)
计次循环尾 ()
' 方法二：获取榜单详细、
计次循环首 (酷狗.获取榜单 (“酷狗TOP500”, 解析_数组, “1”), i)
调试输出 (i, 解析_数组 [i].ID, 解析_数组 [i].歌名, 解析_数组 [i].直链)
计次循环尾 ()

子程序名	返回值类型	公开	备 注
PL_蓝奏云_模块类_演示范例

变量名	类 型	静态	数组	备 注
蓝奏云	PL_蓝奏云_模块类
文件采集	PL_蓝奏云_文件采集_数据类		0
i	整数型
url	文本型
文件	PL_蓝奏云_文件加载_数据类		0

计次循环首 (蓝奏云.文件采集 (“https://lanzoux.com/b356974”, 文件采集), i)
调试输出 (i, 文件采集 [i].文件名, 文件采集 [i].大小, 文件采集 [i].时间, 文件采集 [i].地址)
计次循环尾 ()
' ‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘
' 蓝奏云.登录 (“Ordinary”, “密码”, )
' url ＝ 蓝奏云.获取首页地址 ()
. ' 计次循环首 (蓝奏云.加载_目录 (url, 文件), i)
' 调试输出 (i, 文件 [i].id, 文件 [i].名, 文件 [i].类型)
. ' 计次循环尾 ()

子程序名	返回值类型	公开	备 注
PL_阿里_Ocr高精版_演示范例

变量名	类 型	静态	数组	备 注
路径	文本型
url	文本型
匹配数量	整数型
Ocr	PL_Ocr_数据类		0
i	整数型

路径 ＝ “C:\Users\Administrator\Downloads\666.jpg”  ' 路径为图片类型、
url ＝ PL_上传图片 (读入文件 (路径))  ' 将图片上传到图床、
调试输出 (“图床地址：” ＋ url)
匹配数量 ＝ PL_阿里_Ocr高精版 (url, “7edc5be3895842e09573ac616244cba7”, Ocr)  ' 我的次数用完啦，需要在阿里云购买0元500次、阿里OCR高精版 输入key
计次循环首 (匹配数量, i)
调试输出 (i, Ocr [i].识别结果, Ocr [i].置信度 ＋ “%”)
计次循环尾 ()

子程序名	返回值类型	公开	备 注
PL_ico采集_演示范例			可能凉了~

变量名	类 型	静态	数组	备 注
匹配数量	整数型
i	整数型
地址	文本型		0

匹配数量 ＝ PL_ico采集 (“微信”, 到文本 (i), 地址)
目录_创建 (目录_取特定目录 () ＋ “ico采集”)
计次循环首 (匹配数量, i)
调试输出 (“正在写入：桌面\” ＋ “ico采集” ＋ “\svg_” ＋ 到文本 (i) ＋ “_” ＋ 时间_取现行时间戳 () ＋ “.png”)
写到文件 (目录_取特定目录 () ＋ “ico采集” ＋ “\svg_” ＋ 到文本 (i) ＋ “_” ＋ 时间_取现行时间戳 () ＋ “.png”, PL_svg转PNG (地址 [i]))
计次循环尾 ()

子程序名	返回值类型	公开	备 注
百度模块类之语音合成与识别_演示范例			可以用、百度AI：http://ai.baidu.com/

变量名	类 型	静态	数组	备 注
百度	PL_百度_模块类
Access_Token	文本型
合成音频	字节集
路径	文本型
识别结果	文本型

Access_Token ＝ 百度.获取Access_Token (“s2UQntTZ0K4T1Q72eY5ASt4R”, “8pSrtf7hjNREDulyyOoaIspRXAff1Gsr”)
合成音频 ＝ 百度.语音合成 (“面向开发者及企业开放110多项全球领先的AI能力和软硬一体组件，并提供 EasyDL定制化图像识别、对话系统开发平台UNIT、自定义模板OCR等AI定制化平台，为上下游合作伙伴搭建了展示与交易平台-AI市场。百度AI开放平台全力帮助各行业快速、高效地实现AI升级。”, 4, 6, Access_Token)
路径 ＝ 目录_取特定目录 () ＋ “demo.wav”
写到文件 (路径, 合成音频)
调试输出 (“语音已生成：” ＋ 路径)
执行 ( #打开文件, 路径, , , )
识别结果 ＝ 百度.语音识别 (读入文件 (路径), , Access_Token)  ' 中英文1536
调试输出 (“识别结果：” ＋ 识别结果)

子程序名	返回值类型	公开	备 注
PL_影片采集_模块类_演示范例

变量名	类 型	静态	数组	备 注
zuidazy	PL_影片采集_模块类
匹配数量	整数型
资源列表	PL_影片采集_搜索_数据类		0
i	整数型
解析	PL_影片采集_解析_数据类
j	整数型

匹配数量 ＝ zuidazy.搜索 (“战狼”, 资源列表)
计次循环首 (匹配数量, i)
调试输出 (资源列表 [i].首页URL)
zuidazy.解析 (资源列表 [i].首页URL, 解析)
调试输出 (解析.影片名, 解析.版本, 解析.封面url)
计次循环首 (解析.影片_数量, j)
如果真 (寻找文本 (解析.影片 [j].url, “.mp4”, , 假) ≠ -1)
调试输出 (i, 解析.影片 [j].名, 解析.影片 [j].url)

计次循环尾 ()
计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> .支持库 shell<br /> <br /> .程序集 模块测试及演示<br /> <br /> .子程序 PL_音乐解析_演示范例, , , 演示范例 ——<br /> .局部变量 匹配数量, 整数型<br /> .局部变量 音乐解析, PL_音乐解析_数据类, , "0"<br /> .局部变量 i, 整数型<br /> <br /> 匹配数量 ＝ PL_音乐解析 (“我已经”, , 音乐解析)<br /> .计次循环首 (匹配数量, i)<br />     调试输出 (i, 音乐解析 <i>.ID, 音乐解析 <i>.作者, 音乐解析 <i>.歌曲名)<br />     调试输出 (“— ” ＋ 音乐解析 <i>.直链)<br /> .计次循环尾 ()<br /> <br /> <br /> .子程序 PL_酷狗_模块类_演示范例, , , 演示范例 ——<br /> .局部变量 酷狗, PL_酷狗_模块类<br /> .局部变量 歌曲列表, PL_酷狗_搜索_数据类, , "0"<br /> .局部变量 解析, PL_酷狗_解析_数据类<br /> .局部变量 解析_数组, PL_酷狗_解析_数据类, , "0"<br /> .局部变量 匹配数量, 整数型<br /> .局部变量 i, 整数型<br /> <br /> ' 方法一：搜索歌曲，取列表、<br /> 匹配数量 ＝ 酷狗.搜索 (“答案”, 歌曲列表, , )<br /> .计次循环首 (匹配数量, i)<br />     调试输出 (i, 歌曲列表 <i>.ID, 歌曲列表 <i>.歌名, 歌曲列表 <i>.地址)<br /> <br />     ' 可继续取歌曲详细、<br />     酷狗.音乐解析 (歌曲列表 <i>.ID, 歌曲列表 <i>.专辑ID, 解析)<br />     调试输出 (“— ” ＋ 酷狗.取_时长 (解析.时长, , ), 解析.直链)<br /> .计次循环尾 ()<br /> <br /> ' 方法二：获取榜单详细、<br /> .计次循环首 (酷狗.获取榜单 (“酷狗TOP500”, 解析_数组, “1”), i)<br />     调试输出 (i, 解析_数组 <i>.ID, 解析_数组 <i>.歌名, 解析_数组 <i>.直链)<br /> .计次循环尾 ()<br /> <br /> <br /> .子程序 PL_蓝奏云_模块类_演示范例<br /> .局部变量 蓝奏云, PL_蓝奏云_模块类<br /> .局部变量 文件采集, PL_蓝奏云_文件采集_数据类, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 url, 文本型<br /> .局部变量 文件, PL_蓝奏云_文件加载_数据类, , "0"<br /> <br /> .计次循环首 (蓝奏云.文件采集 (“https://lanzoux.com/b356974”, 文件采集), i)<br />     调试输出 (i, 文件采集 <i>.文件名, 文件采集 <i>.大小, 文件采集 <i>.时间, 文件采集 <i>.地址)<br /> .计次循环尾 ()<br /> ' ‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘’‘<br /> ' 蓝奏云.登录 (“Ordinary”, “密码”, )<br /> ' url ＝ 蓝奏云.获取首页地址 ()<br /> .' 计次循环首 (蓝奏云.加载_目录 (url, 文件), i)<br />     ' 调试输出 (i, 文件 <i>.id, 文件 <i>.名, 文件 <i>.类型)<br /> .' 计次循环尾 ()<br /> <br /> <br /> .子程序 PL_阿里_Ocr高精版_演示范例<br /> .局部变量 路径, 文本型<br /> .局部变量 url, 文本型<br /> .局部变量 匹配数量, 整数型<br /> .局部变量 Ocr, PL_Ocr_数据类, , "0"<br /> .局部变量 i, 整数型<br /> <br /> 路径 ＝ “C:\Users\Administrator\Downloads\666.jpg”  ' 路径为图片类型、<br /> url ＝ PL_上传图片 (读入文件 (路径))  ' 将图片上传到图床、<br /> 调试输出 (“图床地址：” ＋ url)<br /> 匹配数量 ＝ PL_阿里_Ocr高精版 (url, “7edc5be3895842e09573ac616244cba7”, Ocr)  ' 我的次数用完啦，需要在阿里云购买0元500次、阿里OCR高精版 输入key<br /> .计次循环首 (匹配数量, i)<br />     调试输出 (i, Ocr <i>.识别结果, Ocr <i>.置信度 ＋ “%”)<br /> .计次循环尾 ()<br /> <br /> <br /> .子程序 PL_ico采集_演示范例, , , 可能凉了~<br /> .局部变量 匹配数量, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 地址, 文本型, , "0"<br /> <br /> 匹配数量 ＝ PL_ico采集 (“微信”, 到文本 (i), 地址)<br /> 目录_创建 (目录_取特定目录 () ＋ “ico采集”)<br /> .计次循环首 (匹配数量, i)<br />     调试输出 (“正在写入：桌面\” ＋ “ico采集” ＋ “\svg_” ＋ 到文本 (i) ＋ “_” ＋ 时间_取现行时间戳 () ＋ “.png”)<br />     写到文件 (目录_取特定目录 () ＋ “ico采集” ＋ “\svg_” ＋ 到文本 (i) ＋ “_” ＋ 时间_取现行时间戳 () ＋ “.png”, PL_svg转PNG (地址 <i>))<br /> .计次循环尾 ()<br /> <br /> <br /> .子程序 百度模块类之语音合成与识别_演示范例, , , 可以用、百度AI：<a href="http://ai.baidu.com/" rel="nofollow" rel="nofollow" target="_blank">http://ai.baidu.com/</a><br /> .局部变量 百度, PL_百度_模块类<br /> .局部变量 Access_Token, 文本型<br /> .局部变量 合成音频, 字节集<br /> .局部变量 路径, 文本型<br /> .局部变量 识别结果, 文本型<br /> <br /> Access_Token ＝ 百度.获取Access_Token (“s2UQntTZ0K4T1Q72eY5ASt4R”, “8pSrtf7hjNREDulyyOoaIspRXAff1Gsr”)<br /> 合成音频 ＝ 百度.语音合成 (“面向开发者及企业开放110多项全球领先的AI能力和软硬一体组件，并提供 EasyDL定制化图像识别、对话系统开发平台UNIT、自定义模板OCR等AI定制化平台，为上下游合作伙伴搭建了展示与交易平台-AI市场。百度AI开放平台全力帮助各行业快速、高效地实现AI升级。”, 4, 6, Access_Token)<br /> 路径 ＝ 目录_取特定目录 () ＋ “demo.wav”<br /> 写到文件 (路径, 合成音频)<br /> 调试输出 (“语音已生成：” ＋ 路径)<br /> 执行 (#打开文件, 路径, , , )<br /> <br /> 识别结果 ＝ 百度.语音识别 (读入文件 (路径), , Access_Token)  ' 中英文1536<br /> 调试输出 (“识别结果：” ＋ 识别结果)<br /> <br /> .子程序 PL_影片采集_模块类_演示范例<br /> .局部变量 zuidazy, PL_影片采集_模块类<br /> .局部变量 匹配数量, 整数型<br /> .局部变量 资源列表, PL_影片采集_搜索_数据类, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 解析, PL_影片采集_解析_数据类<br /> .局部变量 j, 整数型<br /> <br /> 匹配数量 ＝ zuidazy.搜索 (“战狼”, 资源列表)<br /> .计次循环首 (匹配数量, i)<br />     调试输出 (资源列表 <i>.首页URL)<br />     zuidazy.解析 (资源列表 <i>.首页URL, 解析)<br />     调试输出 (解析.影片名, 解析.版本, 解析.封面url)<br />     .计次循环首 (解析.影片_数量, j)<br />         .如果真 (寻找文本 (解析.影片 [j].url, “.mp4”, , 假) ≠ -1)<br />             调试输出 (i, 解析.影片 [j].名, 解析.影片 [j].url)<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> .计次循环尾 ()

844798364

#好牛逼的说

对白

谢谢分享学习一下

少年哟

谢谢分享学习一下

队长是我

感谢开源。。。

LG慈悲

支持开源，支持原创！

゛大城小爱

好东西找好久了，谢谢

609140562

可以的拿走用用

yzhj0722

谢谢分享

恋颜

感谢分享，支持开源