Hwnd = Plugin.Window.Find(0, "剑侠情缘网络版叁")
If Hwnd > 0 Then
Else
Hwnd = Plugin.Window.Find(0, "剑胆琴心内测服务器")
End If
Call Plugin.Window.Active(Hwnd)
Call Plugin.bgkms6_10.FakeWindowState(Hwnd, 2)
UserVar Var1=116 "按键1"
UserVar Var2=117 "按键2"
UserVar Var3=118 "按键3"
UserVar Var4=119 "按键4"
UserVar Var5=50 "按键间隔(ms)"
Rem a
Call Plugin.Bkgnd.KeyDown(Hwnd, Var1)
Call Plugin.Bkgnd.KeyUp(Hwnd, Var1)
Call Plugin.Bkgnd.KeyDown(Hwnd, Var2)
Call Plugin.Bkgnd.KeyUp(Hwnd, Var2)
Call Plugin.Bkgnd.KeyDown(Hwnd, Var3)
Call Plugin.Bkgnd.KeyUp(Hwnd, Var3)
Call Plugin.Bkgnd.KeyDown(Hwnd, Var4)
Call Plugin.Bkgnd.KeyUp(Hwnd, Var4)
Delay Var5
Goto a