濮阳杆衣贸易有限公司

主頁(yè) > 知識(shí)庫(kù) > Lua教程(十九):C調(diào)用Lua

Lua教程(十九):C調(diào)用Lua

熱門(mén)標(biāo)簽:衡水外呼線路解決 外呼系統(tǒng)一天耗費(fèi)多少流量 杞縣地圖標(biāo)注app ??谥悄苷Z(yǔ)音電銷(xiāo)機(jī)器人好用嗎 免費(fèi)門(mén)店地圖標(biāo)注注冊(cè)入駐 陜西便宜電銷(xiāo)機(jī)器人軟件 艾比利外呼系統(tǒng) 電話機(jī)器人每天搜索多少次 昆明電話外呼系統(tǒng)好么

1. 基礎(chǔ):

    Lua的一項(xiàng)重要用途就是作為一種配置語(yǔ)言。現(xiàn)在從一個(gè)簡(jiǎn)單的示例開(kāi)始吧。
 

復(fù)制代碼 代碼如下:

    --這里是用Lua代碼定義的窗口大小的配置信息
    width = 200
    height = 300
 

    下面是讀取配置信息的C/C++代碼:  

復(fù)制代碼 代碼如下:

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

void load(lua_State* L, const char* fname, int* w, int* h) {
    if (luaL_loadfile(L,fname) || lua_pcall(L,0,0,0)) {
        printf("Error Msg is %s.\n",lua_tostring(L,-1));
        return;
    }
    lua_getglobal(L,"width");
    lua_getglobal(L,"height");
    if (!lua_isnumber(L,-2)) {
        printf("'width' should be a number\n" );
        return;
    }
    if (!lua_isnumber(L,-1)) {
        printf("'height' should be a number\n" );
        return;
    }
    *w = lua_tointeger(L,-2);
    *h = lua_tointeger(L,-1);
}


int main()
{
    lua_State* L = luaL_newstate();
    int w,h;
    load(L,"D:/test.lua",w,h);
    printf("width = %d, height = %d\n",w,h);
    lua_close(L);
    return 0;
}

下面是針對(duì)新函數(shù)的解釋:

    lua_getglobal是宏,其原型為:#define lua_getglobal(L,s)  lua_getfield(L, LUA_GLOBALSINDEX, (s))。

    每次調(diào)用這個(gè)宏的時(shí)候,都會(huì)將Lua代碼中與之相應(yīng)的全局變量值壓入棧中,第一次調(diào)用時(shí)將全局變量"width"的值壓入棧中,之后再次調(diào)用時(shí)再將"height"的值也壓入棧中。

    2. table操作:

    我們可以在C語(yǔ)言的代碼中操作Lua中的table數(shù)據(jù),這是一個(gè)非常非常方便且實(shí)用的功能。這樣不僅可以使Lua代碼的結(jié)構(gòu)更加清晰,也可以在C語(yǔ)言代碼中定義等同的結(jié)構(gòu)體與之對(duì)應(yīng),從而大大提高代碼的可讀性。見(jiàn)如下代碼:

復(fù)制代碼 代碼如下:

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

void load(lua_State* L) {

    if (luaL_loadstring(L,"background = { r = 0.30, g = 0.10, b = 0 }")
        || lua_pcall(L,0,0,0)) {
        printf("Error Msg is %s.\n",lua_tostring(L,-1));
        return;
    }
    lua_getglobal(L,"background");
    if (!lua_istable(L,-1)) {
        printf("'background' is not a table.\n" );
        return;
    }
    lua_getfield(L,-1,"r");
    if (!lua_isnumber(L,-1)) {
        printf("Invalid component in background color.\n");
        return;
    }
    int r = (int)(lua_tonumber(L,-1) * 255);
    lua_pop(L,1);
    lua_getfield(L,-1,"g");
    if (!lua_isnumber(L,-1)) {
        printf("Invalid component in background color.\n");
        return;
    }
    int g = (int)(lua_tonumber(L,-1) * 255);
    lua_pop(L,1);

    lua_pushnumber(L,0.4);
    lua_setfield(L,-2,"b");

    lua_getfield(L,-1,"b");
    if (!lua_isnumber(L,-1)) {
        printf("Invalid component in background color.\n");
        return;
    }
    int b = (int)(lua_tonumber(L,-1) * 255);
    printf("r = %d, g = %d, b = %d\n",r,g,b);
    lua_pop(L,1);
    lua_pop(L,1);
    return;
}

int main()
{
    lua_State* L = luaL_newstate();
    load(L);
    lua_close(L);
    return 0;
}

void lua_getfield(lua_State *L, int idx, const char *k); 第二個(gè)參數(shù)是table變量在棧中的索引值,最后一個(gè)參數(shù)是table的鍵值,該函數(shù)執(zhí)行成功后會(huì)將字段值壓入棧中。

void lua_setfield(lua_State *L, int idx, const char *k); 第二個(gè)參數(shù)是table變量在棧中的索引值,最后一個(gè)參數(shù)是table的鍵名稱,而字段值是通過(guò)上一條命令lua_pushnumber(L,0.4)壓入到棧中的,該函數(shù)在執(zhí)行成功后會(huì)將剛剛壓入的字段值彈出棧。
   
下面的代碼示例是在C語(yǔ)言代碼中構(gòu)造table對(duì)象,同時(shí)初始化table的字段值,最后再將table對(duì)象賦值給Lua中的一個(gè)全局變量。

復(fù)制代碼 代碼如下:

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

void load(lua_State* L)
{
    lua_newtable(L);
    lua_pushnumber(L,0.3);
    lua_setfield(L,-2,"r");

    lua_pushnumber(L,0.1);
    lua_setfield(L,-2,"g");

    lua_pushnumber(L,0.4);
    lua_setfield(L,-2,"b");
    lua_setglobal(L,"background");

    lua_getglobal(L,"background");
    if (!lua_istable(L,-1)) {
        printf("'background' is not a table.\n" );
        return;
    }
    lua_getfield(L,-1,"r");
    if (!lua_isnumber(L,-1)) {
        printf("Invalid component in background color.\n");
        return;
    }
    int r = (int)(lua_tonumber(L,-1) * 255);
    lua_pop(L,1);
    lua_getfield(L,-1,"g");
    if (!lua_isnumber(L,-1)) {
        printf("Invalid component in background color.\n");
        return;
    }
    int g = (int)(lua_tonumber(L,-1) * 255);
    lua_pop(L,1);

    lua_getfield(L,-1,"b");
    if (!lua_isnumber(L,-1)) {
        printf("Invalid component in background color.\n");
        return;
    }
    int b = (int)(lua_tonumber(L,-1) * 255);
    printf("r = %d, g = %d, b = %d\n",r,g,b);
    lua_pop(L,1);
    lua_pop(L,1);
    return;
}

int main()
{
    lua_State* L = luaL_newstate();
    load(L);
    lua_close(L);
    return 0;
}

 上面的代碼將輸出和之前代碼相同的結(jié)果。

    lua_newtable是宏,其原型為:#define lua_newtable(L) lua_createtable(L, 0, 0)。調(diào)用該宏后,Lua會(huì)生成一個(gè)新的table對(duì)象并將其壓入棧中。

    lua_setglobal是宏,其原型為:#define lua_setglobal(L,s) lua_setfield(L,LUA_GLOBALSINDEX,(s))。調(diào)用該宏后,Lua會(huì)將當(dāng)前棧頂?shù)闹蒂x值給第二個(gè)參數(shù)指定的全局變量名。該宏在執(zhí)行成功后,會(huì)將剛剛賦值的值從棧頂彈出。

    3. 調(diào)用Lua函數(shù):

    調(diào)用函數(shù)的API也很簡(jiǎn)單。首先將待調(diào)用函數(shù)壓入棧,再壓入函數(shù)的參數(shù),然后使用lua_pcall進(jìn)行實(shí)際的調(diào)用,最后將調(diào)用結(jié)果從棧中彈出。見(jiàn)如下代碼:
 

復(fù)制代碼 代碼如下:

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

const char* lua_function_code = "function add(x,y) return x + y end";

void call_function(lua_State* L)
{
    //luaL_dostring 等同于luaL_loadstring() || lua_pcall()
    //注意:在能夠調(diào)用Lua函數(shù)之前必須執(zhí)行Lua腳本,否則在后面實(shí)際調(diào)用Lua函數(shù)時(shí)會(huì)報(bào)錯(cuò),
    //錯(cuò)誤信息為:"attempt to call a nil value."
    if (luaL_dostring(L,lua_function_code)) {
        printf("Failed to run lua code.\n");
        return;
    }
    double x = 1.0, y = 2.3;
    lua_getglobal(L,"add");
    lua_pushnumber(L,x);
    lua_pushnumber(L,y);
    //下面的第二個(gè)參數(shù)表示帶調(diào)用的lua函數(shù)存在兩個(gè)參數(shù)。
    //第三個(gè)參數(shù)表示即使帶調(diào)用的函數(shù)存在多個(gè)返回值,那么也只有一個(gè)在執(zhí)行后會(huì)被壓入棧中。
    //lua_pcall調(diào)用后,虛擬棧中的函數(shù)參數(shù)和函數(shù)名均被彈出。
    if (lua_pcall(L,2,1,0)) {
        printf("error is %s.\n",lua_tostring(L,-1));
        return;
    }
    //此時(shí)結(jié)果已經(jīng)被壓入棧中。
    if (!lua_isnumber(L,-1)) {
        printf("function 'add' must return a number.\n");
        return;
    }
    double ret = lua_tonumber(L,-1);
    lua_pop(L,-1); //彈出返回值。
    printf("The result of call function is %f.\n",ret);
}

int main()
{
    lua_State* L = luaL_newstate();
    call_function(L);
    lua_close(L);
    return 0;
}
 

您可能感興趣的文章:
  • Lua教程(二十):Lua調(diào)用C函數(shù)
  • Lua教程(四):在Lua中調(diào)用C語(yǔ)言、C++的函數(shù)
  • Lua教程(三):C語(yǔ)言、C++中調(diào)用Lua的Table示例
  • C++中調(diào)用Lua函數(shù)實(shí)例
  • Lua中調(diào)用C++函數(shù)實(shí)例
  • Lua調(diào)用自定義C模塊
  • Lua中調(diào)用C語(yǔ)言函數(shù)實(shí)例
  • Lua編程示例(六): C語(yǔ)言調(diào)用Lua函數(shù)
  • C語(yǔ)言中調(diào)用Lua函數(shù)實(shí)例
  • C語(yǔ)言與Lua之間的相互調(diào)用詳解

標(biāo)簽:泰安 臨滄 昌都 西寧 營(yíng)口 宿遷 南京

巨人網(wǎng)絡(luò)通訊聲明:本文標(biāo)題《Lua教程(十九):C調(diào)用Lua》,本文關(guān)鍵詞  Lua,教程,十九,調(diào)用,Lua,教程,;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問(wèn)題,煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們,我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無(wú)關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《Lua教程(十九):C調(diào)用Lua》相關(guān)的同類信息!
  • 本頁(yè)收集關(guān)于Lua教程(十九):C調(diào)用Lua的相關(guān)信息資訊供網(wǎng)民參考!
  • 推薦文章
    千阳县| 镇江市| 海门市| 双峰县| 连城县| 会昌县| 阿勒泰市| 岑巩县| 从化市| 龙井市| 呼图壁县| 梓潼县| 宁乡县| 永靖县| 兴化市| 黔江区| 和硕县| 肇东市| 邹城市| 邓州市| 靖安县| 保康县| 友谊县| 宝丰县| 石城县| 通河县| 和龙市| 阿拉善右旗| 九江市| 洱源县| 会东县| 泸州市| 长乐市| 辽宁省| 理塘县| 邵武市| 襄汾县| 蓬溪县| 峨眉山市| 龙泉市| 开阳县|