中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-08-10 14:09
47,811 主题排行 / 349,897 发帖 / 今日 0 篇 / 48,255 会员排行
DOS批处理 & 脚本技术(批处理室) » 求一个可以记时的批处理
可打印版本  3,647 / 18
第1楼 eech 发表于 2007-01-19 12:17
高级用户 发帖 346 积分 906
求一个可以记时的批处理
比如从00:00:01开始的批处理
第2楼 PPdos 发表于 2007-01-19 20:58
高级用户 发帖 268 积分 783
语音消息框合并--定时器(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"

附件
定时器.rar (487 bytes)
第3楼 boluor 发表于 2007-01-19 21:44
初级用户 发帖 54 积分 129 来自 武大信息学部
好象是每三秒改变一次,很不错了.不过你搞那个"your time is limited ",有什么用吗?搞得我以为是在修改我电脑上的时间啊,又惹的电脑出现了一个实时调试的对话框.....
第4楼 everest79 发表于 2007-01-19 21:59
金牌会员 发帖 1,127 积分 2,564
试试看

第5楼 PPdos 发表于 2007-01-19 22:08
高级用户 发帖 268 积分 783
计时器


-n 修改为2 初始化参数为0 完成

[ Last edited by PPdos on 2007-1-24 at 11:52 PM ]

附件
计时器.rar (274 bytes)
第6楼 boluor 发表于 2007-01-19 22:18
初级用户 发帖 54 积分 129 来自 武大信息学部
果然是高啊....顶上来!!!!!!!!!!!
第7楼 everest79 发表于 2007-01-19 22:57
金牌会员 发帖 1,127 积分 2,564
我的时间长还是出问题,挂在这执行了近一小时,突然退出了
稳定运行是内存占用588k,时间到不差,好像计算还有点问题
第8楼 PPdos 发表于 2007-01-19 23:31
高级用户 发帖 268 积分 783
利用ping的计时器的缺点是 不准确但可通过修改参数来改变计时的速度

而定时器则是通过ping的延时来刷新屏幕从而显示已改变的时间 无论刷新的快与慢

时间的准确性并没改变 但是如果刷新太快也会出现占用内存过大的问题 所以在以上

程序中尽量降低了内存消耗,程序中渗透了很多论坛的思想 。(Msgbox测试后忘

了删除)
第9楼 eech 发表于 2007-01-20 01:14
高级用户 发帖 346 积分 906
谢谢各位.试了.好像有点慢啊.嘿嘿.
第10楼 tashaxin 发表于 2007-01-25 10:41
初级用户 发帖 30 积分 99
果然精彩
第11楼 jackyggt 发表于 2007-03-16 07:49
初级用户 发帖 38 积分 76
好啊
第12楼 liu3157551 发表于 2007-03-22 14:55
中级用户 发帖 164 积分 259
5楼的很不错!他的做法值得我学习!因为他上传并分享了成功的成果给别人! 2007-3-22 1:46:41星期四
第13楼 zhoushijay 发表于 2007-03-23 01:49
高级用户 发帖 375 积分 845
@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

没有测试完,呵呵
第14楼 pmwz008 发表于 2007-03-23 05:18
初级用户 发帖 13 积分 24
果然是高啊....顶上来
第15楼 penghuahui 发表于 2007-12-05 13:40
初级用户 发帖 86 积分 163
学习了
高手呀
1 2  下一页
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023