EQEmulator Forums - auto add skills and spells on level up

here is a levelup script that i made that will automatically add new skills that you would learn when you reach a certain level. For example, if you reach level 10 and you are a shadowknight it will automatically add dodge and set it to 10 just like a guildmaster would. It will also automatically add spells too when you level. The only problem is that for skills it will not work if you skipped a level. For example if you were level 9 and jumped to 11, you would not get dodge at 10. For general uses tho it works out well. You should stick this in the player.pl of the template folder and in any player.pl files that exist in other zone folders
Code:
sub EVENT_LEVEL_UP

{

        quest::scribespells($ulevel);

        quest::traindiscs($ulevel);

        $myclass=$class;

        if($myclass=~/ShadowKnight/i)

        {

                if($ulevel==6){quest::setskill("10",($ulevel));}

                if($ulevel==10){quest::setskill("19",($ulevel));}

                if($ulevel==17){quest::setskill("34",($ulevel));}

                if($ulevel==20){quest::setskill("20",($ulevel));}

                if($ulevel==30){quest::setskill("37",($ulevel));}

                if($ulevel==40){quest::setskill("16",($ulevel));}

        }

        

        if($myclass=~/Warrior/i)

        {

                if($ulevel==6)

                {

                        quest::setskill("10",($ulevel));

                        quest::setskill("19",($ulevel));

                }

                if($ulevel==10){quest::setskill("34",($ulevel));}

                if($ulevel==13){quest::setskill("22",($ulevel));}

                if($ulevel==15){quest::setskill("20",($ulevel));}

                if($ulevel==25){quest::setskill("37",($ulevel));}

                if($ulevel==35){quest::setskill("16",($ulevel));}

        }

        if($myclass=~/Necro/i||$myclass=~/Enchanter/i||

                $myclass=~/Magician/i||$myclass=~/Wizard/i)

        {

                if($ulevel==16)

                {

                        quest::setskill("58",($ulevel));

                }

                if($ulevel==20){quest::setskill("43",($ulevel));}

                if($ulevel==20){quest::setskill("44",($ulevel));}

                if($ulevel==20){quest::setskill("45",($ulevel));}

                if($ulevel==20){quest::setskill("46",($ulevel));}

                if($ulevel==20){quest::setskill("47",($ulevel));}

                if($ulevel==20){$client->Message(5,"Remember you can only get 1 specializtion

                over 50, the first one over 50 becomes your specialization");}



                if($ulevel==22){quest::setskill("19",($ulevel));}

        }

        if($myclass=~/Cleric/i){if($ulevel==25){quest::setskill("10",($ulevel));}}

        if($myclass=~/Shaman/i){if($ulevel==25){quest::setskill("59",($ulevel));}}

        if($myclass=~/Druid/i)

        {

                if($ulevel==5){quest::setskill("27",($ulevel));}

                if($ulevel==20){quest::setskill("53",($ulevel));}

        }

        if($myclass=~/Druid/i||$myclass=~/Shaman/i||$myclass=~/Cleric/i)

        {

                if($ulevel==15){quest::setskill("19",($ulevel));}

                if($ulevel==30){quest::setskill("43",($ulevel));}

                if($ulevel==30){quest::setskill("44",($ulevel));}

                if($ulevel==30){quest::setskill("45",($ulevel));}

                if($ulevel==30){quest::setskill("46",($ulevel));}

                if($ulevel==30){quest::setskill("47",($ulevel));}

                if($ulevel==30){$client->Message(5,"Remember you can only get 1 specialization

                over 50, the first one over 50 becomes your specialization");}

        }

        if($myclass=~/rogue/i)

        {

                if($ulevel==4){quest::setskill("19",($ulevel));}

                if($ulevel==5){quest::setskill("35",($ulevel));}

                if($ulevel==7){quest::setskill("48",($ulevel));}

                if($ulevel==10){quest::setskill("62",($ulevel));}

                if($ulevel==10){quest::setskill("8",($ulevel));}

                if($ulevel==12){quest::setskill("34",($ulevel));}

                if($ulevel==12){quest::setskill("39",($ulevel));}

                if($ulevel==13){quest::setskill("22",($ulevel));}

                if($ulevel==15){quest::setskill("17",($ulevel));}

                if($ulevel==16){quest::setskill("20",($ulevel));}

                if($ulevel==18){quest::setskill("6",($ulevel));}

                if($ulevel==20){quest::setskill("56",($ulevel));}

                if($ulevel==22){quest::setskill("71",($ulevel));}

                if($ulevel==27){quest::setskill("16",($ulevel));}

        }

        if($myclass=~/ranger/i)

        {

                if($ulevel==5){quest::setskill("30",($ulevel));}

                if($ulevel==8){quest::setskill("19",($ulevel));}

                if($ulevel==10){quest::setskill("42",($ulevel));}

                if($ulevel==17){quest::setskill("22",($ulevel));}

                if($ulevel==18){quest::setskill("34",($ulevel));}

                if($ulevel==20){quest::setskill("20",($ulevel));}

                if($ulevel==35){quest::setskill("17",($ulevel));}

                if($ulevel==35){quest::setskill("37",($ulevel));}

        }

        if($myclass=~/monk/i)

        {

                if($ulevel==3){quest::setskill("39",($ulevel));}

                if($ulevel==5){quest::setskill("38",($ulevel));}

                if($ulevel==8){quest::setskill("42",($ulevel));}

                if($ulevel==10){quest::setskill("52",($ulevel));}

                if($ulevel==12){quest::setskill("11",($ulevel));}

                if($ulevel==15){quest::setskill("20",($ulevel));}

                if($ulevel==17){quest::setskill("28",($ulevel));}

                if($ulevel==18){quest::setskill("71",($ulevel));}

                if($ulevel==20){quest::setskill("23",($ulevel));}

                if($ulevel==25){quest::setskill("21",($ulevel));}

                if($ulevel==27){quest::setskill("17",($ulevel));}

                if($ulevel==30){quest::setskill("26",($ulevel));}

                if($ulevel==35){quest::setskill("37",($ulevel));}

        }

        if($myclass=~/bard/i)

        {

                if($ulevel==5){quest::setskill("70",($ulevel));}

                if($ulevel==8){quest::setskill("49",($ulevel));}

                if($ulevel==10){quest::setskill("31",($ulevel));}

                if($ulevel==10){quest::setskill("35",($ulevel));}

                if($ulevel==11){quest::setskill("12",($ulevel));}

                if($ulevel==12){quest::setskill("27",($ulevel));}

                if($ulevel==14){quest::setskill("54",($ulevel));}

                if($ulevel==15){quest::setskill("62",($ulevel));}

                if($ulevel==17){quest::setskill("22",($ulevel));}

                if($ulevel==17){quest::setskill("42",($ulevel));}

                if($ulevel==20){quest::setskill("17",($ulevel));}

                if($ulevel==24){quest::setskill("39",($ulevel));}

                if($ulevel==25){quest::setskill("29",($ulevel));}

                if($ulevel==26){quest::setskill("71",($ulevel));}

                if($ulevel==35){quest::setskill("53",($ulevel));}

                if($ulevel==53){quest::setskill("34",($ulevel));}

                if($ulevel==58){quest::setskill("37",($ulevel));}

        }

        if($myclass=~/paladin/i)

        {

                if($ulevel==6){quest::setskill("10",($ulevel));}

                if($ulevel==10){quest::setskill("19",($ulevel));}

                if($ulevel==17){quest::setskill("34",($ulevel));}

                if($ulevel==20){quest::setskill("20",($ulevel));}

                if($ulevel==30){quest::setskill("37",($ulevel));}

                if($ulevel==40){quest::setskill("16",($ulevel));}

        }

        if($myclass=~/beastlord/i)

        {

                if($ulevel==5){quest::setskill("30",($ulevel));}

                if($ulevel==10){quest::setskill("19",($ulevel));}

                if($ulevel==17){quest::setskill("22",($ulevel));}

                if($ulevel==25){quest::setskill("11",($ulevel));}

                if($ulevel==40){quest::setskill("37",($ulevel));}

        }

        if($myclass=~/berserker/i)

        {

                if($ulevel==6){quest::setskill("74",($ulevel));}

                if($ulevel==10){quest::setskill("19",($ulevel));}

                if($ulevel==12){quest::setskill("34",($ulevel));}

                if($ulevel==15){quest::setskill("20",($ulevel));}

                if($ulevel==30){quest::setskill("37",($ulevel));}

                if($ulevel==35){quest::setskill("16",($ulevel));}

        }





}