nco1_vho_msim.tcl

来自「baseband基带调制编码」· TCL 代码 · 共 34 行

if {[file exist [project env]] > 0} {project close}
if {[file exist "F:/program files/altera/61/qdesigns/my_work/ask_mod/nco1.mpf"] == 0} {
  project new F:/program files/altera/61/qdesigns/my_work/ask_mod/ nco1
} else	{
project open nco1
}
# Create default work directory if not present
if {[file exist work] ==0} 	{
  exec vlib work
  exec vmap work work}      
# Map lpm library
if {[file exist lpm] ==0} 	{
  exec vlib lpm
  exec vmap lpm lpm}      
vcom -93 -work lpm f:/program files/altera/61/quartus//eda/sim_lib/220pack.vhd 
vcom -93 -work lpm f:/program files/altera/61/quartus//eda/sim_lib/220model.vhd 
# Map altera_mf library
if {[file exist altera_mf] ==0} 	{
  exec vlib altera_mf
  exec vmap altera_mf altera_mf}      
vcom -93 -work altera_mf f:/program files/altera/61/quartus//eda/sim_lib/altera_mf_components.vhd 
vcom -93 -work altera_mf f:/program files/altera/61/quartus//eda/sim_lib/altera_mf.vhd 
# Map sgate library
if {[file exist sgate] ==0} 	{
  exec vlib sgate
  exec vmap sgate sgate}      
vcom -93 -work sgate f:/program files/altera/61/quartus//eda/sim_lib/sgate_pack.vhd 
vcom -93 -work sgate f:/program files/altera/61/quartus//eda/sim_lib/sgate.vhd 
vcom -93 nco1.vho
vcom -93 nco1_tb.vhd
vsim nco1_tb
do nco1_wave.do
run 22000 ns;