קוד | מחשבון חכם

[intersys]

שם הקוד: מחשבון חכם
יוצר: intersys
גירסא: 1.0
תיאור: אין יותר מדי מה לתאר פשוט מחשבון חכם
הפעלה: לשימוש $math(1+1), ואפשר לעשות גם k|m|b הסבר 1k = 1,000. 1m = 1,000,000. 1b = 1,000,000,000
לדוגמא: $math(1k+32) יחזיר לנו 1,032

קוד: בחר הכל

alias math {
  return $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))))
}