jpg图像处理浮雕等算法

dongdonggege

Moneky 发表于 2017-2-9 14:11
添加了发光效果（探照灯）

请问大师，你的图像特效，板印和边缘各是什么意思？没听说过。

Moneky

dongdonggege 发表于 2017-2-9 21:47
请问大师，你的图像特效，板印和边缘各是什么意思？没听说过。

不必纠结，就是个名字而已。

dongdonggege

Moneky 发表于 2017-2-9 22:48
不必纠结，就是个名字而已。

大师，元宵节快乐！
又来麻烦你了，我想接着添加：
1、锐化、柔化、扩散、雕刻特效。算法在http://blog.csdn.net/wallescai/article/details/235426
2、铅笔画算法、木雕算法，算法在http://blog.csdn.net/wallescai/article/details/236496
算法复杂，依我的能力，现在搞不出来，麻烦大师了。

dongdonggege

Moneky 发表于 2017-2-9 22:48
不必纠结，就是个名字而已。

锐化，没通过，溢出。

1. Case 锐化
   
2.     For ix = 1 To iWidth - 1
   
3.         For iy = 1 To iHeight - 1
   
4.             bits(0, ix, iy) = (bits(0, ix, iy + 1) + bits(0, ix + 1, iy) + bits(0, ix + 1, iy + 1)) * 1.3 / 3
   
5.             bits(1, ix, iy) = (bits(1, ix, iy + 1) + bits(1, ix + 1, iy) + bits(1, ix + 1, iy + 1)) * 1.3 / 3
   
6.             bits(2, ix, iy) = (bits(2, ix, iy + 1) + bits(2, ix + 1, iy) + bits(2, ix + 1, iy + 1)) * 1.3 / 3
   
7.             
   
8.             If bits(0, ix, iy) < 0 Then bits(0, ix, iy) = 0
   
9.             If bits(0, ix, iy) > 255 Then bits(0, ix, iy) = 255
   
10.             If bits(1, ix, iy) < 0 Then bits(1, ix, iy) = 0
    
11.             If bits(1, ix, iy) > 255 Then bits(1, ix, iy) = 255
    
12.             If bits(2, ix, iy) < 0 Then bits(2, ix, iy) = 0
    
13.             If bits(2, ix, iy) > 255 Then bits(2, ix, iy) = 255
    
14.         Next
    
15.     Next

复制代码

别的设置都和其他没什么区别。请教，代码哪里有问题？

dongdonggege

Moneky 发表于 2017-2-9 12:13
添加了一些滤镜效果。

大师，请看我的另一篇文章，http://club.excelhome.net/thread-1337740-1-1.html。
把横向百叶窗改为纵向百叶窗，谢谢。

Moneky

dongdonggege 发表于 2017-4-1 09:57
大师，请看我的另一篇文章，http://club.excelhome.net/thread-1337740-1-1.html。
把横向百叶窗改为纵 ...

自己读懂代码，动动脑筋改吧。看你的主题帖，似乎对图像处理情有独钟，想不明白为什么。如果是爱好的话，自己理解算法应该更加有动力。

v111v111v

打不开，半成品又啥用

02761752696

       谢谢分享     

xman2000

     谢谢分享