Code jeu ni oui ni non

Pages (3): « Première [1] 2 3 Suivante > Dernière »

Affichage hiérarchique | Affichage linéaire

Code jeu ni oui ni non

Auteur Message

snip74
Member

Messages : 61
Groupe : Registered
Inscription : Jul 2009
Statut : Hors ligne

Message : #1

Code jeu ni oui ni non

Bonjour,
J'ai trouvé un code tcl qui fonctionne tres bien mais pas toute a fait comme je veut j'ai beau cherché comment créer des regexp et le mettre en place mais je trouve pas donc pas facile pour un débutent Smile

Le script fonctionne bien mais par exemple si une personne dit ouistiti sa le kick :/

j'ai créer un code en mirc le gros souci c'est qu'il faut resté connecter

Donc avez vous un code léger et mieux que sa svp merci ?

Code :

# Badword Kick by KuNgFo0

set badwords {

 "oui"

 "non"

 "o u i"

 "n o n"

}

# Kick MSG

set badword_msg "Bad Words"

# Channels

set badword_chans "#test #test1"

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 *$badword* [string tolower $arg]]} {

                                putserv "KICK $chan $nick :$badword_msg"

                                return

                        }

                }

        }

}

Cordialement Stéphane

30/05/2011 17:54

Visiter le site internet de cet utilisateur

Trouver tous les messages de cet utilisateur

fedora
Novice ..

Messages : 443
Groupe : Registered
Inscription : Sep 2008
Statut : Absent

Message : #2

RE: Code jeu ni oui ni non

ta essayé en changeant

TCL :

if {[string match *$badword* [string tolower $arg]]} {

par

TCL :

if {[string match -nocase "*$badword*" $arg]} {

ton script fonctionne que si une personne dit "oui" ou "non" il doit être kicker ?

j'ai tester le code,il kick bien si une personne écris "oui" ou bien "non" est si une personne écris "ouistiti" le bot ne la pas kické.

TCL :

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

                        }

                }

        }

}

Cordialement DnS

La différence entre Linux et Windows ,c'est que Linux c'est comme une belle fille , il faut l'apprivoiser , la comprendre , la séduire tandis que Windows , c'est comme une prostitué , il faut payer et surtout bien se protéger.

Ce message a été modifié le: 30/05/2011 18:26 par fedora.

30/05/2011 17:57

snip74
Member

Messages : 61
Groupe : Registered
Inscription : Jul 2009
Statut : Hors ligne

Message : #3

RE: Code jeu ni oui ni non

Bonjour Fedora,
merci de ta réponse rapide :)
Pour répondre a ta question voila tu a bien compris le principe si la personne dit oui, non ou ouiiiiii ou noooooon etc.. la personne drva être kick du salon :)

fedora a écrit :

ton script fonctionne que si une personne dit "oui" ou "non" il doit être kicker ?

J'ai testé ton morceau de code ci-dessous cher moi plus rien ne fonctionne il ne kick plus quand une personne dit oui ou non :/

fedora a écrit :

ta essayé en changeant

TCL :

if {[string match *$badword* [string tolower $arg]]} {

par

TCL :

if {[string match -nocase "*$badword*" $arg]} {

TCL :

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

                        }

                }

        }

}

Cordialement DnS

Cordialement Stéphane,

30/05/2011 19:05

fedora
Novice ..

Messages : 443
Groupe : Registered
Inscription : Sep 2008
Statut : Absent

Message : #4

RE: Code jeu ni oui ni non

bah écoute j'vient de retesté encore le code:

Code :

|20:13:05|News:oui

|20:13:06| ·KICK· News|PG098FQuebec@1425230401454.tv|a été éjecté par bOt (Bad Words)

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

                        }

                }

        }

}

30/05/2011 19:16

alias_angelius
Tool Command Language

Messages : 268
Groupe : Registered
Inscription : Mar 2011
Statut : Hors ligne

Message : #5

RE: Code jeu ni oui ni non

Salut,

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.

30/05/2011 19:37

snip74
Member

Messages : 61
Groupe : Registered
Inscription : Jul 2009
Statut : Hors ligne

Message : #6

RE: Code jeu ni oui ni non

Rheuuu !!!
Bon alors avec couleur ou un espace etc.... sa marche pas :s
et avec le code originale il prend les codes couleur etc... mais pas avec ton code Smile

Citation :

[20:29] <12snip74> oui <--- marche pas
[20:29] <12snip74> non <--- marche pas
[20:29] <12AzZaRo> snip74 sa marche pas 7¿08?09¿12?11¿13?04¿.
[20:29] <12snip74> AzZaRo mais sa veut plus kick :s
[20:29] <12AzZaRo> ha
[20:29] <12snip74> oui <--- marche pas
[20:29] <12AzZaRo> pourquoi
[20:30] <12snip74> eerf oui zefz <--- marche pas
[20:30] <12snip74> bah je ne c'est pas Very Happy

[20:30] <12AzZaRo> lol
[20:30] <12AzZaRo> oui
[20:30] * AzZaRo was kicked by Nioui-Ninon (Bad Words)
[20:30] * AzZaRo has joined #Nioui-Ninon
[20:30] <12AzZaRo> non
[20:30] * AzZaRo was kicked by Nioui-Ninon (Bad Words)
[20:30] * AzZaRo has joined #Nioui-Ninon
AzZaRo a été vu avec les pseudos AzZaRo adidas lalalala
[20:30] <12AzZaRo> Nioui-Ninon Tu PrenDs ton PieD là 7¿08?09¿12?11¿13?04¿
[20:30] <12snip74> o_O
[20:30] <12snip74> non <--- marche pas
[20:30] <12AzZaRo> ben si sa marche
[20:30] <12AzZaRo> snip74 ben ta vu il ma éjècté
[20:30] <12snip74> AzZaRo fait une phrase et mais oui
[20:30] <12snip74> dedans Very Happy

[20:31] <12AzZaRo> snip74 si je te dit que tu es un enfoire tu va me dire oui gen suis un Very Happy

[20:31] <12snip74> Lol Mdr
[20:31] <12AzZaRo> oui
[20:31] * AzZaRo was kicked by Nioui-Ninon (Bad Words)
[20:31] * AzZaRo has joined #Nioui-Ninon
AzZaRo a été vu avec les pseudos AzZaRo adidas lalalala
[20:31] <12AzZaRo> Nioui-Ninon Tu PrenDs ton PieD là 7¿08?09¿12?11¿13?04¿
[20:31] <12AzZaRo> c koi ce truc la
[20:32] <12AzZaRo> je comprend plus rien Very Happy

Comme tu peut le voir sur se log avec les couleur sa marche plus et dans une phrase non plus :/

Cordialement Stéphane

30/05/2011 19:43

alias_angelius
Tool Command Language

Messages : 268
Groupe : Registered
Inscription : Mar 2011
Statut : Hors ligne

Message : #7

RE: Code jeu ni oui ni non

j'écris en couleurs voici ce que sa donne :

Citation :

[20:44:45] 14( 22@4seth 14) 05ça marche pas oui
[20:44:47] 44[Kick]14 seth 4par 6 Identifia ( Bad Words14 1)
[20:44:57] 14( 22@4seth 14) 05ah bas si ça marche non ?
[20:44:57] 44[Kick]14 seth 4par 6 Identifia ( Bad Words14 1)

donc comme tu peux le voir avec mes couleurs en testant ceci fonctionne. sinon tu peux rajouter un stripcodes à ta proc peut-être que ton soucis viens de la.

30/05/2011 19:47

fedora
Novice ..

Messages : 443
Groupe : Registered
Inscription : Sep 2008
Statut : Absent

Message : #8

RE: Code jeu ni oui ni non

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

      set arg [stripcodes uacgbr $arg]

        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

                        }

                }

        }

}

j'ai ajouter

TCL :

set arg [stripcodes uacgbr $arg]

ps: tester avec un applet java est sa fonctionne :] && oublie pas de restart ton bot.

Cordialement DnS

Ce message a été modifié le: 30/05/2011 19:51 par fedora.

30/05/2011 19:49

snip74
Member

Messages : 61
Groupe : Registered
Inscription : Jul 2009
Statut : Hors ligne

Message : #9

RE: Code jeu ni oui ni non

Bonsoir alias_angelius,
Trop bizarre chez vous sa fonctionne mais pas chez moi :/
alors que mon egg et tout neuf ^^

Cordialement Stéphane

alias_angelius a écrit :

j'écris en couleurs voici ce que sa donne :

Citation :

donc comme tu peux le voir avec mes couleurs en testant ceci fonctionne. sinon tu peux rajouter un stripcodes à ta proc peut-être que ton soucis viens de la.

hésitez pas de visité http://www.tchat-fusion.org/
ou part irc /server -m irc.tchat-fusion.org

30/05/2011 19:50

alias_angelius
Tool Command Language

Messages : 268
Groupe : Registered
Inscription : Mar 2011
Statut : Hors ligne

Message : #10

RE: Code jeu ni oui ni non

fedora,

plutot :

TCL :

set arg [stripcodes uacgbr [lindex $arg 0]]

non ?

30/05/2011 19:51

alias_angelius
Tool Command Language

Messages : 268
Groupe : Registered
Inscription : Mar 2011
Statut : Hors ligne

Message : #11

RE: Code jeu ni oui ni non

snip74

comme la dit fedora restart ton bot et retente avec les modification Smile

30/05/2011 19:52

fedora
Novice ..

Messages : 443
Groupe : Registered
Inscription : Sep 2008
Statut : Absent

Message : #12

RE: Code jeu ni oui ni non

alias_angelius non j'ai pas eu besoin de lindex
j'm'en sert pour mon bot radio pour les users sous java
essaye Smile

Ce message a été modifié le: 30/05/2011 19:55 par fedora.

30/05/2011 19:53

alias_angelius
Tool Command Language

Messages : 268
Groupe : Registered
Inscription : Mar 2011
Statut : Hors ligne

Message : #13

RE: Code jeu ni oui ni non

oui en effet sans le lindex ça fonctionne parfaitement.

autant pour moi Smile

30/05/2011 19:59

snip74
Member

Messages : 61
Groupe : Registered
Inscription : Jul 2009
Statut : Hors ligne

Message : #14

RE: Code jeu ni oui ni non

Rheuu !!! alias_angelius,
Oui je rehash et restart a chaque fois un habitude Smile

Bon alors sa fonctionne avec le nouveau code de fedora Wink super merci Smile

Citation :

[20:52] * Snip74 sets mode: +q Nioui-Ninon
[20:52] <Snip74> non
[20:52] * You were kicked by Nioui-Ninon (Bad Words)
[20:52] * Attempting to rejoin channel #Nioui-Ninon
[20:52] * Rejoined channel #Nioui-Ninon
[20:52] * Topic is '~[]~ =>Salon ou il est interdit de dire oui et non sous peine de kick Razz

<= ~[]~'
[20:52] * Set by nani on Sun Aug 01 22:49:38
[20:52] <Snip74> AzZaRo fait une phrase et mais oui
[20:52] * You were kicked by Nioui-Ninon (Bad Words)
[20:52] * Attempting to rejoin channel #Nioui-Ninon
[20:52] * Rejoined channel #Nioui-Ninon
[20:52] * Topic is '~[]~ =>Salon ou il est interdit de dire oui et non sous peine de kick Razz

<= ~[]~'

Par contre voila encore un souci se que je vous disé au début quand une personne dit ex "ouistiti" sa ne devrait pas le kick :

Citation :

[20:55] <AzZaRo> pour les couleur du salon sa veux dire oui alors
[20:55] * AzZaRo was kicked by Nioui-Ninon (Bad Words)
[20:55] * AzZaRo has joined #Nioui-Ninon
[20:55] <AzZaRo> Nioui-Ninon Tu PrenDs ton PieD là ¿?¿?¿?¿
[20:55] * AzZaRo was kicked by Nioui-Ninon (Bad Words)
[20:55] * AzZaRo has joined #Nioui-Ninon
[20:55] <AzZaRo> Nioui-Ninon Tu PrenDs ton PieD là ¿?¿?¿?¿
[20:55] * AzZaRo was kicked by Nioui-Ninon (Bad Words)
[20:55] * AzZaRo has joined #Nioui-Ninon
[20:55] <snip74> Mdr

Voila sa kick car il a un auto message lol et sa peut duré longtemps donc il a couper le salon

Cordialement Stéphane

[20:52] * Snip74 sets mode: +q Nioui-Ninon
[20:52] <Snip74> non
[20:52] * You were kicked by Nioui-Ninon (Bad Words)
[20:52] * Attempting to rejoin channel #Nioui-Ninon
[20:52] * Rejoined channel #Nioui-Ninon
[20:52] * Topic is '~[]~ =>Salon ou il est interdit de dire oui et non sous peine de kick Razz <= ~[]~'
[20:52] * Set by nani on Sun Aug 01 22:49:38
[20:52] <Snip74> AzZaRo fait une phrase et mais oui
[20:52] * You were kicked by Nioui-Ninon (Bad Words)
[20:52] * Attempting to rejoin channel #Nioui-Ninon
[20:52] * Rejoined channel #Nioui-Ninon
[20:52] * Topic is '~[]~ =>Salon ou il est interdit de dire oui et non sous peine de kick Razz <= ~[]~'

alias_angelius a écrit :

snip74

comme la dit fedora restart ton bot et retente avec les modification Smile

hésitez pas de visité http://www.tchat-fusion.org/
ou part irc /server -m irc.tchat-fusion.org

30/05/2011 20:04

fedora
Novice ..

Messages : 443
Groupe : Registered
Inscription : Sep 2008
Statut : Absent

Message : #15

RE: Code jeu ni oui ni non

dans ce cas là faut faire une exception pour proteger ton bot

30/05/2011 20:07

Pages (3): « Première [1] 2 3 Suivante > Dernière »

« Sujet précédent | Sujet suivant »

Discussions probablement similaires...
Discussion:		Auteur	Réponses:	Affichages:	Dernier message
	Problème code tcl	Alucard`68	2	1,677	18/03/2012 10:58 Dernier message: Alucard`68

Voir une version imprimable
Envoyer ce sujet à un ami
S'abonner au sujet | Ajouter le sujet aux favoris