TC官方合作论坛

 找回密码
 立即注册
查看: 936|回复: 0

[问题] 求大神指导循环采集问题,

[复制链接]
发表于 2013-10-22 15:38:01 | 显示全部楼层 |阅读模式

马上加入TC

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
功能 坐标拆分()
    //测试采集.免注册大漠()
    变量 坐标数组,XY坐标数组,XY坐标,计次=0
    变量 采集坐标值,长度,坐标_X,坐标_Y
    变量 intX,intY

    采集坐标值=编辑框.获得文本("编辑框_采集坐标集")
    字符串.分割(采集坐标值,"|",坐标数组)
    数组空间.大小(坐标数组,长度)

    循环(真)



        遍历(i=0;i<长度;i++)

            字符串.分割(坐标数组,",",XY坐标数组)
            //调试输出("坐标数组X" & XY坐标数组[0] & "坐标数组Y" & XY坐标数组[1])
            //新问题.循环到这里坐标会每次都计算.

            坐标_X=类型.转整型((XY坐标数组[0]-305)*0.85+305)
            坐标_Y=类型.转整型((XY坐标数组[1]-83)*0.85+119)

            //可能是
            测试采集.地图单击(坐标_X,坐标_Y)

            测试采集.寻路判断(坐标_X,坐标_Y)

            循环(真)
                辅助.等待(辅助.随机数(100,300))
                dm.FindPic(268,77,814,605,"石芒铁矿.bmp","000000",0.9,0,intX,intY)  

                如果(intX >= 0 && intY >= 0)

                    dm.MoveTo(intX,intY+110)

                    dm.LeftDoubleClick()


                    dm.FindPic(272,414,823,722,"挖矿读取条.bmp","000000",0.9,0,intX,intY)

                    如果(intX >= 0 && intY >= 0)
                        辅助.等待(辅助.随机数(4000,6000))
                        dm.KeyPress(90)
                        辅助.等待(辅助.随机数(50,100))
                        dm.KeyPress(90)

                        跳出
                    如果结束
                否则

                    跳出
                如果结束
            循环结束

            dm_ret = dm.UnBindWindow()

            调试输出(坐标_X)
            调试输出(坐标_Y)
        遍历结束


        //循环结束问题.
        //调试输出("111111111"&坐标_X)
        //调试输出("111111111"&坐标_Y)

    循环结束

跑第一点是对的,调试输出注释             //测试采集.地图单击(坐标_X,坐标_Y)  // 测试采集.寻路判断(坐标_X,坐标_Y)     这2条,那他输出又是对的。

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

推荐上一条 /2 下一条

关闭

小黑屋|TC官方合作论坛 (苏ICP备18045623号)

GMT+8, 2024-9-23 19:40 , Processed in 0.048377 second(s), 23 queries .

Powered by 海安简单软件服务部

© 2008-2019 版权所有 保留所有权利

快速回复 返回顶部 返回列表