Doomshade Raid Event

[WildcardX]

Here is my submission for the spawning of Doomshade in Umbral Plains.

A_Dark_Master.pl

# Doomshade event

my $counter = 0;

sub EVENT_SPAWN {
  $counter += 1;
  
  if ($counter == 4) {
     quest::settimer("chant",1800);
     quest::emote("begins to chant to the coming of doom");
  }
  
  my $depop = $entity_list->GetMobByNpcTypeID(176088);
  if ($depop) {
     my $depopdoomshade = $depop->CastToNPC();
     $depopdoomshade->Depop();
  }
}

sub EVENT_TIMER {
   if ($timer eq "chant") {
      quest::emote("begins to chant to the coming of doom");
   }
}

sub EVENT_DEATH {
   $counter -= 1;
   if ($counter == 0) {
      quest::spawn2(176088,0,0,119.2,-282.6, -0.2, 360);
      quest::stoptimer("chant");
   }
}

# zone: umbral ID: 176042 NPC: A_Dark_Master

#Doomshade.pl

# Doomshade event

sub EVENT_SPAWN {
  quest::me("a tortured scream echos thru the lands as a cursed soul is released");
}

# zone: umbral ID: 176088 NPC: #Doomshade

FYI... Please note that the emotes aren't precisley correct. When doomshade spawns there is suppose to be a zone wide emote that isn't suppose to come from any NPC, so I used a quest::me(), but that appears to work excatly like a quest::say()

Anyway, enjoy it.

[fathernitwit]

It would be best to post quests on the PEQ forums so they can be added to the PEQ quest pack. If your going to be writting many quests, you should ask to join the PEQ quest team, it makes a lot of things easier.

[WildcardX]

Ok will do.