textures and core new argument style.

3 files changed, 631 insertions, 591 deletions

diff --git a/src/core.c b/src/core.c
index 02eff94..bcc00ee 100644
--- a/src/core.c
+++ b/src/core.c
@@ -170,13 +170,14 @@ Set monitor for the current window (fullscreen mode)
 - Success return true
 */
 int lcoreSetWindowMonitor( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetWindowMonitor( int monitor )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	SetWindowMonitor( lua_tointeger( L, -1 ) );
+	SetWindowMonitor( lua_tointeger( L, 1 ) );
 	lua_pushboolean( L, true );
+
 	return 1;
 }
 
@@ -189,15 +190,16 @@ Set window position on screen
 - Success return true
 */
 int lcoreSetWindowPosition( lua_State *L ) {
-	if ( !lua_istable( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetWindowPosition( Vector2 pos )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Vector2 pos = uluaGetVector2( L );
+	Vector2 pos = uluaGetVector2Index( L, 1 );
 
 	SetWindowPosition( pos.x, pos.y );
 	lua_pushboolean( L, true );
+
 	return 1;
 }
 
@@ -210,15 +212,16 @@ Set window dimensions
 - Success return true
 */
 int lcoreSetWindowSize( lua_State *L ) {
-	if ( !lua_istable( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetWindowSize( Vector2 size )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Vector2 size = uluaGetVector2( L );
+	Vector2 size = uluaGetVector2Index( L, 1 );
 
 	SetWindowSize( (int)size.x, (int)size.y );
 	lua_pushboolean( L, true );
+
 	return 1;
 }
 
@@ -231,20 +234,21 @@ Set window minimum dimensions ( for FLAG_WINDOW_RESIZABLE )
 - Success return true
 */
 int lcoreSetWindowMinSize( lua_State *L ) {
-	if ( !lua_istable( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetWindowMinSize( Vector2 size )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Vector2 size = uluaGetVector2( L );
+	Vector2 size = uluaGetVector2Index( L, 1 );
 
 	SetWindowMinSize( (int)size.x, (int)size.y );
 	lua_pushboolean( L, true );
+
 	return 1;
 }
 
 /*
-> position = RL.GetMonitorPosition( int monitor )
+> position = RL.GetMonitorPosition(  )
 
 Get specified monitor position
 
@@ -252,13 +256,14 @@ Get specified monitor position
 - Success return Vector2
 */
 int lcoreGetMonitorPosition( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetMonitorPosition( int monitor )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	Vector2 pos = GetMonitorPosition( lua_tointeger( L, -1 ) );
-	uluaPushVector2( L, pos );
+	int monitor = lua_tointeger( L, 1 );
+
+	uluaPushVector2( L, GetMonitorPosition( monitor ) );
 
 	return 1;
 }
@@ -272,12 +277,14 @@ Get specified monitor size
 - Success return Vector2
 */
 int lcoreGetMonitorSize( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetMonitorSize( int monitor )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	Vector2 size = (Vector2){ GetMonitorWidth( lua_tointeger( L, -1 ) ), GetMonitorHeight( lua_tointeger( L, -1 ) ) };
+	int monitor = lua_tointeger( L, 1 );
+
+	Vector2 size = (Vector2){ GetMonitorWidth( monitor ), GetMonitorHeight( monitor ) };
 	uluaPushVector2( L, size );
 
 	return 1;
@@ -320,13 +327,16 @@ Set window configuration state using flags ( FLAG_FULLSCREEN_MODE, FLAG_WINDOW_R
 - Success return true
 */
 int lcoreSetWindowState( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetWindowState( int flags )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	SetWindowState( (unsigned int)lua_tointeger( L, -1 ) );
+	unsigned int flag = (unsigned int)lua_tointeger( L, 1 );
+
+	SetWindowState( flag );
 	lua_pushboolean( L, true );
+
 	return 1;
 }
 
@@ -339,12 +349,14 @@ Check if one specific window flag is enabled ( FLAG_FULLSCREEN_MODE, FLAG_WINDOW
 - Success return bool
 */
 int lcoreIsWindowState( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.IsWindowState( int flags )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	lua_pushboolean( L, IsWindowState( (unsigned int)lua_tointeger( L, -1 ) ) );
+	unsigned int flag = (unsigned int)lua_tointeger( L, 1 );
+
+	lua_pushboolean( L, IsWindowState( flag ) );
 
 	return 1;
 }
@@ -357,12 +369,14 @@ Clear window configuration state flags ( FLAG_FULLSCREEN_MODE, FLAG_WINDOW_RESIZ
 - Success return bool
 */
 int lcoreClearWindowState( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ClearWindowState( int flag )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	ClearWindowState( (unsigned int)lua_tointeger( L, -1 ) );
+	unsigned int flag = (unsigned int)lua_tointeger( L, 1 );
+
+	ClearWindowState( flag );
 
 	return 1;
 }
@@ -389,12 +403,12 @@ Set icon for window ( Only PLATFORM_DESKTOP )
 - Success return true
 */
 int lcoreSetWindowIcon( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetWindowIcon( Image image )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -403,6 +417,7 @@ int lcoreSetWindowIcon( lua_State *L ) {
 
 	SetWindowIcon( *state->images[ imageId ] );
 	lua_pushboolean( L, true );
+
 	return 1;
 }
 
@@ -415,13 +430,14 @@ Set title for window ( Only PLATFORM_DESKTOP )
 - Success return true
 */
 int lcoreSetWindowTitle( lua_State *L ) {
-	if ( !lua_isstring( L, -1 ) ) {
+	if ( !lua_isstring( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetWindowTitle( string title )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	SetWindowTitle( lua_tostring( L, -1 ) );
+	SetWindowTitle( lua_tostring( L, 1 ) );
 	lua_pushboolean( L, true );
+
 	return 1;
 }
 
@@ -458,12 +474,13 @@ Get specified monitor physical size in millimetres
 - Success return Vector2
 */
 int lcoreGetMonitorPhysicalSize( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetMonitorPhysicalSize( int monitor )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	int monitor = lua_tointeger( L, -1 );
+	int monitor = lua_tointeger( L, 1 );
+
 	Vector2 size = { GetMonitorPhysicalWidth( monitor ), GetMonitorPhysicalHeight( monitor ) };
 	uluaPushVector2( L, size );
 
@@ -479,12 +496,14 @@ Get specified monitor refresh rate
 - Success return int
 */
 int lcoreGetMonitorRefreshRate( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetMonitorRefreshRate( int monitor )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	lua_pushinteger( L, GetMonitorRefreshRate( lua_tointeger( L, -1 ) ) );
+	int monitor = lua_tointeger( L, 1 );
+	
+	lua_pushinteger( L, GetMonitorRefreshRate( monitor ) );
 
 	return 1;
 }
@@ -511,12 +530,14 @@ Get the human-readable, UTF-8 encoded name of the monitor
 - Success return string
 */
 int lcoreGetMonitorName( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetMonitorName( int monitor )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	lua_pushstring( L, GetMonitorName( lua_tointeger( L, -1 ) ) );
+	int monitor = lua_tointeger( L, 1 );
+
+	lua_pushstring( L, GetMonitorName( monitor ) );
 
 	return 1;
 }
@@ -541,13 +562,14 @@ Set clipboard text content
 - Success return true
 */
 int lcoreSetClipboardText( lua_State *L ) {
-	if ( !lua_isstring( L, -1 ) ) {
+	if ( !lua_isstring( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetClipboardText( string text )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	SetClipboardText( lua_tostring( L, -1 ) );
+	SetClipboardText( lua_tostring( L, 1 ) );
 	lua_pushboolean( L, true );
+
 	return 1;
 }
 
@@ -576,14 +598,16 @@ Set target FPS ( maximum )
 - Success return true
 */
 int lcoreSetTargetFPS( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetTargetFPS( int fps )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
+	int fps = lua_tointeger( L, 1 );
 
-	SetTargetFPS( lua_tointeger( L, -1 ) );
+	SetTargetFPS( fps );
 	lua_pushboolean( L, true );
+
 	return 1;
 }
 
@@ -639,12 +663,12 @@ Takes a screenshot of current screen ( filename extension defines format )
 - Success return true
 */
 int lcoreTakeScreenshot( lua_State *L ) {
-	if ( !lua_isstring( L, -1 ) ) {
+	if ( !lua_isstring( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.TakeScreenshot( string fileName )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	TakeScreenshot( lua_tostring( L, -1 ) );
+	TakeScreenshot( lua_tostring( L, 1 ) );
 	lua_pushboolean( L, true );
 
 	return 1;
@@ -659,12 +683,14 @@ Setup init configuration flags ( view FLAGS )
 - Success return true
 */
 int lcoreSetConfigFlags( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetConfigFlags( int flags )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	SetConfigFlags( (unsigned int)lua_tointeger( L, -1 ) );
+	unsigned int flag = (unsigned int)lua_tointeger( L, 1 );
+
+	SetConfigFlags( flag );
 	lua_pushboolean( L, true );
 
 	return 1;
@@ -679,12 +705,14 @@ Show trace log messages ( LOG_DEBUG, LOG_INFO, LOG_WARNING, LOG_ERROR... )
 - Success return true
 */
 int lcoreTraceLog( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isstring( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isstring( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.TraceLog( int logLevel, string text )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	TraceLog( lua_tointeger( L, -2 ), "%s", lua_tostring( L, -1 ) );
+	int logLevel = lua_tointeger( L, 1 );
+
+	TraceLog( logLevel, "%s", lua_tostring( L, 2 ) );
 	lua_pushboolean( L, true );
 
 	return 1;
@@ -699,12 +727,14 @@ Set the current threshold ( minimum ) log level
 - Success return true
 */
 int lcoreSetTraceLogLevel( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetTraceLogLevel( int logLevel )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	SetTraceLogLevel( lua_tointeger( L, -1 ) );
+	int logLevel = lua_tointeger( L, 1 );
+
+	SetTraceLogLevel( logLevel );
 	lua_pushboolean( L, true );
 
 	return 1;
@@ -719,12 +749,12 @@ Open URL with default system browser ( If available )
 - Success return true
 */
 int lcoreOpenURL( lua_State *L ) {
-	if ( !lua_isstring( L, -1 ) ) {
+	if ( !lua_isstring( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.OpenURL( string url )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	OpenURL( lua_tostring( L, -1 ) );
+	OpenURL( lua_tostring( L, 1 ) );
 	lua_pushboolean( L, true );
 
 	return 1;
@@ -817,12 +847,13 @@ Set background color ( framebuffer clear color )
 - Success return true
 */
 int lcoreClearBackground( lua_State *L ) {
-	if ( !lua_istable( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ClearBackground( Color color )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Color color = uluaGetColor( L );
+	Color color = uluaGetColorIndex( L, 1 );
+
 	ClearBackground( color );
 	lua_pushboolean( L, true );
 
@@ -860,12 +891,14 @@ Begin blending mode ( BLEND_ALPHA, BLEND_ADDITIVE, BLEND_MULTIPLIED... )
 - Success return true
 */
 int lcoreBeginBlendMode( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.BeginBlendMode( int mode )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	BeginBlendMode( lua_tointeger( L, -1 ) );
+	int mode = lua_tointeger( L, 1 );
+
+	BeginBlendMode( mode );
 	lua_pushboolean( L, true );
 
 	return 1;
@@ -891,12 +924,12 @@ Begin scissor mode ( define screen area for following drawing )
 - Success return true
 */
 int lcoreBeginScissorMode( lua_State *L ) {
-	if ( !lua_istable( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.BeginScissorMode( Rectangle rectange )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Rectangle rect = uluaGetRectangle( L );
+	Rectangle rect = uluaGetRectangleIndex( L, 1 );
 
 	BeginScissorMode( rect.x, rect.y, rect.width, rect.height );
 	lua_pushboolean( L, true );
@@ -929,7 +962,7 @@ NOTE: Set nil if no shader
 - Success return int
 */
 int lcoreLoadShader( lua_State *L ) {
-	if ( !( lua_isstring( L, -2 ) || lua_isnil( L, -2 ) ) || !( lua_isstring( L, -1 ) || lua_isnil( L, -1 ) ) ) {
+	if ( !( lua_isstring( L, 1 ) || lua_isnil( L, 1 ) ) || !( lua_isstring( L, 2 ) || lua_isnil( L, 2 ) ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.LoadShader( string vsFileName, string fsFileName )" );
 		lua_pushinteger( L, -1 );
 		return 1;
@@ -938,16 +971,16 @@ int lcoreLoadShader( lua_State *L ) {
 	char *vsFileName = NULL;
 	char *fsFileName = NULL;
 
-	if ( lua_isstring( L, -2 ) ) {
-		if ( FileExists( lua_tostring( L, -2 ) ) ) {
+	if ( lua_isstring( L, 1 ) ) {
+		if ( FileExists( lua_tostring( L, 1 ) ) ) {
 			vsFileName = malloc( STRING_LEN * sizeof( char ) );
-			strcpy( vsFileName, lua_tostring( L, -2 ) );
+			strcpy( vsFileName, lua_tostring( L, 1 ) );
 		}
 	}
-	if ( lua_isstring( L, -1 ) ) {
-		if ( FileExists( lua_tostring( L, -1 ) ) ) {
+	if ( lua_isstring( L, 2 ) ) {
+		if ( FileExists( lua_tostring( L, 2 ) ) ) {
 			fsFileName = malloc( STRING_LEN * sizeof( char ) );
-			strcpy( fsFileName, lua_tostring( L, -1 ) );
+			strcpy( fsFileName, lua_tostring( L, 2 ) );
 		}
 	}
 
@@ -984,7 +1017,7 @@ NOTE: Set nil if no shader
 */
 
 int lcoreLoadShaderFromMemory( lua_State *L ) {
-	if ( !( lua_isstring( L, -2 ) || lua_isnil( L, -2 ) ) || !( lua_isstring( L, -1 ) || lua_isnil( L, -1 ) ) ) {
+	if ( !( lua_isstring( L, 1 ) || lua_isnil( L, 1 ) ) || !( lua_isstring( L, 2 ) || lua_isnil( L, 2 ) ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.LoadShaderFromMemory( string vsCode, string fsCode )" );
 		lua_pushinteger( L, -1 );
 		return 1;
@@ -993,17 +1026,17 @@ int lcoreLoadShaderFromMemory( lua_State *L ) {
 	char *vs = NULL;
 	char *fs = NULL;
 
-	if ( lua_isstring( L, -2 ) ) {
-		size_t vsLen = lua_rawlen( L, -2 );
+	if ( lua_isstring( L, 1 ) ) {
+		size_t vsLen = lua_rawlen( L, 1 );
 
 		vs = malloc( vsLen * sizeof( char ) );
-		strcpy( vs, lua_tostring( L, -2 ) );
+		strcpy( vs, lua_tostring( L, 1 ) );
 	}
-	if ( lua_isstring( L, -1 ) ) {
-		size_t fsLen = lua_rawlen( L, -1 );
+	if ( lua_isstring( L, 2 ) ) {
+		size_t fsLen = lua_rawlen( L, 2 );
 
 		fs = malloc( fsLen * sizeof( char ) );
-		strcpy( fs, lua_tostring( L, -1 ) );
+		strcpy( fs, lua_tostring( L, 2 ) );
 	}
 
 	int i = 0;
@@ -1037,12 +1070,12 @@ Begin custom shader drawing
 - Success return true
 */
 int lcoreBeginShaderMode( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.BeginShaderMode( Shader shader )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t shaderId = lua_tointeger( L, -1 );
+	size_t shaderId = lua_tointeger( L, 1 );
 	
 	if ( !validShader( shaderId ) ) {
 		lua_pushboolean( L, false );
@@ -1074,18 +1107,18 @@ Get shader uniform location
 - Success return int
 */
 int lcoreGetShaderLocation( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isstring( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isstring( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetShaderLocation( Shader shader, string uniformName )" );
 		lua_pushinteger( L, -1 );
 		return 1;
 	}
-	size_t shaderId = lua_tointeger( L, -2 );
+	size_t shaderId = lua_tointeger( L, 1 );
 
 	if ( !validShader( shaderId ) ) {
 		lua_pushinteger( L, -1 );
 		return 1;
 	}
-	lua_pushinteger( L, GetShaderLocation( *state->shaders[ shaderId ], lua_tostring( L, -1 ) ) );
+	lua_pushinteger( L, GetShaderLocation( *state->shaders[ shaderId ], lua_tostring( L, 2 ) ) );
 
 	return 1;
 }
@@ -1099,18 +1132,18 @@ Get shader attribute location
 - Success return int
 */
 int lcoreGetShaderLocationAttrib( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isstring( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isstring( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetShaderLocationAttrib( Shader shader, string attribName )" );
 		lua_pushinteger( L, -1 );
 		return 1;
 	}
-	size_t shaderId = lua_tointeger( L, -2 );
+	size_t shaderId = lua_tointeger( L, 1 );
 
 	if ( !validShader( shaderId ) ) {
 		lua_pushinteger( L, -1 );
 		return 1;
 	}
-	lua_pushinteger( L, GetShaderLocationAttrib( *state->shaders[ shaderId ], lua_tostring( L, -1 ) ) );
+	lua_pushinteger( L, GetShaderLocationAttrib( *state->shaders[ shaderId ], lua_tostring( L, 2 ) ) );
 
 	return 1;
 }
@@ -1124,16 +1157,14 @@ Set shader location index
 - Success return true
 */
 int lcoreSetShaderLocationIndex( lua_State *L ) {
-	if ( !lua_isnumber( L, -3 ) || !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) || !lua_isnumber( L, 3 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetShaderLocationIndex( Shader shader, int shaderLocationIndex, int location )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	int location = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	int shaderLocationIndex = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	size_t shaderId = lua_tointeger( L, -1 );
+	size_t shaderId = lua_tointeger( L, 1 );
+	int shaderLocationIndex = lua_tointeger( L, 2 );
+	int location = lua_tointeger( L, 3 );
 
 	if ( !validShader( shaderId ) ) {
 		lua_pushboolean( L, false );
@@ -1154,14 +1185,13 @@ Get shader location index
 - Success return int
 */
 int lcoreGetShaderLocationIndex( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetShaderLocationIndex( Shader shader, int shaderLocationIndex )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	int shaderLocationIndex = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	size_t shaderId = lua_tointeger( L, -1 );
+	size_t shaderId = lua_tointeger( L, 1 );
+	int shaderLocationIndex = lua_tointeger( L, 2 );
 
 	if ( !validShader( shaderId ) ) {
 		lua_pushboolean( L, false );
@@ -1181,16 +1211,14 @@ Set shader uniform value ( matrix 4x4 )
 - Success return true
 */
 int lcoreSetShaderValueMatrix( lua_State *L ) {
-	if ( !lua_isnumber( L, -3 ) || !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) || !lua_istable( L, 3 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetShaderValueMatrix( Shader shader, int locIndex, Matrix mat )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Matrix mat = uluaGetMatrix( L );
-	lua_pop( L, 1 );
-	int locIndex = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	size_t shaderId = lua_tointeger( L, -1 );
+	size_t shaderId = lua_tointeger( L, 1 );
+	int locIndex = lua_tointeger( L, 2 );
+	Matrix mat = uluaGetMatrixIndex( L, 3 );
 
 	if ( !validShader( shaderId ) ) {
 		lua_pushboolean( L, false );
@@ -1211,14 +1239,14 @@ Set shader uniform value for texture ( sampler2d )
 - Success return true
 */
 int lcoreSetShaderValueTexture( lua_State *L ) {
-	if ( !lua_isnumber( L, -3 ) || !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) || !lua_isnumber( L, 3 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetShaderValueTexture( Shader shader, int locIndex, Texture2D texture )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t textureId = lua_tointeger( L, -1 );
-	int locIndex = lua_tointeger( L, -2 );
-	size_t shaderId = lua_tointeger( L, -3 );
+	size_t shaderId = lua_tointeger( L, 1 );
+	int locIndex = lua_tointeger( L, 2 );
+	size_t textureId = lua_tointeger( L, 3 );
 
 	if ( !validShader( shaderId ) || !validTexture( textureId ) ) {
 		lua_pushboolean( L, false );
@@ -1240,20 +1268,22 @@ NOTE: Even one value should be in table
 - Success return true
 */
 int lcoreSetShaderValue( lua_State *L ) {
-	if ( !lua_isnumber( L, -4 ) || !lua_isnumber( L, -3 ) || !lua_istable( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) || !lua_istable( L, 3 ) || !lua_isnumber( L, 4 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetShaderValue( Shader shader, int locIndex, number{} values, int uniformType )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	int uniformType = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	
+	size_t shaderId = lua_tointeger( L, 1 );
+	int locIndex = lua_tointeger( L, 2 );
+	size_t valueCount = uluaGetTableLenIndex( L, 3 );
+	int uniformType = lua_tointeger( L, 4 );
+
 	/* Read values. */
-	size_t valueCount = uluaGetTableLen( L );
 	float floats[ valueCount ];
 	int ints[ valueCount ];
 
-	int t = lua_gettop( L ), i = 0;
+	/* t = values index. */
+	int t = 3, i = 0;
     lua_pushnil( L );
 
 	while ( lua_next( L, t ) != 0 ) {
@@ -1267,10 +1297,6 @@ int lcoreSetShaderValue( lua_State *L ) {
 	lua_pop( L, 1 );
 	/* Read values end. */
 
-	int locIndex = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	size_t shaderId = lua_tointeger( L, -1 );
-
 	if ( !validShader( shaderId ) ) {
 		lua_pushboolean( L, false );
 		return 1;
@@ -1299,22 +1325,24 @@ NOTE: Even one value should be in table
 - Success return true
 */
 int lcoreSetShaderValueV( lua_State *L ) {
-	if ( !lua_isnumber( L, -5 ) || !lua_isnumber( L, -4 ) || !lua_istable( L, -3 ) || !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) || !lua_istable( L, 3 )
+	|| !lua_isnumber( L, 4 ) || !lua_isnumber( L, 5 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetShaderValueV( Shader shader, int locIndex, number{} values, int uniformType, int count )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	int count = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	int uniformType = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
+	size_t shaderId = lua_tointeger( L, 1 );
+	int locIndex = lua_tointeger( L, 2 );
+	size_t valueCount = uluaGetTableLenIndex( L, 3 );
+	int uniformType = lua_tointeger( L, 4 );
+	int count = lua_tointeger( L, 5 );
 
 	/* Read values. */
-	size_t valueCount = uluaGetTableLen( L );
 	float floats[ valueCount * count ];
 	int ints[ valueCount * count ];
 
-	int t = lua_gettop( L ), i = 0;
+	/* t = values index. */
+	int t = 3, i = 0;
     lua_pushnil( L );
 
 	while ( lua_next( L, t ) != 0 ) {
@@ -1328,10 +1356,6 @@ int lcoreSetShaderValueV( lua_State *L ) {
 	lua_pop( L, 1 );
 	/* Read values end. */
 
-	int locIndex = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	size_t shaderId = lua_tointeger( L, -1 );
-
 	if ( !validShader( shaderId ) ) {
 		lua_pushboolean( L, false );
 		return 1;
@@ -1358,12 +1382,12 @@ Unload shader from GPU memory ( VRAM )
 - Success return true
 */
 int lcoreUnloadShader( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.UnloadShader( Shader shader )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t id = lua_tointeger( L, -1 );
+	size_t id = lua_tointeger( L, 1 );
 
 	if ( !validShader( id ) ) {
 		lua_pushboolean( L, false );
@@ -1389,12 +1413,15 @@ Detect if a key has been pressed once
 - Success return bool
 */
 int lcoreIsKeyPressed( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.IsKeyPressed( int key )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	lua_pushboolean( L, IsKeyPressed( lua_tointeger( L, -1 ) ) );
+	int key = lua_tointeger( L, 1 );
+
+	lua_pushboolean( L, IsKeyPressed( key ) );
+
 	return 1;
 }
 
@@ -1407,12 +1434,15 @@ Detect if a key is being pressed
 - Success return bool
 */
 int lcoreIsKeyDown( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.IsKeyDown( int key )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	lua_pushboolean( L, IsKeyDown( lua_tointeger( L, -1 ) ) );
+	int key = lua_tointeger( L, 1 );
+
+	lua_pushboolean( L, IsKeyDown( key ) );
+
 	return 1;
 }
 
@@ -1425,12 +1455,15 @@ Detect if a key has been released once
 - Success return bool
 */
 int lcoreIsKeyReleased( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.IsKeyReleased( int key )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	lua_pushboolean( L, IsKeyReleased( lua_tointeger( L, -1 ) ) );
+	int key = lua_tointeger( L, 1 );
+
+	lua_pushboolean( L, IsKeyReleased( key ) );
+
 	return 1;
 }
 
@@ -1443,12 +1476,15 @@ Check if a key is NOT being pressed
 - Success return bool
 */
 int lcoreIsKeyUp( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.IsKeyUp( int key )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	lua_pushboolean( L, IsKeyUp( lua_tointeger( L, -1 ) ) );
+	int key = lua_tointeger( L, 1 );
+
+	lua_pushboolean( L, IsKeyUp( key ) );
+
 	return 1;
 }
 
@@ -1484,12 +1520,14 @@ int lcoreGetCharPressed( lua_State *L ) {
 Set a custom key to exit program ( default is ESC )
 */
 int lcoreSetExitKey( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetExitKey( int key )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	SetExitKey( lua_tointeger( L, -1 ) );
+	int key = lua_tointeger( L, 1 );
+
+	SetExitKey( key );
 
 	return 1;
 }
@@ -1514,14 +1552,13 @@ this function returns nil but does not emit an error.
 - Success return string or nil
 */
 int lcoreGetKeyName( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetKeyName( int key, int scancode )" );
 		lua_pushinteger( L, -1 );
 		return 1;
 	}
-	int scancode = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	int key = lua_tointeger( L, -1 );
+	int key = lua_tointeger( L, 1 );
+	int scancode = lua_tointeger( L, 2 );
 
 	const char *keyName = glfwGetKeyName( key, scancode );
 
@@ -1545,13 +1582,14 @@ If the key is KEY_UNKNOWN or does not exist on the keyboard this method will ret
 - Success return int
 */
 int lcoreGetKeyScancode( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetKeyScancode( int key )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	int scancode = glfwGetKeyScancode( lua_tointeger( L, -1 ) );
+	int key = lua_tointeger( L, 1 );
 
+	int scancode = glfwGetKeyScancode( key );
 	lua_pushinteger( L, scancode );
 
 	return 1;
@@ -1570,12 +1608,15 @@ Detect if a gamepad is available
 - Success return bool
 */
 int lcoreIsGamepadAvailable( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.IsGamepadAvailable( int gamepad )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	lua_pushboolean( L, IsGamepadAvailable( lua_tointeger( L, -1 ) ) );
+	int gamepad = lua_tointeger( L, 1 );
+
+	lua_pushboolean( L, IsGamepadAvailable( gamepad ) );
+
 	return 1;
 }
 
@@ -1588,12 +1629,16 @@ Detect if a gamepad button has been pressed once
 - Success return bool
 */
 int lcoreIsGamepadButtonPressed( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.IsGamepadButtonPressed( int gamepad, int button )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	lua_pushboolean( L, IsGamepadButtonPressed( lua_tointeger( L, -2 ), lua_tointeger( L, -1 ) ) );
+	int gamepad = lua_tointeger( L, 1 );
+	int button = lua_tointeger( L, 2 );
+
+	lua_pushboolean( L, IsGamepadButtonPressed( gamepad, button ) );
+
 	return 1;
 }
 
@@ -1606,12 +1651,16 @@ Detect if a gamepad button is being pressed
 - Success return bool
 */
 int lcoreIsGamepadButtonDown( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.IsGamepadButtonDown( int gamepad, int button )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	lua_pushboolean( L, IsGamepadButtonDown( lua_tointeger( L, -2 ), lua_tointeger( L, -1 ) ) );
+	int gamepad = lua_tointeger( L, 1 );
+	int button = lua_tointeger( L, 2 );
+
+	lua_pushboolean( L, IsGamepadButtonDown( gamepad, button ) );
+
 	return 1;
 }
 
@@ -1624,12 +1673,16 @@ Detect if a gamepad button has been released once
 - Success return bool
 */
 int lcoreIsGamepadButtonReleased( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.IsGamepadButtonReleased( int gamepad, int button )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	lua_pushboolean( L, IsGamepadButtonReleased( lua_tointeger( L, -2 ), lua_tointeger( L, -1 ) ) );
+	int gamepad = lua_tointeger( L, 1 );
+	int button = lua_tointeger( L, 2 );
+
+	lua_pushboolean( L, IsGamepadButtonReleased( gamepad, button ) );
+
 	return 1;
 }
 
@@ -1642,12 +1695,15 @@ Return gamepad axis count for a gamepad
 - Success return int
 */
 int lcoreGetGamepadAxisCount( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetGamepadAxisCount( int gamepad )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	lua_pushinteger( L, GetGamepadAxisCount( lua_tointeger( L, -1 ) ) );
+	int gamepad = lua_tointeger( L, 1 );
+
+	lua_pushinteger( L, GetGamepadAxisCount( gamepad ) );
+
 	return 1;
 }
 
@@ -1660,12 +1716,16 @@ Return axis movement value for a gamepad axis
 - Success return float
 */
 int lcoreGetGamepadAxisMovement( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetGamepadAxisMovement( int gamepad, int axis )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	lua_pushnumber( L, GetGamepadAxisMovement( lua_tointeger( L, -2 ), lua_tointeger( L, -1 ) ) );
+	int gamepad = lua_tointeger( L, 1 );
+	int axis = lua_tointeger( L, 2 );
+
+	lua_pushnumber( L, GetGamepadAxisMovement( gamepad, axis ) );
+
 	return 1;
 }
 
@@ -1678,12 +1738,15 @@ Return gamepad internal name id
 - Success return string
 */
 int lcoreGetGamepadName( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetGamepadName( int gamepad )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	lua_pushstring( L, GetGamepadName( lua_tointeger( L, -1 ) ) );
+	int gamepad = lua_tointeger( L, 1 );
+
+	lua_pushstring( L, GetGamepadName( gamepad ) );
+
 	return 1;
 }
 
@@ -1700,12 +1763,15 @@ Detect if a mouse button has been pressed once
 - Success return bool
 */
 int lcoreIsMouseButtonPressed( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.IsMouseButtonPressed( int button )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	lua_pushboolean( L, IsMouseButtonPressed( lua_tointeger( L, -1 ) ) );
+	int button = lua_tointeger( L, 1 );
+
+	lua_pushboolean( L, IsMouseButtonPressed( button ) );
+
 	return 1;
 }
 
@@ -1718,12 +1784,15 @@ Detect if a mouse button is being pressed
 - Success return bool
 */
 int lcoreIsMouseButtonDown( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.IsMouseButtonDown( int button )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	lua_pushboolean( L, IsMouseButtonDown( lua_tointeger( L, -1 ) ) );
+	int button = lua_tointeger( L, 1 );
+
+	lua_pushboolean( L, IsMouseButtonDown( button ) );
+
 	return 1;
 }
 
@@ -1736,12 +1805,15 @@ Detect if a mouse button has been released once
 - Success return bool
 */
 int lcoreIsMouseButtonReleased( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.IsMouseButtonReleased( int button )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	lua_pushboolean( L, IsMouseButtonReleased( lua_tointeger( L, -1 ) ) );
+	int button = lua_tointeger( L, 1 );
+
+	lua_pushboolean( L, IsMouseButtonReleased( button ) );
+
 	return 1;
 }
 
@@ -1754,12 +1826,15 @@ Check if a mouse button is NOT being pressed
 - Success return bool
 */
 int lcoreIsMouseButtonUp( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.IsMouseButtonUp( int button )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	lua_pushboolean( L, IsMouseButtonUp( lua_tointeger( L, -1 ) ) );
+	int button = lua_tointeger( L, 1 );
+
+	lua_pushboolean( L, IsMouseButtonUp( button ) );
+
 	return 1;
 }
 
@@ -1796,12 +1871,12 @@ Set mouse position XY
 - Success return true
 */
 int lcoreSetMousePosition( lua_State *L ) {
-	if ( !lua_istable( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetMousePosition( Vector2 position )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Vector2 pos = uluaGetVector2( L );
+	Vector2 pos = uluaGetVector2Index( L, 1 );
 
 	SetMousePosition( pos.x, pos.y );
 	lua_pushboolean( L, true );
@@ -1818,12 +1893,12 @@ Set mouse offset
 - Success return true
 */
 int lcoreSetMouseOffset( lua_State *L ) {
-	if ( !lua_istable( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetMouseOffset( Vector2 offset )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Vector2 offset = uluaGetVector2( L );
+	Vector2 offset = uluaGetVector2Index( L, 1 );
 
 	SetMouseOffset( offset.x, offset.y );
 	lua_pushboolean( L, true );
@@ -1840,12 +1915,12 @@ Set mouse scaling
 - Success return true
 */
 int lcoreSetMouseScale( lua_State *L ) {
-	if ( !lua_istable( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetMouseScale( Vector2 scale )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Vector2 scale = uluaGetVector2( L );
+	Vector2 scale = uluaGetVector2Index( L, 1 );
 
 	SetMouseScale( scale.x, scale.y );
 	lua_pushboolean( L, true );
@@ -1874,12 +1949,14 @@ Set mouse cursor
 - Success return true
 */
 int lcoreSetMouseCursor( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetMouseCursor( int cursor )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	SetMouseCursor( lua_tointeger( L, -1 ) );
+	int cursor = lua_tointeger( L, 1 );
+
+	SetMouseCursor( cursor );
 	lua_pushboolean( L, true );
 
 	return 1;
@@ -1898,12 +1975,14 @@ Get touch position XY for a touch point index ( relative to screen size )
 - Success return Vector2
 */
 int lcoreGetTouchPosition( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetTouchPosition( int index )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	uluaPushVector2( L, GetTouchPosition( lua_tointeger( L, -1 ) ) );
+	int index = lua_tointeger( L, 1 );
+
+	uluaPushVector2( L, GetTouchPosition( index ) );
 
 	return 1;
 }
@@ -1917,12 +1996,14 @@ Get touch point identifier for given index
 - Success return int
 */
 int lcoreGetTouchPointId( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetTouchPointId( int index )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	lua_pushinteger( L, GetTouchPointId( lua_tointeger( L, -1 ) ) );
+	int index = lua_tointeger( L, 1 );
+
+	lua_pushinteger( L, GetTouchPointId( index ) );
 
 	return 1;
 }
@@ -1953,12 +2034,14 @@ Enable a set of gestures using flags
 - Success return true
 */
 int lcoreSetGesturesEnabled( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetGesturesEnabled( unsigned int flags )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	SetGesturesEnabled( (unsigned int)lua_tointeger( L, -1 ) );
+	unsigned int flags = (unsigned int)lua_tointeger( L, 1 );
+
+	SetGesturesEnabled( flags );
 	lua_pushboolean( L, true );
 
 	return 1;
@@ -1973,12 +2056,14 @@ Check if a gesture have been detected
 - Success return bool
 */
 int lcoreIsGestureDetected( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.IsGestureDetected( int gesture )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	lua_pushboolean( L, IsGestureDetected( lua_tointeger( L, -1 ) ) );
+	int gesture = lua_tointeger( L, 1 );
+
+	lua_pushboolean( L, IsGestureDetected( gesture ) );
 
 	return 1;
 }
@@ -2087,12 +2172,13 @@ Check if file exists
 - Success return bool
 */
 int lcoreFileExists( lua_State *L ) {
-	if ( !lua_isstring( L, -1 ) ) {
+	if ( !lua_isstring( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.FileExists( string fileName )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	lua_pushboolean( L, FileExists( lua_tostring( L, -1 ) ) );
+	lua_pushboolean( L, FileExists( lua_tostring( L, 1 ) ) );
+
 	return 1;
 }
 
@@ -2105,12 +2191,13 @@ Check if a directory path exists
 - Success return bool
 */
 int lcoreDirectoryExists( lua_State *L ) {
-	if ( !lua_isstring( L, -1 ) ) {
+	if ( !lua_isstring( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.DirectoryExists( string dirPath )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	lua_pushboolean( L, DirectoryExists( lua_tostring( L, -1 ) ) );
+	lua_pushboolean( L, DirectoryExists( lua_tostring( L, 1 ) ) );
+
 	return 1;
 }
 
@@ -2123,12 +2210,13 @@ Check file extension ( Including point: .png, .wav )
 - Success return bool
 */
 int lcoreIsFileExtension( lua_State *L ) {
-	if ( !lua_isstring( L, -2 ) || !lua_isstring( L, -1 ) ) {
+	if ( !lua_isstring( L, 1 ) || !lua_isstring( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.IsFileExtension( string fileName, string ext )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	lua_pushboolean( L, IsFileExtension( lua_tostring( L, -2 ), lua_tostring( L, -1 ) ) );
+	lua_pushboolean( L, IsFileExtension( lua_tostring( L, 1 ), lua_tostring( L, 2 ) ) );
+
 	return 1;
 }
 
@@ -2141,12 +2229,13 @@ Get file length in bytes ( NOTE: GetFileSize() conflicts with windows.h )
 - Success return int
 */
 int lcoreGetFileLength( lua_State *L ) {
-	if ( !lua_isstring( L, -1 ) ) {
+	if ( !lua_isstring( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetFileLength( string fileName )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	lua_pushinteger( L, GetFileLength( lua_tostring( L, -1 ) ) );
+	lua_pushinteger( L, GetFileLength( lua_tostring( L, 1 ) ) );
+
 	return 1;
 }
 
@@ -2159,12 +2248,13 @@ Get pointer to extension for a filename string ( Includes dot: '.png' )
 - Success return string
 */
 int lcoreGetFileExtension( lua_State *L ) {
-	if ( !lua_isstring( L, -1 ) ) {
+	if ( !lua_isstring( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetFileExtension( string fileName )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	lua_pushstring( L, GetFileExtension( lua_tostring( L, -1 ) ) );
+	lua_pushstring( L, GetFileExtension( lua_tostring( L, 1 ) ) );
+
 	return 1;
 }
 
@@ -2177,12 +2267,13 @@ Get pointer to filename for a path string
 - Success return string
 */
 int lcoreGetFileName( lua_State *L ) {
-	if ( !lua_isstring( L, -1 ) ) {
+	if ( !lua_isstring( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetFileName( string filePath )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	lua_pushstring( L, GetFileName( lua_tostring( L, -1 ) ) );
+	lua_pushstring( L, GetFileName( lua_tostring( L, 1 ) ) );
+
 	return 1;
 }
 
@@ -2195,12 +2286,13 @@ Get filename string without extension ( Uses static string )
 - Success return string
 */
 int lcoreGetFileNameWithoutExt( lua_State *L ) {
-	if ( !lua_isstring( L, -1 ) ) {
+	if ( !lua_isstring( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetFileNameWithoutExt( string filePath )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	lua_pushstring( L, GetFileNameWithoutExt( lua_tostring( L, -1 ) ) );
+	lua_pushstring( L, GetFileNameWithoutExt( lua_tostring( L, 1 ) ) );
+
 	return 1;
 }
 
@@ -2213,12 +2305,13 @@ Get full path for a given fileName with path ( Uses static string )
 - Success return string
 */
 int lcoreGetDirectoryPath( lua_State *L ) {
-	if ( !lua_isstring( L, -1 ) ) {
+	if ( !lua_isstring( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetDirectoryPath( string filePath )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	lua_pushstring( L, GetDirectoryPath( lua_tostring( L, -1 ) ) );
+	lua_pushstring( L, GetDirectoryPath( lua_tostring( L, 1 ) ) );
+
 	return 1;
 }
 
@@ -2231,12 +2324,13 @@ Get previous directory path for a given path ( Uses static string )
 - Success return string
 */
 int lcoreGetPrevDirectoryPath( lua_State *L ) {
-	if ( !lua_isstring( L, -1 ) ) {
+	if ( !lua_isstring( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetPrevDirectoryPath( string dirPath )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	lua_pushstring( L, GetPrevDirectoryPath( lua_tostring( L, -1 ) ) );
+	lua_pushstring( L, GetPrevDirectoryPath( lua_tostring( L, 1 ) ) );
+
 	return 1;
 }
 
@@ -2261,12 +2355,12 @@ Load directory filepaths
 - Success return string{}
 */
 int lcoreLoadDirectoryFiles( lua_State *L ) {
-	if ( !lua_isstring( L, -1 ) ) {
+	if ( !lua_isstring( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.LoadDirectoryFiles( string dirPath )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	FilePathList files = LoadDirectoryFiles( lua_tostring( L, -1 ) );
+	FilePathList files = LoadDirectoryFiles( lua_tostring( L, 1 ) );
 
 	lua_createtable( L, files.count, 0 );
 
@@ -2288,12 +2382,14 @@ Load directory filepaths with extension filtering and recursive directory scan
 - Success return string{}
 */
 int lcoreLoadDirectoryFilesEx( lua_State *L ) {
-	if ( !lua_isstring( L, -3 ) || !lua_isstring( L, -2 ) || !lua_isboolean( L, -1 ) ) {
+	if ( !lua_isstring( L, 1 ) || !lua_isstring( L, 2 ) || !lua_isboolean( L, 3 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.LoadDirectoryFilesEx( string dirPath )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	FilePathList files = LoadDirectoryFilesEx( lua_tostring( L, -3 ), lua_tostring( L, -2 ), lua_toboolean( L, -1 ) );
+	bool scanSubdirs = lua_toboolean( L, 3 );
+
+	FilePathList files = LoadDirectoryFilesEx( lua_tostring( L, 1 ), lua_tostring( L, 2 ), scanSubdirs );
 
 	lua_createtable( L, files.count, 0 );
 
@@ -2315,12 +2411,13 @@ Change working directory, return true on success
 - Success return true
 */
 int lcoreChangeDirectory( lua_State *L ) {
-	if ( !lua_isstring( L, -1 ) ) {
+	if ( !lua_isstring( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ChangeDirectory( string directory )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	lua_pushboolean( L, ChangeDirectory( lua_tostring( L, -1 ) ) );
+	lua_pushboolean( L, ChangeDirectory( lua_tostring( L, 1 ) ) );
+
 	return 1;
 }
 
@@ -2333,12 +2430,13 @@ Check if a given path is a file or a directory
 - Success return bool
 */
 int lcoreIsPathFile( lua_State *L ) {
-	if ( !lua_isstring( L, -1 ) ) {
+	if ( !lua_isstring( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.IsPathFile( string path )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	lua_pushboolean( L, IsPathFile( lua_tostring( L, -1 ) ) );
+	lua_pushboolean( L, IsPathFile( lua_tostring( L, 1 ) ) );
+
 	return 1;
 }
 
@@ -2384,12 +2482,13 @@ Get file modification time ( Last write time )
 - Success return int
 */
 int lcoreGetFileModTime( lua_State *L ) {
-	if ( !lua_isstring( L, -1 ) ) {
+	if ( !lua_isstring( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetFileModTime( string fileName )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	lua_pushinteger( L, GetFileModTime( lua_tostring( L, -1 ) ) );
+	lua_pushinteger( L, GetFileModTime( lua_tostring( L, 1 ) ) );
+
 	return 1;
 }
 
@@ -2433,20 +2532,20 @@ Unload Camera2D
 - Success return true
 */
 int lcoreUnloadCamera2D( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.UnloadCamera2D( int Camera2D )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t id = lua_tointeger( L, -1 );
+	size_t cameraId = lua_tointeger( L, 1 );
 
-	if ( !validCamera2D( id ) ) {
+	if ( !validCamera2D( cameraId ) ) {
 		lua_pushboolean( L, false );
 		return 1;
 	}
 
-	free( state->camera2Ds[ id ] );
-	state->camera2Ds[ id ] = NULL;
+	free( state->camera2Ds[ cameraId ] );
+	state->camera2Ds[ cameraId ] = NULL;
 	lua_pushboolean( L, true );
 
 	return 1;
@@ -2461,19 +2560,19 @@ Begin 2D mode with custom camera ( 2D )
 - Success return true
 */
 int lcoreBeginMode2D( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.BeginMode2D( camera2D camera )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t id = lua_tointeger( L, -1 );
+	size_t cameraId = lua_tointeger( L, 1 );
 
-	if ( !validCamera2D( id ) ) {
+	if ( !validCamera2D( cameraId ) ) {
 		lua_pushboolean( L, false );
 		return 1;
 	}
 
-	BeginMode2D( *state->camera2Ds[ id ] );
+	BeginMode2D( *state->camera2Ds[ cameraId ] );
 	lua_pushboolean( L, true );
 
 	return 1;
@@ -2499,13 +2598,13 @@ Set camera target ( rotation and zoom origin )
 - Success return true
 */
 int lcoreSetCamera2DTarget( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetCamera2DTarget( camera2D camera, Vector2 target )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Vector2 target = uluaGetVector2( L );
-	size_t cameraId = lua_tointeger( L, -2 );
+	size_t cameraId = lua_tointeger( L, 1 );
+	Vector2 target = uluaGetVector2Index( L, 2 );
 
 	if ( !validCamera2D( cameraId ) ) {
 		lua_pushboolean( L, false );
@@ -2527,13 +2626,13 @@ Set camera offset ( displacement from target )
 - Success return true
 */
 int lcoreSetCamera2DOffset( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetCamera2DOffset( camera2D camera, Vector2 offset )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Vector2 offset = uluaGetVector2( L );
-	size_t cameraId = lua_tointeger( L, -2 );
+	size_t cameraId = lua_tointeger( L, 1 );
+	Vector2 offset = uluaGetVector2Index( L, 2 );
 
 	if ( !validCamera2D( cameraId ) ) {
 		lua_pushboolean( L, false );
@@ -2555,19 +2654,20 @@ Set camera rotation in degrees
 - Success return true
 */
 int lcoreSetCamera2DRotation( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetCamera2DRotation( camera2D camera, float rotation )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t cameraId = lua_tointeger( L, -2 );
+	size_t cameraId = lua_tointeger( L, 1 );
+	float rotation = lua_tonumber( L, 2 );
 
 	if ( !validCamera2D( cameraId ) ) {
 		lua_pushboolean( L, false );
 		return 1;
 	}
 
-	state->camera2Ds[ cameraId ]->rotation = lua_tonumber( L, -1 );
+	state->camera2Ds[ cameraId ]->rotation = rotation;
 	lua_pushboolean( L, true );
 
 	return 1;
@@ -2582,19 +2682,20 @@ Set camera zoom ( scaling ), should be 1.0f by default
 - Success return true
 */
 int lcoreSetCamera2DZoom( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetCamera2DZoom( camera2D camera, float zoom )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t cameraId = lua_tointeger( L, -2 );
+	size_t cameraId = lua_tointeger( L, 1 );
+	float zoom = lua_tonumber( L, 2 );
 
 	if ( !validCamera2D( cameraId ) ) {
 		lua_pushboolean( L, false );
 		return 1;
 	}
 
-	state->camera2Ds[ cameraId ]->zoom = lua_tonumber( L, -1 );
+	state->camera2Ds[ cameraId ]->zoom = zoom;
 	lua_pushboolean( L, true );
 
 	return 1;
@@ -2609,12 +2710,12 @@ Get camera2D target
 - Success return Vector2
 */
 int lcoreGetCamera2DTarget( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetCamera2DTarget( camera2D camera )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	size_t cameraId = lua_tointeger( L, -1 );
+	size_t cameraId = lua_tointeger( L, 1 );
 
 	if ( !validCamera2D( cameraId ) ) {
 		lua_pushnil( L );
@@ -2635,12 +2736,12 @@ Get camera2D offset
 - Success return Vector2
 */
 int lcoreGetCamera2DOffset( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetCamera2DOffset( camera2D camera )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	size_t cameraId = lua_tointeger( L, -1 );
+	size_t cameraId = lua_tointeger( L, 1 );
 
 	if ( !validCamera2D( cameraId ) ) {
 		lua_pushnil( L );
@@ -2661,12 +2762,12 @@ Get camera2D rotation
 - Success return float
 */
 int lcoreGetCamera2DRotation( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetCamera2DRotation( camera2D camera )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	size_t cameraId = lua_tointeger( L, -1 );
+	size_t cameraId = lua_tointeger( L, 1 );
 
 	if ( !validCamera2D( cameraId ) ) {
 		lua_pushnil( L );
@@ -2686,12 +2787,12 @@ Get camera2D zoom
 - Success return float
 */
 int lcoreGetCamera2DZoom( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetCamera2DZoom( camera2D camera )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	size_t cameraId = lua_tointeger( L, -1 );
+	size_t cameraId = lua_tointeger( L, 1 );
 
 	if ( !validCamera2D( cameraId ) ) {
 		lua_pushnil( L );
@@ -2743,20 +2844,20 @@ Unload Camera3D
 - Success return true
 */
 int lcoreUnloadCamera3D( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.UnloadCamera3D( int Camera3D )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t id = lua_tointeger( L, -1 );
+	size_t cameraId = lua_tointeger( L, 1 );
 
-	if ( !validCamera3D( id ) ) {
+	if ( !validCamera3D( cameraId ) ) {
 		lua_pushboolean( L, false );
 		return 1;
 	}
 
-	free( state->camera3Ds[ id ] );
-	state->camera3Ds[ id ] = NULL;
+	free( state->camera3Ds[ cameraId ] );
+	state->camera3Ds[ cameraId ] = NULL;
 	lua_pushboolean( L, true );
 
 	return 1;
@@ -2771,19 +2872,19 @@ Begin 3D mode with custom camera ( 3D )
 - Success return true
 */
 int lcoreBeginMode3D( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.BeginMode3D( camera3D camera )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t id = lua_tointeger( L, -1 );
+	size_t cameraId = lua_tointeger( L, 1 );
 
-	if ( !validCamera3D( id ) ) {
+	if ( !validCamera3D( cameraId ) ) {
 		lua_pushboolean( L, false );
 		return 1;
 	}
 
-	BeginMode3D( *state->camera3Ds[ id ] );
+	BeginMode3D( *state->camera3Ds[ cameraId ] );
 	lua_pushboolean( L, true );
 
 	return 1;
@@ -2809,13 +2910,13 @@ Set camera position ( Remember to call "RL.UpdateCamera3D()" to apply changes )
 - Success return true
 */
 int lcoreSetCamera3DPosition( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetCamera3DPosition( camera3D camera, Vector3 position )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Vector3 pos = uluaGetVector3( L );
-	size_t cameraId = lua_tointeger( L, -2 );
+	size_t cameraId = lua_tointeger( L, 1 );
+	Vector3 pos = uluaGetVector3Index( L, 2 );
 
 	if ( !validCamera3D( cameraId ) ) {
 		lua_pushboolean( L, false );
@@ -2837,13 +2938,13 @@ Set camera target it looks-at
 - Success return true
 */
 int lcoreSetCamera3DTarget( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetCamera3DTarget( camera3D camera, Vector3 target )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Vector3 target = uluaGetVector3( L );
-	size_t cameraId = lua_tointeger( L, -2 );
+	size_t cameraId = lua_tointeger( L, 1 );
+	Vector3 target = uluaGetVector3Index( L, 2 );
 
 	if ( !validCamera3D( cameraId ) ) {
 		lua_pushboolean( L, false );
@@ -2865,13 +2966,13 @@ Set camera up vector ( Rotation over it's axis )
 - Success return true
 */
 int lcoreSetCamera3DUp( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetCamera3DUp( camera3D camera, Vector3 up )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Vector3 up = uluaGetVector3( L );
-	size_t cameraId = lua_tointeger( L, -2 );
+	size_t cameraId = lua_tointeger( L, 1 );
+	Vector3 up = uluaGetVector3Index( L, 2 );
 
 	if ( !validCamera3D( cameraId ) ) {
 		lua_pushboolean( L, false );
@@ -2893,19 +2994,20 @@ Set camera field-of-view apperture in Y ( degrees ) in perspective, used as near
 - Success return true
 */
 int lcoreSetCamera3DFovy( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetCamera3DFovy( camera3D camera, float fovy )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t cameraId = lua_tointeger( L, -2 );
+	size_t cameraId = lua_tointeger( L, 1 );
+	float fovy = lua_tonumber( L, 2 );
 
 	if ( !validCamera3D( cameraId ) ) {
 		lua_pushboolean( L, false );
 		return 1;
 	}
 
-	state->camera3Ds[ cameraId ]->fovy = lua_tonumber( L, -1 );
+	state->camera3Ds[ cameraId ]->fovy = fovy;
 	lua_pushboolean( L, true );
 
 	return 1;
@@ -2920,19 +3022,20 @@ Set camera projection mode ( CAMERA_PERSPECTIVE or CAMERA_ORTHOGRAPHIC )
 - Success return true
 */
 int lcoreSetCamera3DProjection( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetCamera3DProjection( camera3D camera, int projection )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t cameraId = lua_tointeger( L, -2 );
+	size_t cameraId = lua_tointeger( L, 1 );
+	int projection = lua_tointeger( L, 2 );
 
 	if ( !validCamera3D( cameraId ) ) {
 		lua_pushboolean( L, false );
 		return 1;
 	}
 
-	state->camera3Ds[ cameraId ]->projection = lua_tointeger( L, -1 );
+	state->camera3Ds[ cameraId ]->projection = projection;
 	lua_pushboolean( L, true );
 
 	return 1;
@@ -2947,12 +3050,12 @@ Get camera position
 - Success return Vector3
 */
 int lcoreGetCamera3DPosition( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetCamera3DPosition( camera3D camera )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	size_t cameraId = lua_tointeger( L, -1 );
+	size_t cameraId = lua_tointeger( L, 1 );
 
 	if ( !validCamera3D( cameraId ) ) {
 		lua_pushnil( L );
@@ -2973,12 +3076,12 @@ Get camera target it looks-at
 - Success return Vector3
 */
 int lcoreGetCamera3DTarget( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetCamera3DTarget( camera3D camera )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	size_t cameraId = lua_tointeger( L, -1 );
+	size_t cameraId = lua_tointeger( L, 1 );
 
 	if ( !validCamera3D( cameraId ) ) {
 		lua_pushnil( L );
@@ -2999,12 +3102,12 @@ Get camera up vector ( Rotation over it's axis )
 - Success return Vector3
 */
 int lcoreGetCamera3DUp( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetCamera3DUp( camera3D camera )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	size_t cameraId = lua_tointeger( L, -1 );
+	size_t cameraId = lua_tointeger( L, 1 );
 
 	if ( !validCamera3D( cameraId ) ) {
 		lua_pushnil( L );
@@ -3025,12 +3128,12 @@ Get camera field-of-view apperture in Y ( degrees ) in perspective, used as near
 - Success return float
 */
 int lcoreGetCamera3DFovy( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetCamera3DFovy( camera3D camera )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	size_t cameraId = lua_tointeger( L, -1 );
+	size_t cameraId = lua_tointeger( L, 1 );
 
 	if ( !validCamera3D( cameraId ) ) {
 		lua_pushnil( L );
@@ -3051,12 +3154,12 @@ Get camera projection mode
 - Success return int
 */
 int lcoreGetCamera3DProjection( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetCamera3DProjection( camera3D camera )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	size_t cameraId = lua_tointeger( L, -1 );
+	size_t cameraId = lua_tointeger( L, 1 );
 
 	if ( !validCamera3D( cameraId ) ) {
 		lua_pushnil( L );
@@ -3077,15 +3180,13 @@ Update camera position for selected mode
 - Success return true
 */
 int lcoreUpdateCamera3D( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.UpdateCamera3D( camera3D camera, int mode )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-
-	int mode = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	size_t cameraId = lua_tointeger( L, -1 );
+	size_t cameraId = lua_tointeger( L, 1 );
+	int mode = lua_tointeger( L, 2 );
 
 	if ( !validCamera3D( cameraId ) ) {
 		lua_pushboolean( L, false );
@@ -3107,19 +3208,15 @@ Update camera movement, movement/rotation values should be provided by user
 - Success return true
 */
 int lcoreUpdateCamera3DPro( lua_State *L ) {
-	if ( !lua_isnumber( L, -4 ) || !lua_istable( L, -3 ) || !lua_istable( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) || !lua_istable( L, 3 ) || !lua_isnumber( L, 4 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.UpdateCamera3DPro( camera3D camera, Vector3 movement, Vector3 rotation, float zoom )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-
-	float zoom = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	Vector3 rotation = uluaGetVector3( L );
-	lua_pop( L, 1 );
-	Vector3 movement = uluaGetVector3( L );
-	lua_pop( L, 1 );
-	size_t cameraId = lua_tointeger( L, -1 );
+	size_t cameraId = lua_tointeger( L, 1 );
+	Vector3 movement = uluaGetVector3Index( L, 2 );
+	Vector3 rotation = uluaGetVector3Index( L, 3 );
+	float zoom = lua_tointeger( L, 4 );
 
 	if ( !validCamera3D( cameraId ) ) {
 		lua_pushboolean( L, false );
@@ -3145,14 +3242,13 @@ Get a ray trace from mouse position
 - Success return Ray
 */
 int lcoreGetMouseRay( lua_State *L ) {
-	if ( !lua_istable( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetMouseRay( Vector2 mousePosition, Camera3D camera )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t cameraId = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	Vector2 mousePosition = uluaGetVector2( L );
+	Vector2 mousePosition = uluaGetVector2Index( L, 1 );
+	size_t cameraId = lua_tointeger( L, 2 );
 
 	if ( !validCamera3D( cameraId ) ) {
 		lua_pushboolean( L, false );
@@ -3172,12 +3268,12 @@ Get camera transform matrix ( view matrix )
 - Success return Matrix
 */
 int lcoreGetCameraMatrix( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetCameraMatrix( Camera3D camera )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t cameraId = lua_tointeger( L, -1 );
+	size_t cameraId = lua_tointeger( L, 1 );
 
 	if ( !validCamera3D( cameraId ) ) {
 		lua_pushboolean( L, false );
@@ -3197,12 +3293,12 @@ Get camera 2d transform matrix
 - Success return Matrix
 */
 int lcoreGetCameraMatrix2D( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetCameraMatrix2D( Camera2D camera )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t cameraId = lua_tointeger( L, -1 );
+	size_t cameraId = lua_tointeger( L, 1 );
 
 	if ( !validCamera2D( cameraId ) ) {
 		lua_pushboolean( L, false );
@@ -3222,14 +3318,13 @@ Get the screen space position for a 3d world space position
 - Success return Vector2
 */
 int lcoreGetWorldToScreen( lua_State *L ) {
-	if ( !lua_istable( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetWorldToScreen( Vector3 position, Camera3D camera )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t cameraId = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	Vector3 position = uluaGetVector3( L );
+	Vector3 position = uluaGetVector3Index( L, 1 );
+	size_t cameraId = lua_tointeger( L, 2 );
 
 	if ( !validCamera3D( cameraId ) ) {
 		lua_pushboolean( L, false );
@@ -3249,16 +3344,14 @@ Get size position for a 3d world space position
 - Success return Vector2
 */
 int lcoreGetWorldToScreenEx( lua_State *L ) {
-	if ( !lua_istable( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) || !lua_isnumber( L, 2 ) || !lua_istable( L, 3 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetWorldToScreenEx( Vector3 position, Camera3D camera, Vector2 size )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Vector2 size = uluaGetVector2( L );
-	lua_pop( L, 1 );
-	size_t cameraId = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	Vector3 position = uluaGetVector3( L );
+	Vector3 position = uluaGetVector3Index( L, 1 );
+	size_t cameraId = lua_tointeger( L, 2 );
+	Vector2 size = uluaGetVector2Index( L, 3 );
 
 	if ( !validCamera3D( cameraId ) ) {
 		lua_pushboolean( L, false );
@@ -3278,14 +3371,13 @@ Get the screen space position for a 2d camera world space position
 - Success return Vector2
 */
 int lcoreGetWorldToScreen2D( lua_State *L ) {
-	if ( !lua_istable( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetWorldToScreen2D( Vector2 position, Camera2D camera )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t cameraId = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	Vector2 position = uluaGetVector2( L );
+	Vector2 position = uluaGetVector2Index( L, 1 );
+	size_t cameraId = lua_tointeger( L, 2 );
 
 	if ( !validCamera2D( cameraId ) ) {
 		lua_pushboolean( L, false );
@@ -3305,14 +3397,13 @@ Get the world space position for a 2d camera screen space position
 - Success return Vector2
 */
 int lcoreGetScreenToWorld2D( lua_State *L ) {
-	if ( !lua_istable( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetScreenToWorld2D( Vector2 position, Camera2D camera )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t cameraId = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	Vector2 position = uluaGetVector2( L );
+	Vector2 position = uluaGetVector2Index( L, 1 );
+	size_t cameraId = lua_tointeger( L, 2 );
 
 	if ( !validCamera2D( cameraId ) ) {
 		lua_pushboolean( L, false );
diff --git a/src/lua_core.c b/src/lua_core.c
index b339be2..ea0851b 100644
--- a/src/lua_core.c
+++ b/src/lua_core.c
@@ -2059,7 +2059,11 @@ void uluaPushBoundingBox( lua_State *L, BoundingBox box ) {
 }
 
 int uluaGetTableLen( lua_State *L ) {
-	int t = lua_gettop( L ), i = 0;
+	return uluaGetTableLenIndex( L, lua_gettop( L ) );
+}
+
+int uluaGetTableLenIndex( lua_State *L, int index ) {
+	int t = index, i = 0;
     lua_pushnil( L );
 
     while ( lua_next( L, t ) != 0 ) {
diff --git a/src/textures.c b/src/textures.c
index 38ff322..1936c5e 100644
--- a/src/textures.c
+++ b/src/textures.c
@@ -345,16 +345,14 @@ Generate image: horizontal gradient
 - Success return int
 */
 int ltexturesGenImageGradientH( lua_State *L ) {
-	if ( !lua_istable( L, -3 ) || !lua_istable( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) || !lua_istable( L, 2 ) || !lua_istable( L, 3 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GenImageGradientH( Vector2 size, Color left, Color right )" );
 		lua_pushinteger( L, -1 );
 		return 1;
 	}
-	Color right = uluaGetColor( L );
-	lua_pop( L, 1 );
-	Color left = uluaGetColor( L );
-	lua_pop( L, 1 );
-	Vector2 size = uluaGetVector2( L );
+	Vector2 size = uluaGetVector2Index( L, 1 );
+	Color left = uluaGetColorIndex( L, 2 );
+	Color right = uluaGetColorIndex( L, 3 );
 	
 	int i = newImage();
 	*state->images[i] = GenImageGradientH( (int)size.x, (int)size.y, left, right );
@@ -372,18 +370,15 @@ Generate image: radial gradient
 - Success return int
 */
 int ltexturesGenImageGradientRadial( lua_State *L ) {
-	if ( !lua_istable( L, -4 ) || !lua_isnumber( L, -3 ) || !lua_istable( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) || !lua_isnumber( L, 2 ) || !lua_istable( L, 3 ) || !lua_istable( L, 4 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GenImageGradientRadial( Vector2 size, float density, Color inner, Color outer )" );
 		lua_pushinteger( L, -1 );
 		return 1;
 	}
-	Color outer = uluaGetColor( L );
-	lua_pop( L, 1 );
-	Color inner = uluaGetColor( L );
-	lua_pop( L, 1 );
-	float density = lua_tonumber( L, -1 );
-	lua_pop( L, 1 );
-	Vector2 size = uluaGetVector2( L );
+	Vector2 size = uluaGetVector2Index( L, 1 );
+	float density = lua_tonumber( L, 2 );
+	Color inner = uluaGetColorIndex( L, 3 );
+	Color outer = uluaGetColorIndex( L, 4 );
 	
 	int i = newImage();
 	*state->images[i] = GenImageGradientRadial( (int)size.x, (int)size.y, density, inner, outer );
@@ -480,10 +475,11 @@ int ltexturesGenImageCellular( lua_State *L ) {
 		lua_pushinteger( L, -1 );
 		return 1;
 	}
-	Vector2 size = uluaGetVector2( L );
+	Vector2 size = uluaGetVector2Index( L, 1 );
+	int tileSize = lua_tointeger( L, 2 );
 	
 	int i = newImage();
-	*state->images[i] = GenImageCellular( (int)size.x, (int)size.y, lua_tointeger( L, 2 ) );
+	*state->images[i] = GenImageCellular( (int)size.x, (int)size.y, tileSize );
 	lua_pushinteger( L, i );
 
 	return 1;
@@ -580,26 +576,23 @@ Create an image from text ( custom sprite font )
 - Success return int
 */
 int ltexturesImageText( lua_State *L ) {
-	if ( !lua_isnumber( L, -5 ) || !lua_isstring( L, -4 ) || !lua_isnumber( L, -3 )
-	|| !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isstring( L, 2 ) || !lua_isnumber( L, 3 )
+	|| !lua_isnumber( L, 4 ) || !lua_istable( L, 5 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageText( Font font, string text, float fontSize, float spacing, Color tint )" );
 		lua_pushinteger( L, -1 );
 		return 1;
 	}
-	Color tint = uluaGetColor( L );
-	lua_pop( L, 1 );
-	float spacing = lua_tonumber( L, -1 );
-	lua_pop( L, 1 );
-	float fontSize = lua_tonumber( L, -1 );
-	lua_pop( L, 1 );
-	size_t fontId = lua_tointeger( L, -2 );
+	size_t fontId = lua_tointeger( L, 1 );
+	float fontSize = lua_tonumber( L, 3 );
+	float spacing = lua_tonumber( L, 4 );
+	Color tint = uluaGetColorIndex( L, 5 );
 
 	if ( !validFont( fontId ) ) {
 		lua_pushinteger( L, -1 );
 		return 1;
 	}
 	int i = newImage();
-	*state->images[i] = ImageTextEx( *state->fonts[ fontId ], lua_tostring( L, -1 ), fontSize, spacing, tint );
+	*state->images[i] = ImageTextEx( *state->fonts[ fontId ], lua_tostring( L, 2 ), fontSize, spacing, tint );
 	lua_pushinteger( L, i );
 
 	return 1;
@@ -614,14 +607,13 @@ Convert image data to desired format
 - Success return true
 */
 int ltexturesImageFormat( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageFormat( Image image, int newFormat )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	int newFormat = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	int newFormat = lua_tointeger( L, 2 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -642,14 +634,13 @@ Convert image to POT ( power-of-two )
 - Success return true
 */
 int ltexturesImageToPOT( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageToPOT( Image image, Color fill )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Color fill = uluaGetColor( L );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	Color fill = uluaGetColorIndex( L, 2 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -670,14 +661,13 @@ Crop an image to a defined rectangle
 - Success return true
 */
 int ltexturesImageCrop( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageCrop( Image image, Rectangle crop )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Rectangle crop = uluaGetRectangle( L );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	Rectangle crop = uluaGetRectangleIndex( L, 2 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -698,14 +688,13 @@ Crop image depending on alpha value
 - Success return true
 */
 int ltexturesImageAlphaCrop( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageAlphaCrop( Image image, float threshold )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	float threshold = lua_tonumber( L, -1 );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	float threshold = lua_tonumber( L, 2 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -726,16 +715,14 @@ Clear alpha channel to desired color
 - Success return true
 */
 int ltexturesImageAlphaClear( lua_State *L ) {
-	if ( !lua_isnumber( L, -3 ) || !lua_istable( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) || !lua_isnumber( L, 3 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageAlphaClear( Image image, Color color, float threshold )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	float threshold = lua_tonumber( L, -1 );
-	lua_pop( L, 1 );
-	Color color = uluaGetColor( L );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	Color color = uluaGetColorIndex( L, 2 );
+	float threshold = lua_tonumber( L, 3 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -756,14 +743,13 @@ Apply alpha mask to image
 - Success return true
 */
 int ltexturesImageAlphaMask( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageAlphaMask( Image image, Image alphaMask )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t alphaMaskId = lua_tonumber( L, -1 );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	size_t alphaMaskId = lua_tonumber( L, 2 );
 
 	if ( !validImage( imageId ) || !validImage( alphaMaskId ) ) {
 		lua_pushboolean( L, false );
@@ -784,12 +770,12 @@ Premultiply alpha channel
 - Success return true
 */
 int ltexturesImageAlphaPremultiply( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageAlphaPremultiply( Image image )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -810,14 +796,13 @@ Resize image ( Bicubic scaling algorithm )
 - Success return true
 */
 int ltexturesImageResize( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1) || !lua_istable( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageResize( Image image, Vector2 size )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Vector2 size = uluaGetVector2( L );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	Vector2 size = uluaGetVector2Index( L, 2 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -838,14 +823,13 @@ Resize image ( Nearest-Neighbor scaling algorithm )
 - Success return true
 */
 int ltexturesImageResizeNN( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageResizeNN( Image image, Vector2 size )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Vector2 size = uluaGetVector2( L );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	Vector2 size = uluaGetVector2Index( L, 2 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -866,18 +850,15 @@ Resize canvas and fill with color
 - Success return true
 */
 int ltexturesImageResizeCanvas( lua_State *L ) {
-	if ( !lua_isnumber( L, -4 ) || !lua_istable( L, -3 ) || !lua_istable( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) || !lua_istable( L, 3 ) || !lua_istable( L, 4 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageResizeCanvas( Image image, Vector2 size, Vector2 offset, Color fill )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Color fill = uluaGetColor( L );
-	lua_pop( L, 1 );
-	Vector2 offset = uluaGetVector2( L );
-	lua_pop( L, 1 );
-	Vector2 size = uluaGetVector2( L );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	Vector2 size = uluaGetVector2Index( L, 2 );
+	Vector2 offset = uluaGetVector2Index( L, 3 );
+	Color fill = uluaGetColorIndex( L, 4 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -898,12 +879,12 @@ Generate all mipmap levels for a provided image
 - Success return true
 */
 int ltexturesImageMipmaps( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageMipmaps( Image image )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -924,14 +905,13 @@ Dither image data to 16bpp or lower ( Floyd-Steinberg dithering )
 - Success return true
 */
 int ltexturesImageDither( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageDither( Image image, Color bpp )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Color bpp = uluaGetColor( L );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	Color bpp = uluaGetColorIndex( L, 2 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -952,12 +932,12 @@ Flip image vertically
 - Success return true
 */
 int ltexturesImageFlipVertical( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageFlipVertical( Image image )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -978,12 +958,12 @@ Flip image horizontally
 - Success return true
 */
 int ltexturesImageFlipHorizontal( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageFlipHorizontal( Image image )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1004,12 +984,12 @@ Rotate image clockwise 90deg
 - Success return true
 */
 int ltexturesImageRotateCW( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageRotateCW( Image image )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1030,12 +1010,12 @@ Rotate image counter-clockwise 90deg
 - Success return true
 */
 int ltexturesImageRotateCCW( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageRotateCCW( Image image )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1056,14 +1036,13 @@ Modify image color: tint
 - Success return true
 */
 int ltexturesImageColorTint( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageColorTint( Image image, Color color )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Color color = uluaGetColor( L );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	Color color = uluaGetColorIndex( L, 2 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1084,12 +1063,12 @@ Modify image color: invert
 - Success return true
 */
 int ltexturesImageColorInvert( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageColorInvert( Image image )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1110,12 +1089,12 @@ Modify image color: grayscale
 - Success return true
 */
 int ltexturesImageColorGrayscale( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageColorGrayscale( Image image )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1136,14 +1115,13 @@ Modify image color: contrast ( -100 to 100 )
 - Success return true
 */
 int ltexturesImageColorContrast( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageColorContrast( Image image, float contrast )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	float contrast = lua_tonumber( L, -1 );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	float contrast = lua_tonumber( L, 2 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1164,14 +1142,13 @@ Modify image color: brightness ( -255 to 255 )
 - Success return true
 */
 int ltexturesImageColorBrightness( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageColorBrightness( Image image, int brightness )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	int brightness = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	int brightness = lua_tointeger( L, 2 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1192,16 +1169,14 @@ Modify image color: replace color
 - Success return true
 */
 int ltexturesImageColorReplace( lua_State *L ) {
-	if ( !lua_isnumber( L, -3 ) || !lua_istable( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) || !lua_istable( L, 3 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageColorReplace( Image image, Color color, Color replace )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Color replace = uluaGetColor( L );
-	lua_pop( L, 1 );
-	Color color = uluaGetColor( L );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	Color color = uluaGetColorIndex( L, 2 );
+	Color replace = uluaGetColorIndex( L, 3 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1222,12 +1197,12 @@ Load color data from image as a Color array ( RGBA - 32bit )
 - Success return Color{}
 */
 int ltexturesLoadImageColors( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.LoadImageColors( Image image )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1257,14 +1232,13 @@ Load colors palette from image as a Color array ( RGBA - 32bit )
 - Success return Color{}
 */
 int ltexturesLoadImagePalette( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.LoadImagePalette( Image image, int maxPaletteSize )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	int maxPaletteSize = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	int maxPaletteSize = lua_tointeger( L, 2 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1294,14 +1268,13 @@ Get image alpha border rectangle
 - Success return Rectangle
 */
 int ltexturesGetImageAlphaBorder( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetImageAlphaBorder( Image image, float threshold )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	float threshold = lua_tonumber( L, -1 );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	float threshold = lua_tonumber( L, 2 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1321,14 +1294,13 @@ Get image pixel color at ( x, y ) position
 - Success return Color
 */
 int ltexturesGetImageColor( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetImageColor( Image image, Vector2 pixelPos )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Vector2 pixelPos = uluaGetVector2( L );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	Vector2 pixelPos = uluaGetVector2Index( L, 2 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1352,14 +1324,13 @@ Clear image background with given color
 - Success return true
 */
 int ltexturesImageClearBackground( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageClearBackground( Image dst, Color color )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Color color = uluaGetColor( L );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	Color color = uluaGetColorIndex( L, 2 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1381,16 +1352,14 @@ Draw pixel within an image
 - Success return true
 */
 int ltexturesImageDrawPixel( lua_State *L ) {
-	if ( !lua_isnumber( L, -3 ) || !lua_istable( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) || !lua_istable( L, 3 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageDrawPixel( Image dst, Vector2 position, Color color )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Color color = uluaGetColor( L );
-	lua_pop( L, 1 );
-	Vector2 position = uluaGetVector2( L );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	Vector2 position = uluaGetVector2Index( L, 2 );
+	Color color = uluaGetColorIndex( L, 3 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1412,18 +1381,15 @@ Draw line within an image
 - Success return true
 */
 int ltexturesImageDrawLine( lua_State *L ) {
-	if ( !lua_isnumber( L, -4 ) || !lua_istable( L, -3 ) || !lua_istable( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) || !lua_istable( L, 3 ) || !lua_istable( L, 4 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageDrawLine( Image dst, Vector2 start, Vector2 end, Color color )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Color color = uluaGetColor( L );
-	lua_pop( L, 1 );
-	Vector2 end = uluaGetVector2( L );
-	lua_pop( L, 1 );
-	Vector2 start = uluaGetVector2( L );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	Vector2 start = uluaGetVector2Index( L, 2 );
+	Vector2 end = uluaGetVector2Index( L, 3 );
+	Color color = uluaGetColorIndex( L, 4 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1445,18 +1411,15 @@ Draw circle within an image
 - Success return true
 */
 int ltexturesImageDrawCircle( lua_State *L ) {
-	if ( !lua_isnumber( L, -4 ) || !lua_istable( L, -3 ) || !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) || !lua_isnumber( L, 3 ) || !lua_istable( L, 4 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageDrawCircle( Image dst, Vector2 center, int radius, Color color )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Color color = uluaGetColor( L );
-	lua_pop( L, 1 );
-	int radius = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	Vector2 center = uluaGetVector2( L );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	Vector2 center = uluaGetVector2Index( L, 2 );
+	int radius = lua_tointeger( L, 3 );
+	Color color = uluaGetColorIndex( L, 4 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1478,16 +1441,14 @@ Draw rectangle within an image
 - Success return true
 */
 int ltexturesImageDrawRectangle( lua_State *L ) {
-	if ( !lua_isnumber( L, -3 ) || !lua_istable( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) || !lua_istable( L, 3 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageDrawRectangle( Image dst, Rectangle rec, Color color )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Color color = uluaGetColor( L );
-	lua_pop( L, 1 );
-	Rectangle rec = uluaGetRectangle( L );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	Rectangle rec = uluaGetRectangleIndex( L, 2 );
+	Color color = uluaGetColorIndex( L, 3 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1509,18 +1470,15 @@ Draw rectangle lines within an image
 - Success return true
 */
 int ltexturesImageDrawRectangleLines( lua_State *L ) {
-	if ( !lua_isnumber( L, -4 ) || !lua_istable( L, -3 ) || !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) || !lua_isnumber( L, 3 ) || !lua_istable( L, 4 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageDrawRectangleLines( Image dst, Rectangle rec, int thick, Color color )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Color color = uluaGetColor( L );
-	lua_pop( L, 1 );
-	int thick = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	Rectangle rec = uluaGetRectangle( L );
-	lua_pop( L, 1 );
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
+	Rectangle rec = uluaGetRectangleIndex( L, 2 );
+	int thick = lua_tointeger( L, 3 );
+	Color color = uluaGetColorIndex( L, 4 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1542,20 +1500,17 @@ Draw a source image within a destination image ( Tint applied to source )
 - Success return true
 */
 int ltexturesImageDraw( lua_State *L ) {
-	if ( !lua_isnumber( L, -5 ) || !lua_isnumber( L, -4 ) || !lua_istable( L, -3 ) || !lua_istable( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) || !lua_istable( L, 3 )
+	|| !lua_istable( L, 4 ) || !lua_istable( L, 5 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageDraw( Image dst, Image src, Rectangle srcRec, Rectangle dstRec, Color tint )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Color tint = uluaGetColor( L );
-	lua_pop( L, 1 );
-	Rectangle dstRec = uluaGetRectangle( L );
-	lua_pop( L, 1 );
-	Rectangle srcRec = uluaGetRectangle( L );
-	lua_pop( L, 1 );
-	size_t imageSrcId = lua_tointeger( L, -1 );
-	lua_pop( L, 1 );
-	size_t imageDstId = lua_tointeger( L, -1 );
+	size_t imageDstId = lua_tointeger( L, 1 );
+	size_t imageSrcId = lua_tointeger( L, 2);
+	Rectangle srcRec = uluaGetRectangleIndex( L, 3 );
+	Rectangle dstRec = uluaGetRectangleIndex( L, 4 );
+	Color tint = uluaGetColorIndex( L, 5 );
 
 	if ( !validImage( imageDstId ) || !validImage( imageSrcId ) ) {
 		lua_pushboolean( L, false );
@@ -1577,29 +1532,25 @@ Draw text ( Custom sprite font ) within an image ( Destination )
 - Success return true
 */
 int ltexturesImageDrawTextEx( lua_State *L ) {
-	if ( !lua_isnumber( L, -7 ) || !lua_isnumber( L, -6 ) || !lua_isstring( L, -5 ) || !lua_istable( L, -4 )
-	|| !lua_isnumber( L, -3 ) || !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) || !lua_isstring( L, 3 ) || !lua_istable( L, 4 )
+	|| !lua_isnumber( L, 5 ) || !lua_isnumber( L, 6 ) || !lua_istable( L, 7 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ImageDrawTextEx( Image dst, Font font, string text, Vector2 position, float fontSize, float spacing, Color tint )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Color tint = uluaGetColor( L );
-	lua_pop( L, 1 );
-	float spacing = lua_tonumber( L, -1 );
-	lua_pop( L, 1 );
-	float fontSize = lua_tonumber( L, -1 );
-	lua_pop( L, 1 );
-	Vector2 position = uluaGetVector2( L );
-	lua_pop( L, 1 );
-	size_t fontId = lua_tointeger( L, -2 );
-	size_t imageId = lua_tointeger( L, -3 );
+	size_t imageId = lua_tointeger( L, 1 );
+	size_t fontId = lua_tointeger( L, 2 );
+	Vector2 position = uluaGetVector2Index( L, 4 );
+	float fontSize = lua_tonumber( L, 5 );
+	float spacing = lua_tonumber( L, 6 );
+	Color tint = uluaGetColorIndex( L, 7 );
 
 	if ( !validImage( imageId ) || !validFont( fontId ) ) {
 		lua_pushboolean( L, false );
 		return 1;
 	}
 
-	ImageDrawTextEx( state->images[ imageId ], *state->fonts[ fontId ], lua_tostring( L, -1 ), position, fontSize, spacing, tint );
+	ImageDrawTextEx( state->images[ imageId ], *state->fonts[ fontId ], lua_tostring( L, 3 ), position, fontSize, spacing, tint );
 	lua_pushboolean( L, true );
 
 	return 1;
@@ -1618,12 +1569,12 @@ Get image size
 - Success return Vector2
 */
 int ltexturesGetImageSize( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetImageSize( Image image )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushnil( L );
@@ -1645,12 +1596,12 @@ Get image mipmaps. Mipmap levels, 1 by default
 - Success return int
 */
 int ltexturesGetImageMipmaps( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetImageMipmaps( Image image )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1670,12 +1621,12 @@ Get image data format ( PixelFormat type )
 - Success return int
 */
 int ltexturesGetImageFormat( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetImageFormat( Image image )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1699,15 +1650,15 @@ Load texture from file into GPU memory ( VRAM )
 - Success return int
 */
 int ltexturesLoadTexture( lua_State *L ) {
-	if ( !lua_isstring( L, -1 ) ) {
+	if ( !lua_isstring( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.LoadTexture( string fileName )" );
 		lua_pushinteger( L, -1 );
 		return 1;
 	}
 
-	if ( FileExists( lua_tostring( L, -1 ) ) ) {
+	if ( FileExists( lua_tostring( L, 1 ) ) ) {
 		int i = newTexture();
-		*state->textures[i] = LoadTexture( lua_tostring( L, -1 ) );
+		*state->textures[i] = LoadTexture( lua_tostring( L, 1 ) );
 		lua_pushinteger( L, i );
 		return 1;
 	}
@@ -1726,12 +1677,12 @@ Load texture from image data
 - Success return int
 */
 int ltexturesLoadTextureFromImage( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.LoadTextureFromImage( Image image )" );
 		lua_pushinteger( L, -1 );
 		return 1;
 	}
-	size_t imageId = lua_tointeger( L, -1 );
+	size_t imageId = lua_tointeger( L, 1 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1753,13 +1704,13 @@ Load cubemap from image, multiple image cubemap layouts supported
 - Success return int
 */
 int ltexturesLoadTextureCubemap( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.LoadTextureCubemap( Image image, int layout )" );
 		lua_pushinteger( L, -1 );
 		return 1;
 	}
-	int layout = lua_tointeger( L, -1 );
-	size_t imageId = lua_tointeger( L, -2 );
+	size_t imageId = lua_tointeger( L, 1 );
+	int layout = lua_tointeger( L, 2 );
 
 	if ( !validImage( imageId ) ) {
 		lua_pushboolean( L, false );
@@ -1781,12 +1732,12 @@ Load texture for rendering ( framebuffer )
 - Success return int
 */
 int ltexturesLoadRenderTexture( lua_State *L ) {
-	if ( !lua_istable( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.LoadRenderTexture( Vector2 size )" );
 		lua_pushinteger( L, -1 );
 		return 1;
 	}
-	Vector2 size = uluaGetVector2( L );
+	Vector2 size = uluaGetVector2Index( L, 1 );
 	int i = 0;
 
 	for ( i = 0; i < state->renderTextureCount; i++ ) {
@@ -1811,12 +1762,12 @@ Unload texture from GPU memory ( VRAM )
 - Success return true
 */
 int ltexturesUnloadTexture( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.UnloadTexture( Texture2D texture )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t id = lua_tointeger( L, -1 );
+	size_t id = lua_tointeger( L, 1 );
 
 	if ( !validTexture( id ) ) {
 		lua_pushboolean( L, false );
@@ -1838,12 +1789,12 @@ Unload render texture from GPU memory ( VRAM )
 - Success return true
 */
 int ltexturesUnloadRenderTexture( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.UnloadRenderTexture( RenderTexture2D target )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t id = lua_tointeger( L, -1 );
+	size_t id = lua_tointeger( L, 1 );
 	
 	if ( !validRenderTexture( id ) ) {
 		lua_pushboolean( L, false );
@@ -1866,18 +1817,18 @@ NOTE! Should be TEXTURE_SOURCE_TEXTURE. Pixel should be in format { { 255, 255,
 - Success return true
 */
 int ltexturesUpdateTexture( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.UpdateTexture( Texture2D texture, int{} pixels )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t texId = lua_tointeger( L, -2 );
+	size_t texId = lua_tointeger( L, 1 );
 	
 	if ( !validTexture( texId ) ) {
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t len = uluaGetTableLen( L );
+	size_t len = uluaGetTableLenIndex( L, 2 );
 	unsigned char *pixels = malloc( len * 4 * sizeof( unsigned char ) );
 
 	int t = lua_gettop( L );
@@ -1918,18 +1869,18 @@ NOTE! Should be TEXTURE_SOURCE_TEXTURE. Pixel should be in format { { 255, 255,
 - Success return true
 */
 int ltexturesUpdateTextureRec( lua_State *L ) {
-	if ( !lua_isnumber( L, -3 ) || !lua_istable( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) || !lua_istable( L, 3 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.UpdateTextureRec( Texture2D texture, Rectangle rec, int{} pixels )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t texId = lua_tointeger( L, -3 );
+	size_t texId = lua_tointeger( L, 1 );
 	
 	if ( !validTexture( texId ) ) {
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t len = uluaGetTableLen( L );
+	size_t len = uluaGetTableLenIndex( L, 3 );
 	unsigned char *pixels = malloc( len * 4 * sizeof( unsigned char ) );
 
 	int t = lua_gettop( L );
@@ -1954,7 +1905,7 @@ int ltexturesUpdateTextureRec( lua_State *L ) {
 	}
 	lua_pop( L, 1 ); /* Pixels arg. */
 
-	Rectangle rec = uluaGetRectangle( L );
+	Rectangle rec = uluaGetRectangleIndex( L, 2 );
 
 	UpdateTextureRec( *state->textures[ texId ], rec, pixels );
 	lua_pushboolean( L, true );
@@ -2069,24 +2020,18 @@ Draws a texture ( or part of it ) that stretches or shrinks nicely
 - Success return true
 */
 int ltexturesDrawTextureNPatch( lua_State *L ) {
-	if ( !lua_isnumber( L, -6 ) || !lua_istable( L, -5 ) || !lua_istable( L, -4 )
-	|| !lua_istable( L, -3 ) || !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) || !lua_istable( L, 3 )
+	|| !lua_istable( L, 4 ) || !lua_isnumber( L, 5 ) || !lua_istable( L, 6 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.DrawTextureNPatch( Texture2D texture, NPatchInfo nPatchInfo, Rectangle dest, Vector2 origin, float rotation, Color tint )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Color tint = uluaGetColor( L );
-	lua_pop( L, 1 );
-	float rotation = lua_tonumber( L, -1 );
-	lua_pop( L, 1 );
-	Vector2 origin = uluaGetVector2( L );
-	lua_pop( L, 1 );
-	Rectangle dest = uluaGetRectangle( L );
-	lua_pop( L, 1 );
-	NPatchInfo nPatchInfo = uluaGetNPatchInfo( L );
-
-	lua_pop( L, 1 );
-	size_t texId = lua_tointeger( L, -1 );
+	size_t texId = lua_tointeger( L, 1 );
+	NPatchInfo nPatchInfo = uluaGetNPatchInfoIndex( L, 2 );
+	Rectangle dest = uluaGetRectangleIndex( L, 3 );
+	Vector2 origin = uluaGetVector2Index( L, 4 );
+	float rotation = lua_tonumber( L, 5 );
+	Color tint = uluaGetColorIndex( L, 6 );
 
 	if ( !validSourceTexture( texId ) ) {
 		lua_pushboolean( L, false );
@@ -2107,12 +2052,12 @@ Begin drawing to render texture
 - Success return true
 */
 int ltexturesBeginTextureMode( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.BeginTextureMode( RenderTexture2D target )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t texId = lua_tointeger( L, -1 );
+	size_t texId = lua_tointeger( L, 1 );
 
 	if ( !validRenderTexture( texId ) ) {
 		lua_pushboolean( L, false );
@@ -2145,12 +2090,12 @@ Set what texture source to use ( TEXTURE_SOURCE_TEXTURE or TEXTURE_SOURCE_RENDER
 - Success return true
 */
 int ltexturesSetTextureSource( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetTextureSource( int textureSource )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	int texSource = lua_tointeger( L, -1 );
+	int texSource = lua_tointeger( L, 1 );
 
 	if ( texSource != TEXTURE_SOURCE_TEXTURE && texSource != TEXTURE_SOURCE_RENDER_TEXTURE ) {
 		TraceLog( LOG_WARNING, "%s %d", "Invalid source texture", texSource );
@@ -2190,14 +2135,13 @@ Generate GPU mipmaps for a texture
 - Success return true
 */
 int ltexturesGenTextureMipmaps( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GenTextureMipmaps( Texture2D texture )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t texId = lua_tointeger( L, -1 );
+	size_t texId = lua_tointeger( L, 1 );
 
-	// if ( !validTexture( texId ) ) {
 	if ( !validSourceTexture( texId ) ) {
 		lua_pushboolean( L, false );
 		return 1;
@@ -2218,20 +2162,20 @@ Set texture scaling filter mode ( TEXTURE_FILTER_POINT, TEXTURE_FILTER_BILINEAR.
 - Success return true
 */
 int ltexturesSetTextureFilter( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetTextureFilter( Texture2D texture, int filter )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t texId = lua_tointeger( L, -2 );
+	size_t texId = lua_tointeger( L, 1 );
+	int filter = lua_tointeger( L, 2 );
 
-	// if ( !validTexture( texId ) ) {
 	if ( !validSourceTexture( texId ) ) {
 		lua_pushboolean( L, false );
 		return 1;
 	}
 
-	SetTextureFilter( *texturesGetSourceTexture( texId ), lua_tointeger( L, -1 ) );
+	SetTextureFilter( *texturesGetSourceTexture( texId ), filter );
 	lua_pushboolean( L, true );
 
 	return 1;
@@ -2246,21 +2190,20 @@ Set texture wrapping mode ( TEXTURE_WRAP_REPEAT, TEXTURE_WRAP_CLAMP... )
 - Success return true
 */
 int ltexturesSetTextureWrap( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.SetTextureWrap( Texture2D texture, int wrap )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t texId = lua_tointeger( L, -2 );
+	size_t texId = lua_tointeger( L, 1 );
+	int wrap = lua_tointeger( L, 2 );
 
-	// if ( !validTexture( texId ) ) {
 	if ( !validSourceTexture( texId ) ) {
 		lua_pushboolean( L, false );
 		return 1;
 	}
 	
-	SetTextureWrap( *texturesGetSourceTexture( texId ), lua_tointeger( L, -1 ) );
-	// SetTextureWrap( *state->textures[ texId ], lua_tointeger( L, -1 ) );
+	SetTextureWrap( *texturesGetSourceTexture( texId ), wrap );
 	lua_pushboolean( L, true );
 
 	return 1;
@@ -2275,12 +2218,12 @@ Get texture size
 - Success return Vector2
 */
 int ltexturesGetTextureSize( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetTextureSize( Texture2D texture )" );
 		lua_pushnil( L );
 		return 1;
 	}
-	size_t texId = lua_tointeger( L, -1 );
+	size_t texId = lua_tointeger( L, 1 );
 
 	if ( !validSourceTexture( texId ) ) {
 		lua_pushnil( L );
@@ -2301,12 +2244,12 @@ Get texture mipmaps. Mipmap levels, 1 by default
 - Success return int
 */
 int ltexturesGetTextureMipmaps( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetTextureMipmaps( Texture2D texture )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t texId = lua_tointeger( L, -1 );
+	size_t texId = lua_tointeger( L, 1 );
 
 	if ( !validImage( texId ) ) {
 		lua_pushboolean( L, false );
@@ -2327,12 +2270,12 @@ Get texture mipmaps. Mipmap levels, 1 by default
 - Success return int
 */
 int ltexturesGetTextureFormat( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetTextureFormat( Texture2D texture )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	size_t texId = lua_tointeger( L, -1 );
+	size_t texId = lua_tointeger( L, 1 );
 
 	if ( !validImage( texId ) ) {
 		lua_pushboolean( L, false );
@@ -2357,14 +2300,13 @@ Returns color with alpha applied, alpha goes from 0.0f to 1.0f
 - Success return Color
 */
 int ltexturesFade( lua_State *L ) {
-	if ( !lua_istable( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.Fade( Color color, float alpha )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	float alpha = lua_tonumber( L, -1 );
-	lua_pop( L, 1 );
-	Color color = uluaGetColor( L );
+	Color color = uluaGetColorIndex( L, 1 );
+	float alpha = lua_tonumber( L, 2 );
 
 	uluaPushColor( L, Fade( color, alpha ) );
 
@@ -2380,12 +2322,12 @@ Returns hexadecimal value for a Color
 - Success return int
 */
 int ltexturesColorToInt( lua_State *L ) {
-	if ( !lua_istable( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ColorToInt( Color color )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Color color = uluaGetColor( L );
+	Color color = uluaGetColorIndex( L, 1 );
 
 	lua_pushinteger( L, ColorToInt( color ) );
 
@@ -2401,12 +2343,12 @@ Returns Color normalized as float [0..1]
 - Success return Vector4
 */
 int ltexturesColorNormalize( lua_State *L ) {
-	if ( !lua_istable( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ColorNormalize( Color color )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Color color = uluaGetColor( L );
+	Color color = uluaGetColorIndex( L, 1 );
 
 	uluaPushVector4( L, ColorNormalize( color ) );
 
@@ -2422,12 +2364,12 @@ Color from normalized values [0..1]
 - Success return Color
 */
 int ltexturesColorFromNormalized( lua_State *L ) {
-	if ( !lua_istable( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ColorFromNormalized( Vector4 normalized )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Vector4 normalized = uluaGetVector4( L );
+	Vector4 normalized = uluaGetVector4Index( L, 1 );
 
 	uluaPushColor( L, ColorFromNormalized( normalized ) );
 
@@ -2443,12 +2385,12 @@ Returns HSV values for a Color, hue [0..360], saturation/value [0..1]
 - Success return Vector3
 */
 int ltexturesColorToHSV( lua_State *L ) {
-	if ( !lua_istable( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ColorToHSV( Color color )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Color color = uluaGetColor( L );
+	Color color = uluaGetColorIndex( L, 1 );
 
 	uluaPushVector3( L, ColorToHSV( color ) );
 
@@ -2464,12 +2406,16 @@ Returns a Color from HSV values, hue [0..360], saturation/value [0..1]
 - Success return Color
 */
 int ltexturesColorFromHSV( lua_State *L ) {
-	if ( !lua_isnumber( L, -3 ) || !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) || !lua_isnumber( L, 3 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ColorFromHSV( float hue, float saturation, float value )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	uluaPushColor( L, ColorFromHSV( lua_tonumber( L, -3 ), lua_tonumber( L, -2 ), lua_tonumber( L, -1 ) ) );
+	float hue = lua_tonumber( L, 1 );
+	float saturation = lua_tonumber( L, 2 );
+	float value = lua_tonumber( L, 3 );
+
+	uluaPushColor( L, ColorFromHSV( hue, saturation, value ) );
 
 	return 1;
 }
@@ -2483,14 +2429,13 @@ Get color multiplied with another color
 - Success return Color
 */
 int ltexturesColorTint( lua_State *L ) {
-	if ( !lua_istable( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) || !lua_istable( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ColorTint( Color color, Color tint )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Color tint = uluaGetColor( L );
-	lua_pop( L, 1 );
-	Color color = uluaGetColor( L );
+	Color color = uluaGetColorIndex( L, 1 );
+	Color tint = uluaGetColorIndex( L, 2 );
 
 	uluaPushColor( L, ColorTint( color, tint ) );
 
@@ -2506,14 +2451,13 @@ Get color with brightness correction, brightness factor goes from -1.0f to 1.0f
 - Success return Color
 */
 int ltexturesColorBrightness( lua_State *L ) {
-	if ( !lua_istable( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ColorBrightness( Color color, float factor )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	float factor = lua_tonumber( L, -1 );
-	lua_pop( L, 1 );
-	Color color = uluaGetColor( L );
+	Color color = uluaGetColorIndex( L, 1 );
+	float factor = lua_tonumber( L, 2 );
 
 	uluaPushColor( L, ColorBrightness( color, factor ) );
 
@@ -2529,14 +2473,13 @@ Get color with contrast correction, contrast values between -1.0f and 1.0f
 - Success return Color
 */
 int ltexturesColorContrast( lua_State *L ) {
-	if ( !lua_istable( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ColorContrast( Color color, float contrast )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	float contrast = lua_tonumber( L, -1 );
-	lua_pop( L, 1 );
-	Color color = uluaGetColor( L );
+	Color color = uluaGetColorIndex( L, 1 );
+	float contrast = lua_tonumber( L, 2 );
 
 	uluaPushColor( L, ColorContrast( color, contrast ) );
 
@@ -2552,14 +2495,13 @@ Returns color with alpha applied, alpha goes from 0.0f to 1.0f
 - Success return Color
 */
 int ltexturesColorAlpha( lua_State *L ) {
-	if ( !lua_istable( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_istable( L, 1 ) || !lua_isnumber( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ColorAlpha( Color color, float alpha )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	float alpha = lua_tonumber( L, -1 );
-	lua_pop( L, 1 );
-	Color color = uluaGetColor( L );
+	Color color = uluaGetColorIndex( L, 1 );
+	float alpha = lua_tonumber( L, 2 );
 
 	uluaPushColor( L, ColorAlpha( color, alpha ) );
 
@@ -2575,16 +2517,14 @@ Returns src alpha-blended into dst color with tint
 - Success return Color
 */
 int ltexturesColorAlphaBlend( lua_State *L ) {
-	if ( !lua_isnumber( L, -3 ) || !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_isnumber( L, 2 ) || !lua_isnumber( L, 3 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.ColorAlphaBlend( Color dst, Color src, Color tint )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Color tint = uluaGetColor( L );
-	lua_pop( L, 1 );
-	Color src = uluaGetColor( L );
-	lua_pop( L, 1 );
-	Color dst = uluaGetColor( L );
+	Color dst = uluaGetColorIndex( L, 1 );
+	Color src = uluaGetColorIndex( L, 2 );
+	Color tint = uluaGetColorIndex( L, 3 );
 
 	uluaPushColor( L, ColorAlphaBlend( dst, src, tint ) );
 
@@ -2600,12 +2540,14 @@ Get Color structure from hexadecimal value
 - Success return Color
 */
 int ltexturesGetColor( lua_State *L ) {
-	if ( !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetColor( unsigned int hexValue )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	uluaPushColor( L, GetColor( (unsigned int)lua_tointeger( L, -1 ) ) );
+	unsigned int hexValue = (unsigned int)lua_tointeger( L, 1 );
+
+	uluaPushColor( L, GetColor( hexValue ) );
 
 	return 1;
 }
@@ -2619,14 +2561,13 @@ Get pixel color from source texture
 - Success return Color
 */
 int ltexturesGetPixelColor( lua_State *L ) {
-	if ( !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1 ) || !lua_istable( L, 2 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetPixelColor( Texture2D texture, Vector2 position )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	Vector2 pos = uluaGetVector2( L );
-	lua_pop( L, 1 );
-	size_t texId = lua_tointeger( L, -2 );
+	size_t texId = lua_tointeger( L, 1 );
+	Vector2 pos = uluaGetVector2Index( L, 2 );
 
 	if ( !validSourceTexture( texId ) ) {
 		lua_pushboolean( L, false );
@@ -2650,12 +2591,16 @@ Get pixel data size in bytes for certain format
 - Success return int
 */
 int ltexturesGetPixelDataSize( lua_State *L ) {
-	if ( !lua_isnumber( L, -3 ) || !lua_isnumber( L, -2 ) || !lua_isnumber( L, -1 ) ) {
+	if ( !lua_isnumber( L, 1) || !lua_isnumber( L, 2 ) || !lua_isnumber( L, 3 ) ) {
 		TraceLog( LOG_WARNING, "%s", "Bad call of function. RL.GetPixelDataSize( int width, int height, int format )" );
 		lua_pushboolean( L, false );
 		return 1;
 	}
-	lua_pushinteger( L, GetPixelDataSize( lua_tointeger( L, -3 ), lua_tointeger( L, -2 ), lua_tointeger( L, -1 ) ) );
+	int width = lua_tointeger( L, 1 );
+	int height = lua_tointeger( L, 2 );
+	int format = lua_tointeger( L, 3 );
+
+	lua_pushinteger( L, GetPixelDataSize( width, height, format ) );
 
 	return 1;
 }