检测焊条是否短路

 思路： 检查区域的大小，如果短路，区域的大小不一样

 

 

** 思路判断每个区域的大小，
read_image (Image, '1')
get_image_size (Image, Width, Height)
dev_close_window ()
dev_open_window (0, 0, Width/6, Height/6, 'black', WindowHandle)

dev_display (Image)
threshold (Image, Regions, 0, 61)
opening_rectangle1 (Regions, RegionOpening, 4, 4)
fill_up (RegionOpening, RegionFillUp)
closing_rectangle1 (RegionFillUp, RegionClosing, 20, 20)
connection (RegionClosing, ConnectedRegions)
select_shape (ConnectedRegions, SelectedRegions, ['area','column'], 'and', [28026.9,2996.08], [330717,3405.27])
closing_rectangle1 (SelectedRegions, RegionClosing1, 10, 10)
smallest_rectangle2 (RegionClosing1, Row, Column, Phi, Length1, Length2)
gen_rectangle2 (Rectangle, Row-420, Column-80, Phi, Length1, Length2)
reduce_domain (Image, Rectangle, ImageReduced)
mean_image (ImageReduced, ImageMean, 17, 17)
threshold (ImageReduced, Region, 128, 255)
connection (Region, ConnectedRegions1)
select_shape (ConnectedRegions1, SelectedRegions2, 'area', 'and', 429.37, 1850.9)
count_obj (SelectedRegions2, Number)
for Index := 1 to Number by 1
select_obj (SelectedRegions2, ObjectSelected, Index)
area_center (ObjectSelected, Area, Row1, Column1)
if(Area>2000)
gen_circle (Circle, Row1, Column1, 100.5)
endif

endfor