|
我的步骤是,导入100个账号,然后多线程启动,只想在5个模拟器运行这些账号,完成就换号,根据网上视频写的,没有好点的思路,有大神帮们看下吗?
.版本 2
.支持库 iext
.支持库 spec
.程序集 窗口程序集_启动窗口
.子程序 _按钮启动_被单击
.局部变量 多开数量, 整数型
多开数量 = 到整数 (编辑框1.内容)
重定义数组 (乐玩多线程, 假, 超级列表框1.取表项数 ())
全局线程句柄 = 线程_启动 (&主线程循环, , )
.子程序 主线程循环
.局部变量 总账号数目, 整数型
.局部变量 投递次数, 整数型
.局部变量 可用线程, 整数型
.局部变量 i, 整数型
.局部变量 多开数量, 整数型
总账号数目 = 超级列表框1.取表项数 ()
多开数量 = 到整数 (编辑框1.内容)
' 调试输出 (全局线程句柄)
.计次循环首 (超级列表框1.取表项数 (), i)
超级列表框1.现行选中项 = i - 1
超级列表框1.获取焦点 ()
乐玩多线程 [i].线程句柄 = 线程_启动 (&窗口线程, i, ) ' 开始启动窗口线程,zc大漠
延时 (5000)
.如果 (乐玩多线程 [i].线程句柄 > 0)
调试输出 (“线程” + 到文本 (i) + “启动成功”)
全局窗口数量 = 全局窗口数量 + 1
.否则
调试输出 (“线程” + 到文本 (i) + “启动失败”)
.如果结束
.判断循环首 (真)
.如果真 (全局窗口数量 < 多开数量)
跳出循环 ()
.如果真结束
延时 (2000)
.判断循环尾 ()
延时 (1000)
.计次循环尾 ()
.子程序 窗口线程
.参数 i, 整数型
ld.启动模拟器 (i, )【这里不应该写I,没有好点的思路】
超级延时 (10000, 0)
|
|