HALCON示例程序measure_ball_bond.hdev电路板焊点位置测量
示例程序源码(加注释)
- 关于显示类函数解释
dev_update_off ()
dev_close_window ()
FileName := ‘bonds/ball_bond_ccd_’
read_image (Image, FileName + 1$‘02’)
dev_open_window_fit_image (Image, 0, 0, -1, -1, WindowHandle)
dev_set_line_width (2)
set_display_font (WindowHandle, 16, ‘mono’, ‘true’, ‘false’)
dev_set_draw (‘margin’)
get_system (‘store_empty_region’, StoreEmptyRegion)
set_system (‘store_empty_region’, ‘false’) - 定义变量并初始化
NumImages := 6
for Index := 1 to NumImages by 1
read_image (Image, FileName + Index$‘02’)
dev_display (Image)- 获得运行时间
count_seconds (S1) - 二值化
threshold (Image, Region, 135, 255) - 分割连通域
connection (Region, ConnectedRegions) - 使用宽度高度面积进行区域筛选
select_shape (ConnectedRegions, SelectedRegions, [‘width’,‘height’,‘area’], ‘and’, [115,115,5000], [130,130,15000])
fill_up (SelectedRegions, RegionFillUp)
shape_trans (RegionFillUp, Pads, ‘convex’) - 求取内孔区域
difference (Pads, RegionFillUp, RegionDifference) - 开运算
opening_rectangle1 (RegionDifference, BondWire, 10, 10) - 求取最大内切圆
shape_trans (BondWire, BallBonds, ‘inner_circle’) - select_shape_proto基于区域之间的某些关系选择区域,这里使用重叠区域
- select_shape_proto(测量区域,对比区域:筛选出的区域:关系,最小值,最大值:)
select_shape_proto (Pads, BallBonds, MissingBonds, ‘overlaps_rel’, 0, 0)
count_seconds (S2)
Time := (S2 - S1) * 1000 - 膨胀
dilation_circle (BallBonds, RegionDilation2, 10) - 求交集
intersection (RegionDilation2, BondWire, RegionIntersection) - 求边缘的老方法了,之前的贴子传送门
boundary (RegionIntersection, RegionBorder, ‘inner’)
dilation_circle (RegionBorder, RegionDilation, 3.5)
union1 (RegionDilation, RegionUnion)
reduce_domain (Image, RegionUnion, ImageReduced)
edges_sub_pix (ImageReduced, Edges, ‘canny’, 1, 20, 70) - union_adjacent_contours_xld - 计算端点靠近的轮廓的并集。
- union_adjacent_contours_xld(边缘:合并的边缘:端点最大绝对阈值,端点最大相对阈值,模式:)
union_adjacent_contours_xld (Edges, UnionContours, 10, 1, ‘attr_keep’) - 筛选XLD轮廓
select_contours_xld (UnionContours, SelectedContours, ‘contour_length’, 20, 20000, -0.5, 0.5) - 通过XLD轮廓拟合圆形
fit_circle_contour_xld (SelectedContours, ‘atukey’, -1, 0, 0, 5, 7, CircleRow, CircleColumn, Radius, StartPhi, EndPhi, PointOrder) - 绘制XLD轮廓圆形
gen_circle_contour_xld (ContCircle, CircleRow, CircleColumn, Radius, 0, 6.28318, ‘positive’, 1)
count_obj (BondWire, NBonds)
gen_empty_obj (MeasureArrows) - 下边这些就非常简单的啦
dev_display (Image)
dev_set_color (‘cyan’)
dev_display (ContCircle)
dev_set_color (‘magenta’)
area_center (RegionDilation2, Area, Row, Column)
area_center (MissingBonds, AreaM, RowM, ColumnM)
select_shape_proto (Pads, BallBonds, BallTooClose, ‘distance_contour’, 0, 10)
area_center (BallTooClose, AreaB, RowB, ColumnB)
dev_set_color (‘yellow’)
dev_display (Pads)
if (|AreaM| > 0 or |AreaB| > 0)
dev_set_color (‘red’)
dev_display (MissingBonds)
dev_display (BallTooClose)
for IndexE := 0 to |AreaM| - 1 by 1
NRow := RowM[IndexE]
NCol := ColumnM[IndexE]
disp_message (WindowHandle, ‘Ball bond\nis missing’, ‘image’, NRow - 150, NCol - 110, ‘red’, ‘true’)
endfor
for IndexE := 0 to |AreaB| - 1 by 1
NRow := RowB[IndexE]
NCol := ColumnB[IndexE]
disp_message (WindowHandle, ‘Ball bond is too\nclose to border’, ‘image’, NRow - 150, NCol - 150, ‘red’, ‘true’)
endfor
endif
for IndexM := 1 to NBonds by 1
select_obj (ContCircle, ObjectSelected, IndexM)- 求取XLD轮廓的最小外接矩形
smallest_rectangle1_xld (ObjectSelected, minY, minX, maxY, maxX) - 求取XLD轮廓中心
area_center_xld (ObjectSelected, Area1, Ybb, Xbb, PointOrder1) - 绘制XLD箭头
gen_arrow_contour_xld (Arrow, Ybb, Xbb, minY, Xbb, 12, 12)
concat_obj (MeasureArrows, Arrow, MeasureArrows)
gen_arrow_contour_xld (Arrow, Ybb, Xbb, maxY, Xbb, 12, 12)
concat_obj (MeasureArrows, Arrow, MeasureArrows)
dev_set_color (‘green’)
dev_display (MeasureArrows)
select_obj (ContCircle, ObjectSelected, IndexM)
area_center_xld (ObjectSelected, Area2, Ybb, Xbb, PointOrder2)
disp_message (WindowHandle, (2 * Radius[IndexM - 1])KaTeX parse error: Expected 'EOF', got '\nin' at position 129: …ond(s) detected\̲n̲i̲n̲ ̲' + Time’.2f’ + ’ ms’, ‘window’, 12, 12, ‘black’, ‘true’)
- 求取XLD轮廓的最小外接矩形
- Evaluate and display results
if (Index != NumImages)
disp_continue_message (WindowHandle, ‘black’, ‘true’)
stop ()
endif
endfor
set_system (‘store_empty_region’, StoreEmptyRegion)
- 获得运行时间
处理思路
这个例子是主要讲解了使用blob分析方法,结合XLD轮廓拟合,对电路焊点的检测与测量。count_seconds计时算子select_shape_proto、union_adjacent_contours_xld、select_contours_xld、fit_circle_contour_xld、gen_circle_contour_xld、gen_arrow_contour_xld、smallest_rectangle1_xld、area_center_xld、gen_arrow_contour_xld
后记
大家有什么问题可以向我提问哈,我看到了第一时间回复,希望在学习的路上多多结交良师益友。