易语言服务器组件多线程源码

交换_变量交地址ASM (线程参数, 变量地址)
调试输出 (线程参数.客户IP, 线程参数.请求内容)
.子程序 _服务器程序_客户进入
.局部变量 线程参数, 线程参数
线程参数.客户IP ＝ 服务器程序.取回客户 ()
启动线程 (&客户进入, 取变量地址 (线程参数), )
延时 (100)  ' 延时不可以删
.子程序 客户进入
.参数 变量地址, 整数型
.局部变量 线程参数, 线程参数
交换_变量交地址ASM (线程参数, 变量地址)
调试输出 (线程参数.客户IP)