[chrsschb]

You just need to add what you're trying to do to the global_player.pl. The subroutine SUB EVENT_LEVEL_UP would trigger anytime a player levels. The example given would train discs on level up.

I've referenced the ones you're probably intersted in:

quest::scribespells(maxlevel, minlevel) # Scribes all spells up to the specified level.
quest::setallskill(value) # Sets all skills to 'value'.
quest::traindiscs(maxlevel, minlevel) # Trains all disciplines up to the specified level. To train up to any level, use $ulevel as the variable.

From: http://wiki.eqemulator.org/p?Ultimate_Perl_Reference

So your global_player.pl would look something like:

sub EVENT_LEVEL_UP {
	quest::traindiscs($ulevel,$ulevel - 1);
        quest::scribespells($ulevel,$ulevel -1);
}

I would caution using setallskills cause it raises ALL skills, including tradeskills and resets specializations.