BeginThread 按Tab
BeginThread 按QG()
Sub 按Tab()
按键 = split("9,49,90", ",")
Do
For i = 0 To 2
Call Plugin.Window.SendKeyPress(Hwnd, 按键(i))
Delay 100
Next
Loop
End Sub
Sub 按QG()
s1 = now
Do
If DateDiff("s", s1, now) >= 15 Then
Call Plugin.Window.SendKeyDown(Hwnd, 81)
Delay 1800
Call Plugin.Window.SendKeyUp(Hwnd, 81)
s1 = now
End If
If DateDiff("s", s1, now) >= 30 * 60 Then
Call Plugin.Window.SendKeyDown(Hwnd, 71)
Delay 100
s1 = now
End If
Loop
End Sub
Dim t
Hwnd = Plugin.Window.MousePoint()
Delay 1000
Rem 开始
Call Plugin.Bkgnd.KeyPress(Hwnd, 81)
Delay 15000
t=now
If datediff("n", t, now) >= 30 Then
Call Plugin.Bkgnd.KeyPress(Hwnd, 71)
t=now
endif
Delay 70
End If
Goto 开始
谁能帮我写一个后台运行的按键精灵脚本啊分辨率是1024*768 游戏...
BeginThread 按Tab BeginThread 按QG()Sub 按Tab()按键 = split("9,49,90", ",")Do For i = 0 To 2 Call Plugin.Window.SendKeyPress(Hwnd, 按键(i))Delay 100 Next Loop End Sub Sub 按QG()s1 = now Do If DateDiff("s", s1, now) >= 15 Then Call Plugin.Window.SendKeyDown...
帮忙编辑一个网页按键精灵不停连点的脚本要可以后台运行的。跪求
\/\/1024和768是你游戏窗口最右下角的坐标，自己改 If x < 1024 and y < 768 Then \/\/向后台窗口句柄(变量：Hwnd)的客户区域(坐标：x, y)处发送一个鼠标左键单击 Call Plugin.Bkgnd.LeftClick(Hwnd, x, y)\/\/加个延时，时间可以改，1000毫秒等于1秒 Delay 1000 End If ...
谁能给我一个天龙八部按键精灵的脚本呵。谢谢。
系统分辨率1024*768，颜色设置16位色，主题XP，先让游戏最大化，然后再设置游戏窗口为800*600，16位色，其他都设置成最低，泛光什么效果都不要勾，可能不同显卡运行效果不一样，你可以自己根据自己机子情况做些修改，当人和宠物血低于一半时，会自动加，具体多少加我没有做很精确，该脚本有自动吃药，...
按键精灵后台运行脚本
LeftClick 1 \/\/下面这句是得到鼠标指向的窗口句柄 Plugin hwnd2 = Window.MousePoint()Delay 3000 \/\/下面这句是最小化窗口 Plugin Window.Min(B)Delay 50 \/\/下面是你上面代码的后台的写法，两个窗口都可以最小化的 Rem start x=112 While x<118 \/\/下面这句用于向后台窗口句柄(变量：hwnd1)发...
按键精灵后台脚本制作
回答：1、游戏句柄 后台的意思就是当窗口被遮盖或移开的时候,仍能够正常的执行脚本动作,所以必须先找到该游戏的窗口句柄,这样可以保证我们编辑的脚本语句有正确的使用方向,获取窗口句柄的方法有很多,我一般使用以下的方法: Dim hwnd Plugin hwnd=Window.MousePoint() Plugin是调用插件命令,凡是调用插件都需要...
求高手做一个按键精灵的后台脚本~
你的后台是用在哪里，现在有很多游戏是封按键的。也有些网页窗口最少化后按键就找不到了，不过可以放在别的窗口后面。另外For语句是不分前后台都可以用的。先做个最简单的窗口脚本，希望能有用。\/\/获得当前窗口句柄 Hwnd = Plugin.Window.Foreground()For 53 For 3 Call Plugin.Bkgnd.LeftClick(...
按键精灵后台运行脚本
Plugin hwnd=Window.Find(0,"notebook")\/\/获得句柄。简单点说，设置一个窗口为焦点来运行下面的代码，这句话是为了执行后台运行的，因为你的恶鼠标点击了别的窗口别的窗口就会是焦点，所以必须要这一句“notebook”是当前窗口的名称 Plugin Bkgnd.KeyDown(hwnd,50)\\\\按下去按键2 Plugin Bkgnd.KeyUp(...
按键精灵脚本怎么写
MoveTo intx, inty Delay 100 LeftClick 1 Goto 结束 \/\/找到一个就完了吧？End If End If \/\/图1找不到，下面找图3 FindPic 0,0,1024,768,"Attachment:\\神盾3.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then FindPic 0,0,1024,768,"Attachment:\\神盾4.bmp",0.9,intX,...
求大神帮写个可以后台运行的按键精灵脚本
Bkgnd.KeyPress(Hwnd, 70)Delay 100 Call Plugin.Bkgnd.LeftClick(Hwnd, 548, 273)Delay 100 Next 首先说明：因为没有具体的窗口，所以548,273这个只是你的整体屏幕坐标，反应到具体的窗口内可能不对，也许需要自己修改，用抓抓工具获取坐标 这个脚本粘在源代码里 运行是鼠标指向在游戏窗口里面 ...
帮写下按键精灵后台运行脚本
\/\/脚本不断重复按键7 Delay 100 Plugin hwnd=Window.Foreground()Plugin Window.Active(hwnd)Plugin hwnd = Window.GetKeyFocusWnd()Delay 100 Rem a Plugin Window.SendKeyPress(hwnd,55)Delay 1000 Goto a 这个不用361插件 你必须先运行一会才能到后台运行 因为我不知道你要把他运用于何种窗口 ...
