开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 983|回复: 1
收起左侧

[易语言] 如何判断多线程zc成功数量与zc总数相等

[复制链接]
结帖率:0% (0/2)
发表于 2018-8-11 22:50:04 | 显示全部楼层 |阅读模式   江西省赣州市
5精币
多线程zc运行的时候,投递30次任务,里面总有几个未成功zc,那么假如成功zc数量与zc总数量不相等,就继续投递,直到相等我已经在子线程里面判断了假如zc成功,那么成功数=成功数+1
接下来设置哪里我都没达到这个目的,望帮忙




回答提醒:如果本帖被关闭无法回复,您有更好的答案帮助楼主解决,请发表至 源码区 可获得加分喔。
友情提醒:本版被采纳的主题可在 申请荣誉值 页面申请荣誉值,获得 1点 荣誉值,荣誉值可兑换荣誉会员、终身vip用户组。
快捷通道:申请荣誉值无答案申请取消悬赏投诉有答案未采纳为最佳
结帖率:0% (0/2)

签到天数: 4 天

 楼主| 发表于 2018-8-11 22:51:42 | 显示全部楼层   江西省赣州市
  
子程序名返回值类型公开备 注
主线程  
变量名类 型静态数组备 注
局_任务数整数型 
局_线程数整数型 
局_空闲数整数型 
局_当前任务整数型 
局_i整数型 
局_int整数型 
线程_置CPU亲和性 (集_线程句柄_登陆)
局_任务数 = 到整数 (窗口.编辑框_注册数量.内容)
线程_临界_登陆.进入 ()  ' 进入许可
局_线程数 = 到整数 (窗口.编辑框_线程.内容)
线程_临界_登陆.退出 ()  ' 退出许可
线程池_登陆.创建 (局_线程数, 局_线程数)
局_空闲数 = 线程池_登陆.取_空闲线程数 ()
判断循环首 (局_任务数 > 0)
如果真 (局_空闲数 > 0)
局_当前任务 = 局_任务数 - 局_i + 1
处理事件 ()
如果真 (局_当前任务 ≤ 0)
如果真 (线程池_登陆.取_是否空闲 ())
跳出循环 ()
线程池_登陆.等待任务动态 (100)
到循环尾 ()
判断 (局_空闲数 > 局_当前任务)
内存_优化1 ()
局_int = 局_当前任务
窗口.透明标签_当前线程.标题 = 到文本 (局_空闲数)
局_int = 局_空闲数
窗口.透明标签_当前线程.标题 = 到文本 (局_空闲数)
计次循环首 (局_int, )
内存_优化1 ()
线程池_登陆.投递任务 (&循环子线程, 局_i)
处理事件 ()
局_i = 局_i + 1
' 窗口.透明标签_已注册.标题 = 到文本 (局_i - 1)
窗口.透明标签_注册数量.标题 = 到文本 (局_任务数)
计次循环尾 ()处理事件 ()
线程池_登陆.等待任务动态 (100)
判断循环尾 ()
线程池_登陆.销毁 ()
日志输出 (“执行完毕,停止线程”)
窗口.透明标签_状态.标题 = “>>>>注册完成”
窗口.按钮_开始.禁止 = 假
窗口.按钮_暂停.禁止 = 真
窗口.按钮_继续.禁止 = 真
窗口.按钮_停止.禁止 = 真
子程序名返回值类型公开备 注
循环子线程  
参数名类 型参考可空数组备 注
索引整数型
变量名类 型静态数组备 注
密码文本型 
发送验证码返回文本型 
注册验证码返回文本型 
手机验证码文本型 
手机号码文本型 
领取钻石文本型 
uuid文本型 
注册成功整数型 
认证协议头文本型 
代理文本型 
线程_初始化COM库 ()
如果真 (索引 = 0)
返回 ()
内存_优化1 ()
网页_清除Cookie (窗口.编辑框_邀请码.内容)
窗口.超级列表框.插入表项 (索引 - 1, 到文本 (索引), , , , )
手机号码 = 窗口.超级列表框.取标题 (索引 - 1, 1)
密码 = 窗口.超级列表框.取标题 (索引 - 1, 2)
手机验证码 = 窗口.超级列表框.取标题 (索引 - 1, 3)
答题结果 = 窗口.超级列表框.取标题 (索引 - 1, 4)
如果真 (窗口.编辑框_密码.内容 = “”)
密码 = 文本_取随机字母 (2)文本_取随机数字 (6)
窗口.超级列表框.置标题 (索引 - 1, 2, 密码)
如果真 (窗口.编辑框_密码.内容 ≠ “”)
密码 = 窗口.编辑框_密码.内容
窗口.超级列表框.置标题 (索引 - 1, 2, 密码)

. ' 如果真 (窗口.选择框_排除虚拟.选中 = )
' 代理IP = 网页_取外网IP ()

延迟 (500)
手机号码 = 获取手机号码 ()
窗口.超级列表框.保证显示 (索引)
判断 (取文本长度 (手机号码) = 11)
窗口.超级列表框.置标题 (索引 - 1, 1, 手机号码)
窗口.超级列表框.置标题 (索引 - 1, 5, “手机号获取成功”)
' 线程_临界_登陆.进入 ()
' 延迟 (500)
' 答题结果 = 注册.答题启用 (gt, challenge, 手机号码)
' 线程_临界_登陆.退出 ()
判断开始断 (答题结果 = “成功”)
' 窗口.超级列表框.置标题 (索引 - 1, 4, 答题结果)
' 窗口.超级列表框.置标题 (索引 - 1, 5, “发送短信”)
线程_临界_登陆.进入 ()
讯代理动态 (认证协议头)
调试输出 (认证协议头)
判断 (认证协议头 ≠ “”)
代理 = “forward.xdaili.cn:80”
认证协议头 = “”
代理 = “”

延迟 (500)
发送验证码返回 = 注册.发送验证码 (手机号码, 认证协议头, 代理)
线程_临界_登陆.退出 ()
判断 (寻找文本 (发送验证码返回, “成功”, , ) ≠ -1)
窗口.超级列表框.置标题 (索引 - 1, 3, “获取中”)
窗口.超级列表框.置标题 (索引 - 1, 5, “发送成功”)
获取手机验证码 (手机号码, 手机验证码)
调试输出 (手机验证码)
判断 (取文本长度 (手机验证码) = 6)
窗口.超级列表框.置标题 (索引 - 1, 3, 手机验证码)
窗口.超级列表框.置标题 (索引 - 1, 5, “提交注册”)
线程_临界_登陆.进入 ()
延迟 (500)
注册验证码返回 = 注册.提交注册 (手机号码, 手机验证码, uuid, 认证协议头, 代理)
线程_临界_登陆.退出 ()
判断 (寻找文本 (注册验证码返回, “成功”, , ) ≠ -1)
窗口.超级列表框.置标题 (索引 - 1, 5, “邀请成功”)
窗口.超级列表框.置标题 (索引 - 1, 5, “开始领取钻石”)
' 注册成功 = 注册成功 + 1
' 窗口.透明标签_已注册.标题 = 到文本 (注册成功)
' 写到文件 (取运行目录 () + “\注册成功.txt”, 到字节集 (到文本 (读入文件 (取运行目录 () + “\注册成功.txt”)) + 手机号码 + “----” + 密码 + #换行符))
线程_临界_登陆.进入 ()
领取钻石 = 注册.领取钻石 (uuid, 手机号码)
延迟 (1000)
线程_临界_登陆.退出 ()
判断 (寻找文本 (领取钻石, “成功”, , ) ≠ -1)
窗口.超级列表框.置标题 (索引 - 1, 5, “邀请成功|66钻石”)
注册成功 = 注册成功 + 1
' 窗口.透明标签_已注册.标题 = 到文本 (注册成功)
窗口.状态条.置文本 (3, “成功数量: ”到文本 (注册成功))
窗口.状态条.刷新显示 ()
写到文件 (取运行目录 ()“\注册成功.txt”, 到字节集 (到文本 (读入文件 (取运行目录 ()“\注册成功.txt”)) + 手机号码 + “----” + 密码 + #换行符 ))
窗口.超级列表框.置标题 (索引 - 1, 5, “邀请成功|领取失败”)
返回 ()

窗口.超级列表框.置标题 (索引 - 1, 5, 注册验证码返回)
返回 ()

窗口.超级列表框.置标题 (索引 - 1, 3, “获取不到”)
窗口.超级列表框.置标题 (索引 - 1, 5, “注册失败”)
返回 ()

' 窗口.超级列表框.置标题 (索引 - 1, 4, 发送验证码返回)
窗口.超级列表框.置标题 (索引 - 1, 5, 发送验证码返回)
返回 ()

' 窗口.超级列表框.置标题 (索引 - 1, 4, “答题失败”)
' 窗口.超级列表框.置标题 (索引 - 1, 5, “注册失败”)
' 返回 ()

窗口.超级列表框.置标题 (索引 - 1, 5, “获取手机号失败”)
返回 ()

窗口.状态条.刷新显示 ()
线程_取消COM库 ()


i支持库列表   支持库注释   
iext扩展界面支持库一
spec特殊功能支持库

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 诚聘英才| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报电话0663-3422125,QQ: 800073686,邮箱:800073686@b.qq.com
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表