Rt
要是能正确告诉我一下
我的分都sh送他
Rt
要是能正确告诉我一下
我的分都sh送他
用VBS脚本或许能实现吧。 VBS中SendKeys的基本应用 模拟键盘操作,将一个或多个按键指令发送到指定Windows窗口来控制应用程序运行, 其使用格式为:object.SendKeys string “object”:表示WshShell对象 “string”:表示要发送的按键指令字符串,需要放在英文双引号中。 1.基本键 一般来说,要发送的按键指令都可以直接用该按键字符本身来表示,例如要发送字母“x”,使用“WshShell.SendKeys "x"”即可。当然,也可直接发送多个按键指令,只需要将按键字符按顺序排列在一起即可,例如,要发送按键“happy”,可以使用“WshShell.SendKeys "happy"”。 2.特殊功能键 对于需要与Shift、Ctrl、Alt三个控制键组合的按键,SendKeys使用特殊字符来表示: Shift---------WshShell.SendKeys "+" Ctrl---------WshShell.SendKeys "^" Alt---------WshShell.SendKeys "%" 由于“+”、“^”这些字符用来表示特殊的控制按键了,如何表示这些按键呢? 只要用大括号括住这些字符即可。例如: 要发送加号“+”,可使用“WshShell.SendKeys "{+}"” 另外对于一些不会生成字符的控制功能按键,也同样需要使用大括号括起来按键的名称,例如要发送回车键,需要用“WshShell.SendKeys "{ENTER}"”表示,发送向下的方向键用“WshShell.SendKeys "{DOWN}"”表示。 Space---------WshShell.SendKeys " " Enter---------WshShell.SendKeys "{ENTER}" ←---------WshShell.SendKeys "{RIGHT}" ↑---------WshShell.SendKeys "{UP}" F1---------WshShell.SendKeys "{F1}" Tips:如果需要发送多个重复的单字母按键,不必重复输入该字母,SendKeys允许使用简化格式进行描述,使用格式为“{按键 数字}”。例如要发送10个字母“x”,则输入“WshShell.SendKeys "{x 10}"”即可。 实例: ---------------------------------------------------- 按下F5刷新桌面 Dim WshShell,Path,i Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.SendKeys "{F5}" ---------------------------------------------------- 电脑的自动重启 set WshShell = CreateObject("WScript.Shell") WshShell.SendKeys "^{ESC}u" WshShell.SendKeys "R" ---------------------------------------------------- 启动任务管理器 set WshShell = CreateObject("WScript.Shell") WshShell.SendKeys "^+{ESC}"
既然用VBS脚本能够实现向电脑发送按键,然后再给它个循环,不就相当于实现了让系统实现不停(有跳出循环的条件,不然就死循环了)按一个按钮。
至于脚本,上面已经写得清楚,
再加个循环:
do loop 之类应该不用我写了吧。
while(true){
}
循环好内存崩溃
你是在挖矿呢?还是在采药呢?哈哈
其实很久以前就有人研究了这个问题,答案就是去买个电动的能一直上下点的玩具,固定住让它一直点那一个键就行了。。。
我的是用一支钢笔压着的,不过你可以想个更好的,比如带弯的钢丝,直接夹到键盘那个键上,现在我不打游戏了,不用了,你可以试试。