Spell Scriber Quest

[reddogut]

I am trying to create a quest that will scribe spells for a level 10 or under Ranger only. I want the NPC to turn away any other class and any Rangers over level 10.

This is what I have so far, but I can't even get the npc to reply.

sub EVENT_SAY {

if ($text=~/hail/i) {
quest::say ("Good day to you, $name. For free I will teach all Rangers level 10 and under all of your [spells] up to level 10. After that it will cost you, although not much."); }
if ($text=~/spells/i && $class != "Ranger") {
quest::say ("I am sorry $class, but I cannot help you"); }
elseif ($text=~/spells/i && $class == "Ranger" && $ulevel >=11) {
quest::say ("Yes, you are a Ranger, but your level is too high for me. Go see NAME."); }
elseif ($text=~/spells/i && $class == "Ranger" && $ulevel <= 10) {
quest::say ("Good, stand where you are while I begin your lessons");
quest::scribespells($ulevel); }

}

[trevius]

Give this a try and see if it works for you:

sub EVENT_SAY {

my $spells = quest::saylink("Please teach me all of my spells up to $ulevel.", 0, "spells");

if ($text=~/hail/i)
{
if ($class eq "Ranger")
{
if ($ulevel <= 10)
{
quest::say ("Good day to you, $name. For free I will teach all Rangers level 10 and under all of your [$spells] up to level 10. After that it will cost you, although not much.");
}
else
{
quest::say ("Yes, you are a Ranger, but your level is too high for me. Go see NAME.");
}
}
else
{
quest::say ("I am sorry $class, but I cannot help you");
}
}

if ($text=~/spells/i && $class eq "Ranger" && $ulevel <= 10)
{
quest::say ("Good, stand where you are while I begin your lessons");
quest::scribespells($ulevel);
}

}

If that doesn't work, you may need to replace the double quotes (") around "Ranger" with single quotes (') like this:

$class eq 'Ranger'

I forget which one it needs or if it even matters in this case.

[reddogut]

It worked perfectly Trevius. You rock!

-Mike