View Single Post
  #3  
Old 10-25-2004, 07:45 PM
The_Horrid
Fire Beetle
 
Join Date: May 2004
Posts: 14
Default

You had about 5 or 7 closing curly brackets too many, and npcs generally cannot cast beneficial spells on players.
Therefore, use quest::selfcast(spellid);
Code:
#Quest made by John Von Draugr 10-25-04
  
sub EVENT_SAY    
 {    
if($text =~ /Hail/i)
 {
       quest::say("Greetings $name. I am the Qeynos Gate Healer and can offer you various services currently free of charge. As a member of the Order of Eternity  it is my duty to [bind your soul] to this location if that is your wish, or to offer [healing], cure [disease], cure [poison].");
 }
  
#Binding to Point 
if($text =~ /bind my soul/i)
  {    
       quest::say("Binding your soul.  You will return here when you die.");
       quest::castspell($userid,2049);
  }    

#Binding to Point (Alt) 
if($text =~ /bind/i)
  {    
       quest::say("Binding your soul.  You will return here when you die.");
       quest::castspell($userid,2049);
  }    

#Full Healing  
if($text =~ /healing/i)
  {    
       quest::say("Your wounds are washed away. Be well my child.");
       quest::selfcast(13);
  }    

#Cure Disease 
if($text =~ /cure disease/i)
  {    
       quest::say("I am removing the vile diseases from thy system.  Be well my child.");
       quest::selfcast(213);
  }    

#Cure Disease (Alt)  
if($text =~ /disease/i)
  {    
       quest::say("I am removing the vile diseases from thy system.  Be well my child.");
       quest::selfcast(,213);
  }    

#Cure Poison  
if($text =~ /cure poison/i)
  {    
       quest::say("I am cleansing thy system of the noxious posions within. Be well my child.");
       quest::selfcast(203);
  }    

#Cure Poison (Alt) 
if($text =~ /poison/i)    
  {    
       quest::say("I am cleansing thy system of the noxious posions within. Be well my child.");
       quest::selfcast(203);
  }    
}
The_Horrid
Reply With Quote