某app(网页版)自动注册/登录/提交任务

.版本 2
.支持库 spec

.程序集 窗口程序集_启动窗口

.子程序 reg, 文本型
.参数 mobile, 文本型
.参数 pass, 文本型
.参数 code, 文本型
.参数 ip, 文本型
.局部变量 url, 文本型
.局部变量 data, 文本型

url ＝ “http://h5.1031987.cn:8989/index.php/Home/Public/reg.html”
data ＝ “mobile=” ＋ mobile ＋ “&geetest_challenge=0afe084a55b73ce0f5f3354e396c4d459d&geetest_validate=4d68eefade01c35d5c49437539b1c4c1&geetest_seccode=4d68eefade01c35d5c49437539b1c4c1%7Cjordan&password=” ＋ pass ＋ “&repassword=” ＋ pass ＋ “&invite_code=” ＋ code
返回 (编码_usc2到ansi (到文本 (网页_访问_对象 (url, 1, data, , , #常量1, , , , , ip, 5))))


.子程序 login, 文本型
.参数 mobile, 文本型
.参数 pass, 文本型
.参数 cook, 文本型, 参考
.参数 ip, 文本型
.局部变量 url, 文本型
.局部变量 data, 文本型

url ＝ “http://h5.1031987.cn:8989/index.php/Home/Public/login.html”
data ＝ “username=” ＋ mobile ＋ “&password=” ＋ pass
返回 (编码_usc2到ansi (到文本 (网页_访问_对象 (url, 1, data, , cook, , , , , , ip, 5))))

.子程序 edit, 文本型
.参数 mobile, 文本型
.参数 cookies, 文本型
.参数 ip, 文本型
.局部变量 url, 文本型
.局部变量 data, 文本型

url ＝ “http://h5.1031987.cn:8989/index.php/Home/Member/info_edit.html”
data ＝ “f=&bank_name=%E6%94%AF%E4%BB%98%E5%AE%9D&subbranch_name=&bank_user=%E5%BC%A0%E6%B3%BD%E5%AE%87&field=bank_number&value=” ＋ mobile
返回 (编码_Utf8到Ansi (网页_访问_对象 (url, 1, data, cookies, , , , , , , ip, 5)))

.子程序 get_work, 文本型
.参数 cookies, 文本型
.参数 ip, 文本型
.局部变量 url, 文本型
.局部变量 data, 文本型
.局部变量 zz, 正则表达式类
.局部变量 str, 文本型
.局部变量 c, 整数型
.局部变量 str1, 文本型
.局部变量 id, 文本型
.局部变量 领取结果, 文本型

url ＝ “http://h5.1031987.cn:8989/index.php/Home/Index/index.html”
str ＝ 编码_Utf8到Ansi (网页_访问_对象 (url, , , cookies, , , , , , , ip, 5))
zz.创建 (“<a href=” ＋ #引号 ＋ “/index.php/Home/Task/show/id/(.*?).html” ＋ #引号 ＋ “>+(.*?)元</a>”, str)
.计次循环首 (zz.取匹配数量 (), c)
    str1 ＝ 编码_Utf8到Ansi (网页_访问_对象 (“http://h5.1031987.cn:8989/index.php/Home/Task/get_task.html”, 1, “id=” ＋ zz.取子匹配文本 (c, 1), cookies, , , , , , , ip, 5))
    id ＝ 文本_取出中间文本 (编码_Utf8到Ansi (网页_访问_对象 (“http://h5.1031987.cn:8989/index.php/Home/Task/show/id/” ＋ zz.取子匹配文本 (c, 1) ＋ “.html”, , , cookies, , , , , , , ip)), “/index.php/Home/Task/submission_task_do/id/”, “.html')” ＋ #引号 ＋ “>已领取”)
    领取结果 ＝ 文本_取出中间文本 (文本_取出中间文本 (str1, #常量2, “</li>”), “<b>”, “</b>”)
    调试输出 (文本_取出中间文本 (文本_取出中间文本 (编码_Utf8到Ansi (网页_访问_对象 (“http://h5.1031987.cn:8989/index.php/Home/Task/submission_task_do.html”, 1, “id=” ＋ id ＋ “&file=%2FUploads%2F2020-10-16%2F5f89c093dcc52.jpg”, cookies, , , , , , , ip, 5)), “<li class=” ＋ #引号 ＋ “bjy-pj-word” ＋ #引号 ＋ “>”, “</li>”), “<b>”, “</b>”))
    .如果真 (寻找文本 (领取结果, “请升级”, , 假) ≠ -1)
        跳出循环 ()
    .如果真结束

.计次循环尾 ()
返回 (“”)
' <a href="/index.php/Home/Task/show/id/230.html">+

.子程序 _按钮1_被单击
.局部变量 mobile, 文本型
.局部变量 cookies, 文本型
.局部变量 ip, 文本型

.计次循环首 (20, )
    置随机数种子 ()
    mobile ＝ “1520665” ＋ 到文本 (取随机数 (1000, 9999))
    调试输出 (mobile)
    reg (mobile, “a123456”, “015275”, ip)
    login (mobile, “a123456”, cookies, ip)
    edit (mobile, cookies, ip)
    get_work (cookies, ip)
    延时 (800)
.计次循环尾 ()

.子程序 __启动窗口_创建完毕

@风神大地