After I started the perl script for this, I realized there has to be a better way of summoning multiple npcs to an npc.
I am trying to make Cazic Thule, once aggroed, summon forth all the spawned mobs in fear to assist him.
Is there a way to choose a range of ID #s to add to hate list? Or some other fabulous way that I have no idea about.
Code:
sub EVENT_AGGRO {
quest::shout("Denizens of Fear, your master commands you to come forth to his aid!!");
my $a_scareling_mob = $entity_list->GetMobByNpcTypeID(72005);
my $a_shiverback_mob = $entity_list->GetMobByNpcTypeID(72006);
if ($a_scareling_mob) {
my $a_scareling_mobnpc = $a_scareling_mob->CastToNPC();
$a_scareling_mobnpc->AddToHateList($client, 1);
}
if ($a_shiverback_mob) {
my $a_shiverback_mobnpc = $a_shiverback_mob->CastToNPC();
$a_shiverback_mobnpc->AddToHateList($client, 1);
}
}