on *:text:!idle*:#:{
set %zaman $3
set %kanal $chan
msg $chan %kanal kanalında %zaman üzerindeki idleler taranıyor
var %i 1
while %i <= $nick($chan,0) {
if $nick($chan,%i) isreg $chan {
write nickler.txt $nick($chan,%i)
}
inc %i
olayagec
}
}
alias olayagec {
if $lines(nickler.txt) !== 0 {
.enable #idlekn
whois $read(nickler.txt,1)
write -dl1 nickler.txt
.timer 1 1 olayagec
}
else {
msg %kanal idle taraması bitti
.disable #idlekn
.unset %kanal
.unset %zaman
}
}
#idlekn off
raw 317:*:{
if $3 > %zaman {
mode %kanal +b $2
kick %kanal $2 Idle.
}
}
#idlekn end


Denemedim ama çalışması gerekiyor
Not: idle taraması bitti diyene kadar başka bir tarama yaptırma
Kullanımı: !idle kick SANİYE