30/05/2011, 20:37
Salut,
Moi j'ai essayer en fesant :
en rajoutant des * au niveau de oui/non et sa fonctionne très bien.
Moi j'ai essayer en fesant :
tcl
# Badword Kick by KuNgFo0
set badwords {
"*oui*"
"*non*"
}
# Kick MSG
set badword_msg "Bad Words"
# Channels
set badword_chans "#concept"
bind pubm - * pubm_badword
putlog "Badword loaded"
proc pubm_badword {nick uhost hand chan arg} {
global badwords badword_msg badword_chans botnick
if {(([lsearch -exact [string tolower $badword_chans] [string tolower $chan]] != -1) || ($badword_chans == "*")) && (![matchattr $hand b]) && ($nick != $botnick)} {
foreach badword [string tolower $badwords] {
if {[string match -nocase $badword $arg]} {
putserv "KICK $chan $nick :$badword_msg"
return
}
}
}
}
en rajoutant des * au niveau de oui/non et sa fonctionne très bien.