求做个支持后台的按键精灵脚本
内容是7秒按一次1循环到主动停止需要支持后台.另外最好不是窗口化的..如果是也没关系.我的软件是按键精灵8补充下7秒按一次1然后30分钟按下230分钟按下3其他的没了要支...
内容是7秒按一次1 循环到主动停止 需要支持后台.另外最好不是窗口化的..如果是也没关系.我的软件是按键精灵8
补充下 7秒按一次1 然后30分钟按下2 30分钟按下3 其他的没了 要支持后台 感谢 展开
补充下 7秒按一次1 然后30分钟按下2 30分钟按下3 其他的没了 要支持后台 感谢 展开
1个回答
展开全部
有两个版本,可以参照一下,其实后台就是加上几个命令!!
////////////////////////////////////////////////////////////前台版
yanchi = 0'初始化值
key = WaitKey() '等待用户按键
While key = 36 '判断是否是开始按键 如果是则循环 36=Home按键码
KeyPress 49,1 '按1键一次
For 7'因为是7秒所以循环7次
Delay 1000 '延迟1秒
yanchi = yanchi + 1000
If yanchi >= 1800000 Then '判断大于等于30分钟 如果是按2,3键各一次
KeyPress 50, 1'按2键一次
Delay 50'延迟50毫秒
KeyPress 51, 1'按3键一次
yanchi=0'初始化值
End If
Next'退出for循环
Wend '继续while循环
////////////////////////////////////////////////////////////后台版
Hwnd = Plugin.Window.MousePoint()'得到鼠标指向的窗口句柄
shijian = 0'初始化值
key = WaitKey() '等待用户按键
While key = 36 '判断是否是开始按键 如果是则循环 36=Home按键码
Call Plugin.Window.SendKeyPress(Hwnd, 49) '向后台窗口按1键一次
For 7'因为是7秒所以循环7次
Delay 1000 '延迟1秒
shijian = shijian + 1000
if shijian >= 1800000 Then '判断大于等于30分钟 如果是按2,3键各一次
Call Plugin.Window.SendKeyPress(Hwnd, 50) '向后台窗口按2键一次
Delay 50'延迟50毫秒
Call Plugin.Window.SendKeyPress(Hwnd, 51) '向后台窗口按3键一次
yanchi=0'初始化值
End If
Next'退出for循环
Wend '继续while循环
////////////////////////////////////////////////////////////前台版
yanchi = 0'初始化值
key = WaitKey() '等待用户按键
While key = 36 '判断是否是开始按键 如果是则循环 36=Home按键码
KeyPress 49,1 '按1键一次
For 7'因为是7秒所以循环7次
Delay 1000 '延迟1秒
yanchi = yanchi + 1000
If yanchi >= 1800000 Then '判断大于等于30分钟 如果是按2,3键各一次
KeyPress 50, 1'按2键一次
Delay 50'延迟50毫秒
KeyPress 51, 1'按3键一次
yanchi=0'初始化值
End If
Next'退出for循环
Wend '继续while循环
////////////////////////////////////////////////////////////后台版
Hwnd = Plugin.Window.MousePoint()'得到鼠标指向的窗口句柄
shijian = 0'初始化值
key = WaitKey() '等待用户按键
While key = 36 '判断是否是开始按键 如果是则循环 36=Home按键码
Call Plugin.Window.SendKeyPress(Hwnd, 49) '向后台窗口按1键一次
For 7'因为是7秒所以循环7次
Delay 1000 '延迟1秒
shijian = shijian + 1000
if shijian >= 1800000 Then '判断大于等于30分钟 如果是按2,3键各一次
Call Plugin.Window.SendKeyPress(Hwnd, 50) '向后台窗口按2键一次
Delay 50'延迟50毫秒
Call Plugin.Window.SendKeyPress(Hwnd, 51) '向后台窗口按3键一次
yanchi=0'初始化值
End If
Next'退出for循环
Wend '继续while循环
更多追问追答
追问
朋友,我把你后台版完整复制到按键精灵的源文件里面 不行啊 按了没反应
追答
Hwnd = Plugin.Window.MousePoint()'得到鼠标指向的窗口句柄
shijian = 0'初始化值
key = WaitKey() '等待用户按键
While key = 36 '判断是否是开始按键 如果是则循环 36=Home按键码
Call Plugin.Window.SendKeyPress(Hwnd, 49) '向后台窗口按1键一次
For 7'因为是7秒所以循环7次
Delay 1000 '延迟1秒
shijian = shijian + 1000
if shijian >= 1800000 Then '判断大于等于30分钟 如果是按2,3键各一次
Call Plugin.Window.SendKeyPress(Hwnd, 50) '向后台窗口按2键一次
Delay 50'延迟50毫秒
Call Plugin.Window.SendKeyPress(Hwnd, 51) '向后台窗口按3键一次
yanchi=0'初始化值
End If
Next'退出for循环
Wend '继续while循环
不知道你是用这个做什么,是游戏吗?
你新建一个记事本,然后运行这个程序,F10开始运行脚本后,按HOME键才开始按键
AiPPT
2024-09-19 广告
2024-09-19 广告
随着AI技术的飞速发展,如今市面上涌现了许多实用易操作的AI生成工具1、简介:AiPPT: 这款AI工具智能理解用户输入的主题,提供“AI智能生成”和“导入本地大纲”的选项,生成的PPT内容丰富多样,可自由编辑和添加元素,图表类型包括柱状图...
点击进入详情页
本回答由AiPPT提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询