新手问题关于多线程的

特特特瓦特 · 发表于 2022-8-27 11:47:11

先放代码
[e=0].版本 2

zc数量＝到整数 (编辑框_zc数量.内容)
线程数量＝到整数 (编辑框_线程数量.内容)

.如果真 (zc数量＜线程数量)
      线程数量＝zc数量

.如果真结束

创建状态＝线程池.创建 (线程数量, 线程数量, , , , , )

.如果真 (取反 (创建状态))
      日志 (“线程创建失败，请重试或者重新打开软件”)
      返回 ()
.如果真结束

.判断循环首 (zc成功＜ zc数量－ 1)
      空闲线程＝线程池.取_空闲线程数 ()

      .判断循环首 (空闲线程＝ 0)
         .如果真 (线程池.取_状态 () ≠ 1)
            返回 ()
         .如果真结束
         空闲线程＝线程池.取_空闲线程数 ()
         程序_延时 (200, )

      .判断循环尾 ()

      .计次循环首 (空闲线程, )
         线程池.投递任务 (&zc, zc成功, )

         ' 原子_递增 (投递计次)

         程序_延时 (200, )
      .计次循环尾 ()

      系统_处理事件 ()

.判断循环尾 ()

线程池.取_状态 ()

.判断循环首 (线程池.取_是否有空闲 () ＝假)  ' 100个员工开始干活了  没有干完
      .如果真 (线程池.取_状态 () ≠ 1)
         返回 ()
      .如果真结束
      程序_延时 (50, )
.判断循环尾 ()
线程池.销毁 (0, 真)
状态条 (6, “任务结束”)

接下来是问题, 希望我能够完全的表达出我所面临的问题。
我设计的是个一个zc机器，
目前能够实现  一个一个的zc，并且可以多线程的同时zc几个账号，    但是都是属于给一个拉新码进行zc。现在我想设计一个  可以同时导入多个拉新码，让他依次排队zc。
QQ截图20220827113905.png