快速业务通道

用批处理实现的反应速度测试工具

作者 佚名 来源 批处理 浏览 发布时间 2013-07-09
复制代码 代码如下:

::此工具在Win7和Vista下请使用管理员身份运行!
@echo off
cd.>%windir%\time.log
set n=
:start
mode con cols=45 lines=14
Title 反应速度测试工具
color 8a

set a=
set b=
set s=
set/a n+=1
set t=%time:~9,1%
cls&echo.&echo.&echo.
echo.
echo.
echo 反应速度测试工具
echo.
echo 当窗口变成红色的时候,迅速按下回车键,程序将
echo.
echo 测试你的反应速度并显示出来,精确度为0.01秒
echo.
echo Johnny.R的反应速度为0.11秒,看你能否超越他
echo.
echo 看平均反应速度请按 Q
echo.
echo 按回车键开始测试
echo.
set /p s=
if "%s%"=="q" goto pingjun
if "%s%"=="Q" goto pingjun

cls
mode con cols=23 lines=6
title 开始测试...
echo.&echo.
color 0a
ping -n %t% 127.1 >nul
color 4a
set a=%time:~3,2%%time:~6,2%%time:~9,2%
pause >nul
set b=%time:~3,2%%time:~6,2%%time:~9,2%
set /a b-=a
::减去程序运行时0.01秒的运算速度
set /a b-=1
echo.&echo.
if "%b:~0,1%"=="%b:~0,2%" goto end3
if "%b:~0,2%"=="%b:~0,3%" goto end1
if not "%b:~0,2%"=="%b:~0,3%" goto end2

::结果
:end1
title 测试结果
cls&echo.&echo.
echo 你的反应速度为 0.%b%秒
echo.
if "%b:~0,1%"=="2" echo 或许还能更快些...
if "%b:~0,1%"=="1" echo 我太崇拜你了!
echo %b%>>%windir%\time.log
echo 按任意键重新开始...
pause >nul
goto start

:end2
title 测试结果
cls&echo.&echo.
echo 你的反应速度为 %b:~0,1%.%b:~1,2%秒
echo.
echo %b%>>%windir%\time.log
echo 我终于看到传说中的“蜗牛”了!
echo 按任意键重新开始...
pause >nul
goto start

:end3
title 测试结果
cls&echo.
echo 你的反应速度为 0.0%b%秒
echo.
echo 你简直是神!!!
echo.
echo %b%>>%windir%\time.log
echo 按任意键重新开始...
pause >nul
goto start

:end4
cls&echo.
echo 你的平均反应速度为 0.0%p%秒
echo.
echo 你是我的偶像!!
echo.
echo 按任意键重新开始...
pause >nul
goto start

:end5
cls&echo.
echo 你的平均反应速度为 0.%p%秒
echo.
if "%p:~0,1%"=="2" echo 不错,加油~
if "%p:~0,1%"=="1" echo 哇..新一代狙神~
echo.
echo 按任意键重新开始...
pause >nul
goto start

:end6
cls&echo.
echo 你的平均反应速度为 %p:~0,1%.%p:~1,2%秒
echo.
echo 我劝你放弃CS吧....
echo.
echo 按任意键重新开始...
pause >nul
goto start

:pingjun
cls
set/a n-=1
set k=
for /f %%i in (%windir%\time.log) do (
set /a k+=%%i
)
set /a p=k/n
title 平均速度
mode con cols=25 lines=8
color 0a
if "%p:~0,1%"=="%p:~0,2%" goto end4
if "%p:~0,2%"=="%p:~0,3%" goto end5
if not "%p:~0,2%"=="%p:~0,3%" goto end6
echo 未知错误...
ping -n 2 127.1>nul
goto start

::本人水平有限,不足的地方请指出,谢谢!

凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务,公司网站:http://www.lingzhong.cn 为了给广大客户了解更多的技术信息,本技术文章收集来源于网络,凌众科技尊重文章作者的版权,如果有涉及你的版权有必要删除你的文章,请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!

分享到: 更多

Copyright ©1999-2011 厦门凌众科技有限公司 厦门优通互联科技开发有限公司 All rights reserved

地址(ADD):厦门软件园二期望海路63号701E(东南融通旁) 邮编(ZIP):361008

电话:0592-5908028 传真:0592-5908039 咨询信箱:web@lingzhong.cn 咨询OICQ:173723134

《中华人民共和国增值电信业务经营许可证》闽B2-20100024  ICP备案:闽ICP备05037997号