#Trials script - terror
sub EVENT_COMBAT
{
    if ($combat_state == 1)
    {
        quest::emote("begins to channel destructive energy.");
        quest::settimer("death",20);
    }
    if ($combat_state == 0)
    {
        quest::stoptimer("death");
    }
}

sub EVENT_TIMER
{
    if ($timer eq "death")
    {
        my $RTarget = $npc->GetHateRandom();
    if ($RTarget) {
        $npc->SpellFinished(23053,$RTarget);
    }
}
}

sub EVENT_KILLED_MERIT
{
    $client->AddCrystals(0, 5);
}