
CODE: [Copy to clipboard]sleep这个软件时间准(毫秒级别)!!内存占用不多!!!(388k)@echo off
set /p a=你所设定的上机时间为a小时:
set /a b=%a%
set /a d=%a%*4
set /a d=%d%-1
msg %username% /time:3 "你所设定的上机时间为%a%小时!"
set /a c=1
set /a e=15
setlocal enabledelayedexpansion
:1
sleep 900000
msg %username% /time:15 ":)........保护眼睛哦........:)!"
if !e! equ 14 goto 3
if !c! equ !d! set /a e=14
set /a c+=1&&goto 1
:3
sleep 840000
set f=60
:4
msg %username% /time:1 ":)还有!f!秒时间到!请作好备份!!!:)"
set /a f-=1
if !f! GEQ 1 goto 4
sleep 60000
exit
| Quote: | |
|
| Quote: | |
|
CODE: [Copy to clipboard][ Last edited by jmz573515 on 2006-12-26 at 09:49 AM ]set ws=createobject("wscript.shell")
set fso=createobject("scripting.filesystemobject")
a=inputbox("请设定你的上机时间。(单位:小时)","提示")
ws.popup "你设定的时间为" & a& "小时",3,"提示"
starttime=timer
do
endtime=timer
sysj=endtime-starttime
if sysj>=3600*a-60 then
ws.popup"你所限定的时间已到!请做好下机准备!",60,"提示"
ws.run "cmd" '这是你要运行的程序
wscript.quit
end if
if sysj <3600*a-960 then
wscript.sleep 1000*15*60
ws.Popup"保护眼睛啊!", 15, "系统提示"
else
wscript.sleep 1000
end if
loop
| 欢迎光临 中国DOS联盟论坛 (http://cndos.fam.cx/forum/) | Powered by Discuz! 2.5 |