basic.tcl 16 KB