Bar Script
Posted by leaX
Wednesday, December 12, 2007
Description: .
Returns the percentage of a result in bar for;
Usage; $bar(number1,number2)
Example: $bar(1,4) gives; $bar(1,4) ==> [|||-------] 0ms
Returns the percentage of a result in bar for;
Usage; $bar(number1,number2)
Example: $bar(1,4) gives; $bar(1,4) ==> [|||-------] 0ms
alias bar {
if ((!$2) || ($1 > $2)) { return $!false }
var %1 = $round($calc(($1 / $2) *10))
var %2 = $calc(10 - %1)
return $+([^B],$chr(91),$str(|,%1),[^B],$str(-,%2),[^B],$chr(93),[^B])
}