如何在lua底层添加函数功能

bt

这里以给lib.LoadPic这个函数添加功能为例。

首先看该函数在C部分的原型：

1. int HAPI_LoadPic(lua_State* pL)
   
2. {
   
3. 
   
4.     int fileid = (int)lua_tonumber(pL, 1);
   
5.     int picid = (int)lua_tonumber(pL, 2);
   
6.     int x = (int)lua_tonumber(pL, 3);
   
7.     int y = (int)lua_tonumber(pL, 4);
   
8.     int nooffset = 0;
   
9.     int bright = 0;
   
10. 
    
11.     if (lua_isnoneornil(pL, 5) == 0)
    
12.     {
    
13.         nooffset = (int)lua_tonumber(pL, 5);
    
14.     }
    
15. 
    
16.     if (lua_isnoneornil(pL, 6) == 0)
    
17.     {
    
18.         bright = (int)lua_tonumber(pL, 6);
    
19.     }
    
20. 
    
21.     JY_LoadPic(fileid, picid, x, y, nooffset, bright);
    
22. 
    
23.     return 0;
    
24. }

复制代码

可知该函数至少需要4个参数，第5和第6个可选，至于怎么看出来的…………

那么再去看其中调用的JY_LoadPic的原型：

1. int JY_LoadPic(int fileid, int picid, int x, int y, int flag, int value)
   
2. {
   
3.     return JY_LoadPicColor(fileid, picid, x, y, flag, value, 0);
   
4. }

复制代码

这里可以知道，前面和后面同一位置的变量居然名字不同。名字不同就算了，意义也大相径庭。这说明代码非常混乱………………
先不管这个。我们发现后面又调用了一个别的，而且……名字基本也是瞎起…………

因此可以清理一下………………不行了容我蹲一会

好了清理了一下。因为黑山这里用的是c++，所以瞎搞了一下。那么参考jy027的设计：

flag
0x01 关闭居中显示
0x02 开启透明度
0x04 开启着色
0x08 Blend mode set to ADD
0x10 Blend mode set to MOD

虽然这么多东西都用flag设定有点诡异，不过这也是减少参数的一个办法

但是看回这边

//  flag 不同bit代表不同含义，缺省均为0
//  B0    0 考虑偏移xoff，yoff。=1 不考虑偏移量
//  B1    0     , 1 与背景alpla 混合显示, value 为alpha值(0-256), 0表示透明
//  B2            1 全黑
//  B3            1 全白
//  value 按照flag定义，为alpha值，

看起来两边的定义还不一样，被占用了

不行了实在编不下去了，直接放结果吧

注意里面的注释大多是瞎编的。

1. int HAPI_LoadPic(lua_State* pL)
   
2. {
   
3. 
   
4.     int fileid = (int)lua_tonumber(pL, 1);
   
5.     int picid = (int)lua_tonumber(pL, 2);
   
6.     int x = (int)lua_tonumber(pL, 3);
   
7.     int y = (int)lua_tonumber(pL, 4);
   
8.     int flag = 0;
   
9.     int value = 0;
   
10.     int width = -1;
    
11.     int height = -1;
    
12. 
    
13.     if (lua_isnoneornil(pL, 5) == 0)
    
14.     {
    
15.         flag = (int)lua_tonumber(pL, 5);
    
16.     }
    
17. 
    
18.     if (lua_isnoneornil(pL, 6) == 0)
    
19.     {
    
20.         value = (int)lua_tonumber(pL, 6);
    
21.     }
    
22. 
    
23.     if (lua_isnoneornil(pL, 7) == 0)
    
24.     {
    
25.         width = (int)lua_tonumber(pL, 7);
    
26.     }
    
27. 
    
28.     if (lua_isnoneornil(pL, 8) == 0)
    
29.     {
    
30.         height = (int)lua_tonumber(pL, 8);
    
31.     }
    
32. 
    
33.     JY_LoadPic(fileid, picid, x, y, flag, value,width,height);
    
34. 
    
35.     return 0;
    
36. }

复制代码

1. // 加载并显示贴图
   
2. // fileid        贴图文件id
   
3. // picid     贴图编号
   
4. // x,y       显示位置
   
5. //  flag 不同bit代表不同含义，缺省均为0
   
6. //  B0    0 考虑偏移xoff，yoff。=1 不考虑偏移量
   
7. //  B1    0     , 1 与背景alpla 混合显示, value 为alpha值(0-256), 0表示透明
   
8. //  B2            1 全黑
   
9. //  B3            1 全白
   
10. //  value 按照flag定义，为alpha值，
    
11. 
    
12. int JY_LoadPic(int fileid, int picid, int x, int y, int flag, int value, int color, int width, int height)
    
13. {
    
14.     struct CacheNode* newcache, *tmpcache;
    
15.     int xnew, ynew;
    
16.     SDL_Surface* tmpsur;
    
17. 
    
18.     picid = picid / 2;
    
19. 
    
20.     if (fileid < 0 || fileid >= PIC_FILE_NUM || picid < 0 || picid >= pic_file[fileid].num)    // 参数错误
    
21.     {
    
22.         return 1;
    
23.     }
    
24. 
    
25.     if (pic_file[fileid].pcache[picid] == NULL)     //当前贴图没有加载
    
26.     {
    
27.         //生成cache数据
    
28.         newcache = new CacheNode();
    
29.         if (newcache == NULL)
    
30.         {
    
31.             JY_Error("JY_LoadPic: cannot malloc newcache memory!\n");
    
32.             return 1;
    
33.         }
    
34. 
    
35.         newcache->id = picid;
    
36.         newcache->fileid = fileid;
    
37.         LoadPic(fileid, picid, newcache);
    
38.         ////指定宽度和高度
    
39.         //if (newcache->s != NULL && pic_file[fileid].width > 0 && pic_file[fileid].height > 0
    
40.         //    && pic_file[fileid].width != newcache->s->w && pic_file[fileid].height != newcache->s->h)
    
41.         //{
    
42.         //    double zoomx = (double)pic_file[fileid].width / newcache->s->w;
    
43.         //    double zoomy = (double)pic_file[fileid].height / newcache->s->h;
    
44. 
    
45.         //    if (zoomx < zoomy)
    
46.         //    {
    
47.         //        zoomy = zoomx;
    
48.         //    }
    
49.         //    else
    
50.         //    {
    
51.         //        zoomx = zoomy;
    
52.         //    }
    
53. 
    
54.         //    tmpsur = newcache->s;
    
55. 
    
56.         //    newcache->s = zoomSurface(tmpsur, zoomx, zoomy, SMOOTHING_OFF);
    
57. 
    
58.         //    newcache->xoff = (int)(zoomx * newcache->xoff);
    
59.         //    newcache->yoff = (int)(zoomy * newcache->yoff);
    
60.         //    //SDL_SetColorKey(newcache->s, SDL_TRUE, ConvertColor(g_MaskColor32));  //透明色
    
61.         //    SDL_FreeSurface(tmpsur);
    
62.         //}
    
63.         pic_file[fileid].pcache[picid] = newcache;
    
64.     }
    
65.     else
    
66.     {
    
67.         newcache = pic_file[fileid].pcache[picid];
    
68.     }
    
69. 
    
70.     if (newcache->t == NULL)     //贴图为空，直接退出
    
71.     {
    
72.         return 1;
    
73.     }
    
74. 
    
75.     if (flag & 0x00000001)
    
76.     {
    
77.         xnew = x;
    
78.         ynew = y;
    
79.     }
    
80.     else
    
81.     {
    
82.         xnew = x - newcache->xoff;
    
83.         ynew = y - newcache->yoff;
    
84.     }
    
85.     RenderTexture(newcache->t, xnew, ynew, flag, value, color, width, height);
    
86.     return 0;
    
87. }

复制代码

1. 
   
2. // 把表面blit到背景或者前景表面
   
3. // x,y 要加载到表面的左上角坐标
   
4. int RenderTexture(SDL_Texture* lps, int x, int y, int flag, int value, int color, int width, int height)
   
5. {
   
6.     SDL_Surface* tmps;
   
7.     SDL_Rect rect, rect0;
   
8.     int i, j;
   
9.     //color = ConvertColor(g_MaskColor32);
   
10.     if (value > 255)
    
11.     {
    
12.         value = 255;
    
13.     }
    
14.     rect.x = x;
    
15.     rect.y = y;
    
16.     SDL_QueryTexture(lps, NULL, NULL, &rect.w, &rect.h);
    
17. 
    
18.     if (width > 0 && height > 0)
    
19.     {
    
20.         rect.w = width;
    
21.         rect.h = height;
    
22.     }
    
23.     else if (width > 0 && height <= 0)
    
24.     {
    
25.         rect.w = width;
    
26.         rect.h = width * rect.h / rect.w;
    
27.     }
    
28.     rect0 = rect;
    
29.     rect0.x = 0;
    
30.     rect0.y = 0;
    
31.     if (!lps)
    
32.     {
    
33.         JY_Error("BlitSurface: lps is null!");
    
34.         return 1;
    
35.     }
    
36. 
    
37.     if ((flag & 0x2) == 0)          // 没有alpha
    
38.     {
    
39.         SDL_SetTextureColorMod(lps, 255, 255, 255);
    
40.         SDL_SetTextureBlendMode(lps, SDL_BLENDMODE_BLEND);
    
41.         SDL_SetTextureAlphaMod(lps, 255);
    
42.         RenderToTexture(lps, NULL, g_Texture, &rect);
    
43.         //SDL_BlitSurface(lps, NULL, g_Surface, &rect);
    
44.     }
    
45.     else    // 有alpha
    
46.     {
    
47.         if ((flag & 0x4) || (flag & 0x8) || (flag & 0x10))     // 4-黑, 8-白, 16-颜色
    
48.         {
    
49.             // 4-黑, 8-白, 16-颜色
    
50.             if (flag & 0x4)
    
51.             {
    
52.                 SDL_SetTextureColorMod(lps, 32, 32, 32);
    
53.                 SDL_SetTextureBlendMode(lps, SDL_BLENDMODE_BLEND);
    
54.                 SDL_SetTextureAlphaMod(lps, (Uint8)value);
    
55.                 RenderToTexture(lps, NULL, g_Texture, &rect);
    
56.             }
    
57.             else if (flag & 0x8)
    
58.             {
    
59.                 SDL_SetTextureColorMod(lps, 255, 255, 255);
    
60.                 SDL_SetTextureBlendMode(lps, SDL_BLENDMODE_NONE);
    
61.                 SDL_SetTextureAlphaMod(lps, 255);
    
62.                 RenderToTexture(lps, NULL, g_TextureTmp, &rect);
    
63.                 SDL_SetTextureBlendMode(lps, SDL_BLENDMODE_ADD);
    
64.                 SDL_SetRenderDrawColor(g_Renderer, 255, 255, 255, 255);
    
65.                 SDL_SetRenderDrawBlendMode(g_Renderer, SDL_BLENDMODE_ADD);
    
66.                 SDL_RenderFillRect(g_Renderer, &rect);
    
67.                 SDL_SetTextureColorMod(g_TextureTmp, 255, 255, 255);
    
68.                 SDL_SetTextureBlendMode(g_TextureTmp, SDL_BLENDMODE_BLEND);
    
69.                 SDL_SetTextureAlphaMod(g_TextureTmp, (Uint8)value);
    
70.                 RenderToTexture(g_TextureTmp, &rect, g_Texture, &rect);
    
71.                 SDL_SetTextureAlphaMod(g_TextureTmp, 255);
    
72.             }
    
73.             else
    
74.             {
    
75.                 Uint8 r = (Uint8)((color & RMASK) >> 16);
    
76.                 Uint8 g = (Uint8)((color & GMASK) >> 8);
    
77.                 Uint8 b = (Uint8)((color & BMASK));
    
78.                 Uint8 a = 255;
    
79.                 SDL_SetTextureColorMod(lps, 255, 255, 255);
    
80.                 SDL_SetTextureBlendMode(lps, SDL_BLENDMODE_NONE);
    
81.                 SDL_SetTextureAlphaMod(lps, 255);
    
82.                 RenderToTexture(lps, NULL, g_TextureTmp, &rect);
    
83.                 SDL_SetTextureBlendMode(lps, SDL_BLENDMODE_ADD);
    
84.                 SDL_SetRenderDrawColor(g_Renderer, r, g, b, a);
    
85.                 SDL_SetRenderDrawBlendMode(g_Renderer, SDL_BLENDMODE_ADD);
    
86.                 SDL_RenderFillRect(g_Renderer, &rect);
    
87.                 SDL_SetTextureColorMod(g_TextureTmp, 255, 255, 255);
    
88.                 SDL_SetTextureBlendMode(g_TextureTmp, SDL_BLENDMODE_BLEND);
    
89.                 SDL_SetTextureAlphaMod(g_TextureTmp, (Uint8)value);
    
90.                 RenderToTexture(g_TextureTmp, &rect, g_Texture, &rect);
    
91.                 SDL_SetTextureAlphaMod(g_TextureTmp, 255);
    
92.                 //SDL_SetTextureColorMod(lps, r, g, b);
    
93.                 //SDL_SetTextureBlendMode(lps, SDL_BLENDMODE_BLEND);
    
94.                 //SDL_SetTextureAlphaMod(lps, (Uint8)value);
    
95.                 //RenderToTexture(lps, NULL, g_Texture, &rect);
    
96.             }
    
97.         }
    
98.         else
    
99.         {
    
100.             SDL_SetTextureColorMod(lps, 255, 255, 255);
     
101.             SDL_SetTextureBlendMode(lps, SDL_BLENDMODE_BLEND);
     
102.             SDL_SetTextureAlphaMod(lps, (Uint8)value);
     
103.             RenderToTexture(lps, NULL, g_Texture, &rect);
     
104.             //SDL_BlitSurface(lps, NULL, g_Surface, &rect);
     
105.         }
     
106.     }
     
107.     return 0;
     
108. }

复制代码

yyw4214723

感谢bt老师无私奉献

westcoast

貌似nb   

龍凰=至尊

唔。。。。。。。。虽然看不懂，但是我还是要表达一下崇敬