Faire reagir le bot sur plusieur mot

[NesCrex]

Hep
Voici un script et a partir de celui la je voudrai le faire réagir sur plusieurs; par que sur le mot "f**k"
Merci

Code :

# Le channel sur le quel le script va réagir:
set pschan "#Chat"

# Le bot réagit t'il sur tout les chan ou juste sur
# celui mentionné ci-dessus? 1=Oui 2=Tous
set psinchan "1"

# Le mot auquel le bot va réagir:
set pstrigger "fuck"

# Ce que le bot va répondre
# (vous pouvez y mettre de la couleur)
set psanswer "Non mais tu parle d'un langage toi!"

# La façon que le bot va répondre:
# ( notice privmsg ou chan )
set psmaniere "chan"

###############################################
################### Script ####################
###############################################
### À ne pas modifier, c'est à vos risques! ###
###############################################

bind pub - $pstrigger call_talk

proc pretalk { target channel } {
global pschan psinchan pstrigger
if { $psinchan == "1" && $pschan == $channel } {
talk $target $channel
}
if { $psinchan == "2" } {
talk $target $channel
}
if { $psinchan == "1" && $pschan != $channel } {
putlog "J'ai détecté un $pstrigger dans $channel mais je ne suis pas
configuré pour y envoyer un message." }
}


proc talk { nick chan } {
global pschan pstrigger psanswer psmaniere
if { $psmaniere == "notice" } { putserv "notice $nick :$psanswer" }
if { $psmaniere == "privmsg" } { putserv "privmsg $nick :$psanswer"}
if { $psmaniere == "chan" } { putserv "privmsg $chan :$nick : $psanswer" }
if { $psmaniere != "notice" && $psmaniere != "privmsg" && $psmaniere
!= "chan" } { putlog "Erreur: Aucune bonne manière d'envoi n'est configuré."
} else { putlog "Parle script: Envoyé à $nick" }
}

proc call_talk { nick uhost hand chan arg } { pretalk $nick $chan }

code]