IOCP多线程超级简单的写法

分享一个超级简单的多线程写法，简单的不得了。
.子程序 线程池_创建, , , 可以做个标记，无线+创建...
.参数 最大线程数, 整数型, 可空

许可证 ＝ 创建进入许可证 ()
.如果真 (最大线程数 ＝ 0)
最大线程数 ＝ 50
.如果真结束
.计次循环首 (最大线程数, )
启动线程 (&待命, , )
.计次循环尾 ()