Thread: My first .pl
View Single Post
  #16  
Old 02-25-2005, 12:21 PM
Richardo
Banned
 
Join Date: Oct 2003
Location: Mattmecks Basement
Posts: 546
Default

This should work for you... It works for me perfectly...

sub EVENT_SAY {
if ($text=~/Hail/i)
{
quest::say("Greetings $name. When a hero of our world is
slain, their soul returns to the place it was last bound and the body is
reincarnated. As a member of the Order of Eternity, it is my duty to
[bind your soul] to this location if that is your wish.");
}
if ($text=~/bind my soul/i)
{
quest::say("Very well, you will return to this spot when you die.");
quest::selfcast(2049);
}
}


Ok now lets look over your quests...

sub EVENT_SAY {
if ($text=~/Hail/i){quest::say("Greetings $name . When a hero of our world is slain. their soul returns to the place it was last bound and the body is reincarnated. As a member of the Order of Eternity. it is my duty to [bind your soul] to this location if that is your wish."); }
if ($text=~/bind my soul/i)
{
quest::say("Very well. You will return to this spot when you die.");
quest::selfcast(2049);}
}

Its always best to clean up your quests and make sure all of the brackets ect are not so bunched up, like I marked in red, above... Although I am not sure why yours does not work, all I did was clean up how close everything was and it fixed...

"and the other one"


sub EVENT_SAY
{
if($text=~/Hail/i){quest::say("Greetings $name. When a hero of our world is slain their soul returns to the place it was last bound and the body is reincarnated. As a member of the Order of Eternity it is my duty to [bind your soul] to this location if that is your wish.");}
if($text=~/bind my soul/i)
{
quest::say("Binding your soul. You will return here when you die.");
quest::castspell($userid,2049);##quest::selfcast(id); is all you need...
}
}

Last edited by Lexen1; 02-25-2005 at 08:31 PM..
Reply With Quote