Added GetSpriteRestitutionThreshold()

This commit is contained in:
n00b
2024-11-17 23:16:51 -05:00
parent b9275b7d80
commit 5048597745
10 changed files with 973 additions and 947 deletions

View File

@@ -919,7 +919,7 @@ int main(int argc, char * argv[])
bool clean_after_build = false;
//DEBUG START
rc_filename = "/home/n00b/Projects/RCBASIC4/rcbasic_runtime/bin/Release/unittest.bas";
//rc_filename = "/home/n00b/Projects/RCBASIC4/rcbasic_runtime/bin/Release/unittest.bas";
//DEBUG END
if(argc > 1)

View File

@@ -1534,6 +1534,8 @@ void init_embedded_functions()
embed_function("SetSpriteRestitutionThreshold", ID_TYPE_SUB);
add_embedded_arg("spr_id", ID_TYPE_NUM);
add_embedded_arg("threshold", ID_TYPE_NUM);
embed_function("GetSpriteRestitutionThreshold", ID_TYPE_FN_NUM);
add_embedded_arg("spr_id", ID_TYPE_NUM);
embed_function("GetSpriteAABB", ID_TYPE_SUB);
add_embedded_arg("spr_id", ID_TYPE_NUM);
add_embedded_arg("x1", ID_TYPE_BYREF_NUM);

View File

@@ -1015,6 +1015,7 @@ N main.SetSpriteRestitution restitution 1
N main.GetSpriteRestitution spr_id 0
N main.SetSpriteRestitutionThreshold spr_id 0
N main.SetSpriteRestitutionThreshold threshold 1
N main.GetSpriteRestitutionThreshold spr_id 0
N main.GetSpriteAABB spr_id 0
BN main.GetSpriteAABB x1 1
BN main.GetSpriteAABB y1 2

View File

@@ -1528,6 +1528,8 @@ add_embedded_arg("spr_id", ID_TYPE_NUM);
embed_function("SetSpriteRestitutionThreshold", ID_TYPE_SUB);
add_embedded_arg("spr_id", ID_TYPE_NUM);
add_embedded_arg("threshold", ID_TYPE_NUM);
embed_function("GetSpriteRestitutionThreshold", ID_TYPE_FN_NUM);
add_embedded_arg("spr_id", ID_TYPE_NUM);
embed_function("GetSpriteAABB", ID_TYPE_SUB);
add_embedded_arg("spr_id", ID_TYPE_NUM);
add_embedded_arg("x1", ID_TYPE_BYREF_NUM);

File diff suppressed because it is too large Load Diff

View File

@@ -1613,6 +1613,9 @@ case FN_GetSpriteRestitution: //Number Function
case FN_SetSpriteRestitutionThreshold: //Sub Procedure
rc_setSpriteRestitutionThreshold( SETSPRITERESTITUTIONTHRESHOLD_SPR_ID, SETSPRITERESTITUTIONTHRESHOLD_THRESHOLD );
break;
case FN_GetSpriteRestitutionThreshold: //Number Function
rc_push_num(rc_getSpriteRestitutionThreshold( GETSPRITERESTITUTIONTHRESHOLD_SPR_ID ));
break;
case FN_GetSpriteAABB: //Sub Procedure
rc_getSpriteAABB( GETSPRITEAABB_SPR_ID, &GETSPRITEAABB_X1, &GETSPRITEAABB_Y1, &GETSPRITEAABB_X2, &GETSPRITEAABB_Y2 );
break;