Lua: New clearpicture command
git-svn-id: svn://pulkomandy.tk/GrafX2/trunk@1358 416bcca6-2ee7-4201-b75f-2eb2f807beb1
This commit is contained in:
parent
8c2655f88a
commit
5d213a11fa
18
factory.c
18
factory.c
@ -247,6 +247,23 @@ int L_GetPictureSize(lua_State* L)
|
|||||||
return 2;
|
return 2;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
int L_ClearPicture(lua_State* L)
|
||||||
|
{
|
||||||
|
int c;
|
||||||
|
int nb_args=lua_gettop(L);
|
||||||
|
|
||||||
|
LUA_ARG_LIMIT (1, "clearpicture");
|
||||||
|
LUA_ARG_NUMBER(1, "clearpicture", c, INT_MIN, INT_MAX);
|
||||||
|
|
||||||
|
if (Stencil_mode && Config.Clear_with_stencil)
|
||||||
|
Clear_current_image_with_stencil(c,Stencil);
|
||||||
|
else
|
||||||
|
Clear_current_image(c);
|
||||||
|
Redraw_layered_image();
|
||||||
|
|
||||||
|
return 0; // no values returned for lua
|
||||||
|
}
|
||||||
|
|
||||||
int L_PutPicturePixel(lua_State* L)
|
int L_PutPicturePixel(lua_State* L)
|
||||||
{
|
{
|
||||||
int x;
|
int x;
|
||||||
@ -971,6 +988,7 @@ void Button_Brush_Factory(void)
|
|||||||
lua_register(L,"getsparepicturepixel",L_GetSparePicturePixel);
|
lua_register(L,"getsparepicturepixel",L_GetSparePicturePixel);
|
||||||
lua_register(L,"getsparecolor",L_GetSpareColor);
|
lua_register(L,"getsparecolor",L_GetSpareColor);
|
||||||
lua_register(L,"getsparetranscolor",L_GetSpareTransColor);
|
lua_register(L,"getsparetranscolor",L_GetSpareTransColor);
|
||||||
|
lua_register(L,"clearpicture",L_ClearPicture);
|
||||||
|
|
||||||
|
|
||||||
// For debug only
|
// For debug only
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user