$EntityList->DeleteNPCCorpses();

**trevius** · #1 08-10-2008, 04:15 AM

I am getting closer! At least now I can get the corpse to actually delete or decay using one of these 2 options:

Delete Corpse:

Code:

my $deadnpc = $entity_list->GetCorpseByName("Tiny_Albino_Rat's corpse445");

  if ($deadnpc) {
    my $delete_corpse = $deadnpc->CastToCorpse();
    $delete_corpse->Delete(); }
    
    quest::say ("$deadnpc");

}

Decay Corpse after 1 Second:

Code:

my $deadnpc = $entity_list->GetCorpseByName("Tiny_Albino_Rat's corpse445");

  if ($deadnpc) {
    my $delete_corpse = $deadnpc->CastToCorpse();
    $delete_corpse->SetDecayTimer(1); }
    
    quest::say ("$deadnpc");

}

This option works as well for specifying the corpses:

Code:

my $deadnpc = $entity_list->GetCorpseByID(631);

Now, if I can just figure out how to do it without having to be so specific as to put the exact name or ID I want to delete... I will keep you all informed if I come up with a solution.

**trevius** · #2 08-10-2008, 04:37 AM

This is promising! This isn't exactly what I want just yet, but I think it can definitely be useful. This will delete all corpses in the zone:

Code:

$entity_list->DeleteNPCCorpses();

I still want to be able to specify which ones I want to delete.

**trevius** · #3 08-10-2008, 04:58 AM

Maybe this can help for automatically poofing empty corpses:

Code:

$corpse->IsEmpty();

Now, if I can only figure out how to make them target their own corpse when they die, or something to that effect.

**trevius** · #4 08-10-2008, 07:14 AM

This seems to work to only delete the corpse if it is empty:

Code:

my $deadnpc = $entity_list->GetCorpseByName("Tiny_Albino_Rat's corpse423");

  if ($deadnpc->IsEmpty()) {
    my $delete_corpse = $deadnpc->CastToCorpse();
    $delete_corpse->SetDecayTimer(1); }

The only thing left is to figure out how to select corpses without having to provide an exact name or entity ID number.

**joligario** · #5 08-10-2008, 09:13 AM

Maybe there is a GetCorpseByType?

**trevius** · #6 08-10-2008, 09:04 PM

I am just going off of the list of Quest Objects from the Wiki here:

http://www.eqemulator.net/wiki/wikka...a=QuestObjects

I don't see anything there that will do what I need exactly. Unless maybe more were added that just aren't in the Wiki yet.

What I really need is either a way for an NPC to somehow identify it's corpse via exact name or entity ID, or a way to have the script look at all corpses in the zone.

I am not at home right now, but maybe something like this would work to have it check all corpses in the zone:

Code:

my $deadnpc = $entity_list->IsNPCCorpse();

  if ($deadnpc->IsEmpty()) {
    my $delete_corpse = $deadnpc->CastToCorpse();
    $delete_corpse->SetDecayTimer(1); }

I am doubtful, as I don't think that is actually getting anything, but rather for checking if it is a corpse or not. I will test it later tonight. But, I am definitely open to suggestions

**trevius** · #7 08-11-2008, 04:36 AM

Woot! I finally figured it out!

http://www.eqemulator.net/forums/sho...131#post154131

Now, I just need to do some in depth testing on it. My only concern is the variables possibly being used by multiple NPCs and causing the IDs to not match up. But, so far my testing shows that it at least works!