⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 gal_300f.tcl

📁 一个组合逻辑实例,完成地址选择,读写信号产生等时序
💻 TCL
📖 第 1 页 / 共 4 页
字号:

########## Tcl recorder end at 12/01/06 11:19:29 ###########


########## Tcl recorder starts at 12/01/06 11:22:05 ##########

# Commands to make the Process: 
# Hierarchy
if [runCmd "\"$cpld_bin/sch2jhd\" \"gal_300f.sch\" "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 12/01/06 11:22:05 ###########


########## Tcl recorder starts at 12/01/06 11:22:09 ##########

# Commands to make the Process: 
# Fit Design
if [runCmd "\"$cpld_bin/sch2blf\" -sup \"gal_300f.sch\" -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/iblflink\" \"gal_300f.bls\" -o \"gal_300f.bl0\" -ipo -family -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/iblifopt\" -i \"gal_300f.bl0\" -o \"gal_300f.bl1\" -red bypin choose -sweep -collapse none -pterms 8 -family -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/iblflink\" \"gal_300f.bl1\" -o \"gal_300f.bl2\" -omod gal_300f -family -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/iblifopt\" gal_300f.bl2 -red bypin choose -sweep -collapse all -pterms 8 -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/idiofft\" gal_300f.bl3 -pla -o gal_300f.tt2 -dev p16v8 -define n -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/fit\" gal_300f.tt2 -dev p16v8 -str -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 12/01/06 11:22:09 ###########


########## Tcl recorder starts at 12/01/06 11:22:53 ##########

# Commands to make the Process: 
# Pre-Fit Equations
if [runCmd "\"$cpld_bin/blif2eqn\" gal_300f.tt2 -o gal_300f.eq3 -err automake.err"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 12/01/06 11:22:53 ###########


########## Tcl recorder starts at 12/01/06 11:22:59 ##########

# Commands to make the Process: 
# Post-Fit Equations
if [runCmd "\"$cpld_bin/blif2eqn\" gal_300f.tt3 -o gal_300f.eq4 -err automake.err"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 12/01/06 11:22:59 ###########


########## Tcl recorder starts at 12/01/06 11:23:12 ##########

# Commands to make the Process: 
# Linked Equations
if [runCmd "\"$cpld_bin/blif2eqn\" \"gal_300f.bl2\" -o \"gal_300f.eq2\" -err automake.err"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 12/01/06 11:23:12 ###########


########## Tcl recorder starts at 12/01/06 11:23:16 ##########

# Commands to make the Process: 
# Create Fuse Map
if [runCmd "\"$cpld_bin/fuseasm\" gal_300f.tt3 -dev p16v8 -o gal_300f.jed -ivec noinput.tmv -rep gal_300f.rpt -doc brief -con ptblown -for brief -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/synsvf\" -exe \"$install_dir/ispvmsystem/ispufw\" -prj gal_300f -if gal_300f.jed -j2s -log gal_300f.svl "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 12/01/06 11:23:16 ###########


########## Tcl recorder starts at 12/01/06 14:16:42 ##########

# Commands to make the Process: 
# Hierarchy
if [runCmd "\"$cpld_bin/vhd2jhd\" \"addr_select.vhd\" -o \"addr_select.jhd\" -m \"$install_dir/ispcpld/generic/lib/vhd/location.map\" -p \"$install_dir/ispcpld/generic/lib\""] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 12/01/06 14:16:42 ###########


########## Tcl recorder starts at 12/01/06 14:16:50 ##########

# Commands to make the Process: 
# Fit Design
if [catch {open ADDR_SELECT.cmd w} rspFile] {
	puts stderr "Cannot create response file ADDR_SELECT.cmd: $rspFile"
} else {
	puts $rspFile "PROJECT: ADDR_SELECT
working_path: \"$proj_dir\"
module: addr_select
vhdl_file_list: addr_select.vhd
output_file_name: addr_select
suffix_name: edi
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/synpwrap\" -e addr_select -target ispgal"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete ADDR_SELECT.cmd
if [runCmd "\"$cpld_bin/edif2blf\" -edf \"addr_select.edi\" -out \"addr_select.bl0\" -err automake.err -log \"addr_select.log\" -prj gal_300f -lib \"$install_dir/ispcpld/dat/mach.edn\" -cvt yes -net_vcc vcc -net_gnd gnd -nbx -dse -tlw"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/iblifopt\" \"addr_select.bl0\" -red bypin choose -collapse -pterms 8 -family -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/iblflink\" \"gal_300f.bl1\" -o \"gal_300f.bl2\" -omod gal_300f -family -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/iblifopt\" gal_300f.bl2 -red bypin choose -sweep -collapse all -pterms 8 -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/idiofft\" gal_300f.bl3 -pla -o gal_300f.tt2 -dev p16v8 -define n -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/fit\" gal_300f.tt2 -dev p16v8 -str -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 12/01/06 14:16:50 ###########


########## Tcl recorder starts at 12/03/06 17:51:49 ##########

# Commands to make the Process: 
# Linked Equations
if [runCmd "\"$cpld_bin/blif2eqn\" \"gal_300f.bl2\" -o \"gal_300f.eq2\" -err automake.err"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 12/03/06 17:51:49 ###########


########## Tcl recorder starts at 12/03/06 17:51:53 ##########

# Commands to make the Process: 
# Pre-Fit Equations
if [runCmd "\"$cpld_bin/blif2eqn\" gal_300f.tt2 -o gal_300f.eq3 -err automake.err"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 12/03/06 17:51:53 ###########


########## Tcl recorder starts at 12/03/06 17:51:55 ##########

# Commands to make the Process: 
# Post-Fit Equations
if [runCmd "\"$cpld_bin/blif2eqn\" gal_300f.tt3 -o gal_300f.eq4 -err automake.err"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 12/03/06 17:51:56 ###########


########## Tcl recorder starts at 12/03/06 17:51:58 ##########

# Commands to make the Process: 
# Create Fuse Map
if [runCmd "\"$cpld_bin/fuseasm\" gal_300f.tt3 -dev p16v8 -o gal_300f.jed -ivec noinput.tmv -rep gal_300f.rpt -doc brief -con ptblown -for brief -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/synsvf\" -exe \"$install_dir/ispvmsystem/ispufw\" -prj gal_300f -if gal_300f.jed -j2s -log gal_300f.svl "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 12/03/06 17:51:58 ###########


########## Tcl recorder starts at 12/03/06 17:52:01 ##########

# Commands to make the Process: 
# Verilog Post-Route Simulation Model
if [runCmd "\"$cpld_bin/sch2tf\" -template \"$install_dir/ispcpld/generic/verilog/tfi.tft\" -prj gal_300f gal_300f.sch "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [catch {open gal_300f.psl w} rspFile] {
	puts stderr "Cannot create response file gal_300f.psl: $rspFile"
} else {
	puts $rspFile "-dev p16v8 -part LAT GAL16V8Z-15QS GAL -o gal_300f.tim
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/timsel\" @gal_300f.psl"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete gal_300f.psl
if [catch {open gal_300f._sp w} rspFile] {
	puts stderr "Cannot create response file gal_300f._sp: $rspFile"
} else {
	puts $rspFile "#insert -- NOTE: Do not edit this file.
#insert -- auto generated by post-route verilog simulation models
#insert --
#unixpath
#unixpath $install_dir/ispcpld/pld/verilog
#libfile pldlib.v
#unixpath
#vlog \"$proj_dir/gal_300f.vt\"
#insert -- end
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/chipsim\" \"gal_300f._sp\" \"gal_300f.vtl\" none"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete gal_300f._sp
if [runCmd "\"$cpld_bin/j2vlog\" gal_300f.jed -dly custom gal_300f.tim -pldbus default gal_300f.btp -o gal_300f.vt -module gal_300f -suppress -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 12/03/06 17:52:01 ###########


########## Tcl recorder starts at 12/03/06 17:52:04 ##########

# Commands to make the Process: 
# VHDL Post-Route Simulation Model
if [catch {open gal_300f._sp w} rspFile] {
	puts stderr "Cannot create response file gal_300f._sp: $rspFile"
} else {
	puts $rspFile "#insert -- NOTE: Do not edit this file.
#insert -- auto generated by post-route vhdl simulation models
#insert --
#unixpath $proj_dir
#vcom gal_300f.vhq
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/chipsim\" \"gal_300f._sp\" \"gal_300f.vtd\" none"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete gal_300f._sp
if [runCmd "\"$cpld_bin/j2svhdl\" gal_300f.jed -dly custom gal_300f.tim max -pldbus default gal_300f.btp -o gal_300f.vhq -module gal_300f -suppress -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 12/03/06 17:52:04 ###########


########## Tcl recorder starts at 12/03/06 17:53:34 ##########

# Commands to make the Process: 
# Fit Design
if [catch {open ADDR_SELECT.cmd w} rspFile] {
	puts stderr "Cannot create response file ADDR_SELECT.cmd: $rspFile"
} else {
	puts $rspFile "PROJECT: ADDR_SELECT
working_path: \"$proj_dir\"
module: addr_select
vhdl_file_list: addr_select.vhd
output_file_name: addr_select
suffix_name: edi
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/synpwrap\" -e addr_select -target ispgal"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete ADDR_SELECT.cmd
if [runCmd "\"$cpld_bin/edif2blf\" -edf \"addr_select.edi\" -out \"addr_select.bl0\" -err automake.err -log \"addr_select.log\" -prj gal_300f -lib \"$install_dir/ispcpld/dat/mach.edn\" -cvt yes -net_vcc vcc -net_gnd gnd -nbx -dse -tlw"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/iblifopt\" \"addr_select.bl0\" -red bypin choose -collapse -pterms 8 -family -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/sch2blf\" -sup \"gal_300f.sch\" -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/iblflink\" \"gal_300f.bls\" -o \"gal_300f.bl0\" -ipo -family -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/iblifopt\" -i \"gal_300f.bl0\" -o \"gal_300f.bl1\" -red bypin choose -sweep -collapse none -pterms 8 -family -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/iblflink\" \"gal_300f.bl1\" -o \"gal_300f.bl2\" -omod gal_300f -family -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/iblifopt\" gal_300f.bl2 -red bypin choose -sweep -collapse all -pterms 8 -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/idiofft\" gal_300f.bl3 -pla -o gal_300f.tt2 -dev p16v8 -define n -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/fit\" gal_300f.tt2 -dev p16v8 -str -err automake.err "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 12/03/06 17:53:34 ###########

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -