Dim ScreenW, ScreenH, WI, HI
MsgBox (" 请把配套宏设置到对应的三个按键中,将游戏角色控制按键重置为系统默认按键。")
ScreenW = Plugin.Sys.GetScRX()
ScreenH = Plugin.Sys.GetScRY()
WI = ScreenW / 2
HI = ScreenH / 2
Hwnd = Plugin.Window.Find(0, "剑侠情缘网络版叁PakV3")
Call Plugin.Window.Active(Hwnd)
Call Plugin.bgkms6_10.FakeWindowState(Hwnd, 2)
Rem A
Call Plugin.Bkgnd.Keydown(Hwnd, 65)
Call Plugin.BGKMS6_10.LeftDoubleClick(Hwnd, WI, HI)
Call Plugin.Bkgnd.KeyDown(Hwnd, 112)
Delay 100
Call Plugin.Bkgnd.KeyUp(Hwnd, 112)
Call Plugin.BGKMS6_10.LeftDoubleClick(Hwnd, WI, HI)
Call Plugin.Bkgnd.KeyDown(Hwnd, 113)
Delay 100
Call Plugin.Bkgnd.KeyUp(Hwnd, 113)
Call Plugin.BGKMS6_10.LeftDoubleClick(Hwnd, WI, HI)
Call Plugin.Bkgnd.KeyDown(Hwnd, 114)
Delay 100
Call Plugin.Bkgnd.KeyUp(Hwnd, 114)
Call Plugin.Bkgnd.KeyPress(Hwnd, 9)
Delay 100
Call Plugin.Bkgnd.KeyPress(Hwnd, 9)
Goto A