[Quest API] Add GetBaseRaceName() to Perl and Lua (#3668)

This commit is contained in:
JJ
2023-10-31 21:43:04 -04:00
committed by GitHub
parent 97caa79472
commit cc985cbcd5
3 changed files with 13 additions and 0 deletions
+6
View File
@@ -462,6 +462,11 @@ int Perl_Mob_GetBaseRace(Mob* self) // @categories Stats and Attributes
return self->GetBaseRace();
}
std::string Perl_Mob_GetBaseRaceName(Mob* self) // @categories Stats and Attributes
{
return GetRaceIDName(self->GetBaseRace());
}
int Perl_Mob_GetBaseGender(Mob* self) // @categories Stats and Attributes
{
return self->GetBaseGender();
@@ -3490,6 +3495,7 @@ void perl_register_mob()
package.add("GetAssistRange", &Perl_Mob_GetAssistRange);
package.add("GetBaseGender", &Perl_Mob_GetBaseGender);
package.add("GetBaseRace", &Perl_Mob_GetBaseRace);
package.add("GetBaseRaceName", &Perl_Mob_GetBaseRaceName);
package.add("GetBaseSize", &Perl_Mob_GetBaseSize);
package.add("GetBeard", &Perl_Mob_GetBeard);
package.add("GetBeardColor", &Perl_Mob_GetBeardColor);