Question

按键精灵脚本，怎么再加入一个键绑定另个键

这是用1键模拟鼠标键和另个键组合
怎么再加入当按下2键的时候，自动按下3键
按4键的时候自动按下ctrl+Q键，请问怎么实现。

Private Declare Function GetKeyState Lib"user32"(ByVal nVirtKey As Long) As Integer
Do
If GetKeyState(49)=-127 or GetKeyState(49)=-128
KeyDown "Shift", 1
LeftClick 1
KeyUp "Shift", 1
Delay 100
End If
Loop

Answer 1

Private Declare Function GetKeyState Lib"user32"(ByVal nVirtKey As Long) As Integer
BeginThread a
BeginThread b
BeginThread c
Do
    Delay 1000
Loop
Sub a
    Do
        If GetKeyState(49) = - 127  or GetKeyState(49) = - 128  Then 
            KeyDown "Shift", 1
            LeftDown 1
            Do
            Loop Until GetKeyState(49) >= 0
            LeftUp 1
            KeyUp "Shift", 1
        End If
    Loop
End Sub
Sub b
    Do
        If GetKeyState(50) = - 127  or GetKeyState(50) = - 128  Then 
            KeyDown "3", 1
            Do
            Loop Until GetKeyState(50) >= 0
            KeyUp "3", 1
        End If
    Loop
End Sub
Sub c
    Do
        If GetKeyState(52) = - 127  or GetKeyState(52) = - 128  Then 
            KeyDown "Ctrl", 1
            KeyDown "Q", 1
            Do
            Loop Until GetKeyState(52) >= 0
            KeyUp "Ctrl", 1
            KeyUp "Q", 1
        End If
    Loop
End Sub