图像加权融合

Halcom

图像加权融合：
百度网盘链接：链接：
视频1：http://pan.baidu.com/s/1jHArMtg
视频2：http://pan.baidu.com/s/1sl5AaF7

具体链接在halcom.cn论坛，联系人QQ：3283892722
该论坛是一个学习交流平台，我会逐一的和大家分享学习。
欢迎大家录制视频，并提交给我，我来设置视频，你可在论坛进行打赏分享。
视频专用播放器：http://halcom.cn/forum.php?mod=viewthread&tid=258&extra=page%3D1
Halcon代码如下

1. dev_update_off()
   
2. list_image_files('C:/Users/ysw/Desktop/视频讲解/图像处理视频Halcon/图像加权融合/merge_images','default', [], ImageFiles)
   
3. Width := 245
   
4. Height := 205
   
5. gen_empty_obj(EmptyObject)
   
6. for i := 0 to |ImageFiles|-1 by 1
   
7.     read_image (Image,ImageFiles[i])
   
8.     count_channels(Image,Channels)
   
9.     if(Channels>1)
   
10.         rgb1_to_gray(Image,Image)
    
11.     endif
    
12.     zoom_image_size(Image,Image,Width,Height,'constant')
    
13.     concat_obj(Image, EmptyObject, EmptyObject)
    
14. endfor
    
15. copy_obj(EmptyObject,Image1,1,1)
    
16. copy_obj(EmptyObject,Image2,2,1)
    
17. copy_obj(EmptyObject,Image3,3,1)
    
18. 
    
19. * get RF and CF
    
20. tuple_gen_sequence(0,Width*Height-1,1,Sequence)
    
21. tuple_mod(Sequence,Width,CF)
    
22. tuple_div(Sequence,Width,RF)
    
23. get_grayval(Image1,RF,CF,Grayval1)
    
24. get_grayval(Image2,RF,CF,Grayval2)
    
25. get_grayval(Image3,RF,CF,Grayval3)
    
26. 
    
27. * 融合
    
28. Grayval4 :=[]
    
29. for i :=0 to Width*Height-1 by 1
    
30.     Grayval4[i] := (Grayval1[i]+Grayval2[i]+Grayval3[i])/3.0
    
31. endfor
    
32. 
    
33. gen_image_const(MergeImage,'real',Width,Height)
    
34. set_grayval(MergeImage,RF,CF,Grayval4)

复制代码