Forums Scripts & Popups Evaluating a variable.

on *:text:!scramble*:# {
  set %unscrambled $$2
  set %scrambled.len $len($$2)
  set %charnumber 1
  :line
  if $var(%scrambled.char.*,0) == %scrambled.len {
    goto line2
    var %tempscramble 1
  }
  else {
    set %scrambled.char. [ $+ [ %charnumber ] ] $mid($$2,%charnumber,1)
    inc %charnumber 1
  }
  goto line
  :line2
  set %tempvar $var(%scrambled.char.*,$rand(1,$var(%scrambled.char.*,0)))
  echo %tempvar
}