易语言解析B站直播间的地址获得弹幕内容的代码

常量数据表

.版本 2
.常量 常量1, "<文本长度: 31>", , <span class="info-text" title="
.常量 常量2, "<文本长度: 2>", , ">
.常量 常量3, "<文本长度: 19>", , http://i0.hdslb.com.常量 常量4, "<文本长度: 4>", , .jpg

自定义数据类型表

.版本 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, “弹幕助手”)

运行结果:

总结

以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对我们的支持。如果你想了解更多相关内容请查看下面相关链接

(0)

相关推荐

  • 易语言做弹幕效果的方法总结

    下面就是小编带给大家的易语言怎么做弹幕效果方法操作,希望能够给你们带来一定的帮助,谢谢大家的观看. 1.只是没有那些弹幕网站做的那么好,可以用时钟+进度条+动画框+动画物体(标签也可以,只要有文字的都可以)实现,利用判断. 2.比如:进度条1.位置=进度条1.位置+1,如果真(进度条1.位置=10),标签1.左边=标签1.左边-1,具体的可以自己实践思考,我也没做过易语言弹幕,但是这样也是可以实现的. 3.实现的效果大概是这样,每发送一条弹幕,会从容器的右边向左边移动,移动速度在一定范围内随机,

  • 易语言解析B站直播间的地址获得弹幕内容的代码

    常量数据表 .版本 2 .常量 常量1, "<文本长度: 31>", , <span class="info-text" title=" .常量 常量2, "<文本长度: 2>", , "> .常量 常量3, "<文本长度: 19>", , http://i0.hdslb.com.常量 常量4, "<文本长度: 4>", , .

  • 详解易语言解析本地域名

    说明: 什么是易语言解析域名解析,就是把本地电脑解析域名做成快捷的方式,非专业人员也可以进行本机电脑的预计解析.如:本地IP地址为127.0.0.1的地址.如果你在本地搭建了一个网站,端口为:80.就只能是127.0.0.1的访问方式.如果遇到网站调用了远程图片是防盗链的地址,那就更恼火的,一张张未知的防盗链图片,看着也不是那个的舒服. 如果你看到这里说自己不会易语言怎么办?没问题!本网站已经提供了现成的软件给大家使用,点击这里下载:解析任意域名工具 ,由于是易语言程序所以360或电脑管家或百度

  • 易语言解析获得无水印下载地址的代码

    此功能需要加载精易模块5.6 常量数据表 .版本 2 .常量 head, "<文本长度: 52>", , 'User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64 取抖音无水印链接代码 .版本 2 .程序集 窗口程序集_启动窗口 .子程序 _解析按钮_被单击 无水印地址编辑框.内容 = 获取抖音链接 (原地址编辑框.内容) .子程序 获取抖音链接, 文本型, , 返回无水印链接 .参数 分享链接, 文本型, , 分享链接地址

  • 易语言解析淘宝客短链接转换成商品真实链接的代码

    淘宝客短链接转换成商品地址的代码 此功能需要加载精易模块5.6 .版本 2 .支持库 EThread .程序集 窗口程序集_启动窗口 .子程序 test 商品地址编辑框.内容 = GetRealUrl (短链接编辑框.内容) .子程序 GetRealUrl, 文本型 .参数 shortUrl, 文本型 .局部变量 rurl, 文本型 .局部变量 referer, 文本型 .局部变量 laststr, 文本型 httpGet (shortUrl, , rurl) httpGet (rurl, ,

  • vue实现直播间点赞飘心效果的示例代码

    前言: 在开发公司项目的时候,遇到了直播间的一些功能,其中点赞冒泡飘心,就折腾了好久,canvas学的不好,自己写不来,百度找了一堆都是js原生写法,迁移到vue项目里来好多问题,百度也解决不了.自己试着慢慢解决,竟然在不知不觉中通了!废话不多说,直接上代码,复制粘贴即可使用 示例: 不动就不动吧.png ```第一步```:先在外部新建一个js文件,取名index.js(名字自己随便取) index.js代码内容如下: /** * LikeHeart * @version: 1.0.0 * @

  • 易语言解析音悦台MV提供超清下载地址的代码

    音悦台MV地址解析 此功能需要加载精易模块5.6 .版本 2 .支持库 exui .支持库 EThread .程序集 窗口程序集_启动窗口 .程序集变量 标清, 文本型 .程序集变量 高清, 文本型 .程序集变量 超清, 文本型 .子程序 _按钮EX1_左键单击 按钮EX2.可视EX = 假 按钮EX3.可视EX = 假 按钮EX4.可视EX = 假 .判断开始 (编辑框EX1.内容 = "") 信息框EX (, "告警 :", , "先输入MV地址才能解

  • 易语言用夜神模拟器实现抖音自动点赞和评论的代码

    用夜神模拟器实现抖音自动点赞和评论的代码 实现此功能需要加载精易模块5.6和大漠中文类模块 分辨率设置800x600,窗口大小设置固定. .版本 2 .支持库 iext .支持库 iext2 .程序集 窗口程序集_启动窗口 .程序集变量 集_大漠, 大漠中文类 .程序集变量 集_句柄, 整数型 .程序集变量 集_评论内容, 文本型 .程序集变量 集_分割文本, 文本型, , "0" .子程序 __启动窗口_创建完毕 集_大漠.初始_创建_破解 () 置随机数种子 () .子程序 功能_

  • 易语言利用鼠标模拟点击的方式实现自动画图的代码

    DLL命令表 .版本 2 .DLL命令 PostMessageA, 整数型, "user32.dll", "PostMessageA", , 如果函数调用成功,返回非零值:如果函数调用失败,返回值是零 .参数 hWnd, 整数型, , 其窗口程序接收消息的窗口的句柄 .参数 Msg, 整数型, , 指定被寄送的消息 .参数 wParam, 整数型, , 指定附加的消息特定的信息 .参数 IParam, 整数型, , 指定附加的消息特定的信息 自动绘画的代码 此功能需

  • 易语言破解WPS的VIP模版下载地址

    DLL命令表 .版本 2 .DLL命令 API下载文件, 整数型, "urlmon", "URLDownloadToFileA", , -下载文件 .参数 pcaller, 整数型 .参数 szurl, 文本型 .参数 szfilename, 文本型 .参数 dwreserved, 整数型 .参数 lpfncb, 整数型 常量数据表 .版本 2 .常量 id, "<文本长度: 21>", , "big":[{&qu

  • 易语言通过百度ocr接口识别图片记录微信转账金额的代码

    封包编码 .版本 2 .程序集 程序集1 .子程序 取内容, 文本型 .参数 封包, 文本型 .局部变量 a, 整数型 .局部变量 b, 整数型 .局部变量 ls, 文本型 .如果真 (寻找文本 (封包, "[]", , 假) ≠ -1 或 寻找文本 (封包, "head", , 假) ≠ -1 或 封包 = "") 输出调试文本 (封包) 返回 ("") .如果真结束 a = 寻找文本 (封包, "[",

随机推荐