Code jeu ni oui ni non

[snip74]

Bonjour fedora,
Merci beaucoup de ton aide et de cette réponse

Oui j'avais aussi trouvé cette source :p elle marche très bien

Mais je l'utilisé pas car je trouvé pas comment on pouvez ajouter les variable oui en O U I j'avais testé avec des étoiles O*U*I sa ne fonctionné pas donc la je viens de re faire le testé avec ton code il fonctionne tres bien mais il ne prend pas les variables "o*u*i" / "n*o*n" / "o u i" et "n o n"

Cordialement Stéphane

en recherchant un peut sur le site,je suis tomber sur le code de Dj_KennY qui fait un peut ce que tu recherche.j'ai ajouter un foreach.

tclcopier

namespace eval speak {
   # variable contenant les mots à reconnaitre
   # on pourras utiliser des wildchar * ?
   variable bonjour {oui non}
  setudef flag OuiNon
}
 
bind pubm - * speak::bonjour
proc speak::bonjour {nick host hand chan text} {
   # on déclare les variable bonjour
   variable bonjour
   if {[channel get $chan OuiNon]} {
   # on debug le texte et on met tout en minuscules
   set text [stripcodes abcru $text]
   set text [string tolower $text]
   # on test si on trouve le texte dans la variable bonjour
    foreach mot $text {
   if {[lsearch -exact $bonjour $mot] != -1} {
       putserv "KICK $chan $nick :Attention tu viens d'être kické pour avoir dit le mot interdit oui ou Non :bete:"
 
   # on ferme les \} qu on a ouvert plus haut
   }
}
}
}

pour l'activer tape en pl .chanset #salon +OuiNon
essaye de tester comme sa voir. perso j'ai tester est sa fonctionne ...