在脚本重复执行的最开始运行,这样的话每次刷完一次图,就检测一次yy是否打开。也可以使用多线程,至始至终的检测。使用多线程时,只要他一关,脚本就停止,不管有没有刷完。
(BeginThread 多线程检测yy是否开启中)
(sub 多线程检测yy是否开启中)
dim hwnd //如果前边已经使用着这个hwnd,可以加后缀数字10000.200000都可以
hwnd = //你的yy句柄
Window = Plugin.Window.IsWindow(Hwnd)
If Window < > 1 Then //< > 这个是不等号 不知道有没有输错
i=1
while i = 0
MsgBox "又不要你钱,就开个yy还ggyy的,你去死吧。"
delay 10
MsgBox "弄个对话框弹死你!"
delay 10
Wend
EndScript //结束脚本
elseif window = 1 then
MsgBox "关闭脚本时候,请先停止脚本,后关闭yy,谢谢"
End If
(delay 1000 //多线程,一秒钟检测一次,否则的话机器可能会卡)
(End Sub)
其实就是一个窗口打开的判定。当然也有其他方式。带括号的就是多线程检测。使用的时候把括号去掉
看了有用的 不赞是猪!
脚本打开YY我会。。。