按键精灵如何实现一键连发？

我不知道你为什么要用按住d起功能。。。
要点X发射的话，就
KeyPress 88,1
设置成无限循环就行了，还有就是按键精灵支持“按住~d起”的，
比如按下X键，再d起，
KeyDown 17,1
delay 300
KeyUp 17,1

SetSimMode 1
UserVar yanshi=0 按住J多少时间
Rem s
KeyDown 74,1
Delay yanshi
KeyUp 74,1
Goto s
这个是按J的代码 74，1 你要设哪个键自己找下那键的代码

如果你是玩游戏的话
按连发
可以把这些要按的子设置成按键方式
中间一定要有延时
如果
每个按能按按完后会有一定的释放时间
EEER>Private Declare Function GetKeyState Lib"user32"(ByVal nVirtKey As Long) As Integer
Do
Dim chen
chen = 0
chen = GetKeyState(32)
Select Case chen
Case -127
TracePrint "此键处于按下状态。"
KeyPress "Space", 1
Delay 20
Case -128
TracePrint "此键处于按下状态。"
KeyPress "Space", 1
Delay 20
Case 0
TracePrint "此键处于放开状态。"
Delay 1
Case 1
TracePrint "此键处于放开状态。"
Delay 1
Case Else
End Select
Loop
复制以上代码到按键精灵就可实现。

---