Question

按键精灵 反应慢为何

Dimenv i, 状态
检测状态ID = BeginThread(检测状态)
按键ID = BeginThread(按键)
键ID = BeginThread(键)
i = 0
Do
key = WaitKey
i = i + 1
If i > 1000 Then
i = 0
End If
Loop
Sub 检测状态()
k1 = 0
k2 = 0
Do
k1 = i
Delay 2
If k1 = i Then
k2 = k2 + 1
If k2 > 20 Then
状态 = "弹起状态"
End If
Else
k2 = 0
Delay 50
状态 = "按下状态"
End If
Loop
End Sub
Sub 按键()
Do
If 状态 = "按下状态" Then
If GetLastKey() = 87 Then
MoveTo 164, 508
Delay 20
LeftClick 1
End If

End If
Loop
End Sub

Sub 键()
Do
If 状态 = "按下状态" Then
If GetLastKey() = 83 Then
MoveTo 164, 608
Delay 20
LeftClick 1
End If
End If
Loop
End Sub

按w 再按 s 切换有延时为什么 怎么解决

Answer 1

调试一下程序里“状态”，以及函数GetLastKey()的值是如何变化的，其实要实现你这个功能，不用这么复杂的写法。

追问

具体点的，怎么改？或者怎么写更好？

追答

你要实现什么功能，我不清楚，程序不是执行慢，是你程序有漏洞，这个漏洞你要测GetLastKey()的值和“状态”的值，由于我不清楚你想干嘛，所以我也无法帮你改。