q ＝
取启动时间 ()调试输出 (子程序1 (“c:\1.jpg”,
“c:\2.jpg”, 10
),
“%相似度”)调试输出 (取启动时间 () － q,
“毫秒”)|
| 子程序1 | 整数型 | |
|
| 参数1图片路径 | 文本型 | | | |
参数2图片路径 | 文本型 | | | | 允许误差 | 整数型 | | | |
| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| 待对比颜色值1 | 字节集 | | |
| 待对比颜色值2 | 字节集 | | |
| 对比图像1 | 类_位图操作 | | |
| 对比图像2 | 类_位图操作 | | |
| 对比后 | 字节集 | | |
| 相似数 | 整数型 | | |
| 已比对 | 整数型 | | |
| 临时 | 整数型 | | |
| xy | 整数型 | | |
| y | 整数型 | | |
| x | 整数型 | | |
图片_转换 (读入文件 (参数1图片路径
), 1, , 待对比颜色值1,
)对比图像1.
从数据创建 (待对比颜色值1
)图片_转换 (读入文件 (参数2图片路径
), 1, , 待对比颜色值2,
)对比图像2.
从数据创建 (待对比颜色值2
)待对比颜色值1 ＝ 对比图像1.
取出颜色数据 ()待对比颜色值2 ＝ 对比图像2.
取出颜色数据 ()对比后 ＝
取空白字节集 (4
)
计次循环首 (对比图像1.
取高度 (), y
)
计次循环首 (对比图像1.
取宽度 (), x
)已比对 ＝ 已比对 ＋ 1
xy ＝ x × y
对比后
[1
] ＝
取绝对值 (待对比颜色值1
[xy
] － 待对比颜色值2
[xy
])对比后
[2
] ＝
取绝对值 (待对比颜色值1
[xy ＋ 1
] － 待对比颜色值2
[xy ＋ 1
])对比后
[3
] ＝
取绝对值 (待对比颜色值1
[xy ＋ 2
] － 待对比颜色值2
[xy ＋ 2
])临时 ＝ 对比后
[1
] ＋ 对比后
[2
] ＋ 对比后
[3
]
如果真 (临时 ≤ 允许误差
)相似数 ＝ 相似数 ＋ 1
计次循环尾 ()计次循环尾 ()返回 (四舍五入 (相似数 ÷ 已比对 × 100, 2
))
图片相似度比较.rar
(2.06 MB, 下载次数: 116)
这个对比应该不准确
