alias randomcolors {
  var %i = 0
  var %line = $replace($1-,$chr(32),$chr(95))
  while (%i < $len($1-)) {
    inc %i
    echo -a %i
    var %x = $r(2,15)
    var %line2 = $+(%line2,,$iif(%x isnum 1-9,$+(0,%x),%x),$left(%line,1))
    var %line = $right(%line,-1)
  }
  return $replace(%line2,$chr(95),$chr(32))
}