segment an image using an automatically determined threshold（使用自动确定的阈值分割图像）

dev_close_window ()
read_image (Aegypt1, 'egypt1')
get_image_size (Aegypt1, Width, Height)
dev_open_window (0, 0, Width, Height, 'black', WindowID)
set_display_font (WindowID, 14, 'mono', 'true', 'false')
dev_set_colored (6)
dev_clear_window ()
Sigma := 4

*可以自己定义作为下一语句的分割参数
auto_threshold (Aegypt1, Regions, Sigma)

*使用多个阈值分割一个单通道图像。首先确定灰度值得绝对直方图，然后冲直方图 中提取相关的极小值，作为阈值操作的参数   *使 用

gray_histo (Aegypt1, Aegypt1, AbsoluteHisto, RelativeHisto)

*计算灰度值的绝对直方图（AbsoluteHisto）和相对直方图（RelativeHisto）在区域内的图像
disp_continue_message (WindowID, 'black', 'true')

*在屏幕右下角以给定颜色显示“单击”运行“以继续”。若“Box”设为“true”，文本将写入一个白盒中，对于不规则背景有用

stop ()
dev_clear_window ()
create_funct_1d_array (AbsoluteHisto, Function)

*从一组y值AbsoluteHisto中创建一维函数。然后，可以使用一维函数的运算符对生成的函数进行处理和分析。YValues的解释如下:YValues的第一个值是0处的函数值，第二个值是1处的函数值。
smooth_funct_1d_gauss (Function, Sigma, SmoothedFunction)

*使用高斯函数平滑，函数必须是等距的。使用create_funct_1d_array、sample_funct_1d或类似的格式创建。在函数边界，函数  *值被镜像         
dev_set_color ('red')
funct_1d_to_pairs (SmoothedFunction, XValues, YValues)

*将输入函数SmoothedFunction分割为X值和Y值的元组
gen_region_histo (Histo1, YValues, 255, 255, 1)

*将使用gray_histo、gray_histo_range或tuple_histo_range创建的直方图转换为一个区域。
dev_display (Aegypt1)
dev_set_color ('white')
gen_region_histo (Histo2, RelativeHisto, 255, 255, 1)