斗鱼弹幕获取源码

斗鱼弹幕获取源码

.版本 2
.支持库 e2ee
.支持库 spec

.程序集 WS_弹幕
.程序集变量 WS_弹幕, WebSocket客户端
.程序集变量 登录数据, 文本型
.程序集变量 房间号, 文本型
.程序集变量 次数, 整数型

.子程序 WS_弹幕_初始化
.参数 传入房间号, 文本型, 可空
.局部变量 错误原因, 文本型

房间号 ＝ 传入房间号
登录数据 ＝ WS_登录_初始化 (房间号)
.如果 (登录数据 ≠ “”)
    WS_弹幕.初始化 (&WS_弹幕_收到消息, &WS_弹幕_连接成功, , &WS_弹幕_断开连接)
    WS_弹幕.连接 (“wss://danmuproxy.douyu.com:8501/”, 假, 错误原因)
    调试输出 (错误原因)
.否则

.如果结束


.子程序 WS_弹幕_连接成功
.局部变量 字节集内容, 字节集
.局部变量 userid, 文本型
.局部变量 nickname, 文本型
.局部变量 ct, 文本型

userid ＝ 文本_取出中间文本 (登录数据, “userid@=”, “/”, , )
nickname ＝ 文本_取出中间文本 (登录数据, “nickname@=”, “/”, , )
ct ＝ 文本_取出中间文本 (登录数据, “rct@=”, “/”, , )
登录数据 ＝ “type@=loginreq/roomid@=” ＋ 房间号 ＋ “/dfl@=/username@=” ＋ nickname ＋ “/uid@=” ＋ userid ＋ “/ver@=20190610/aver@=218101901/ct@=0/”
字节集内容 ＝ WS_弹幕_Packet (到字节集 (登录数据)) ＋ { 0 }
调试输出 (字节集_字节集到十六进制 (字节集内容))
.如果真 (WS_弹幕.发送字节集 (字节集内容))
    调试输出 (“发送成功！”)
    程序_延时 (1, 1)
    字节集内容 ＝ WS_弹幕_Packet (到字节集 (“type@=joingroup/rid@=” ＋ 房间号 ＋ “/gid@=1/”)) ＋ { 0 }  ' 获取弹幕
    调试输出 (字节集_字节集到十六进制 (字节集内容))
    WS_弹幕.发送字节集 (字节集内容)
    程序_延时 (1, 1)
    WS_弹幕.发送字节集 (字节集_十六进制到字节集 (“1400000014000000b102000074797065403d6d726b6c2f00”))

@人九