最新qq群官网验证 js解包

woaini12351

调用的是精易模块8.2.0  访问网页需要界面和浏览框  我用的是黑月界面类3.6.2

  

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

q群验证群号 (626477554, “巅峰意境1”, “https://jq.qq.com/?_wv=1027&k=5rAxPiA”)
返回 (0)

子程序名	返回值类型	公开	备 注
q群验证群号			复制这段 q群验证群号 (2398502185, “panpan”，“加群链接”)      验证成功  群验证成功  为真 芊芊=QQ号
参数名	类 型	参考	可空	数组	备 注
群验证群号1	整数型				必须输入群号  群号为整数型
群名	文本型				和正确群名字   群名字为文本型
群链接	文本型				复制加群链接  验证失败自动打开

App.初始化 (, , )
加群链接 ＝ 群链接
QQ群号 ＝ 群验证群号1
群名字 ＝ 群名
窗口122.事件_创建完毕 (&创建完毕)
窗口122.创建 (, “验证中”, 黑月坐标 (0, 0), 黑月坐标 (300, 300), 113901568, 256, 假, “”)
App.运行 (窗口122, )

子程序名	返回值类型	公开	备 注
GTK	文本型
参数名	类 型	参考	可空	数组	备 注
skey	文本型

变量名	类 型	静态	数组	备 注
基值	整数型
计数	整数型
长度	整数型
结果	整数型

基值 ＝ 5381
计数 ＝ 0
长度 ＝ 取文本长度 (skey)
判断循环首 (计数 ＜ 长度)
基值 ＝ 基值 ＋ 左移 (基值, 5) ＋ 取代码 (skey, 计数 ＋ 1)
计数 ＝ 计数 ＋ 1
判断循环尾 ()
结果 ＝ 位与 (基值, 2147483647)
返回 (到文本 (结果))

子程序名	返回值类型	公开	备 注
单击11

变量名	类 型	静态	数组	备 注
json	类_json
登陆QQ	文本型
QQ昵称	文本型

url ＝ “https://xui.ptlogin2.qq.com/cgi- ... https://qun.qq.com/”
超文本浏览框1.跳转 (url)
判断循环首 (寻找文本 (Cookie, #常量1, , 假) ＝ -1)
延迟 (1500)
Cookie ＝ 网页_取Cookie2 (“https://qun.qq.com/”)
tk ＝ GTK (文本_取出中间文本 (Cookie, “skey=”, “; ”))
' 调试输出 (Cookie)
' 调试输出 (tk)
判断循环尾 ()
str ＝ 网页_访问S (“https://qun.qq.com/cgi-bin/qunwelcome/myinfo?callback=?&bkn=” ＋ tk, , , Cookie, , , , , , , , , , , , , , , , , )
json.解析 (str)
登陆QQ ＝ json.取通用属性 (“data.uin”, )
QQ昵称 ＝ json.取通用属性 (“data.nickName”, )
芊芊 ＝ 登陆QQ ＋ “    ” ＋ QQ昵称
' 调试输出 (登陆QQ, QQ昵称)
超文本浏览框1.销毁 ()
str ＝ 网页_访问S (“https://qun.qq.com/cgi-bin/qun_mgr/get_group_list”, 1, “bkn=” ＋ tk, Cookie, , “User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/47.0.2526.80 Safari/537.36 Core/1.47.277.400 QQBrowser/9.4.7658.400”, , , , , , , , , , , , 真, , , )
str ＝ 编码_usc2到ansi (str)
' 调试输出 (str)
标签1.创建 (窗口122, “标签”, 黑月坐标 (-150, -100), 黑月坐标 (560, 500), , 1409286656, 0)
判断 (寻找文本 (str, 群名字, , 假) ＝ -1)
打开指定网址 (加群链接)
群验证成功 ＝ 假
标签1.文本色 (0)
标签1.标题 (“未加入该群”)
延时 (3000)
程序_重启 ()

判断 (寻找文本 (str, 到文本 (QQ群号), , 假) ＝ -1)
打开指定网址 (加群链接)
群验证成功 ＝ 假
标签1.文本色 (0)
标签1.标题 (“未加入该群”)
延时 (3000)
程序_重启 ()

群验证成功 ＝ 真
标签1.文本色 (0)
标签1.标题 (到文本 (到文本 (QQ群号) ＋ 群名字) ＋ “-恭喜您-” ＋ “验证成功” ＋ #换行符 ＋ 芊芊)
延时 (3000)
窗口122.可视 (假)

子程序名	返回值类型	公开	备 注
创建完毕

窗口122.Esc关闭 (真)
窗口122.位置 ( #窗口位置_居中 )
超文本浏览框1.创建 (窗口122, , 黑月坐标 (-100, -100), 黑月坐标 (500, 500), , , 0)
线程_启动 (&单击11)

i支持库列表	支持库注释
spec	特殊功能支持库
eAPI	应用接口支持库

.版本 2<br /> .支持库 spec<br /> .支持库 eAPI<br /> <br /> .子程序 _启动子程序, 整数型, 公开, 本子程序在程序启动后最先执行<br /> <br /> <br /> <br /> q群验证群号 (626477554, “巅峰意境1”, “<a href="https://jq.qq.com/?_wv=1027&k=5rAxPiA" rel="nofollow" rel="nofollow" target="_blank">https://jq.qq.com/?_wv=1027&k=5rAxPiA</a>”)<br /> 返回 (0)<br /> <br /> <br /> .子程序 q群验证群号, , 公开,  复制这段 q群验证群号 (2398502185, “panpan”，“加群链接”)      验证成功  群验证成功  为真 芊芊=QQ号 <br /> .参数 群验证群号1, 整数型, 参考 可空, 必须输入群号  群号为整数型 <br /> .参数 群名, 文本型, 参考 可空, 和正确群名字   群名字为文本型<br /> .参数 群链接, 文本型, 参考 可空, 复制加群链接  验证失败自动打开<br /> <br /> App.初始化 (, , )<br /> 加群链接 ＝ 群链接<br /> QQ群号 ＝ 群验证群号1<br /> 群名字 ＝ 群名<br /> 窗口122.事件_创建完毕 (&创建完毕)<br /> 窗口122.创建 (, “验证中”, 黑月坐标 (0, 0), 黑月坐标 (300, 300), 113901568, 256, 假, “”)<br /> App.运行 (窗口122, )<br /> <br /> <br /> .子程序 GTK, 文本型, 公开<br /> .参数 skey, 文本型, 参考<br /> .局部变量 基值, 整数型<br /> .局部变量 计数, 整数型<br /> .局部变量 长度, 整数型<br /> .局部变量 结果, 整数型<br /> <br /> 基值 ＝ 5381<br /> 计数 ＝ 0<br /> 长度 ＝ 取文本长度 (skey)<br /> .判断循环首 (计数 ＜ 长度)<br />     基值 ＝ 基值 ＋ 左移 (基值, 5) ＋ 取代码 (skey, 计数 ＋ 1)<br />     计数 ＝ 计数 ＋ 1<br /> .判断循环尾 ()<br /> 结果 ＝ 位与 (基值, 2147483647)<br /> 返回 (到文本 (结果))<br /> <br /> .子程序 单击11, , 公开<br /> .局部变量 json, 类_json<br /> .局部变量 登陆QQ, 文本型<br /> .局部变量 QQ昵称, 文本型<br /> <br /> url ＝ “<a href="https://xui.ptlogin2.qq.com/cgi-bin/xlogin?appid=715030901&s_url=https://qun.qq.com/" rel="nofollow" rel="nofollow" target="_blank">https://xui.ptlogin2.qq.com/cgi- ... https://qun.qq.com/</a>”<br /> 超文本浏览框1.跳转 (url)<br /> .判断循环首 (寻找文本 (Cookie, #常量1, , 假) ＝ -1)<br />     延迟 (1500)<br />     Cookie ＝ 网页_取Cookie2 (“<a href="https://qun.qq.com/" rel="nofollow" rel="nofollow" target="_blank">https://qun.qq.com/</a>”)<br />     tk ＝ GTK (文本_取出中间文本 (Cookie, “skey=”, “; ”))<br />     ' 调试输出 (Cookie)<br />     ' 调试输出 (tk)<br /> .判断循环尾 ()<br /> str ＝ 网页_访问S (“<a href="https://qun.qq.com/cgi-bin/qunwelcome/myinfo?callback=?&bkn=" rel="nofollow" rel="nofollow" target="_blank">https://qun.qq.com/cgi-bin/qunwelcome/myinfo?callback=?&bkn=</a>” ＋ tk, , , Cookie, , , , , , , , , , , , , , , , , )<br /> json.解析 (str)<br /> 登陆QQ ＝ json.取通用属性 (“data.uin”, )<br /> QQ昵称 ＝ json.取通用属性 (“data.nickName”, )<br /> 芊芊 ＝ 登陆QQ ＋ “    ” ＋ QQ昵称<br /> ' 调试输出 (登陆QQ, QQ昵称)<br /> 超文本浏览框1.销毁 ()<br /> str ＝ 网页_访问S (“<a href="https://qun.qq.com/cgi-bin/qun_mgr/get_group_list" rel="nofollow" rel="nofollow" target="_blank">https://qun.qq.com/cgi-bin/qun_mgr/get_group_list</a>”, 1, “bkn=” ＋ tk, Cookie, , “User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/47.0.2526.80 Safari/537.36 Core/1.47.277.400 QQBrowser/9.4.7658.400”, , , , , , , , , , , , 真, , , )<br /> str ＝ 编码_usc2到ansi (str)<br /> ' 调试输出 (str)<br /> 标签1.创建 (窗口122, “标签”, 黑月坐标 (-150, -100), 黑月坐标 (560, 500), , 1409286656, 0)<br /> .判断开始 (寻找文本 (str, 群名字, , 假) ＝ -1)<br />     打开指定网址 (加群链接)<br />     群验证成功 ＝ 假<br />     标签1.文本色 (0)<br />     标签1.标题 (“未加入该群”)<br />     延时 (3000)<br />     程序_重启 ()<br /> <br /> .判断 (寻找文本 (str, 到文本 (QQ群号), , 假) ＝ -1)<br />     打开指定网址 (加群链接)<br />     群验证成功 ＝ 假<br />     标签1.文本色 (0)<br />     标签1.标题 (“未加入该群”)<br />     延时 (3000)<br />     程序_重启 ()<br /> <br /> .默认<br />     群验证成功 ＝ 真<br />     标签1.文本色 (0)<br />     标签1.标题 (到文本 (到文本 (QQ群号) ＋ 群名字) ＋ “-恭喜您-” ＋ “验证成功” ＋ #换行符 ＋ 芊芊)<br />     延时 (3000)<br />     窗口122.可视 (假)<br /> <br /> .判断结束<br /> <br /> <br /> .子程序 创建完毕<br /> <br /> 窗口122.Esc关闭 (真)<br /> 窗口122.位置 (#窗口位置_居中)<br /> 超文本浏览框1.创建 (窗口122, , 黑月坐标 (-100, -100), 黑月坐标 (500, 500), , , 0)<br /> 线程_启动 (&单击11)

[url=]532020群验证.rar[/url]

[url=]模块包.rar[/url]

源码整理来自论坛大佬们的  我只是负责吸收和发扬光大   这套源码最新可用  还能验证qq是否是好友  
如果代码有问题或者bug  可以联系我的QQ 2398502185  

mrbeiwen

首先支持开源
这源码最开始获取已登录QQ代码,不支持带有QQ保护进程的QQ客户Duan,无法获取到已登录QQ,也就后面的都运行不了,我测试了,8.94版绿色版QQ能检测到客户Duan,最新版QQ检测不到

AngelSharp

谢谢分享,下载看看

HmbGK

为什么我黑月的只有窗口 超级文本框显示不出来

xtayxiong

支持开源,学习学习

有理想猪猪

论坛个个都是人才 说话又好听

温良寄她

QQ好友怎么验证

woaini12351

limengkai 发表于 2020-7-31 15:30
666666666666，不过模块下载还要收费是个什么鬼

我不清楚  

limengkai

666666666666，不过模块下载还要收费是个什么鬼

外星星人

虽然看不懂  支持

wjswzj0

666666666666666