Quest help

[hayward6]

Here's my work so far on the Hired hand quest I am designing for my server. Like I mentioned before I would like to give players the ability to hire npc help rather than fight alone if they chose. This is far from done, but this will help you get an idea of what im doing I need a few things to work this out...

1. I need the ability to make the summoned nps the same level as the player.
2. I need to make sure giving a certain amout of money can trigger the event.
3. I need to set a limit so only one helper can be assigned at a time to each player.

Here's what I have. This will be placed on an npc in freeport that everyone has so that the database wont need editing if someone else wishes to use it.

####################################
# Freeport Hired Hand Quest
#####################################
sub EVENT_SAY
{
 if($text=~/Hail/i)
  {
    quest::emote("Looks around the room carefully");
    quest::pause(2);
    quest::say("Hail. $name!  I had to be sure you were alone, this type of (buisness) is not always accepted among the people here.");
  }
  if($text=~/buisness/i)
  {
    quest::say("What! you don't know of my trade? Have you not heard of the Freeport Hired Hands? Oh come now, don't tell me you haven't come to hire an (Adventurer) from me.");
  }
  if($text=~/adventurer/i)
  {
    quest::say("Yes, an adventurer! I have some of the finest (cleric's), (Warrior's) and (Wizard's) Norrath has ever seen. If hired they will fight at your side for the day.");
  }
  if($text=~/cleric's/i)
  {
    quest::say("Yes the cleric's I have are very experienced and will help to keep you alive in combat. Trade me 2 Gold for the services of a Cleric for one day.");
  }
  if($text=~/warrior's/i)
  {
    quest::say("Yes the Warrior's I have are very experienced in battle and will protect you well. Trade me 4 Gold for the services of a Warrior for one day.");
  }
  if($text=~/Wizard's/i)
  {
    quest::say("Yes, the Wizard's I have are very experienced in battle and will assist you well. Trade me 6 Gold for the services of a Warrior for one day.");
}

#Summoning the Hired Hand Cleric 2 gold, Warrior 4 gold, Wizard 6 gold.

sub EVENT_ITEM
{
	#Cleric
	if($gold==2){
		quest::say("Thank you, this Cleric is among my finest and, will serve you well."); 
		quest::givepet(npcid);
}
sub EVENT_ITEM
{
        #Warrior
	if($gold==4){
		quest::say("Thank you, this Warrior is among my finest and, will serve you well."); 
		quest::givepet(npcid);
}
sub EVENT_ITEM
{
        #Wizard
	if($gold==6){
		quest::say("Thank you, this Wizard is among my finest and, will serve you well."); 
		quest::givepet(npcid);
}

#end of quest