会后台按键精灵和精通VB的来帮下忙~

来源：百度知道 编辑：UC知道 时间：2024/06/21 06:45:48
为了方便会VB的 我后面粗略说明一下插件的翻译：
Plugin hwnd = Window.GetKeyFocusWnd() 获得当前句柄为 hwnd
Delay 1000
Plugin san=BGKM5.ScrToCli(hwnd,507,598) 屏幕507，598转为窗口坐标san
VBS StrXY_len = InStr(san,"|")
VBS sdx=Left(san,StrXY_len-1)
sdx=int(sdx)
VBS sdY=Right(san,StrXY_len-1)
sdy=int(sdy)
Plugin ban=BGKM5.ScrToCli(hwnd,540,278) 屏幕540,278转为窗口坐标ban
VBS StrXY_len = InStr(ban,"|")
VBS bdx=Left(ban,StrXY_len-1)
bdx=int(bdx)
VBS bdY=Right(ban,StrXY_len-1)
bdy=int(bdy)
Plugin xan=BGKM5.ScrToCli(hwnd,1014,9) 屏幕1014,9转为窗口坐标xan
VBS StrXY_len = InStr(xan,"|")
VBS xdx=Left(xan,StrXY_len-1)
xdx=int(xdx)
VBS xdY=Right(xan,StrXY_len-1)
xdy=int(xdy)
Plugin hx=BkgndColor.GetPixelColor(hwnd,sdx,sdy)
后台查找hwnd,sdx,sdy颜色等于hx
Plugin hy=BkgndColor.GetPixelColor(hwnd,bdx,bdy)
后台查找hwnd,sdx,sdy颜色等于hy
If hx = ffffff and hy = ffffff
Plugin BGKM5.LClick(hwnd,xdx,xdy) 后台单击坐标xd

If hx = ffffff and hy = ffffff
这是ffffff是颜色值，他这里并没指出是什么颜色。具体是要看你的颜色是什么颜色。

通过坐标获取x,y的颜色以后赋予一个自定义变量,
比如
Plugin hx1=BkgndColor(hwnd,100,200)
Plugin hy1=BkgndColor(hwnd,100,200)
得到颜色的值后
才能进行比对
if hx=hx1 and hy=hy1
.....