部分代码:
.版本 2 .支持库 EThread .程序集 窗口程序集 .程序集变量 许可证, 整数型 .子程序 _按钮1_被单击 按钮1.禁止 = 真 转发句柄 = 服务端启动 (“0.0.0.0”, 到整数 (编辑框1.内容)) .判断开始 (转发句柄 > 0) 日志 (“服务器启动成功!”) .默认 按钮1.禁止 = 假 日志 (“服务器启动失败!”) .判断结束 .子程序 日志 .参数 str, 文本型 进入许可区 (许可证) 编辑框2.加入文本 (str + #换行符) 退出许可区 (许可证) .子程序 __启动窗口_创建完毕 日志 (“国际女流氓:9970-96811”) 初始化 () .子程序 取连接信息, 逻辑型, 公开 .参数 ip, 文本型, 参考 .参数 端口, 整数型, 参考 ip = 编辑框4.内容 端口 = 到整数 (编辑框3.内容) 返回 (真)