on *:TEXT:!+Congrats *:#: { 
  if ($read(congrats.txt)) { 
    write congrats.txt $2-
  notice $nick 6You added a Script: $2- 6  }
  else {
    write congrats.txt $2-
    notice $nick 6Your greet has been set to: $2- 6
  }
}

on *:TEXT:!Congrats *:#: { 
  if ($3 == $null) || ($2 == $null) { /notice $nick You must specify the level and the skill you leveled - "!level ## skill } { halt }
  if ($nick == $me) { halt }
  if ($read(congrats.txt)) {
    msg $chan  $read(congrats.txt)
  }
}

on *:TEXT:!DelCongrats:#: {
  if ($read(congrats.txt,s,$nick $address($nick,2))) {
    notice $nick 6You deleted 4~(~ $read(congrats.txt,s,$nick $address($nick,2)) 7~)~6.
    write -ds $+ " $+ $+ " congrats.txt
  }
  else {
    notice $nick 6You don't have the power to remove script.
  }
}