### Anti-Idle v1.2
    ### by Progeny <
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
>
    ### irc.azzurra.org - #EggHelp
     
    # - Using -
    # Type in partyline:
    # .chanset #channel maxidle <time in minutes>
    # If set 0 channel's check will be ignored.
     
    # Punishing method (1 = Kick, 2 = Kick/Ban)
    set pmethod 2
    # Ban time in minutes.
    set bantime 1
    # Kick's reason
    set aidlereason "E` vietato sostare per piu` di %idletime minuti nel canale."
    # Exception's flags
    set flags f|f
    # Kick op? (0 = Yes, 1 = No)
    set kickop 1
    # Kick voice? (0 = Yes, 1 = No)
    set kickvoice 1
    #Check for idling users every minutes.
    bind time - * aidle:checkidle
     
    setudef int maxidle
     
    proc aidle:checkidle { min hour day month year } {
    global botnick flags kickop kickvoice
            foreach chan [channels] {
                    if {![channel get $chan "maxidle"]} {continue}
                    foreach nick [chanlist $chan] {
                            if {$nick == $botnick} {continue}
                            if {([isop $nick $chan]) && ($kickop)} {continue}
                            if {([isvoice $nick $chan]) && ($kickvoice)} {continue}
                            if {[matchattr [nick2hand $nick] $flags] == 1} {continue}
                            if {[getchanidle $nick $chan] > [channel get $chan "maxidle"]} {
                            aidle:punish $chan $nick [channel get $chan "maxidle"]
                            }
                    }
           
            }
        }
     
        proc aidle:punish { channel nick idletime } {
          global pmethod aidlereason bantime
          regsub -all "%idletime" $aidlereason $idletime aidlereason
            switch $pmethod {
                    1 { putserv "KICK $channel $nick :$aidlereason" }
                    2 { newchanban $channel "*![getchanhost $nick]" "Anti-Idle" "4Lutfen bekleme yapmayiniz , sorununuz var ise 1 dk sonra tekrar gelebilirsiniz !!!" $bantime }
                    }
          }
     
          putlog "Anti-Idle v1.2 loaded"