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