易语言写取回服务器返回的封包？

版本 2
子程序 __启动窗口_创建完毕
如果 (客户1连接 (“127001”, 80)) ' 连接服务端
否则
信息框 (“连接失败！”, #错误图标, “错误”)
如果结束
子程序 _客户1_数据到达
局部变量 数据, 字节集
数据 ＝ 客户1取回数据 () ' 这就是取回的数据
客户1发送数据 (数据) ' 将取回的包发送给服务端

---