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
|
#include "lua/luax.h"
#include "libjin/jin.h"
#include "lua/luaopen_types.h"
using namespace jin::render;
namespace jin
{
namespace lua
{
static inline Image* checkImage(lua_State* L)
{
Proxy* proxy = (Proxy*)luax_checktype(L, 1, TYPE_IMAGE);
if (proxy != 0 && proxy != nullptr)
return (Image*)proxy->object;
return nullptr;
}
static int l_getWidth(lua_State* L)
{
Image* i = checkImage(L);
luax_pushnumber(L, i->getWidth());
return 1;
}
static int l_getHeight(lua_State *L)
{
Image* i = checkImage(L);
luax_pushnumber(L, i->getHeight());
return 1;
}
static int l_getPixel(lua_State* L)
{
Image* i = checkImage(L);
int x = luax_checknumber(L, 2);
int y = luax_checknumber(L, 3);
color c = i->getPixel(x, y);
luax_pushnumber(L, c.rgba.r);
luax_pushnumber(L, c.rgba.g);
luax_pushnumber(L, c.rgba.b);
luax_pushnumber(L, c.rgba.a);
return 4;
}
static int l_setAnchor(lua_State* L)
{
Image* i = checkImage(L);
int x = luax_checknumber(L, 2);
int y = luax_checknumber(L, 3);
i->setAnchor(x, y);
return 0;
}
static int l_getSize(lua_State* L)
{
Image* i = checkImage(L);
luax_pushnumber(L, i->getWidth());
luax_pushnumber(L, i->getHeight());
return 2;
}
static int l_gc(lua_State* L)
{
Proxy* proxy = (Proxy*)luax_checktype(L, 1, TYPE_IMAGE);
Image* img = (Image*)proxy->object;
delete img;
return 0;
}
static const luaL_Reg f[] = {
{"__gc", l_gc},
{"getWidth", l_getWidth},
{"getHeight", l_getHeight},
{"getSize", l_getSize},
{"getPixel", l_getPixel},
{"setAnchor", l_setAnchor},
{0, 0 }
};
int luaopen_Image(lua_State* L)
{
luax_newtype(L, TYPE_IMAGE, f);
return 0;
}
}// graphics
}// jin
|