区域找图找色模块源码 请大神帮忙看看有啥问题哈 好久没来说话了。。。

爱の伤心醉╮

{:soso_e105:}为什么我不能上传附件。。。附件上传次数怎么会是48？？？  我今天连一个字都还没发过(除了这贴)。。。{:soso_e127:}

  

子程序名	返回值类型	公开	备 注
找图找色
参数名	类 型	参考	可空	数组	备 注
欲找图的数据	字节集
相似度	双精度小数型
返回坐标	坐标				返回找到坐标(为欲找图片的左上坐标) 坐标为(-1,-1)未找到
是否循环查找	逻辑型
循环查找次数	整数型
循环间隔	整数型
区域左上坐标	坐标
区域宽度	整数型
区域高度	整数型

变量名	类 型	静态	数组	备 注
aa	字节集
位图	位图
截图	位图
x	整数型
y	整数型
颜色_左上	整数型
颜色_左下	整数型
颜色_右上	整数型
颜色_右下	整数型
是否找到	逻辑型
找到图片	位图
局_找到图x	整数型
局_找到图y	整数型
相似点数	整数型
临时位图	位图
循环查找次数计次	整数型

返回坐标.横坐标 ＝ -1
返回坐标.纵坐标 ＝ -1
aa ＝ 快照 (, , )
临时位图.载入数据 (aa)
位图.载入数据 ({ })
位图.创建 (区域宽度, 区域高度, 24, )
临时位图.复制到 (区域左上坐标.横坐标, 区域左上坐标.纵坐标, 位图.取宽度 (), 位图.取高度 (), 位图, 0, 0, )
截图.载入数据 (欲找图的数据)
找到图片.创建 (截图.取宽度 (), 截图.取高度 (), 24, )
颜色_左上 ＝ 截图.取某点颜色 (0, 0)
颜色_左下 ＝ 截图.取某点颜色 (0, 截图.取高度 () － 1)
颜色_右上 ＝ 截图.取某点颜色 (截图.取宽度 () － 1, 0)
颜色_右下 ＝ 截图.取某点颜色 (截图.取宽度 () － 1, 截图.取高度 () － 1)
判断 (是否循环查找 ＝ 真)
判断循环首 (是否找到 ＝ 假)
循环查找次数计次 ＝ 循环查找次数计次 ＋ 1
aa ＝ 快照 (, , )
临时位图.载入数据 (aa)
位图.载入数据 ({ })
位图.创建 (区域宽度, 区域高度, 24, )
临时位图.复制到 (区域左上坐标.横坐标, 区域左上坐标.纵坐标, 位图.取宽度 (), 位图.取高度 (), 位图, 0, 0, )
截图.载入数据 (欲找图的数据)
颜色_左上 ＝ 截图.取某点颜色 (0, 0)
颜色_左下 ＝ 截图.取某点颜色 (0, 截图.取高度 () － 1)
颜色_右上 ＝ 截图.取某点颜色 (截图.取宽度 () － 1, 0)
颜色_右下 ＝ 截图.取某点颜色 (截图.取宽度 () － 1, 截图.取高度 () － 1)
计次循环首 (位图.取宽度 (), x)
计次循环首 (位图.取高度 (), y)
如果真 (颜色_左上 ＝ 位图.取某点颜色 (x － 1, y － 1)) ' 左上
如果真 (颜色_左下 ＝ 位图.取某点颜色 (x － 1, y － 2 ＋ 截图.取高度 ())) ' 左下
如果真 (颜色_右上 ＝ 位图.取某点颜色 (x － 2 ＋ 截图.取宽度 (), y － 1)) ' 右上
如果真 (颜色_右下 ＝ 位图.取某点颜色 (x － 2 ＋ 截图.取宽度 (), y － 2 ＋ 截图.取高度 ())) ' 右下
位图.复制到 (x － 1, y － 1, 找到图片.取宽度 (), 找到图片.取高度 (), 找到图片, 0, 0, )
相似点数 ＝ 0
计次循环首 (截图.取宽度 (), 局_找到图x)
计次循环首 (截图.取高度 (), 局_找到图y)
如果真 (截图.取某点颜色 (局_找到图x － 1, 局_找到图y － 1) ＝ 找到图片.取某点颜色 (局_找到图x － 1, 局_找到图y － 1))
相似点数 ＝ 相似点数 ＋ 1

计次循环尾 ()
计次循环尾 ()
如果真 (相似度 ≤ 相似点数 ÷ (截图.取宽度 () × 截图.取高度 ()))
返回坐标.横坐标 ＝ x － 1 ＋ 区域左上坐标.横坐标 － 1
返回坐标.纵坐标 ＝ y － 1 ＋ 区域左上坐标.纵坐标 － 1
返回 ()





计次循环尾 ()
计次循环尾 ()
如果真 (循环查找次数 ≠ 0)
如果真 (循环查找次数 ≤ 循环查找次数计次)
返回坐标.横坐标 ＝ -1
返回坐标.纵坐标 ＝ -1
返回 ()


延迟 (循环间隔)
判断循环尾 ()

aa ＝ 快照 (, , )
临时位图.载入数据 (aa)
位图.载入数据 ({ })
位图.创建 (区域宽度, 区域高度, 24, )
临时位图.复制到 (区域左上坐标.横坐标, 区域左上坐标.纵坐标, 位图.取宽度 (), 位图.取高度 (), 位图, 0, 0, )
截图.载入数据 (欲找图的数据)
颜色_左上 ＝ 截图.取某点颜色 (0, 0)
颜色_左下 ＝ 截图.取某点颜色 (0, 截图.取高度 () － 1)
颜色_右上 ＝ 截图.取某点颜色 (截图.取宽度 () － 1, 0)
颜色_右下 ＝ 截图.取某点颜色 (截图.取宽度 () － 1, 截图.取高度 () － 1)
计次循环首 (位图.取宽度 (), x)
计次循环首 (位图.取高度 (), y)
如果真 (颜色_左上 ＝ 位图.取某点颜色 (x － 1, y － 1)) ' 左上
如果真 (颜色_左下 ＝ 位图.取某点颜色 (x － 1, y － 2 ＋ 截图.取高度 ())) ' 左下
如果真 (颜色_右上 ＝ 位图.取某点颜色 (x － 2 ＋ 截图.取宽度 (), y － 1)) ' 右上
如果真 (颜色_右下 ＝ 位图.取某点颜色 (x － 2 ＋ 截图.取宽度 (), y － 2 ＋ 截图.取高度 ())) ' 右下
位图.复制到 (x － 1, y － 1, 找到图片.取宽度 (), 找到图片.取高度 (), 找到图片, 0, 0, )
相似点数 ＝ 0
计次循环首 (截图.取宽度 (), 局_找到图x)
计次循环首 (截图.取高度 (), 局_找到图y)
如果真 (截图.取某点颜色 (局_找到图x － 1, 局_找到图y － 1) ＝ 找到图片.取某点颜色 (局_找到图x － 1, 局_找到图y － 1))
相似点数 ＝ 相似点数 ＋ 1

计次循环尾 ()
计次循环尾 ()
如果真 (相似度 ≤ 相似点数 ÷ (截图.取宽度 () × 截图.取高度 ()))
返回坐标.横坐标 ＝ x － 1 ＋ 区域左上坐标.横坐标 － 1
返回坐标.纵坐标 ＝ y － 1 ＋ 区域左上坐标.纵坐标 － 1
返回 ()





计次循环尾 ()
计次循环尾 ()

返回坐标.横坐标 ＝ -1
返回坐标.纵坐标 ＝ -1
返回 ()
. ' 计次循环首 (位图.取宽度 (), x)
. ' 计次循环首 (位图.取高度 (), y)
. ' 如果真 (颜色_左上 ＝ 位图.取某点颜色 (x － 1, y － 1)) ' 左上
. ' 如果真 (颜色_左下 ＝ 位图.取某点颜色 (x － 1, y － 2 ＋ 截图.取高度 ())) ' 左下
. ' 如果真 (颜色_右上 ＝ 位图.取某点颜色 (x － 2 ＋ 截图.取宽度 (), y － 1)) ' 右上
. ' 如果真 (颜色_右下 ＝ 位图.取某点颜色 (x － 2 ＋ 截图.取宽度 (), y － 2 ＋ 截图.取高度 ())) ' 右下
' 位图.复制到 (x － 1, y － 1, 找到图片.取宽度 (), 找到图片.取高度 (), 找到图片, 0, 0, )
' 相似点数 ＝ 0
. ' 计次循环首 (截图.取宽度 (), 局_找到图x)
. ' 计次循环首 (截图.取高度 (), 局_找到图y)
. ' 如果真 (截图.取某点颜色 (局_找到图x － 1, 局_找到图y － 1) ＝ 找到图片.取某点颜色 (局_找到图x － 1, 局_找到图y － 1))
' 相似点数 ＝ 相似点数 ＋ 1

. ' 计次循环尾 ()
. ' 计次循环尾 ()
. ' 如果真 (相似度 ≤ 相似点数 ÷ (截图.取宽度 () × 截图.取高度 ()))
' 返回坐标.横坐标 ＝ x － 1
' 返回坐标.纵坐标 ＝ y － 1
' 返回 ()





. ' 计次循环尾 ()
. ' 计次循环尾 ()
' 返回 ()

i支持库列表	支持库注释
BmpOperate	位图操作支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 BmpOperate<br /> .支持库 spec<br /> <br /> .子程序 找图找色, , 公开<br /> .参数 欲找图的数据, 字节集<br /> .参数 相似度, 双精度小数型<br /> .参数 返回坐标, 坐标, , 返回找到坐标(为欲找图片的左上坐标) 坐标为(-1,-1)未找到<br /> .参数 是否循环查找, 逻辑型, 可空<br /> .参数 循环查找次数, 整数型, 可空<br /> .参数 循环间隔, 整数型, 可空<br /> .参数 区域左上坐标, 坐标, 可空<br /> .参数 区域宽度, 整数型, 可空<br /> .参数 区域高度, 整数型, 可空<br /> .局部变量 aa, 字节集<br /> .局部变量 位图, 位图<br /> .局部变量 截图, 位图<br /> .局部变量 x, 整数型<br /> .局部变量 y, 整数型<br /> .局部变量 颜色_左上, 整数型<br /> .局部变量 颜色_左下, 整数型<br /> .局部变量 颜色_右上, 整数型<br /> .局部变量 颜色_右下, 整数型<br /> .局部变量 是否找到, 逻辑型<br /> .局部变量 找到图片, 位图<br /> .局部变量 局_找到图x, 整数型<br /> .局部变量 局_找到图y, 整数型<br /> .局部变量 相似点数, 整数型<br /> .局部变量 临时位图, 位图<br /> .局部变量 循环查找次数计次, 整数型<br /> <br /> 返回坐标.横坐标 ＝ -1<br /> 返回坐标.纵坐标 ＝ -1<br /> <br /> aa ＝ 快照 (, , )<br /> 临时位图.载入数据 (aa)<br /> <br /> 位图.载入数据 ({ })<br /> 位图.创建 (区域宽度, 区域高度, 24, )<br /> 临时位图.复制到 (区域左上坐标.横坐标, 区域左上坐标.纵坐标, 位图.取宽度 (), 位图.取高度 (), 位图, 0, 0, )<br /> <br /> <br /> 截图.载入数据 (欲找图的数据)<br /> 找到图片.创建 (截图.取宽度 (), 截图.取高度 (), 24, )<br /> <br /> <br /> 颜色_左上 ＝ 截图.取某点颜色 (0, 0)<br /> 颜色_左下 ＝ 截图.取某点颜色 (0, 截图.取高度 () － 1)<br /> 颜色_右上 ＝ 截图.取某点颜色 (截图.取宽度 () － 1, 0)<br /> 颜色_右下 ＝ 截图.取某点颜色 (截图.取宽度 () － 1, 截图.取高度 () － 1)<br /> <br /> <br /> .判断开始 (是否循环查找 ＝ 真)<br /> <br /> <br /> .判断循环首 (是否找到 ＝ 假)<br /> 循环查找次数计次 ＝ 循环查找次数计次 ＋ 1<br /> aa ＝ 快照 (, , )<br /> 临时位图.载入数据 (aa)<br /> 位图.载入数据 ({ })<br /> 位图.创建 (区域宽度, 区域高度, 24, )<br /> 临时位图.复制到 (区域左上坐标.横坐标, 区域左上坐标.纵坐标, 位图.取宽度 (), 位图.取高度 (), 位图, 0, 0, )<br /> <br /> 截图.载入数据 (欲找图的数据)<br /> 颜色_左上 ＝ 截图.取某点颜色 (0, 0)<br /> 颜色_左下 ＝ 截图.取某点颜色 (0, 截图.取高度 () － 1)<br /> 颜色_右上 ＝ 截图.取某点颜色 (截图.取宽度 () － 1, 0)<br /> 颜色_右下 ＝ 截图.取某点颜色 (截图.取宽度 () － 1, 截图.取高度 () － 1)<br /> <br /> <br /> .计次循环首 (位图.取宽度 (), x)<br /> .计次循环首 (位图.取高度 (), y)<br /> .如果真 (颜色_左上 ＝ 位图.取某点颜色 (x － 1, y － 1)) ' 左上<br /> .如果真 (颜色_左下 ＝ 位图.取某点颜色 (x － 1, y － 2 ＋ 截图.取高度 ())) ' 左下<br /> .如果真 (颜色_右上 ＝ 位图.取某点颜色 (x － 2 ＋ 截图.取宽度 (), y － 1)) ' 右上<br /> .如果真 (颜色_右下 ＝ 位图.取某点颜色 (x － 2 ＋ 截图.取宽度 (), y － 2 ＋ 截图.取高度 ())) ' 右下<br /> 位图.复制到 (x － 1, y － 1, 找到图片.取宽度 (), 找到图片.取高度 (), 找到图片, 0, 0, )<br /> <br /> 相似点数 ＝ 0<br /> <br /> .计次循环首 (截图.取宽度 (), 局_找到图x)<br /> <br /> .计次循环首 (截图.取高度 (), 局_找到图y)<br /> .如果真 (截图.取某点颜色 (局_找到图x － 1, 局_找到图y － 1) ＝ 找到图片.取某点颜色 (局_找到图x － 1, 局_找到图y － 1))<br /> 相似点数 ＝ 相似点数 ＋ 1<br /> .如果真结束<br /> <br /> .计次循环尾 ()<br /> .计次循环尾 ()<br /> .如果真 (相似度 ≤ 相似点数 ÷ (截图.取宽度 () × 截图.取高度 ()))<br /> 返回坐标.横坐标 ＝ x － 1 ＋ 区域左上坐标.横坐标 － 1<br /> 返回坐标.纵坐标 ＝ y － 1 ＋ 区域左上坐标.纵坐标 － 1<br /> 返回 ()<br /> <br /> .如果真结束<br /> <br /> .如果真结束<br /> <br /> .如果真结束<br /> <br /> .如果真结束<br /> <br /> .如果真结束<br /> <br /> .计次循环尾 ()<br /> .计次循环尾 ()<br /> <br /> .如果真 (循环查找次数 ≠ 0)<br /> .如果真 (循环查找次数 ≤ 循环查找次数计次)<br /> 返回坐标.横坐标 ＝ -1<br /> 返回坐标.纵坐标 ＝ -1<br /> 返回 ()<br /> <br /> .如果真结束<br /> <br /> .如果真结束<br /> <br /> 延迟 (循环间隔)<br /> <br /> .判断循环尾 ()<br /> <br /> <br /> <br /> <br /> <br /> <br /> <br /> <br /> .默认<br /> aa ＝ 快照 (, , )<br /> 临时位图.载入数据 (aa)<br /> 位图.载入数据 ({ })<br /> 位图.创建 (区域宽度, 区域高度, 24, )<br /> 临时位图.复制到 (区域左上坐标.横坐标, 区域左上坐标.纵坐标, 位图.取宽度 (), 位图.取高度 (), 位图, 0, 0, )<br /> <br /> 截图.载入数据 (欲找图的数据)<br /> 颜色_左上 ＝ 截图.取某点颜色 (0, 0)<br /> 颜色_左下 ＝ 截图.取某点颜色 (0, 截图.取高度 () － 1)<br /> 颜色_右上 ＝ 截图.取某点颜色 (截图.取宽度 () － 1, 0)<br /> 颜色_右下 ＝ 截图.取某点颜色 (截图.取宽度 () － 1, 截图.取高度 () － 1)<br /> <br /> <br /> <br /> <br /> <br /> .计次循环首 (位图.取宽度 (), x)<br /> .计次循环首 (位图.取高度 (), y)<br /> .如果真 (颜色_左上 ＝ 位图.取某点颜色 (x － 1, y － 1)) ' 左上<br /> .如果真 (颜色_左下 ＝ 位图.取某点颜色 (x － 1, y － 2 ＋ 截图.取高度 ())) ' 左下<br /> .如果真 (颜色_右上 ＝ 位图.取某点颜色 (x － 2 ＋ 截图.取宽度 (), y － 1)) ' 右上<br /> .如果真 (颜色_右下 ＝ 位图.取某点颜色 (x － 2 ＋ 截图.取宽度 (), y － 2 ＋ 截图.取高度 ())) ' 右下<br /> 位图.复制到 (x － 1, y － 1, 找到图片.取宽度 (), 找到图片.取高度 (), 找到图片, 0, 0, )<br /> <br /> 相似点数 ＝ 0<br /> <br /> .计次循环首 (截图.取宽度 (), 局_找到图x)<br /> <br /> .计次循环首 (截图.取高度 (), 局_找到图y)<br /> .如果真 (截图.取某点颜色 (局_找到图x － 1, 局_找到图y － 1) ＝ 找到图片.取某点颜色 (局_找到图x － 1, 局_找到图y － 1))<br /> 相似点数 ＝ 相似点数 ＋ 1<br /> .如果真结束<br /> <br /> .计次循环尾 ()<br /> .计次循环尾 ()<br /> .如果真 (相似度 ≤ 相似点数 ÷ (截图.取宽度 () × 截图.取高度 ()))<br /> 返回坐标.横坐标 ＝ x － 1 ＋ 区域左上坐标.横坐标 － 1<br /> 返回坐标.纵坐标 ＝ y － 1 ＋ 区域左上坐标.纵坐标 － 1<br /> 返回 ()<br /> <br /> .如果真结束<br /> <br /> .如果真结束<br /> <br /> .如果真结束<br /> <br /> .如果真结束<br /> <br /> .如果真结束<br /> <br /> .计次循环尾 ()<br /> .计次循环尾 ()<br /> <br /> <br /> <br /> <br /> .判断结束<br /> <br /> 返回坐标.横坐标 ＝ -1<br /> 返回坐标.纵坐标 ＝ -1<br /> 返回 ()<br /> <br /> .' 计次循环首 (位图.取宽度 (), x)<br /> .' 计次循环首 (位图.取高度 (), y)<br /> .' 如果真 (颜色_左上 ＝ 位图.取某点颜色 (x － 1, y － 1)) ' 左上<br /> .' 如果真 (颜色_左下 ＝ 位图.取某点颜色 (x － 1, y － 2 ＋ 截图.取高度 ())) ' 左下<br /> .' 如果真 (颜色_右上 ＝ 位图.取某点颜色 (x － 2 ＋ 截图.取宽度 (), y － 1)) ' 右上<br /> .' 如果真 (颜色_右下 ＝ 位图.取某点颜色 (x － 2 ＋ 截图.取宽度 (), y － 2 ＋ 截图.取高度 ())) ' 右下<br /> ' 位图.复制到 (x － 1, y － 1, 找到图片.取宽度 (), 找到图片.取高度 (), 找到图片, 0, 0, )<br /> <br /> ' 相似点数 ＝ 0<br /> <br /> .' 计次循环首 (截图.取宽度 (), 局_找到图x)<br /> <br /> .' 计次循环首 (截图.取高度 (), 局_找到图y)<br /> .' 如果真 (截图.取某点颜色 (局_找到图x － 1, 局_找到图y － 1) ＝ 找到图片.取某点颜色 (局_找到图x － 1, 局_找到图y － 1))<br /> ' 相似点数 ＝ 相似点数 ＋ 1<br /> .如果真结束<br /> <br /> .' 计次循环尾 ()<br /> .' 计次循环尾 ()<br /> .' 如果真 (相似度 ≤ 相似点数 ÷ (截图.取宽度 () × 截图.取高度 ()))<br /> ' 返回坐标.横坐标 ＝ x － 1<br /> ' 返回坐标.纵坐标 ＝ y － 1<br /> ' 返回 ()<br /> <br /> .如果真结束<br /> <br /> .如果真结束<br /> <br /> .如果真结束<br /> <br /> .如果真结束<br /> <br /> .如果真结束<br /> <br /> .' 计次循环尾 ()<br /> .' 计次循环尾 ()<br /> <br /> ' 返回 ()

爱の伤心醉╮

玉苍老兵 发表于 2014-9-11 14:00
有没有超过大漠的

肯定没有，毕竟我技术不好哦。。。

网络注册会员

很不错值得顶

玉苍老兵

有没有超过大漠的

爱の伤心醉╮

宇智波·佐助 发表于 2014-9-9 11:00
主哟啊看速度

技术不咋的，不过确实自己纯手工写的.........

宇智波·佐助

主哟啊看速度