All taken care of. Here is the final code. If anyone sees anything here, please let me know:
Code:
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-40,$x+40,$y-40,$y+40,$z-40,$z+40);
}
sub EVENT_ENTER
{
quest::say("Hello, $name! I need some assistance.");
}
sub EVENT_EXIT
{
quest::say("Have a wonderful day, $name!");
}
sub EVENT_SAY
{
if($text =~ /Hail/i){
quest::say("Hello there, $name! I have had a hard time lately finding my [fishing] supplies"); }
if($text =~ /fishing/i){
quest::say("Yes! I lost my fishing rod and the grubs I used for bait. Can you help [find] them?"); }
if($text =~ /find/i){
quest::say("Great! Thank you very much! I hear that they can be found in the Field of Bone. Be careful, however! The Field of Bone is a dangerous place!"); }
}
sub EVENT_ITEM
{
if (plugin::check_handin(\%itemcount, 1096 => 1, 1118 => 1))
{
quest::say("Thank you for the help. Here's your reward!");
quest::SummonItem(1079);
}
}