计算出图中两个残缺圆的圆心距
read_image(Image, 'D:/MyFile/图片/haclon/cs7.png')
dev_open_window_fit_image(Image, 0, 0, -1, -1, WindowHandle)
dev_display(Image)
rgb1_to_gray(Image, GrayImage)
scale_image_max(GrayImage, ScaledImage)
sobel_amp(ScaledImage, EdgeAmp, 'sum_abs', 3)
threshold(EdgeAmp, EdgeRegion, 8, 255)
connection (EdgeRegion, ConnectedRegions)
select_shape (ConnectedRegions, SelectedRegions, 'area', 'and', 150, 99999)
select_shape (SelectedRegions, SelectedRegions1, 'circularity', 'and', 0.045379, 0.048521)
select_shape (SelectedRegions, SelectedRegions2, 'circularity', 'and', 0.048152, 0.052588)
* area_center (SelectedRegions1, Area1, R1, C1)
* area_center (SelectedRegions2, Area2, R2, C2)
smallest_circle (SelectedRegions1, Row1, Column1, Radius1)
smallest_circle (SelectedRegions2, Row2, Column2, Radius2)
* gen_contour_polygon_xld(Line, [R1, R2], [C1, C2])
gen_contour_polygon_xld(Line, [Row1, Row2], [Column1, Column2])
distance_pp (Row1, Column1, Row2, Column2, Distance)
disp_message (WindowHandle, '直径：' + Distance, 'image', 80, 30, 'red', 'true')