Forums Scripts & Popups annoying (biggest nick)

alias bignick {
  var %a = 1
  var %b = $nick($1, 0)
  set %bignick $+ . $+ $1 $nick($1, %a)
  while (%a <= %b) {
    var %lent = $len($nick($1, %a))
    if (%lent >= $len(%bignick $+ . $+ $1)) { set %bignick $+ . $+ $1 $nick($1, %a) }
    inc %a
  }
  return $len(%bignick $+ . $+ $1)
}

alias bignick {
  var %i = 2, %bignick = $nick($1,1)
  while $nick($1,%i) {
    if $len($nick($1,%i)) > $len(%bignick) { %bignick = $nick($1,%i) }
    inc %i
  }
  return $iif($prop == len,$len(%bignick),%bignick)
}