indrajith/reilua-enhanced
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Image generation.

Browse Source
This commit is contained in:
jussi
2022-04-05 18:52:36 +03:00
parent fbfe1e0cb6
commit 1d39e9463c
4 changed files with 332 additions and 45 deletions
Download Patch File Download Diff File Expand all files Collapse all files

76
API.md
View File

@@ -1967,15 +1967,6 @@ Load image from screen buffer and ( screenshot )
---
> image = RL_GenImageColor( int width, int height, Color color )
Generate image: plain color
- Failure return -1
- Success return int
---
> success = RL_UnloadImage( Image image )
Unload image from CPU memory ( RAM )
@@ -2048,6 +2039,73 @@ Unload render texture from GPU memory ( VRAM )
---
## Textures - Image Generation
---
> image = RL_GenImageColor( int width, int height, Color color )
Generate image: plain color
- Failure return -1
- Success return int
---
> image = RL_GenImageGradientV( Vector2 size, Color top, Color bottom )
Generate image: vertical gradient
- Failure return -1
- Success return int
---
> image = RL_GenImageGradientH( Vector2 size, Color left, Color right )
Generate image: horizontal gradient
- Failure return -1
- Success return int
---
> image = RL_GenImageGradientRadial( Vector2 size, float density, Color inner, Color outer )
Generate image: radial gradient
- Failure return -1
- Success return int
---
> image = RL_GenImageChecked( Vector2 size, Vector2 checks, Color col1, Color col2 )
Generate image: checked
- Failure return -1
- Success return int
---
> image = RL_GenImageWhiteNoise( Vector2 size, float factor )
Generate image: white noise
- Failure return -1
- Success return int
---
> image = RL_GenImageCellular( Vector2 size, int tileSize )
Generate image: cellular algorithm. Bigger tileSize means bigger cells
- Failure return -1
- Success return int
---
## Textures - Image Drawing
---

9
include/textures.h
View File

@@ -12,7 +12,6 @@ Texture2D* texturesGetSourceTexture( size_t index );
int ltexturesLoadImage( lua_State *L );
int ltexturesLoadImageFromTexture( lua_State *L );
int ltexturesLoadImageFromScreen( lua_State *L );
int ltexturesGenImageColor( lua_State *L );
int ltexturesUnloadImage( lua_State *L );
int ltexturesExportImage( lua_State *L );
int ltexturesExportImageAsCode( lua_State *L );
@@ -21,6 +20,14 @@ int ltexturesLoadTextureFromImage( lua_State *L );
int ltexturesUnloadTexture( lua_State *L );
int ltexturesLoadRenderTexture( lua_State *L );
int ltexturesUnloadRenderTexture( lua_State *L );
/* Image Generation. */
int ltexturesGenImageColor( lua_State *L );
int ltexturesGenImageGradientV( lua_State *L );
int ltexturesGenImageGradientH( lua_State *L );
int ltexturesGenImageGradientRadial( lua_State *L );
int ltexturesGenImageChecked( lua_State *L );
int ltexturesGenImageWhiteNoise( lua_State *L );
int ltexturesGenImageCellular( lua_State *L );
/* Image Drawing. */
int ltexturesImageClearBackground( lua_State *L );
int ltexturesImageDrawPixel( lua_State *L );

9
src/lua_core.c
View File

@@ -633,7 +633,6 @@ void luaRegister() {
lua_register( L, "RL_LoadImage", ltexturesLoadImage );
lua_register( L, "RL_LoadImageFromTexture", ltexturesLoadImageFromTexture );
lua_register( L, "RL_LoadImageFromScreen", ltexturesLoadImageFromScreen );
lua_register( L, "RL_GenImageColor", ltexturesGenImageColor );
lua_register( L, "RL_UnloadImage", ltexturesUnloadImage );
lua_register( L, "RL_ExportImage", ltexturesExportImage );
lua_register( L, "RL_ExportImageAsCode", ltexturesExportImageAsCode );
@@ -642,6 +641,14 @@ void luaRegister() {
lua_register( L, "RL_UnloadTexture", ltexturesUnloadTexture );
lua_register( L, "RL_LoadRenderTexture", ltexturesLoadRenderTexture );
lua_register( L, "RL_UnloadRenderTexture", ltexturesUnloadRenderTexture );
/* Image Generation. */
lua_register( L, "RL_GenImageColor", ltexturesGenImageColor );
lua_register( L, "RL_GenImageGradientV", ltexturesGenImageGradientV );
lua_register( L, "RL_GenImageGradientH", ltexturesGenImageGradientH );
lua_register( L, "RL_GenImageGradientRadial", ltexturesGenImageGradientRadial );
lua_register( L, "RL_GenImageChecked", ltexturesGenImageChecked );
lua_register( L, "RL_GenImageWhiteNoise", ltexturesGenImageWhiteNoise );
lua_register( L, "RL_GenImageCellular", ltexturesGenImageCellular );
/* Image Drawing. */
lua_register( L, "RL_ImageClearBackground", ltexturesImageClearBackground );
lua_register( L, "RL_ImageDrawPixel", ltexturesImageDrawPixel );

283
src/textures.c
View File

@@ -202,40 +202,6 @@ int ltexturesLoadImageFromScreen( lua_State *L ) {
return 1;
}
/*
> image = RL_GenImageColor( int width, int height, Color color )
Generate image: plain color
- Failure return -1
- Success return int
*/
int ltexturesGenImageColor( lua_State *L ) {
if ( !lua_isnumber( L, -3 ) || !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
TraceLog( LOG_WARNING, "%s", "Bad call of function. RL_GenImageColor( int width, int height, Color color )" );
lua_pushinteger( L, -1 );
return 1;
}
Color color = uluaGetColor( L );
lua_pop( L, 1 );
int height = lua_tointeger( L, -1 );
lua_pop( L, 1 );
int width = lua_tointeger( L, -1 );
int i = 0;
for ( i = 0; i < state->imageCount; i++ ) {
if ( state->images[i] == NULL ) {
break;
}
}
state->images[i] = malloc( sizeof( Image ) );
*state->images[i] = GenImageColor( width, height, color );
lua_pushinteger( L, i );
checkImageRealloc( i );
return 1;
}
/*
> success = RL_UnloadImage( Image image )
@@ -468,6 +434,255 @@ int ltexturesUnloadRenderTexture( lua_State *L ) {
return 1;
}
/*
## Textures - Image Generation
*/
/*
> image = RL_GenImageColor( int width, int height, Color color )
Generate image: plain color
- Failure return -1
- Success return int
*/
int ltexturesGenImageColor( lua_State *L ) {
if ( !lua_isnumber( L, -3 ) || !lua_isnumber( L, -2 ) || !lua_istable( L, -1 ) ) {
TraceLog( LOG_WARNING, "%s", "Bad call of function. RL_GenImageColor( int width, int height, Color color )" );
lua_pushinteger( L, -1 );
return 1;
}
Color color = uluaGetColor( L );
lua_pop( L, 1 );
int height = lua_tointeger( L, -1 );
lua_pop( L, 1 );
int width = lua_tointeger( L, -1 );
int i = 0;
for ( i = 0; i < state->imageCount; i++ ) {
if ( state->images[i] == NULL ) {
break;
}
}
state->images[i] = malloc( sizeof( Image ) );
*state->images[i] = GenImageColor( width, height, color );
lua_pushinteger( L, i );
checkImageRealloc( i );
return 1;
}
/*
> image = RL_GenImageGradientV( Vector2 size, Color top, Color bottom )
Generate image: vertical gradient
- Failure return -1
- Success return int
*/
int ltexturesGenImageGradientV( lua_State *L ) {
if ( !lua_istable( L, -3 ) || !lua_istable( L, -2 ) || !lua_istable( L, -1 ) ) {
TraceLog( LOG_WARNING, "%s", "Bad call of function. RL_GenImageGradientV( Vector2 size, Color top, Color bottom )" );
lua_pushinteger( L, -1 );
return 1;
}
Color bottom = uluaGetColor( L );
lua_pop( L, 1 );
Color top = uluaGetColor( L );
lua_pop( L, 1 );
Vector2 size = uluaGetVector2( L );
int i = 0;
for ( i = 0; i < state->imageCount; i++ ) {
if ( state->images[i] == NULL ) {
break;
}
}
state->images[i] = malloc( sizeof( Image ) );
*state->images[i] = GenImageGradientV( (int)size.x, (int)size.y, top, bottom );
lua_pushinteger( L, i );
checkImageRealloc( i );
return 1;
}
/*
> image = RL_GenImageGradientH( Vector2 size, Color left, Color right )
Generate image: horizontal gradient
- Failure return -1
- Success return int
*/
int ltexturesGenImageGradientH( lua_State *L ) {
if ( !lua_istable( L, -3 ) || !lua_istable( L, -2 ) || !lua_istable( L, -1 ) ) {
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 );
int i = 0;
for ( i = 0; i < state->imageCount; i++ ) {
if ( state->images[i] == NULL ) {
break;
}
}
state->images[i] = malloc( sizeof( Image ) );
*state->images[i] = GenImageGradientH( (int)size.x, (int)size.y, left, right );
lua_pushinteger( L, i );
checkImageRealloc( i );
return 1;
}
/*
> image = RL_GenImageGradientRadial( Vector2 size, float density, Color inner, Color outer )
Generate image: radial gradient
- Failure return -1
- 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 ) ) {
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 );
int i = 0;
for ( i = 0; i < state->imageCount; i++ ) {
if ( state->images[i] == NULL ) {
break;
}
}
state->images[i] = malloc( sizeof( Image ) );
*state->images[i] = GenImageGradientRadial( (int)size.x, (int)size.y, density, inner, outer );
lua_pushinteger( L, i );
checkImageRealloc( i );
return 1;
}
/*
> image = RL_GenImageChecked( Vector2 size, Vector2 checks, Color col1, Color col2 )
Generate image: checked
- Failure return -1
- Success return int
*/
int ltexturesGenImageChecked( lua_State *L ) {
if ( !lua_istable( L, -4 ) || !lua_istable( L, -3 ) || !lua_istable( L, -2 ) || !lua_istable( L, -1 ) ) {
TraceLog( LOG_WARNING, "%s", "Bad call of function. RL_GenImageChecked( Vector2 size, Vector2 checks, Color col1, Color col2 )" );
lua_pushinteger( L, -1 );
return 1;
}
Color col2 = uluaGetColor( L );
lua_pop( L, 1 );
Color col1 = uluaGetColor( L );
lua_pop( L, 1 );
Vector2 checks = uluaGetVector2( L );
lua_pop( L, 1 );
Vector2 size = uluaGetVector2( L );
int i = 0;
for ( i = 0; i < state->imageCount; i++ ) {
if ( state->images[i] == NULL ) {
break;
}
}
state->images[i] = malloc( sizeof( Image ) );
*state->images[i] = GenImageChecked( (int)size.x, (int)size.y, (int)checks.x, (int)checks.y, col1, col2 );
lua_pushinteger( L, i );
checkImageRealloc( i );
return 1;
}
/*
> image = RL_GenImageWhiteNoise( Vector2 size, float factor )
Generate image: white noise
- Failure return -1
- Success return int
*/
int ltexturesGenImageWhiteNoise( lua_State *L ) {
if ( !lua_istable( L, -2 ) || !lua_isnumber( L, -1 ) ) {
TraceLog( LOG_WARNING, "%s", "Bad call of function. RL_GenImageWhiteNoise( Vector2 size, float factor )" );
lua_pushinteger( L, -1 );
return 1;
}
float factor = lua_tonumber( L, -1 );
lua_pop( L, 1 );
Vector2 size = uluaGetVector2( L );
int i = 0;
for ( i = 0; i < state->imageCount; i++ ) {
if ( state->images[i] == NULL ) {
break;
}
}
state->images[i] = malloc( sizeof( Image ) );
*state->images[i] = GenImageWhiteNoise( (int)size.x, (int)size.y, factor );
lua_pushinteger( L, i );
checkImageRealloc( i );
return 1;
}
/*
> image = RL_GenImageCellular( Vector2 size, int tileSize )
Generate image: cellular algorithm. Bigger tileSize means bigger cells
- Failure return -1
- Success return int
*/
int ltexturesGenImageCellular( lua_State *L ) {
if ( !lua_istable( L, -2 ) || !lua_isnumber( L, -1 ) ) {
TraceLog( LOG_WARNING, "%s", "Bad call of function. RL_GenImageCellular( Vector2 size, int tileSize )" );
lua_pushinteger( L, -1 );
return 1;
}
int tileSize = lua_tointeger( L, -1 );
lua_pop( L, 1 );
Vector2 size = uluaGetVector2( L );
int i = 0;
for ( i = 0; i < state->imageCount; i++ ) {
if ( state->images[i] == NULL ) {
break;
}
}
state->images[i] = malloc( sizeof( Image ) );
*state->images[i] = GenImageCellular( (int)size.x, (int)size.y, tileSize );
lua_pushinteger( L, i );
checkImageRealloc( i );
return 1;
}
/*
## Textures - Image Drawing
*/