on $*:TEXT:/^[!@.]calc/Si:#:{ 
  $iif($left($1,1) == @,msg $chan,notice $nick) 3[Calculater ]1 10 $2- 10 3 = $calc($2-) 10 
  $bytes($2-,db)
}