LUA 03

#include <iostream>

#include <string>

#include <cstdio>

using namespace std;

extern "C" {

#include "lua.h" 

#include "lualib.h" 

#include "lauxlib.h"

#pragma comment(lib,"lua5.1.lib")

}

/* Lua解释器指针 */

lua_State* L;

int main ( int argc, char *argv[] )

{ 
/* 初始化Lua */
L = lua_open();
/* 载入Lua基本库 */ 
luaL_openlibs(L); 

/* 载入语句块 */
if(luaL_loadfile(L, "2.lua") || lua_pcall(L, 0, 0, 0))
{
printf("载入错误\n");
printf("%s\n",lua_tostring(L, -1));
goto EXIT;
}
/*
function Print(n,m)
print(n..","..m)
return "1","2"
end
*/
lua_getglobal(L, "Print");
lua_pushstring(L, "test1");
lua_pushstring(L, "test2");
lua_pcall(L,2,2,0);
printf("%s,%s\n",lua_tostring(L, -2),lua_tostring(L, -1));

EXIT:
/* 清除Lua */ 
lua_close(L); 
/* 暂停 */ 
printf( "Press enter to exit…" ); 
getchar(); 
return 0;

}