[Quest API] Add Hatelist Count Methods to Perl/Lua

[Kinglykrab]

Perl

• Add $mob->GetHateListCount().
• Add $mob->GetHateListBotCount().
• Add $mob->GetHateListClientCount().
• Add $mob->GetHateListNPCCount().

Lua

• Add mob:GetHateListCount().
• Add mob:GetHateListBotCount().
• Add mob:GetHateListClientCount().
• Add mob:GetHateListNPCCount().

Perl Example Script

sub EVENT_SAY {
	if ($text=~/#a/i) {
		my $h = $client->GetTarget() ? $client->GetTarget()->GetHateListCount() : 0;
		my $b = $client->GetTarget() ? $client->GetTarget()->GetHateListBotCount() : 0;
		my $c = $client->GetTarget() ? $client->GetTarget()->GetHateListClientCount() : 0;
		my $n = $client->GetTarget() ? $client->GetTarget()->GetHateListNPCCount() : 0;
		quest::message(315, "H: $h B: $b C: $c N: $n");
	}
}

Image

Notes

• Allows operators to more easily get a total entity count of a Mob's hate list, can do an overall count, or specifically bots, clients, or NPCs.