+- Communauté Eggdrop (https://forum.eggdrop.fr)
+-- Forum : Eggdrop et TCL (https://forum.eggdrop.fr/forumdisplay.php?fid=8)
+--- Forum : Scripts TCL (https://forum.eggdrop.fr/forumdisplay.php?fid=4)
+--- Sujet : Soucis avec un tcl de Dj_Kenny (/showthread.php?tid=846)
Soucis avec un tcl de Dj_Kenny - fredetdim - 05/01/2011
Bonjour à tous !
Voilà mon petit problème avec le système de box de Dj_Kenny
J'aimerais que dans la party-line quand une personne écrit, tout le monde puisse voir ce qu'elle écrit et pas seulement les personnes qui sont dans la même box qu'elle.
Voici le code d'origine qui permet de faire quand on ecrit :
[15:20:46] <mein> ll
Les personnes appartenant à la box 1 voyent (mais pas ceux de la 2 ni de la 3):
[15:20:46] <Pooshy-B> <mein@Box n°1> ll
Code :
proc putbox {idx nb arg} {
global box
foreach id [array names box] {
if {[valididx $id] && $id!=$idx && $box($id)==$nb} {
putdcc $id "<\002[idx2hand $idx]@Box n°$nb\002> $arg"
}
}
}maintenant quand je change le code en :
Code :
proc putbox {idx nb arg} {
global box
foreach id [array names box] {
putdcc $id "<\002[idx2hand $idx]@Box n°$nb\002> $arg"
}
}Tout le monde peut voir ce qu'une personne écrit dans la box (c'est à dire que si j'écris un mot dans la box 1 : les gens de la box 1 & de la 2 & de la 3 pourrons le voir) , mais on a un echo :
[15:19:42] <mein> l
[15:19:42] <Pooshy-B> <mein@Box n°1> l
J'aimerais enlever cet echos (la deuxième ligne), mais je sais pas comment faire ...
Merci d'avance :p
RE: Soucis avec un tcl de Dj_Kenny - DnS - 05/01/2011
tu à essayé .echo off ?
RE: Soucis avec un tcl de Dj_Kenny - fredetdim - 06/01/2011
Oui
ça n'a eu aucun effet !
RE: Soucis avec un tcl de Dj_Kenny - djkenny - 18/01/2011
tcl
proc putbox {idx nb arg} {
global box
foreach id [array names box] {
if {[valididx $id] && $id!=$idx} {
putdcc $id "<\002[idx2hand $idx]@Box n°$nb\002> $arg"
}
}
}
RE: Soucis avec un tcl de Dj_Kenny - djkenny - 19/01/2011
et ca c est quoi?
tcl
[array names box]