按键精灵android不点击,代码运行没问题 但是不点击

本帖最后由 wwy0223 于 2015-3-31 14:53 编辑

For 50

Dim intX,intY,A

//区域找黄字

FindMultiColor 136,382,594,1030,"FFFFFF","FFFFFF,3|15|FFFFFF,-2|35|FFFFFF,32|0|FFFFFF,34|7|FFFFFF,30|28|FFFFFF,32|34|FFFFFF",0,1.0,intX,intY

If intX > 0 And intY > 0 Then //0是符合条件

A = CmpColor(intX-30, intY + 50, "00AAD0", 0.9)//找到该点的颜色

If A=0//-1代表找到颜色

Delay 10

Else

Tap intX-30, intY+50

TracePrint intX-30&","&intY+50

End If

End If

Delay 200

Dim intX1,intY1,B

//区域找蓝字

FindMultiColor 132,389,597,1022,"FFFFFF","FFFFFF,-8|22|FFFFFF,-13|37|FFFFFF,15|-1|FFFFFF,24|15|FFFFFF,19|21|FEF6EF,27|37|FFFFFF",0,1.0,intX1,intY1

If intX1 > 0 And intY1 > 0 Then

B = CmpColor(intX1-30, intY1 + 50, "A24C04", 0.9)

If B=0

Delay 10

Else

Tap intX1-30, intY1+50

TracePrint intX1-30&","&intY1+50

End If

End If

Delay 200

Dim intX2,intY2,C

//区域找红字

FindMultiColor 132,389,597,1022,"FFFFFF","FFFFFF,0|9|FFFFFF,11|6|FFFFFF,17|-23|FFFFFF,36|-24|FFFFFF,15|11|FFFFFF,36|12|FFFFFF",0,1.0,intX2,intY2

If intX2 > 0 And intY2 > 0 Then

C = CmpColor(intX2-30, intY2 +50, "0E21C5", 0.9)

If C=0

Delay 10

Else

Tap intX2-30, intY2+50

TracePrint intX2-30&","&intY2+50

End If

End If

Delay 200

Dim intX3,intY3,D

//区域找绿字

FindMultiColor 132,389,597,1022,"FFFFFF","FFFFFF,-8|22|FFFFFF,-13|37|FFFFFF,15|-1|FFFFFF,24|15|FFFFFF,19|21|FEF6EF,27|37|FFFFFF",0,1.0,intX3,intY3

If intX3 > 0 And intY3 > 0 Then

D = CmpColor(intX3-30, intY3 + 50, "107E07", 0.9)

If D=0

Delay 10

Else

Tap intX3-30, intY3+50

TracePrint intX3-30&","&intY3+50

End If

End If

Delay 200

next

1 (1).png

(, 下载次数:0)

(2015/3/31 13:33:03 上传)