Dimenv Hwnd1, Hwnd2, Hwnd3
//声明变量Hwnd1、Hwnd2、Hwnd3可在线程中调用
HwndEx = Plugin.Window.Search("KunLun Online[天决圣境(PK)]")
//查找所有标题为“KunLun Online[天决圣境(PK)]”的窗口句柄返回给变量HwndEx,格式“句柄|句柄|句柄|”
Hwnd = Split(HwndEx, "|")
Hwnd1 = Clng(Hwnd(0))
Hwnd2 = Clng(Hwnd(1))
Hwnd3 = Clng(Hwnd(2))
TracePrint " 第一个窗口句柄为:" & Hwnd1
TracePrint " 第二个窗口句柄为:" & Hwnd2
TracePrint " 第二个窗口句柄为:" & Hwnd3
BeginThread A : BeginThread B : BeginThread C
//启动线程A、B、C,启动需要一定的时间。
Sub A()
Call Plugin.Bkgnd.KeyPress(Hwnd1, 13)
//打开说话栏
Delay 100
Call Plugin.Bkgnd.SendString(Hwnd1, "哎呦,我/去!")
//线程A每秒向Hwnd1中发送一次文本
Call Plugin.Bkgnd.KeyPress(Hwnd1, 13)
//关闭说话栏
Delay 1000
End Sub
Sub B()
Call Plugin.Bkgnd.KeyPress(Hwnd2, 13)
//打开说话栏
Delay 100
Call Plugin.Bkgnd.SendString(Hwnd2, "哎哟,我/去去!")
//线程B每秒向Hwnd2中发送一次文本
Call Plugin.Bkgnd.KeyPress(Hwnd2, 13)
//关闭说话栏
Delay 1000
End Sub
Sub C()
Call Plugin.Bkgnd.KeyPress(Hwnd3, 13)
//打开说话栏
Delay 100
Call Plugin.Bkgnd.SendString(Hwnd3, "哎呦,我/去去!")
//线程C每秒向Hwnd3中发送一次文本
Call Plugin.Bkgnd.KeyPress(Hwnd3, 13)
//关闭说话栏
Delay 1000
End Sub
----------------------------------------------------------------------------------------------------------
这是第一个游戏窗口的操作,就是喊话操作,其余2个窗口内容一致,看上面的源代码可以看出来
游戏一般按Enter键打开说话框。按键码13就是Enter键。上面采用了按键自带的后台插件。如果我们这么想,如果不是喊话,是做其他动作,比如捡东西。。。这就很好使了只需要将子程序里面的代码换一下就可以了,简单不。
只适合新手,大佬勿喷~~~
//声明变量Hwnd1、Hwnd2、Hwnd3可在线程中调用
HwndEx = Plugin.Window.Search("KunLun Online[天决圣境(PK)]")
//查找所有标题为“KunLun Online[天决圣境(PK)]”的窗口句柄返回给变量HwndEx,格式“句柄|句柄|句柄|”
Hwnd = Split(HwndEx, "|")
Hwnd1 = Clng(Hwnd(0))
Hwnd2 = Clng(Hwnd(1))
Hwnd3 = Clng(Hwnd(2))
TracePrint " 第一个窗口句柄为:" & Hwnd1
TracePrint " 第二个窗口句柄为:" & Hwnd2
TracePrint " 第二个窗口句柄为:" & Hwnd3
BeginThread A : BeginThread B : BeginThread C
//启动线程A、B、C,启动需要一定的时间。
Sub A()
Call Plugin.Bkgnd.KeyPress(Hwnd1, 13)
//打开说话栏
Delay 100
Call Plugin.Bkgnd.SendString(Hwnd1, "哎呦,我/去!")
//线程A每秒向Hwnd1中发送一次文本
Call Plugin.Bkgnd.KeyPress(Hwnd1, 13)
//关闭说话栏
Delay 1000
End Sub
Sub B()
Call Plugin.Bkgnd.KeyPress(Hwnd2, 13)
//打开说话栏
Delay 100
Call Plugin.Bkgnd.SendString(Hwnd2, "哎哟,我/去去!")
//线程B每秒向Hwnd2中发送一次文本
Call Plugin.Bkgnd.KeyPress(Hwnd2, 13)
//关闭说话栏
Delay 1000
End Sub
Sub C()
Call Plugin.Bkgnd.KeyPress(Hwnd3, 13)
//打开说话栏
Delay 100
Call Plugin.Bkgnd.SendString(Hwnd3, "哎呦,我/去去!")
//线程C每秒向Hwnd3中发送一次文本
Call Plugin.Bkgnd.KeyPress(Hwnd3, 13)
//关闭说话栏
Delay 1000
End Sub
----------------------------------------------------------------------------------------------------------
这是第一个游戏窗口的操作,就是喊话操作,其余2个窗口内容一致,看上面的源代码可以看出来
游戏一般按Enter键打开说话框。按键码13就是Enter键。上面采用了按键自带的后台插件。如果我们这么想,如果不是喊话,是做其他动作,比如捡东西。。。这就很好使了只需要将子程序里面的代码换一下就可以了,简单不。
只适合新手,大佬勿喷~~~