pb code tcl de statistique

Question

bonjour a tous

j'ai essayer de creer un script tcl me permettant d'informer les users du lien a suivre pour les stats salon:

exemple: bidouille:!stats
              Robots :voici les Stats bidouille http://www.trucmachin.fr/stats/accueil.html
par contre sa ne fonctionne que sur le premier salon
voici le code:

##########################
######### STATS ##########
##########################


bind pub - !stats stats
proc stats { nick uhost handle channel arg } {


if ![string compare -nocase $channel "#accueil"] { 
putquick "bs say $channel &#x0;3;4Voici les Stats&#x0;3;4 $nick &#x0;3;12http://www.********.fr/stats/accueil.html" }
if ![string compare -nocase $channel "#quizz"] { 
putquick "bs say $channel &#x0;3;12Voici les Stats&#x0;3;4 $nick &#x0;3;12http://www.********.fr/stats/quizz.html" }
if ![string compare -nocase $channel "#sexe"] { 
putquick "bs say $channel &#x0;3;12Voici les Stats&#x0;3;4$ nick &#x0;3;12http://http://********.fr/stats/sexe.html" }
if ![string compare -nocase $channel "#radio"] { 
putquick "bs say $channel &#x0;3;12Voici les Stats&#x0;3;4$ nick &#x0;3;12http://http://********.fr/stats/radio.html" }
}

Voila j'ai beau touner ce code dans tt les sens,consulter les tutoriaux je n'y arrive pas qui pourrait me renseigner ???
cordialement

uaip · Answer

Essaye ceci :

bind pub - !stats stats
proc stats { nick uhost handle channel arg } {

 		if {![string compare -nocase $channel "#accueil"]} { 
putquick "bs say $channel :Voici les Stats $nick http://www.********.fr/stats/accueil.html" }
if {![string compare -nocase $channel "#quizz"]} { 
putquick "bs say $channel :Voici les Stats $nick http://www.********.fr/stats/quizz.html" }
if {![string compare -nocase $channel "#sexe"]} { 
putquick "bs say $channel :Voici les Stats $nick http://http://********.fr/stats/sexe.html" }
if {![string compare -nocase $channel "#radio"]} { 
putquick "bs say $channel :Voici les Stats $nick http://http://********.fr/stats/radio.html" }
}

Je crois que les accolades pour les conditions sont obligatoires.
De plus, tu mettais des $ nick au lieu de $nick.
Enfin, ceci n'a rien à voir avec ton problème, mais sache qu'en TCL on ne fais pas les codes-couleurs comme sous mIRC. Un code couleur est précédé de \003 (octal).
Exemples :
\00304 -> rouge
\00307 -> orange
\003 -> revient en 'normal' si des couleurs étaient activées

Idem pour le gras (\002) par exemple, ou le souligné (\037) etc...

Cordialement, uaip.

davcoxwen · Answer

Merci beaucoup uaip pour ta reponse je vé tester sa rapidement et te tiens informer
cordialement

davcoxwen · Answer

bon j'ai tester ton code ,sa ne fonctionne pas non plus, donc je continue mes tests
et avec mon code de debut c un peut plus colorer .merci de ton aide

uaip · Answer

Pour la couleur, osef, j'ai fait exprès de virer touts des codes couleurs, car comme je t'ai dit, ce n'est pas la bonne méthode (je te pensais assez grand pour être capable de les réécrire correctement).

Pour ton code, essaye ceci alors...

if {[string compare -nocase $channel "#accueil"] == 0} { 
putquick "bs say $channel :Voici les Stats $nick http://www.********.fr/stats/accueil.html"
}elseif {[string compare -nocase $channel "#quizz"] == 0} { 
putquick "bs say $channel :Voici les Stats $nick http://www.********.fr/stats/quizz.html"
}elseif {[string compare -nocase $channel "#sexe"] == 0} { 
putquick "bs say $channel :Voici les Stats $nick http://http://********.fr/stats/sexe.html"
}elseif {[string compare -nocase $channel "#radio"] == 0} { 
putquick "bs say $channel :Voici les Stats $nick http://http://********.fr/stats/radio.html"
}

Si ça ne marche pas, alors le problème vient d'ailleurs.

Cordialement, uaip.

Pb code tcl de statistique

4 réponses

Votre réponse

Discussions similaires