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