textures and core new argument style.

1 files changed, 391 insertions, 300 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 );