Nadox instant respawn solution

[Angelox]

here's a little "fix" to these Pl's;

This eliminates the quest::ChooseRandom numbers that don't really exist, and might be a little more accurate-

# respawn random mob on a sanctum sentinel death - list favors another sanctum sentinel
# 90% of the time

sub EVENT_DEATH
{
 my $random_result = int(rand(100));
 my $x = $npc->GetX();
 my $y = $npc->GetY();
 my $z = $npc->GetZ(); 
 my $h = $npc->GetHeading();
 my $a = 227097;
 if ($random_result<=10)
  {
  quest::say("Surprise! Time to die, fool!");
  quest::spawn2($a,0,0,$x,$y,$z,$h);
  }
 else
  {
  quest::say("Lord Nadox will avenge me!");
  }
}

# EOF zone: nadox NPC: a_sanctum_sentinel, Captain_Krakskull