用halcon完成题目 要求有工件的位置表示为1,没工件的位置表示为0。分别计算出六边形与圆形的个数* Image Acquisition 01: Code generated by Image Acquisition 01
list_files ('D:/桌面/REINOVO/上位机视觉/作业/7.18作业/圆形六角形工件', ['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
dev_update_off()
read_image (Image, ImageFiles[Index])
decompose3(Image, R, G, B)
trans_from_rgb(R, G, B, H, S, V, 'hsv')
binary_threshold(S, Region, 'max_separability', 'light', UsedThreshold)
* 连通区域分析
connection(Region, ConnectedRegions)
* 筛选区域(根据面积和圆度)
select_shape(ConnectedRegions, Hexagons,\
['area','inner_radius'], 'and', [150000, 180], [200000, 200])
select_shape(ConnectedRegions, Circles,\
['area','inner_radius'], 'and', [200001, 215], [250000, 250])
* 计数
count_obj(Hexagons, HexagonCount)
count_obj(Circles, CircleCount)
TotalCount := HexagonCount + CircleCount
* 显示计数信息
disp_message(3600, '六边形工件个数:'+HexagonCount, 'image', 10, 12, 'black', 'true')
disp_message(3600, '圆形工件个数:'+CircleCount, 'image', 90, 12, 'black', 'true')
disp_message(3600, '总共间个数:'+TotalCount, 'image', 170, 12, 'black', 'true')
* 显示结果
dev_display(Image)
stop()
endfor帮我补充并修改代码