屏幕有多个一样的图，循环找图老是点击第一个找到的，怎么循环找到点击，下一次循环不会点击第一个找到的坐标？ _ 会员专区 - 按键精灵论坛
腾讯微博：
软件版本：2014.05软件大小：21.6M更新时间：07-04
软件版本：3.2.7软件大小：62.5M更新时间：11-02
软件版本：1.3.1软件大小：29.2M更新时间：09-29
软件版本：1.1.0软件大小：12.3M更新时间：12-29
查看: 698|回复: 5
按键会员（年）按键会员绑定账号后自动赠送
屏幕有多个图一样的我这样循环，它老是下一次还是点击第一次循环找到的位置。怎么让它下一次循环不会点击第一次找到的坐标。Dim intX, intYDim intX1, intY1intX1 = 423intY1 = 302Do
FindPic 442,895,490,958, &Attachment:我的.png&,&, 0.8, intX, intY
If intX &-1 then
TracePrint &找到我的主页&
Delay 1500
TracePrint &下一个查找&&intX1&&,&&intY1
FindPic intX1, intY1,526,343, &Attachment:马上兑换.png&,&, 0.8, intX1, intY1
If intX1 &-1 then
TracePrint &找到马上兑换点击&&intX1&&,&&intY1
Touch intX1, intY1, 100
intY1 = intY1 + 50
Delay 1500
TracePrint &没找到&
TracePrint &没找到我的主页，返回一次&
KeyPress &Back&
Delay 1000Loop
按键会员（年）按键会员绑定账号后自动赠送
随便告诉我一下，怎么把找图给封装起来。我写脚本经常找图。不可能每一次找图我都要写FindPic intX1, intY1,526,343, &Attachment:马上兑换.png&,&, 0.8, intX1, intY1If intX1 &-1 thenElseTracePrint &没找到&End If这样太麻烦，真心求教！有没有更简便的方法
按 键 工 程 师·兼 职
按键X开拓者勋章最先体验按键精灵X，且提交有效反馈的奖励勋章过大年勋章俩小福娃给大家拜年啦！双十一绝版纪念勋章双十一绝版纪念勋章抗战胜利70周年勋章抗战胜利70周年活动的专属勋章单身汪勋章单身贵族的专属勋章按键14周年庆纪念勋章按键14周年庆纪念勋章（360天）按键学院按键学院专属勋章，按键学院学员或文章被院刊收入可领取幸运草勋章（永久）商业小精灵限时活动勋章。马年勋章（360天） 马年纪念勋章（360天）月全勤论坛自然月（如8.1-8.31）签到满勤，系统会在月底自动判断发放。鹰眼勋章鹰眼注册用户专属勋章黄瓜勋章（永久）体验商业小精灵活动的奖励天使勋章天使一样的用户按键明星按键明星勋章黄金之翼黄金之翼勋章举报达人长期举报不良帖子活动狂人论坛活动狂人骨灰级按键用户3年以上的按键论坛用户按键精灵开发者6级可通过提升认证等级来升级勋章：龙年勋章（360天）龙年纪念勋章（360天）十周年勋章（360天）十周年纪念勋章兔年勋章（360天）兔年纪念勋章(360天)论坛GG按键论坛男性用户勋章发帖高手鼓励积极回复，但注意不要灌水哦爱心大使积极帮助新手（可向管理员进行申请）学有所成学有所成勋章，新手步入按键学堂的第一枚勋章实习版主按键论坛的实习版主专属勋章按键元老资深按键用户的尊贵荣誉勋章管理人员按键论坛的管理团队专属勋章
回复 问题一:Dim intX, intY,startx,starty, endx,endy,count,结果
Dim img=&Attachment:1.png&
startx = 0 : starty = 0 : endx = 720 : endy = 1280
: count = 0
FindPic startx, starty, endx, endy, img,&,
0.8, intX, intY'一图多坐标写法
If intx = - 1
If startx=0 Then Exit do //查找结束
starty = starty + 1 : startx = 0
If inty = starty or startx = 0 Then
startx = intx + 1:starty=inty
count = count + 1
结果 = 结果 &
intx & &,& & inty&&|&
startx = 0 : starty = starty + 1
结果 = Split(结果, &|&)
For i = 0 To UBOUND(结果) - 1
TracePrint 结果(i)'按顺序输出所有坐标
复制代码问题二:Dim
intX1, intY1
Call 找图(0,0,0,0,&Attachment:1.png&)
Sub 找图(X, Y, X1,Y1,图名)
FindPic X, Y,X1,Y1, 图名,&, 0.8, intX1, intY1
If intX1 &-1 then
TracePrint intX1, intY1
TracePrint &没找到&
End If&&&&
&为什么会停止循环？如果没有坐标，可以滑屏再查找吗？还有就是。点击要在哪里加？投票在哪投？&
自命不凡，其实很落魄个人QQ: 个人爱好群:[加群有惊喜]风霜满面的将军下马问路边茶娘:&大婶,你知道附近那个说话很温柔的卖茶姑娘住在哪里吗&茶娘笑笑:&她呀,嫁了个好人家,衣食无忧,听说过的很好&将军叹息,从怀中掏出块手绢,请您帮我把这个还给她,谢谢她当年的茶点心.日落马远,茶娘小心将手绢系在手腕,
按键会员（年）按键会员绑定账号后自动赠送
回复 大神！问题一我很懵逼！！为什么会停止循环？？如果没有坐标，可以滑屏再查找吗？
按键会员（年）按键会员绑定账号后自动赠送
回复 还有就是。点击要在哪里加？你写得好高级！我有点不知所措
按 键 工 程 师·兼 职
按键X开拓者勋章最先体验按键精灵X，且提交有效反馈的奖励勋章过大年勋章俩小福娃给大家拜年啦！双十一绝版纪念勋章双十一绝版纪念勋章抗战胜利70周年勋章抗战胜利70周年活动的专属勋章单身汪勋章单身贵族的专属勋章按键14周年庆纪念勋章按键14周年庆纪念勋章（360天）按键学院按键学院专属勋章，按键学院学员或文章被院刊收入可领取幸运草勋章（永久）商业小精灵限时活动勋章。马年勋章（360天） 马年纪念勋章（360天）月全勤论坛自然月（如8.1-8.31）签到满勤，系统会在月底自动判断发放。鹰眼勋章鹰眼注册用户专属勋章黄瓜勋章（永久）体验商业小精灵活动的奖励天使勋章天使一样的用户按键明星按键明星勋章黄金之翼黄金之翼勋章举报达人长期举报不良帖子活动狂人论坛活动狂人骨灰级按键用户3年以上的按键论坛用户按键精灵开发者6级可通过提升认证等级来升级勋章：龙年勋章（360天）龙年纪念勋章（360天）十周年勋章（360天）十周年纪念勋章兔年勋章（360天）兔年纪念勋章(360天)论坛GG按键论坛男性用户勋章发帖高手鼓励积极回复，但注意不要灌水哦爱心大使积极帮助新手（可向管理员进行申请）学有所成学有所成勋章，新手步入按键学堂的第一枚勋章实习版主按键论坛的实习版主专属勋章按键元老资深按键用户的尊贵荣誉勋章管理人员按键论坛的管理团队专属勋章
回复 注:你好 建议学好基础 会员区并不提供教学服务 起码应该看懂工程师答复的代码 若看不懂思路起码要会用会小改[同时本版面为PC免费版会员区 并非安卓会员区]Dim intX, intY,startx,starty, endx,endy,count,结果
Dim img=&Attachment:1.png&
startx = 0 : starty = 0 : endx = 720 : endy = 1280
: count = 0
FindPic startx, starty, endx, endy, img,&,
0.8, intX, intY'一图多坐标写法
If intx = - 1
If startx=0 Then Exit do //查找结束
starty = starty + 1 : startx = 0
If inty = starty or startx = 0 Then
startx = intx + 1:starty=inty
count = count + 1
结果 = 结果 & intx & &,& & inty & &|&
intX, intY'点击
startx = 0 : starty = starty + 1
If 结果 = && Then '说明没有找到
'滑动&&&&
Delay 2000
&谢谢你的帮助，我会仔细想想这个思路是怎么样的&
自命不凡，其实很落魄个人QQ: 个人爱好群:[加群有惊喜]风霜满面的将军下马问路边茶娘:&大婶,你知道附近那个说话很温柔的卖茶姑娘住在哪里吗&茶娘笑笑:&她呀,嫁了个好人家,衣食无忧,听说过的很好&将军叹息,从怀中掏出块手绢,请您帮我把这个还给她,谢谢她当年的茶点心.日落马远,茶娘小心将手绢系在手腕,}