30/05/2011, 21:32
Tiens pour se que sa intéresse je mais mon code en mirc, le ttemps de trouvé comment le codé en TCL ou si sa peut m'aidé a le créer en TCL
Copier coller le code dans une nouvelle remote ALT+ R File Load
Cordialement Stéphane
Copier coller le code dans une nouvelle remote ALT+ R File Load
Code :
on @$*:text:/(^| )(o[-_.,; ]*u[-_.,; ]*i|n[-_.,; ]*o[-_.,; ]*n|o[-_.,; ]*u[-_.,; ]*e|o[-_.,; ]*u[-_.,; ]*a[-_.,; ]*i[-_.,; ]*s|u[-_.,; ]*é|n[-_.,; ]*a[-_.,; ]*n|o[-_.,; ]*u[-_.,; ]*a[-_.,; ]*i|v[-_.,; ]*i[-_.,; ]*i[-_.,; ]*i|y[-_.,; ]*e[-_.,; ]*s|v[-_.,; ]*i[-_.,; ]*i|u[-_.,; ]*e|o[-_.,; ]*u[-_.,; ]*é)( |$)/iS:#nioui-ninon: {
/kick # $nick 7INTERDIS 12de dire les mots 7OUI 12ou 7NON 12sur peine de kick XD
}
on @$*:NOTICE:/(^| )(o[-_.,; ]*u[-_.,; ]*i|n[-_.,; ]*o[-_.,; ]*n|o[-_.,; ]*u[-_.,; ]*e|o[-_.,; ]*u[-_.,; ]*a[-_.,; ]*i[-_.,; ]*s|u[-_.,; ]*é|n[-_.,; ]*a[-_.,; ]*n|o[-_.,; ]*u[-_.,; ]*a[-_.,; ]*i|v[-_.,; ]*i[-_.,; ]*i[-_.,; ]*i|y[-_.,; ]*e[-_.,; ]*s|v[-_.,; ]*i[-_.,; ]*i|u[-_.,; ]*e|o[-_.,; ]*u[-_.,; ]*é)( |$)/iS:#nioui-ninon: {
/kick # $nick 7INTERDIS 12de dire les mots 7OUI 12ou 7NON 12sur peine de kick XD
}
on @$*:action:/(^| )(o[-_.,; ]*u[-_.,; ]*i|n[-_.,; ]*o[-_.,; ]*n|o[-_.,; ]*u[-_.,; ]*e|o[-_.,; ]*u[-_.,; ]*a[-_.,; ]*i[-_.,; ]*s|u[-_.,; ]*é|n[-_.,; ]*a[-_.,; ]*n|o[-_.,; ]*u[-_.,; ]*a[-_.,; ]*i|v[-_.,; ]*i[-_.,; ]*i[-_.,; ]*i|y[-_.,; ]*e[-_.,; ]*s|v[-_.,; ]*i[-_.,; ]*i|u[-_.,; ]*e|o[-_.,; ]*u[-_.,; ]*é)( |$)/iS:#nioui-ninon: {
/kick # $nick 7INTERDIS 12de dire les mots 7OUI 12ou 7NON 12sur peine de kick XD
}
Cordialement Stéphane