租号玩最新一键助力工具

.如果真 (正在运行 ＝ 真)
信息框 (“软件已经在运行，请稍等！”, #警告图标, , )
返回 ()
.如果真结束
.如果真 (编辑框_助力链接.内容 ＝ “”)
信息框 (“请输入完整的助力链接！”, #警告图标, , )
返回 ()
.如果真结束
Str ＝ 网页_访问_对象_编码型 (编辑框_助力链接.内容, 0, , , , , , , , , , , , , , , , , , )
Time ＝ 文本_取出中间文本 (Str, “var time = ” ＋ #引号, #引号, , )
Sign ＝ 文本_取出中间文本 (Str, “var sign = ” ＋ #引号, #引号, , )
ExshrId ＝ 文本_取出中间文本 (Str, “exshrid=” ＋ #引号, #引号, , )
调试输出 (Time, Sign, ExshrId)
编辑框_运行日志.加入文本 (“获取到助力ID为:” ＋ ExshrId ＋ #换行符)
.如果真 (Time ＝ “” 或 Sign ＝ “” 或 ExshrId ＝ “”)
信息框 (“解密失败，请检查助力链接是否正确完整,如果链接正确可能因为网站原因请稍后再试！”, #信息图标, , )
返回 ()
.如果真结束
正在运行 ＝ 真
.计次循环首 (到整数 (编辑框_助力次数.内容), 当前次数)
助力结果 ＝ 编码_usc2到ansi (到文本 (网页_访问_对象 (“………………………………” ＋ ExshrId ＋ “&sign=” ＋ Sign ＋ “&time=” ＋ Time, 0, , , , 伪装_IP协议头 (), , , , , , , , , , , , , )))
Json.解析 (助力结果)
编辑框_运行日志.加入文本 (Json.取通用属性 (“message”, ) ＋ “该链接当前助力个数为:” ＋ Json.取属性 (“num”).取数据文本 () ＋ #换行符)
Json.清除 ()
延迟 (2000)
.如果真 (当前次数 ＝ 到整数 (编辑框_助力次数.内容))
正在运行 ＝ 假
.如果真结束

.计次循环尾 ()