【QRSpeed】整点报时模块
&&应粉丝请求
&&我更新了~
&&语言:QRSpeed官方插件伪代码语言
&&如有错漏请告知我修改

[初始化]
$调用 0 群列表刷新$
$调用 1000 恒$
[内部]恒
如果:$读 run 0 0$==0
返回
如果尾
如果:%时间mm%==0|00
//整点报时
$调用 0 整点报时$
$调用 2000 恒$
返回
如果尾
$调用 2000 恒$
[内部]整点报时
如果:$读 date/HH 0 0$==%时间yyyyMMddHH%
返回
如果尾
$写 date/HH 0 %时间yyyyMMddHH%$
1:[整点报时]现在是%时间yyyy.MM.dd HH:mm:ss%
//可自行添加内容,换行方式未知
3:%1%
析:$读 gc/GL/析 json [数据错误]$
A:@析[0]
B:0
B:[%B%+1]
如果:%B%>%A%
返回
如果尾
如果:$读 gc/data/%C%/Timing k 0$==0
$jump -5$
如果尾
$发送 群 msg %C% %3%$
$jump -14$
群列表刷新
$删除 /QQRdic/data/gc/GL$
P:%Json%
P:@P[pskey]
P:@P[qun.qq.com]
C:skey=%Skey%; p_skey=%P%; uin=o%Robot%; p_uin=o%Robot%;
######自定义访问头 Headers######
A:{"Connection":"keep-alive","Accept-Language":"zh-CN,zh;q=0.8,zh-TW;q=0.7,zh-HK;q=0.5,en-US;q=0.3,en;q=0.2","User-Agent":"Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:75.0) Gecko/20100101 Firefox/75.0","Referer":"https://qun.qq.com/member.html","Origin":"https://qun.qq.com","Cookie":"%C%"}
B:$BKN %Skey%$
######SETPOST 开启高级访问POST######
A:$访问 SETPOST %A% https://qun.qq.com/cgi-bin/qun_mgget_group_list?bkn=%B%$
$写 gc/GL/原 json %A%$
$调用 0 解析群列表$
[内部]解析群列表
原:$读 gc/GL/原 json 0$
A:0
D:create
F:开头
B:-1
A:[%A%+1]
B:[%B%+1]
q:@原[%D%][%B%]
如果:%q%!=
h:@q[gc]
$写 gc/GL/匹 %h% 1$
F:%F%,"%h%":%A%
q:$替换 @ %q%@{@$
q:$替换 @ %q%@}@$
q:{%q%,"type":%D%}
C:%C%,%q%
$jump -12$
如果尾
A:[%A%-1]
如果:%D%==create
D:manage
$jump -18$
如果尾
如果:%D%==manage
D:join
$jump -22$
如果尾
C:[%A%%C%]
F:$替换 @ %F%@开头,@$
F:{%F%}
$写 gc/GL/析 json %C%$
$写 gc/GL/寻 json %F%$
//机器开关
启动
$写 run 0 1$
$调用 5000 恒$
已执行。
关闭
$写 run 0 0$
已执行。
//报时开关
整点报时开
如果:$读 gc/data/%Groupid%/Timing k 0$==0
$写 gc/data/%Groupid%/Timing k 1$
报时整点开启成功。
返回
如果尾
报时已经开启\n
无需重复开启
返回
整点报时关
如果:$读 gc/data/%Groupid%/Timing k 0$==1
$写 gc/data/%Groupid%/Timing k 0$
整点报时关闭成功
返回
如果尾
报时已经关闭\n
无需重复关闭