常量數據表
.版本 2
.常量 常量1, "<文本長度: 31>", , <span class="info-text" style="margin: 0px; padding: 0px; outline: none; line-height: 25.2px; font-size: 14px; width: 660px; overflow: hidden; clear: both; font-family: tahoma, arial, "Microsoft YaHei";">
.版本 2.數據類型 data .成員 uid, 文本型 .成員 name, 文本型 .成員 text, 文本型
B站直播間彈幕獲取的代碼
此功能需要加載精易模塊5.6
.版本 2.支持庫 internet.程序集 窗口程序集_啟動窗口.程序集變量 result1, 文本型.程序集變量 result2, 文本型.程序集變量 data, data.程序集變量 a, 整數型.程序集變量 計次, 整數型.子程序 __啟動窗口_創建完畢a = 1.子程序 _時鐘1_周期事件.局部變量 地址, 文本型.局部變量 主播名字, 文本型.局部變量 主播頭像, 文本型result1 = 編碼_usc2到ansi (到文本 (網頁_訪問 (“http://api.live.bilibili.com/ajax/msg”, 1, “roomid=” + 直播間代碼編輯框.內容))) ' 23058=直播間roomid.如果真 (result2 ≠ result1) result2 = result1 .如果真 (a = 1) a = 2 返回 () .如果真結束 result1 = 文本_取出中間文本 (result1, “text” + #引號 + “:” + #引號, #引號 + “admin” + #引號 + “:[]}}”) 計次 = 文本_取出現次數 (result1, “text” + #引號 + “:” + #引號) .計次循環首 (計次, ) result1 = 文本_取出中間文本 (result1 + #引號 + “admin” + #引號 + “:[]}}”, “text” + #引號 + “:” + #引號, #引號 + “admin” + #引號 + “:[]}}”) result1 = “text” + #引號 + “:” + result1 .計次循環尾 () data.uid = 文本_取出中間文本 (result1, “uid” + #引號 + “:”, “,” + #引號) data.name = 文本_取出中間文本 (result1, “nickname” + #引號 + “:” + #引號, #引號 + “,” + #引號) data.text = 文本_取出中間文本 (result1, “text” + #引號 + “:”, #引號 + “,” + #引號) 彈幕編輯框.內容 = 彈幕編輯框.內容 + data.name + “ : ” + data.text + #換行符 地址 = 編碼_utf8到gb2312 (到文本 (HTTP讀文件 (“http://live.bilibili.com/” + 直播間代碼編輯框.內容))) 主播名字 = 文本_取出中間文本 (地址, #常量1, #常量2) 主播頭像 = 文本_取出中間文本 (地址, #常量3, #常量4) 標簽1.標題 = “主播:” + 主播名字 頭像圖片框.圖片 = HTTP讀文件 (#常量3 + 主播頭像 + “.jpg”) ' 當前獲取為不穩定的,有可能在其他直播無法獲取到頭像~ _啟動窗口.標題 = “當前您正在觀看” + 主播名字 + “的直播間彈幕---彈幕助手”.如果真結束.子程序 _綁定按鈕_被單擊直播間代碼編輯框.禁止 = 真信息框 (“已綁定成功√”, 0, “彈幕助手”).子程序 _解除綁定按鈕_被單擊直播間代碼編輯框.禁止 = 假信息框 (“已解除當前綁定√”, 0, “彈幕助手”)
運行結果:
總結
以上就是這篇文章的全部內容了,希望本文的內容對大家的學習或者工作具有一定的參考學習價值,謝謝大家對VeVb武林網的支持。
新聞熱點
疑難解答