VC和LUA混合开发之VC程序调用Lua脚本函数

OStack程序员社区-中国程序员成长平台 › 门户 › 编程› LUA›LUA教程

原作者: [db:作者] 来自: [db:来源] 收藏邀请

作者：朱金灿

来源：http://www.cnblogs.com/clever101/

Lua语言以其卓越的可扩展性、简单、高效率和与平台无关性在游戏领域得到广泛应用。今天花了一些时间学习VC和Lua如何混合开发，编写了一个小例程，和大家分享一下这方面的经验。

首先在http://www.lua.org/ftp/下载Lua的最新版本：lua-5.1.4。然后用VS C++ 2005 + sp1建一个Win32静态库空工程：lua，把相关c文件和h文件都添加进来。为了导出了lua的api接口，注意添加一个预处理宏：LUA_CORE（或者是LUA_LIB也可以），另外运行时库采用多线程DLL。

首先编写一个Lua脚本函数，代码如下：

function add ( x, y )
return x + y;
end

将这个代码保存为add.lua。

接着我们新建一个MFC对话框工程：Calc。这个程序实现简单整数加法运算。

首先在对话框类定义一个Lua虚拟机指针以及加法运算所需要的变量：

    /**
    * \brief LUA 虚拟机指针。
    */
    lua_State *m_plua;
    /**
    * \brief 加法运算的左操作数。
    */
    int m_nLeftNum;
    /**
    * \brief 加法运算的左操作数。
    */
    int m_nRightNum;
    /**
    * \brief 加法运算的结果。
    */
    long m_nResult;

在对话框初始化函数CCalcDlg::OnInitDialog调用LUA虚拟机初始化函数InitLuaState。InitLuaState函数的代码如下：

/*!
*  \brief 初始化Lua虚拟机。
*
*  \return 无。
*/
void CCalcDlg::InitLuaState()
{
    m_plua = lua_open();
    if(NULL!=m_plua)
    {
        luaopen_base(m_plua);
        luaopen_table(m_plua);
        luaopen_string(m_plua);
        luaopen_math(m_plua);
        luaopen_debug(m_plua);
    }
}

在对话框的销毁消息响应函数里关闭Lua虚拟机：

void CCalcDlg::OnDestroy()
{
    CDialog::OnDestroy();

    // TODO: 在此处添加消息处理程序代码
    lua_close (m_plua);
}

在执行加法按钮的消息函数里添加如下代码：

void CCalcDlg::OnBnClickedOk()
{
    // TODO: 在此添加控件通知处理程序代码
    UpdateData(TRUE);

    StackDump(m_plua);
    string strLuaFile = _T("");
    GetLuaFile(strLuaFile);  // 得到lua脚本文件全路径
    luaL_dofile(m_plua,strLuaFile.c_str());     // 解释分析lua文件
    StackDump(m_plua);
    lua_getglobal(m_plua,_T("add"));       // 取到一个全局标号add，取的同时会把add函数压栈
    StackDump(m_plua);
    lua_pushnumber(m_plua,m_nLeftNum);        // 把第一个参数压入栈里
    StackDump(m_plua);
    lua_pushnumber(m_plua,m_nRightNum);        // 第二个参数压栈
    StackDump(m_plua);
    if(lua_pcall(m_plua,2,1,0)!= 0)        // 执行add函数
    {
        AfxMessageBox(_T("调用lua脚本函数失败"));
        return;
    }
    StackDump(m_plua);
    m_nResult = (int)lua_tonumber(m_plua, -1);        // 函数执行完了，执行结果被压栈，所以取得最顶端的一个数就是结果值，-1就是指取栈顶的值
    StackDump(m_plua);
    lua_pop(m_plua,1);      // 把值从栈里清除，pop（弹出）一个值
    StackDump(m_plua);
    UpdateData(FALSE);
}

编译环境为：WinXp + sp3， VS C++2005 + sp1，程序运行界面如下：

相关源码在这里下载：VC程序调用Lua脚本函数程序源码下载。

参考文献：

1. LUA 和C之间的函数调用

2. LUA整合进MFC代码