on $*:text:/[!@]calc(ulator)?/Si:#:{   
  var %display = $iif($left($1,1) == @, msg $chan, notice $nick) 9[3CALCULATOR9]10 |   
  if ($2 == $null) { notice $nick ERROR: No Equation Found to Solve | halt } | 
else {     %display $2- = $calc($replace($2-,k,000,m,00000) $2- )) } }