saratlh
发表于 2016-04-28
11111111111111111111111111111111111
LoveWendy
发表于 2016-04-28
111111111111111111111111111111111
pjch
发表于 2016-04-28
好吧,新人来看看怎么用
markey880
发表于 2016-04-27
球球大作战球球大作战球球大作战球球大作战
花問情
发表于 2016-04-26
THX~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
zx1346p
发表于 2016-04-25
{:8_600:}{:8_600:}
洛雨笙
发表于 2016-04-24
看看
selfull
发表于 2016-04-24
1111111111111111111111111111111111111111
大宝哈哈
发表于 2016-04-24
1111111
Chapters
发表于 2016-04-23
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