分割图片分别保存图片内的每个元素

如图，我想实现把每个米粒分出来并把每一个单独保存到一个文件里。
感谢各位大佬指导。
{:4_126:}

阈值分割后遍历对象采用
reduce_domain
write_image
行么？

read_image (Image, 'F:/BaiduNetdiskDownload/120745kj5lygeciek06cyl.png')
dev_close_window ()
dev_open_window_fit_image (Image, 0, 0, -1, -1, WindowHandle)
dev_display (Image)
threshold (Image, Region, 28, 255)
connection (Region, ConnectedRegions)
select_shape (ConnectedRegions, SelectedRegions, 'area', 'and', 1500, 99999)
sort_region (SelectedRegions, SortedRegions, 'first_point', 'true', 'row')
count_obj (SortedRegions, Number)
for i:=1 to Number by 1
    select_obj (SortedRegions, ObjectSelected, i)
    reduce_domain (Image, ObjectSelected, ImageReduced)
    write_image (ImageReduced, 'tiff', 0, fileName)
endfor

图片为其中一张，fileName我没有写内容，你根据你自己需要保存的地址写就行。