read_image (Image,'fabrik')

*画矩形

draw_rectangle1 (3600, Row1, Column1, Row2, Column2)

gen_rectangle1 (Rectangle, Row1, Column1, Row2, Column2)

*缩减图像定义域

reduce_domain (Image, Rectangle, ImageReduced)

*阈值分割出感兴趣的部分

threshold (ImageReduced, Region, 0, 65)

*将不相互连接的区域分开为单独区域

connection (Region, ConnectedRegions)

*根据区域面积筛选出指定区域

select_shape (ConnectedRegions, SelectedRegions, 'area', 'and', 2500, 5150)


*************************测量算子*******************************

*画仿射矩形

draw_rectangle2 (3600, Row5, Column4, Phi1, Length1, Length2)

gen_rectangle2 (Rectangle1, Row5, Column4, Phi1, Length1, Length2)

*获取测量句柄

gen_measure_rectangle2 (Row5, Column4, Phi1, Length1, Length2, 5