on *:input:#: {
  if ($left($1,1) != /) && ($1 ison $chan) {
    if ($1 isop $chan) {
      msg $chan 4*12»4@ $+ $1 $+ 12«4* $999 $2-
      haltdef
    }
    elseif ($1 ishop $chan) {
      msg $chan 7*12»7% $+ $1 $+ 12«7* $999 $2- 
      haltdef
    }
    elseif ($1 isvoice $chan) {
      msg $chan 2*12»2+ $+ $1 $+ 12«2* $999 $2- 
      haltdef
    }
    elseif ($1 isreg $chan) {
      msg $chan 10*12»10 $+ $1 $+ 12«10* $999 $2- 
      haltdef
    }
  }
}