求大神看下统计的问题

xiassang

在线人数统计-服务端.e (16.54 KB, 下载次数: 7)

2023-8-7 20:22 上传

点击文件名下载附件 在线人数统计-网关.e (956.51 KB, 下载次数: 5)

2023-8-7 20:22 上传

点击文件名下载附件 在线人数统计.rar (395 Bytes, 下载次数: 6)

2023-8-7 20:24 上传

点击文件名下载附件

求大神帮忙看下，非常感谢~~~

时髦猪

这样对吧

  

子程序名	返回值类型	公开	备 注
_服务器1_数据到达

变量名	类 型	静态	数组	备 注
i	整数型
k	整数型
获取在线列表包	文本型
接收数据	文本型
机器号	文本型
人数	文本型
总人数	整数型

如果真 (到文本 (服务器1.取回数据 ()) ＝ “获取在线列表”)
计次循环首 (超级列表框1.取表项数 (), i)
获取在线列表包 ＝ 超级列表框1.取标题 (i － 1, 1) ＋ “,” ＋ 获取在线列表包
计次循环尾 ()
服务器1.发送数据 (服务器1.取回客户 (), 获取在线列表包, )
返回 ()
如果真 (到文本 (服务器1.取回数据 ()) ＝ “新上线”)
计次循环首 (超级列表框1.取表项数 (), k)
服务器1.发送数据 (超级列表框1.取标题 (k － 1, 1), “列表标识” ＋ 到文本 (服务器1.取回客户 ()), )
计次循环尾 ()
返回 ()
接收数据 ＝ 到文本 (服务器1.取回数据 ())
机器号 ＝ 文本_取左边 (接收数据, “号机器”, , )
人数 ＝ 文本_取出中间文本 (接收数据, “当前总在线人数：”, “人”, , )
计次循环首 (超级列表框1.取表项数 (), i)
总人数 ＝ 总人数 ＋ 到整数 (超级列表框1.取标题 (i － 1, 3))
如果真 (超级列表框1.取标题 (i － 1, 2) ＝ 到文本 (服务器1.取回客户 ()))
超级列表框1.置标题 (i － 1, 1, 机器号)
超级列表框1.置标题 (i － 1, 3, 人数)

计次循环尾 ()
编辑框3.加入文本 (接收数据)
标签1.标题 ＝ 到文本 (“总在线人数：” ＋ 到文本 (总人数) ＋ “人”)

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _服务器1_数据到达<br /> .局部变量 i, 整数型<br /> .局部变量 k, 整数型<br /> .局部变量 获取在线列表包, 文本型<br /> .局部变量 接收数据, 文本型<br /> .局部变量 机器号, 文本型<br /> .局部变量 人数, 文本型<br /> .局部变量 总人数, 整数型<br /> <br /> .如果真 (到文本 (服务器1.取回数据 ()) ＝ “获取在线列表”)<br />     .计次循环首 (超级列表框1.取表项数 (), i)<br />         获取在线列表包 ＝ 超级列表框1.取标题 (i － 1, 1) ＋ “,” ＋ 获取在线列表包<br />     .计次循环尾 ()<br />     服务器1.发送数据 (服务器1.取回客户 (), 获取在线列表包, )<br />     返回 ()<br /> .如果真结束<br /> .如果真 (到文本 (服务器1.取回数据 ()) ＝ “新上线”)<br />     .计次循环首 (超级列表框1.取表项数 (), k)<br />         服务器1.发送数据 (超级列表框1.取标题 (k － 1, 1), “列表标识” ＋ 到文本 (服务器1.取回客户 ()), )<br />     .计次循环尾 ()<br />     返回 ()<br /> .如果真结束<br /> 接收数据 ＝ 到文本 (服务器1.取回数据 ())<br /> 机器号 ＝ 文本_取左边 (接收数据, “号机器”, , )<br /> 人数 ＝ 文本_取出中间文本 (接收数据, “当前总在线人数：”, “人”, , )<br /> <br /> .计次循环首 (超级列表框1.取表项数 (), i)<br />     总人数 ＝ 总人数 ＋ 到整数 (超级列表框1.取标题 (i － 1, 3))<br />     .如果真 (超级列表框1.取标题 (i － 1, 2) ＝ 到文本 (服务器1.取回客户 ()))<br />         超级列表框1.置标题 (i － 1, 1, 机器号)<br />         超级列表框1.置标题 (i － 1, 3, 人数)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 编辑框3.加入文本 (接收数据)<br /> 标签1.标题 ＝ 到文本 (“总在线人数：” ＋ 到文本 (总人数) ＋ “人”)

时髦猪

  

子程序名	返回值类型	公开	备 注
_服务器1_数据到达

变量名	类 型	静态	数组	备 注
i	整数型
k	整数型
获取在线列表包	文本型
接收数据	文本型
机器号	文本型
人数	文本型

如果真 (到文本 (服务器1.取回数据 ()) ＝ “获取在线列表”)
计次循环首 (超级列表框1.取表项数 (), i)
获取在线列表包 ＝ 超级列表框1.取标题 (i － 1, 1) ＋ “,” ＋ 获取在线列表包
计次循环尾 ()
服务器1.发送数据 (服务器1.取回客户 (), 获取在线列表包, )
返回 ()
如果真 (到文本 (服务器1.取回数据 ()) ＝ “新上线”)
计次循环首 (超级列表框1.取表项数 (), k)
服务器1.发送数据 (超级列表框1.取标题 (k － 1, 1), “列表标识” ＋ 到文本 (服务器1.取回客户 ()), )
计次循环尾 ()
返回 ()
接收数据 ＝ 到文本 (服务器1.取回数据 ())
机器号 ＝ 文本_取左边 (接收数据, “号机器”, , )
人数 ＝ 文本_取出中间文本 (接收数据, “当前总在线人数：”, “人”, , )
超级列表框1.置标题 (0, 1, 机器号)
超级列表框1.置标题 (0, 3, 人数)
编辑框3.加入文本 (接收数据)
标签1.标题 ＝ 到文本 (“总在线人数：” ＋ 人数 ＋ “人”)

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _服务器1_数据到达<br /> .局部变量 i, 整数型<br /> .局部变量 k, 整数型<br /> .局部变量 获取在线列表包, 文本型<br /> .局部变量 接收数据, 文本型<br /> .局部变量 机器号, 文本型<br /> .局部变量 人数, 文本型<br /> <br /> .如果真 (到文本 (服务器1.取回数据 ()) ＝ “获取在线列表”)<br />     .计次循环首 (超级列表框1.取表项数 (), i)<br />         获取在线列表包 ＝ 超级列表框1.取标题 (i － 1, 1) ＋ “,” ＋ 获取在线列表包<br />     .计次循环尾 ()<br />     服务器1.发送数据 (服务器1.取回客户 (), 获取在线列表包, )<br />     返回 ()<br /> .如果真结束<br /> .如果真 (到文本 (服务器1.取回数据 ()) ＝ “新上线”)<br />     .计次循环首 (超级列表框1.取表项数 (), k)<br />         服务器1.发送数据 (超级列表框1.取标题 (k － 1, 1), “列表标识” ＋ 到文本 (服务器1.取回客户 ()), )<br />     .计次循环尾 ()<br />     返回 ()<br /> .如果真结束<br /> 接收数据 ＝ 到文本 (服务器1.取回数据 ())<br /> 机器号 ＝ 文本_取左边 (接收数据, “号机器”, , )<br /> 人数 ＝ 文本_取出中间文本 (接收数据, “当前总在线人数：”, “人”, , )<br /> 超级列表框1.置标题 (0, 1, 机器号)<br /> 超级列表框1.置标题 (0, 3, 人数)<br /> 编辑框3.加入文本 (接收数据)<br /> 标签1.标题 ＝ 到文本 (“总在线人数：” ＋ 人数 ＋ “人”)

一个客户可以这样  把接收来的数据自己区分一下

xiassang

时髦猪 发表于 2023-8-7 23:35
[e=4].版本 2
.支持库 iext

如果有第二客户进来 列表框里第一行就会变动成第二行一样了

时髦猪

xiassang 发表于 2023-8-8 00:50
如果有第二客户进来 列表框里第一行就会变动成第二行一样了

对 告诉你了 一个客户这样的
没做过服务器这种  我研究下