Tcl/TK之命令 命令 命令

在Tcl中，一切动作都是通过命令实现的，命令通过换行符或分号隔开，对于使用过linux系统的朋友来说非常容易理解。Tcl处理一条命令分为两个步骤： 解析和 执行。下面将列举几个常见的命令：

set和puts命令

set命令用于创建、读取和修改变量，此命令需要一个或者两个参数。第一个参数是变量，第二个参数（若给出）是变量的新值。创建的变量可以当命令使用，变量的值可以是命令。
e.g.

set x 10
set y [expr $x*10]

输出的结果是：

方括号中[expr $x*10]是一条进行四则运算的命令，将该命令作为变量“y”的值；当然也可以是多条命令，只要是合法的Tcl脚本都可以作为该参数。
puts命令是用于输出变量的值的命令，参数可以是变量可以是命令；当参数为变量的时候，应在变量前加上“＄”符号。
e.g.

puts $x
puts $y
puts [expr $x*100]

输出的结果是

source 命令

source是一条Tcl命令，需要一个文件名作为其参数，它的作用就是读取该文件并将该文件作文Tcl脚本处理。若该文件没有在tcl的“bin”目录下，则需要指明其路径。
e.g.

source D:/Tcl/bin/sxh.tcl
source sxh.tcl

运行结果如下图所示；

这里的“sxh.tcl”脚本文件的内容是一个找100-1000中水仙花数的代码。如果是从bin目录下启动的tclsh程序，则上面两个命令都可以，如果是从windows命令窗口启动的tclsh，则只能使用“source D:/Tcl/bin/sxh.tcl”这条命令才能把正确执行。

proc 命令

proc是一个创建过程的命令，类似于C语言中构造函数，这个过程可以当作命令使用；
用法：

proc name arglist body

name是过程名，arglist是过程的参数，body是过程块，包含Tcl脚本。若有返回值，需用“return”关键字，若不用“return”关键字，则返回一个空字符串。
e.g.

proc factorial {val} {
	set result 1
	while {$val>0} {
		set result [expr $result *$val]
		incr val -1
	}
	return $result
}

这几行命令定义了一个名为factorial的过程，过程的参数为“val”，实现的功能是求某个数（val）的阶乘，具体实现如下图所示。

Tcl/Tk的命令有很多，以后在实际应用中再逐一记录！