基于halcon的形状匹配之人脸识别

原图（例）

代码

注：使用摄像头实时捕捉头像识别

dev_close_window ()
read_image (Image, '1')
get_image_size (Image, Width, Height)
dev_open_window_fit_size (0, 0, Width, Height, -1, -1, WindowHandle)
dev_display (Image)
dev_set_color ('red')
dev_set_draw ('margin')
draw_rectangle1 (WindowHandle, Row1, Column1, Row2, Column2)
gen_rectangle1 (Rectangle, Row1, Column1, Row2, Column2)
reduce_domain (Image, Rectangle, ImageReduced)

inspect_shape_model (ImageReduced, ModelImages, ModelRegions, 5, 30)
stop ()
create_scaled_shape_model (ImageReduced, 5, rad(-90), rad(90), rad(1), 0.5, 2, 0.01,  'none', 'ignore_color_polarity', 30, 5, ModelID)

write_shape_model (ModelID, 'myself_shape_model.shm')

clear_shape_model (ModelID)

read_shape_model ('myself_shape_model.shm', ModelID1)


* Image Acquisition 01: Code generated by Image Acquisition 01
open_framegrabber ('DirectShow', 1, 1, 0, 0, 0, 0, 'default', 8, 'rgb', -1, 'false', 'default', '[0] ', 0, -1, AcqHandle)
grab_image_start (AcqHandle, -1)
i := 0
while (true)
    grab_image_async (Image, AcqHandle, -1)
   
    * Image Acquisition 01: Do something
    find_scaled_shape_model (Image, ModelID1, rad(-90), rad(90), 0.5, 2, 0.7, 1, 0.5, 'least_squares', 5, 0.8, Row, Column, Angle, Scale, Score)
    
    get_shape_model_contours (ModelContours, ModelID1, 1)
    dev_display (Image)
    if(|Score| == 1)
        vector_angle_to_rigid (0, 0, 0, Row, Column, Angle, HomMat2D)
        hom_mat2d_scale (HomMat2D, |Score|, |Score|, Column, Row, HomMat2DScale)
        affine_trans_contour_xld (ModelContours, ContoursAffineTrans, HomMat2DScale)
        gen_region_contour_xld (ContoursAffineTrans, Region, 'filled')
        union1 (Region, RegionUnion)
        smallest_rectangle2 (RegionUnion, Row3, Column3, Phi, Length1, Length2)
        dev_display (Image)
        dev_set_color('green')
        dev_set_line_width(3)
        

        gen_rectangle2 (Rectangle1, Row3, Column3, Phi, Length1, Length2)
    endif
    i := i+1
    if( i ==30)
        close_framegrabber (AcqHandle)
        break
    endif
    wait_seconds (2)
endwhile

dump_window (WindowHandle, 'png', '人脸识别结果')

结果（例）