//----------------------找图单击---------------------//
功能 找图单击(x1,y1,x2,y2,图片名,t, 窗口句柄,对象,路径="c:\\Config.ini",中心点=真)
变量 intX,intY, 控制开关 = 假
公共库.临界区开(窗口句柄, 路径)
如果(t >0)
起始时间 = 日期时间.当前日期()
循环(日期时间.日期间隔("s", 起始时间, 日期时间.当前日期()) < t)
对象.FindPic(x1,y1,x2,y2,图片名,"000000",0.9,0,intX,intY)
如果(intX >0 &&intY >0)
公共库.鼠标移动单击(intX+辅助.随机数(1,3),intY+辅助.随机数(3,6),对象,中心点)
控制开关 = 真
跳出
否则
辅助.等待(500)
如果结束
循环结束
否则
对象.FindPic(x1,y1,x2,y2,图片名,"000000",0.9,0,intX,intY)
如果(intX >0 &&intY >0)
公共库.鼠标移动单击(intX,intY,对象,中心点)
控制开关 = 真
如果结束
如果结束
公共库.临界区关(窗口句柄, 路径)
如果(控制开关)
返回 1
否则
调试输出("[找图单击] 没有找到图片" & 图片名)
返回 -1
如果结束
功能结束
造这个事例封装
按这个在封装找字等,鼠标移动单击, |