on $*:text:/^[.!@&]idleall($|\s)/Si:#:{
  ;if (!$2) { notice $nick 14Invalid syntax. Use: 07!idle nick }
  var %i, %x, %nicks, %y
  set %i 1 
  set %x $iif($2,$2,#soulfire)
  while (%i <= $nick(%x,0)) { 
    if ($nick(%x,%i) isvoice %x) { 
      ;set $+(%,who.,$nick(%x,%i)) $iif($left($1,1) == @,msg $chan,notice $nick)
      ;.whois $nick(%x,%i) $nick(%x,%i)
      $iif($left($1,1) == @,msg $chan,notice $nick) 07 $+ $nick(%x,%i) 14has been idle in 07 $+ %x 14for:14 $duration($nick(%x,%i).idle)
    }
    inc %i 
  } 
}