Halcon案例之BLOB分析

 

Blob分析主要内容包括但不限于以下几点：

（1）图像分割：将图像中的目标和背景分离。

（2）去噪：消除或减弱噪声对目标的干扰。

（3）场景描述：对目标之间的拓扑关系进行描述。

（4）特征量计算：计算目标的2-D形状特征。

 

Blob分析的主要过程（常用套路）：

获取图像->分割图像（区分前景像素和背景像素）->特征提取（比如面积、重心、旋转角度等）

 

参考：https://blog.csdn.net/Gavinmiaoc/article/details/79407685

* ball.hdev: Inspection of Ball Bonding
* 这个例子演示了如何找出 电路板上 那一排焊接点
dev_update_window ('off')
*把更新环境窗口关了
dev_close_window ()
dev_open_window (0, 0, 728, 512, 'black', WindowID)
read_image (Bond, 'die/die_03')
dev_display (Bond)
set_display_font (WindowID, 14, 'mono', 'true', 'false')
disp_continue_message (WindowID, 'black', 'true')
stop ()
threshold (Bond, Bright, 100, 255)
shape_trans (Bright, Die, 'rectangle2')
*形状选择，把某个区域转正外接矩形 区域
dev_set_color ('green')
dev_set_line_width (3)
dev_set_draw ('margin')
dev_display (Die)
*上面四步骤就是显示一下区域的边缘
disp_continue_message (WindowID, 'black', 'true')
stop ()
reduce_domain (Bond, Die, DieGrey)
*裁剪某个区域的图像
threshold (DieGrey, Wires, 0, 50)
fill_up_shape (Wires, WiresFilled, 'area', 1, 100)
*填充区域内的空洞
dev_display (Bond)
dev_set_draw ('fill')
dev_set_color ('red')
dev_display (WiresFilled)
disp_continue_message (WindowID, 'black', 'true')
stop ()
opening_circle (WiresFilled, Balls, 15.5)
*以半径为15.5的圆去做开运算，放得下这个圆的地方保留，放不下的去掉
dev_set_color ('green')
dev_display (Balls)
disp_continue_message (WindowID, 'black', 'true')
stop ()
connection (Balls, SingleBalls)
select_shape (SingleBalls, IntermediateBalls, 'circularity', 'and', 0.85, 1.0)
*以圆度筛选出上面那几个圆，筛选掉下面那个 开运算留下的噪声特征
sort_region (IntermediateBalls, FinalBalls, 'first_point', 'true', 'column')
*按照列排序
dev_display (Bond)
dev_set_colored (12)
dev_display (FinalBalls)
disp_continue_message (WindowID, 'black', 'true')
stop ()
smallest_circle (FinalBalls, Row, Column, Radius)
*算出七个区域的最小外接圆，圆心坐标 和半径
NumBalls := |Radius|
Diameter := 2 * Radius
meanDiameter := mean(Diameter)
minDiameter := min(Diameter)
dev_display (Bond)
disp_circle (WindowID, Row, Column, Radius)
dev_set_color ('white')
for i := 1 to NumBalls by 1
    if (fmod(i,2)==1)
      disp_message (WindowID, 'D: ' + Diameter[i-1]$'.4', 'image', Row[i-1] - 2 * Radius, Column, 'white', 'false')
    else
      disp_message (WindowID, 'D: ' + Diameter[i-1]$'.4', 'image', Row[i-1] - 42 * Radius, Column+32, 'red', 'false')
   
    endif
endfor

dev_update_window ('on')