09/05/2011, 20:38
ok.
Sinon ya aussi :
Après je vois pas désolé.
J'ai trouver ça en cherchant en speed sur le net.
Sinon ya aussi :
tcl
proc mirc:strip {arg} {
regsub -all -- "\003(\[0-9\]\[0-9\]?(,\[0-9\]\[0-9\]?)?)?" $arg "" arg
set arg [string map -nocase [list \002 "" \017 "" \026 "" \037 ""] $arg]
return $arg
}
Après je vois pas désolé.
J'ai trouver ça en cherchant en speed sur le net.