videogenerator.tcl

来自「用lattice XP3 demo板设计的VGA信号发生器」· TCL 代码 · 共 2,428 行 · 第 1/5 页

TCL
2,428 行
字号
12345
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete VideoGenerator.cmd

########## Tcl recorder end at 06/14/07 21:22:00 ###########


########## Tcl recorder starts at 06/14/07 21:22:36 ##########

# Commands to make the Process: 
# Hierarchy
if [runCmd "\"$cpld_bin/vhd2jhd\" \"videogenerator.vhd\" -o \"videogenerator.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 06/14/07 21:22:36 ###########


########## Tcl recorder starts at 06/14/07 21:22:36 ##########

# Commands to make the Process: 
# Synplify Synthesize VHDL File
if [catch {open VideoGenerator.cmd w} rspFile] {
	puts stderr "Cannot create response file VideoGenerator.cmd: $rspFile"
} else {
	puts $rspFile "STYFILENAME: videogenerator.sty
PROJECT: VideoGenerator
WORKING_PATH: \"$proj_dir\"
MODULE: VideoGenerator
VHDL_FILE_LIST: \"$install_dir/ispcpld/../cae_library/synthesis/vhdl/XP.vhd\" videogenerator.vhd
OUTPUT_FILE_NAME: VideoGenerator
SUFFIX_NAME: edi
WRITE_PRF: false
FREQUENCY:  200
FANOUT_LIMIT:  100
DISABLE_IO_INSERTION: false
FORCE_GSR: auto
SPEED_GRADE: -3
SYMBOLIC_FSM_COMPILER: true
NUM_CRITICAL_PATHS:   3
AUTO_CONSTRAIN_IO: true
NUM_STARTEND_POINTS:   0
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/Synpwrap\" -e VideoGenerator -target LATTICE-XP -part LFXP3C"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete VideoGenerator.cmd

########## Tcl recorder end at 06/14/07 21:22:36 ###########


########## Tcl recorder starts at 06/14/07 21:23:33 ##########

# Commands to make the Process: 
# Hierarchy
if [runCmd "\"$cpld_bin/vhd2jhd\" \"videogenerator.vhd\" -o \"videogenerator.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 06/14/07 21:23:33 ###########


########## Tcl recorder starts at 06/14/07 21:23:33 ##########

# Commands to make the Process: 
# Synplify Synthesize VHDL File
if [catch {open VideoGenerator.cmd w} rspFile] {
	puts stderr "Cannot create response file VideoGenerator.cmd: $rspFile"
} else {
	puts $rspFile "STYFILENAME: videogenerator.sty
PROJECT: VideoGenerator
WORKING_PATH: \"$proj_dir\"
MODULE: VideoGenerator
VHDL_FILE_LIST: \"$install_dir/ispcpld/../cae_library/synthesis/vhdl/XP.vhd\" videogenerator.vhd
OUTPUT_FILE_NAME: VideoGenerator
SUFFIX_NAME: edi
WRITE_PRF: false
FREQUENCY:  200
FANOUT_LIMIT:  100
DISABLE_IO_INSERTION: false
FORCE_GSR: auto
SPEED_GRADE: -3
SYMBOLIC_FSM_COMPILER: true
NUM_CRITICAL_PATHS:   3
AUTO_CONSTRAIN_IO: true
NUM_STARTEND_POINTS:   0
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/Synpwrap\" -e VideoGenerator -target LATTICE-XP -part LFXP3C"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete VideoGenerator.cmd

########## Tcl recorder end at 06/14/07 21:23:33 ###########


########## Tcl recorder starts at 06/14/07 21:24:04 ##########

# Commands to make the Process: 
# Hierarchy
if [runCmd "\"$cpld_bin/vhd2jhd\" \"videogenerator.vhd\" -o \"videogenerator.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 06/14/07 21:24:04 ###########


########## Tcl recorder starts at 06/14/07 21:24:04 ##########

# Commands to make the Process: 
# Synplify Synthesize VHDL File
if [catch {open VideoGenerator.cmd w} rspFile] {
	puts stderr "Cannot create response file VideoGenerator.cmd: $rspFile"
} else {
	puts $rspFile "STYFILENAME: videogenerator.sty
PROJECT: VideoGenerator
WORKING_PATH: \"$proj_dir\"
MODULE: VideoGenerator
VHDL_FILE_LIST: \"$install_dir/ispcpld/../cae_library/synthesis/vhdl/XP.vhd\" videogenerator.vhd
OUTPUT_FILE_NAME: VideoGenerator
SUFFIX_NAME: edi
WRITE_PRF: false
FREQUENCY:  200
FANOUT_LIMIT:  100
DISABLE_IO_INSERTION: false
FORCE_GSR: auto
SPEED_GRADE: -3
SYMBOLIC_FSM_COMPILER: true
NUM_CRITICAL_PATHS:   3
AUTO_CONSTRAIN_IO: true
NUM_STARTEND_POINTS:   0
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/Synpwrap\" -e VideoGenerator -target LATTICE-XP -part LFXP3C"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete VideoGenerator.cmd

########## Tcl recorder end at 06/14/07 21:24:04 ###########


########## Tcl recorder starts at 06/14/07 21:24:35 ##########

# Commands to make the Process: 
# Hierarchy
if [runCmd "\"$cpld_bin/vhd2jhd\" \"videogenerator.vhd\" -o \"videogenerator.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 06/14/07 21:24:35 ###########


########## Tcl recorder starts at 06/14/07 21:24:35 ##########

# Commands to make the Process: 
# Synplify Synthesize VHDL File
if [catch {open VideoGenerator.cmd w} rspFile] {
	puts stderr "Cannot create response file VideoGenerator.cmd: $rspFile"
} else {
	puts $rspFile "STYFILENAME: videogenerator.sty
PROJECT: VideoGenerator
WORKING_PATH: \"$proj_dir\"
MODULE: VideoGenerator
VHDL_FILE_LIST: \"$install_dir/ispcpld/../cae_library/synthesis/vhdl/XP.vhd\" videogenerator.vhd
OUTPUT_FILE_NAME: VideoGenerator
SUFFIX_NAME: edi
WRITE_PRF: false
FREQUENCY:  200
FANOUT_LIMIT:  100
DISABLE_IO_INSERTION: false
FORCE_GSR: auto
SPEED_GRADE: -3
SYMBOLIC_FSM_COMPILER: true
NUM_CRITICAL_PATHS:   3
AUTO_CONSTRAIN_IO: true
NUM_STARTEND_POINTS:   0
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/Synpwrap\" -e VideoGenerator -target LATTICE-XP -part LFXP3C"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete VideoGenerator.cmd

########## Tcl recorder end at 06/14/07 21:24:35 ###########


########## Tcl recorder starts at 06/14/07 21:25:03 ##########

# Commands to make the Process: 
# Hierarchy
if [runCmd "\"$cpld_bin/vhd2jhd\" \"videogenerator.vhd\" -o \"videogenerator.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 06/14/07 21:25:03 ###########


########## Tcl recorder starts at 06/14/07 21:25:04 ##########

# Commands to make the Process: 
# Synplify Synthesize VHDL File
if [catch {open VideoGenerator.cmd w} rspFile] {
	puts stderr "Cannot create response file VideoGenerator.cmd: $rspFile"
} else {
	puts $rspFile "STYFILENAME: videogenerator.sty
PROJECT: VideoGenerator
WORKING_PATH: \"$proj_dir\"
MODULE: VideoGenerator
VHDL_FILE_LIST: \"$install_dir/ispcpld/../cae_library/synthesis/vhdl/XP.vhd\" videogenerator.vhd
OUTPUT_FILE_NAME: VideoGenerator
SUFFIX_NAME: edi
WRITE_PRF: false
FREQUENCY:  200
FANOUT_LIMIT:  100
DISABLE_IO_INSERTION: false
FORCE_GSR: auto
SPEED_GRADE: -3
SYMBOLIC_FSM_COMPILER: true
NUM_CRITICAL_PATHS:   3
AUTO_CONSTRAIN_IO: true
NUM_STARTEND_POINTS:   0
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/Synpwrap\" -e VideoGenerator -target LATTICE-XP -part LFXP3C"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete VideoGenerator.cmd

########## Tcl recorder end at 06/14/07 21:25:04 ###########


########## Tcl recorder starts at 06/14/07 21:25:25 ##########

# Commands to make the Process: 
# Hierarchy
if [runCmd "\"$cpld_bin/vhd2jhd\" \"videogenerator.vhd\" -o \"videogenerator.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 06/14/07 21:25:25 ###########


########## Tcl recorder starts at 06/14/07 21:25:26 ##########

# Commands to make the Process: 
# Synplify Synthesize VHDL File
if [catch {open VideoGenerator.cmd w} rspFile] {
	puts stderr "Cannot create response file VideoGenerator.cmd: $rspFile"
} else {
	puts $rspFile "STYFILENAME: videogenerator.sty
PROJECT: VideoGenerator
WORKING_PATH: \"$proj_dir\"
MODULE: VideoGenerator
VHDL_FILE_LIST: \"$install_dir/ispcpld/../cae_library/synthesis/vhdl/XP.vhd\" videogenerator.vhd
OUTPUT_FILE_NAME: VideoGenerator
SUFFIX_NAME: edi
WRITE_PRF: false
FREQUENCY:  200
FANOUT_LIMIT:  100
DISABLE_IO_INSERTION: false
FORCE_GSR: auto
SPEED_GRADE: -3
SYMBOLIC_FSM_COMPILER: true
NUM_CRITICAL_PATHS:   3
AUTO_CONSTRAIN_IO: true
NUM_STARTEND_POINTS:   0
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/Synpwrap\" -e VideoGenerator -target LATTICE-XP -part LFXP3C"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete VideoGenerator.cmd

########## Tcl recorder end at 06/14/07 21:25:26 ###########


########## Tcl recorder starts at 06/14/07 21:26:58 ##########

# Commands to make the Process: 
# Hierarchy
if [runCmd "\"$cpld_bin/vhd2jhd\" \"videogenerator.vhd\" -o \"videogenerator.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 06/14/07 21:26:58 ###########


########## Tcl recorder starts at 06/14/07 21:26:58 ##########

# Commands to make the Process: 
# Synplify Synthesize VHDL File
if [catch {open VideoGenerator.cmd w} rspFile] {
	puts stderr "Cannot create response file VideoGenerator.cmd: $rspFile"
} else {
	puts $rspFile "STYFILENAME: videogenerator.sty
PROJECT: VideoGenerator
WORKING_PATH: \"$proj_dir\"
MODULE: VideoGenerator
VHDL_FILE_LIST: \"$install_dir/ispcpld/../cae_library/synthesis/vhdl/XP.vhd\" videogenerator.vhd
OUTPUT_FILE_NAME: VideoGenerator
SUFFIX_NAME: edi
WRITE_PRF: false
FREQUENCY:  200
FANOUT_LIMIT:  100
DISABLE_IO_INSERTION: false
FORCE_GSR: auto
SPEED_GRADE: -3
SYMBOLIC_FSM_COMPILER: true
NUM_CRITICAL_PATHS:   3
AUTO_CONSTRAIN_IO: true
NUM_STARTEND_POINTS:   0
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/Synpwrap\" -e VideoGenerator -target LATTICE-XP -part LFXP3C"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete VideoGenerator.cmd

########## Tcl recorder end at 06/14/07 21:26:58 ###########


########## Tcl recorder starts at 06/14/07 21:27:40 ##########

# Commands to make the Process: 
# Hierarchy
if [runCmd "\"$cpld_bin/vhd2jhd\" \"videogenerator.vhd\" -o \"videogenerator.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 06/14/07 21:27:40 ###########


########## Tcl recorder starts at 06/14/07 21:27:41 ##########

# Commands to make the Process: 
# Synplify Synthesize VHDL File
if [catch {open VideoGenerator.cmd w} rspFile] {
	puts stderr "Cannot create response file VideoGenerator.cmd: $rspFile"
} else {
	puts $rspFile "STYFILENAME: videogenerator.sty
PROJECT: VideoGenerator
WORKING_PATH: \"$proj_dir\"
MODULE: VideoGenerator
VHDL_FILE_LIST: \"$install_dir/ispcpld/../cae_library/synthesis/vhdl/XP.vhd\" videogenerator.vhd
OUTPUT_FILE_NAME: VideoGenerator
SUFFIX_NAME: edi
WRITE_PRF: false
FREQUENCY:  200
FANOUT_LIMIT:  100
DISABLE_IO_INSERTION: false
FORCE_GSR: auto
SPEED_GRADE: -3
SYMBOLIC_FSM_COMPILER: true
NUM_CRITICAL_PATHS:   3
AUTO_CONSTRAIN_IO: true
NUM_STARTEND_POINTS:   0
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/Synpwrap\" -e VideoGenerator -target LATTICE-XP -part LFXP3C"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete VideoGenerator.cmd

########## Tcl recorder end at 06/14/07 21:27:41 ###########


########## Tcl recorder starts at 06/14/07 21:27:57 ##########

# Commands to make the Process: 
# Design Planner (Pre-Map)
if [runCmd "\"$fpga_bin/edif2ngd\" -l mg5g00 -d LFXP3C \"VideoGenerator.edi\" \"VideoGenerator.ngo\""] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$fpga_bin/edfupdate\" -t \"videogenerator.tcy\" -w \"VideoGenerator.ngo\" -m \"VideoGenerator.ngo\" \"videogenerator.ngx\""] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$fpga_bin/ngdbuild\" -a mg5g00 -d LFXP3C -p \"$fpga_dir/mg5g00/data\" \"VideoGenerator.ngo\" \"videogenerator.ngd\""] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
12345

videogenerator.tcl - 源码说明

本页面展示了「用lattice XP3 demo板设计的VGA信号发生器」中的 videogenerator.tcl 源码文件，采用 TCL 编程语言编写，共 2,428 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与VGA相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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