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



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])
}
Submit a comment
Oops! You need to login or register before you can post a comment!

ebaum's world