各大算法汇集(VB版)

esxgx

高手就不要看了,很低级的算法:

其中DestX代表目标的色,SrcX代表原来的色.

Alpha混合算法0-1)
DestR=SrcR*alpha+DestR*(1-alpha);
DestG=SrcG*alpha+DestG*(1-alpha);
DestB=SrcB*alpha+DestB*(1-alpha);

快速RGB转灰度(注意这个系数不精确):
DestR=DestG=DestB=SrcR*30%+SrcG*50%+SrcB*20%;

制作MASK(伪算法):
if 这个点 <> 透明色的点 then
   MASK绘制一个黑点
else
   MASK绘制一个白点
end if

色饱和运算:
R1、G1、B1    '图象像素点的源色值
R2、G2、B2    '底图像素点的源色值
R = R1 + R2    '(IF R > 255 THEN R=255)
G = G1 + G2   '(IF G > 255 THEN G=255)
B = B1 + B2    '(IF B > 255 THEN B=255)

realline

支持此类帖子，大家要多发写与程序有关的东西。

wangh

补一下RGB转灰度精确算法

整数快速算法
Y = (77*R + 150*G + 29*B ) \ 256
普通算法
Y=0.299*R+0.587*G+0.114*B

esxgx

快速带Colorkey的算法上面的方法变一下,用P2与ColorKey是否相等,制作MASK图)
DestA=SrcA And MASK;
DestB=SrcB And MASK;
最后 Dest=DestA | DestB;
Dest就是最终复制的结果了!

sandy_zc_1

只是这些算法在VB上不太好用，逐点处理会很慢……

当然做预处理是可以的。

wangh

同意

esxgx

sandy_zc_1: Re:各大算法汇集(VB版)

只是这些算法在VB上不太好用，逐点处理会很慢……

当然做预处理是可以的。

谁让VB没有汇编呢?
没办法的事情,大家还是用Delphi吧.

esxgx

悟空在线: Re: Re: Re:各大算法汇集(VB版)



你可以用C++封包呀! 我现在那个东西有人已经又封了5个新功能了, 就是这个论坛的朋友.

不想让这个贴变成吵架贴!

esxgx

悟空在线: Re:各大算法汇集(VB版)

如果你封一个上来给我们用用那还差不多，问题是这些东西你自己可能都不会，
我也可以到书上抄算法，至于能不能用那是你们的事。

请不要无根据的评论.
http://www.pp28.com.ru/bbs/upload/20058122840-3.rar

esxgx

悟空在线: Re: Re: Re:各大算法汇集(VB版)



网站垮掉了？？

你的机子烂掉了,你的图修改的不好啊!!!