* Image Acquisition 01: Code generated by Image Acquisition 01
read_image(Image1, 'C:/Users/87432/Desktop/1/印刷检测/ctm1.bmp')
rgb1_to_gray(Image1, GrayImage)
threshold (GrayImage, Regions, 146, 255)
connection(Regions, ConnectedRegions)
select_shape(ConnectedRegions, SelectedRegions, ['row','area'], 'and', [14,10], [2418,99999])
union1(SelectedRegions, RegionUnion)
shape_trans(RegionUnion, RegionTrans, 'rectangle1')
reduce_domain(GrayImage, RegionTrans, ImageReduced)
inspect_shape_model(ImageReduced, ModelImages, ModelRegions, 1, 19)
area_center(ModelRegions, Area, RowRef, ColumnRef)
create_shape_model(ImageReduced, 'auto', -rad(5), rad(5), 'auto', 'none', 'use_polarity', 30, 10, ModelID)
find_shape_model(ModelImages, ModelID, -rad(5), rad(5), 0.5, 1, 0.5, 'least_squares', 0, 0.9, Row, Column, Angle, Score)
list_files ('C:/Users/87432/Desktop/1/印刷检测', ['files','follow_links'], ImageFiles)
tuple_regexp_select (ImageFiles, ['\\.(tif|tiff|gif|bmp|jpg|jpeg|jp2|png|pcx|pgm|ppm|pbm|xwd|ima|hobj)$','ignore_case'], ImageFiles)
for Index := 0 to |ImageFiles| - 1 by 1
read_image (Image, ImageFiles[Index])
* Image Acquisition 01: Do something
stop()
endfor
如上的代码用find_shape_model和自己匹配score为空