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


[Résolu] trier une liste
#1
j'aimerai trier une liste et afficher le resultat mais j'ai un petit soucis : Tcl error [classement]: wrong # args: should be "set varName ?newValue?"

tcl
proc classement {nick host hand chan text} {
global top10_file a b c d e
set liste3 [list[split [read [set f [file join ./ $top10_file] "r"]] "\n"]]
close $f
set liste2 [list {[lindex $liste3 0] $a} {[lindex $liste3 1] $b} {[lindex $liste3 2] $c} {[lindex $liste3 3] $d} {[lindex $liste3 4] $e}]
set liste [list[lsort [-integer -index 1 $liste2]]]
putserv "NOTICE $nick :  $liste "
}

#2
met les balises [ tcl ] et [ /tcl ]
#3
resolu merci


Forum Jump:


Users browsing this thread: 1 Guest(s)