求助如何封装包含数组的多点找色函数？

星光 · 发表于 2018-11-12 14:34:55

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

Function 点运镖任务() //活动栏运镖任务按钮
KeepCapture
点运镖任务=False
Dim 参加运镖()
参加运镖(0)=array(302,507,1136,88,"0B326D","-4|5|1A4C84,1|10|0C346F,35|7|103B75,24|-2|17467E")
参加运镖(1)=array(317,494,1131,88,"134079","3|-7|0D3670,30|0|103C75,-22|-25|314762,-19|-8|354B66")
If 多点找色(参加运镖) Then
TracePrint "参加运镖任务"
点运镖任务=True
End If
ReleaseCapture
End Function

求助多点找色()这个封装怎么写?因为上边是个数组,最好能设置是否点击和输出点击坐标.困扰好几天不知道怎么写.

星光 · 发表于 2018-11-12 14:51:08

有哪位知道吗？求指导

紫猫 · 发表于 2018-11-12 15:09:27

去看下命令宝典里的命令库教程, 有详细讲解的

冒泡的小猫 · 发表于 2018-11-13 13:38:03

Function 多点找色(arr)
FindMultiColor arr(0),arr(1),arr(2),arr(3),arr(4),arr(5), 0, 0.9, ColX, ColY
If ColX > -1 Then
      多点找色 = 0
      If IsNull(arr(7)) Then TracePrint arr(6),"坐标:",ColX,ColY,"范围[:",arr(0),arr(1),arr(2),arr(3),"]"
Else
      多点找色 = -1
      If IsNull(arr(7)) Then TracePrint arr(6),"[找不到]---------------------------------------------------------------------------------------------范围[",arr(0),arr(1),arr(2),arr(3),"]"
End If
End Function

		自动登录	找回密码
密码			立即注册

[已回复] 求助如何封装包含数组的多点找色函数？

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。