TC官方合作论坛

标题: 小弟新手，发个矩形渐开代码，请各位大神赐教 [打印本页]

作者: wuhuan285021112 时间: 2015-3-16 13:47
标题: 小弟新手，发个矩形渐开代码，请各位大神赐教
本帖最后由 wuhuan285021112 于 2015-3-16 14:59 编辑

首先有图有真相
][attach]19262[/attach]

特点：1.通用 2.扫描的间隔很均匀
增加量就相当于间隔，我特意选的17，不能被整除的数字，效果还可以吧。
没有全屏图画板，我猜屏幕边上会有一点漏扫的地方，希望有全屏画板的同学帮忙测试下，谢谢！~

下面是源代码和文件压缩包，防止伸手党，国际惯例，回复可见！代码：
[hide=d100]

空间通用矩形渐开

变量线程句柄
//------------------------------窗口初始化------------------------------
功能初始化()
控件.有效("按钮_停止",假)
控件.有效("热键_停止",假)
功能结束
//------------------------------按钮_启动_点击------------------------------
功能按钮_启动_点击()
线程句柄 = 线程.开启("通用矩形渐开.通用矩形渐开","")
控件.有效("按钮_启动",假)
控件.有效("按钮_停止",真)
控件.有效("热键_启动",假)
控件.有效("热键_停止",真)
功能结束
//------------------------------按钮_停止_点击------------------------------
功能按钮_停止_点击()
线程.关闭(线程句柄)
控件.有效("按钮_停止",假)
控件.有效("按钮_启动",真)
控件.有效("热键_停止",假)
控件.有效("热键_启动",真)
功能结束
//------------------------------热键_启动_热键------------------------------
功能热键_启动_热键()
通用矩形渐开.按钮_启动_点击()
功能结束
//------------------------------热键_停止_热键------------------------------
功能热键_停止_热键()
通用矩形渐开.按钮_停止_点击()
功能结束
//------------------------------按钮_退出_点击------------------------------
功能按钮_退出_点击()
辅助.退出()
功能结束
//------------------------------通用矩形渐开------------------------------
功能通用矩形渐开()
//宽和高可根据自己情况设定,递增量就设置比所要采集物品的大小(指屏幕像素)小上3-6个像素,防止漏扫
变量 n = 0, 宽 = 1440, 高 = 900, 递增量 = 17, x = 高/2, y = 高/2, 鼠标特征码, 是否成功 = 假
变量延时 = 辅助.随机数(10,15)
//这里先移动到起始点,不可少的步骤
鼠标.移动(x, y)
辅助.等待(延时)//这里加了很多延时,是为了在画图板上演示,自己可酌情修改
鼠标.左键按下()
辅助.等待(延时)
鼠标.左键弹起()
辅助.等待(延时)
鼠标特征码 = 鼠标.获取特征码()
如果(鼠标特征码 == "123456")
      跳转标记1
否则
      //这里是除了起始点外,其他点的扫描
      遍历(i = 0 ; i < 类型.取整(高/递增量/2) ; i++)
         遍历(j = 0 ; j < 类型.取整((宽 - 高)/递增量 + n ) ; j++)
            x = x + 递增量
            鼠标.移动(x , y)
            辅助.等待(延时)
            鼠标.左键按下()
            辅助.等待(延时)
            鼠标.左键弹起()
            辅助.等待(延时)
            //这里获取鼠标特征码,如果找到就跳转到标记1,没有则继续遍历寻找
            鼠标特征码 = 鼠标.获取特征码()
            如果(鼠标特征码 == "123456")
                  是否成功 = 真
                  跳转标记1
            如果结束
         遍历结束
         遍历(j = 0 ; j < 1 + n ; j++)
            y = y - 递增量
            鼠标.移动(x , y)
            辅助.等待(延时)
            鼠标.左键按下()
            辅助.等待(延时)
            鼠标.左键弹起()
            辅助.等待(延时)
            //这里获取鼠标特征码,如果找到就跳转到标记1,没有则继续遍历寻找
            鼠标特征码 = 鼠标.获取特征码()
            如果(鼠标特征码 == "123456")
                  是否成功 = 真
                  跳转标记1
            如果结束
         遍历结束
         n++
         遍历(j = 0 ; j < 类型.取整((宽 - 高)/递增量 + n ) ; j++)
            x = x - 递增量
            鼠标.移动(x , y)
            辅助.等待(延时)
            鼠标.左键按下()
            辅助.等待(延时)
            鼠标.左键弹起()
            辅助.等待(延时)
            //这里获取鼠标特征码,如果找到就跳转到标记1,没有则继续遍历寻找
            鼠标特征码 = 鼠标.获取特征码()
            如果(鼠标特征码 == "123456")
                  是否成功 = 真
                  跳转标记1
            如果结束
         遍历结束
         遍历(j = 0 ; j < 1 + n ; j++)
            y = y + 递增量
            鼠标.移动(x , y)
            辅助.等待(延时)
            鼠标.左键按下()
            辅助.等待(延时)
            鼠标.左键弹起()
            辅助.等待(延时)
            //这里获取鼠标特征码,如果找到就跳转到标记1,没有则继续遍历寻找
            鼠标特征码 = 鼠标.获取特征码()
            如果(鼠标特征码 == "123456")
                  是否成功 = 真
                  跳转标记1
            如果结束
         遍历结束
         n++
      遍历结束
如果结束
标记1:
//找到鼠标特征码后,单击采集物品,返回采集成功
如果(是否成功)
      鼠标.左键单击(1)
      调试输出("采集成功")
      返回 "采集成功"
否则
      调试输出("采集失败")
      返回 "采集失败"
如果结束
功能结束

空间结束[/hide]

文件下载：
[hide=d100]链接: h ttp://pan.baidu.com/s/1hqH23TM密码:12c2←刮刮乐,请用刀片等锋利物品狠刮此处[/hide]
新手上路，难免错误，请各位大神不吝赐教！

作者: 东月山 时间: 2015-3-16 15:18
对楼猪只能说,你太伟大了!!

作者: 言术 时间: 2015-3-16 15:29
画图，毛刷刷的好匀，不知道代码是用4.0的还是5.0的？

作者: wuhuan285021112 时间: 2015-3-16 15:29

东月山发表于 2015-3-16 15:18
对楼猪只能说,你太伟大了!!

请你不要再迷恋哥哥只是一个传说

作者: wuhuan285021112 时间: 2015-3-16 15:31

言术发表于 2015-3-16 15:29
画图，毛刷刷的好匀，不知道代码是用4.0的还是5.0的？

版本4.431，这不是画图好不，是矩形渐开

作者: a11518 时间: 2015-3-16 19:28
看看

作者: laowantong 时间: 2015-3-16 22:25

作者: 今非 时间: 2015-3-17 12:56
很好支持下看一下

作者: 18667006365 时间: 2015-3-21 10:16
是是中正是下

作者: penghuqu 时间: 2015-3-24 14:34
此贴必火

作者: cd7413602 时间: 2015-3-25 12:49
无咯死库水考虑

作者: cxiw 时间: 2015-4-12 03:50
鼎折覆餗

欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)