returns a text based bar for use in system info scripts for example, works $bar(N) where N = percentage.
example: $bar(50) or $bar(50%) returns a bar 50% filled

alias bar {
  ;sets the percentage of the bar to be filled
  ;you can change the colors by replacing the %fillcol (fill color) and the %defcol (default color) variable values
  var %x = $round($calc($remove($1,$chr(37)) / 10),0),%fillcol = 2,%defcol = 12
  return $+($chr(3),%fillcol,$chr(44),%fillcol,$str(NN,%x),$chr(3),%defcol,$chr(44),%defcol,$str(NN,$calc(10 - %x)),$chr(3))
}