Magus_Alaria.pl

sub EVENT_SAY {
    if(plugin::check_hasitem($client, 41000) || $client->KeyRingCheck(41000)) { #Adventurer's Stone
        if($text=~/hail/i) {
            quest::say("Greetings, $name. As you may have guessed I have been sent here by the Wayfarers Brotherhood to assist those that dare subject themselves to our magic. I promise you I have trained long and hard to be up to the task.  I only rarely make the type of mistakes you may have heard about regarding these spells of travel. Come, let me know where you would like to go and I'll send you on your way.  I can send you to any of the Wayfarer camps in [" . quest::saylink("Butcherblock") . "], [" . quest::saylink("Commonlands") . "], [" . quest::saylink("Everfrost") . "], [" . quest::saylink("North Ro") . "], [" . quest::saylink("South Ro") . "], or [" . quest::saylink("Nedaria's Landing") . "].");
        } elsif($text=~/commonlands/i) {
            $npc->CastSpell(4176,$client->GetID());
        } elsif($text=~/butcherblock/i) {
            $npc->CastSpell(4179,$client->GetID());
        } elsif($text=~/everfrost/i) {
            $npc->CastSpell(4180,$client->GetID());
        } elsif($text=~/nedaria/i) {
            $npc->CastSpell(4580,$client->GetID());
        } elsif($text=~/north ro/i) {
            $npc->CastSpell(4177,$client->GetID());
        } elsif($text=~/south ro/i) {
            $npc->CastSpell(4178,$client->GetID());
        }
    } else { #PC does not have Adventurer's Stone
        quest::say("You will have to excuse me, I am quite busy studying this Farstone and the possibility of using the magic stored inside of it.  Perhaps you should talk to those at the Wayfarer camps to see if they have any use for you.  I have enough time to send you to [" . quest::saylink("Nedaria's Landing") . "], if you'd like.");
    }
}

sub EVENT_ITEM {
    plugin::return_items(\%itemcount);
}