dev_update_off ()
*关闭更新
dev_close_window ()
*关闭窗口
read_image (Image, 'C:/Users/14510/Desktop/halcon/正反检测图片/01.jpg')
*读图
get_image_size (Image, Width, Height)
*得到图像的宽和高
dev_open_window (0, 0, Width/6, Height/4, 'black', WindowHandle)
*创建一个窗口
dev_set_draw ('margin')
*设置显示是否填充 margin 填充 fill
dev_set_line_width (1)
*设置线段宽度
dev_display (Image)
*显示图像
set_display_font (WindowHandle, 16, 'mono', 'true', 'false')
*设置字体
*------------------------------------------------*****---------------------------------------
*初始化
draw_circle (WindowHandle, Row, Column, Radius)
*绘制圆形
gen_circle (Circle, Row, Column, Radius)
*生成
draw_circle (WindowHandle, Row11, Column11, Radius11)
gen_circle (Circle1, Row11, Column11, Radius11)
* draw_region (Region, WindowHandle)
*多边形
* draw_rectangle1 (WindowHandle, Row12, Column12, Row21, Column21)
* gen_rectangle1 (Rectangle, Row12, Column12, Row21, Column21)
*矩形
difference (Circle, Circle1, RegionDifference)
*剪掉,移除
reduce_domain (Image, RegionDifference, ImageReduced)
*剪切图像
inspect_shape_model (ImageReduced, ModelImages, ModelRegions, 1, 50)
*查看定位模板
create_shape_model (ImageReduced, 5, rad(0) ,rad(360), 'auto', 'none', 'use_polarity', 50, 20, ModelID)
*生成一个定位模板,形状
*输入图像源,剪切后的图像
*第二个参数,图像金字塔,选择5即可
*第三个参数,和第四个参数 搜索角度
*第五个参数,搜索步长,auto
*第六个参数,亚像素点,none
*第七个参数,考虑极性 use_polarity 考虑极性
*第八个参数,对比阈值
*第九和参数,背景对比度阈值
*生成模板,modelID 代表这个模板
find_shape_model (Image, ModelID, rad(0) ,rad(360), 0.5, 1, 0.5, 'least_squares', 0, 0.9, Row1, Column1, Angle, Score)
*定位
*第一个参数,输入需要定位图像
*第二个参数,ModelID 输入进来
*第三个参数和第四个参数,搜索角度
*第五个参数,最小匹配分数
*第六个参数,搜索个数
*第七个参数,重叠率
*第八个参数,定位方式 默认即可 least_squares
*第九个参数,图像金字塔 从第0层开始寻找,创建为第五层
*第十个参数,贪婪度 0.9
*输出参数 X ,Y ,角度,匹配分数
for I := 1 to 11 by 1
read_image (Image1, 'C:/Users/14510/Desktop/halcon/正反检测图片/'+I$'02d')
find_shape_model (Image1, ModelID, rad(0) ,rad(360), 0.2, 1, 0.5, 'least_squares', 0, 0.9, Row2, Column2, Angle2, Score2)
Number := |Score2|
set_tposition (WindowHandle, 20, 20)
*设置窗口显示位置
if (Number == 1 )
dev_set_color ('green')
*设置显示颜色
dev_display (Image1)
*设置显示图像
write_string (WindowHandle, 'OK')
*显示内容
gen_circle(Circle2, Row2, Column2,Radius)
*显示定位结果
dev_display (Circle2)
*显示这个圆
else
dev_set_color ('red')
dev_display (Image1)
write_string (WindowHandle, 'NG')
endif
stop()
endfor

这篇博客详细介绍了如何利用Halcon进行产品正反面的检测,包括图像读取、区域定义、形状模型创建、定位模板生成以及形状模型的搜索和匹配。通过示例代码展示了如何对一系列图像进行检测,并根据匹配分数判断检测结果。
467

被折叠的 条评论
为什么被折叠?



