Why isn't this working? Test Dummy Script.

[oslander]

I'm trying to make a test dummy that will leave combat when you run a little distance away. He'll say everything on the script when you hail and run off but he won't lose his aggro. Any help?

sub EVENT_SPAWN
{
my $x;
my $y;
my $z;
my $h;

$x = $npc->GetX();
$y = $npc->GetY();
$z = $npc->GetZ();
$h = $npc->GetHeading();


 quest::set_proximity( $x-10,$x+10,$y-10,$y+10,$z-10,$z+10);
} 

sub EVENT_EXIT
{
quest::say("What's the matter? Did somebody steal your sweetroll? Fine, I'll leave you alone for now...");
$mob->WipeHateList();
}

sub EVENT_SAY
{

  if ($text=~/hail/i)
  {
  quest::say("Looking to test your combat skills out? See if you can hit me, $name.");
  }
 
}
}