《按键精灵》Function怎么循环？

明天见25 发表于 2019-7-20 20:14

本帖最后由明天见25 于 2019-7-20 20:18 编辑

Dim picPath1
zt1 ("xk4.png")
Delay 500
Function zt1(picPath1)
Dim intX1, intY1 //如果没有找到，intX1和intY1的值都会被置为-1
For 10
   Delay 500
   FindPic 0, 0, 0, 0, "Attachment:"&picPath1, "000000", 0, 0.9, intX1, intY1
   //如果没有找到，intX1和intY1的值都会被置为-1
   If intX1 > -1 And intY1 > -1 Then
         TracePrint intX1&","&intY1
         Delay 200
         Tap intX1, intY1
         Delay 200
         Exit For
   End If
Next
End Function
Dim picPath
zt ("zant.png")
Delay 500
Function zt(picPath)
Dim intX, intY //如果没有找到，intX和intY的值都会被置为-1
For 1000
   Delay 10000
   FindPic 0, 0, 0, 0, "Attachment:"&picPath, "000000", 0, 0.9, intX, intY
   //如果没有找到，intX和intY的值都会被置为-1
   If intX > -1 And intY > -1 Then
         TracePrint intX&","&intY
         Delay 200
         Tap 35,927
         Delay 200
         Exit For
   End If
Next
End Function
Do
TracePrint zt1(picPath1)
Delay 1000
TracePrint zt(picPath)
Delay 1000
Loop

循环找不到图了，请问大佬这个循环该怎么改？

荧光发表于 2019-7-21 00:45

换易区分的图片，相似度调小点

wuxingyevip 发表于 2019-7-21 12:36

看不懂怎么办

明天见25 发表于 2019-7-22 23:22

X1737068462 发表于 2019-7-21 00:45
换易区分的图片，相似度调小点

我是想让这个循环运行，但是循环的时候没找图

qq727887261 发表于 2019-8-8 12:45

直接用do就行了。可以把do写到函数里面。然后直接调用函数

Xer0 发表于 2019-8-9 09:38

按键精灵里的function 不需要写在主体内的吧
你需要循环调用function只需要在主程序的Do...Loop循环里调用就行了

当然我不知道这样循环能不能达到你原本的目的

hao5205420 发表于 2019-9-8 12:55

你的写法都不对，找得到图才怪。你先好好学下找图命令的基本语法吧，还有你附件上传的图片名称是什么？

hao5205420 发表于 2019-9-8 13:02

首先你定义的 picPath1和picPath是两个全局变量，可以放一起定义无需分开定义，直接Dim picPath1,picPath就可以了，其次你说找不到图是因为FindPic 0, 0, 0, 0, "Attachment:"&picPath1, "000000", 0, 0.9, intX1, intY1这里面没有把附件上传的名称引用上，你是用的变量。 "Attachment:"&picPath1把这个改成附件内的图片名称

页: [1]

吾爱破解 - 52pojie.cn's Archiver

《按键精灵》Function怎么循环？