易语言制作酷狗付费音乐解析下载工具

作者: tm别叫我神经病分明是精神病好么
来源: 51数据库
2020-08-10

今天小编就为大家分享一篇关于易语言制作酷狗付费音乐解析下载工具，小编觉得内容挺不错的，现在分享给大家，具有很好的参考价值，需要的朋友一起跟随小编来看看吧

常量数据表

.版本 2
.常量 常量2, "<文本长度: 7>", , "url":"
.常量 常量1, "<文本长度: 1>", , "

酷狗音乐直链解析

歌曲哈希值在酷狗音乐属性里可以找到。

.版本 2
.支持库 internet
.程序集 窗口程序集1
.子程序 _解析按钮_被单击
编辑框_直链.内容 ＝ 获取MP3地址 (编辑框_哈希值.内容)
.子程序 获取MP3地址, 文本型
.参数 hash, 文本型
.局部变量 key, 文本型
.局部变量 res, 文本型
res ＝ 到文本 (HTTP读文件 (“http://m.kugou.com/app/i/getSongInfo.php?hash=” ＋ hash ＋ “&cmd=playInfo”))
res ＝ 子文本替换 (文本_取出中间文本 (res, #常量2, #常量1), “\”, “”, , , 真)
返回 (res)
.子程序 文本_取出中间文本, 文本型, 公开, 比如：欲取全文本为“12345”,现在要取出“3”，<3>的前面为“2”，<3>的后面为“4”。
.参数 欲取全文本, 文本型, , 比如：欲取全文本为 12345
.参数 前面文本, 文本型, , 3的前面为“2”，引号直接用 #引号，如："<font color=#引号red#引号>"
.参数 后面文本, 文本型, , 3的后面为“4”，引号直接用 #引号，如："<font color=#引号red#引号>"
.参数 起始搜寻位置, 整数型, 可空, 可空。1为首位置，2为第2个位置，如此类推，如果被省略，则“寻找字节集”命令默认从首部开始，“倒找字节集”命令默认从尾部开始。
.参数 是否区分大小写, 逻辑型, 可空, 可空。初始值为“假”。假 = 不区分  真 = 区分大小写。
.局部变量 局_位置, 整数型
.局部变量 局_位置1, 整数型
.局部变量 局_前面文本, 文本型
.局部变量 局_后面文本, 文本型
局_前面文本 ＝ 子文本替换 (前面文本, “#引号”, #引号, , , 真)
局_后面文本 ＝ 子文本替换 (后面文本, “#引号”, #引号, , , 真)
是否区分大小写 ＝ 取反 (是否区分大小写)
局_位置 ＝ 寻找文本 (欲取全文本, 局_前面文本, 起始搜寻位置, 是否区分大小写)
.如果真 (局_位置 ≠ -1)
  局_位置 ＝ 局_位置 ＋ 取文本长度 (局_前面文本)
.如果真结束
局_位置1 ＝ 寻找文本 (欲取全文本, 局_后面文本, 局_位置, 是否区分大小写)
.如果真 (局_位置 ＝ -1 或 局_位置1 ＝ -1)
  返回 (“”)
.如果真结束
返回 (取文本中间 (欲取全文本, 局_位置, 局_位置1 － 局_位置))

运行结果：

总结

以上就是这篇文章的全部内容了，希望本文的内容对大家的学习或者工作具有一定的参考学习价值，如果你想了解更多相关内容请查看下面相关链接