View Single Post
  #7  
Old 03-12-2014, 01:38 PM
nilbog nilbog is offline
Project Manager

nilbog's Avatar

Join Date: Oct 2009
Posts: 14,645
Default

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);
}
}
}
}
}