Mise en forme de code: pensez à utiliser les balises [ tcl ] et [ /tcl ] (sans les espaces bien sûr) autour de vos codes tcl afin d'avoir un meilleur rendu et une coloration syntaxique. x


commande et personne qui écrive en couleur
#1
Bonjour,

alors voila mon problème est le suivant, quand les user de mon salon tape !sky Jess en noir ça fonctionne parfaitement bien par contre si ils utilisent de la couleur là c'est le drame aucune commande ne répond.

donc en fouinant sur le net je suis tombé la dessus je l'es inséré a mon code mais toujours rien ça ne fonctionne pas ...

Voila le tcl:

tcl
proc mirc_strip {{args ""}} {
   set switches ""
   if {$switches == ""} { set switches all }
   set arg [lindex $args 0]
   set all [expr {([lsearch -exact $switches all] >= 0) ? 1 : 0}]
   set list [list \002 "" \017 "" \026 "" \037 ""]
   regsub -all -- "\003(\[0-9\]\[0-9\]?(,\[0-9\]\[0-9\]?)?)?" $arg "" arg
   #set arg [replace -- $arg [join $list]]
   set arg [string map {\002 "" \017 "" \026 "" \037 ""} $arg]   
   return $arg
}


Quelqu'un aurait-il une idée? Ou même la solution magique pour que les commandes tapé en couleur fonctionne. Moi je ne sais pas comment faire.

Merci d'avance pour votre future aide.

Cordialement.
#2
Si c'est pour ton "fun.tcl", la petite correction apportée sur ce post devrait suffire.
irc.zeolia.net - Offrez-moi un café
Merci de ne pas demander d'aide en MP
Away


Possibly Related Threads…
Thread Author Replies Views Last Post
  [Résolu] Comment recupére le nombre de personne d'un salon (Users, Operateur) Dydouch 4 4,140 01/11/2013, 23:55
Last Post: Dydouch
  [Resolu] Ajout de couleur durant une lecture de fichier heretoc 0 3,540 16/12/2012, 02:10
Last Post: heretoc
  Commande réserver a certaine personne. Alucard`68 8 5,534 25/03/2012, 12:39
Last Post: Alucard`68
  comment enlevé le Kick couleur snip74 1 3,530 04/06/2011, 13:25
Last Post: CrazyCat

Forum Jump:


Users browsing this thread: 1 Guest(s)