Idle alias fix v1.1 for XooM

alias idle {
  if (!$1) { return }

  var %t = $nick($1,0,o)
  if (!%t) || (%t == 1) || ($me !ison $1) || ($me !isop $1) { return }

  var %i = 1

  while (%i <= %t) {
    var %o_nick = $nick($1,%i,o)
    var %o_nick_ident = $gettok($gettok($address(%o_nick,5),2,33),1,64)
    var %o_nick_host = $gettok($gettok($address(%o_nick,5),2,33),2,64)
    var %o_nick_idle = $nick($1,%i,o).idle

    if (%o_nick ison $1) && (%o_nick !== $me) && (%o_nick_idle > 7200) && (!$istok(%exempto,%o_nick,32)) && (!$istok(%exempto,%o_nick_ident,32)) && (!$istok(%exempto,%o_nick_host,32)) { mode $1 -o %o_nick }

    inc %i
  }
}