[Quest API] Add IsUnderwaterOnly() to Perl/Lua (#2995)

# Perl
- Add `$npc->IsUnderwaterOnly()`.

# Lua
- Add `npc:IsUnderwaterOnly()`.

# Notes
- Allows operators to chec k if an NPC is underwater only.
This commit is contained in:
Alex King
2023-02-28 21:13:43 -05:00
committed by GitHub
parent 69c6a7b89a
commit 9a5bf53e11
3 changed files with 13 additions and 0 deletions
+6
View File
@@ -765,6 +765,11 @@ void Perl_NPC_ScaleNPC(NPC* self, uint8 npc_level, bool override_special_abiliti
return self->ScaleNPC(npc_level, override_special_abilities);
}
bool Perl_NPC_IsUnderwaterOnly(NPC* self) // @categories Script Utility
{
return self->IsUnderwaterOnly();
}
bool Perl_NPC_HasSpecialAbilities(NPC* self) // @categories Script Utility
{
return self->HasSpecialAbilities();
@@ -868,6 +873,7 @@ void perl_register_npc()
package.add("IsRaidTarget", &Perl_NPC_IsRaidTarget);
package.add("IsRareSpawn", &Perl_NPC_IsRareSpawn);
package.add("IsTaunting", &Perl_NPC_IsTaunting);
package.add("IsUnderwaterOnly", (bool(*)(NPC*))&Perl_NPC_IsUnderwaterOnly);
package.add("MerchantCloseShop", &Perl_NPC_MerchantCloseShop);
package.add("MerchantOpenShop", &Perl_NPC_MerchantOpenShop);
package.add("ModifyNPCStat", &Perl_NPC_ModifyNPCStat);