模板匹配——金字塔图像计算gen_gauss_pyramid

 

 

 

 

 

 

 

** 计算高斯金字塔图像
* 
dev_open_window(0, 0, 800, 600, 'black', WindowHandle)
read_image (Image, 'fix.png')
* 
* 初始化显示
dev_close_window ()
get_image_size (Image, Width, Height)
dev_open_window (0, 0, 512, 512, 'black', WindowID)
set_display_font (WindowID, 16, 'mono', 'true', 'false')
* 
* 计算高斯金字塔
gen_gauss_pyramid (Image, ImagePyramid, 'constant', 0.5)
* 
* 显示所有高斯金字塔图像
count_obj (ImagePyramid, Number)
for Index := 1 to Number by 1
    select_obj (ImagePyramid, Level, Index)
    dev_display (Level)
    disp_message (WindowID, 'Pyramid level ' + (Index), 'window', 12, 12, 'white', 'false')
    if (Index < Number)
        disp_continue_message (WindowID, 'black', 'false')
        stop ()
    endif
    
endfor