传奇绘图更换笔记：ZenGL 一些需要注意的事情

叁歲伎倆 2022-09-25 11:18 160阅读 0赞

# http://www.gimoo.net/t/1507/559f7b829e066.html    #

#     #

# 传奇绘图更换笔记：ZenGL 一些需要注意的事情 #

ZenGL 的颜色位序 为文档中说明为 TEX\_RGBA 但实际在Delphi 为ABGR 这或许是因为Opengl 的端序和Delphi 下不太一致。

fx \_setColor 这个函数却不是使用ABGR  而是实在的RGBA  导致我在将传奇客户端改为Zengl 迷糊了很久。但是其实可以将其颜色位序设置为GL\_BGRA\_EXT 这样可以做到兼容DIB位图。不过Zengl的OpenGLALL单元并没有提供常亮声明。最终我在GLScene的头文件内找到了

**\[delphi\]** [ view plain][view plain] [ copy][view plain] [ print][view plain] [?][view plain] [![在CODE上查看代码片][CODE]][CODE_CODE] [![派生到我的代码片][ico_fork.svg]][ico_fork.svg 1]

1.  // PixelFormat  
2.  GL\_RGB                            = $1907;  
3.  GL\_RGBA                           = $1908;  
4.  GL\_BGRA\_EXT                       = $80E1;

将其声明 试了有效，

而且Zengl提供的混合模式是在是少的可怜。Src\_ColorAdd的特效也没有内置 最后还是从HGE内抄过来用。

另外ZenGL并没有提供黑白效果。 作者说要么在加载纹理的时候将其设置为 TEX\_GRAYSCALE  要么自己GetData SetData处理。

这可如何是好这样当玩家死了 那我灰白界面不是绘制不出来了么。。。

也罢 最终自己从网上扒到图片黑白化的原理 自己实现之 。因为GetData SetData 导致其效率明显低了很多。

1.  procedure TTexture.GrayScale;  
2.  var  
3.    PP:PByteArray;  
4.    PPixel : PCardinal;  
5.    nLen:Integer;  
6.    Pixel:Cardinal;  
7.    R,G,B:Byte;  
8.    I:integer;  
9.  begin  
10.   tex\_GetData(Surface,PP);  
11.   PPixel := PCardinal(PP);  
12.   nLen := GetRealHeight \* GetRealWidth;  
13.   \{  
14. 灰度处理一般有三种算法： 
15. 1 最大值法：即新的颜色值R＝G＝B＝Max(R，G，B)，这种方法处理后的图片看起来亮度值偏高。 
16. 2 平均值法：即新的颜色值R＝G＝B＝(R＋G＋B)／3，这样处理的图片十分柔和 
17. 3 加权平均值法：即新的颜色值R＝G＝B＝(R ＊ Wr＋G＊Wg＋B＊Wb)，一般由于人眼对不同颜色的敏感度不一样， 
18. 所以三种颜色值的权重不一样，一般来说绿色最高，红色其次，蓝色最低，最合理的取值分别为Wr ＝ 30％，Wg ＝ 59％，Wb ＝ 11％ 
19. \}  
20.   //这里使用的是第3总算法  
21.   for i := 0 to nLen - 1 do  
22.   begin  
23.     Pixel := PPixel^;  
24.     R := Pixel and $FF;  
25.     G := (Pixel shr 8) and $FF;  
26.     B := (Pixel shr 16) and $FF;  
27.   
28.     R := Trunc(R \* 0.3);  
29.     G := Trunc(G \* 0.59);  
30.     B := Trunc(G \* 0.11);  
31.       
32.     R:= (R + G + B);  
33.   
34.     PPixel^ := $FF000000 or (R) or (R shl 8) or (R shl 16);  
35.     Inc(PPixel);  
36.   end;   
37.     
38.   tex\_SetData(Surface,PP,0,0,GetRealWidth,Surface.Height);  
39.   FreeMem(PP);

![Center][]

另外关于黑夜效果的实现:

传奇原来的黑夜效果 我没太仔细看。是类似掩码的方式进行 对于不同的亮度有不同的掩码数据 对坐标的色彩进行运算。而且写的是汇编 比较高深。

这里我为了实现这种光效 参考的是HGE内DynamicLight 的例子 将其移至到Zengl并且工作。

1.需要一张和屏幕纹理一样大的 光效层。

2.将其Fill为 ARGB(Light,Light,Light,Light) 这个light 是Byte分量的亮度。

3.使用一张光效遮罩![Center 1][]

4。使用Src\_ColorAdd混合模式  将其绘制在光效层上

1.  srcBlend := GL\_DST\_ALPHA;  
2.  dstBlend := GL\_SRC\_COLOR;

5.使用Multiply 混合模式将光效会在目标层上。

1.  srcBlend := GL\_ZERO;  
2.  dstBlend := GL\_SRC\_COLOR

最终效果是这样的：

![Center 2][]

最后对ZenGL做一些总结.

使用很方便 而且跨平台 效率也还不错  但是功能并不是太完善。比如 我需要获得纹理某个像素点 的像素 这种功能并没有实现 智能获取渲染目标的某个点 并且这个函数在全屏下还有问题。 目前我使用的是GetData，但是GetData 一下要拷贝所有像素(效率低)。如果要优化只能自己去学习Opengl相关的API。封装的不算很好。

而且像素格式 Zengl源码内只实现了一种RGBA  虽然可以像我前面说的  改为ARGB 以便兼容DIB 但是Zengl本身并没有提供。

对Png图片纹理载入未完善。 png的图片对透明通道的载入 只支持8bit的 其他的一律不行。

最后：在实际折腾了半个月后 真新感觉  Opengl的优势就是跨平台,真心不如DX好用.

如果再让我在ZenGL和Hge中选择的话  如果是改传奇绘图 我会用HGE  如果搞新项目 我会用ZenGL

[view plain]: http://blog.csdn.net/lyin_c/article/details/46431601#
[CODE]: https://code.csdn.net/assets/CODE_ico.png
[CODE_CODE]: https://code.csdn.net/snippets/689247
[ico_fork.svg]: https://code.csdn.net/assets/ico_fork.svg
[ico_fork.svg 1]: https://code.csdn.net/snippets/689247/fork
[Center]: /images/20220718/ec44b3a54b8c4a1c919284cb6d3a0a1b.png
[Center 1]: /images/20220718/0dd32c15346245bc8050e15826a672ee.png
[Center 2]: /images/20220718/b9cdbfa5d3a844d2a8258eb8a15ddcbe.png