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/)
Powered by Discuz! X3.1