💻 Tcl/Tk

 

Tcl est un langage de script datant de 1988.

 

 

J'ai vraiment envie de me mettre plus sérieusement à Tcl/Tk, le peu que j'ai vu m'a vraiment plu, c'est un vénérable langage qui pourrait sembler démodé, face à Python qui est mis partout en avant, alors que Tcl semble plus stable et pérenne : j'ai trouvé de vieux bouts de code ou des logiciels qui datent de plusieurs années et qui fonctionnent toujours.

 

Avec python, c'est vraiment un bordel sans nom pour arriver à suivre. Je peux comprendre que le langage python étant plus utilisé, il existe plus de briques dans l'écosystème et d'interdépendances, ce qui d'une part permet de gagner en productivité, mais d'autre part oblige à suivre et mettre régulièrement à jour le code, ou d'utiliser des artifices pour avoir le bon environnement de dev (pyenv, poetry).

 

Mais pour moi qui ai peu de besoins, et vise à des choses simples, j'ai l'impression que Tcl/Tk sera plus adapté.

 

Quelques sites didactiques sur le sujet :

 

https://tcltk.fr/

https://zetcode.com/lang/tcl/

 

 

 

 

 Mémo :

 

• Changer le prompt :

 

set tcl_prompt1 {puts -nonewline "> "}

 

 

• Utilise un prompt avec historique :

 

rlwrap tclsh

 

• Calculer une expression :

 

puts [expr 4+5]

 

 

• Définir une variable :

 

set myName Eric

puts $myName

 

• Créer une liste et récupérer un élément de cette liste :

 

set fruits {Pomme Poire Pêche Cerise}

puts [lindex $fruits 2]

 

 

• Dessiner :

 

package require Tcl 8.5
package require Tk

pack [canvas .c -width 640 -height 480 -bg #fff] -anchor nw ; # north west coordinates

.c create line  313 267 380 200
.c create line  380 200 343 136
.c create line  343 136 331 61
.c create line  331 61 270 90
.c create line  270 90 232 49
.c create line  232 49 223 89
.c create line  223 89 301 105
.c create line  301 105 223 89
.c create line  223 89 200 93
.c create line  200 93 193 99
.c create line  193 99 249 106
.c create line  249 106 301 105
.c create line  193 99 187 113
.c create line  187 113 228 122
.c create line  187 113 138 117
.c create line  138 117 228 122
.c create line  138 117 128 147
.c create line  128 147 210 198
.c create line  128 147 175 188
.c create line  175 188 138 192
.c create line  175 188 210 198
.c create line  138 192 210 198
.c create line  138 192 133 199
.c create line  133 199 145 216
.c create line  145 216 215 220
.c create line  215 220 237 249
.c create line  237 249 313 267
.c create line  215 220 267 225
.c create line  267 225 313 267

 

 

https://wiki.tcl-lang.org/page/List+of+ttk+Themes

 

https://www.tcl.tk/

 

Tcl/Tk pour Android