On $*:Text:/^(\+|-|!|@|.)(calc|calculator).*/Si:#: {
  if (k isin $2-) halt
  if ($left($1,1) == @) set %meth0d msg $chan
  elseif ($left($1,1) == !) set %meth0d notice $nick
  elseif ($left($1,1) == .) set %meth0d msg $chan
  calculate $2-
}