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
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
|
#ifndef DNG_LUA_API_H
#define DNG_LUA_API_H
#include <iostream>
#include "lua.hpp"
struct LState {
lua_State *onkeypress;
lua_State *onupdate;
lua_State *onintro;
lua_State *onwin;
lua_State *onloss;
} typedef LState;
const char *ON_KEYPRESS = "onKeypress";
const char *ON_UPDATE = "onUpdate";
const char *ON_INTRO = "onIntro";
const char *ON_WIN = "onWin";
const char *ON_LOSS = "onLoss";
LState *init_default(lua_State *L) {
auto *state = static_cast<LState *>(malloc(sizeof(LState)));
state->onkeypress = L;
state->onupdate = L;
state->onintro = L;
state->onwin = L;
state->onloss = L;
return state;
}
bool check_fn(lua_State *L, const char *fn) {
lua_getglobal(L, fn);
return lua_isfunction(L, -1);
}
void override_file_fns(lua_State *L, LState *state) {
if (check_fn(L, ON_KEYPRESS)) {
state->onkeypress = L;
}
if (check_fn(L, ON_UPDATE)) {
state->onupdate = L;
}
if (check_fn(L, ON_INTRO)) {
state->onintro = L;
}
if (check_fn(L, ON_WIN)) {
state->onwin = L;
}
if (check_fn(L, ON_LOSS)) {
state->onloss = L;
}
}
bool lua_dofn(lua_State *L, const char *fn) {
lua_getglobal(L, fn);
if (!lua_isfunction(L, -1)) {
std::cout << "[C] Error " << fn << " not function | not found" << std::endl;
return false;
}
lua_pcall(L, 0, 1, 0);
return true;
}
bool lua_dofn_with_key(lua_State *L, const char *fn, char pressedKey) {
lua_getglobal(L, fn);
if (!lua_isfunction(L, -1)) {
std::cout << "[C] Error " << fn << " not function | not found" << std::endl;
return false;
}
lua_pushinteger(L, pressedKey);
lua_pcall(L, 1, 1, 0);
return true;
}
bool lua_onkeypress(lua_State *L, char pressedKey) {
return lua_dofn_with_key(L, "onKeyPress", pressedKey);
}
bool lua_onupdate(lua_State *L) { return lua_dofn(L, "onUpdate"); }
bool lua_onintro(lua_State *L) { return lua_dofn(L, "onIntro"); }
bool lua_onwin(lua_State *L) { return lua_dofn(L, "onWin"); }
bool lua_onloss(lua_State *L) { return lua_dofn(L, "onLoss"); }
#endif // DNG_LUA_API_H
|