Oui, ça me semble assez clair, mais ce n'est pas du flood
Il faudrait utiliser une regexp du genre:
Celle-ci permet de capter lorsqu'un même caractère est répété au moins 3 fois.
En TCL, ça donnerait:
Le "& #92;" est à remplacer par \
Edit
Testé par DnS, ça fonctionne. J'avais commit une petite erreur : ne pas mettre le -inline dans les options de regexp si on veut avoir un résultat booléen (-inline retourne le tableau de ce qui a matché).
Il faudrait utiliser une regexp du genre:
Code :
(.)(\1{3,})
En TCL, ça donnerait:
tcl
bind pubm - "*" repet_test
proc repet_test { nick uhost hande chan text } {
if { [regexp -all -- {(.)(\1{3,})} $text] } {
putserv "PRIVMSG $chan :Dis donc $nick, tu as bloqué ta touche ?"
}
return
}
Le "& #92;" est à remplacer par \
Edit
Testé par DnS, ça fonctionne. J'avais commit une petite erreur : ne pas mettre le -inline dans les options de regexp si on veut avoir un résultat booléen (-inline retourne le tableau de ce qui a matché).