videogenerator.tcl

用lattice XP3 demo板设计的VGA信号发生器

}
# Application to view the Process: 
# Design Planner (Pre-Map)
if [catch {open lattice.rsb w} rspFile] {
	puts stderr "Cannot create response file lattice.rsb: $rspFile"
} else {
	puts $rspFile "-inp \"videogenerator.ngd\" -dir \"$proj_dir\" -prj \"videogenerator\" -gui -touch ngd -a mg5g00 -p LFXP3C -t PQFP208 -lpf \"videogenerator.lpf\" -msg \"Pre-Map Design Floorplan\"
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/flmainappw\" @lattice.rsb"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

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


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

# Commands to make the Process: 
# Design Planner (Pre-Map)
# - none -
# Application to view the Process: 
# Design Planner (Pre-Map)
if [catch {open lattice.rsb w} rspFile] {
	puts stderr "Cannot create response file lattice.rsb: $rspFile"
} else {
	puts $rspFile "-inp \"videogenerator.ngd\" -dir \"$proj_dir\" -prj \"videogenerator\" -gui -touch ngd -a mg5g00 -p LFXP3C -t PQFP208 -lpf \"videogenerator.lpf\" -msg \"Pre-Map Design Floorplan\"
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/flmainappw\" @lattice.rsb"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

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


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

# Commands to make the Process: 
# Design Planner (Pre-Map)
# - none -
# Application to view the Process: 
# Design Planner (Pre-Map)
if [catch {open lattice.rsb w} rspFile] {
	puts stderr "Cannot create response file lattice.rsb: $rspFile"
} else {
	puts $rspFile "-inp \"videogenerator.ngd\" -dir \"$proj_dir\" -prj \"videogenerator\" -gui -touch ngd -a mg5g00 -p LFXP3C -t PQFP208 -lpf \"videogenerator.lpf\" -msg \"Pre-Map Design Floorplan\"
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/flmainappw\" @lattice.rsb"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

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


########## Tcl recorder starts at 06/14/07 21:42:15 ##########

# Commands to make the Process: 
# Design Planner (Post-Map)
if [runCmd "\"$fpga_bin/map\" -a mg5g00 -p LFXP3C -t PQFP208 -s 3 \"videogenerator.ngd\" -o \"videogenerator_map.ncd\" -mp \"videogenerator.mrp\" \"videogenerator.lpf\""] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
# Application to view the Process: 
# Design Planner (Post-Map)
if [catch {open lattice.rsm w} rspFile] {
	puts stderr "Cannot create response file lattice.rsm: $rspFile"
} else {
	puts $rspFile "-inp \"videogenerator_map.ncd\" -dir \"$proj_dir\" -prj \"videogenerator\" -gui -touch ngd -lpf \"videogenerator.lpf\" -prf \"videogenerator.prf\" -msg \"Post-Map Design Floorplan\"
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/flmainappw\" @lattice.rsm"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 06/14/07 21:42:15 ###########


########## Tcl recorder starts at 06/14/07 21:46:10 ##########

# 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:46:10 ###########


########## Tcl recorder starts at 06/14/07 21:46:15 ##########

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


########## Tcl recorder starts at 06/14/07 21:47:15 ##########

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


########## Tcl recorder starts at 06/14/07 21:47:17 ##########

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


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

# Commands to make the Process: 
# Design Planner (Post-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
	}
}
if [runCmd "\"$fpga_bin/map\" -a mg5g00 -p LFXP3C -t PQFP208 -s 3 \"videogenerator.ngd\" -o \"videogenerator_map.ncd\" -mp \"videogenerator.mrp\" \"videogenerator.lpf\""] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
# Application to view the Process: 
# Design Planner (Post-Map)
if [catch {open lattice.rsm w} rspFile] {
	puts stderr "Cannot create response file lattice.rsm: $rspFile"
} else {
	puts $rspFile "-inp \"videogenerator_map.ncd\" -dir \"$proj_dir\" -prj \"videogenerator\" -gui -touch ngd -lpf \"videogenerator.lpf\" -prf \"videogenerator.prf\" -msg \"Post-Map Design Floorplan\"
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/flmainappw\" @lattice.rsm"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

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


########## Tcl recorder starts at 06/14/07 21:49:52 ##########

# Commands to make the Process: 
# JEDEC File
if [runCmd "\"$fpga_bin/map\" -a mg5g00 -p LFXP3C -t PQFP208 -s 3 \"videogenerator.ngd\" -o \"videogenerator_map.ncd\" -mp \"videogenerator.mrp\" \"videogenerator.lpf\""] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [catch {open videogenerator.cm2 w} rspFile] {
	puts stderr "Cannot create response file videogenerator.cm2: $rspFile"
} else {
	puts $rspFile "-t videogenerator.mt
-to videogenerator.tw1
-o videogenerator.tcm
-log videogenerator.log
-pr videogenerator.prf
-rpt videogenerator.mrp
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/checkpoint\" -m -f \"videogenerator.cmm\" -f \"videogenerator.cm2\" -arch mg5g00 \"videogenerator_map.ncd\""] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete videogenerator.cm2
if [catch {open videogenerator.p2t w} rspFile] {
	puts stderr "Cannot create response file videogenerator.p2t: $rspFile"
} else {
	puts $rspFile "-w
-i 6
-l 5
-n 1
-t 1
-s 1
-c 0
-e 0
-exp parPlcInLimit=0
-exp parPlcInNeighborSize=1
-exp parPathBased=OFF
-exp parHold=OFF
"
	close $rspFile
}
if [catch {open videogenerator.p3t w} rspFile] {
	puts stderr "Cannot create response file videogenerator.p3t: $rspFile"
} else {
	puts $rspFile "-rem
-log videogenerator.log
-o videogenerator_mp.par
-pr videogenerator.prf
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/multipar\" -p videogenerator.p2t -f \"videogenerator.p3t\" \"videogenerator_map.ncd\" \"videogenerator.ncd\""] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [catch {open videogenerator.cm2 w} rspFile] {
	puts stderr "Cannot create response file videogenerator.cm2: $rspFile"
} else {
	puts $rspFile "-t videogenerator.pt
-to videogenerator.twr
-o videogenerator.tcp
-log videogenerator.log
-pr videogenerator.prf
-rpt videogenerator.par
"
	close $rspFile
}
if [runCmd "\"$cpld_bin/checkpoint\" -p -f \"videogenerator.cmp\" -f \"videogenerator.cm2\" -arch mg5g00 \"videogenerator.ncd\" -l 60"] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
file delete videogenerator.cm2
if [catch {open videogenerator.t2b w} rspFile] {
	puts stderr "Cannot create response file videogenerator.t2b: $rspFile"
} else {
	puts $rspFile "-g CfgMode:Disable
-g ReadBack:Flash
-g ReadCapture:Disable
-g RamCfg:Reset
-g ES:No
"
	close $rspFile
}
if [runCmd "\"$fpga_bin/bitgen\" -f \"videogenerator.t2b\" -w \"videogenerator.ncd\" \"videogenerator.prf\""] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}
if [runCmd "\"$cpld_bin/synsvf\" -exe \"$install_dir/ispvmsystem/ispufw\" -prj videogenerator -if videogenerator.bit -log videogenerator.prm -b2j -optoft -jed -of videogenerator.jed -comment videogenerator.alt "] {
	return
} else {
	vwait done
	if [checkResult $done] {
		return
	}
}

########## Tcl recorder end at 06/14/07 21:49:52 ###########


########## Tcl recorder starts at 06/14/07 21:53:00 ##########

# 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:53:00 ###########


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

# 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:53:14 ###########


########## Tcl recorder starts at 06/14/07 21:53:19 ##########

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