on *:text:!idle*:#: {  
  if ($nick isop $chan) || ($nick == r) {  
    set %asilkanal $chan
    /idle $2
  }
  else {
    msg $chan kullanamassin
  }    
}
raw 317:*:{
  if %kanal != $null {
    msg %asilkanal  $2 : idle suresi: $int($calc($3 / 60)) dakika, $calc( $3 - $calc($int($calc($3 / 60)) * 60 )) saniye.
  }
  if $2 == $nick(%kanal,%kacuser) {
    msg %asilkanal  -- Liste sonu --
    unset %kanal
  }
}
alias idle {
  set %kanal $1 
  msg %asilkanal -- %kanal kanalinda bulunan kisilerin idle sureleri listeleniyor --
  if $me ison %kanal {
    set %kacuser $nick(%kanal,0) 
    var %i 1
    while %i <= %kacuser {
      set %userx $nick(%kanal,%i)
      whois %userx
      inc %i
    }
  }
}