[mush]无聊写了个ping()函数

hijacker

应该比控制台里的ping更能反映真实的游戏速度吧。。
用法：ping() 或 ping(检查次数)，比如ping(20)

1. 
   
2. function ping(times)
   
3.         require "wait"
   
4.         n = times or 4
   
5.         fmt = function(num)
   
6.                 return string.format("%d 毫秒", num * 1000)
   
7.         end
   
8.         timeout = 20
   
9.         wait.make(function()
   
10.                 local time_start = utils.timer()
    
11.                 local time_pre = time_start
    
12.                 local time_max = 0
    
13.                 local time_min = -1
    
14.                 local lost = 0
    
15.                 local t = 0
    
16.                 local time_now = 0
    
17.                 SendNoEcho("set ping start")
    
18.                 for i = 1, n do
    
19.                         local l, w = wait.regexp("ping", timeout)
    
20.                         if not l then        lost = lost + 1        end
    
21.                         time_now = utils.timer()
    
22.                         t = time_now -time_pre
    
23.                         time_pre = time_now
    
24.                        
    
25.                         if l then
    
26.                                 if t > time_max then        time_max = t        end
    
27.                                 if time_min == -1 then        time_min = t        end
    
28.                                 if t < time_min then        time_min = t        end
    
29.                         end
    
30.                         if i ~= n + 1 then
    
31.                                 SendNoEcho("set ping '" .. fmt(t) .. "'")
    
32.                         end
    
33.                 end
    
34.                 local l, w = wait.regexp("ping", timeout)
    
35.                 local time_end = utils.timer()
    
36.                 local average = (time_now-time_start) / n
    
37.                 print("已发送 = " .. n .. "， 丢失 = " .. lost .. " (" .. string.format("%d%%", lost / n * 100) .. ")")
    
38.                 print("最短 = " .. fmt(time_min) .. "， 最长 = " .. fmt(time_max) .. "， 平均 = " .. fmt(average))
    
39.         end)
    
40. end
    

复制代码

北大侠客行MUD，中国最好的MUD

zgbl

……bt毁三观

nsonline

确实得无聊才能做，不过挺有意思的

labaz

一个命令按住回车不放就能知道流畅程度了

zgbl

手动从扬州一路跑到武当山就明白流畅程度了

rubble

都说了,真无聊

rainsco

无聊你就看过来