alias min {
var %i 1
if (!$1) { return 2* $eval($min,0) $+ : Invalid Parameters }
elseif (!$2) { return 2* $eval($min,0) $+ : Invalid Parameters }
elseif ($1) && ($1 !isnum) && (!$2) { return 2* $eval($min,0) $+ : Invalid Parameters }
elseif ($2 !isnum) && (!$3) { return 2* $eval($min,0) $+ : Invalid Parameters }
else {
while (%i <= $0) {
if ($eval($ $+ %i,2) isnum) { set %num %num $eval($ $+ %i,2) }
inc %i
}
tokenize 32 %num
var %x, %i = $regsub($sorttok($1-,32,n),/[a-z]|[A-Z]/g,$null,%x)
return The Minimum Value Is: $gettok(%x,1,32)
}
}