**********intensity.hdev
例程
**********
* Calculate the mean and deviation of gray values of regions of an image
*
*
读入图像
read_image (Image, 'mreut')
*
关闭(当前)活动的图形窗口
dev_close_window ()
*
获取图像的宽度和高度
get_image_size (Image, Width, Height)
*
打开一个新的图形窗口
dev_open_window (0, 0, Width, Height, 'black', WindowID)
*
在当前窗口显示
Image
对象
dev_display (Image)
*
设置区域(
Region
)填充模式
dev_set_draw ('margin')
* Create two regions
* gen_rectangle1( : Rectangle : Row1, Column1, Row2, Column2 : )
gen_rectangle1 (Rectangle1, 350, 100, 450, 200)
gen_rectangle1 (Rectangle2, 100, 200, 200, 300)
*
计算灰度的均值和标准差
*intensity(Regions, Image : : : Mean, Deviation)
intensity (Rectangle1, Image, Mean1, Deviation1)
intensity (Rectangle2, Image, Mean2, Deviation2)