标题: [其他] 批处理如何实现延时指定时间后结束指定进程,期间可指定一个按键重新记时 [打印本页]
作者: wwddhmh 时间: 2015-7-31 19:19 标题: 批处理如何实现延时指定时间后结束指定进程,期间可指定一个按键重新记时
本帖最后由 pcl_test 于 2016-7-18 18:29 编辑
求高手帮忙弄个BAT。就是倒计时 半小时。指定一个指定的按键可以重新记时。如果半小时内没按指定就执行特定的动作。
比如说,设定a位按键。有个进程QQ.EXE。怎么弄出来半小时不按a就结束QQ.EXE。如果按了a键。时间就重新回到1800秒继续重新倒计时。
坐等高手指教
作者: bailong360 时间: 2015-7-31 22:06
本帖最后由 bailong360 于 2015-7-31 22:08 编辑
- @echo off
- CAPI
- set CAPI=API Call kernel32 GetConsoleWindow
- set CAPI=API Call user32 ShowWindow ;%CAPI_Ret% ;0
- set CAPI=API Call kernel32 GetTickCount
- set Old_Time=%CAPI_Ret%
-
- :Loop
- rem 65为欲监测按键的虚拟键码
- set CAPI=API Call user32 GetAsyncKeyState ;65
- if %CAPI_Ret% LSS 0 (
- set CAPI=API Call kernel32 GetTickCount
- set /a Old_Time=CAPI_Ret
- )
- set CAPI=API Call kernel32 GetTickCount
- set /a _Time=CAPI_Ret - Old_Time
- if %_Time% GEQ 1800000 taskkill /f /im QQ.exe
-
- set CAPI=API Call kernel32 Sleep ;150
- Goto Loop
复制代码
CAPI注入版(1.2)方案
双击后后台运行
作者: pcl_test 时间: 2015-8-1 00:10
本帖最后由 pcl_test 于 2015-8-1 00:23 编辑
发个AHK- Gui, Add, Text, x25 y10 w50 h10 Center vText
- Gui, Show, w100 h30
-
- OVar:=1800
- GuiControl,Text,Text,%OVar%
- Loop,%OVar% {
- If GetKeystate("a","T")
- Reload
- I:=OVar-A_Index
- Sleep,1000
- GuiControl,Text,Text,%I%
- }
- Process,close,QQ.exe
- ExitApp
- return
复制代码
欢迎光临 批处理之家 (http://www.bathome.net/) |
Powered by Discuz! 7.2 |