on me:*:join:#SOP:idlechk # | .timer 0 600 idlechk #
alias idlechk { 
  warning 
  .enable #q 
  if ($1) { 
    var %1 = 1 
    while (%1 <= $nick($1,0,@)) { 
      if ($regex($removecs($nick($1,%1,@).pnick,$nick($1,%1,@)),^@$)) { 
        hinc -m ttl total 1 
        whois $nick($1,%1,@) 
      } 
      inc %1 
    } 
  }
}
alias warning {
  set %w1 idle süreniz 10 dakikayı geçmiştir. Cevap ver vs.
  set %w2 idle süresi 20 dakikayı geçtiği için uzaklaştırıldı.
  set %w3 idle süreniz 20 dakikayı geçtiği için uzaklaştırıldınız.
}
#q off
raw *:*: {
  haltdef 
  if ($regex($numeric,^317$)) { 
    if ($3 >= 600 && $3 < 1200) { 
      msg #sop $qt($2) %w1 
    }
    if ($3 >= 1200) { 
      kill $2 %w3 
      msg #sop $qt($2) %w2 
    }
  }
  if ($regex($numeric,^318$)) { 
    inc %& 
    if (%& = $hget(ttl,total)) { 
      unset %&  
      hfree ttl 
      .disable #q 
    } 
  }
}
#q end