Baruuk
10-23-2011, 09:12 PM
Hi guys - I've been trying to correct this for a day or so - but I'm not a Perl programmer, so it may be something simple I'm missing. If I put the below script in a starting zone - say Qeynos or Cabilis - it works perfectly. It increases all player skills to 20 the moment they enter the game for the first time (in that zone). If I put it in the player.pl in c:\eqemu\quests\templates - it doesn't. It gives a brief message in the chat window in game about Swimming being increased to 100 (which actually doesn't happen according to the character's skill window) and doesn't increase anything else. I could simply paste the code from North Qeynos into all starting zones...but that's not the point. I want to learn what I'm doing wrong because I see the potentil in using Player.pl for other reason. Would anyone mind telling me what I'm doing wrong?
Thanks much in advance.
here's the code I have in the player.pl in qeynos2 and other zones:
sub EVENT_ENTERZONE {
if (!defined($qglobals{newchar})){
quest::setallskill(20);
quest::setglobal("newchar", 1, 5, "F");
quest::scribespells(1,1);
}
else{}
}
sub EVENT_LEVEL_UP{
quest::traindiscs($ulevel);
quest::scribespells($ulevel);
$client->Message(5,"Scribing spells and disciplines.");
}
}
Thanks again.
Thanks much in advance.
here's the code I have in the player.pl in qeynos2 and other zones:
sub EVENT_ENTERZONE {
if (!defined($qglobals{newchar})){
quest::setallskill(20);
quest::setglobal("newchar", 1, 5, "F");
quest::scribespells(1,1);
}
else{}
}
sub EVENT_LEVEL_UP{
quest::traindiscs($ulevel);
quest::scribespells($ulevel);
$client->Message(5,"Scribing spells and disciplines.");
}
}
Thanks again.