###############################################################################
# pin_assign.tcl
#
# This script allows you to make pin assignments to the Nios tutorial design
#
#
# Written by: Jeremy Fox
# Rev 1.0
# 10/25/00
#
#
# You can run this script from Quartus by observing the following steps:
# 1. Place this TCL script in your project directory
# 2. Open your project
# 3. Go to the View Menu and Auxilary Windows -> TCL console
# 4. In the TCL console type:
#						source pin_assign.tcl
# 5. The script will assign pins and return an "assignment made" message.
###############################################################################


################ Open a Project if one does not yet exist ####################
set project_name UP3_Board
set top_name UP3_Board

if { ![project exists ./$project_name] } {
	project create ./$project_name
}
project open $project_name

set cmp_settings_group $top_name
if { ![project cmp_exists $cmp_settings_group] } {
        project create_cmp $top_name
}
project set_active_cmp $top_name

cmp add_assignment $top_name "" "" DEVICE EP1C6Q240C8

##############################################################################

########## Set the pin location variables ############
### Control Pins
set clk 29
set reset_n 23

### Data bus, Address bus, and related control signals
set ext_addr {93 88 87 86 85 84 83 63 64 65 66 67 68 74 75 76 77 82 81 78}
set ext_data {94 96 98 100 102 104 106 113 95 97 99 101 103 105 107 114}
set SRAM_ce_n 116
set oe_n 118
set we_n 79
set FLASH_ce_n 117
set SDRAM_ce_n 119
set FLASH_byte 115              


################################################
#### Make the clock and reset signal assignments
cmp add_assignment $top_name "" clk LOCATION "Pin_$clk"
cmp add_assignment $top_name "" reset_n LOCATION "Pin_$reset_n"


#################################################
#### Make the external Flash and SRAM assignments
set i 0
foreach {a} $ext_addr {
	cmp add_assignment $top_name "" "ext_addr\[$i\]" LOCATION "Pin_$a"
	set i [expr $i+1] 
}
set i 0
foreach {a} $ext_data {
	cmp add_assignment $top_name "" "ext_data\[$i\]" LOCATION "Pin_$a" 
	set i [expr $i+1]
}

cmp add_assignment $top_name "" "SRAM_ce_n" LOCATION "Pin_$SRAM_ce_n"
cmp add_assignment $top_name "" "oe_n" LOCATION "Pin_$oe_n"
cmp add_assignment $top_name "" "we_n" LOCATION "Pin_$we_n"
cmp add_assignment $top_name "" "FLASH_ce_n" LOCATION "Pin_$FLASH_ce_n"
cmp add_assignment $top_name "" "SDRAM_ce_n" LOCATION "Pin_$SDRAM_ce_n"
cmp add_assignment $top_name "" "FLASH_byte" LOCATION "Pin_$FLASH_byte"