.版本 2
.常量 常量2, "<文本長(zhǎng)度: 7>", , "url":"
.常量 常量1, "<文本長(zhǎng)度: 1>", , "

.版本 2
.支持庫(kù) internet
.程序集 窗口程序集1
.子程序 _解析按鈕_被單擊
編輯框_直鏈.內(nèi)容 ＝ 獲取MP3地址 (編輯框_哈希值.內(nèi)容)
.子程序 獲取MP3地址, 文本型
.參數(shù) hash, 文本型
.局部變量 key, 文本型
.局部變量 res, 文本型
res ＝ 到文本 (HTTP讀文件 (“http://m.kugou.com/app/i/getSongInfo.php?hash=” ＋ hash ＋ “&cmd=playInfo”))
res ＝ 子文本替換 (文本_取出中間文本 (res, #常量2, #常量1), “\”, “”, , , 真)
返回 (res)
.子程序 文本_取出中間文本, 文本型, 公開(kāi), 比如：欲取全文本為“12345”,現(xiàn)在要取出“3”，<3>的前面為“2”，<3>的后面為“4”。
.參數(shù) 欲取全文本, 文本型, , 比如：欲取全文本為 12345
.參數(shù) 前面文本, 文本型, , 3的前面為“2”，引號(hào)直接用 #引號(hào)，如："<font color=#引號(hào)red#引號(hào)>"
.參數(shù) 后面文本, 文本型, , 3的后面為“4”，引號(hào)直接用 #引號(hào)，如："<font color=#引號(hào)red#引號(hào)>"
.參數(shù) 起始搜尋位置, 整數(shù)型, 可空, 可空。1為首位置，2為第2個(gè)位置，如此類(lèi)推，如果被省略，則“尋找字節(jié)集”命令默認(rèn)從首部開(kāi)始，“倒找字節(jié)集”命令默認(rèn)從尾部開(kāi)始。
.參數(shù) 是否區(qū)分大小寫(xiě), 邏輯型, 可空, 可空。初始值為“假”。假 = 不區(qū)分  真 = 區(qū)分大小寫(xiě)。
.局部變量 局_位置, 整數(shù)型
.局部變量 局_位置1, 整數(shù)型
.局部變量 局_前面文本, 文本型
.局部變量 局_后面文本, 文本型
局_前面文本 ＝ 子文本替換 (前面文本, “#引號(hào)”, #引號(hào), , , 真)
局_后面文本 ＝ 子文本替換 (后面文本, “#引號(hào)”, #引號(hào), , , 真)
是否區(qū)分大小寫(xiě) ＝ 取反 (是否區(qū)分大小寫(xiě))
局_位置 ＝ 尋找文本 (欲取全文本, 局_前面文本, 起始搜尋位置, 是否區(qū)分大小寫(xiě))
.如果真 (局_位置 ≠ -1)
  局_位置 ＝ 局_位置 ＋ 取文本長(zhǎng)度 (局_前面文本)
.如果真結(jié)束
局_位置1 ＝ 尋找文本 (欲取全文本, 局_后面文本, 局_位置, 是否區(qū)分大小寫(xiě))
.如果真 (局_位置 ＝ -1 或 局_位置1 ＝ -1)
  返回 (“”)
.如果真結(jié)束
返回 (取文本中間 (欲取全文本, 局_位置, 局_位置1 － 局_位置))