Initial Commit

1 files changed, 77 insertions, 0 deletions

diff --git a/scripts/create_quartus_project_settings.tcl b/scripts/create_quartus_project_settings.tcl
new file mode 100644
index 0000000..40c50ee
--- /dev/null
+++ b/scripts/create_quartus_project_settings.tcl
@@ -0,0 +1,77 @@
+## ----------------------------------------------------------------------------
+## Script     : create_quartus_project_settings.tcl
+## ----------------------------------------------------------------------------
+## Author     : Johann Faerber, F. Beckmann
+## Company    : University of Applied Sciences Augsburg
+## ----------------------------------------------------------------------------
+## Description: create a quartus project with default settings for device, 
+##              unused pins, ...
+##              expects project name as command line parameter 
+##              It expects one file containing the vhdl source files and
+##              one file containing the pin constraints. 
+##              Start with
+##              quartus_sh -t create_quartus_project_settings.tcl -projectname de1_mux2to1
+
+package require cmdline
+# Load Quartus II Tcl Project package
+package require ::quartus::project
+
+# ----------------------------------------------------------------------------
+# Declare command line parameters
+# ----------------------------------------------------------------------------
+set parameters {
+    {projectname.arg ""   "Project Name"}
+}
+array set arg [::cmdline::getoptions argv $parameters]
+
+# ----------------------------------------------------------------------------
+# Verify required paramters
+# ----------------------------------------------------------------------------
+set requiredParameters {projectname}
+foreach parameter $requiredParameters {
+    if {$arg($parameter) == ""} {
+        puts stderr "Missing required parameter: -$parameter"
+        exit 1
+    }
+}
+
+
+	# ----------------------------------------------------------------------------
+	# Create project
+	# ----------------------------------------------------------------------------
+	project_new $arg(projectname) -overwrite
+	
+	# ----------------------------------------------------------------------------
+	# Assign family, device, and top-level file
+	# ----------------------------------------------------------------------------
+	set_global_assignment -name FAMILY "Cyclone II"
+	set_global_assignment -name DEVICE EP2C20F484C7
+	
+	# ----------------------------------------------------------------------------
+	# Default settings
+	# ----------------------------------------------------------------------------
+	set_global_assignment -name USE_CONFIGURATION_DEVICE ON
+	set_global_assignment -name RESERVE_ALL_UNUSED_PINS "AS INPUT TRI-STATED"
+	set_global_assignment -name VHDL_INPUT_VERSION VHDL_2008
+	
+	# ----------------------------------------------------------------------------
+	# Design files
+	# ----------------------------------------------------------------------------
+	#set_global_assignment -name VHDL_FILE ../src/e_cntdnmodm.vhd
+	#set_global_assignment -name VHDL_FILE ../src/a_cntdnmodm_rtl.vhd
+        # The following file is generated by the make process and contains
+        # the vhdl files which belong to the project
+        source quartus_vhdl_source_files.tcl
+	
+	# ----------------------------------------------------------------------------
+	# Pin Assignments
+	# ----------------------------------------------------------------------------
+	# set_location_assignment PIN_L1 -to CLOCK_50
+	source $arg(projectname)_pins.tcl 
+
+	# ----------------------------------------------------------------------------
+	# Close project
+	# ----------------------------------------------------------------------------
+	project_close
+
+