Stuff

on *:INPUT:*:{
  if ($left($1,1) != /) {
    if ($me isop $chan) {
      echo -t $chan $c5(«) $+ $c7($chr(40)) $+ $c9(@) $+ $c6($nick) $+ $c7($chr(41)) $+ $c5(») $c8($upper($left($1-,1)) $+ $right($1-,-1))) 
      haltdef
    }
    elseif ($me ishop $chan) {
      echo -t $chan $c5(«) $+ $c7($chr(40)) $+ $c9(%) $+ $c6($nick) $+ $c7($chr(41)) $+ $c5(») $c8($upper($left($1-,1)) $+ $right($1-,-1))) 
      haltdef
    }
    elseif ($me isvoice $chan) {
      echo -t $chan $c5(«) $+ $c7($chr(40)) $+ $c9(+) $+ $c6($nick) $+ $c7($chr(41)) $+ $c5(») $c8($upper($left($1-,1)) $+ $right($1-,-1))) 
      haltdef
    } 
    else {
      echo -at $c5(«) $+ $c7($chr(40)) $+ $c6($me) $+ $c7($chr(41)) $+ $c5(») $c8($upper($left($1-,1)) $+ $right($1-,-1)) 
      haltdef
    }
    .msg $active $c8($upper($left($1-,1)) $+ $right($1-,-1)) 
  }
}

alias c1 return $+(,$1-,)
alias c2 return $+(,$1-,)
alias c3 return $+(,$1-,)
alias c4 return $+(,$1-,)
alias c5 return $+(,$1-,)
alias c6 return $+(,$1-,)
alias c7 return $+(,$1-,)
alias c8 return $+(,$1-,)
alias c9 return $+(,$1-,)