代码如下，新建两个TXT文件，把下面段代码粘贴到两个TXT里。将一个TXT文件改名为开始.vbs，另一个TXT文件改名为结束.vbs，最后将游戏里捡取装备的按键设置为空格，双击开始.vbs就可以实现自动键装备了，不想
用了，就双击结束.vbs
'等待10秒开始运行
WScript.Sleep 10000
'执行9999999次
Set ws = CreateObject("Wscript.Shell")
for i = 1 to 9999999
'等待2毫秒按一次空格键
WScript.Sleep 200
ws.SendKeys(" ")
'自动退出
next
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "taskkill /im wscript.exe /f ",0 ,true