工控编程吧

标题: halcon工业视觉用blob分析方法计算电路板接头个数 [打印本页]

---

作者: qq263946146    时间: 2019-5-4 00:21
标题: halcon工业视觉用blob分析方法计算电路板接头个数
例程实现电路板上接头个数的计算，图片使用halcon自带的。
使用了blob分析方法，涉及的函数为blob分析中经典组合的几个。
下面是具体代码
(, 下载次数: 0)

上传

点击文件名下载附件

1. read_image (Image, '1.png')
   
2. get_image_size (Image, Width, Height)
   
3. dev_close_window ()
   
4. dev_open_window_fit_image (Image, 0, 0, -1, -1, WindowHandle)
   
5. dev_set_line_width (3)
   
6. dev_set_draw ('margin')
   
7. dev_display (Image)
   
8. stop()
   
9. Num := 4
   
10. for I := 0 to Num-1 by 1
    
11.     file := I
    
12. 
    
13. d'+'.png'
    
14.     read_image (Bond, file)
    
15.     dev_display (Bond)
    
16.     *计算图像最大最小灰度值
    
17.     min_max_gray (Bond, Bond, 0, Min, Max, Range)
    
18.     *用计算出的最大灰度值进行分割
    
19.     threshold (Bond, Bright, Max - 80, 255)
    
20.     shape_trans (Bright, Die, 'rectangle2')
    
21.     dev_display (Die)
    
22.     *提取出图像中模块
    
23.     reduce_domain (Bond, Die, DieGrey)
    
24.     min_max_gray (Die, Bond, 0, Min, Max, Range)
    
25.     *提取出连接头所在黑色区域
    
26.     threshold (DieGrey, Wires, 0, Min + 30)
    
27.     *填充区域内满足一定条件的洞
    
28.     fill_up_shape (Wires, WiresFilled, 'area', 1, 100)
    
29.     *开运算，去除毛刺等。粗略定位接头
    
30.     opening_circle (WiresFilled, Balls, 9.5)
    
31.     connection (Balls, SingleBalls)
    
32.     *筛选出非接头区域
    
33.     select_shape_std (SingleBalls, Rect, 'rectangle1', 90)
    
34.     *计算出接头与非接头区域差值，表示为接头区域
    
35.     difference (SingleBalls, Rect, IntermediateBalls)
    
36.     gen_empty_region (Forbidden)
    
37.     expand_gray (IntermediateBalls, Bond, Forbidden, RegionExpand, 4, 'image', 6)
    
38.     opening_circle (RegionExpand, RoundBalls, 15.5)
    
39.     sort_region (RoundBalls, FinalBalls, 'first_point', 'true', 'column')
    
40.     smallest_circle (FinalBalls, Row, Column, Radius)
    
41.     Num := |Radius|
    
42.     dev_display (Bond)
    
43.     dev_display (RoundBalls)
    
44.     dev_disp_text ('接头个数：'+Num
    
45. 
    
46. d', 'window', 20, 20, 'black', [], [])
    
47.     stop ()
    
48. endfor

复制代码

---

欢迎光临 工控编程吧 (https://www.gkbc8.com/)

Powered by Discuz! X3.4