The way this is written is if you are non-invised in the zone, they aggro you. It's not just 'seeing' you uninvised.
Should be working, but here is the perl I wrote for it for those curious.
Quote:
#nilbog
#pog aggro zonewide
sub EVENT_SPAWN {
quest::settimer("hater",30);
}
sub EVENT_TIMER {
if ($timer eq "hater")
{
my @entitysnapshot = $entity_list->GetClientList();
foreach $entity (@entitysnapshot)
{
my $facc = $entity->GetModCharacterFactionLevel(263); #protectorsofgrowth
if ($facc < -699)
{
unless (($entity->IsInvisible($entity)) || ($entity->GetGM()))
{
$npc->AddToHateList($entity,1);
}
}
}
}
}
|