Spell/Disc scriber
Ok, so I have gotten to hang of makeing quests. However my spell scriber and disc trainer dont appear to be working properly
Here is the Disc trainer script:
sub EVENT_SAY {
if ($text =~/Hail/i)
{ quest::say("Hello! Would you like me to set all your Discs?"); }
if($text=~/Discs/i)
{quest::traindiscs();}
}
}
And here is the spell scriber script (Thanks trev)
#A conversation to Scribe ALL spells For Player (up to curr. level)
sub EVENT_SAY {
if ($text =~/hail/i) {
quest::say ("Good day to you, $name. Would you like me to teach you all of your [spells]? Or maybe you are a [bard] in need of music lessons?"); }
if ($text =~/bard/i) {
quest::say ("Yes, normally you would think of a bard as being an adept student of music. For some reason, these lands slow the music learning ability to such an extent that I am willing to use my magic to train their abilities. Are you [ready] to learn?"); }
if ($text =~/ready/i) {
quest::say ("Listen closely as the essence of music fills your soul!");
quest::addskill(12,255);
quest::addskill(41,255);
quest::addskill(49,255);
quest::addskill(54,255);
quest::addskill(70,255); }
if ($text =~/spells/i) {
quest::say ("Good, stand where you are while I begin your lessons");
quest::scribespells(); }
}
Last edited by Apoc.Index; 08-17-2011 at 03:13 AM..
Reason: Correction
|