Entity_List->GetMobList() works on existing NPCs, not my custom NPC

[redshoes3]

I'm making a script that has a custom NPC completing other quests, so I am trying to make a script to find and attack other npcs.

I tested a simple script on my buddy Waradern_Skymoor in qeytoqrg:

sub killthings {

	my @nlist = $entity_list->GetMobList();
	quest::shout($nlist[0]->GetName());
	my $x = $nlist[0]->GetX();
	my $y = $nlist[0]->GetY();
	my $z = $nlist[0]->GetZ();
	quest::say($x);
	quest::SetRunning(1);
	quest::moveto($x,$y,$z,1.2);
	$nlist[1]->Attack($npc);
	
}

it works, and Waradern runs off towards a gnoll.

However, now that I've put this on my custom NPC, GetMobList() only has my PC character as a member. GetNPCList() is completely empty. If I look for $nlist[1], Perl throws an error for calling GetName() on undefined.

I've checked their database entries, and nothing looks too out of place. I inserted my custom NPC using the EOC platform, and the only difference I can see is that I've made my NPC unique by name. Both are the only members of their spawngroups, both have similar values, etc... I would guess that my NPC is on a different entity list than the rest for some reason.

Any thoughts?

[Akkadius]

Take a look at this extremely valuable/powerful write up:

http://wiki.eqemulator.org/p?Entity_...ow_to_Use_Them

[Kingly_Krab]

A better way of writing it would be this:

sub killthings {
    my @nlist = $entity_list->GetMobList();
    foreach my $npc (@nlist) {
        if ($npc->GetEnt()->CastToNPC()->GetNPCTypeID() == FIRSTID) {
            quest::SetRunning(1);
            my $at = $entity_list->GetNPCByNPCTypeID(SECONDID);
            quest::moveto($at->GetX(), $at->GetY(), $at->GetZ(), 1.2);
            $npc->GetEnt()->CastToNPC()->Attack($at);
        }
    }
}

[redshoes3]

thanks for responding so fast, guys. I'm clearly behind.

Akkadius, your writeup was very helpful.

Kingly, would you recommend always getting NPC by ID? I implemented it with NPCList so that I wouldn't have to specify other NPC types, and attacking would be determined by a survival function or sanity checks.

[NatedogEZ]

You want 1 mob running around killing multiple mobs?

[redshoes3]

yes.

I want to play around with AI, and I need a fake PC.

[NatedogEZ]

Heres an example of a quest where the mob just runs around killing stuff :p

sub EVENT_SPAWN {
	quest::settimer("fuck_shit_up", 5);
}

sub EVENT_TIMER {
	if($timer eq "fuck_shit_up" && !$npc->IsEngaged()) {
		KillMode();
	}
}

sub KillMode {
    my @npc_list = $entity_list->GetNPCList();
    foreach $npc_ent (@npc_list) {
		next if $npc_ent->GetID() == $npc->GetID(); #Lets not kill ourself
		next if $npc_ent->GetOwnerID(); #skip pets
		next if ($npc_ent->GetSpecialAbility(19) || $npc_ent->GetSpecialAbility(20) || $npc_ent->GetSpecialAbility(24) || $npc_ent->GetSpecialAbility(35)); #Immune to melee / magic / aggro / noharm SKIP
		next if $npc_ent->GetBodyType() == 11; #Skip untargetable NPCs
		next if $npc_ent->CalculateDistance($x, $y, $z) > 1000; #skip mobs over 1000 Distance
		quest::shout("I am coming for you, " . $npc_ent->GetCleanName() . "!");
		quest::SetRunning(1);
		$npc->AddToHateList($npc_ent, 1); #We now HATE HIM!
		last; #we found a valid target jump out of the loop
    }
}

[Shendare]

That looks like it could be a lot of fun for testing. Especially if you make the aggressor mob NoHarm.

[Akkadius]

I love you Natedog

[redshoes3]

Thanks, Nate. That's a lot cleaner than what I wrote.