第一 窗口初始化****
*关闭已经打开的窗口
dev_close_window ()
*关闭程序计数器,图形变量更新,窗口图形更新
dev_update_off ()
*读取一张图像
read_image (Image,‘2.bmp’)
*获取图像大小
get_image_size (Image, Width, Height)
*打开新的窗口
dev_open_window (0, 0, 640, 480, ‘black’, WindowHandle)
*设置区域填充方式
dev_set_draw (‘margin’)
*设置线宽度
dev_set_line_width (2)
*设置输出对象显示颜色数目
dev_set_colored(12)
第二 图像预处理***
*优化FFT的速度
optimize_rft_speed (Width, Height, ‘standard’)
Sigma1 := 10.0
Sigma2 := 2.0
*构建高斯滤波器
gen_gauss_filter (GsFilter1, Sigma1, Sigma1, 0.0, ‘none’, ‘rft’, Width, Height)
*构建高斯滤波器
gen_gauss_filter (GsFilter2, Sigma2