Lua: New clearpicture command

git-svn-id: svn://pulkomandy.tk/GrafX2/trunk@1358 416bcca6-2ee7-4201-b75f-2eb2f807beb1
This commit is contained in:
Yves Rizoud 2010-02-21 18:15:15 +00:00
parent 8c2655f88a
commit 5d213a11fa

View File

@ -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