read_image (Image060gmWg105WMa120WWd230165mm, 'C:/Users/Administrator/Desktop/有隔弧片060GM+WG105-W+MA120-W WD230 165mm.bmp')
set_system ('tsp_clip_region', 'false')
draw_rectangle1 (200000, Row1, Column1, Row2, Column2)
gen_rectangle1 (Rectangle, Row1, Column1, Row2, Column2)
boundary (Rectangle, RegionBorder, 'inner')
reduce_domain (Image060gmWg105WMa120WWd230165mm, Rectangle, ImageReduced)
threshold (ImageReduced, Region, 120, 255)
connection (Region, ConnectedRegions)
gen_empty_obj (regions)
count_obj (ConnectedRegions, Number)
for Index := 1 to Number by 1
select_obj (ConnectedRegions, ObjectSelected, Index)
intersection (ObjectSelected, RegionBorder, RegionIntersection1)
area_center (RegionIntersection1, Area1, Row3, Column3)
if (Area1==0)
concat_obj(ObjectSelected,regions,regions)
endif
endfor