1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
|
extern "C" {
#include "../lua51/lua.h"
#include "../lua51/lualib.h"
#include "../lua51/lauxlib.h"
}
#include <windows.h>
#include <time.h>
#include <conio.h>
static int l_GetTime(lua_State* L)
{
float second = (double)clock() / CLOCKS_PER_SEC;
lua_pushnumber(L, second);
return 1;
}
static int l_Sleep(lua_State* L)
{
float t = lua_tonumber(L, 1);
Sleep(t * 1000);
return 0;
}
static int l_Kbhit(lua_State* L)
{
int c = _kbhit();
lua_pushboolean(L, c);
return 1;
}
static int l_GetChar(lua_State* L)
{
char str[2] = { 0,0 };
str[0] = _getch();
lua_pushstring(L, str);
return 1;
}
luaL_reg fns[] = {
{"GetTime", l_GetTime } ,
{"Sleep", l_Sleep } ,
{"Kbhit", l_Kbhit },
{"GetChar", l_GetChar },
{0, 0}
};
void openlibs(lua_State* L)
{
luaL_openlibs(L);
//luaL_register(L, NULL, fns);
luaL_reg* fn;
int i = 0;
for (fn = &fns[0]; fn->name != 0; fn = &fns[++i])
{
lua_pushcfunction(L, fn->func);
lua_setglobal(L, fn->name);
}
}
int main(int args, char* argv[])
{
lua_State* L = luaL_newstate();
openlibs(L);
luaL_dofile(L, "01-coroutine/test.lua");
lua_close(L);
return 0;
}
|
