m/grafX2
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Lua: added finalizepicture()

Browse Source 
git-svn-id: svn://pulkomandy.tk/GrafX2/trunk@1664 416bcca6-2ee7-4201-b75f-2eb2f807beb1
This commit is contained in:
Yves Rizoud 2010-12-18 23:42:43 +00:00
parent fccadd5927
commit b849cc1706
1 changed files with 20 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
src/factory.c
View File

@ -974,7 +974,7 @@ int L_Wait(lua_State* L)
return 0; return 0;
} }
int L_Wait_break(lua_State* L) int L_WaitBreak(lua_State* L)
{ {
float delay; float delay;
Uint32 end; Uint32 end;
@ -1007,7 +1007,7 @@ int L_Wait_break(lua_State* L)
return 1; return 1;
} }
int L_Update_screen(lua_State* L) int L_UpdateScreen(lua_State* L)
{ {
int nb_args=lua_gettop(L); int nb_args=lua_gettop(L);
@ -1021,6 +1021,19 @@ int L_Update_screen(lua_State* L)
return 0; return 0;
} }
int L_FinalizePicture(lua_State* L)
{
int nb_args=lua_gettop(L);
LUA_ARG_LIMIT (0, "finalizepicture");
Update_colors_during_script();
End_of_modification();
Backup();
return 0;
}
// Handlers for window internals // Handlers for window internals
T_Fileselector Scripts_list; T_Fileselector Scripts_list;
@ -1218,10 +1231,11 @@ void Run_script(char *scriptdir)
lua_register(L,"getsparetranscolor",L_GetSpareTransColor); lua_register(L,"getsparetranscolor",L_GetSpareTransColor);
lua_register(L,"clearpicture",L_ClearPicture); lua_register(L,"clearpicture",L_ClearPicture);
lua_register(L,"wait",L_Wait); lua_register(L,"wait",L_Wait);
lua_register(L,"waitbreak",L_Wait_break); lua_register(L,"waitbreak",L_WaitBreak);
lua_register(L,"updatescreen",L_Update_screen); lua_register(L,"updatescreen",L_UpdateScreen);
lua_register(L,"finalizepicture",L_FinalizePicture);
// For debug only
// Load all standard libraries
luaL_openlibs(L); luaL_openlibs(L);
/* /*