1. C函式作為應用程式的一部分。

#include <stdio.h>
#include <string.h>
#include <lua.hpp>
#include <lauxlib.h>
#include <lualib.h>

//待Lua呼叫的C註冊函式。
static int add2(lua_State* L)
{
    //檢查棧中的引數是否合法，1表示Lua呼叫時的第一個引數(從左到右)，依此類推。
    //如果Lua程式碼在呼叫時傳遞的引數不為number，該函式將報錯並終止程式的執行。
    double op1 = luaL_checknumber(L,1);
    double op2 = luaL_checknumber(L,2);
    //將函式的結果壓入棧中。如果有多個返回值，可以在這裡多次壓入棧中。
    lua_pushnumber(L,op1 + op2);
    //返回值用於提示該C函式的返回值數量，即壓入棧中的返回值數量。
    return 1;
}

//另一個待Lua呼叫的C註冊函式。
static int sub2(lua_State* L)
{
    double op1 = luaL_checknumber(L,1);
    double op2 = luaL_checknumber(L,2);
    lua_pushnumber(L,op1 - op2);
    return 1;
}

const char* testfunc = "print(add2(1.0,2.0)) print(sub2(20.1,19))";

int main()
{
    lua_State* L = luaL_newstate();
    luaL_openlibs(L);
    //將指定的函式註冊為Lua的全域性函式變數，其中第一個字串引數為Lua程式碼
    //在呼叫C函式時使用的全域性函式名，第二個引數為實際C函式的指標。
    lua_register(L, "add2", add2);
    lua_register(L, "sub2", sub2);
    //在註冊完所有的C函式之後，即可在Lua的程式碼塊中使用這些已經註冊的C函數了。
    if (luaL_dostring(L,testfunc))
        printf("Failed to invoke.\n");
    lua_close(L);
    return 0;
}
 

#include <stdio.h>
#include <string.h>
#include <lua.hpp>
#include <lauxlib.h>
#include <lualib.h>

//待註冊的C函式，該函式的宣告形式在上面的例子中已經給出。
//需要說明的是，該函式必須以C的形式被匯出，因此extern "C"是必須的。
//函式程式碼和上例相同，這裡不再贅述。
extern "C" int add(lua_State* L) 
{
    double op1 = luaL_checknumber(L,1);
    double op2 = luaL_checknumber(L,2);
    lua_pushnumber(L,op1 + op2);
    return 1;
}

extern "C" int sub(lua_State* L)
{
    double op1 = luaL_checknumber(L,1);
    double op2 = luaL_checknumber(L,2);
    lua_pushnumber(L,op1 - op2);
    return 1;
}

//luaL_Reg結構體的第一個欄位為字串，在註冊時用於通知Lua該函式的名字。
//第一個欄位為C函式指標。
//結構體陣列中的最後一個元素的兩個欄位均為NULL，用於提示Lua註冊函式已經到達陣列的末尾。
static luaL_Reg mylibs[] = { 
    {"add", add},
    {"sub", sub},
    {NULL, NULL} 
}; 

//該C庫的唯一入口函式。其函式簽名等同於上面的註冊函式。見如下幾點說明：
//1. 我們可以將該函式簡單的理解為模組的工廠函式。
//2. 其函式名必須為luaopen_xxx，其中xxx表示library名稱。Lua程式碼require "xxx"需要與之對應。
//3. 在luaL_register的呼叫中，其第一個字串引數為模組名"xxx"，第二個引數為待註冊函式的陣列。
//4. 需要強調的是，所有需要用到"xxx"的程式碼，不論C還是Lua，都必須保持一致，這是Lua的約定，
//   否則將無法呼叫。
extern "C" __declspec(dllexport)
int luaopen_mytestlib(lua_State* L) 
{
    const char* libName = "mytestlib";
    luaL_register(L,libName,mylibs);
    return 1;
}
 

require "mytestlib"  --指定包名稱

--在呼叫時，必須是package.function
print(mytestlib.add(1.0,2.0))
print(mytestlib.sub(20.1,19))