[nightsta69]

i'm trying to set up so that when a player hits max level on your server, and they are the first to do so, it does a server wide announcement of it.

heres what i've got so far. i have it placed in quests/templates/player.pl, but I can't get it to work for some reason. can some one take a look at it, and tell me whats wrong pls?

sub EVENT_LEVEL_UP {
	my $maxlvl = 50
	if(!defined($qglobals{warmaxlvl}) && $ulevel == $maxlvl && $class eq 'Warrior') {
		quest::setglobal("warmaxlvl",1,2,"F");
		quest::shout2("$name has made the server first level $ulevel warrior!");
	}
	
	if(!defined($qglobals{clrmaxlvl}) && $ulevel == $maxlvl && $class eq 'Cleric') {
		quest::setglobal("clrmaxlvl",1,2,"F");
		quest::shout2("$name has made the server first level $ulevel cleric!");
	}
	
	if(!defined($qglobals{palmaxlvl}) && $ulevel == $maxlvl && $class eq 'Paladin') {
		quest::setglobal("palmaxlvl",1,2,"F");
		quest::shout2("$name has made the server first level $ulevel paladin!");
	}
	
	if(!defined($qglobals{rngmaxlvl}) && $ulevel == $maxlvl && $class eq 'Ranger') {
		quest::setglobal("rngmaxlvl",1,2,"F");
		quest::shout2("$name has made the server first level $ulevel ranger!");
	}
	
	if(!defined($qglobals{skmaxlvl}) && $ulevel == $maxlvl && $class eq 'ShadowKnight') {
		quest::setglobal("skmaxlvl",1,2,"F");
		quest::shout2("$name has made the server first level $ulevel shadow knight!");
	}
	
	if(!defined($qglobals{drumaxlvl}) && $ulevel == $maxlvl && $class eq 'Druid') {
		quest::setglobal("drumaxlvl",1,2,"F");
		quest::shout2("$name has made the server first level $ulevel druid!");
	}
	
	if(!defined($qglobals{mkmaxlvl}) && $ulevel == $maxlvl && $class eq 'Monk') {
		quest::setglobal("mkmaxlvl",1,2,"F");
		quest::shout2("$name has made the server first level $ulevel monk!");
	}
	
	if(!defined($qglobals{brdmaxlvl}) && $ulevel == $maxlvl && $class eq 'Bard') {
		quest::setglobal("brdmaxlvl",1,2,"F");
		quest::shout2("$name has made the server first level $ulevel bard!");
	}
	
	if(!defined($qglobals{rogmaxlvl}) && $ulevel == $maxlvl && $class eq 'Rogue') {
		quest::setglobal("rogmaxlvl",1,2,"F");
		quest::shout2("$name has made the server first level $ulevel rogue!");
	}
	
	if(!defined($qglobals{shmmaxlvl}) && $ulevel == $maxlvl && $class eq 'Shaman') {
		quest::setglobal("shmmaxlvl",1,2,"F");
		quest::shout2("$name has made the server first level $ulevel shaman!");
	}
	
	if(!defined($qglobals{necmaxlvl}) && $ulevel == $maxlvl && $class 'Necromancer') {
		quest::setglobal("necmaxlvl",1,2,"F");
		quest::shout2("$name has made the server first level $ulevel necromancer!");
	}
	
	if(!defined($qglobals{wizmaxlvl}) && $ulevel == $maxlvl && $class eq 'Wizard') {
		quest::setglobal("wizmaxlvl",1,2,"F");
		quest::shout2("$name has made the server first level $ulevel wizard!");
	}
	
	if(!defined($qglobals{magmaxlvl}) && $ulevel == $maxlvl && $class eq 'Magician') {
		quest::setglobal("magmaxlvl",1,2,"F");
		quest::shout2("$name has made the server first level $ulevel magician!");
	}
	
	if(!defined($qglobals{encmaxlvl}) && $ulevel == $maxlvl && $class eq 'Enchanter') {
		quest::setglobal("encmaxlvl",1,2,"F");
		quest::shout2("$name has made the server first level $ulevel enchanter!");
	}
	
	if(!defined($qglobals{bstmaxlvl}) && $ulevel == $maxlvl && $class eq 'Beastlord') {
		quest::setglobal("bstmaxlvl",1,2,"F");
		quest::shout2("$name has made the server first level $ulevel beastlord!");
	}
	
	if(!defined($qglobals{bermaxlvl}) && $ulevel == $maxlvl && $class eq 'Berserker') {
		quest::setglobal("bermaxlvl",1,2,"F");
		quest::shout2("$name has made the server first level $ulevel berserker!");
	}
	
}