Lua语言如何调用自己编写的C DLL文件
合集下载
相关主题
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
Lua 语言如何调用自己编写的 C DLL 文件
/*---c code:---*/ #include "lua.h" #include "lualib.h" #include "lauxlib.h" #include <windows.h> /*----------定义函数--------------*/ static int MyLuaDLL_HelloWorld(lua_State* L) { MessageBox(NULL,"Hello","World",MB_OK); return 0; } static int MyLuaDLL_average(lua_State *L) { /* Hale Waihona Puke Baiduet number of arguments */ int n = lua_gettop(L); double sum = 0; int i; /* loop through each argument */ for (i = 1; i <= n; i++) { /* total the arguments */ sum += lua_tonumber(L, i); } /* push the average */ lua_pushnumber(L, sum / n); /* push the sum */ lua_pushnumber(L, sum); /* return the number of results */ return 2; } /*-----------注册函数---------------*/ static const luaL_reg MyLuaDLLFunctions [] = { {"HelloWorld",MyLuaDLL_HelloWorld}, {"average",MyLuaDLL_average}, {NULL, NULL} }; int __cdecl __declspec(dllexport) luaopen_MyLuaDLL(lua_State* L) { luaL_openlib(L, "MyLuaDLL", MyLuaDLLFunctions, 0);
return 1; } -- lua code: -local testlib = package.loadlib("Lua_Dll.dll","luaopen_MyLuaDLL"); print (testlib) if(testlib)then testlib(); else -- Error end MyLuaDLL.HelloWorld(); a,b=MyLuaDLL.average(23,33,3344); print("average:",a,"sum:",b);
/*---c code:---*/ #include "lua.h" #include "lualib.h" #include "lauxlib.h" #include <windows.h> /*----------定义函数--------------*/ static int MyLuaDLL_HelloWorld(lua_State* L) { MessageBox(NULL,"Hello","World",MB_OK); return 0; } static int MyLuaDLL_average(lua_State *L) { /* Hale Waihona Puke Baiduet number of arguments */ int n = lua_gettop(L); double sum = 0; int i; /* loop through each argument */ for (i = 1; i <= n; i++) { /* total the arguments */ sum += lua_tonumber(L, i); } /* push the average */ lua_pushnumber(L, sum / n); /* push the sum */ lua_pushnumber(L, sum); /* return the number of results */ return 2; } /*-----------注册函数---------------*/ static const luaL_reg MyLuaDLLFunctions [] = { {"HelloWorld",MyLuaDLL_HelloWorld}, {"average",MyLuaDLL_average}, {NULL, NULL} }; int __cdecl __declspec(dllexport) luaopen_MyLuaDLL(lua_State* L) { luaL_openlib(L, "MyLuaDLL", MyLuaDLLFunctions, 0);
return 1; } -- lua code: -local testlib = package.loadlib("Lua_Dll.dll","luaopen_MyLuaDLL"); print (testlib) if(testlib)then testlib(); else -- Error end MyLuaDLL.HelloWorld(); a,b=MyLuaDLL.average(23,33,3344); print("average:",a,"sum:",b);