Messages : 15
Sujets : 3
Inscription : Sep 2014
Niveau d’avertissement :
0%
set nbk 0
bind pub - "!Cerise" piege:kick
proc piege:kick { nick uhost handle chan args } {
incr ::nbk
set reason "Victime N°$::nbk"
putkick $chan $nick $reason
return 1
}
Ce script remet le compteur a zero a chaque restart.
et je voudrais savoir que modifié pour que ce compteur soit intégrer dans l'eggdrop lui meme, c'est a dire a chaque fois quil kick acrémenter le compteur de +1
merci
Messages : 2,281
Sujets : 178
Inscription : Apr 2004
J'ai donné la solution sur
Compteur join, pour un fonctionnement / comptage par canal.
Messages : 15
Sujets : 3
Inscription : Sep 2014
Niveau d’avertissement :
0%
je parle pas de salon mais de remise a zero du compteur apres un restart
Messages : 2,281
Sujets : 178
Inscription : Apr 2004
Oui, et dans le thread pré-cité, il y a tout pour faire un comptage qui n'est pas remis à zéro, mais par canal, donc pas global.
Messages : 15
Sujets : 3
Inscription : Sep 2014
Niveau d’avertissement :
0%
oui facile quand on connais la programmation
sans explication je vois pas comment je pourrais comprendre quelque chose que je ne comprends pas...
se mettre à la place des utilisateur lambda serait pas mal non plus
Messages : 2,281
Sujets : 178
Inscription : Apr 2004
Mais tu ne sembles pas faire le moindre effort non plus.
Je vais te détailler le script précédent ligne par ligne, à toi d'utiliser les éléments que je vais te donner.
TCL
# on crée le réglage "jcpt" (un entier) dans les propriétés des canaux
setudef int jcpt
# Déclencheur sur un join, qui appelle la procédure joinc
bind join - * joinc
# déclaration de la procédure joinc, avec tout les paramètres obligatoires
# voir http://wiki.eggdrop.fr/Binds#JOIN
proc joinc {nick uhost handle chan} {
# Si la personne qui entre est l'eggdrop, on ne compte pas, on sort de la procédure
if {[string tolower $nick] == [string tolower $::botnick] } { return 0 }
# On met dans $cpt la valeur qui est dans le réglage jcpt du canal
# (si elle n'existe pas, elle donne 0, c'est parfait)
set cpt [channel get $chan jcpt]
# on incrémente $cpt de 1
incr cpt
# on enregistre jcpt en lui donnant la valeur de $cpt
channel set $chan jcpt $cpt
# on annonce en notice la valeur de jcpt
putserv "NOTICE $nick :Tu es le N°[channel get $chan jcpt]"
# on sort de la procédure
return 1
}
# Déclencheur sur !compteur tapé en canal qui appelle joindisp
bind pub - "!compteur" joindisp
# déclaration de la procédure joindisp, avec tout les paramètres obligatoires
# voir http://wiki.eggdrop.fr/Binds#PUB
proc joindisp {nick uhost handle chan args} {
# On annonce en canal la valeur de jcpt pour le canal
putserv "PRIVMSG $chan :Il y a eu [channel get $chan jcpt] entrées sur $chan"
# on sort de la procédure
return 1
}
Voila, je ne peux pas détailler plus, donc à toi d'adapter ça pour le comptage de kicks.
Tu peux aussi t'appuyer sur
http://wiki.eggdrop.fr/Tcl-commands pour comprendre les
setudef,
channel set et
channel get.