Aggravated - HELP (please :) )

[sonicintuition]

Angelox, I'm trying to read this like a computer would read this:

sub EVENT_SAY{
if (($text=~/hail/i&&$race eq 'Human'&&$class eq 'Enchanter')){
quest::say("I know you!!");
}
}

I'm reading that as if player says hail, and the player is a human enchanter, do action. So if I did this:

sub EVENT_SAY
{
if(($text=~/hail/i && $class eq 'Rogue' && $class eq 'Warrior'))
{
quest::say("You are NOT a caster!");
}
}

As a computer, I would read that as if the player says hail, and is a Rogue AND a Warrior, do action ..which obviously can't be the case. And that's what I'm trying to do - I need to set up my script so that the NPC won't talk to non-casting classes, eg, Warrior, Rogue, Monk, Berserker. Trying to use || operators isn't working ..I'm going to try one more thing before I give up altogether and just allow non casting classes to use my spell scriber...lol Will post back if it works.

Sonic

[Angelox]

Don't give up! I have taken weeks to understand simple things too. Just put it to aside, and come back to it again, later.

you only need $class for what you want - make one like this:

sub EVENT_SAY{
if (($text=~/hail/i&&$class eq 'enchanter')){
quest::say("I can help you");
}
if (($text=~/hail/i&&$class eq 'wizard')){
quest::say("I can help you");
}
}

You can add all the casters to this PL and omit the non-casters. This way your npc will ignore non-casters.
You first PL might have worked, but you had typos in it.

Originally Posted by sonicintuition

Angelox, I'm trying to read this like a computer would read this:

I'm reading that as if player says hail, and the player is a human enchanter, do action. So if I did this:

As a computer, I would read that as if the player says hail, and is a Rogue AND a Warrior, do action ..which obviously can't be the case. And that's what I'm trying to do - I need to set up my script so that the NPC won't talk to non-casting classes, eg, Warrior, Rogue, Monk, Berserker. Trying to use || operators isn't working ..I'm going to try one more thing before I give up altogether and just allow non casting classes to use my spell scriber...lol Will post back if it works.

Sonic

[froglok23]

While im certian no noob user of perl (i do guess work... i guess this will work) lol

but being a c++/c# dev has given me an advantage. All languages follow the sample principlals when it comes down to it.

This site, is well worth a read

http://stein.cshl.org/genome_informa...tro/index.html

In perticular, check out the "Operators" and also have a quick browse. Perl hjas the great advantage of being very english based

The above link, is not EQEmu information, but rather just perl.

- froglok

[sonicintuition]

I got it to work, finally! This is what I did:

sub EVENT_SAY
{
if(($text=~/hail/i && $class eq 'Rogue'))
{
$client->Message(5, "Persy Clutches tells you, You are a $class. I cannot help you.");
}

if(($text=~/hail/i && $class eq 'Warrior'))
{
$client->Message(5, "Persy Clutches tells you, You are a $class. I cannot help you.");
}

if(($text=~/hail/i && $class eq 'Monk'))
{
$client->Message(5, "Persy Clutches tells you, You are a $class. I cannot help you.");
}

if(($text=~/hail/i && $class eq 'Berserker'))
{
$client->Message(5, "Persy Clutches tells you, You are a $class. I cannot help you.");
}

if($text=~/hail/i && $class ne 'Rogue' && $class ne 'Warrior' && $class ne 'Monk' && $class ne 'Berserker')
{
$client->Message(5, "Persy Clutches tells you, Hello $name. I can [scribe your spells] for you, however I
can only scribe them until you are level 60. After that, you'll have to find them
yourself.");
}

if($text=~/scribe my spells/i)
{
$client->Message(5, "Persy Clutches tells you, Very well. Scribing your spells now.");
quest::scribespells();
}
}

Yay me

Thanks all for your help and support, I appreciate it a ton.

Sonic