求做一个按键精灵的设置 无限按“1”和“F1”,5秒一次TAB,150分钟按一次“5”
2个回答
展开全部
SetSimMode 1
Dim tim1,tim2
tim1=now
tim2=now
Rem XX
KeyPress "1", 1
Delay 200
KeyPress "F1", 1
Delay 200
If DateDiff("s",tim1,now) >= 5 Then
tim1=now
KeyPress "TAB", 1
Delay 200
End if
If DateDiff("s",tim2,now) >= 9000 Then
tim2=now
KeyPress "5", 1
Delay 200
End if
goto xx
Dim tim1,tim2
tim1=now
tim2=now
Rem XX
KeyPress "1", 1
Delay 200
KeyPress "F1", 1
Delay 200
If DateDiff("s",tim1,now) >= 5 Then
tim1=now
KeyPress "TAB", 1
Delay 200
End if
If DateDiff("s",tim2,now) >= 9000 Then
tim2=now
KeyPress "5", 1
Delay 200
End if
goto xx
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询