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

明天见25

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


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

荧光

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

wuxingyevip

看不懂怎么办

明天见25

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

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

qq727887261

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

Xer0

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

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

hao5205420

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

hao5205420

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