灰度世界法2-白平衡

Halcom

1. * 方法二
   
2. read_image (Image, 'C:/14.jpg')
   
3. decompose3(Image, R, G, B)
   
4. intensity(R,R,MeanR, DeviationR)
   
5. intensity(G,G,MeanG, DeviationG)
   
6. intensity(B,B,MeanB, DeviationB)
   
7. mrgb := MeanG
   
8. scale_image(R,R1,MeanG/MeanR,0)
   
9. scale_image(G,G1,MeanG/MeanG,0)
   
10. scale_image(B,B1,MeanG/MeanB,0)
    
11. compose3(R1,G1,B1,RGB1)

复制代码