Quote:
Originally Posted by c0ncrete
commented, to hopefully help you sort out exactly what it is you want to remove/change.
Code:
# do this for skill number 0 through 74
foreach my $skill ( 0 .. 74 ) {
# skip to next skill if client can't have this skill
next unless $client->CanHaveSkill($skill);
# get the maximum skll level for current skill number, based on client's class and level
my $max = $client->MaxSkill( $skill, $client->GetClass(), $client->GetLevel() );
# skip to next skill unless the maximum skill level from above is higher than the client's current raw skill level
next unless $max > $client->GetRawSkill($skill);
# set the current skill level to the maximum, as determined above
$client->SetSkill( $skill, $max );
}
|
Please forgive my ignorance, or whatever it is that I seem to be having with this. I followed your comments, and I am still unable to get this working through a few variations.
Here is the modified script:
Code:
##########
#Skills Trainer And Quest
#By Kingmen30264
##########
sub EVENT_SAY
{
my $train = quest::saylink("train");
my $advanced = quest::saylink("advanced skills");
my $trade = quest::saylink("trade");
my $free = quest::saylink("FREE");
my $items = quest::saylink("items");
my $zone1 = quest::saylink("zone1");
my $zone2 = quest::saylink("zone2");
my $item1 = quest::varlink("9989");
my $item2 = quest::varlink("9999");
my $count1 = quest::saylink("2");
my $count2 = quest::saylink("2");
my $skill = $client->GetSkill(0);
my $skill = $client->GetSkill(1);
my $skill = $client->GetSkill(2);
my $skill = $client->GetSkill(3);
my $skill = $client->GetSkill(4);
my $skill = $client->GetSkill(5);
my $skill = $client->GetSkill(6);
my $skill = $client->GetSkill(7);
my $skill = $client->GetSkill(8);
my $skill = $client->GetSkill(9);
my $skill = $client->GetSkill(10);
my $skill = $client->GetSkill(11);
my $skill = $client->GetSkill(12);
my $skill = $client->GetSkill(13);
my $skill = $client->GetSkill(14);
my $skill = $client->GetSkill(15);
my $skill = $client->GetSkill(16);
my $skill = $client->GetSkill(17);
my $skill = $client->GetSkill(18);
my $skill = $client->GetSkill(19);
my $skill = $client->GetSkill(20);
my $skill = $client->GetSkill(21);
my $skill = $client->GetSkill(22);
my $skill = $client->GetSkill(23);
my $skill = $client->GetSkill(24);
my $skill = $client->GetSkill(25);
my $skill = $client->GetSkill(26);
my $skill = $client->GetSkill(27);
my $skill = $client->GetSkill(28);
my $skill = $client->GetSkill(29);
my $skill = $client->GetSkill(30);
my $skill = $client->GetSkill(31);
my $skill = $client->GetSkill(32);
my $skill = $client->GetSkill(33);
my $skill = $client->GetSkill(34);
my $skill = $client->GetSkill(35);
my $skill = $client->GetSkill(36);
my $skill = $client->GetSkill(37);
my $skill = $client->GetSkill(38);
my $skill = $client->GetSkill(39);
my $skill = $client->GetSkill(40);
my $skill = $client->GetSkill(41);
my $skill = $client->GetSkill(42);
my $skill = $client->GetSkill(43);
my $skill = $client->GetSkill(44);
my $skill = $client->GetSkill(45);
my $skill = $client->GetSkill(46);
my $skill = $client->GetSkill(47);
my $skill = $client->GetSkill(48);
my $skill = $client->GetSkill(49);
my $skill = $client->GetSkill(50);
my $skill = $client->GetSkill(51);
my $skill = $client->GetSkill(52);
my $skill = $client->GetSkill(53);
my $skill = $client->GetSkill(54);
my $skill = $client->GetSkill(55);
my $skill = $client->GetSkill(56);
my $skill = $client->GetSkill(57);
my $skill = $client->GetSkill(58);
my $skill = $client->GetSkill(59);
my $skill = $client->GetSkill(60);
my $skill = $client->GetSkill(61);
my $skill = $client->GetSkill(62);
my $skill = $client->GetSkill(63);
my $skill = $client->GetSkill(64);
my $skill = $client->GetSkill(65);
my $skill = $client->GetSkill(66);
my $skill = $client->GetSkill(67);
my $skill = $client->GetSkill(68);
my $skill = $client->GetSkill(69);
my $skill = $client->GetSkill(70);
my $skill = $client->GetSkill(71);
my $skill = $client->GetSkill(72);
my $skill = $client->GetSkill(73);
my $skill = $client->GetSkill(74);
my $skill = $client->GetSkill(75);
my $skill = $client->GetSkill(76);
my $max = $client->MaxSkill( $skill, $client->GetClass(), $client->GetLevel() ); # get the maximum skll level for current skill number, based on client's class and level
if($text=~/Hail/i)
{
plugin::Whisper("Hi $name. My name is Skills.
I can $train you in your skills if you would like. Otherwise I might be able to teach some more $advanced.");
}
if($text=~/train/i)
{
# skip to next skill if client can't have this skill
next unless $client->CanHaveSkill($skill);
# skip to next skill unless the maximum skill level from above is higher than the client's current raw skill level
next unless $max > $client->GetRawSkill($skill);
# set the current skill level to the maximum, as determined above
$client->SetSkill( $skill, $max );
}
if($text=~/advanced skills/i)
{
plugin::Whisper("Yes, I can train you even more. I can train you so much, in fact, that when I am done, I doubt you could go further! However, I cannot merely offer my services for $free now can I?");
plugin::Whisper("No, no. But, I am in a good mood today, and I am willing to $trade you your higher skills in exchange for something.");
}
if($text=~/free/i)
{
plugin::Whisper("The only thing you will get from me for free is a swift kick up the --");
quest::emote("Skills turns his head in disgust.");
}
if($text=~/trade/i)
{
plugin::Whisper("Yes, you must do something for me for your $advanced.");
plugin::Whisper("If you wouldn't mind getting your armor a little scratched, I am going to require a few $items from some different locations.");
}
if($text=~/items/i)
{
plugin::Whisper("Ah, glad to hear that you are willing to begin your training. In that case, I am going to need the following:");
$client->Message(315, "===$zone1===");
plugin::Whisper("$item1 X $count1");
$client->Message(315, "===$zone2===");
plugin::Whisper("$item2 X $count2");
}
}
sub EVENT_ITEM
{
if(plugin::check_handin(\%itemcount, 9989 => 1))
{
plugin::Whisper("As promised, here are your advanced skills. Use them wisely.");
$npc->SetSkillAll(400, $client);
}
plugin::return_items(\%itemcount);
}
If I do just my $skill(#); then the NPC will not talk to me in the least. So I tried to find a parameter that WOULD work, but I am using the wrong one?
If I leave the $max = $client-> .... where you have it in the original, NPC still will not talk to me.
I don't know what I am doing wrong to be honest.
Sorry for the annoyance with this, I truly am trying to learn this the best that I can. I can do everything else just fine, spawn mobs, create tasks, etc, etc... but it just seems that any of the skill commands I get from here just either don't work, or don't wanna work. Which I am not sure.
Thanks,
Kingmen
===EDIT===
I have found a temporary work around for the skill trainer, but I am going to mess with it some more until I find a more workable command/script for it.
Here is what I have:
Code:
##########
#Skills Trainer And Quest
#By Kingmen30264
##########
sub EVENT_SAY
{
my $train = quest::saylink("train");
my $advanced = quest::saylink("advanced skills");
my $trade = quest::saylink("trade");
my $free = quest::saylink("FREE");
my $items = quest::saylink("items");
my $zone1 = quest::saylink("zone1");
my $zone2 = quest::saylink("zone2");
my $item1 = quest::varlink("9989");
my $item2 = quest::varlink("9999");
my $count1 = quest::saylink("2");
my $count2 = quest::saylink("2");
my $skill = quest::addskill(0, $ulevel = 20);
my $skill = quest::addskill(1, $ulevel = 20);
my $skill = quest::addskill(2, $ulevel = 20);
my $skill = quest::addskill(3, $ulevel = 20);
my $skill = quest::addskill(4, $ulevel = 20);
my $skill = quest::addskill(5, $ulevel = 20);
my $skill = quest::addskill(6, $ulevel = 20);
my $skill = quest::addskill(7, $ulevel = 20);
my $skill = quest::addskill(8, $ulevel = 20);
my $skill = quest::addskill(9, $ulevel = 20);
my $skill = quest::addskill(10, $ulevel = 20);
my $skill = quest::addskill(11, $ulevel = 20);
my $skill = quest::addskill(12, $ulevel = 20);
my $skill = quest::addskill(13, $ulevel = 20);
my $skill = quest::addskill(14, $ulevel = 20);
my $skill = quest::addskill(15, $ulevel = 20);
my $skill = quest::addskill(16, $ulevel = 20);
my $skill = quest::addskill(17, $ulevel = 20);
my $skill = quest::addskill(18, $ulevel = 20);
my $skill = quest::addskill(19, $ulevel = 20);
my $skill = quest::addskill(20, $ulevel = 20);
my $skill = quest::addskill(21, $ulevel = 20);
my $skill = quest::addskill(22, $ulevel = 20);
my $skill = quest::addskill(23, $ulevel = 20);
my $skill = quest::addskill(24, $ulevel = 20);
my $skill = quest::addskill(25, $ulevel = 20);
my $skill = quest::addskill(26, $ulevel = 20);
my $skill = quest::addskill(27, $ulevel = 20);
my $skill = quest::addskill(28, $ulevel = 20);
my $skill = quest::addskill(29, $ulevel = 20);
my $skill = quest::addskill(30, $ulevel = 20);
my $skill = quest::addskill(31, $ulevel = 20);
my $skill = quest::addskill(32, $ulevel = 20);
my $skill = quest::addskill(33, $ulevel = 20);
my $skill = quest::addskill(34, $ulevel = 20);
my $skill = quest::addskill(35, $ulevel = 20);
my $skill = quest::addskill(36, $ulevel = 20);
my $skill = quest::addskill(37, $ulevel = 20);
my $skill = quest::addskill(38, $ulevel = 20);
my $skill = quest::addskill(39, $ulevel = 20);
my $skill = quest::addskill(40, $ulevel = 20);
my $skill = quest::addskill(41, $ulevel = 20);
my $skill = quest::addskill(42, $ulevel = 20);
my $skill = quest::addskill(43, $ulevel = 20);
my $skill = quest::addskill(44, $ulevel = 20);
my $skill = quest::addskill(45, $ulevel = 20);
my $skill = quest::addskill(46, $ulevel = 20);
my $skill = quest::addskill(47, $ulevel = 20);
my $skill = quest::addskill(48, $ulevel = 20);
my $skill = quest::addskill(49, $ulevel = 20);
my $skill = quest::addskill(50, $ulevel = 20);
my $skill = quest::addskill(51, $ulevel = 20);
my $skill = quest::addskill(52, $ulevel = 20);
my $skill = quest::addskill(53, $ulevel = 20);
my $skill = quest::addskill(54, $ulevel = 20);
my $skill = quest::addskill(55, $ulevel = 20);
my $skill = quest::addskill(56, $ulevel = 20);
my $skill = quest::addskill(57, $ulevel = 20);
my $skill = quest::addskill(58, $ulevel = 20);
my $skill = quest::addskill(59, $ulevel = 20);
my $skill = quest::addskill(60, $ulevel = 20);
my $skill = quest::addskill(61, $ulevel = 20);
my $skill = quest::addskill(62, $ulevel = 20);
my $skill = quest::addskill(63, $ulevel = 20);
my $skill = quest::addskill(64, $ulevel = 20);
my $skill = quest::addskill(65, $ulevel = 20);
my $skill = quest::addskill(66, $ulevel = 20);
my $skill = quest::addskill(67, $ulevel = 20);
my $skill = quest::addskill(68, $ulevel = 20);
my $skill = quest::addskill(69, $ulevel = 20);
my $skill = quest::addskill(70, $ulevel = 20);
my $skill = quest::addskill(71, $ulevel = 20);
my $skill = quest::addskill(72, $ulevel = 20);
my $skill = quest::addskill(73, $ulevel = 20);
my $skill = quest::addskill(74, $ulevel = 20);
my $skill = quest::addskill(75, $ulevel = 20);
my $skill = quest::addskill(76, $ulevel = 20);
my $max = $client->MaxSkill( $skill, $client->GetClass(), $client->GetLevel() ); # get the maximum skll level for current skill number, based on client's class and level
if($text=~/Hail/i)
{
plugin::Whisper("Hi $name. My name is Skills.
I can $train you in your skills if you would like. Otherwise I might be able to teach some more $advanced.");
}
if($text=~/train/i)
{
# skip to next skill if client can't have this skill
next unless $client->CanHaveSkill($skill);
# skip to next skill unless the maximum skill level from above is higher than the client's current raw skill level
next unless $max > $client->GetRawSkill($skill);
# set the current skill level to the maximum, as determined above
$client->SetSkill( $skill, $max );
}
if($text=~/advanced skills/i)
{
plugin::Whisper("Yes, I can train you even more. I can train you so much, in fact, that when I am done, I doubt you could go further! However, I cannot merely offer my services for $free now can I?");
plugin::Whisper("No, no. But, I am in a good mood today, and I am willing to $trade you your higher skills in exchange for something.");
}
if($text=~/free/i)
{
plugin::Whisper("The only thing you will get from me for free is a swift kick up the --");
quest::emote("Skills turns his head in disgust.");
}
if($text=~/trade/i)
{
plugin::Whisper("Yes, you must do something for me for your $advanced.");
plugin::Whisper("If you wouldn't mind getting your armor a little scratched, I am going to require a few $items from some different locations.");
}
if($text=~/items/i)
{
plugin::Whisper("Ah, glad to hear that you are willing to begin your training. In that case, I am going to need the following:");
$client->Message(315, "===$zone1===");
plugin::Whisper("$item1 X $count1");
$client->Message(315, "===$zone2===");
plugin::Whisper("$item2 X $count2");
}
}
sub EVENT_ITEM
{
if(plugin::check_handin(\%itemcount, 9989 => 1))
{
plugin::Whisper("As promised, here are your advanced skills. Use them wisely.");
$npc->SetSkillAll(400, $client);
}
plugin::return_items(\%itemcount);
}
===EDIT 2===
After messing with it some more, here is what I have come up with so far that will work for what I am trying to do... It is VERY sloppy, but I am hoping that I can alter this through Hashes?
Code:
##########
#Skills Trainer And Quest
#By Kingmen30264
##########
sub EVENT_SAY
{
my $train = quest::saylink("train");
my $advanced = quest::saylink("advanced skills");
my $trade = quest::saylink("trade");
my $free = quest::saylink("FREE");
my $items = quest::saylink("items");
my $zone1 = quest::saylink("zone1");
my $zone2 = quest::saylink("zone2");
my $item1 = quest::varlink("9989");
my $item2 = quest::varlink("9999");
my $count1 = quest::saylink("2");
my $count2 = quest::saylink("2");
my $max = $client->MaxSkill( $skill, $client->GetClass(), $client->GetLevel() ); # get the maximum skll level for current skill number, based on client's class and level
if($text=~/Hail/i)
{
plugin::Whisper("Hi $name. My name is Skills.
I can $train you in your skills if you would like. Otherwise I might be able to teach some more $advanced.");
}
if($text=~/train/i)
{
my $skill = quest::addskill(0, $ulevel = 100);
my $skill = quest::addskill(1, $ulevel = 100);
my $skill = quest::addskill(2, $ulevel = 100);
my $skill = quest::addskill(3, $ulevel = 100);
my $skill = quest::addskill(4, $ulevel = 100);
my $skill = quest::addskill(5, $ulevel = 100);
my $skill = quest::addskill(6, $ulevel = 100);
my $skill = quest::addskill(7, $ulevel = 100);
my $skill = quest::addskill(8, $ulevel = 100);
my $skill = quest::addskill(9, $ulevel = 100);
my $skill = quest::addskill(10, $ulevel = 100);
my $skill = quest::addskill(11, $ulevel = 100);
my $skill = quest::addskill(12, $ulevel = 100);
my $skill = quest::addskill(13, $ulevel = 100);
my $skill = quest::addskill(14, $ulevel = 100);
my $skill = quest::addskill(15, $ulevel = 100);
my $skill = quest::addskill(16, $ulevel = 100);
my $skill = quest::addskill(17, $ulevel = 100);
my $skill = quest::addskill(18, $ulevel = 100);
my $skill = quest::addskill(19, $ulevel = 100);
my $skill = quest::addskill(20, $ulevel = 100);
my $skill = quest::addskill(21, $ulevel = 100);
my $skill = quest::addskill(22, $ulevel = 100);
my $skill = quest::addskill(23, $ulevel = 100);
my $skill = quest::addskill(24, $ulevel = 100);
my $skill = quest::addskill(25, $ulevel = 100);
my $skill = quest::addskill(26, $ulevel = 100);
my $skill = quest::addskill(27, $ulevel = 100);
my $skill = quest::addskill(28, $ulevel = 100);
my $skill = quest::addskill(29, $ulevel = 100);
my $skill = quest::addskill(30, $ulevel = 100);
my $skill = quest::addskill(31, $ulevel = 100);
my $skill = quest::addskill(32, $ulevel = 100);
my $skill = quest::addskill(33, $ulevel = 100);
my $skill = quest::addskill(34, $ulevel = 100);
my $skill = quest::addskill(35, $ulevel = 100);
my $skill = quest::addskill(36, $ulevel = 100);
my $skill = quest::addskill(37, $ulevel = 100);
my $skill = quest::addskill(38, $ulevel = 100);
my $skill = quest::addskill(39, $ulevel = 100);
my $skill = quest::addskill(40, $ulevel = 100);
my $skill = quest::addskill(41, $ulevel = 100);
my $skill = quest::addskill(42, $ulevel = 100);
my $skill = quest::addskill(43, $ulevel = 100);
my $skill = quest::addskill(44, $ulevel = 100);
my $skill = quest::addskill(45, $ulevel = 100);
my $skill = quest::addskill(46, $ulevel = 100);
my $skill = quest::addskill(47, $ulevel = 100);
my $skill = quest::addskill(48, $ulevel = 100);
my $skill = quest::addskill(49, $ulevel = 100);
my $skill = quest::addskill(50, $ulevel = 100);
my $skill = quest::addskill(51, $ulevel = 100);
my $skill = quest::addskill(52, $ulevel = 100);
my $skill = quest::addskill(53, $ulevel = 100);
my $skill = quest::addskill(54, $ulevel = 100);
my $skill = quest::addskill(55, $ulevel = 100);
my $skill = quest::addskill(56, $ulevel = 100);
my $skill = quest::addskill(57, $ulevel = 100);
my $skill = quest::addskill(58, $ulevel = 100);
my $skill = quest::addskill(59, $ulevel = 100);
my $skill = quest::addskill(60, $ulevel = 100);
my $skill = quest::addskill(61, $ulevel = 100);
my $skill = quest::addskill(62, $ulevel = 100);
my $skill = quest::addskill(63, $ulevel = 100);
my $skill = quest::addskill(64, $ulevel = 100);
my $skill = quest::addskill(65, $ulevel = 100);
my $skill = quest::addskill(66, $ulevel = 100);
my $skill = quest::addskill(67, $ulevel = 100);
my $skill = quest::addskill(68, $ulevel = 100);
my $skill = quest::addskill(69, $ulevel = 100);
my $skill = quest::addskill(70, $ulevel = 100);
my $skill = quest::addskill(71, $ulevel = 100);
my $skill = quest::addskill(72, $ulevel = 100);
my $skill = quest::addskill(73, $ulevel = 100);
my $skill = quest::addskill(74, $ulevel = 100);
my $skill = quest::addskill(75, $ulevel = 100);
my $skill = quest::addskill(76, $ulevel = 100);
}
if($text=~/advanced skills/i)
{
plugin::Whisper("Yes, I can train you even more. I can train you so much, in fact, that when I am done, I doubt you could go further! However, I cannot merely offer my services for $free now can I?");
plugin::Whisper("No, no. But, I am in a good mood today, and I am willing to $trade you your higher skills in exchange for something.");
}
if($text=~/free/i)
{
plugin::Whisper("The only thing you will get from me for free is a swift kick up the --");
quest::emote("Skills turns his head in disgust.");
}
if($text=~/trade/i)
{
plugin::Whisper("Yes, you must do something for me for your $advanced.");
plugin::Whisper("If you wouldn't mind getting your armor a little scratched, I am going to require a few $items from some different locations.");
}
if($text=~/items/i)
{
plugin::Whisper("Ah, glad to hear that you are willing to begin your training. In that case, I am going to need the following:");
$client->Message(315, "===$zone1===");
plugin::Whisper("$item1 X $count1");
$client->Message(315, "===$zone2===");
plugin::Whisper("$item2 X $count2");
}
}
sub EVENT_ITEM
{
if(plugin::check_handin(\%itemcount, 9989 => 1))
{
my $skill = quest::addskill(0, $ulevel = 1000);
my $skill = quest::addskill(1, $ulevel = 1000);
my $skill = quest::addskill(2, $ulevel = 1000);
my $skill = quest::addskill(3, $ulevel = 1000);
my $skill = quest::addskill(4, $ulevel = 1000);
my $skill = quest::addskill(5, $ulevel = 1000);
my $skill = quest::addskill(6, $ulevel = 1000);
my $skill = quest::addskill(7, $ulevel = 1000);
my $skill = quest::addskill(8, $ulevel = 1000);
my $skill = quest::addskill(9, $ulevel = 1000);
my $skill = quest::addskill(10, $ulevel = 1000);
my $skill = quest::addskill(11, $ulevel = 1000);
my $skill = quest::addskill(12, $ulevel = 1000);
my $skill = quest::addskill(13, $ulevel = 1000);
my $skill = quest::addskill(14, $ulevel = 1000);
my $skill = quest::addskill(15, $ulevel = 1000);
my $skill = quest::addskill(16, $ulevel = 1000);
my $skill = quest::addskill(17, $ulevel = 1000);
my $skill = quest::addskill(18, $ulevel = 1000);
my $skill = quest::addskill(19, $ulevel = 1000);
my $skill = quest::addskill(20, $ulevel = 1000);
my $skill = quest::addskill(21, $ulevel = 1000);
my $skill = quest::addskill(22, $ulevel = 1000);
my $skill = quest::addskill(23, $ulevel = 1000);
my $skill = quest::addskill(24, $ulevel = 1000);
my $skill = quest::addskill(25, $ulevel = 1000);
my $skill = quest::addskill(26, $ulevel = 1000);
my $skill = quest::addskill(27, $ulevel = 1000);
my $skill = quest::addskill(28, $ulevel = 1000);
my $skill = quest::addskill(29, $ulevel = 1000);
my $skill = quest::addskill(30, $ulevel = 1000);
my $skill = quest::addskill(31, $ulevel = 1000);
my $skill = quest::addskill(32, $ulevel = 1000);
my $skill = quest::addskill(33, $ulevel = 1000);
my $skill = quest::addskill(34, $ulevel = 1000);
my $skill = quest::addskill(35, $ulevel = 1000);
my $skill = quest::addskill(36, $ulevel = 1000);
my $skill = quest::addskill(37, $ulevel = 1000);
my $skill = quest::addskill(38, $ulevel = 1000);
my $skill = quest::addskill(39, $ulevel = 1000);
my $skill = quest::addskill(40, $ulevel = 1000);
my $skill = quest::addskill(41, $ulevel = 1000);
my $skill = quest::addskill(42, $ulevel = 1000);
my $skill = quest::addskill(43, $ulevel = 1000);
my $skill = quest::addskill(44, $ulevel = 1000);
my $skill = quest::addskill(45, $ulevel = 1000);
my $skill = quest::addskill(46, $ulevel = 1000);
my $skill = quest::addskill(47, $ulevel = 1000);
my $skill = quest::addskill(48, $ulevel = 1000);
my $skill = quest::addskill(49, $ulevel = 1000);
my $skill = quest::addskill(50, $ulevel = 1000);
my $skill = quest::addskill(51, $ulevel = 1000);
my $skill = quest::addskill(52, $ulevel = 1000);
my $skill = quest::addskill(53, $ulevel = 1000);
my $skill = quest::addskill(54, $ulevel = 1000);
my $skill = quest::addskill(55, $ulevel = 1000);
my $skill = quest::addskill(56, $ulevel = 1000);
my $skill = quest::addskill(57, $ulevel = 1000);
my $skill = quest::addskill(58, $ulevel = 1000);
my $skill = quest::addskill(59, $ulevel = 1000);
my $skill = quest::addskill(60, $ulevel = 1000);
my $skill = quest::addskill(61, $ulevel = 1000);
my $skill = quest::addskill(62, $ulevel = 1000);
my $skill = quest::addskill(63, $ulevel = 1000);
my $skill = quest::addskill(64, $ulevel = 1000);
my $skill = quest::addskill(65, $ulevel = 1000);
my $skill = quest::addskill(66, $ulevel = 1000);
my $skill = quest::addskill(67, $ulevel = 1000);
my $skill = quest::addskill(68, $ulevel = 1000);
my $skill = quest::addskill(69, $ulevel = 1000);
my $skill = quest::addskill(70, $ulevel = 1000);
my $skill = quest::addskill(71, $ulevel = 1000);
my $skill = quest::addskill(72, $ulevel = 1000);
my $skill = quest::addskill(73, $ulevel = 1000);
my $skill = quest::addskill(74, $ulevel = 1000);
my $skill = quest::addskill(75, $ulevel = 1000);
my $skill = quest::addskill(76, $ulevel = 1000);
}
{
plugin::Whisper("As promised, here are your advanced skills. Use them wisely.");
}
plugin::return_items(\%itemcount);
}
Hopefully I can clean this up some on my own. I thank those that helped me throughout this post so far in getting me this far.
Thanks,
Kingmen30264
|