|
马上登陆,加入晨风
您需要 登录 才可以下载或查看,没有账号?立即注册
×
本帖最后由 小雨 于 2018-8-14 11:34 编辑
.版本 2
.子程序 秒赞, 文本型,,by:无语大佬
.参数 fromGroup, 文本型
.参数 fromQQ, 文本型
.参数 cookies, 文本型
.参数 qzonetoken, 文本型
.局部变量 内容, 文本型
.局部变量 JSON, 类_json
.局部变量 COUN, 整数型
.局部变量 qzonetoken, 文本型
.局部变量 cookies, 文本型
.局部变量 文本, 文本型
.局部变量 群号, 文本型
文本 = 到文本 (读入文件 (取运行目录 () + “\群号和窗口句柄对应关系.txt”))
群号 = 文本_取出中间文本 (文本, 到文本 (fromGroup), #换行符, , )
SendMessageA_文本 (到长整数 (群号), 1301, 0, “@” + fromQQ + “已开启秒赞”)
.判断循环首 (读数据 (fromQQ, 10) = “真”)
内容 = 编码_Utf8到Ansi (网页_访问 (“https://h5.qzone.qq.com/proxy/do ... eds3_html_more?uin=” + fromQQ + “&scope=0&view=1&daylist=&uinlist=&gid=&flag=1&filter=all&applist=all&refresh=0&aisortEndTime=0&aisortOffset=0&getAisort=0&aisortBeginTime=0&pagenum=1&externparam=&firstGetGroup=0&icServerTime=0&mixnocache=0&scene=0&begintime=0&count=10&dayspac=0&sidomain=qzonestyle.gtimg.cn&useutf8=1&outputhtmlfeed=1&rd=0.8912324928678572&usertime=1493290229863&windowId=0.9499708286020905&getob=1&g_tk=” + 计算 (网页_取单条Cookie (cookies, “p_skey”, 真)), , , cookies, , , , , , , ))
.如果真 (JSON.解析 (文本_倒取出中间文本 (内容, “;”, “_Callback”)))
.判断开始 (JSON.取通用属性 (“subcode”, ) = “-10001”)
登录判断 (fromGroup, fromQQ)
.默认
.计次循环首 (JSON.成员数 (“data.data”), COUN)
.如果真 (文本_取出中间文本 (JSON.取通用属性 (“data.data[” + 到文本 (COUN - 1) + “].html”), “data-unikey=” + #引号, #引号) ≠ “”)
.如果真 (寻找文本 (JSON.取通用属性 (“data.data[” + 到文本 (COUN - 1) + “].html”, ), #引号 + “http://user.qzone.qq.com/” + fromQQ + #引号 + “ link=” + #引号 + “nameCard_” + fromQQ + “ des_” + fromQQ + #引号 + “ class=” + #引号 + “item _ownerlike q_namecard” + #引号, , 假) = -1)
网页_访问 (“http://h5.qzone.qq.com/proxy/dom ... ike_app?qzonetoken=” + qzonetoken + “&g_tk=” + 计算 (网页_取单条Cookie (cookies, “p_skey”, 真)), 1, “qzreferrer=http%3A%2F%2Fuser.qzone.qq.com%2F” + fromQQ + “%2F311&opuin=” + JSON.取通用属性 (“data.data[” + 到文本 (COUN - 1) + “].opuin”, ) + “&unikey=” + 编码_URL编码 (文本_取出中间文本 (JSON.取通用属性 (“data.data[” + 到文本 (COUN - 1) + “].html”, ), “data-unikey=” + #引号, #引号, , ), 真, 真) + “&curkey=” + 编码_URL编码 (文本_取出中间文本 (JSON.取通用属性 (“data.data[” + 到文本 (COUN - 1) + “].html”, ), “data-curkey=” + #引号, #引号, , ), 真, 真) + “&from=1&appid=” + JSON.取通用属性 (“data.data[” + 到文本 (COUN - 1) + “].appid”, ) + “&typeid=” + JSON.取通用属性 (“data.data[” + 到文本 (COUN - 1) + “].typeid”, ) + “&abstime=1487830823&fid=” + JSON.取通用属性 (“data.data[” + 到文本 (COUN - 1) + “].key”, ) + “&active=0&fupdate=1”, cookies, , , , , , , )
.如果真结束
.如果真结束
.计次循环尾 ()
.判断结束
.如果真结束
程序_延时 (1, 2)
.判断循环尾 ()
|
|