循环找图有时候移动不点击

zhihua502

因为那个游戏进图是有冷却时间的， 有时候冷却没到就进不去，所以如果点了没进 就要持续点击，直到进去为止。
想要实现的效果是：
1、找到 进图.bmp 移动点击  ---------------------------(进图)
2、进去以后等待30秒，找图 关闭.bmp移动点击  （退出地图）
3、无限循环1和2

但是有时候找到图并不移动过去点， 有时候移动过去了却不点，有时候移动过去了点了几次没进去就不点了，
有时候我拿鼠标晃一晃或者把鼠标放到按钮上，脚本又会活过来苦思了好几天改了很多次代码，还是不稳定！也找不到问题出在哪！
  所以来论坛问问有没有人知道怎么解决，回复的朋友我先谢谢了!
//
功能 打boss()
    dm.SetPath(辅助.获取资源路径("rc:")) //设置路径
    变量 intX,intY
    循环(真)
        dm_ret = dm.FindPic(0,0,2000,2000,"进图.bmp","000000",0.9,0,intX,intY)
        如果(intX >= 0 && intY >= 0)
            dm.MoveTo(intX+20,intY-50) //因为进图按钮会变色，所以我截图不会变色的地方然后加个偏移，偏移没问题，测过了。
            辅助.等待(50)
            dm.LeftClick()
        如果结束

        dm_ret = dm.FindPic(0,0,2000,2000,"关闭.bmp","000000",0.9,0,intX,intY)
        如果(dm_ret==0)//判断是否找到 找图返回值 0(找到) -1(未找到)
            辅助.等待(30000)
            dm.MoveTo(intX+40,intY+5) //因为进图按钮会变色，所以我截图不会变色的地方然后加个偏移，偏移没问题，测过了。
            辅助.等待(50)
            dm.LeftClick()
        如果结束
    循环结束
   
功能结束

//
问题描述有点啰嗦，不好意思哦

爱上老公

那把相似度改下

二叔.

加个判断啊，判断完全进去再操作

这论坛不错

2个如果结束下面加点延时，1秒左右

zhihua502

二叔. 发表于 2015-5-16 21:14
加个判断啊，判断完全进去再操作

如果()这不是判断吗？ 要怎么改 ？ 我试过很多方法了都不稳定。
下面这个代码也不稳定
。
。

变量 循环开关 = 真
循环(循环开关)
         dm.SetPath(辅助.获取资源路径("rc:")) //设置路径
         变量 intX,intY
         dm_ret = dm.FindPic(0,0,2000,2000,"2.bmp","000000",0.9,0,intX,intY)
         如果(intX>0&&intY>0)     //判断是否找到 找图返回值 0(找到) -1(未找到)
//找到图点击关闭
             dm.MoveTo(intX,intY)
             dm.LeftClick()
             否则
//没有找到图，说明关闭了
跳出
如果结束
循环结束

zhihua502

这论坛不错 发表于 2015-5-16 21:15
2个如果结束下面加点延时，1秒左右

如果(intX >= 0 && intY >= 0)
             辅助.等待(1000)
dm.MoveTo(intX+40,intY+5)
             辅助.等待(50)
             dm.LeftClick()

鼠标移动和点击中间要加吗 加多少合适？

爱上老公

你这是什么版本的TC啊，大概看了下，把下面这个dm_ret改成dm_ret1，下面这个intX,intY改成intX1,intY1，在实验下前面在声明2个变量intX1,intY1

这论坛不错

zhihua502 发表于 2015-5-16 22:49
如果(intX >= 0 && intY >= 0)
             辅助.等待(1000)
dm.MoveTo(intX+40,intY+5)

加个半秒至一秒

zhihua502

这论坛不错 发表于 2015-5-16 21:15
2个如果结束下面加点延时，1秒左右

循环(真)
        dm_ret = dm.FindPic(0,0,2000,2000,"2.bmp","000000",0.9,0,intX,intY)
        如果(intX >= 0 && intY >= 0)
             辅助.等待(50)
            dm.MoveTo(intX+20,intY-50)
            辅助.等待(50)
            dm.LeftClick()
        如果结束
        辅助.等待(1000)
        
        dm_ret = dm.FindPic(0,0,2000,2000,"7.bmp","000000",0.9,0,intX,intY)
        如果(dm_ret==0)//判断是否找到 找图返回值 0(找到) -1(未找到)
            辅助.等待(20000)
            dm.MoveTo(intX+40,intY+5)
            辅助.等待(50)
            dm.LeftClick()
        如果结束
        辅助.等待(1000)
    循环结束


。。。。。。。。。加了不行，也是点了两下没进图就不点了，没进图成功代表  intX，intx还是等于0，为什么就不点了，我拿鼠标晃了几下，鼠标又自己移过去点然后才成功。不晃鼠标就假死。

爱上老公

功能 打boss()
    dm.SetPath(辅助.获取资源路径("rc:"))
    变量 intX,intY
    循环(真)
        等待(500)
        变量 牛牛 = dm.FindPic(0,0,2000,2000,"进图.bmp|关闭.bmp","000000",0.9,0,intX,intY)
        如果(牛牛==0)
            等待(200)
            dm.MoveTo(intX+20,intY-50)
            辅助.等待(100)
            dm.LeftClick()
        结束
        如果(牛牛==1)
            等待(200)
            dm.MoveTo(intX+40,intY+5)
            辅助.等待(100)
            dm.LeftClick()
            辅助.等待(100)
            跳出
        结束
    结束
结束

爱上老公

我上面是用5.0写的，你改成你的版本格式就好了