//b为体力
// 当前窗口句柄
Plugin lm=WindowMousePoint()
Plugin lm=WindowForeground()
//获取当前屏幕坐标点
//转换为窗口坐标点
//体力判断
Plugin b = BkgndColorGetPixelColor(lm,95,62)
If b="202420"
MessageBox b
Else
MessageBox "no"
EndIf
这里取得的存在b里的颜色值是一个字符串,所以用if判断时要加双引号
//使用数组,第一种颜色赋值给s(0),第二种颜色赋值给s(1),以此类推,我使用360浏览器界面上的颜色做示范,自行修改。
dim s(2)
s(0) = "1E6CEC":s(1) = "31B05F":s(2) = "9E8C6C"
a = 0
//要找几种颜色,就循环几次
For 3
//循环开始
Rem 开始
FindColor 0, 0, 1024, 768, s(a), x, y
//开始查找颜色
If x > 0 And y > 0 Then
//如果找到颜色就移动鼠标到色点上并点击。
MoveTo x, y
Delay 128
LeftClick 1
Delay 128
a = a + 1
//找到上一个颜色后,赋值+1,开始找下一个颜色
Else
//如果没有找到这个颜色
Delay 128
Goto 开始
//从标记为开始的地方重新寻找
End If
Delay 128
next
//跳回(结束)循环
加个判断这个颜色值用抓抓获取
if GetColor="**的颜色值" then
Call PluginBkgndKeyPress(459470, 75)
else
Call PluginBkgndKeyPress(459470, 74)
end if
这个太简单啦,小弟!
假设你的那个a点的颜色为“FFFFFF”,则这样:
dim x,y,a
vbs a="ffffff"
VBSCall FindColorEx(0,0,1024,768,a,1,08,x,y)
//区域模煳找色 0,0,1024,768为区域范围 "FFFFFF"为颜色 1为查找方式(中间向外) 08为模煳值 x,y为找到颜色后的坐标变量
If x>=0 and y>=0
//如果找到颜色 比如找到颜色就会赋值给坐标变量 通过判断坐标变量可以知道有没有找到色
MoveTo x y
//把鼠标移动到该坐标
Delay 50
//延时
LeftClick 1
//左键单击进行攻击
EndIf
//条件结束
Do
If GetPixelColor(10, 5) = "FFFFFF" Then '比如左边10,5的颜色是FFFFFF
RestartScript
End If
Delay 1000
Loop
你的好评是我帮助你的动力
用区域找色功能就行了,
先确定好你的浏览器客户区范围,
然后,在这个范围内找你要的颜色代码,蓝色有很多种代码,这个你自己抓色哈
x=Plugin SysGetScRX()
y=Plugin SysGetScRY()
VBSCall FindColor(0,0,x,y,"你的颜色代码,例如 00FF00",intX,intY)
然后后面的关闭网页和复制到记事本,可以用鼠标 *** 作,这个你应该会了吧,>
以上就是关于求按键精灵后台取“指定窗口某点颜色”的方法全部的内容,包括:求按键精灵后台取“指定窗口某点颜色”的方法、按键精灵区域找色、按键精灵后台颜色判断等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)