Qglobal problem

[aza77]

sub EVENT_SAY
  {
  if ($text=~/hail/i && $zavious == 1)
  {
    $zavious = undef;
    quest::say("Have you retrieved the four books that the Ambassador requested
    from Crushbone?");
  }
  if ($text=~/hail/i && $zavious == 2)
  {
    $zavious = undef;
    quest::say("Are you [willing] to perform another task for the council?");
  }
  if ($text=~/hail/i && $zavious == 3)
  {
    $zavious = undef;
    quest::say("Have you discovered what else the orcs are doing in Crushbone?");
  }
  if ($text=~/hail/i && $zavious == 4)
  {
    $zavious = undef;
    quest::say("Good luck on your journey $name. May the Five light your path.");
  }
  if ($text=~/willing/i && $zavious == 2)
  {
     $zavious = undef;
    quest::say("Good, then you shall set off immediately to Crushbone. Some of
    the adventurers that returned reported seeing a log cabin holding someone of
    importance. We wish you to seek this person out and discover what else the
    Orcs are doing. #summonitem 69977");
    quest::setglobal("zavious",3,0,"M2");
    $zavious = undef;
  }
  if ($zavious == 0)
  {
  $zavious = undef;
  if ($text=~/Hail/i)
  {
    quest::say("Hello $name. I have been expecting you. Ambassador Dumont told
    me you would be arriving shortly. Do you have the four books that the
    Ambassador told you to retrieve from Crushbone? If so, hand them to me.
    #summonitem 51510");
    quest::setglobal("zavious",1,0,"M2");
    $zavious = undef;
  }
  }
}


  sub EVENT_ITEM
  {
  if (plugin::check_handin(\%itemcount, 51510 => 4) && $zavious == 1)
  {
   $zavious = undef;
   quest::say("Ahhh you have returned with the books. You say the humanoids call
   themselves Orcs?  Hmmm.. Interesting.. The council will study these books to
   decipher what is written within them. Ambassador Dumont thanks you as do I,
   brave $race. If your still [willing] they have another task for you.");
   quest::setglobal("zavious",2,0,"M2");
   $zavious = undef;
  }
  elsif (plugin::check_handin(\%itemcount, 69977 => 1) && $zavious == 3)
  {
    $zavious = undef;
   quest::say("What is this $name? It appears to be some kind of battleplan. Is
   that Felwithe?! This truly is an amazing discovery my friend. Take this to
   Councillor Elandilira. I think she may like to hear of this discovery. It is
   a quick translation of the battleplans.");
   quest::summonitem(1004);
   quest::setglobal("zavious",4,0,"M2");
   $zavious = undef;
  }
  else
  {
   (plugin::return_items(\%itemcount));
   quest::say("This isn't what I'm looking for.");
  }
}
}