标题: 求一个可以记时的批处理 [打印本页]
作者: eech 时间: 2007-1-19 12:17 标题: 求一个可以记时的批处理
比如从00:00:01开始的批处理
作者: PPdos 时间: 2007-1-19 20:58 标题: 语音消息框合并--定时器（xp）
Rem 将文件名保存为你想设定的时间例如现在11:35:21你想设定为11:36运行
Rem 便更改文件名"计时器.bat"为1136.bat(精确到分钟,文件名补足4位)
@echo off&title 定时器&color 0D
mode con cols=15 lines=3&set l=%time: =0%&set n=%l::=%
if "%n:~0,-5%"=="%~n0" start mshta vbscript:CreateObject("SAPI.SpVoice").Speak("sorry Your time is limited!")(Window.close)&msg %username% Sorry your time is limited!
ping 127.0|set /p l= %time:~0,-3%&cls&%0
Msgbox "Sorry your time is limited"
附件 1:定时器.rar (2007-1-19 20:59, 487 bytes, 下载附件所需积分 1点 ,下载次数： 139)
作者: boluor 时间: 2007-1-19 21:44
好象是每三秒改变一次,很不错了.不过你搞那个"your time is limited ",有什么用吗?搞得我以为是在修改我电脑上的时间啊,又惹的电脑出现了一个实时调试的对话框.....
作者: everest79 时间: 2007-1-19 21:59
试试看
@ECHO OFF
SET TIMEON=%TIME:~0,-3%
:TIME1
SET /A S9=%TIME:~7,1%,S1+=S
SET /A H=S1/3600,M=S1%%3600/60,S=S1%%3600%%60
CLS&ECHO stopwatch %H%:%M%:%S% current:%TIME:~0,-3% timeon:%TIMEON% secs=%S1% %S9%
::SET /A S1/(S1-100000) 2>nul||GOTO NEXT
:TIME0
SET /A S=(((%TIME:~7,1%-S9)*2+1)%%2*(%TIME:~7,1%-S9)*10)/(((%TIME:~7,1%-S9)*2+1)%%2*(%TIME:~7,1%-S9)*10-1)
GOTO TIME%S%
SET TIMEON=%TIME:~0,-3%
:TIME1
SET /A S9=%TIME:~7,1%,S1+=S
SET /A H=S1/3600,M=S1%%3600/60,S=S1%%3600%%60
CLS&ECHO stopwatch %H%:%M%:%S% current:%TIME:~0,-3% timeon:%TIMEON% secs=%S1% %S9%
::SET /A S1/(S1-100000) 2>nul||GOTO NEXT
:TIME0
SET /A S=(((%TIME:~7,1%-S9)*2+1)%%2*(%TIME:~7,1%-S9)*10)/(((%TIME:~7,1%-S9)*2+1)%%2*(%TIME:~7,1%-S9)*10-1)
GOTO TIME%S%
作者: PPdos 时间: 2007-1-19 22:08 标题: 计时器
@echo off&mode con cols=20 lines=2
title 计时器&color 0D
set /a H=0,M=0,S=0
set /a H=%t%%%86400/3600 2>nul
set /a M=%t%%%86400%%3600/60 2>nul
set /a S=%t%%%86400%%3600%%60 2>nul
@ping -n 2 127.0|set/p l= 已计时间: %H%:%M%:%S%&set /a t+=1&cls&%0
-n 修改为2 初始化参数为0 完成title 计时器&color 0D
set /a H=0,M=0,S=0
set /a H=%t%%%86400/3600 2>nul
set /a M=%t%%%86400%%3600/60 2>nul
set /a S=%t%%%86400%%3600%%60 2>nul
@ping -n 2 127.0|set/p l= 已计时间: %H%:%M%:%S%&set /a t+=1&cls&%0
[ Last edited by PPdos on 2007-1-24 at 11:52 PM ]
附件 1:
作者: boluor 时间: 2007-1-19 22:18
果然是高啊....顶上来!!!!!!!!!!!
作者: everest79 时间: 2007-1-19 22:57
我的时间长还是出问题，挂在这执行了近一小时，突然退出了
稳定运行是内存占用588k，时间到不差，好像计算还有点问题
作者: PPdos 时间: 2007-1-19 23:31
利用ping的计时器的缺点是 不准确但可通过修改参数来改变计时的速度
而定时器则是通过ping的延时来刷新屏幕从而显示已改变的时间 无论刷新的快与慢
时间的准确性并没改变 但是如果刷新太快也会出现占用内存过大的问题 所以在以上
程序中尽量降低了内存消耗，程序中渗透了很多论坛的思想 。（Msgbox测试后忘
了删除）
作者: eech 时间: 2007-1-20 01:14
谢谢各位.试了.好像有点慢啊.嘿嘿.
作者: tashaxin 时间: 2007-1-25 10:41
果然精彩
作者: jackyggt 时间: 2007-3-16 07:49
好啊
作者: liu3157551 时间: 2007-3-22 14:55
5楼的很不错！他的做法值得我学习！因为他上传并分享了成功的成果给别人！ 2007-3-22 1:46:41星期四
作者: zhoushijay 时间: 2007-3-23 01:49
@echo off
echo 请按任意键开始计时...
pause>nul
set a=0
set b=0
set c=0
:start
cls
echo 计时: %a%:%b%:%c%
set /a c+=1
if %c%==60 (set c=0
set /a b+=1
)
if %b%==60 (set b=0
set /a a+=1
)
ping -n 1 127.1>nul 2>nul
goto :start
没有测试完,呵呵
作者: pmwz008 时间: 2007-3-23 05:18
果然是高啊....顶上来
作者: penghuahui 时间: 2007-12-5 13:40
学习了
高手呀
作者: mrcccc 时间: 2007-12-8 15:57
echo 计时: %a%:%b%:%c%
作者: cryman 时间: 2008-3-28 01:26 标题: rrr1111111111
rrrrrrrrrrrrrrrrr
作者: mikejin 时间: 2008-9-23 01:33
HAO A
作者: mikejin 时间: 2008-9-23 01:34
BU CUO