A. 如何写tcl脚本谢谢
比如说设置一个变量，同时给其赋值：
set
var1
10
tcl脚本中的注释，如果在行首，使用#注释内容；
如果在行尾，使用;#注释内容
打印字符串在屏幕上，使用
puts
"要输出的内容"
还有对文件的操作，字符串的操作等，你最好下载一个tcl教程，如果有一些编程基础，看看差不多就行了，很简单的。
B. 如何在Vivado中使用Tcl脚本替代约束
Vivado是Xilinx最新的FPGA设计工具，支持7系列以后的FPGA及Zynq 7000的开发。与之前的ISE设计套件相比，Vivado可以说是全新设计的。无论从界面、设置、算法，还是从对使用者思路的要求，都是全新的。看了大家很多的博文，基本上都是用GUI创建工程，那我就简单介绍一下Vivado的脚本使用。
在ISE设计套件中，支持多种脚本： 可以用xperl来运行perl脚本，可以用xtclsh来运行Tcl脚本，还可以用windows批处理脚本来运行设计流程。
ISE集成的Tcl脚本解释器为8.4版本。同时，ISE GUI中的Tcl console功能不够强大，部分组件使用的脚本也与Tcl有不同，导致Tcl脚本在ISE上并不十分流行。
在Vivado上，Tcl已经成为唯一支持的脚本。并且，所有操作都有对应的Tcl脚本可以执行。所以，掌握Tcl脚本语言对掌握Vivado的使用有重要帮助。
Vivado上集成的Tcl脚本解释器为8.5版本，也是目前比较流行的Tcl版本。Vivado的核心就是一个脚本解释器，GUI界面只是将各种脚本命令封装为图形化界面而已。
下面以Windows为平台，用脚本的思路，运行一下Vivado：
首先需要设置环境变量，在path环境变量中添加Vivado的路径，路径设置到bin文件夹，例如 C:XilinxVivado2014.1in
在Windows界面下，“开始”->“运行”，输入cmd，打开windows命令行终端。这个时候 有三个选择：
1. 输入“vivado”，启动Vivado GUI界面，和点击桌面上的图标启动Vivado没什么区别；事实上，直接点击桌面图标，就是调用windows batch命令启动vivado
2. 输入“vivado -mode batch -source file.tcl”，从脚本批处理的形式启动Vivado,运行后直接执行file.tcl文件
3. 输入“vivado -mode tcl”，启动Tcl交互式命令行。
使用第三种方法。启动后显示Vivado的版本，这里使用2014.1
C. Tcl格式脚本用文本编辑器即可完成是吗那么写好的脚本，如何在tcl软件中调用呢
执行tcl脚本的方法是在tcl语言解释器重输入source xxx.tcl。xxx.tcl就是你写的tcl脚本
D. 关于TCL脚本的文件输入输出
set f [open e:/00 w] #用句柄f以写的方式打开文件e;/00 文件必须存在
puts $f "nihao" #将内容nihao输出至句柄f
close $f #关闭句柄f
set f [open e:/00 r] #用句柄f以读的方式打开文件e;/00 若文件不存在将创建
while {[gets $f line] >= 0} { #读取一行内容
puts $f
} #显示该项内容
close $f #关闭句柄f
set f [open e:/00 a] #用句柄f以追加的方式打开文件e;/00 若文件不存在将创建
puts $f "nihao" #将内容nihao输出至句柄f
close $f #关闭句柄f
E. tcl脚本运行速度
tcl脚本运行速度为：没十分钟运行一次。
作为领先的全球化智能科技公司，TCL在智能终端、半导体显示、半导体光伏及半导体材料等领域。
F. verilog 时序约束怎么做
verilog本身不包含时序约束信息
时序约束是用tcl脚本写的
design compiler在综合电路时会读入tcl脚本把约束信息加载到电路上
现在FPGA的综合工具也只是tcl的时序约束了
G. TCL脚本在linux下怎么执行
你的linux装了tcl解释器了吗，一般是
/usr/bin/tclsh，如果确认你装了
（确认方法是在命令行下执行
tclsh），如果没问题，就在你的TCL脚本第一行加上
#!/usr/bin/env
tclsh
然后确保你的脚本(假定脚本名字叫test.tcl)
是可执行的
（chmod
+x
test.tcl)
然后直接运行
./test.tcl
即可。
H. 求tcl脚本语言计时器
时间精确到ms可以用clock clicks -milliseconds。比如你第一个命令用一次clock clicks -milliseconds把值赋给a，第二个命令再用一次clock clicks -milliseconds把值赋给b，然后用$b-$a就是你要的计时的时间，以ms为单位。显示当前时间是clock format [clock scan now] -f %c，不过时间单位只能到秒。
举个例子说明：
proc milliseconds {} {
set a [clock clicks -milliseconds]
after 100
set b [clock clicks -milliseconds]
puts "[expr $b-$a]"
}
此时运行结果就是after的100ms。
I. 什么是tcl脚本，简单分析一下
Tcl(最早称为“工具命令语言”"Tool Command Language", 但是目前已经不是这个含义，不过我们仍然称呼它为TCL)是一种脚本语言。 由John Ousterhout创建。 TCL经常被用于 快速原型开发,脚本编程，GUI和测试等方面。
Tcl的特性包括:
* 任何东西都是一条命令，包括语法结构(for, if等)。
* 任何事物都可以重新定义和重载。
* 所有的数据类型都可以看作字符串。
* 语法规则相当简单
* 提供事件驱动给Socket和文件。基于时间或者用户定义的事件也可以。
* 动态的域定义。
* 很容易用C,C++,或者Java扩展。
*解释语言，代码能够动态的改变。
* 完全的Unicode支持。
* 平台无关。Win32,UNIX,Mac上都可以跑。
* 和Windows的GUI紧密集成;Tk
* 代码紧凑，易于维护。
TCL本身不提供面向对象的支持。但是语言本身很容易扩展到支持面向对象。许多C语言扩展都提供面向对象能力，包括XOTcl,Incr Tcl等。另外SNIT扩展本身就是用TCL写的。
使用最广泛的TCL扩展是TK。 TK提供了各种OS平台下的图形用户界面GUI。连强大的Python语言都不单独提供自己的GUI，而是提供接口适配到TK上。另一个流行的扩展包是Expect. Expect提供了通过终端自动执行命令的能力，例如(passwd,ftp,telnet等命令驱动的外壳).
J. 有关Tcl脚本语言编程的问题
set srcfile myres.res
set dstfile dtest.txt
if {[catch {open $srcfile r} res]} {
puts "Failed to open the source file: $srcfile; $res"
return 0
}
set hSrc $res
if {[catch {open $dstfile w+} res]} {
puts "Failed to open the destination file: $dstfile; $res"
return 0
}
set hDst $res
foreach line [split [read $hSrc] \n] {
if {[regexp {rdly=(.*)targ=(.*)trig=(.*)} $line match sub1]} {
puts $hDst "Rise Delay is $sub1"
}
if {[regexp {fdly=(.*)targ=(.*)trig=(.*)} $line match sub1]} {
puts $hDst "Fall Delay is $sub1"
}
}
close $hSrc
close $hDst