By intersys

;;;;By intersys;;;;
alias Heshbon {
  echo -a $iif($regsubex($remove($1-,$chr(32),$chr(44)),/((^|[+-/^*%]+)(([0-9]|\56)+)(k|m|b)|(^|[+-/^*%]+)(([0-9]|\56)+)|(^|[+-/^*%]+)(\50(.+?)\51))/ig,), $&
    Syntax Error,$iif(!$1,Syntax Error,[Result:] $1- = $regsubex($ticks,$calc($regsubex($ticks,$remove($1-,$chr(44),$chr(32)), $&
    /(^|[+-/*%]+|[+-/*%]+\50)(([0-9]|\56)+)(k|m|b)/ig,\1 $+ ( $+ \2 $+ $iif(\4 == b,*1000000000,$iif(\4 == m,*1000000,*1000)) $+ ))), $&
    /\G([+-]?\d+?)(?=(?:\d{3})++(?=\.\d++$|$))/g,\1 $+ $chr(44))))
}