Stuff

What Am I Doing Wrong?

alias randomcolor { 
  var %pos = 1, %color = $r(2,13), %result = $chr(3) 
  while (%pos <= $len($1-)) { 
    %result = %result $+ %color $+ $mid($1-,%pos,1) $+ $chr(3) 
    inc %pos 
    %color = $randomcolor(%color) 
  } 
  if ($isid) return %result 
  else say %result 
} 

alias -l randomcolor { 
  if ($$1 == $r(2,13)) return $1 $r(2,13) 
  elseif ($$1 == $r(2,13)) return $r(2,13) 
  elseif ($$2 == $r(2,13)) return $r(2,13) 
  elseif ($$3 == $r(2,13)) return $r(2,13) 
  elseif ($$4 == $r(2,13)) return $r(2,13) 
  elseif ($$5 == $r(2,13)) return $r(2,13) 
  elseif ($$6 == $r(2,13)) return $r(2,13) 
  elseif ($$7 == $r(2,13)) return $r(2,13) 
  elseif ($$8 == $r(2,13)) return $r(2,13)
}