mirror of
https://github.com/EQEmu/Server.git
synced 2026-06-10 23:20:25 +00:00
[Quest API] Add CopyHateList() to Perl/Lua. (#2623)
* [Quest API] Add CopyHateList() to Perl/Lua. # Perl - Add `$mob->CopyHateList(to_mob)`. # Lua - Add `mob:CopyHateList(to_mob)`. # Notes - Allows operators to easily copy and entire hatelist from one mob to another. * Update mob.cpp
This commit is contained in:
@@ -2678,6 +2678,11 @@ void Perl_Mob_SetEntityVariable(Mob* self, std::string variable_name, std::strin
|
||||
self->SetEntityVariable(variable_name, variable_value);
|
||||
}
|
||||
|
||||
void Perl_Mob_CopyHateList(Mob* self, Mob* to)
|
||||
{
|
||||
self->CopyHateList(to);
|
||||
}
|
||||
|
||||
#ifdef BOTS
|
||||
void Perl_Mob_DamageAreaBots(Mob* self, int64 damage) // @categories Hate and Aggro
|
||||
{
|
||||
@@ -2827,6 +2832,7 @@ void perl_register_mob()
|
||||
package.add("CloneAppearance", (void(*)(Mob*, Mob*))&Perl_Mob_CloneAppearance);
|
||||
package.add("CloneAppearance", (void(*)(Mob*, Mob*, bool))&Perl_Mob_CloneAppearance);
|
||||
package.add("CombatRange", &Perl_Mob_CombatRange);
|
||||
package.add("CopyHateList", &Perl_Mob_CopyHateList);
|
||||
package.add("Damage", (void(*)(Mob*, Mob*, int64, uint16_t, int))&Perl_Mob_Damage);
|
||||
package.add("Damage", (void(*)(Mob*, Mob*, int64, uint16_t, int, bool))&Perl_Mob_Damage);
|
||||
package.add("Damage", (void(*)(Mob*, Mob*, int64, uint16_t, int, bool, int8_t))&Perl_Mob_Damage);
|
||||
|
||||
Reference in New Issue
Block a user