HP-Socket-5.5.1中文模块附带例子

全_服务器句柄 ＝ PACK服务端.创建 (选择框_SSL.选中)
.如果真 (选择框_SSL.选中 ＝ 真)
PACK服务端.清理SSL (全_服务器句柄)
PACK服务端.初始化SSL (全_服务器句柄, #SSL_SM_CLIENT, “ssl-cert\client.cer”, “ssl-cert\client.key”, “123456”, “ssl-cert\ca.crt”, )
.如果真结束
PACK服务端.事件_监听 (&监听事件)
PACK服务端.事件_接受 (&客户进入事件)
PACK服务端.事件_发送 (&发送事件)
PACK服务端.事件_接收 (&接收事件)
PACK服务端.事件_断开 (&客户端断开事件)
PACK服务端.事件_关闭 (&关闭事件)
PACK服务端.事件_握手 (&握手事件)
PACK服务端.置最大连接数 (全_服务器句柄, 2000)
PACK服务端.置发送策略 (全_服务器句柄, 1) ' 0=打包模式 1=安全模式 2=直接模式
PACK服务端.置数据包最大长度 (全_服务器句柄, 4194303)
PACK服务端.置包头标识 (全_服务器句柄, 1023)
动态设置组件状态 (#ST_STARTING)
.如果 (PACK服务端.启动 (全_服务器句柄, 绑定地址, 端口))
输出日志 (“服务器启动成功绑定地址为；” ＋ 绑定地址 ＋ “端口为；” ＋ 到文本 (端口))
动态设置组件状态 (#ST_STARTED)
PACK服务端.置工作线程数量 (全_服务器句柄, 1000)
PACK服务端.置心跳包间隔 (全_服务器句柄, 1000)
.否则
输出日志 (“服务器启动失败错误描述为；” ＋ PACK服务端.取错误描述 (全_服务器句柄) ＋ “错误代码为；” ＋ 到文本 (PACK服务端.取错误代码 (全_服务器句柄)) ＋ “)”)
动态设置组件状态 (#ST_STOPED)