易語言通過解析破解艾奇學(xué)院的收費(fèi)視頻的代碼

更新時間：2018年11月27日 08:32:36 作者：易語言源碼貝貝吧

今天小編就為大家分享一篇關(guān)于易語言通過解析破解艾奇學(xué)院的收費(fèi)視頻的代碼，小編覺得內(nèi)容挺不錯的，現(xiàn)在分享給大家，具有很好的參考價值，需要的朋友一起跟隨小編來看看吧

常量數(shù)據(jù)表

.版本 2
.常量 常量1, "<文本長度: 51>", , href="/home.php?m=Order&a=subCourseConfirm&id=.*?" rel="external nofollow"

艾奇學(xué)院收費(fèi)視頻破解的代碼

此功能需要加載精易模塊5.6

.版本 2
.支持庫 iext
.支持庫 HtmlView
.支持庫 eAPI
.程序集 窗口程序集_啟動窗口
.程序集變量 vid, 文本型
.程序集變量 章節(jié), 整數(shù)型
.子程序 _獲取按鈕_被單擊
.局部變量 網(wǎng)頁源碼, 文本型
.局部變量 code, 文本型
.局部變量 課程id, 文本型
.局部變量 ID正則, 正則表達(dá)式類
.局部變量 i, 整數(shù)型
.局部變量 表項(xiàng), 整數(shù)型
課程id ＝ 文本_取出中間文本 (課程地址編輯框.內(nèi)容, “http://www.27sem.com/course/details/”, “.html”, )
網(wǎng)頁源碼 ＝ 編碼_utf8到gb2312 (到文本 (網(wǎng)頁_訪問 (“http://www.27sem.com/home.php?m=Course&a=details&id=” ＋ 課程id ＋ “&p=” ＋ 頁數(shù)編輯框.內(nèi)容)))
ID正則.創(chuàng)建 (“a=subCourseConfirm&id=(.+?)” ＋ #引號, 網(wǎng)頁源碼, , , , )
選擇列表框1.清空 ()
.計(jì)次循環(huán)首 (ID正則.取匹配數(shù)量 (), i)
  選擇列表框1.加入項(xiàng)目 (ID正則.取子匹配文本 (i, 1, ), )
.計(jì)次循環(huán)尾 ()
選擇列表框1.現(xiàn)行選中項(xiàng) ＝ 0
獲取vid ()
.子程序 課程信息
.局部變量 地址源碼, 文本型
.局部變量 JSON1, 類_json
.局部變量 mp4, 文本型
.局部變量 videolink, 文本型
.局部變量 packageUrl, 文本型
.局部變量 title, 文本型
.局部變量 swf, 文本型
地址源碼 ＝ 編碼_utf8到gb2312 (到文本 (網(wǎng)頁_訪問 (“http://player.polyv.net/videojson/” ＋ vid ＋ “.js”)))
JSON1.解析 (地址源碼)
title ＝ JSON1.取通用屬性 (“title”)
透明標(biāo)簽1.標(biāo)題 ＝ title
videolink ＝ JSON1.取通用屬性 (“videolink”)
packageUrl ＝ JSON1.取通用屬性 (“packageUrl”)
mp4 ＝ JSON1.取通用屬性 (“mp4”)
swf ＝ JSON1.取通用屬性 (“swf_link”)
m3u8編輯框.內(nèi)容 ＝ videolink
mp4編輯框.內(nèi)容 ＝ mp4
下載地址編輯框.內(nèi)容 ＝ packageUrl
瀏覽器播放編輯框.內(nèi)容 ＝ “http://player.polyv.net/videos/player.swf?id=” ＋ vid ＋ “&code=GXj6zdgoRp1NimVFviFLgP8&watchEndTime=1115&autoplay=true&setScreen=16_9&watchStartTime=63.00&ban_history_time=on&vid=” ＋ vid ＋ “&start=-1&end=-1&”
.子程序 _m3u8按鈕_被單擊
超文本瀏覽框1.地址 ＝ “http://www.654320.com/ckplayer/ckplayer.swf?f=m3u8.swf&s=3&a=” ＋ m3u8編輯框.內(nèi)容
.子程序 _mp4按鈕_被單擊
超文本瀏覽框1.地址 ＝ “http://www.654320.com/ckplayer/ckplayer.swf?f=” ＋ mp4編輯框.內(nèi)容
.子程序 _視頻下載按鈕_被單擊
打開指定網(wǎng)址 (下載地址編輯框.內(nèi)容)
.子程序 _打開按鈕_被單擊
打開指定網(wǎng)址 (瀏覽器播放編輯框.內(nèi)容)
.子程序 __啟動窗口_創(chuàng)建完畢
.子程序 獲取vid
.局部變量 ID, 文本型
.局部變量 數(shù)據(jù)源, 文本型
.局部變量 JSON, 類_json
ID ＝ 選擇列表框1.取項(xiàng)目文本 (選擇列表框1.現(xiàn)行選中項(xiàng))
數(shù)據(jù)源 ＝ 編碼_utf8到gb2312 (到文本 (網(wǎng)頁_訪問 (“http://www.27sem.com/home.php?m=Course&a=getCoursePlaying”, 1, “id=” ＋ ID ＋ “&code=GXj6zdgoRp1NimVFviFLgP8”, )))
JSON.解析 (數(shù)據(jù)源)
vid ＝ JSON.取通用屬性 (“polyv_vid”)
課程信息 ()
.子程序 _選擇列表框1_列表項(xiàng)被選擇
獲取vid ()

運(yùn)行結(jié)果：