音悅臺MV地址解析
此功能需要加載精易模塊5.6
.版本 2.支持庫 exui.支持庫 EThread.程序集 窗口程序集_啟動窗口.程序集變量 標清, 文本型.程序集變量 高清, 文本型.程序集變量 超清, 文本型.子程序 _按鈕EX1_左鍵單擊按鈕EX2.可視EX = 假按鈕EX3.可視EX = 假按鈕EX4.可視EX = 假.判斷開始 (編輯框EX1.內容 = “”) 信息框EX (, “告警 :”, , “先輸入MV地址才能解析的哦”, , { “好嘛” }, , , , , , , ).默認.判斷結束.判斷開始 (尋找文本 (編輯框EX1.內容, “http://v.yinyuetai.com/video/”, , 假) = 1) 啟動線程 (&json獲取真實地址, , ).默認 信息框EX (, “告警 :”, , “你輸入的地址不對哦,只能解析音悅臺的MV哦”, , { “好嘛” }, , , , , , , ).判斷結束.子程序 json獲取真實地址.局部變量 json, 類_json.局部變量 ID, 文本型.局部變量 正則, 正則表達式類正則.創建 (“/(/d+)”, 編輯框EX1.內容)ID = 正則.取子匹配文本 (1, 1)json.解析 (文本_取出中間文本 (編碼_utf8到gb2312 (網頁_訪問S (“http://www.yinyuetai.com/api/info/get-video-urls?callback=callback&videoId=” + ID + “&_=” + 時間_取現行時間戳 (), , , , , , )), “callback(”, “)”, , )).判斷開始 (json.取通用屬性 (“message”) ≠ “”) 信息框EX (, “錯誤信息 :”, , “解析失敗!” + #換行符 + “失敗原因:” + json.取通用屬性 (“message”), , { “知道了” }, , , , , , , ) 返回 ().默認.判斷結束標清 = json.取通用屬性 (“hcVideoUrl”)高清 = json.取通用屬性 (“hdVideoUrl”)超清 = json.取通用屬性 (“heVideoUrl”).判斷開始 (標清 ≠ “”) 按鈕EX2.可視EX = 真.默認.判斷結束.判斷開始 (高清 ≠ “”) 按鈕EX3.可視EX = 真.默認.判斷結束.判斷開始 (超清 ≠ “”) 按鈕EX4.可視EX = 真.默認.判斷結束.子程序 _按鈕EX2_左鍵單擊.局部變量 信息框返回, 整數型信息框返回 = 信息框EX (, “信息 :”, , “你目前選擇的是標清!” + #換行符 + “你要復制MV真實地址還是在線播放預覽呢?”, , { “我要在線播放”, “我要復制下載地址” }, , , , , , , ).判斷開始 (信息框返回 = 2) 置剪輯板文本 (標清) 信息框EX (, “信息 :”, , “復制成功” + #換行符 + 標清, , { “好的” }, , , , , , , ).判斷 (信息框返回 = 1) 網頁_打開指定網址 (標清).默認.判斷結束.子程序 _按鈕EX3_左鍵單擊.局部變量 信息框返回, 整數型信息框返回 = 信息框EX (, “信息 :”, , “你目前選擇的是高清!” + #換行符 + “你要復制MV真實地址還是在線播放預覽呢?”, , { “我要在線播放”, “我要復制下載地址” }, , , , , , , ).判斷開始 (信息框返回 = 2) 置剪輯板文本 (高清) 信息框EX (, “信息 :”, , “復制成功” + #換行符 + 高清, , { “好的” }, , , , , , , ).判斷 (信息框返回 = 1) 網頁_打開指定網址 (高清).默認.判斷結束.子程序 _按鈕EX4_左鍵單擊.局部變量 信息框返回, 整數型信息框返回 = 信息框EX (, “信息 :”, , “你目前選擇的是超清!” + #換行符 + “你要復制MV真實地址還是在線播放預覽呢?”, , { “我要在線播放”, “我要復制下載地址” }, , , , , , , ).判斷開始 (信息框返回 = 2) 置剪輯板文本 (超清) 信息框EX (, “信息 :”, , “復制成功” + #換行符 + 超清, , { “好的” }, , , , , , , ).判斷 (信息框返回 = 1) 網頁_打開指定網址 (超清).默認.判斷結束
運行結果:
總結
以上就是這篇文章的全部內容了,希望本文的內容對大家的學習或者工作具有一定的參考學習價值,謝謝大家對VeVb武林網的支持。
新聞熱點
疑難解答