按键精灵帮写个后台

来源:百度知道 编辑:UC知道 时间:2024/09/20 16:36:32
帮忙改成后台的,如果做得好再追加100分
Rem ==========以下是按键精灵录制的内容==========
MoveTo 1182,476
LeftClick 1
Delay 2000
MoveTo 777,509
LeftClick 1
Delay 2000
MoveTo 847,593
LeftClick 1
Delay 2000
Rem ==========以上是按键精灵录制的内容==========

我用的是361后台插件 如果没有 去网上下载 后在使用 不然无法使用
把需要后台操作的窗口放在最前面
源代码
//下面这句是得到当前最前面的窗口句柄
Plugin Hwnd = Window.Foreground()
MessageBox 开始
Plugin BGKM5.b=ScrToCli(Hwnd,1182,476)
Gosub 转换坐标
Plugin BGKM5.LClick(Hwnd,x,y)
Delay 2000
Plugin BGKM5.b=ScrToCli(Hwnd,777,509)
Gosub 转换坐标
Plugin BGKM5.LClick(Hwnd,x,y)
Delay 2000
Plugin BGKM5.b=ScrToCli(Hwnd,847,593)
Gosub 转换坐标
Plugin BGKM5.LClick(Hwnd,x,y)
EndScript
Sub 转换坐标
MyArray = Split(b, "|")
//下面这句将字符串转换成数值
x = Clng(MArray(0)): y = Clng(MyArray(1))
Return 转换坐标

aa8551758
写的很不错

一楼写的号啊