.版本 2
.支持庫 exui
.支持庫 EThread
.程序集 窗口程序集_啟動窗口
.程序集變量 標(biāo)清, 文本型
.程序集變量 高清, 文本型
.程序集變量 超清, 文本型
.子程序 _按鈕EX1_左鍵單擊
按鈕EX2.可視EX ＝ 假
按鈕EX3.可視EX ＝ 假
按鈕EX4.可視EX ＝ 假
.判斷開始 (編輯框EX1.內(nèi)容 ＝ “”)
  信息框EX (, “告警 :”, , “先輸入MV地址才能解析的哦”, , { “好嘛” }, , , , , , , )
.默認(rèn)
.判斷結(jié)束
.判斷開始 (尋找文本 (編輯框EX1.內(nèi)容, “http://v.yinyuetai.com/video/”, , 假) ＝ 1)
  啟動線程 (&json獲取真實(shí)地址, , )
.默認(rèn)
  信息框EX (, “告警 :”, , “你輸入的地址不對哦，只能解析音悅臺的MV哦”, , { “好嘛” }, , , , , , , )
.判斷結(jié)束
.子程序 json獲取真實(shí)地址
.局部變量 json, 類_json
.局部變量 ID, 文本型
.局部變量 正則, 正則表達(dá)式類
正則.創(chuàng)建 (“/(\d+)”, 編輯框EX1.內(nèi)容)
ID ＝ 正則.取子匹配文本 (1, 1)
json.解析 (文本_取出中間文本 (編碼_utf8到gb2312 (網(wǎng)頁_訪問S (“http://www.yinyuetai.com/api/info/get-video-urls?callback=callback&videoId=” ＋ ID ＋ “&_=” ＋ 時(shí)間_取現(xiàn)行時(shí)間戳 (), , , , , , )), “callback(”, “)”, , ))
.判斷開始 (json.取通用屬性 (“message”) ≠ “”)
  信息框EX (, “錯誤信息 :”, , “解析失?。　?＋ #換行符 ＋ “失敗原因：” ＋ json.取通用屬性 (“message”), , { “知道了” }, , , , , , , )
  返回 ()
.默認(rèn)
.判斷結(jié)束
標(biāo)清 ＝ json.取通用屬性 (“hcVideoUrl”)
高清 ＝ json.取通用屬性 (“hdVideoUrl”)
超清 ＝ json.取通用屬性 (“heVideoUrl”)
.判斷開始 (標(biāo)清 ≠ “”)
  按鈕EX2.可視EX ＝ 真
.默認(rèn)
.判斷結(jié)束
.判斷開始 (高清 ≠ “”)
  按鈕EX3.可視EX ＝ 真
.默認(rèn)
.判斷結(jié)束
.判斷開始 (超清 ≠ “”)
  按鈕EX4.可視EX ＝ 真
.默認(rèn)
.判斷結(jié)束
.子程序 _按鈕EX2_左鍵單擊
.局部變量 信息框返回, 整數(shù)型
信息框返回 ＝ 信息框EX (, “信息 :”, , “你目前選擇的是標(biāo)清！” ＋ #換行符 ＋ “你要復(fù)制MV真實(shí)地址還是在線播放預(yù)覽呢？”, , { “我要在線播放”, “我要復(fù)制下載地址” }, , , , , , , )
.判斷開始 (信息框返回 ＝ 2)
  置剪輯板文本 (標(biāo)清)
  信息框EX (, “信息 :”, , “復(fù)制成功” ＋ #換行符 ＋ 標(biāo)清, , { “好的” }, , , , , , , )
.判斷 (信息框返回 ＝ 1)
  網(wǎng)頁_打開指定網(wǎng)址 (標(biāo)清)
.默認(rèn)
.判斷結(jié)束
.子程序 _按鈕EX3_左鍵單擊
.局部變量 信息框返回, 整數(shù)型
信息框返回 ＝ 信息框EX (, “信息 :”, , “你目前選擇的是高清！” ＋ #換行符 ＋ “你要復(fù)制MV真實(shí)地址還是在線播放預(yù)覽呢？”, , { “我要在線播放”, “我要復(fù)制下載地址” }, , , , , , , )
.判斷開始 (信息框返回 ＝ 2)
  置剪輯板文本 (高清)
  信息框EX (, “信息 :”, , “復(fù)制成功” ＋ #換行符 ＋ 高清, , { “好的” }, , , , , , , )
.判斷 (信息框返回 ＝ 1)
  網(wǎng)頁_打開指定網(wǎng)址 (高清)
.默認(rèn)
.判斷結(jié)束
.子程序 _按鈕EX4_左鍵單擊
.局部變量 信息框返回, 整數(shù)型
信息框返回 ＝ 信息框EX (, “信息 :”, , “你目前選擇的是超清！” ＋ #換行符 ＋ “你要復(fù)制MV真實(shí)地址還是在線播放預(yù)覽呢？”, , { “我要在線播放”, “我要復(fù)制下載地址” }, , , , , , , )
.判斷開始 (信息框返回 ＝ 2)
  置剪輯板文本 (超清)
  信息框EX (, “信息 :”, , “復(fù)制成功” ＋ #換行符 ＋ 超清, , { “好的” }, , , , , , , )
.判斷 (信息框返回 ＝ 1)
  網(wǎng)頁_打開指定網(wǎng)址 (超清)
.默認(rèn)
.判斷結(jié)束