on $*:TEXT:/^[!@.]exp */si:#: {
  if (!$2) {
    /notice $nick Please state a level.
  }
  else {
    set %exp.return /notice $nick 
    if (@ isin $1) set %exp.return /msg $chan
    if ($2 > 99) /notice $nick 1Level 99 is the highest stat.
    set %exp.lvl $2
    if (* %exp.lvl * iswm $file(ExpData.txt)) Set %exp.exp $remove( $file(ExpData.txt) , %exp.lvl , $chr(61) )
    %exp.return 1Level:4 %exp.lvl 1 $+ $chr(124) Exp Needed:4 %exp.exp
    unset %exp.*
  }
}