Lua学习笔记三

转载 2013年12月05日 19:36:47

Lua学习笔记三


2008.7.14

修正了 main 函数里 注册新Lua函数时候的一个笔误,感谢 mayao11 指出以上错误:)

2008.5.20

修正了 小结 里关于 lua_pop(L,-1)的错误,应该为lua_pop(L,1),感谢 aslucky  指出以上错误。


首先提一下:元旦只放一天假,比较悲惨。不过可以继续研究Lua,也不失为一种幸运。

通过上一节的知识,我们可以实现很多应用了,但是在GUI领域,实在有太多的变量--x,y,z,w,h,bitmap,algi,d1,d2,d3,dp1,dp2,dp3,whatever...,而Lua的栈默认元素上限为20个,所以必须掌握Lua特有的数据类型--表的应用。
本节的目的:在上节的基础上,加入表的应用。侧重点为用表来作为函数参数。


请不要嫌我麻烦,这个系列文章是循序渐进式,而不是手册式,所以一定要掌握之前的知识,才可以继续阅读。
另外,请快速阅读pil的语法部分(1-7章),以便对Lua语法有大概的了解,这大概会花费1天的时间。但是不要在for循环和迭代器上花费太多的时间--如果暂时不想过于深入的理解Lua,而只是看懂这些笔记的程度--那些东西会研究的,但不是现在,现在我们只是初心者而已。
OK,这是我最后一次罗嗦这个。


RTFS?!

-------以下是Lua脚本--------
--test.lua
LuaC_MessageBoxEx{ hWnd = nil,
                                            lpText = "Last is ShowMessage! This is real MessageBox!",
                                            lpCaption = "Lua Test",
                                            uType = 0}                                      --0就是MB_OK

---------通过LuaEdit语法测试才出鬼了--------------

//------------以下是test.cpp文件----------------
//================================================================================================================
//           Lua Test Object
//           C++ Source lua_test.cpp
//================================================================================================================
//================================================================================================================
//           Include Files
//================================================================================================================
extern "C"
{
 #include "D://My Documents//Visual Studio 2005//Projects//lua//lua//lua.h"
 #include "D://My Documents//Visual Studio 2005//Projects//lua//lua//lualib.h"
 #include "D://My Documents//Visual Studio 2005//Projects//lua//lua//lauxlib.h"
}

#include <windows.h>
#include <stdio.h>
#include <string>
using namespace std;
//================================================================================================================
//           Libraries
//================================================================================================================
#pragma comment( lib ,"D://My Documents//Visual Studio 2005//Projects//lua//release//lua.lib")
//================================================================================================================
//           Global Variables
//================================================================================================================
lua_State *L;
//================================================================================================================
//           Lua Functions
//================================================================================================================
double f( double x, double y )
{
 double ret;
 lua_getglobal( L, "f");
 lua_pushnumber( L,x);
 lua_pushnumber( L,y);
 lua_call( L, 2, 1);
 //lua_pcall( L, 2, 1, 0);

 ret = lua_tonumber( L, -1);
 //lua_pop( L, 1);
 return ret;
}
//================================================================================================================
//           C/C++ Helper Functions
//================================================================================================================
// 获取t[k](表t中字段k)的值
// 有以下的值
#define GTC_LP             0x0000      // pointer
#define GTC_INT            0x0001      // int
#define GTC_DOUBLE  0x0002      // double
#define GTC_STRING    0x0003      // char
void _lua_getfield( lua_State* L, char* key, void* ret, int type_flags)
{
 lua_pushstring( L, key);
 lua_gettable( L, -2);

 switch( type_flags)
 {
  case GTC_LP:
  {
    ret = (void*)lua_topointer(L,-1);
    break;
  }
  case GTC_INT:
  {
   (*(int*)ret) = (int)lua_tointeger( L, -1);
   break;
  }
  case GTC_DOUBLE:
  {
   (*(double*)ret) = lua_tonumber( L, -1);
   break;
  }
  case GTC_STRING:
  {
   // 此处有隐患,应该阅读lua_tostring()原型之后再来处理
   strcpy( (char*)ret, lua_tostring( L, -1));
   break;
  }
  default:
   break;
 }
 lua_pop( L, 1);
}

//================================================================================================================
//           C/C++ Functions
//================================================================================================================
int LuaC_MessageBox( lua_State *L)
{
 char Message[256] = "";
 int i;

 // 获取参数个数
 int n = lua_gettop(L);

 // 保存全部参数
 for ( i = 1, j = 0; i <= n ; i++)
 {
  if( lua_isstring( L, i))
   strcpy( Message, lua_tostring( L, i));
 }

 // 执行逻辑
 MessageBox( NULL, Message, "Lua Test", MB_OK );

 // 返回值压栈

 // 返回压栈参数的个数
 return 0;
}

int LuaC_MessageBoxEx( lua_State *L)
{
   HWND    hWnd;
   char       lpText[256] = "";
   char       lpCaption[256] = "";
    UINT      uType;

 // 解析表
 _lua_getfield( L, "hWnd",        &hWnd,        GTC_LP);
 _lua_getfield( L, "lpText",       &lpText,       GTC_STRING);
 _lua_getfield( L, "lpCaption", &lpCaption, GTC_STRING);
 _lua_getfield( L, "uType",       &uType,        GTC_INT);

 // 执行逻辑
 MessageBox( hWnd, lpText, lpCaption, uType);

 // 返回值压栈

 // 返回压栈参数的个数
 return 0;
}
//================================================================================================================
//           Main Functions
//================================================================================================================
int main( void)
{
 int error;

 L = lua_open();
 luaopen_base(L);
 luaL_openlibs(L);

  // 注册C/C++函数
  lua_register( L, "LuaC_MessageBox", LuaC_MessageBox);
  lua_register( L, "LuaC_MessageBoxEx", LuaC_MessageBoxEx);

// load the script 
// 加入了错误处理
 if ( (error = luaL_dofile(L, "test.lua")) != 0)
 {
  MessageBox( NULL, "出错啦:执行脚本出错!", "Lua Test", MB_OK );
  return 0;
 }
 
 getchar();
 lua_close( L);
 return 1;
}

 


 

如你所见,这2段代码是相当的熟悉,因为我直接使用上次的代码来做的修改。并且我将新添加的部分用黑体标明,以引起你的注意。所有这写新加入的代码,相应的注释里有足够的解释--除了一个帮助器函数:_lua_getfield

这一节新加的代码比较少,但是要说清楚其中的内容就不太容易了。一定要关注我用红色标记出来的部分。

1、首先注意Lua文件中的{},这是表语法。Lua语法规定,如果(LUA文件中的)函数的参数只有1个参数,并且该参数类型为一张表,就可以使用形如: 函数名{ }的形式。

2、其次是如何解析一张表。在Lua规则里,这样定义读取表元素的协议的:
Lua API 只提供了一个lua_gettable 函数, 他接受table 在栈中的位置为参数,将对应key 值出栈, 返回与key 对应的value 。我们上面的getfield 函数假定table 在栈顶, 因此,lua_pushstring 将key 入栈之后, table 在-2 的位置。返回之前, getfield 会将栈恢复到调用前的状态。(取自PIL 25.1--表操作)

这段话有点含糊不清,实际上Lua取元素的协议是:首先将一个字符串压栈,然后调用lua_gettable。
lua_gettable的实际的工作流程是:以栈顶的字符串(key)为关键字,在栈索引位置( -2)的表(table)中查询该关键字的值(value),然后将栈顶的key出栈,再将value压栈。

3、最后一个lua_pop( L, 1)的作用就是将这个返回值出栈,以保持栈的原貌。

好好理解上面被标记为粗体的文字,因为这就是表的基本应用的全部--只是基本应用。

最后,我想谈谈为什么不能通过LuaEdit的语法检测。原因很简单:LuaEdit所使用的lua库中不包含我们写的这些个函数的声明---这就是为什么我说LuaEdit跟记事本没什么区别,事实上我除了学习Lua语法的阶段使用了它,现在一直都是用记事本在写脚本。当然,在研究Lua的同时,我也会尝试研究下LuaEdit的使用--因为它长的跟VS2005很象,呃...

相关文章推荐

lua学习笔记

  • 2014年03月05日 11:15
  • 13KB
  • 下载

Lua 学习笔记(七) —— 协同程序(三)

上篇讲协同程序和线程的类似

Lua 学习笔记(三) —— Scite 的配置文件修改

首先讲一下下面的配置,可以直接在相关文件中按Ctrl+f进行搜索,例如背景色设置中,可以搜索“stdstyle.fg”来确定修改位置。 我的配置: 首先我只是想着将背景改为绿豆沙色(据说可...

Lua学习笔记(三)

八、迭代器与泛型for 迭代器是一种可以遍历一种集合中所有元素的机制。在Lua中,迭代器用函数表示,每调用一次函数即返回集合中的“下一个”元素。 1、迭代器与closure 每个迭代器都需要在每...

Lua学习笔记(三)——协同程序

一、 迭代器 1、 function values(t) local i = 0 return function () i = i + 1 ; return t[i]; end end ...

lua 学习笔记 三 & 四

在lua中,字符串的第一个字符的索引是1,也可以使用负数索引,这样将从字符串的尾部开始计数,索引-1代表字符串最后一个字符。 %a+ (alphabet)字母 +表示匹配一个或者多个 %c...

torch学习笔记3.1:实现自定义模块(lua)

在使用torch时,如果想自己实现一个层,则可以按照《torch学习笔记1:实现自定义层》 中的方法来实现。但是如果想要实现一个比较复杂的网络,往往需要自己实现多个层(或类),并且有时可能需要重写其他...

Lua学习笔记1:开发环境搭建(windows和linux)

Lua学习笔记1:开发环境搭建(windows和linux) 标签: Lua 2014-07-03 16:58 612人阅读 评论(0) 收藏 举报  分类: lua(...

lua学习笔记---选择,循环语句

选择语句形式:1> if 条件 then 分支 end 注:括号可以去掉 2> if 条件 then 分支1 else 分支2 end 3> if 条件1 then 分支1 els...
  • Jarlen
  • Jarlen
  • 2015年02月14日 02:49
  • 1548

Lua中文教程学习笔记 (2) 表达式

Lua中文教程学习笔记 (2) 表达式 Lua 中的表达式包括数字常量、字符串常量、变量、一元和二元运算符、函数调用。还可以是非传统的函数定义和表构造。 算术运算符 二元运算符:+ - * ...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:Lua学习笔记三
举报原因:
原因补充:

(最多只允许输入30个字)