Tcl 编程/Modelsim

一位维基教科书用户提名此页面进行清理。
您可以帮助改进它。请查看任何相关讨论。

MODELSIM 用户的 TCL 脚本

我试图找到一个 TCL 脚本，它可以帮助编译和仿真 Modelsim 程序，并具有 GUI 和单字母命令，但我没有找到任何。

后来我学习了 TCL 并为 Modelsim 用户编写了一个小型脚本，它在 Modelsim GUI 上创建了图标。只需单击这些图标，您的项目文件就会被编译、仿真等等。

图标及其描述如下：

·compile c 用于编译、仿真、添加波形和运行，简单地说，执行所有操作

·com-restart r 进行编译并重新启动已运行的代码，我们会在更改代码并希望编译和执行它时执行此操作

·Quitsim q 退出仿真

·QuitModel sim Q 退出 Modelsim

您可以通过单击图标来执行上述所有操作，就像我们在一般 GUI 中使用“保存”和“打开”之类的图标一样。

您还可以通过在命令提示符中键入 c、r、q 和 Q（如上定义）来执行这些操作，只需输入一个字母即可。

为了实现这些功能，您只需在打开 Modelsim 后在 Modelsim 的命令提示符中执行一条命令

source filename.tcl

TCL 代码

proc c  {} {
    '''''vcom counter.vhd  ''''' # add  your files here then delete this comment 
    '''''vcom countertb.vhd  '''''  
    echo "---------------COMPILATION IS OVER--------------------------"
    '''''vsim work.countertb'''''
    echo "---------------STARTED SIMULATION---------------------------"
    add wave *
    run -all
}

proc r  {} {
    '''''vcom counter.vhd'''''  # add  your files here then delete this comment
    '''''vcom countertb.vhd'''''   
    echo "---------------COMPILATION IS OVER--------------------------"
    restart
    echo "---------------SIMULATION IS RESTARTED----------------------"    
    run -all
}
proc q  {} {
 quit -sim
}

proc Q  {} {
 quit -force
}



button .compile -command c -text "Compile"

button .compile_restart  -command r -text "Com-Restart"

button .quitsim -command q       -text "QuitSim"

button .quitmodelsim -command Q   -text "QuitModelsim"


pack .compile -side left

pack .compile_restart -side left

pack .quitsim -side right

pack .quitmodelsim -side right

这是一段非常通用的代码，适用于所有 Modelsim 项目，但不幸的是，只有 Modelsim DE 和 Questa sim 支持按钮命令，您只需更改粗体和斜体字体语句（.vhd 文件）。这些语句是针对这里的一个计数器项目的示例文件。因此，您必须用您的项目文件替换那些计数器示例文件。

然后将您的文件保存为 script.tcl（扩展名为 .tcl 的文件），并使用上述“source”命令执行该文件。

现在，您的 GUI 和单字母命令已准备就绪，可以简化您的工作。

如有任何帮助，请联系：[email protected]