My first .pl

[Cisyouc]

Originally Posted by mattmeck

the NPC says "bind" and you have that for the second trigger so the NPC triggers it and the second line happens,

Yeasy fix have the NPC ask if they want there soul bound, then have that trigger as Yes, that way the yes isnt part of the text and he wont trigger it.

Nice catch, Mattmeck. It wouldve taken me a while to realize that. Yes that is the problem. Make it so on hail the NPC doesnt say the word 'bind' or make the response to get bound something else, like 'yes'.

[RangerDown]

That or use elsif to process the Bind line.

[Cisyouc]

I dont think elsif would help here....

[solid11]

So just change-

if($text=~/bind/i)

TO
if($text=~/yes/i)

?

[Cisyouc]

yes. And people will have to reply 'yes' to get bound.

[knightz]

Actually the reason hes doing both is because HAIL, SoulBINDer blah...

both hail and bind are in the test the players send the NPC.

So, elsif would fix it.

[RangerDown]

That's the reason on eqlive you have to say the phrase "bind my soul". But Perl will misinterpret it if you just try to put the phrase in there with spaces.

Try to put backslashes in front of the spaces in the regex.

if($text=~/bind\ my\ soul/i)

[Richardo]

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...
}
}