on *:text:!idle*:#: {
  set %asilkanal $chan
  /idle $2
}
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
    }
  }
}