Rest of rlRenderBatch functions.

src/lua_core.c

@@ -299,6 +299,25 @@ static void defineModelAnimation() {
 	lua_setfield( L, -2, "__gc" );
 }
 
+	/* rlRenderBatch. */
+static int gcRLRenderBatch( lua_State *L ) {
+	if ( state->gcUnload ) {
+		rlRenderBatch *renderBatch = luaL_checkudata( L, 1, "rlRenderBatch" );
+		rlUnloadRenderBatch( *renderBatch );
+	}
+	return 0;
+}
+
+static void defineRLRenderBatch() {
+	lua_State *L = state->luaState;
+
+	luaL_newmetatable( L, "rlRenderBatch" );
+	lua_pushvalue( L, -1 );
+	lua_setfield( L, -2, "__index" );
+	lua_pushcfunction( L, gcRLRenderBatch );
+	lua_setfield( L, -2, "__gc" );
+}
+
 /* Assing globals. */
 
 void assignGlobalInt( int value, const char *name ) {
@@ -993,6 +1012,7 @@ bool luaInit( int argn, const char **argc ) {
 	defineMesh();
 	defineModel();
 	defineModelAnimation();
+	defineRLRenderBatch();
 	/* Define globals. */
 	defineGlobals();
 	platformDefineGlobals();
@@ -2031,6 +2051,10 @@ void luaRegister() {
 	assingGlobalFunction( "rlGetShaderIdDefault", lrlglGetShaderIdDefault );
 	assingGlobalFunction( "rlGetShaderLocsDefault", lrlglGetShaderLocsDefault );
 		/* Render batch management. */
+	assingGlobalFunction( "rlLoadRenderBatch", lrlglLoadRenderBatch );
+	assingGlobalFunction( "rlUnloadRenderBatch", lrlglUnloadRenderBatch );
+	assingGlobalFunction( "rlDrawRenderBatch", lrlglDrawRenderBatch );
+	assingGlobalFunction( "rlSetRenderBatchActive", lrlglSetRenderBatchActive );
 	assingGlobalFunction( "rlDrawRenderBatchActive", lrlglDrawRenderBatchActive );
 	assingGlobalFunction( "rlCheckRenderBatchLimit", lrlglCheckRenderBatchLimit );
 	assingGlobalFunction( "rlSetTexture", lrlglSetTexture );
@@ -2842,6 +2866,13 @@ ModelAnimation* uluaGetModelAnimation( lua_State *L, int index ) {
 	return luaL_checkudata( L, index, "ModelAnimation" );
 }
 
+rlRenderBatch* uluaGetRLRenderBatch( lua_State *L, int index ) {
+	if ( lua_islightuserdata( L, index ) ) {
+		return (rlRenderBatch*)lua_touserdata( L, index );
+	}
+	return luaL_checkudata( L, index, "rlRenderBatch" );
+}
+
 /* Push types. */
 
 void uluaPushColor( lua_State *L, Color color ) {
@@ -3145,6 +3176,12 @@ void uluaPushModelAnimation( lua_State *L, ModelAnimation modelAnimation ) {
 	luaL_setmetatable( L, "ModelAnimation" );
 }
 
+void uluaPushRLRenderBatch( lua_State *L, rlRenderBatch renderBatch ) {
+	rlRenderBatch *renderBatchP = lua_newuserdata( L, sizeof( rlRenderBatch ) );
+	*renderBatchP = renderBatch;
+	luaL_setmetatable( L, "rlRenderBatch" );
+}
+
 int uluaGetTableLen( lua_State *L, int index ) {
 	luaL_checktype( L, index, LUA_TTABLE );
 	int t = index, i = 0;

src/rlgl.c

@@ -966,6 +966,64 @@ int lrlglGetShaderLocsDefault( lua_State *L ) {
 ## RLGL - Render batch management
 */
 
+/*
+> renderBatch = RL.rlLoadRenderBatch( int numBuffers, int bufferElements )
+
+Load a render batch system
+
+- Success return rlRenderBatch
+*/
+int lrlglLoadRenderBatch( lua_State *L ) {
+	int numBuffers = luaL_checkinteger( L, 1 );
+	int bufferElements = luaL_checkinteger( L, 2 );
+	
+	uluaPushRLRenderBatch( L, rlLoadRenderBatch( numBuffers, bufferElements ) );
+
+	return 1;
+}
+
+/*
+> RL.rlUnloadRenderBatch( rlRenderBatch renderBatch )
+
+Unload render batch system
+*/
+int lrlglUnloadRenderBatch( lua_State *L ) {
+	rlRenderBatch *renderBatch = uluaGetRLRenderBatch( L, 1 );
+	
+	rlUnloadRenderBatch( *renderBatch );
+
+	return 0;
+}
+
+/*
+> RL.rlDrawRenderBatch( rlRenderBatch renderBatch )
+
+Draw render batch data (Update->Draw->Reset)
+*/
+int lrlglDrawRenderBatch( lua_State *L ) {
+	rlRenderBatch *renderBatch = uluaGetRLRenderBatch( L, 1 );
+
+	rlDrawRenderBatch( renderBatch );
+
+	return 0;
+}
+
+/*
+> RL.rlSetRenderBatchActive( rlRenderBatch renderBatch )
+
+Set the active render batch for rlgl (nil for default internal)
+*/
+int lrlglSetRenderBatchActive( lua_State *L ) {
+	rlRenderBatch *renderBatch = NULL;
+
+	if ( !lua_isnil( L, 1 ) ) {
+		renderBatch = uluaGetRLRenderBatch( L, 1 );
+	}
+	rlSetRenderBatchActive( renderBatch );
+
+	return 0;
+}
+
 /*
 > RL.rlDrawRenderBatchActive()