on *:text:@calc*:#:{
  if ($2 == $null) { msg $chan [CALC] You have forgot to add a number! }
  if ($regex($2-,/[!@#$&\x2C\w]/i)) {
  msg $chan [CALC] Parse error, $2- = Invalid! }
  else { msg $chan [Calc] $2- = $calc($2-)
  }
}