[Quest API] Add GetDeityName() to Perl/Lua (#4180)

# Perl
- Add `$mob->GetDeityName()`.

# Lua
- Add `mob:GetDeityName()`.

# Notes
- Allows operators to get a mob's deity name.
This commit is contained in:
Alex King
2024-03-13 20:27:31 -04:00
committed by GitHub
parent 6ca11256c6
commit 95cc22ffbb
3 changed files with 14 additions and 0 deletions
+6
View File
@@ -3420,6 +3420,11 @@ bool Perl_Mob_IsAlwaysAggro(Mob* self)
return self->AlwaysAggro();
}
std::string Perl_Mob_GetDeityName(Mob* self)
{
return EQ::deity::GetDeityName(static_cast<EQ::deity::DeityType>(self->GetDeity()));
}
void perl_register_mob()
{
perl::interpreter perl(PERL_GET_THX);
@@ -3628,6 +3633,7 @@ void perl_register_mob()
package.add("GetDR", &Perl_Mob_GetDR);
package.add("GetDamageAmount", &Perl_Mob_GetDamageAmount);
package.add("GetDeity", &Perl_Mob_GetDeity);
package.add("GetDeityName", &Perl_Mob_GetDeityName);
package.add("GetDisplayAC", &Perl_Mob_GetDisplayAC);
package.add("GetDrakkinDetails", &Perl_Mob_GetDrakkinDetails);
package.add("GetDrakkinHeritage", &Perl_Mob_GetDrakkinHeritage);