多线程更换接口

是布布吖

程序运行过程中，访问多了会拉黑，这时候需要更换接口，但是多线程过程中更换接口会和其他接口拉黑状态冲突，导致1，2接口拉黑，但是后续3接口没有拉黑。更换3接口后受到1，2接口拉黑影响，3接口也跑不起来。有没有大佬能不能帮忙解决一下。下面是问题代码

  

子程序名	返回值类型	公开	备 注
更换域名

进入许可区 (许可证)
调试输出 (“准备换接口”)
原子_递增 (更换次数)
原子_递增 (全局_域名)
如果真 (全局_域名 ＝ 4 且 线程池.等待任务动态 (, ) ＝ 真)
状态条1.置文本 (2, “接口拉黑，休息30分钟”)
线程池.暂停 ()
_延迟 (2100000)
线程池.继续 ()
全局_域名 ＝ 1
状态条1.置文本 (1, “更换接口” ＋ 到文本 (全局_域名) ＋ “，更换次数：” ＋ 到文本 (更换次数))
退出许可区 (许可证)

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

变量名	类 型	静态	数组	备 注
总任务数	整数型
并发线程	整数型
当前任务数	整数型
n	整数型
空闲数	整数型
b	整数型
bool	逻辑型

如果真 (编辑框_线程.内容 ＝ “”)
信息框 (“请输入并发线程数”, 64, , )
返回 ()
按钮_开始.禁止 ＝ 真
总任务数 ＝ 帐号总数
并发线程 ＝ 到整数 (编辑框_线程.内容)
当前任务数 ＝ 总任务数
如果真 (取反 (线程池.创建 (并发线程, 并发线程, )))
信息框 (“线程池创建失败!”, 64, , )
返回 ()
关闭线程句柄 (线程句柄)
判断循环首 (n ＜ 总任务数)
空闲数 ＝ 线程池.取_空闲线程数 ()
如果真 (空闲数 ＞ 0)
当前任务数 ＝ 总任务数 － n
如果真 (当前任务数 ＞ 空闲数)
当前任务数 ＝ 空闲数
计次循环首 (当前任务数, )
n ＝ n ＋ 1
线程池.投递任务 (&子线程, n, )
计次循环尾 ()
线程池.等待任务动态 ()
判断循环尾 ()
判断循环首 (线程池.取_是否空闲 () ＝ 假)
如果真 (线程池.取_状态 () ≠ #线程池_正在工作 )
跳出循环 ()
线程池.等待任务动态 (100)
判断循环尾 ()
线程池.销毁 (, , )
按钮_开始.禁止 ＝ 假

子程序名	返回值类型	公开	备 注
子线程
参数名	类 型	参考	可空	数组	备 注
n	整数型

变量名	类 型	静态	数组	备 注
索引	整数型
状态码	文本型
str	文本型
是否读完	逻辑型
mz	文本型
ip	文本型
arr	文本型		0
msg	文本型
fhck	文本型
bool	逻辑型

获取账号 (str)
如果真 (str ≠ “”)
msg ＝ 三无 (str)
返回 ()

子程序名	返回值类型	公开	备 注
三无	文本型
参数名	类 型	参考	可空	数组	备 注
ret

判断 (全局_域名 ＝ 1)
path ＝ “a.com”
判断 (全局_域名 ＝ 2)
path ＝ “b.com”
判断 (全局_域名 ＝ 3)
path ＝ “c.com”


url ＝ “https://” ＋ path ＋ “/“+RET
' url ＝ “https://ui.ptlogin2.qq.com/ssl/check?pt_tea=2&uin=” ＋ Uin ＋ “&appid=1600001573&ptlang=2052®master=&pt_uistyle=9&o1vId=57368ac65e44ed800c2e9511cf1bf19f&daid=761&pt_3rd_aid=0&r=0.16041305934739503&pt_js_version=530c3f68”
ret ＝ 到文本 (网页_访问_对象 (url, , , , , , , , , , ips, 2, , , , , , , ))
如果真 (寻找文本 (ret, “501page”, , 假) ≠ -1)
更换域名 ()
返回 (“接口拉黑”)

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

.版本 2<br /> .支持库 EThread<br /> .支持库 spec<br /> .支持库 iext<br /> <br /> .子程序 更换域名<br /> <br /> 进入许可区 (许可证)<br /> 调试输出 (“准备换接口”)<br /> 原子_递增 (更换次数)<br /> 原子_递增 (全局_域名)<br /> .如果真 (全局_域名 ＝ 4 且 线程池.等待任务动态 (, ) ＝ 真)<br />     状态条1.置文本 (2, “接口拉黑，休息30分钟”)<br />     线程池.暂停 ()<br />     _延迟 (2100000)<br />     线程池.继续 ()<br />     全局_域名 ＝ 1<br /> .如果真结束<br /> 状态条1.置文本 (1, “更换接口” ＋ 到文本 (全局_域名) ＋ “，更换次数：” ＋ 到文本 (更换次数))<br /> 退出许可区 (许可证)<br /> <br /> .子程序 主线程<br /> .局部变量 总任务数, 整数型<br /> .局部变量 并发线程, 整数型<br /> .局部变量 当前任务数, 整数型<br /> .局部变量 n, 整数型<br /> .局部变量 空闲数, 整数型<br /> .局部变量 b, 整数型<br /> .局部变量 bool, 逻辑型<br /> <br /> .如果真 (编辑框_线程.内容 ＝ “”)<br />     信息框 (“请输入并发线程数”, 64, , )<br />     返回 ()<br /> .如果真结束<br /> 按钮_开始.禁止 ＝ 真<br /> 总任务数 ＝ 帐号总数<br /> 并发线程 ＝ 到整数 (编辑框_线程.内容)<br /> 当前任务数 ＝ 总任务数<br /> .如果真 (取反 (线程池.创建 (并发线程, 并发线程, )))<br />     信息框 (“线程池创建失败!”, 64, , )<br />     返回 ()<br /> .如果真结束<br /> 关闭线程句柄 (线程句柄)<br /> .判断循环首 (n ＜ 总任务数)<br />     空闲数 ＝ 线程池.取_空闲线程数 ()<br />     .如果真 (空闲数 ＞ 0)<br />         当前任务数 ＝ 总任务数 － n<br />         .如果真 (当前任务数 ＞ 空闲数)<br />             当前任务数 ＝ 空闲数<br />         .如果真结束<br />         .计次循环首 (当前任务数, )<br />             n ＝ n ＋ 1<br />             线程池.投递任务 (&子线程, n, )<br />         .计次循环尾 ()<br />     .如果真结束<br />     线程池.等待任务动态 ()<br /> .判断循环尾 ()<br /> .判断循环首 (线程池.取_是否空闲 () ＝ 假)<br />     .如果真 (线程池.取_状态 () ≠ #线程池_正在工作)<br />         跳出循环 ()<br />     .如果真结束<br />     线程池.等待任务动态 (100)<br /> .判断循环尾 ()<br /> 线程池.销毁 (, , )<br /> 按钮_开始.禁止 ＝ 假<br /> <br /> <br /> .子程序 子线程<br /> .参数 n, 整数型<br /> .局部变量 索引, 整数型<br /> .局部变量 状态码, 文本型<br /> .局部变量 str, 文本型<br /> .局部变量 是否读完, 逻辑型<br /> .局部变量 mz, 文本型<br /> .局部变量 ip, 文本型<br /> .局部变量 arr, 文本型, , "0"<br /> .局部变量 msg, 文本型<br /> .局部变量 fhck, 文本型<br /> .局部变量 bool, 逻辑型<br /> <br /> 获取账号 (str)<br /> .如果真 (str ≠ “”)<br />     msg ＝ 三无 (str)<br /> .如果真结束<br /> 返回 ()<br /> <br /> .子程序 三无, 文本型<br /> .参数 ret<br /> <br /> .判断开始 (全局_域名 ＝ 1)<br />     path ＝ “a.com”<br /> .判断 (全局_域名 ＝ 2)<br />     path ＝ “b.com”<br /> .判断 (全局_域名 ＝ 3)<br />     path ＝ “c.com”<br /> .默认<br /> <br /> .判断结束<br /> url ＝ “https://” ＋ path ＋ “/“+RET<br /> ' url ＝ “<a href="https://ui.ptlogin2.qq.com/ssl/check?pt_tea=2&uin=" rel="nofollow" rel="nofollow" target="_blank">https://ui.ptlogin2.qq.com/ssl/check?pt_tea=2&uin=</a>” ＋ Uin ＋ “&appid=1600001573&ptlang=2052®master=&pt_uistyle=9&o1vId=57368ac65e44ed800c2e9511cf1bf19f&daid=761&pt_3rd_aid=0&r=0.16041305934739503&pt_js_version=530c3f68”<br /> ret ＝ 到文本 (网页_访问_对象 (url, , , , , , , , , , ips, 2, , , , , , , ))<br /> .如果真 (寻找文本 (ret, “501page”, , 假) ≠ -1)<br />     更换域名 ()<br />     返回 (“接口拉黑”)<br /> .如果真结束

冷渣渣

挂代理吧

ZHuanR

感谢分享，很给力！~

lx2018

软件模块没有 ，按钮没有，跑不起来，很想帮助你很难啊

KD飞飞

我的怪500j b过来看一眼

imoling

好多钱，来看看。花里胡哨的，看的头大。先明确几点，所谓接口是什么？是换ip吧。。1个代理是给所有的1234n同时使用，还是分开更换时候。如果同时的，在遇到拉黑状态就让所有请求都停，设置一个全局量，直到切换过去后才能继续，如果是分开换代理的，那多线程就可以搞定，各干各的。。