按键精灵区域找图不成功，找不出原因呀？

图已经导入附件，单独测试找图没问题。导入整个代码就不执行了。相似度调到0.7或0.9都不行。这是为什么呀？
Text = Plugin.File.ReadFileEx("C:\账号.txt")
dim M
M= Split(Text, "|")
i=0
For UBound(M)
MoveTo 785, 475
Delay 200
LeftDoubleClick 1
Delay 200
SayString M(i)
Delay 200
MoveTo 787, 507
LeftClick 1
Delay 200
k="dkldjf45rejj"
Delay 200
SayString k
MoveTo 825, 577
Delay 200
LeftClick 1
Delay 4000
FindPic 300,300,1024,768,"Attachment:\手.bmp",0.7,intX,intY
If intX > 0 And intY > 0 Then
End If
Delay 500
MoveTo intX, intY
Delay 500
LeftClick 1
MoveTo 772, 157
Delay 200
LeftClick 1
Delay 200
MoveTo 711, 209
Delay 3000
LeftClick 1
Delay 1000
i=i+1
Next

鼠标都是移动左上角，找不到图。

//既然单独找图没问题，就是动作不协调，改改就行
Text = Plugin.File.ReadFileEx("C:\账号.txt")
dim M
M= Split(Text, "|")
i=0
For UBound(M)
MoveTo 785, 475
Delay 200
LeftDoubleClick 1
Delay 200
SayString M(i)
Delay 200
MoveTo 787, 507
LeftClick 1
Delay 200
k="dkldjf45rejj"
Delay 200
SayString k
MoveTo 825, 577
Delay 200
LeftClick 1
Delay 4000
Rem q//找到为止
Delay 500
FindPic 300,300,1024,768,"Attachment:\手.bmp",0.7,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 500
LeftClick 1
Else
Goto q
End If
MoveTo 772, 157
Delay 200
LeftClick 1
Delay 200
MoveTo 711, 209
Delay 3000
LeftClick 1
Delay 1000
i=i+1
Next

//使用数组,第一种颜色赋值给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 //跳回（结束）循环

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息