alias getrank {
  var %t 1 | window -hn @Srank
  while (%t <= $lines(SScores.txt)) { aline -p @Srank $read(SScores.txt,%t) | inc %t }
  filter -cteuww 2 32 @Srank @Srank
  return $iif(!$fline(@Srank,* $+ $1 $+ *),$chr(40) $+ None $+ $chr(41),$fline(@Srank,* $+ $1 $+ *))
  window -c @Srank
}
alias ScrambleHigh {
  var %1 = $ctime
  var %t 1 | window -hn @SScores
  while (%t <= $lines(SScores.txt)) { aline -p @SScores $read(SScores.txt,%t) | inc %t }
  filter -cteuww 2 32 @SScores @SScores
  var %1 1
  while (%1 <= $iif(!$2,10,$2)) {
    msg $1 $chr($asc(#)) $+ %1 $+ : $iif($line(@SScores,%1),$removecs($gettok($line(@SScores,%1),1,32),Scores.) - $gettok($line(@SScores,%1),2,32),None)
    inc %1
  }
  msg $1 $calc($ctime - %1)
  window -c @SScores
}