[script] Anti Idle par Progeny
#1
Voici la source d'un petit script anti-idle trouvé sur egghelp.org:
TCL
### Anti-Idle v1.2
### by Progeny <progeny@azzurra.org>
### 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 5
# 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" "Too idle" $bantime }
    }
}
 
putlog "Anti-Idle v1.2 loaded"



Je pense que ça peut en aider certains ici ;)
Répondre
#2
Si on veux changé le script un peux tout cre méalnge et plus rien fonctionne :/
Répondre Avertir
#3
Ce serait sympa que tu fasses des efforts pour écrire correctement et expliquer un peu mieux ce que tu veux dire.
Ce script est très simple et facilement adaptable, à condition bien sûr que tu saches ce que tu veux faire et que tu fasses l'effort de le faire correctement et pas simplement en faisant des copier/coller d'autres parties en espérant que ça marche.
Répondre
#4
Bon ce que je voulais dire c'est que j'ai essayé par moi même de changé le script pour mettre un sapart au lieu du kick. Mais sa pas fonctionné comme je le pensé. L'eggdrop ne réagie plus. Et si il réagi a chaque fois que le user entre sur le chan il fait un auto-sapart :s moi j'aimerais que il fasse 1 sapart part 3 autrement dit que il agit 1 fois c tout :S si possible de me répondre Wink
Répondre Avertir
#5
Salut Babytigrou16

Ton code est comme cela:

TCL
proc aidle:punish { channel nick idletime } {
global pmethod aidlereason bantime
regsub -all "%idletime" $aidlereason $idletime aidlereason
    switch $pmethod {
    1 { putserv "sapart $nick $channel" }
    2 { newchanban $channel "*![getchanhost $nick]" "Anti-Idle" "Too idle" $bantime }
    }
}



?
Répondre Avertir
#6
ok et quand le user va revenir sa le referas ou il va faire que 1 fois ?
Répondre Avertir
#7
cela le refera pendant le temps qu'y est mi dans
TCL
set bantime 5


Répondre Avertir
#8
ok et le 5 c'est 5 minute ou 5 seconde ?
Répondre Avertir
#9
# Ban time in minutes.
Répondre Avertir
#10
ok mais c'est normal que le TCL ne reagie pas ?
Répondre Avertir
#11
Il faut attendre CrazyCat car perso je l'ai pas tester le tcl
Répondre Avertir
#12
Il faudrait avoir la source complète (et modifiée) du TCL pour pouvoir donner une réponse Smile
Répondre
#13
bonjour Smile

J'aimerais avoir ce système mais au lieu que le bot kick ou kickban pour inactivité , j'aimerais simplement qu'il déop ou dévoice la personne selon si elle est op ou voice avec un message du genre deop/devoice pour inactivité de plus de 10 minutes.
Ne sachant pas coder, c'est le pourquoi de ma demande histoire de pas tout foirer et re-mailer

Par avance merci et bonne journée

Bewess
Gilles
Répondre Avertir


Atteindre :


Utilisateur(s) parcourant ce sujet : 1 visiteur(s)
Tchat 100% gratuit -Discutez en toute liberté