多线程空白，然后还要一些小问题

neoring

  

进入许可区 (线程同步句柄)
手机号 ＝ 取号 ()
退出许可区 (线程同步句柄)
程序_延时 (10, )
' -------------------------------------------------------------
行数 ＝ 超级列表框1.插入表项 (, , , , , )
进入许可区 (线程同步句柄)
超级列表框1.置标题 (行数, 0, 到文本 (行数 ＋ 1))
超级列表框1.置标题 (行数, 1, 手机号)
退出许可区 (线程同步句柄)
' -------------------------------------------------------------
' 密码设置
如果 (选择框1.选中 ＝ 真)
密码 ＝ 文本_取随机字母 (2, ) ＋ 文本_取随机数字 (2, ) ＋ 到大写 (文本_取随机字母 (3, ))
密码 ＝ 编辑框注册密码.内容
进入许可区 (线程同步句柄)
超级列表框1.置标题 (行数, 2, 密码)
退出许可区 (线程同步句柄)
' -------------------------------------------------------------
' ip设置
如果真 (单选框1.选中 ＝ 真)
ip ＝ “”
如果真 (单选框2.选中 ＝ 真)
ip ＝ 文本_取随机Ip ()
ip ＝ #换行符 ＋ 文本_替换 ( #ip, , , , “伪装ip”, ip, , , , , , , , )
如果真 (单选框3.选中 ＝ 真)
代理地址 ＝ 编码_utf8到gb2312 (到文本 (网页_访问_对象 (编辑框通用代理.内容, 0, , , , , , , 真, , , , , , , , , , )))

' -------------------------------------------------------------
' 手机号注册情况
返回信息1 ＝ 编码_utf8到gb2312 (到文本 (网页_访问_对象 (“http://client.xieshizhencang.com/api/auth/login”, 1, 文本_替换 ( #提交信息1, , , , “手机号”, 手机号, “密码”, 密码, , , , , , ), , , #协议头1, , , 真, , 代理地址, , , , , , , , )))
json.解析 (返回信息1, , )
如果 (json.取通用属性 (“message”, ) ＝ “手机号未注册”)
释放 (手机号)
线程数量 ＝ 线程数量 － 1
进入许可区 (线程同步句柄)
超级列表框1.置标题 (行数, 4, “新号”)
退出许可区 (线程同步句柄)
返回 ()
' -------------------------------------------------------------
' 发送验证码


返回信息2 ＝ 编码_utf8到gb2312 (到文本 (网页_访问_对象 (“http://client.xieshizhencang.com/push/verificationCode/send?phone=” ＋ 手机号 ＋ “&useSms=true”, 0, , , , #协议头1, , , 真, , 代理地址, , , , , , , , )))
' -------------------------------------------------------------
' 取验证码
json.解析 (返回信息2, , )
如果 (json.取通用属性 (“message”, ) ＝ “处理成功”)
进入许可区 (线程同步句柄)
超级列表框1.置标题 (行数, 4, “验证码发送成功”)
退出许可区 (线程同步句柄)
计次循环首 (15, 次数)
进入许可区 (线程同步句柄)
短信 ＝ 取短信 (手机号)
超级列表框1.置标题 (行数, 4, “第” ＋ 到文本 (次数) ＋ “次取短信为：” ＋ 短信)
退出许可区 (线程同步句柄)
如果真 (短信 ≠ “”)
进入许可区 (线程同步句柄)
验证码 ＝ 文本_取出中间文本 (短信, “您的验证码为：”, “，请勿泄露于他人！”, , )
超级列表框1.置标题 (行数, 4, “取到验证码为：” ＋ 验证码)
退出许可区 (线程同步句柄)
跳出循环 ()
程序_延时 (1000, )
计次循环尾 ()

如果真 (短信 ＝ “”)
释放 (手机号)
进入许可区 (线程同步句柄)
超级列表框1.置标题 (行数, 4, “获取验证码超时”)
退出许可区 (线程同步句柄)
线程数量 ＝ 线程数量 － 1
返回 ()


' -------------------------------------------------------------
' 修改密码
返回信息3 ＝ 编码_utf8到gb2312 (到文本 (网页_访问_对象 (“http://client.xieshizhencang.com/api/auth/forgotPassword”, 1, 文本_替换 ( #提交信息2, , , , “手机号”, 手机号, “验证码”, 验证码, “密码”, 密码, “密码”, 密码, , ), , , #协议头2, , , 真, , 代理地址, , , , , , , , )))
json.解析 (返回信息3, , )
如果 (json.取通用属性 (“message”, ) ＝ “处理成功”)
进入许可区 (线程同步句柄)
超级列表框1.置标题 (行数, 4, “密码修改成功”)
退出许可区 (线程同步句柄)
释放 (手机号)
进入许可区 (线程同步句柄)
超级列表框1.置标题 (行数, 4, “密码修改失败”)
退出许可区 (线程同步句柄)
线程数量 ＝ 线程数量 － 1
返回 ()
' -------------------------------------------------------------
' 登陆账号
返回信息4 ＝ 编码_utf8到gb2312 (到文本 (网页_访问_对象 (“http://client.xieshizhencang.com/api/auth/login”, 1, 文本_替换 ( #提交信息3, , , , “手机号”, 手机号, “密码”, 密码, , , , , , ), , , #协议头1, , , 真, , 代理地址, , , , , , , , )))
json.解析 (返回信息4, , )
如果 (json.取通用属性 (“data”, ) ≠ “”)
进入许可区 (线程同步句柄)
超级列表框1.置标题 (行数, 4, “登陆成功”)
退出许可区 (线程同步句柄)
程序_延时 (10, )
释放 (手机号)
进入许可区 (线程同步句柄)
超级列表框1.置标题 (行数, 4, “登陆失败”)
退出许可区 (线程同步句柄)
线程数量 ＝ 线程数量 － 1
返回 ()
' -------------------------------------------------------------
' 查询藏品
返回信息5 ＝ 编码_utf8到gb2312 (到文本 (网页_访问_对象 (“http://client.xieshizhencang.com/api/auth/currentUserInfo”, 1, , , , 文本_替换 ( #协议头3, , , , “ATZT”, json.取通用属性 (“data”, ), , , , , , , , ), , , 真, , 代理地址, , , , , , , , )))
json.解析 (返回信息5, , )
如果 (json.取属性 (“data.collectNumber”).取数据文本 () ≠ “0”)
进入许可区 (线程同步句柄)
超级列表框1.置标题 (行数, 4, “有藏品牛皮”)
退出许可区 (线程同步句柄)
进入许可区 (线程同步句柄)
写到文件 (取特定目录 ( #系统桌面 ) ＋ “\有藏品.txt”, 读入文件 (取特定目录 ( #系统桌面 ) ＋ “\注册成功.txt”) ＋ 到字节集 (手机号 ＋ “----” ＋ 密码 ＋ #换行符 ))
退出许可区 (线程同步句柄)
线程数量 ＝ 线程数量 － 1
进入许可区 (线程同步句柄)
超级列表框1.置标题 (行数, 4, “没有藏品”)
退出许可区 (线程同步句柄)

i支持库列表	支持库注释
EThread	多线程支持库
iext	扩展界面支持库一
shell	操作系统界面功能支持库

.版本 2<br /> .支持库 EThread<br /> .支持库 iext<br /> .支持库 shell<br /> <br /> 进入许可区 (线程同步句柄)<br /> 手机号 ＝ 取号 ()<br /> 退出许可区 (线程同步句柄)<br /> 程序_延时 (10, )<br /> ' -------------------------------------------------------------<br /> 行数 ＝ 超级列表框1.插入表项 (, , , , , )<br /> 进入许可区 (线程同步句柄)<br /> 超级列表框1.置标题 (行数, 0, 到文本 (行数 ＋ 1))<br /> 超级列表框1.置标题 (行数, 1, 手机号)<br /> 退出许可区 (线程同步句柄)<br /> ' -------------------------------------------------------------<br /> ' 密码设置<br /> .如果 (选择框1.选中 ＝ 真)<br />     密码 ＝ 文本_取随机字母 (2, ) ＋ 文本_取随机数字 (2, ) ＋ 到大写 (文本_取随机字母 (3, ))<br /> .否则<br />     密码 ＝ 编辑框注册密码.内容<br /> .如果结束<br /> 进入许可区 (线程同步句柄)<br /> 超级列表框1.置标题 (行数, 2, 密码)<br /> 退出许可区 (线程同步句柄)<br /> ' -------------------------------------------------------------<br /> ' ip设置<br /> .如果真 (单选框1.选中 ＝ 真)<br />     ip ＝ “”<br /> .如果真结束<br /> .如果真 (单选框2.选中 ＝ 真)<br />     ip ＝ 文本_取随机Ip ()<br />     ip ＝ #换行符 ＋ 文本_替换 (#ip, , , , “伪装ip”, ip, , , , , , , , )<br /> .如果真结束<br /> .如果真 (单选框3.选中 ＝ 真)<br />     代理地址 ＝ 编码_utf8到gb2312 (到文本 (网页_访问_对象 (编辑框通用代理.内容, 0, , , , , , , 真, , , , , , , , , , )))<br /> .如果真结束<br /> <br /> ' -------------------------------------------------------------<br /> ' 手机号注册情况<br /> 返回信息1 ＝ 编码_utf8到gb2312 (到文本 (网页_访问_对象 (“http://client.xieshizhencang.com/api/auth/login”, 1, 文本_替换 (#提交信息1, , , , “手机号”, 手机号, “密码”, 密码, , , , , , ), , , #协议头1, , , 真, , 代理地址, , , , , , , , )))<br /> json.解析 (返回信息1, , )<br /> .如果 (json.取通用属性 (“message”, ) ＝ “手机号未注册”)<br />     释放 (手机号)<br />     线程数量 ＝ 线程数量 － 1<br />     进入许可区 (线程同步句柄)<br />     超级列表框1.置标题 (行数, 4, “新号”)<br />     退出许可区 (线程同步句柄)<br />     返回 ()<br />     ' -------------------------------------------------------------<br />     ' 发送验证码<br /> .否则<br /> <br />     返回信息2 ＝ 编码_utf8到gb2312 (到文本 (网页_访问_对象 (“http://client.xieshizhencang.com/push/verificationCode/send?phone=” ＋ 手机号 ＋ “&useSms=true”, 0, , , , #协议头1, , , 真, , 代理地址, , , , , , , , )))<br />     ' -------------------------------------------------------------<br /> .如果结束<br /> ' 取验证码<br /> json.解析 (返回信息2, , )<br /> .如果 (json.取通用属性 (“message”, ) ＝ “处理成功”)<br />     进入许可区 (线程同步句柄)<br />     超级列表框1.置标题 (行数, 4, “验证码发送成功”)<br />     退出许可区 (线程同步句柄)<br />     .计次循环首 (15, 次数)<br />         进入许可区 (线程同步句柄)<br />         短信 ＝ 取短信 (手机号)<br />         超级列表框1.置标题 (行数, 4, “第” ＋ 到文本 (次数) ＋ “次取短信为：” ＋ 短信)<br />         退出许可区 (线程同步句柄)<br />         .如果真 (短信 ≠ “”)<br />             进入许可区 (线程同步句柄)<br />             验证码 ＝ 文本_取出中间文本 (短信, “您的验证码为：”, “，请勿泄露于他人！”, , )<br />             超级列表框1.置标题 (行数, 4, “取到验证码为：” ＋ 验证码)<br />             退出许可区 (线程同步句柄)<br />             跳出循环 ()<br />         .如果真结束<br />         程序_延时 (1000, )<br />     .计次循环尾 ()<br /> <br /> .否则<br />     .如果真 (短信 ＝ “”)<br />         释放 (手机号)<br />         进入许可区 (线程同步句柄)<br />         超级列表框1.置标题 (行数, 4, “获取验证码超时”)<br />         退出许可区 (线程同步句柄)<br />         线程数量 ＝ 线程数量 － 1<br />         返回 ()<br />     .如果真结束<br /> <br /> <br /> .如果结束<br /> <br /> ' -------------------------------------------------------------<br /> ' 修改密码<br /> 返回信息3 ＝ 编码_utf8到gb2312 (到文本 (网页_访问_对象 (“http://client.xieshizhencang.com/api/auth/forgotPassword”, 1, 文本_替换 (#提交信息2, , , , “手机号”, 手机号, “验证码”, 验证码, “密码”, 密码, “密码”, 密码, , ), , , #协议头2, , , 真, , 代理地址, , , , , , , , )))<br /> json.解析 (返回信息3, , )<br /> .如果 (json.取通用属性 (“message”, ) ＝ “处理成功”)<br />     进入许可区 (线程同步句柄)<br />     超级列表框1.置标题 (行数, 4, “密码修改成功”)<br />     退出许可区 (线程同步句柄)<br /> .否则<br />     释放 (手机号)<br />     进入许可区 (线程同步句柄)<br />     超级列表框1.置标题 (行数, 4, “密码修改失败”)<br />     退出许可区 (线程同步句柄)<br />     线程数量 ＝ 线程数量 － 1<br />     返回 ()<br /> <br /> .如果结束<br /> ' -------------------------------------------------------------<br /> ' 登陆账号<br /> 返回信息4 ＝ 编码_utf8到gb2312 (到文本 (网页_访问_对象 (“http://client.xieshizhencang.com/api/auth/login”, 1, 文本_替换 (#提交信息3, , , , “手机号”, 手机号, “密码”, 密码, , , , , , ), , , #协议头1, , , 真, , 代理地址, , , , , , , , )))<br /> json.解析 (返回信息4, , )<br /> .如果 (json.取通用属性 (“data”, ) ≠ “”)<br />     进入许可区 (线程同步句柄)<br />     超级列表框1.置标题 (行数, 4, “登陆成功”)<br />     退出许可区 (线程同步句柄)<br />     程序_延时 (10, )<br /> .否则<br />     释放 (手机号)<br />     进入许可区 (线程同步句柄)<br />     超级列表框1.置标题 (行数, 4, “登陆失败”)<br />     退出许可区 (线程同步句柄)<br />     线程数量 ＝ 线程数量 － 1<br />     返回 ()<br /> <br /> .如果结束<br /> ' -------------------------------------------------------------<br /> ' 查询藏品<br /> 返回信息5 ＝ 编码_utf8到gb2312 (到文本 (网页_访问_对象 (“http://client.xieshizhencang.com/api/auth/currentUserInfo”, 1, , , , 文本_替换 (#协议头3, , , , “ATZT”, json.取通用属性 (“data”, ), , , , , , , , ), , , 真, , 代理地址, , , , , , , , )))<br /> json.解析 (返回信息5, , )<br /> .如果 (json.取属性 (“data.collectNumber”).取数据文本 () ≠ “0”)<br />     进入许可区 (线程同步句柄)<br />     超级列表框1.置标题 (行数, 4, “有藏品牛皮”)<br />     退出许可区 (线程同步句柄)<br />     进入许可区 (线程同步句柄)<br />     写到文件 (取特定目录 (#系统桌面) ＋ “\有藏品.txt”, 读入文件 (取特定目录 (#系统桌面) ＋ “\注册成功.txt”) ＋ 到字节集 (手机号 ＋ “----” ＋ 密码 ＋ #换行符))<br />     退出许可区 (线程同步句柄)<br /> .否则<br />     线程数量 ＝ 线程数量 － 1<br />     进入许可区 (线程同步句柄)<br />     超级列表框1.置标题 (行数, 4, “没有藏品”)<br />     退出许可区 (线程同步句柄)

neoring

  

子程序名	返回值类型	公开	备 注
多线程

判断循环首 (zc数量 ＜ 到整数 (编辑框zc数量.内容))
如果真 (线程数量 ＜ 到整数 (编辑框zc线程.内容))
zc数量 ＝ zc数量 ＋ 1
启动线程 (&主程序, , 线程名)
加入成员 (线程组, 线程名)
线程数量 ＝ 线程数量 ＋ 1

判断循环尾 ()

i支持库列表	支持库注释
EThread	多线程支持库

.版本 2<br /> .支持库 EThread<br /> <br /> .子程序 多线程<br /> <br /> <br /> .判断循环首 (zc数量 ＜ 到整数 (编辑框zc数量.内容))<br />     .如果真 (线程数量 ＜ 到整数 (编辑框zc线程.内容))<br />         zc数量 ＝ zc数量 ＋ 1<br />         启动线程 (&主程序, , 线程名)<br />         加入成员 (线程组, 线程名)<br />         线程数量 ＝ 线程数量 ＋ 1<br />     .如果真结束<br /> <br /> .判断循环尾 ()

sange520

获取手机号失败了,就不要往超列加了 写个判断

一夜繁花

又是个写zjc的

neoring

一夜繁花 发表于 2022-9-29 12:04
又是个写zjc的

老表教教

不想静静

嫂号。

q132130

进入许可区 (线程同步句柄)
行数 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (行数, 0, 到文本 (行数 ＋ 1))
超级列表框1.置标题 (行数, 1, 手机号)
退出许可区 (线程同步句柄)

q132130

然后 启动线程的地方增加延迟

一线之隔

你这写的.....一言难尽

neoring

一线之隔 发表于 2022-9-29 14:45
你这写的.....一言难尽

教教