pa/eqemu-server
2
0
Fork 0
mirror of https://github.com/EQEmu/Server.git synced 2026-08-29 12:47:54 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

[Quest API] Add IsAttackAllowed() to Perl/Lua. (#2672)

Browse Source 
# Perl
- Add `$mob->IsAttackAllowed(target)`.
- Add `$mob->IsAttackAllowed(target, is_spell_attack)`.

# Lua
- Add `mob:IsAttackAllowed(target)`.

# Notes
- Lua had `mob:IsAttackAllowed(target, is_spell_attack)` but not the other overload.
- Perl had neither.
This commit is contained in:
Alex King
2022-12-25 16:17:46 -05:00
committed by GitHub
parent 860b545fe3
commit d1430f6834
3 changed files with 26 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files
zone/perl_mob.cpp
+12
View File
@@ -2693,6 +2693,16 @@ void Perl_Mob_CopyHateList(Mob* self, Mob* to)
self->CopyHateList(to);
}
bool Perl_Mob_IsAttackAllowed(Mob* self, Mob* target)
{
return self->IsAttackAllowed(target);
}
bool Perl_Mob_IsAttackAllowed(Mob* self, Mob* target, bool is_spell_attack)
{
return self->IsAttackAllowed(target, is_spell_attack);
}
#ifdef BOTS
void Perl_Mob_DamageAreaBots(Mob* self, int64 damage) // @categories Hate and Aggro
{
@@ -3100,6 +3110,8 @@ void perl_register_mob()
package.add("InterruptSpell", (void(*)(Mob*, uint16))&Perl_Mob_InterruptSpell);
package.add("IsAIControlled", &Perl_Mob_IsAIControlled);
package.add("IsAmnesiad", &Perl_Mob_IsAmnesiad);
package.add("IsAttackAllowed", (bool(*)(Mob*, Mob*))&Perl_Mob_IsAttackAllowed);
package.add("IsAttackAllowed", (bool(*)(Mob*, Mob*, bool))&Perl_Mob_IsAttackAllowed);
package.add("IsBeacon", &Perl_Mob_IsBeacon);
package.add("IsBeneficialAllowed", &Perl_Mob_IsBeneficialAllowed);
package.add("IsBlind", &Perl_Mob_IsBlind);