on $*:text:/^[`!.](calc|c|) */Si:#:{ 
  if ($left(text,$2))  {
    /notice $nick $$2 =1 $calc($2)
  } 
  else { halt }
}