Someone

on *:input:#:{ 
  if (($me ison $active) && ($left($1,1) != /)) { 
    if ($me isop $active) { goto isop } 
    elseif ($me isvo $active) { goto isvo }
    elseif ($me ishop $active) { goto ishop }
    else { echo $ts $nbrack($me) $1- | /!.msg $active $1- | halt }
    :isop
    echo $ts $nbrack(@ $+ $me $+ ) $1- | /!.msg $active $1- | halt 
    :isvo 
    echo $ts $nbrack(+ $+ $me $+ ) $1- | /!.msg $active $1- | halt
    :ishop
    echo $ts $nbrack(% $+ $me $+ ) $1- | /!.msg $active $1- | halt
  } 
}
on *:input:?:{
  if ($left($1,1) != /) {
    echo $ts $nbrack($me) $1- | /!.msg $active $1- | halt 
  }
}
on ^*:text:*:#:{
  if ($left($nick($chan,$nick).pnick,1) == $chr(64)) { goto isop }
  elseif ($left($nick($chan,$nick).pnick,1) == $chr(43)) { goto isvo }
  elseif (#left($nick($chan,$nick).pnick,1) == $chr(37)) { goto ishop }
  else { echo $chan $ts $nbrack($nick) $1- | halt }
  :isop
  echo $chan $ts $nbrack(@ $+ $nick $+ ) $1- | halt 
  :isvo 
  echo $chan $ts $nbrack(+ $+ $nick $+ ) $1- | halt 
  :ishop
  echo $chan $ts $nbrack(% $+ $nick $+ ) $1- | halt 
}