2024年3月21日发(作者：)

用于模拟器玩 没有设置的，如bluestacks

随意写的，请大家勿喷，可借鉴修改。

注意：

用之前要做修改，脚本源文件代码中红色的是左边按键的值（滑，默认是空格）值的

获得看下图或者百度，棕色是右边按键的值（跳，默认是数字九宫格的0），橙色是左边按

键坐标（按键精灵抓点或其他方法获得），绿色是左边按键坐标。

脚本

Declare Function GetAsyncKeyState Lib "user32" Alias "GetAsyncKeyState"

(ByVal vKey As Long) As Integer

i=0

While i = 0

Rem a

Key=WaitKey()

If Key = 32 Then

Dim key, n

key = 32'空格的按键码=32

Do

MoveTo 122, 497

n = GetAsyncKeyState(key)

If n = 1 Then

LeftClick 1 'TracePrint "按了" & Chr(key) & "键"

ElseIf n < 0 Then