合理的 速度统计，运行时速统计

神女软件定制

当我们多线程运行时，一般都是循环的处理很多条数.据，
有时候我们想知道运行的大约速度。

最简单的办法就是：完成总数量/花费时间=速度

  

窗口程序集名	保 留	保 留	备 注
速度统计类_不合理
变量名	类 型	数组	备 注
cx_计数	整数型
cx_启动时间	整数型

子程序名	返回值类型	公开	备 注
_初始化			当基于本类的对象被创建后，此方法会被自动调用

子程序名	返回值类型	公开	备 注
_销毁			当基于本类的对象被销毁前，此方法会被自动调用

子程序名	返回值类型	公开	备 注
启动

cx_计数 ＝ 0
cx_启动时间 ＝ 取启动时间 ()

子程序名	返回值类型	公开	备 注
添加

sn_InterlockedIncrement (cx_计数)

子程序名	返回值类型	公开	备 注
速度	整数型

返回 (cx_计数 × 60 × 60 × 1000 ÷ (取启动时间 () － cx_启动时间))

.版本 2<br /> <br /> .程序集 速度统计类_不合理<br /> .程序集变量 cx_计数, 整数型<br /> .程序集变量 cx_启动时间, 整数型<br /> <br /> .子程序 _初始化, , , 当基于本类的对象被创建后，此方法会被自动调用<br /> <br /> <br /> <br /> .子程序 _销毁, , , 当基于本类的对象被销毁前，此方法会被自动调用<br /> <br /> <br /> <br /> .子程序 启动, , 公开<br /> <br /> cx_计数 ＝ 0<br /> cx_启动时间 ＝ 取启动时间 ()<br /> <br /> .子程序 添加, , 公开<br /> <br /> sn_InterlockedIncrement (cx_计数)<br /> <br /> .子程序 速度, 整数型, 公开<br /> <br /> 返回 (cx_计数 × 60 × 60 × 1000 ÷ (取启动时间 () － cx_启动时间))

但是这个方法有个问题，比如在执行post或get之类的操作，
假设前面半个小时，服务器响应很快，速度统计是正常的，假设速度为10W每小时
后面突然服务器没有响应了，这种统计不能体现出这种变化，后面半个小时，都是完全停止状态，速度最终会显示为5W每小时。

——————————

后面意识到，要体现出这种突然的速度变化，应该采样尽可能短时间内的数量（像利息用7日年化那种算法一样）
可以假设采样10秒内的数量，来计算时速

这样，要把，每个任务，完成的时间都记录下来

发个统计运行速度的源码
https://bbs.125.la/forum.php?mod=viewthread&tid=14727725
(出处: 精易论坛)

  

窗口程序集名	保 留	保 留	备 注
速度统计类_旧
变量名	类 型	数组	备 注
cx_许可证	整数型
cx_记录	整数型	0

子程序名	返回值类型	公开	备 注
_初始化			当基于本类的对象被创建后，此方法会被自动调用

cx_许可证 ＝ 创建进入许可证 ()

子程序名	返回值类型	公开	备 注
_销毁			当基于本类的对象被销毁前，此方法会被自动调用

删除进入许可证 (cx_许可证)

子程序名	返回值类型	公开	备 注
添加

进入许可区 (cx_许可证)
加入成员 (cx_记录, 取启动时间 ())
退出许可区 (cx_许可证)

子程序名	返回值类型	公开	备 注
十秒时化	整数型

变量名	类 型	静态	数组	备 注
jb_t	整数型
jb_计次	整数型
jb_数量	整数型

jb_t ＝ 取启动时间 ()
进入许可区 (cx_许可证)
计次循环首 (取数组成员数 (cx_记录), jb_计次)
如果 (jb_t － cx_记录 [jb_计次] ＞ 10000)
jb_数量 ＝ jb_数量 ＋ 1
跳出循环 ()

计次循环尾 ()
如果真 (jb_数量 ＞ 0)
删除成员 (cx_记录, 1, jb_数量)
jb_数量 ＝ 取数组成员数 (cx_记录)
退出许可区 (cx_许可证)
返回 (jb_数量 × 6 × 60)

i支持库列表	支持库注释
EThread	多线程支持库

.版本 2<br /> .支持库 EThread<br /> <br /> .程序集 速度统计类_旧<br /> .程序集变量 cx_许可证, 整数型<br /> .程序集变量 cx_记录, 整数型, , "0"<br /> <br /> .子程序 _初始化, , , 当基于本类的对象被创建后，此方法会被自动调用<br /> <br /> cx_许可证 ＝ 创建进入许可证 ()<br /> <br /> .子程序 _销毁, , , 当基于本类的对象被销毁前，此方法会被自动调用<br /> <br /> 删除进入许可证 (cx_许可证)<br /> <br /> .子程序 添加, , 公开<br /> <br /> 进入许可区 (cx_许可证)<br /> 加入成员 (cx_记录, 取启动时间 ())<br /> 退出许可区 (cx_许可证)<br /> <br /> .子程序 十秒时化, 整数型, 公开<br /> .局部变量 jb_t, 整数型<br /> .局部变量 jb_计次, 整数型<br /> .局部变量 jb_数量, 整数型<br /> <br /> jb_t ＝ 取启动时间 ()<br /> 进入许可区 (cx_许可证)<br /> .计次循环首 (取数组成员数 (cx_记录), jb_计次)<br />     .如果 (jb_t － cx_记录 [jb_计次] ＞ 10000)<br />         jb_数量 ＝ jb_数量 ＋ 1<br />     .否则<br />         跳出循环 ()<br />     .如果结束<br /> <br /> .计次循环尾 ()<br /> .如果真 (jb_数量 ＞ 0)<br />     删除成员 (cx_记录, 1, jb_数量)<br /> .如果真结束<br /> jb_数量 ＝ 取数组成员数 (cx_记录)<br /> 退出许可区 (cx_许可证)<br /> 返回 (jb_数量 × 6 × 60)

这个也有一个问题，完成一个任务，都要在数组里面添加一个成员，效率低。
如果任务速度很快，数组就会很大，虽然会自动删除掉10秒前的记录
但是数组频繁增删，本来就很低效率。

——————————

后面弄了一个很完美的算法，
执行完一个任务后，用于统计信息的的代码，就一行：
InterlockedIncrement (cx_计数)
相当于cx_计数=cx_计数+1，但是多线程，使用了原子递增函数，防止漏掉


下载：
速度统计类.e (13.1 KB, 下载次数: 61)

2022-7-31 18:26 上传

点击文件名下载附件

wolfpack

seigui

看了下 挺方便的

风清云游

看看 支持一个

lm88818

支持开源~！感谢分享

515667395

多谢分享

易学哲

无论如何，有点贵

lmwdz

支持开源~！感谢分享

布鲁惠斯

开源精神必须支持~

aaa88888

感谢了，是不错的东西，收藏了