Communauté sur les Eggdrops - Community about Eggdrops
[Résolu] trier une liste - Printable Version

+- Communauté sur les Eggdrops - Community about Eggdrops (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)
+--- Thread: [Résolu] trier une liste (/showthread.php?tid=677)



[Résolu] trier une liste - mistery - 23/05/2010

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 "
}




RE: trier une liste - heretoc - 23/05/2010

met les balises [ tcl ] et [ /tcl ]


RE: trier une liste - mistery - 23/05/2010

resolu merci