View Single Post
  #4  
Old 05-23-2011, 12:01 PM
Astal
Hill Giant
 
Join Date: Mar 2010
Posts: 236
Default

Quote:
Originally Posted by Dragonthorne View Post
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);
          } 
}
i forget if all the code is case sensitive or not but try

quest::summonitem(1079,0); instead of caps, thats all i see off the top of my head, also add the 0 for good measure if it has 0 charges, or isnt stacked. Says its optional but worth a try i keep it in all my summonitem scripts
Reply With Quote