中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 是否为停顿时间而烦恼? 进来看看有收获!

kennyfan
中级用户

积分 259
发帖 112
注册 2006-9-18
状态离线

『楼主』: 是否为停顿时间而烦恼? 进来看看有收获!

2K之后的系统没有choice,想实现停顿时间比较麻烦如果各位有好的批处请贡献一下本人感激不尽
以下为我暂时所知的几个代码
1.精确度可达到0.001秒哦.3000为三秒
@echo off
  echo WScript.Sleep 3000 > time.vbs
  cscript //nologo time.vbs
  echo %time%
  for %%f in (time.vbs) do if exist %%f del %%f
  endlocal & goto EOF

2.这个比较好理解,利用for解析变量%time%并存为一个时间点,再利用set计算两个时间点的时间差，最后用if判断时间差是否达到设定的暂停时间.精确度可达到0.01秒.
@echo off
  call :ProcDelay 300
  echo %time%
  goto EOF
:ProcDelay
  for /f "tokens=1-4 delims=:. " %%h in ("%time%") do set start_=%%h%%i%%j%%k
:wait
for /f "tokens=1-4 delims=:. " %%h in ("%time%") do set now_=%%h%%i%%j%%k
set /a diff_=%now_%-%start_%
  if %diff_% LSS %1 goto wait
  endlocal & goto EOF

3.想要最简单的还是下载个choice.exe的文件吧!可是如果去到其他人的机子里忘了带这个choice文件,那你建的批处理就基本等于废了!
choice /c y /n /t 2 /d y

[ Last edited by kennyfan on 2006-9-20 at 21:37 ]