indrajith/RCBASIC4
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Added JointExists() and SpriteExists()

Browse Source
This commit is contained in:
n00b
2024-12-22 18:16:13 -05:00
parent a2c9d4952c
commit f2af1d4045
16 changed files with 1135 additions and 1072 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
rcbasic_build/intern_inc/switch_cases.h
View File

@@ -478,6 +478,7 @@ rc_setSpriteType( SETSPRITETYPE_SPRITE, SETSPRITETYPE_SPRITE_TYPE )
rc_getSpriteType( GETSPRITETYPE_SPRITE )
rc_setSpriteSource( SETSPRITESOURCE_SPRITE, SETSPRITESOURCE_IMG )
rc_getSpriteSource( GETSPRITESOURCE_SPRITE )
rc_spriteExists( SPRITEEXISTS_SPRITE )
rc_createSpriteAnimation( CREATESPRITEANIMATION_SPRITE, CREATESPRITEANIMATION_ANIM_LENGTH, CREATESPRITEANIMATION_SPEED )
rc_setSpriteFrame( SETSPRITEFRAME_SPRITE, SETSPRITEFRAME_FRAME )
rc_getSpriteFrame( GETSPRITEFRAME_SPRITE )
@@ -615,6 +616,7 @@ rc_getJointAngle( GETJOINTANGLE_JOINT_ID )
rc_getJointLinearSpeed( GETJOINTLINEARSPEED_JOINT_ID )
rc_getJointAngularSpeed( GETJOINTANGULARSPEED_JOINT_ID )
rc_deleteJoint( DELETEJOINT_JOINT_ID )
rc_jointExists( JOINTEXISTS_JOINT_ID )
rc_createTileSet( CREATETILESET_IMG_ID, CREATETILESET_TILE_W, CREATETILESET_TILE_H )
rc_setTileAnimationLength( SETTILEANIMATIONLENGTH_TILESET, SETTILEANIMATIONLENGTH_BASE_TILE, SETTILEANIMATIONLENGTH_NUM_FRAMES )
rc_getTileAnimationLength( GETTILEANIMATIONLENGTH_TILESET, GETTILEANIMATIONLENGTH_BASE_TILE )

1
rcbasic_build/intern_lib/joint2D.bas
View File

@@ -66,3 +66,4 @@ function getJointAngle( joint_id)
function getJointLinearSpeed( joint_id)
function getJointAngularSpeed( joint_id)
Sub DeleteJoint( joint_id )
function JointExists( joint_id )

1
rcbasic_build/intern_lib/sprites.bas
View File

@@ -24,3 +24,4 @@ Sub SetSpriteType(sprite, sprite_type)
Function GetSpriteType(sprite)
Sub SetSpriteSource(sprite, img)
Function GetSpriteSource(sprite)
Function SpriteExists(sprite)

4
rcbasic_build/rc_builtin.h
View File

@@ -1388,6 +1388,8 @@ void init_embedded_functions()
add_embedded_arg("img", ID_TYPE_NUM);
embed_function("GetSpriteSource", ID_TYPE_FN_NUM);
add_embedded_arg("sprite", ID_TYPE_NUM);
embed_function("SpriteExists", ID_TYPE_FN_NUM);
add_embedded_arg("sprite", ID_TYPE_NUM);
embed_function("CreateSpriteAnimation", ID_TYPE_FN_NUM);
add_embedded_arg("sprite", ID_TYPE_NUM);
add_embedded_arg("anim_length", ID_TYPE_NUM);
@@ -1835,6 +1837,8 @@ void init_embedded_functions()
add_embedded_arg("joint_id", ID_TYPE_NUM);
embed_function("DeleteJoint", ID_TYPE_SUB);
add_embedded_arg("joint_id", ID_TYPE_NUM);
embed_function("JointExists", ID_TYPE_FN_NUM);
add_embedded_arg("joint_id", ID_TYPE_NUM);
embed_function("CreateTileSet", ID_TYPE_FN_NUM);
add_embedded_arg("img_id", ID_TYPE_NUM);
add_embedded_arg("tile_w", ID_TYPE_NUM);

BIN
rcbasic_build/rcbasic4_changes.ods
View File

Binary file not shown.

4
rcbasic_build/rcbasic_dev.txt
View File

@@ -1382,6 +1382,8 @@ add_embedded_arg("sprite", ID_TYPE_NUM);
add_embedded_arg("img", ID_TYPE_NUM);
embed_function("GetSpriteSource", ID_TYPE_FN_NUM);
add_embedded_arg("sprite", ID_TYPE_NUM);
embed_function("SpriteExists", ID_TYPE_FN_NUM);
add_embedded_arg("sprite", ID_TYPE_NUM);
embed_function("CreateSpriteAnimation", ID_TYPE_FN_NUM);
add_embedded_arg("sprite", ID_TYPE_NUM);
add_embedded_arg("anim_length", ID_TYPE_NUM);
@@ -1829,6 +1831,8 @@ embed_function("getJointAngularSpeed", ID_TYPE_FN_NUM);
add_embedded_arg("joint_id", ID_TYPE_NUM);
embed_function("DeleteJoint", ID_TYPE_SUB);
add_embedded_arg("joint_id", ID_TYPE_NUM);
embed_function("JointExists", ID_TYPE_FN_NUM);
add_embedded_arg("joint_id", ID_TYPE_NUM);
embed_function("CreateTileSet", ID_TYPE_FN_NUM);
add_embedded_arg("img_id", ID_TYPE_NUM);
add_embedded_arg("tile_w", ID_TYPE_NUM);

1076
rcbasic_build/rcbasic_dev2.txt
View File

File diff suppressed because it is too large Load Diff

6
rcbasic_build/rcbasic_dev3.txt
View File

@@ -1466,6 +1466,9 @@ case FN_SetSpriteSource: //Sub Procedure
case FN_GetSpriteSource: //Number Function
rc_push_num(rc_getSpriteSource( GETSPRITESOURCE_SPRITE ));
break;
case FN_SpriteExists: //Number Function
rc_push_num(rc_spriteExists( SPRITEEXISTS_SPRITE ));
break;
case FN_CreateSpriteAnimation: //Number Function
rc_push_num(rc_createSpriteAnimation( CREATESPRITEANIMATION_SPRITE, CREATESPRITEANIMATION_ANIM_LENGTH, CREATESPRITEANIMATION_SPEED ));
break;
@@ -1877,6 +1880,9 @@ case FN_getJointAngularSpeed: //Number Function
case FN_DeleteJoint: //Sub Procedure
rc_deleteJoint( DELETEJOINT_JOINT_ID );
break;
case FN_JointExists: //Number Function
rc_push_num(rc_jointExists( JOINTEXISTS_JOINT_ID ));
break;
case FN_CreateTileSet: //Number Function
rc_push_num(rc_createTileSet( CREATETILESET_IMG_ID, CREATETILESET_TILE_W, CREATETILESET_TILE_H ));
break;