免费音乐下载器2.0

wh78845069

八千里路 发表于 2023-4-10 12:29
好用
html易语言被你玩的明明白白

有新版啦  快拿去试试  帮我看看为啥不能编译

wh78845069

kyo9766 发表于 2023-4-10 13:36
学习一下怎么调用，感谢分享
---

我试了下  咋还是不行

wh78845069

kyo9766 发表于 2023-4-10 13:36
学习一下怎么调用，感谢分享
---

大神看一下我的2.0版本  我刚才试着编译了一下，为啥不能编译呀。。。。报错。但是调试好用。受累您给瞅瞅

吃干饭的锅

支持 感谢分享

亿万

支持开源~！感谢分享

jysoft2022

感谢分享，很给力

kyo9766

学习一下怎么调用，感谢分享
---

反馈下问题，个别关键词，结果缺少   '  ，导致html格式错误





可以将 搜索歌曲 中的代码  改为这样解决

  

子程序名	返回值类型	公开	备 注
搜索歌曲	文本型
参数名	类 型	参考	可空	数组	备 注
歌曲名	文本型

变量名	类 型	静态	数组	备 注
正则	正则表达式类
匹配数	整数型
计次	整数型
数据源	文本型
临时数组	文本型		10
歌曲信息	文本型
返回文本	文本型

' url: 'get_music.php?key=x8hB3la3I/r+NN42EPDcaZe5yaVYTm4aYL3FRVXum1Za9BsGbmRM5+Ie7KQk8cs0IBqcNXg+Lg',
' [url]https://www.hifini.com/[/url]
' [url]https://www.hifini.com/get_music.php?key=x8hB3la3I/r+NN42EPDcaZe5yaVYTm4aYL3FRVXum1Za9BsGbmRM5+Ie7KQk8cs0IBqcNXg+Lg[/url]
数据源 ＝ 到文本 (编码_Utf8到Ansi (网页_访问 (“https://www.hifini.com/search-” ＋ 编码_URL编码 (歌曲名, 真, 真) ＋ “.htm”, 0, , , , , , , , , )))
正则.创建 (“\(.[^\<]*)?\”, 数据源, 假, 假, 真, 真)
匹配数 ＝ 正则.取匹配数量 ()
返回文本 ＝ “”
计次循环首 (匹配数, 计次)
' 输出调试文本 (“匹配文本 ” ＋ 到文本 (计次) ＋ “ ：” ＋ 正则.取匹配文本 (计次, ))
' 输出调试文本 (“匹配文本 ” ＋ 到文本 (局_计次) ＋ “ 中的子匹配文本 1：” ＋ 局_正则.取子匹配文本 (计次, 1, ))
如果真 (计次 ≤ 匹配数 － 2)
数据源 ＝ 到文本 (编码_Utf8到Ansi (网页_访问 (“https://www.hifini.com/” ＋ 正则.取子匹配文本 (计次, 1, ), 0, , , , , , , , , )))
' 输出调试文本 (数据源)
如果真 (寻找文本 (数据源, “url: 'get_music.php?key=”, , 假) ＞ 0)
临时数组 ＝ 分割文本 (数据源, “music: [”, )
临时数组 ＝ 分割文本 (临时数组 [2], “]”, )
歌曲信息 ＝ 临时数组 [1]
返回文本 ＝ 返回文本 ＋ #换行符 ＋ “ {” ＋ #换行符
临时数组 ＝ 分割文本 (歌曲信息, “title:”, )
临时数组 ＝ 分割文本 (临时数组 [2], “,”, )
返回文本 ＝ 返回文本 ＋ “  title :'” ＋ 子文本替换 (临时数组 [1], “'”, “”, , , 真) ＋ “',” ＋ #换行符
' 返回文本 ＝ 返回文本 ＋ “  title :” ＋ 临时数组 [1] ＋ “,” ＋ #换行符
临时数组 ＝ 分割文本 (歌曲信息, “author:”, )
临时数组 ＝ 分割文本 (临时数组 [2], “,”, )
返回文本 ＝ 返回文本 ＋ “  singer :'” ＋ 子文本替换 (临时数组 [1], “'”, “”, , , 真) ＋ “',” ＋ #换行符
临时数组 ＝ 分割文本 (歌曲信息, “pic: '”, )
临时数组 ＝ 分割文本 (临时数组 [2], “'”, )
返回文本 ＝ 返回文本 ＋ “  cover  :'” ＋ 子文本替换 (临时数组 [1], “'”, “”, , , 真) ＋ “',” ＋ #换行符
临时数组 ＝ 分割文本 (歌曲信息, “url: 'get_music.php?key=”, )
临时数组 ＝ 分割文本 (临时数组 [2], “,”, )
返回文本 ＝ 返回文本 ＋ “  src    : 'https://www.hifini.com/get_music.php?key=” ＋ 子文本替换 (临时数组 [1], “'”, “”, , , 真) ＋ “'” ＋ #换行符
如果 (计次 ＜ 匹配数 － 2)
返回文本 ＝ 返回文本 ＋ “ },” ＋ #换行符
返回文本 ＝ 返回文本 ＋ “ }” ＋ #换行符


调试输出 (临时数组 [1])

计次循环尾 ()
返回 (返回文本)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 搜索歌曲, 文本型<br /> .参数 歌曲名, 文本型<br /> .局部变量 正则, 正则表达式类<br /> .局部变量 匹配数, 整数型<br /> .局部变量 计次, 整数型<br /> .局部变量 数据源, 文本型<br /> .局部变量 临时数组, 文本型, , "10"<br /> .局部变量 歌曲信息, 文本型<br /> .局部变量 返回文本, 文本型<br /> <br /> ' url: 'get_music.php?key=x8hB3la3I/r+NN42EPDcaZe5yaVYTm4aYL3FRVXum1Za9BsGbmRM5+Ie7KQk8cs0IBqcNXg+Lg',<br /> ' <a href="https://www.hifini.com/" rel="nofollow" rel="nofollow" rel="nofollow" target="_blank">https://www.hifini.com/</a><br /> ' <a href="https://www.hifini.com/get_music.php?key=x8hB3la3I/r+NN42EPDcaZe5yaVYTm4aYL3FRVXum1Za9BsGbmRM5+Ie7KQk8cs0IBqcNXg+Lg" rel="nofollow" target="_blank">https://www.hifini.com/get_music ... e7KQk8cs0IBqcNXg+Lg</a><br /> 数据源 ＝ 到文本 (编码_Utf8到Ansi (网页_访问 (“<a href="https://www.hifini.com/search-" rel="nofollow" rel="nofollow" target="_blank">https://www.hifini.com/search-</a>” ＋ 编码_URL编码 (歌曲名, 真, 真) ＋ “.htm”, 0, , , , , , , , , )))<br /> 正则.创建 (“\<a href="https://bbs.125.la/" *=" target="_blank">(.[^\<]*)?\</a>”, 数据源, 假, 假, 真, 真)<br /> 匹配数 ＝ 正则.取匹配数量 ()<br /> <br /> 返回文本 ＝ “”<br /> .计次循环首 (匹配数, 计次)<br />     ' 输出调试文本 (“匹配文本 ” ＋ 到文本 (计次) ＋ “ ：” ＋ 正则.取匹配文本 (计次, ))<br />     ' 输出调试文本 (“匹配文本 ” ＋ 到文本 (局_计次) ＋ “ 中的子匹配文本 1：” ＋ 局_正则.取子匹配文本 (计次, 1, ))<br />     .如果真 (计次 ≤ 匹配数 － 2)<br />         数据源 ＝ 到文本 (编码_Utf8到Ansi (网页_访问 (“<a href="https://www.hifini.com/" rel="nofollow" rel="nofollow" rel="nofollow" target="_blank">https://www.hifini.com/</a>” ＋ 正则.取子匹配文本 (计次, 1, ), 0, , , , , , , , , )))<br />         ' 输出调试文本 (数据源)<br /> <br />         .如果真 (寻找文本 (数据源, “url: 'get_music.php?key=”, , 假) ＞ 0)<br /> <br />             临时数组 ＝ 分割文本 (数据源, “music: [”, )<br />             临时数组 ＝ 分割文本 (临时数组 [2], “]”, )<br />             歌曲信息 ＝ 临时数组 [1]<br />             返回文本 ＝ 返回文本 ＋ #换行符 ＋ “ {” ＋ #换行符<br /> <br />             临时数组 ＝ 分割文本 (歌曲信息, “title:”, )<br />             临时数组 ＝ 分割文本 (临时数组 [2], “,”, )<br />             返回文本 ＝ 返回文本 ＋ “  title :'” ＋ 子文本替换 (临时数组 [1], “'”, “”, , , 真) ＋ “',” ＋ #换行符<br />             ' 返回文本 ＝ 返回文本 ＋ “  title :” ＋ 临时数组 [1] ＋ “,” ＋ #换行符<br /> <br />             临时数组 ＝ 分割文本 (歌曲信息, “author:”, )<br />             临时数组 ＝ 分割文本 (临时数组 [2], “,”, )<br />             返回文本 ＝ 返回文本 ＋ “  singer :'” ＋ 子文本替换 (临时数组 [1], “'”, “”, , , 真) ＋ “',” ＋ #换行符<br /> <br />             临时数组 ＝ 分割文本 (歌曲信息, “pic: '”, )<br />             临时数组 ＝ 分割文本 (临时数组 [2], “'”, )<br />             返回文本 ＝ 返回文本 ＋ “  cover  :'” ＋ 子文本替换 (临时数组 [1], “'”, “”, , , 真) ＋ “',” ＋ #换行符<br /> <br />             临时数组 ＝ 分割文本 (歌曲信息, “url: 'get_music.php?key=”, )<br />             临时数组 ＝ 分割文本 (临时数组 [2], “,”, )<br />             返回文本 ＝ 返回文本 ＋ “  src    : 'https://www.hifini.com/get_music.php?key=” ＋ 子文本替换 (临时数组 [1], “'”, “”, , , 真) ＋ “'” ＋ #换行符<br /> <br />             .如果 (计次 ＜ 匹配数 － 2)<br />                 返回文本 ＝ 返回文本 ＋ “ },” ＋ #换行符<br />             .否则<br />                 返回文本 ＝ 返回文本 ＋ “ }” ＋ #换行符<br />             .如果结束<br /> <br />         .如果真结束<br /> <br /> <br />         调试输出 (临时数组 [1])<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 返回 (返回文本)

pipicool

学习一下

八千里路

好用
html易语言被你玩的明明白白

sunfly

此刻产生了一个白飘在线听歌的想法？