Unnamed

on *:INPUT:*:{
  if ($left($1,1) == /) { return }
  else {
    haltdef
    if ($me isop $active) { var %s = @, %c = 4 }
    elseif ($me ishop $active) { var %s = $chr(37), %c = 7 }
    elseif ($me isvoice $active) { var %s = +, %c = 2 }
    else { var %c = 10 }
    echo -at $+(<,$chr(2),%s,$chr(3),%c,$me,$chr(15),>) $+($upper($left($1,1)),$right($1-,-1))
    .msg $active $+($upper($left($1,1)),$right($1-,-1),$iif($right($1-,1) !isalnum,.))
  }
}