《Halcon 100项目-5》Halcon找大小圆

Halcon找大小圆

read_image (Image20231227111357, 'D:/image/bilibili/photo/屏幕截图 2023-12-27 111357.png')
mean_image (Image20231227111357, ImageMean, 19, 19)
dyn_threshold (Image20231227111357, ImageMean, RegionDynThresh, 5, 'dark')
fill_up (RegionDynThresh, RegionFillUp)
opening_circle (RegionFillUp, RegionOpening, 13.5)
connection (RegionOpening, ConnectedRegions)

select_shape (ConnectedRegions, SelectedRegions, 'area', 'and', 788.99, 19211)
count_obj (SelectedRegions, Number)
dev_display (Image20231227111357)
set_draw (200000, 'margin')


for Index := 1 to Number by 1
    select_obj (SelectedRegions, ObjectSelected, Index)
    smallest_circle (ObjectSelected, Row, Column, Radius)
    if(Radius<32)
        disp_message (200000, '小:'+Radius, 'Image20231227111357', Row, Column, 'red', 'false')
    else
        disp_message (200000, '大:'+Radius, 'Image20231227111357', Row, Column, 'black', 'true')
    endif
endfor