on *:input:*: {
  if ($regex($1-,/^[!@]calc (.*)/Si)) {
    haltdef
    echo -ta [Calc] $2- = $bytes($calc($replace($2-,k,*1000,m,*1000000,b,*1000000000)),db)
  }
}