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

📄 gal_300f.tcl

📁 一个组合逻辑实例,完成地址选择,读写信号产生等时序
💻 TCL
📖 第 1 页 / 共 4 页
字号:
🔍
1234 
	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 10:50:27 ###########


########## Tcl recorder starts at 12/01/06 10:51:11 ##########

# 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 10:51:11 ###########


########## Tcl recorder starts at 12/01/06 10:51:13 ##########

# 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 10:51:13 ###########


########## Tcl recorder starts at 12/01/06 10:51:36 ##########

# 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 10:51:36 ###########


########## Tcl recorder starts at 12/01/06 10:51:41 ##########

# 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 10:51:41 ###########


########## Tcl recorder starts at 12/01/06 10:52:32 ##########

# Commands to make the Process: 
# JEDEC File
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
	}
}

########## Tcl recorder end at 12/01/06 10:52:32 ###########


########## Tcl recorder starts at 12/01/06 10:52:36 ##########

# Commands to make the Process: 
# Create Fuse Map
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 10:52:36 ###########


########## Tcl recorder starts at 12/01/06 11:15:38 ##########

# 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:15:38 ###########


########## Tcl recorder starts at 12/01/06 11:15:47 ##########

# 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:15:47 ###########


########## Tcl recorder starts at 12/01/06 11:17:54 ##########

# 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:17:54 ###########


########## Tcl recorder starts at 12/01/06 11:17:58 ##########

# 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:17:58 ###########


########## Tcl recorder starts at 12/01/06 11:19:25 ##########

# 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:19:25 ###########


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

# 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
	}
}
1234

⌨️ 快捷键说明

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