按键精灵用数组中的颜色进行多点找色.求正确写法
完全无法运行.主要是找多点时候出现问题,是偏移色2的问题,输出就找不到了.求多点找色这样数组的正确写法Dim战场血条主色数组,战场偏色1绿条数组,战场偏色2角色名数组战场...
完全无法运行.主要是找多点时候出现问题,是偏移色2的问题,输出就找不到了.
求多点找色这样数组的正确写法
Dim 战场血条主色数组,战场偏色1绿条数组,战场偏色2角色名数组
战场血条主色数组 =array("5271EF","528EEF","5A75FF","52FF9C","7386FF","3979F7","4282F7")
战场偏色1绿条数组 = array("5271EF","528EEF","5A71FF","7386FF")
战场偏色2角色名数组 = array("7386FF")
起点X=0
起点Y=0
起点宽=1024
起点高=750
call 战场找角色()
Sub 战场找角色()
For 战场血条主色序号 = 0 To UBound(战场血条主色数组)
For 战场偏色1绿条序号 = 0 To UBound(战场偏色1绿条数组)
For 战场偏色2角色名序号 = 0 To UBound(战场偏色2角色名数组)
战场找血条X战场找血条Y=Plugin.Color.FindMultiColorEx(起点X,起点Y,起点宽,起点高,战场血条主色数组(战场血条主色序号),"0|4|"&战场偏色1绿条数组(战场偏色1绿条序号),"0|9|"&战场偏色2角色名数组(战场偏色2角色名序号),找色识别系数,1)
战场找血条 = InStr(战场找血条X战场找血条Y,"|")
战场找血条X = Clng(Left(战场找血条X战场找血条Y, 战场找血条 - 1)) : 战场找血条Y = Clng(Right(战场找血条X战场找血条Y, Len(战场找血条X战场找血条Y) - 战场找血条))
If 战场找血条X > 0 Then
TracePrint "角色坐标X"&战场找血条X&"角色坐标Y"&战场找血条Y
End If
Next
Next
Next
End Sub 展开
求多点找色这样数组的正确写法
Dim 战场血条主色数组,战场偏色1绿条数组,战场偏色2角色名数组
战场血条主色数组 =array("5271EF","528EEF","5A75FF","52FF9C","7386FF","3979F7","4282F7")
战场偏色1绿条数组 = array("5271EF","528EEF","5A71FF","7386FF")
战场偏色2角色名数组 = array("7386FF")
起点X=0
起点Y=0
起点宽=1024
起点高=750
call 战场找角色()
Sub 战场找角色()
For 战场血条主色序号 = 0 To UBound(战场血条主色数组)
For 战场偏色1绿条序号 = 0 To UBound(战场偏色1绿条数组)
For 战场偏色2角色名序号 = 0 To UBound(战场偏色2角色名数组)
战场找血条X战场找血条Y=Plugin.Color.FindMultiColorEx(起点X,起点Y,起点宽,起点高,战场血条主色数组(战场血条主色序号),"0|4|"&战场偏色1绿条数组(战场偏色1绿条序号),"0|9|"&战场偏色2角色名数组(战场偏色2角色名序号),找色识别系数,1)
战场找血条 = InStr(战场找血条X战场找血条Y,"|")
战场找血条X = Clng(Left(战场找血条X战场找血条Y, 战场找血条 - 1)) : 战场找血条Y = Clng(Right(战场找血条X战场找血条Y, Len(战场找血条X战场找血条Y) - 战场找血条))
If 战场找血条X > 0 Then
TracePrint "角色坐标X"&战场找血条X&"角色坐标Y"&战场找血条Y
End If
Next
Next
Next
End Sub 展开
展开全部
粗略看了一下,你所谓的多点找色实际上就是找三个颜色,具体你想实现什么就不晓得了,源码问题有几个给你参考:1、战场偏色2角色名数组,只有一个数就不必使用数组了,直接填写进找色里就行,当然同时也要去掉那个循环语句。2、源码中缺少“找色识别系数”这个值,不知道你是不是漏了还是原文中是有的。3、循环句,可能就是脚本正常运行的关键所在,建议检查下循环次序有没有搞错。4、多点找色就找三个色是非常容易出错的,建议写多几个颜色。
追问
已经自己解决,数组是后边不断增加的.找色识别系数是个变量.
其实问题就是开始问的找色用变量的正确写法. 我开始写成了,"0|4|"&这样连接,而正确的是&",4|0|"这样连接.不过你是认真看了我的代码,所以分给你吧
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询