//得到鼠标指向的窗口句柄,鼠标指向避免窗口多句柄的麻烦
Hwnd = Plugin.Window.MousePoint()
While true
Call Plugin.Bkgnd.KeyPress(Hwnd, 49)
Delay 1000
Wend
//绝对有用,前提:你的游戏没有屏蔽按键精灵
精灵7
Delay 2000
Dim Hwnd
Plugin Hwnd=Window.MousePoint()
For 10000000000000
Plugin Bkgnd.KeyDown(Hwnd, 49)
Delay 1000
EndFor
Hwnd = Plugin.Window.MousePoint()
Rem 循环
Call Plugin.Bkgnd.KeyDown(Hwnd, 49)
Delay 10
Call Plugin.Bkgnd.KeyUp(Hwnd, 49)
Delay 1000
Goto 循环
hwnd = Plugin.Window.Foreground()
Do
Call Plugin.Bkgnd.KeyPress(hwnd, 49)
Delay 1000
Loop