按键精灵简单的限时找图并点击

直接上代码不多说：

Sub 限时找图并点击(左上角X,左上角Y,右下角X,右下角Y,偏移X,偏移Y,路径,间隔,备注)
    Call Plugin.Msg.Tips(备注)
    TracePrint 备注
    开始时间 = now
    Do
        FindPic 左上角X,左上角Y,右下角X,右下角Y,路径,0.9,intX,intY
        If intX > 0 And intY > 0 Then 
            MoveTo int(intX + 偏移X),  int(intY+ 偏移Y)
            LeftClick 1
            Exit Do
        Else 
        End If
        时间差 = DateDiff("S", 开始时间, now)
        TracePrint 时间差
        Call Plugin.Msg.Tips("没找到"&备注&"等待"&间隔&"秒:"&时间差)
        Delay 500
    Loop Until 时间差>间隔
End Sub