Spectral Guardian encounter

[Asylum]

I have updated the Taris.pl file to include links to the quest items in his conversation as well as clues to where players may obtain them.

#############
#Quest: Script for Spectral Guardian encounter
#NPCid 1269
#Name: Taris
#Race 128 (iksar)
#Location: x, y, z of $zonesn
#Level: 40
#Type: quest NPC
#Loot: tableid
#HP: 5000
#############

sub EVENT_SAY {
if($npc->GetRace() == 147) {
  if($text=~/Hail/i){
    quest::say("Help free me from this prison!  The elements have used the power within my spectral swords to...  What is that monstrosity in the distance?");
	}
}
else {
  my $fire = quest::varlink(3871);
  my $water = quest::varlink(3885);
  my $air = quest::varlink(3901);
  my $earth = quest::varlink(3902);
  if($text=~/Hail/i){
    quest::say("Hello, $name. What brings to you the spires of Dreadlands, a convergence of the [elements]?");
  }
  if($text=~/elements/i){
    quest::say("Not many know the true nature of the elements.  If you should bring me a pure [sample] of each, I can combine them for you.");
  }
  if($text=~/sample/i){
    quest::say("I require samples of $fire , $water , $air , and $earth .  These may be found from living elementals.");
  }
}
}

sub EVENT_ITEM {
# 3871 pure_fire, 3885 pure_water, 3901 pure_air, 3902 pure_earth
  if ((plugin::check_handin(\%itemcount, 3871 => 1, 3885 => 1, 3901 => 1, 3902 => 1)) && ($npc->GetRace() == 128)) {
    quest::emote("is shocked by the interaction of the pure elements.");
	quest::say("I think something is happening...");
	quest::npcfeature("race", 147);
	quest::spawn2(1257,0,0,9318,779,1065,64); #spawns First_Spectral_Guardian
	}
  plugin::return_items(\%itemcount);
}

sub EVENT_SIGNAL {
	if ($signal => 1) {
	quest::npcfeature("race", 128);
	}
}