diff --git a/joshs_svga_controller/joshs_svga_controller.ise b/joshs_svga_controller/joshs_svga_controller.ise
new file mode 100644
index 0000000..ffef59d
Binary files /dev/null and b/joshs_svga_controller/joshs_svga_controller.ise differ
diff --git a/joshs_svga_controller/joshs_svga_controller.restore b/joshs_svga_controller/joshs_svga_controller.restore
new file mode 100644
index 0000000..1a90f2f
--- /dev/null
+++ b/joshs_svga_controller/joshs_svga_controller.restore
@@ -0,0 +1,1272 @@
+# version: 10.1
+# Project Navigator Project Restoration Script
+#
+# WARNING: Do not modify this file. Any alteration of this file is not
+# supported and will likely cause project restoration to fail. The 
+# format and the contents will be modified without further notice.
+#
+# This script can be used to recreate the associated project. To use this script,
+# source it in a Xilinx Tcl shell, such as xtclsh or the Project Navigator Tcl
+# Shell tab, and call the 'restore' proc. Restore takes the project directory as
+# an optional argument. Pass in the project directory if it is different than the
+# current working directory, otherwise don't pass in anything.
+#
+# Example:
+# In this example the project is in the directory "./projects/m_project_dir".
+#
+#  source ./projects/m_project_dir/my_project.restore
+#  restore ./projects/m_project_dir
+#
+# Example:
+# In this example the project is in the current working directory.
+#
+#  source my_project.restore
+#  restore
+#
+# Note that restoring a project this way has the following limitations:
+# - Process status will not be restored.
+# - A root-level source will be set as "Top", even if a lower-level source had
+#   previously been set as "Top".
+# - Sources with non-default Design View associations will revert to the default
+#   association.
+# - Snapshots will not be restored.
+#
+# The project which failed to load will be backed up as <project>.fail.
+# Please open a Technical Support WebCase at
+# www.xilinx.com/support/clearexpress/websupport.htm and submit this file, along
+# with the project source files, for evaluation.
+#
+# Copyright 2007, Xilinx, Inc.
+
+
+proc ERR { msg } {
+   puts "ERROR: $msg"
+}
+
+proc WARN { msg } {
+   puts "WARNING: $msg"
+}
+
+proc INFO { msg } {
+   puts "$msg"
+}
+
+# Helper that returns 1 if the string is blank, otherwise 0.
+proc IsBlank { str } {
+   if { [string length $str] == 0 } {
+      return 1
+   }
+   return 0
+}
+
+# Helper for determining whether a value is 'NULL'.
+# Returns 1 if the value is 0; returns 0 if the value is anything else.
+proc IsNull { val } {
+   if { $val == 0 } {
+      return 1
+   }
+   return 0
+}
+
+proc HandleException { script { msg "" } } {
+   set catch_result [catch {
+      uplevel 1 $script
+   } RESULT]
+   if {$catch_result} {
+      if {![IsBlank $msg]} {
+         ERR $msg
+      }
+      INFO "$RESULT"
+      INFO "$::errorInfo"
+   }
+}
+
+# These two procs help to load shared libraries in a platform
+# independent way.
+proc _LoadLibrary {name} {
+   set libExt [info sharedlibextension]
+   set libFullName "$name$libExt"
+   HandleException {
+      load $libFullName
+   } "A problem occured loading library $libFullName."
+}
+
+proc _LoadFactoryLibrary {Factory} {
+   HandleException {
+      Xilinx::Cit::FactoryLoad $Factory
+   } "A problem occured loading library $Factory."
+}
+
+_LoadLibrary libCit_CoreStub
+_LoadLibrary libPrjrep_CommonStub
+_LoadFactoryLibrary libPrjrep_Common
+_LoadLibrary libDpm_SupportStub
+_LoadLibrary libDpm_PnfStub
+_LoadLibrary libDpm_DefnDataStub
+_LoadLibrary libDpm_DesignDataStub
+_LoadLibrary libDpm_HdlStub
+_LoadLibrary libPrjrep_RepositoryStub
+_LoadLibrary libCitI_CoreStub
+_LoadLibrary libHdcI_HdcHDProjectStub
+_LoadLibrary libTcltaskI_TaskStub
+_LoadLibrary libCommonI_CommonStub
+_LoadFactoryLibrary libTcltask_Helpers
+_LoadFactoryLibrary libHdcC_HDProject
+_LoadLibrary libHdcI_HdcContainerStub
+_LoadLibrary libGuiI_Stub
+
+#  Helper to exectute code only when the (pointer) variable name is valid.
+proc OnOkPtr { var_name script } {
+   if { [ uplevel info exists $var_name ] } {
+      upvar $var_name var
+      if { $var != 0 } { return [ uplevel $script ] }
+   }
+}
+
+#  Helper to exectute code only when the (pointer) variable name is 0.
+proc OnNullPtr { var_name script } {
+   if { [ uplevel info exists $var_name ] } {
+      upvar $var_name var
+      if { $var == 0 } { return [ uplevel $script ] }
+   }
+}
+
+#  Helper to exectute code only when the value of variable name is 1.
+proc OnSuccess { var_name script } {
+   if { $val != 0 } { return [ uplevel $script ] }
+}
+
+#  Helper to exectute code only when the value of variable name is 0.
+proc OnFail { val script } {
+   if { $val != 1 } { return [ uplevel $script ] }
+}
+
+#  Helper to get a component interface.
+proc GetInterface { iUnk id { name "" } } {
+   if {$iUnk == 0} { return 0 }
+   set iIface [ $iUnk GetInterface $id ]
+   OnNullPtr iIface {
+      if {![IsBlank $name]} {
+         ERR " Could not get the \"$name\" interface."
+      }
+   }
+   return $iIface
+}
+
+#  Helper to create a component and return one of its interfaces.
+proc CreateComponent { compId ifaceId { name "" } } {
+   set iUnk [ ::Xilinx::Cit::FactoryCreate $compId ]
+   set iIface [ GetInterface $iUnk $ifaceId ]
+   OnNullPtr iIface {
+      if {![IsBlank $name]} { ERR "Could not create a \"$name\" component." }
+   }
+   return $iIface
+}
+
+#  Helper to release an object
+proc Release { args } {
+   foreach iUnk $args {
+      set i_refcount [ GetInterface $iUnk $::xilinx::Prjrep::IRefCountID ]
+      OnNullPtr i_refcount { set i_refcount [ GetInterface $iUnk $::xilinx::CommonI::IRefCountID ] }
+      OnOkPtr i_refcount { $i_refcount Release }
+   }
+}
+
+#  Helper to loop over IIterator based pointers.
+proc ForEachIterEle { _ele_var_name _iter script } {
+   if {$_iter == 0} { return 0 }
+   upvar $_ele_var_name ele
+   for { $_iter First } { ![ $_iter IsEnd ] } { $_iter Next }  {
+      set ele [ $_iter CurrentItem ]
+      set returned_val [ uplevel $script ] 
+   }
+}
+
+#  Helper to get the Tcl Project Manager, if possible.
+proc GetTclProjectMgr { } {
+   set TclProjectMgrId "{7d528480-1196-4635-aba9-639446e4aa59}"
+   set iUnk [ Xilinx::CitP::CreateComponent $TclProjectMgrId ]
+   if {$iUnk == 0} { return 0 }
+   set iTclProjectMgr [ $iUnk GetInterface $::xilinx::TcltaskI::ITclProjectMgrID ]
+   OnNullPtr iTclProjectMgr {
+      ERR "Could not create a \"TclProjectMgr\" component."
+   }
+   return $iTclProjectMgr
+}
+
+#  Helper to get the current Tcl Project, if one is open.
+proc GetCurrentTclProject { } {
+   set iTclProject 0
+   set iTclProjectMgr [GetTclProjectMgr]
+   OnOkPtr iTclProjectMgr {
+      set errmsg ""
+      $iTclProjectMgr GetCurrentTclProject iTclProject errmsg
+   }
+   return $iTclProject
+}
+
+#  Helper to get the current HDProject, if one is open.
+proc GetCurrentHDProject { } {
+   set iHDProject 0
+   set iTclProjectMgr [GetTclProjectMgr]
+   set errmsg ""
+   OnOkPtr iTclProjectMgr { $iTclProjectMgr GetCurrentHDProject iHDProject errmsg }
+   OnNullPtr iHDProject {
+      ERR "Could not get the current HDProject."
+   }
+   return $iHDProject
+}
+
+#  Helper to create a Project Helper.
+proc GetProjectHelper { } {
+   set ProjectHelperID "{0725c3d2-5e9b-4383-a7b6-a80c932eac21}"
+   set iProjHelper [CreateComponent $ProjectHelperID $::xilinx::Dpm::IProjectHelperID "Project Helper"]
+   return $iProjHelper
+}
+
+#  Helper to find out if a project is currently open.
+#  Returns 1 if a project is open, otherwise 0.
+proc IsProjectOpen { } {
+   set iTclProject [GetCurrentTclProject]
+   set isOpen [expr {$iTclProject != 0}]
+   Release $iTclProject
+   return $isOpen
+}
+
+#  Helper to return the lock file for the specified project if there is one.
+#  Returns an empty string if there is no lock file on the specified project,
+#  or there is no corresponding .ise file
+#  This assumes that the project_file is in the current directory.
+#  It also assumes project_file does not have a path.
+proc GetProjectLockFile { project_file } {
+   if { ![ file isfile "$project_file" ] } {
+      return 
+   }
+   INFO "Checking for a lock file for \"$project_file\"."
+   set lock_file "__ISE_repository_${project_file}_.lock"
+   if { [ file isfile "$lock_file" ] } {
+      return $lock_file
+   }
+   return 
+}
+
+#  Helper to back up the project file.
+#  This assumes that the project_file is in the current directory.
+proc BackUpProject { project_file backup_file } {
+   if { ![ file isfile "$project_file" ] } {
+      WARN "Could not find \"$project_file\"; the project will not be backed up."
+   return 0
+   } else {
+      INFO "Backing up the project to \"$backup_file\"."
+      file copy -force "$project_file" "$backup_file"
+   }
+   return 1
+}
+
+#  Helper to remove the project file so that a new project can be created
+#  in its place. Presumably the old project is corrupted and can no longer
+#  be opened.
+proc RemoveProject { project_file } {
+   file delete -force "$project_file"
+   # Return failure if the project still exists.
+   if { [ file isfile "$project_file" ] } {
+      ERR "Could not remove \"$project_file\"; Unable to restore the project."
+      return 0
+   }
+   return 1
+}
+
+#  Helper to open a project and return a project facilitator (pointer).
+proc OpenFacilProject { project_name } {
+   # first make sure the tcl project mgr singleton exists
+   GetTclProjectMgr
+   # get a Project Helper and open the project.
+   set iProjHelper [GetProjectHelper]
+   if {$iProjHelper == 0} { return 0 }
+   set result [$iProjHelper Open $project_name]
+   OnFail $result {
+      if {$result == 576460769483292673} {
+         ERR "Could not open the project \"$project_name\" because it is locked."
+      } else {
+         ERR "Could not open the \"$project_name\" project."
+      }
+      Release $iProjHelper
+      set iProjHelper 0
+   }
+   return $iProjHelper
+}
+
+#  Helper to close and release a project.
+proc CloseFacilProject { iProjHelper } {
+   if {$iProjHelper == 0} { return }
+   $iProjHelper Close
+   Release $iProjHelper
+}
+
+#  Helper to get the Project from the Project Helper.
+#  Clients must release this.
+proc GetProject { iProjHelper } {
+   if {$iProjHelper == 0} { return 0 }
+   set dpm_project 0
+   $iProjHelper GetDpmProject dpm_project
+   set iProject [ GetInterface $dpm_project $xilinx::Dpm::IProjectID ]
+   OnNullPtr iProject {
+      ERR "Could not get the Project from the Project Helper."
+   }
+   return $iProject
+}
+
+#  Helper to get the File Manager from the Project Helper.
+#  Clients must release this.
+proc GetFileManager { iProjHelper } {
+   set iProject [GetProject $iProjHelper]
+   set iFileMgr [ GetInterface $iProject $xilinx::Dpm::IFileManagerID ]
+   OnNullPtr iFileMgr {
+      ERR "Could not get the File Manager from the Project Helper."
+   }
+   # Don't release the project here, clients will release it 
+   # when they release its IFileManager interface.
+   return $iFileMgr
+}
+
+#  Helper to get the Source Library Manager from the Project Helper.
+#  Clients must release this.
+proc GetSourceLibraryManager { iProjHelper } {
+   set iProject [GetProject $iProjHelper]
+   set iSourceLibraryMgr [ GetInterface $iProject $xilinx::Dpm::ISourceLibraryManagerID ]
+   OnNullPtr iSourceLibraryMgr {
+      ERR "Could not get the Source Library Manager from the Project Helper."
+   }
+   # Don't release the project here, clients will release it 
+   # when they release its IFileManager interface.
+   return $iSourceLibraryMgr
+}
+
+#  Helper to get the ProjSrcHelper from the Project Helper.
+#  Clients must NOT release this.
+proc GetProjSrcHelper { iProjHelper } {
+   set iSrcHelper [ GetInterface $iProjHelper $::xilinx::Dpm::IProjSrcHelperID IProjSrcHelper ]
+   OnNullPtr iSrcHelper {
+      ERR "Could not get the ProjSrcHelper from the Project Helper."
+   }
+   return $iSrcHelper
+}
+
+#  Helper to get the ScratchPropertyManager from the Project Helper.
+#  Clients must NOT release this.
+proc GetScratchPropertyManager { iProjHelper } {
+   set iPropTableFetch [ GetInterface $iProjHelper $xilinx::Dpm::IPropTableFetchID IPropTableFetch ]
+   set prop_table_comp 0
+   OnOkPtr iPropTableFetch {
+      $iPropTableFetch GetPropTable prop_table_comp
+   }
+   set iScratch [ GetInterface $prop_table_comp $xilinx::Dpm::IScratchPropertyManagerID ]
+   OnNullPtr iScratch {
+      ERR "Could not get the Scratch Property Manager from the Project Helper."
+   }
+   return $iScratch
+}
+
+#  Helper to get the Design from the Project Helper.
+#  Clients must release this.
+proc GetDesign { iProjHelper } {
+   set iProject [GetProject $iProjHelper]
+   set iDesign 0
+   OnOkPtr iProject { $iProject GetDesign iDesign }
+   OnNullPtr iDesign {
+      ERR "Could not get the Design from the Project Helper."
+   }
+   Release $iProject
+   return $iDesign
+}
+
+#  Helper to get the Data Store from the Project Helper.
+#  Clients must NOT release this.
+proc GetDataStore { iProjHelper } {
+   set iDesign [ GetDesign $iProjHelper]
+   set iDataStore 0
+   OnOkPtr iDesign { $iDesign GetDataStore iDataStore }
+   OnNullPtr iDataStore {
+      ERR "Could not get the Data Store from the Project Helper."
+   }
+   Release $iDesign
+   return $iDataStore
+}
+
+#  Helper to get the View Manager from the Project Helper.
+#  Clients must NOT release this.
+proc GetViewManager { iProjHelper } {
+   set iDesign [ GetDesign $iProjHelper]
+   set iViewMgr [ GetInterface $iDesign $xilinx::Dpm::IViewManagerID ]
+   OnNullPtr iViewMgr {
+      ERR "Could not get the View Manager from the Project Helper."
+   }
+   # Don't release the design here, clients will release it 
+   # when they release its IViewManager interface.
+   return $iViewMgr
+}
+
+#  Helper to get the Property Manager from the Project Helper.
+#  Clients must release this.
+proc GetPropertyManager { iProjHelper } {
+   set iDesign [ GetDesign $iProjHelper]
+   set iPropMgr 0
+   OnOkPtr iDesign { $iDesign GetPropertyManager iPropMgr }
+   OnNullPtr iPropMgr {
+      ERR "Could not get the Property Manager from the Project Helper."
+   }
+   Release $iDesign
+   return $iPropMgr
+}
+
+#  Helper to find a property template, based on prop_name
+#  Clients must NOT release this.
+proc GetPropertyTemplate { iProjHelper prop_name } {
+   set iPropTempl 0
+   set iUnk 0
+   set iDefdataId 0
+   set iPropTemplStore 0
+   set iDataStore [GetDataStore $iProjHelper]
+   OnOkPtr iDataStore { $iDataStore GetComponentByName $prop_name iUnk }
+   OnOkPtr iUnk { set iDefdataId [ GetInterface $iUnk $xilinx::Dpm::IDefDataIdID IDefDataId ] }
+   OnOkPtr iDefdataId {
+      set iPropTemplStore [ GetInterface $iDataStore $xilinx::Dpm::IPropertyTemplateStoreID IPropertyTemplateStore ]
+   }
+   OnOkPtr iPropTemplStore { $iPropTemplStore GetPropertyTemplate $iDefdataId iPropTempl }
+   OnNullPtr iPropTempl {
+      WARN "Could not get the property template for \"$prop_name\"."
+   }
+   return $iPropTempl
+}
+
+#  Helper to get a component's name.
+proc GetName { iUnk } {
+   set name ""
+   set iName [ GetInterface $iUnk $xilinx::Prjrep::INameID IName ]
+   OnOkPtr iName { $iName GetName name }
+   return $name
+}
+
+#  Helper to get the name of a view's type.
+proc GetViewTypeName { iView } {
+   set typeName ""
+   set iType 0
+   set iDefdataType 0
+   OnOkPtr iView { $iView GetType iType }
+   OnOkPtr iType {
+      set iDefdataType [ GetInterface $iType $xilinx::Dpm::IDefDataIdID IDefDataId ]
+   }
+   OnOkPtr iDefdataType { $iDefdataType GetID typeName }
+   return $typeName
+}
+
+#  Helper to find a view and return its context.
+#  Must clients release this?
+proc GetViewContext { iProjHelper view_id view_name } {
+   # Simply return if the view_id or view_name is empty.
+   if { [IsBlank $view_id] || [IsBlank $view_name] } { return 0 }
+   set foundview 0
+   set viewiter 0
+   set iViewMgr [GetViewManager $iProjHelper]
+   OnOkPtr iViewMgr { $iViewMgr GetViews viewiter }
+   ForEachIterEle view $viewiter {
+      set typeName [GetViewTypeName $view]
+      set name [GetName $view]
+      if { [ string equal $name $view_name ] && [ string equal $view_id $typeName ] } {
+         set foundview $view
+      }
+   }
+   set context [ GetInterface $foundview $xilinx::Dpm::IPropertyContextID ]
+   OnNullPtr context {
+      WARN "Could not get the context for view \"$view_id\":\"$view_name\"."
+   }
+   return $context
+}
+
+#  Helper to get a string property instance from the property manager.
+proc GetStringPropertyInstance { iProjHelper simple_id } {
+   set iPropMgr [GetPropertyManager $iProjHelper]
+   if {$iPropMgr == 0} { return 0 }
+   set iPropInst 0
+   $iPropMgr GetStringProperty $simple_id iPropInst
+   OnNullPtr iPropInst { WARN "Could not get the string property instance $simple_id." }
+   Release $iPropMgr
+   return $iPropInst
+}
+
+#  Helper to get a property instance from the property manager.
+proc GetPropertyInstance { iProjHelper view_name view_id prop_name } {
+   set iPropInst 0
+   set iPropTempl [ GetPropertyTemplate $iProjHelper $prop_name ]
+   if {$iPropTempl == 0} { return 0 }
+   set context [ GetViewContext $iProjHelper $view_id $view_name ]
+   set iPropMgr [GetPropertyManager $iProjHelper]
+   if {$iPropMgr == 0} { return 0 }
+   $iPropMgr GetPropertyInstance $iPropTempl $context iPropInst
+   OnNullPtr iPropInst {
+      if { ![IsBlank $view_id] && ![IsBlank $view_name] } {
+         WARN "Could not get the context sensitive property instance $prop_name."
+      } else {
+         WARN "Could not get the property instance $prop_name."
+      }
+   }
+   Release $iPropMgr
+   return $iPropInst
+}
+
+#  Helper to store properties back into the property manager.
+proc RestoreProcessProperties { iProjHelper process_props } {
+   INFO "Restoring process properties"
+   foreach { unused view_name view_id simple_id prop_name prop_val } $process_props {
+      set iPropInst 0
+      if {![IsBlank $simple_id]} {
+         set iPropInst [ GetStringPropertyInstance $iProjHelper $simple_id ]
+      } else {
+         set iPropInst [ GetPropertyInstance $iProjHelper $view_name $view_id $prop_name ]
+      }
+      OnOkPtr iPropInst {
+         OnFail [ $iPropInst SetStringValue "$prop_val" ] {
+            WARN "Could not set the value of the $prop_name property to \"$prop_val\"."
+         }
+      }
+      Release $iPropInst
+   }
+}
+
+#  Helper to recreate partitions from the variable name with
+#  a list of instance names.
+proc RestorePartitions { namelist } {
+   INFO "Restoring partitions."
+   set iHDProject [ GetCurrentHDProject ]
+   OnOkPtr iHDProject {
+      foreach name $namelist {
+         set iPartition [ $iHDProject CreatePartition "$name" ]
+      }
+   }
+}
+
+#  Helper to create and populate a library
+#
+proc CreateLibrary { iProjHelper libname filelist } {
+
+   set iLibMgr [ GetSourceLibraryManager $iProjHelper ]
+   set iFileMgr [ GetFileManager $iProjHelper ]
+
+   if {$iLibMgr == 0} { return 0 }
+   if {$iFileMgr == 0} { return 0 }
+
+   $iLibMgr CreateSourceLibrary "libname" ilib
+
+   OnOkPtr ilib {
+      foreach filename $filelist {
+         set argfile [ file normalize "$filename" ]
+         set found 0
+         set fileiter 0
+         $iFileMgr GetFiles fileiter
+         ForEachIterEle ifile $fileiter {
+            set path ""
+            set file ""
+            $ifile getPath path file
+            set currentfile [ file normalize [ file join "$path" "$file" ] ]
+            if { $currentfile == $argfile } {
+               set found 1
+               $ilib AddFile ifile
+               break
+            }
+         }
+         OnNullPtr found {
+            WARN "Could not add the file \"$filename\" to the library \"$libname\"."
+         }
+      }
+   }
+}
+
+#  Helper to create source libraries and populate them.
+proc RestoreSourceLibraries { iProjHelper libraries } {
+   INFO "Restoring source libraries."
+   foreach { libname filelist } $libraries {
+      CreateLibrary $iProjHelper "$libname" $filelist
+   }
+}
+
+# Helper to add user files to the project using the PnF.
+proc AddUserFiles { iProjHelper files } {
+   INFO "Adding User files."
+   set iconflict 0
+   set iSrcHelper [ GetProjSrcHelper $iProjHelper ]
+   if {$iSrcHelper == 0} { return 0 }
+   foreach filename $files {
+      INFO "Adding the file \"$filename\" to the project."
+      set result [$iSrcHelper AddSourceFile "$filename" iconflict]
+      OnFail $result {
+         if {$result == 6} {
+            INFO "The file \"$filename\" is already in the project."
+         } else {
+            ERR "A problem occurred adding the file \"$filename\" to the project."
+         }
+      }
+   }
+}
+
+# Helper to add files to the project and set their origination. 
+# Valid origination values are:
+#   0 - User
+#   1 - Generated
+#   2 - Imported
+# Files of origination "User" are added through the facilitator, 
+# otherwise they are added directly to the File Manager.
+proc AddImportedFiles { iProjHelper files origination } {
+   switch $origination {
+      0 { INFO "Adding User files." }
+      1 { INFO "Adding Generated files." }
+      2 { INFO "Adding Imported files." }
+      default {
+         ERR "Invalid parameter: origination was set to \"$origination\", but may only be 0, 1, or 2."
+         return 0
+      }
+   }
+   set iFileMgr [ GetFileManager $iProjHelper ]
+   if {$iFileMgr == 0} { return 0 }
+   foreach filename $files {
+      set file_type 0
+      set hdl_file 0
+      set result [$iFileMgr AddFile "$filename" $file_type hdl_file]
+      OnFail $result {
+         if {$result == 6} {
+            INFO "The file \"$filename\" is already in the project."
+         } elseif { $hdl_file == 0 } {
+            ERR "A problem occurred adding the file \"$filename\" to the project."
+         }
+      }
+      OnOkPtr hdl_file {
+         set ifile [ GetInterface $hdl_file $xilinx::Dpm::IFileID IFile ]
+         OnOkPtr ifile {
+            set result [ $ifile SetOrigination $origination ]
+            if {$result != 1} {
+               ERR "A problem occurred setting the origination of \"$filename\" to \"$origination\"."
+            }
+            Release $ifile
+         }
+      }
+   }
+   return 1
+}
+
+proc RestoreProjectSettings { iProjHelper project_settings } {
+   INFO "Restoring device settings"
+   set iScratch [GetScratchPropertyManager $iProjHelper]
+   set iPropIter 0
+   set iPropSet [ GetInterface $iScratch $xilinx::Dpm::IPropertyNodeSetID IPropertyNodeSet ]
+   OnOkPtr iPropSet {
+      $iPropSet GetIterator iPropIter
+   }
+   set index 0
+   set lastindex [llength $project_settings]
+   ForEachIterEle prop_node $iPropIter {
+      set prop_instance 0
+      $prop_node GetPropertyInstance prop_instance
+      if { $index < $lastindex } {
+         set argname [ lindex $project_settings $index ]
+         set argvalue [ lindex $project_settings [ expr $index + 1 ] ]
+      } else {
+         set argname {}
+         set argvalue {}
+      }
+      if { $prop_instance != 0 } {
+         set name {}
+         $prop_instance GetName name
+         if { [string equal $name $argname ] } {
+            $prop_instance SetStringValue $argvalue
+            incr index
+            incr index
+         }
+      }
+      Release $prop_instance
+   }
+   $iScratch Commit
+   # initialize
+   $iProjHelper Init
+}
+
+#  Helper to load a source control configuration from a stream
+#  and then store it back into an ise file.
+proc RestoreSourceControlOptions { prjfile istream } {
+   INFO "Restoring source control options"
+   set config_comp [::Xilinx::Cit::FactoryCreate $::xilinx::Dpm::SourceControlConfigurationCompID ]
+   OnOkPtr config_comp { set ipersist [ $config_comp GetInterface $xilinx::Prjrep::IPersistID ] }
+   OnOkPtr config_comp { set igetopts [ $config_comp GetInterface $xilinx::Dpm::SrcCtrl::IGetOptionsID ] }
+   set helper_comp [::Xilinx::Cit::FactoryCreate $::xilinx::Dpm::SourceControlHelpCompID ]
+   OnOkPtr helper_comp { set ihelper [ $config_comp GetInterface $xilinx::Dpm::SrcCtrl::IHelperID ] }
+   OnOkPtr ipersist { $ipersist Load istream }
+   OnOkPtr ihelper { OnOkPtr igetopts { $ihelper SaveOptions $prjfile $igetopts } }
+   Release $helper_comp $config_comp
+}
+
+# put a string message in a GUI popup message dialog (if possible),
+# Get a user Yes/No response. If the GUI isn't active just 'puts' 
+# the message to stdout and return the default value.
+#		sMessageGUI - string, the message to display in GUI environment
+#		sMessageCmdLine - string, the message to display in CMdLine environment
+#		defaultValue - integer, the response to return on a timeout</In>
+#		hasCancel - integer, defaulting to 0. If 1, show Yes/No/Cancel buttons</In>
+proc dpm_DisplayQuestionDialog { sMessageGUI sMessageCmdLine defaultValue { hasCancel 0} } {
+   set iMessageDisplay 0
+   if {[catch {
+	   set iInterface [Xilinx::CitP::GetInstance $::xilinx::GuiI::IMessageDlgID]
+	   set iMessageDisplay [$iInterface GetInterface $::xilinx::GuiI::IMessageDlgID]
+   }]} { 
+	   # if we cannot get the IMessageDlgID interface then we are most likely
+	   # running from command line and not in the GUI.
+	   puts $sMessageCmdLine
+   } else {
+	   # got a good dialog singleton
+	   set nTimeout 999999
+	   set buttonValue [$iMessageDisplay Question "Project Navigator" $sMessageGUI $hasCancel $nTimeout]
+	   if { $buttonValue == 2 } { ; # cancel
+		   return 3
+	   } elseif { $buttonValue == 3 } { ; # yes
+		   return 1
+	   } elseif { $buttonValue == 4 } { ; # no
+		   return 2
+	   } else { # probably timeout
+		   return $defaultValue
+	   }
+   }
+   return $defaultValue
+}
+
+# Call this proc to restore the ISE project.
+proc restore { { project_dir "" } } {
+   set script_file "joshs_svga_controller.restore"
+   set project_file "joshs_svga_controller.ise"
+   set backup_file "joshs_svga_controller.fail"
+   set old_working_dir [pwd]
+   # Make sure a project isn't already open.
+   if {[IsProjectOpen]} {
+      ERR "The project must be closed before performing this operation."
+      cd $old_working_dir
+      return
+   }
+   # If a project directory was supplied, cd into it.
+   if {![IsBlank $project_dir]} {
+     cd $project_dir
+   }
+   # capture the project directory ... it should be CWD at this point
+   set project_dir [pwd]
+
+   # before proceeding detect if lock files exist and if so ask the user what to do
+   set proj_rootname [file rootname $project_file]
+   set intermediate_proj_dir [file join $project_dir ${proj_rootname}_xdb]
+   set proj_temp_dir [file join $intermediate_proj_dir "projtemp"]
+   set repo_temp_dir [file join $proj_temp_dir $project_file]
+   set new_lock_file [file join $proj_temp_dir ${project_file}.lock]
+   set old_lock_file [GetProjectLockFile $project_file]
+   set bLockFilesExist 0
+   # see if any lock files are there
+   if {[file exists $new_lock_file] || ![IsBlank "$old_lock_file" ] } {
+      set bLockFilesExist 1
+   }
+   
+   # if lock file(s) are found ask the user what to do
+   if { $bLockFilesExist == 1 } { 
+      set lockFileMsgGUI "The project to be restored appears to be locked. Remove Lock and continue the restore project process ?" 
+      set lockFileMsgCmdLine "The project to be restored appears to be locked. Please remove the lock file \"$new_lock_file\" and try the restore process again." 
+      set answer [dpm_DisplayQuestionDialog $lockFileMsgGUI $lockFileMsgCmdLine 2]
+      if { $answer == 1 } {
+         # remove the lock file(s) and the repo temo dir, if present
+         # remove the new style lock file if it exists
+         if {[file exists $new_lock_file]} {
+            INFO "Removing lock file \"$new_lock_file\"."
+            file delete -force $new_lock_file
+         }
+         # remove the old style lock file if it exists
+         if {[file exists $old_lock_file]} {
+            INFO "Removing lock file \"$old_lock_file\"."
+            file delete -force $old_lock_file
+         }
+         # remove the temp proj dir if it exists
+         if {[file exists $repo_temp_dir]} {
+            INFO "Removing old temporary project directory \"$repo_temp_dir\"."
+            file delete -force $repo_temp_dir
+         }
+      } else {
+         # the user answered 'no' so exist without doing anything
+         INFO "Exiting without restoring project."
+         return
+      }
+   }
+   
+   # Backup this script because it will be overwritten the next time
+   # the project is saved, which happens right after it is created!
+   file copy -force "$script_file" "${script_file}.last"
+   # Back up the project.
+   set wasBackedUp [ BackUpProject "$project_file" "$backup_file" ]
+   # Remove the project file, so that it can be recreated, since the old.
+   # is presumably corrupted and can no longer be opened.
+   OnFail [ RemoveProject "$project_file" ] {
+      cd $old_working_dir
+      return
+   }
+
+   # Open the project.
+   HandleException {
+      set iProjHelper [ OpenFacilProject "$project_file"]
+   } "A problem occurred while creating the project \"$project_file\"."
+   if {$iProjHelper == 0} {
+      cd $old_working_dir
+      return
+   }
+   INFO "Recreating project \"$project_file\"."
+  set project_settings { 
+     "PROP_DevFamily" "Spartan3E"
+     "PROP_DevDevice" "xc3s500e"
+     "PROP_DevPackage" "fg320"
+     "PROP_DevSpeed" "-5"
+     "PROP_Top_Level_Module_Type" "HDL"
+     "PROP_Synthesis_Tool" "XST (VHDL/Verilog)"
+     "PROP_Simulator" "ISE Simulator (VHDL/Verilog)"
+     "PROP_PreferredLanguage" "VHDL"
+     "PROP_Enable_Message_Capture" "true"
+     "PROP_Enable_Message_Filtering" "false"
+     "PROP_Enable_Incremental_Messaging" "false"
+     }
+
+  HandleException {
+    RestoreProjectSettings $iProjHelper $project_settings 
+  } "A problem occured while restoring project settings."
+
+  set user_files {}
+
+  HandleException {
+    AddUserFiles $iProjHelper $user_files
+  } "A problem occured while restoring user files."
+
+  set imported_files {}
+
+  set origination 2
+
+  HandleException {
+    AddImportedFiles $iProjHelper $imported_files $origination
+  } "A problem occured while restoring imported files."
+
+  set process_props { 
+      "A" "" "" "" "PROPEXT_SynthMultStyle_virtex2" "Auto" 
+      "A" "" "" "" "PROPEXT_xilxBitgCfg_Rate_spartan3e" "Default (1)" 
+      "A" "" "" "" "PROPEXT_xilxMapGenInputK_virtex2" "4" 
+      "A" "" "" "" "PROPEXT_xilxSynthAddBufg_spartan3e" "24" 
+      "A" "" "" "" "PROPEXT_xilxSynthMaxFanout_virtex2" "500" 
+      "A" "" "" "" "PROP_AutoGenFile" "false" 
+      "A" "" "" "" "PROP_BehavioralSimTop" "" 
+      "A" "" "" "" "PROP_CPLDFitkeepio" "false" 
+      "A" "" "" "" "PROP_CompxlibAbelLib" "true" 
+      "A" "" "" "" "PROP_CompxlibCPLDDetLib" "true" 
+      "A" "" "" "" "PROP_CompxlibOtherCompxlibOpts" "" 
+      "A" "" "" "" "PROP_CompxlibOutputDir" "$XILINX/<language>/<simulator>" 
+      "A" "" "" "" "PROP_CompxlibOverwriteLib" "Overwrite" 
+      "A" "" "" "" "PROP_CompxlibSimPrimatives" "true" 
+      "A" "" "" "" "PROP_CompxlibXlnxCoreLib" "true" 
+      "A" "" "" "" "PROP_CurrentFloorplanFile" "" 
+      "A" "" "" "" "PROP_DesignName" "joshs_svga_controller" 
+      "A" "" "" "" "PROP_Dummy" "dum1" 
+      "A" "" "" "" "PROP_EnableWYSIWYG" "None" 
+      "A" "" "" "" "PROP_Enable_Incremental_Messaging" "false" 
+      "A" "" "" "" "PROP_Enable_Message_Capture" "true" 
+      "A" "" "" "" "PROP_Enable_Message_Filtering" "false" 
+      "A" "" "" "" "PROP_FitterReportFormat" "HTML" 
+      "A" "" "" "" "PROP_FlowDebugLevel" "0" 
+      "A" "" "" "" "PROP_FunctionBlockInputLimit" "38" 
+      "A" "" "" "" "PROP_ISimLibSearchOrderFile" "" 
+      "A" "" "" "" "PROP_ISimOtherCompilerOptions_behav" "" 
+      "A" "" "" "" "PROP_ISimOtherCompilerOptions_par" "" 
+      "A" "" "" "" "PROP_ISimSDFTimingToBeRead" "Setup Time" 
+      "A" "" "" "" "PROP_ISimUseCustomCompilationOrder" "false" 
+      "A" "" "" "" "PROP_ISimUseCustomSimCmdFile_behav_tb" "false" 
+      "A" "" "" "" "PROP_ISimUseCustomSimCmdFile_behav_tbw" "false" 
+      "A" "" "" "" "PROP_ISimUseCustomSimCmdFile_gen_tbw" "false" 
+      "A" "" "" "" "PROP_ISimUseCustomSimCmdFile_par_tb" "false" 
+      "A" "" "" "" "PROP_ISimUseCustomSimCmdFile_par_tbw" "false" 
+      "A" "" "" "" "PROP_ISimUutInstName" "UUT" 
+      "A" "" "" "" "PROP_ImpactProjectFile" "Default" 
+      "A" "" "" "" "PROP_Parse_Target" "synthesis" 
+      "A" "" "" "" "PROP_PartitionCreateDelete" "" 
+      "A" "" "" "" "PROP_PartitionForcePlacement" "" 
+      "A" "" "" "" "PROP_PartitionForceSynth" "" 
+      "A" "" "" "" "PROP_PartitionForceTranslate" "" 
+      "A" "" "" "" "PROP_PlsClockEnable" "true" 
+      "A" "" "" "" "PROP_PostFitSimTop" "" 
+      "A" "" "" "" "PROP_PostMapSimTop" "" 
+      "A" "" "" "" "PROP_PostParSimTop" "" 
+      "A" "" "" "" "PROP_PostSynthSimTop" "" 
+      "A" "" "" "" "PROP_PostTrceFastPath" "false" 
+      "A" "" "" "" "PROP_PostTrceGenDatasheet" "true" 
+      "A" "" "" "" "PROP_PostTrceGenTimegroups" "false" 
+      "A" "" "" "" "PROP_PostXlateSimTop" "" 
+      "A" "" "" "" "PROP_PreTrceFastPath" "false" 
+      "A" "" "" "" "PROP_PreTrceGenDatasheet" "true" 
+      "A" "" "" "" "PROP_PreTrceGenTimegroups" "false" 
+      "A" "" "" "" "PROP_PreTrceTSIFile" "" 
+      "A" "" "" "" "PROP_SimModelGenerateTestbenchFile" "false" 
+      "A" "" "" "" "PROP_SimModelInsertBuffersPulseSwallow" "false" 
+      "A" "" "" "" "PROP_SimModelOtherNetgenOpts" "" 
+      "A" "" "" "" "PROP_SimModelRetainHierarchy" "true" 
+      "A" "" "" "" "PROP_SynthCaseImplStyle" "None" 
+      "A" "" "" "" "PROP_SynthDecoderExtract" "true" 
+      "A" "" "" "" "PROP_SynthEncoderExtract" "Yes" 
+      "A" "" "" "" "PROP_SynthExtractMux" "Yes" 
+      "A" "" "" "" "PROP_SynthExtractRAM" "true" 
+      "A" "" "" "" "PROP_SynthExtractROM" "true" 
+      "A" "" "" "" "PROP_SynthFsmEncode" "Auto" 
+      "A" "" "" "" "PROP_SynthLogicalShifterExtract" "true" 
+      "A" "" "" "" "PROP_SynthOpt" "Speed" 
+      "A" "" "" "" "PROP_SynthOptEffort" "Normal" 
+      "A" "" "" "" "PROP_SynthResSharing" "true" 
+      "A" "" "" "" "PROP_SynthShiftRegExtract" "true" 
+      "A" "" "" "" "PROP_SynthTop" "" 
+      "A" "" "" "" "PROP_SynthXORCollapse" "true" 
+      "A" "" "" "" "PROP_Top_Level_Module_Type" "HDL" 
+      "A" "" "" "" "PROP_UseDataGate" "true" 
+      "A" "" "" "" "PROP_UseSmartGuide" "false" 
+      "A" "" "" "" "PROP_UserConstraintEditorPreference" "Constraints Editor" 
+      "A" "" "" "" "PROP_UserEditorCustomSetting" ""C:/Program Files/Vim/vim71/gvim.exe" --remote-tab-silent "$1"" 
+      "A" "" "" "" "PROP_UserEditorPreference" "Custom" 
+      "A" "" "" "" "PROP_XPowerOptInputTclScript" "" 
+      "A" "" "" "" "PROP_XPowerOptLoadPCFFile" "Default" 
+      "A" "" "" "" "PROP_XPowerOptLoadVCDFile" "Default" 
+      "A" "" "" "" "PROP_XPowerOptLoadXMLFile" "Default" 
+      "A" "" "" "" "PROP_XPowerOptOutputFile" "Default" 
+      "A" "" "" "" "PROP_XPowerOptVerboseRpt" "false" 
+      "A" "" "" "" "PROP_XPowerOtherXPowerOpts" "" 
+      "A" "" "" "" "PROP_XplorerMode" "Off" 
+      "A" "" "" "" "PROP_bitgen_otherCmdLineOptions" "" 
+      "A" "" "" "" "PROP_cpldBestFit" "false" 
+      "A" "" "" "" "PROP_cpldfitHDLeqStyle" "Source" 
+      "A" "" "" "" "PROP_cpldfit_otherCmdLineOptions" "" 
+      "A" "" "" "" "PROP_fitGenSimModel" "false" 
+      "A" "" "" "" "PROP_hprep6_autosig" "false" 
+      "A" "" "" "" "PROP_hprep6_otherCmdLineOptions" "" 
+      "A" "" "" "" "PROP_ibiswriterShowAllModels" "false" 
+      "A" "" "" "" "PROP_isimCompileForHdlDebug" "true" 
+      "A" "" "" "" "PROP_isimIncreCompilation" "true" 
+      "A" "" "" "" "PROP_isimSpecifyDefMacroAndValue" "" 
+      "A" "" "" "" "PROP_isimSpecifySearchDirectory" "" 
+      "A" "" "" "" "PROP_isimValueRangeCheck" "false" 
+      "A" "" "" "" "PROP_lockPinsUcfFile" "" 
+      "A" "" "" "" "PROP_mapIgnoreTimingConstraints" "false" 
+      "A" "" "" "" "PROP_mapUseRLOCConstraints" "true" 
+      "A" "" "" "" "PROP_map_otherCmdLineOptions" "" 
+      "A" "" "" "" "PROP_mpprRsltToCopy" "" 
+      "A" "" "" "" "PROP_ngdbuildUseLOCConstraints" "true" 
+      "A" "" "" "" "PROP_ngdbuild_otherCmdLineOptions" "" 
+      "A" "" "" "" "PROP_parIgnoreTimingConstraints" "false" 
+      "A" "" "" "" "PROP_parUseTimingConstraints" "true" 
+      "A" "" "" "" "PROP_par_otherCmdLineOptions" "" 
+      "A" "" "" "" "PROP_primeCorrelateOutput" "false" 
+      "A" "" "" "" "PROP_primeFlatternOutputNetlist" "false" 
+      "A" "" "" "" "PROP_primeTopLevelModule" "" 
+      "A" "" "" "" "PROP_primetimeBlockRamData" "" 
+      "A" "" "" "" "PROP_taengine_otherCmdLineOptions" "" 
+      "A" "" "" "" "PROP_xcpldFitDesInit" "Low" 
+      "A" "" "" "" "PROP_xcpldFitDesInputLmt_xbr" "32" 
+      "A" "" "" "" "PROP_xcpldFitDesMultiLogicOpt" "true" 
+      "A" "" "" "" "PROP_xcpldFitDesSlew" "Fast" 
+      "A" "" "" "" "PROP_xcpldFitDesTimingCst" "true" 
+      "A" "" "" "" "PROP_xcpldFitDesTriMode" "Keeper" 
+      "A" "" "" "" "PROP_xcpldFitDesUnused" "Keeper" 
+      "A" "" "" "" "PROP_xcpldFitDesVolt" "LVCMOS18" 
+      "A" "" "" "" "PROP_xcpldFitTemplate_xpla3" "Optimize Density" 
+      "A" "" "" "" "PROP_xcpldFittimRptOption" "Summary" 
+      "A" "" "" "" "PROP_xcpldUseGlobalClocks" "true" 
+      "A" "" "" "" "PROP_xcpldUseGlobalOutputEnables" "true" 
+      "A" "" "" "" "PROP_xcpldUseGlobalSetReset" "true" 
+      "A" "" "" "" "PROP_xcpldUseLocConst" "Always" 
+      "A" "" "" "" "PROP_xilxBitgCfg_Code" "0xFFFFFFFF" 
+      "A" "" "" "" "PROP_xilxBitgCfg_DCMShutdown" "false" 
+      "A" "" "" "" "PROP_xilxBitgCfg_Done" "Pull Up" 
+      "A" "" "" "" "PROP_xilxBitgCfg_GenOpt_ASCIIFile" "false" 
+      "A" "" "" "" "PROP_xilxBitgCfg_GenOpt_BinaryFile" "false" 
+      "A" "" "" "" "PROP_xilxBitgCfg_GenOpt_BitFile" "true" 
+      "A" "" "" "" "PROP_xilxBitgCfg_GenOpt_Compress" "false" 
+      "A" "" "" "" "PROP_xilxBitgCfg_GenOpt_DRC" "true" 
+      "A" "" "" "" "PROP_xilxBitgCfg_GenOpt_EnableCRC" "true" 
+      "A" "" "" "" "PROP_xilxBitgCfg_GenOpt_IEEE1532File" "false" 
+      "A" "" "" "" "PROP_xilxBitgCfg_GenOpt_IEEE1532File_xbr" "false" 
+      "A" "" "" "" "PROP_xilxBitgCfg_GenOpt_ReadBack" "false" 
+      "A" "" "" "" "PROP_xilxBitgCfg_Pgm" "Pull Up" 
+      "A" "" "" "" "PROP_xilxBitgCfg_TCK" "Pull Up" 
+      "A" "" "" "" "PROP_xilxBitgCfg_TDI" "Pull Up" 
+      "A" "" "" "" "PROP_xilxBitgCfg_TDO" "Pull Up" 
+      "A" "" "" "" "PROP_xilxBitgCfg_TMS" "Pull Up" 
+      "A" "" "" "" "PROP_xilxBitgCfg_Unused" "Pull Down" 
+      "A" "" "" "" "PROP_xilxBitgReadBk_Sec" "Enable Readback and Reconfiguration" 
+      "A" "" "" "" "PROP_xilxBitgStart_Clk" "CCLK" 
+      "A" "" "" "" "PROP_xilxBitgStart_Clk_Done" "Default (4)" 
+      "A" "" "" "" "PROP_xilxBitgStart_Clk_DriveDone" "false" 
+      "A" "" "" "" "PROP_xilxBitgStart_Clk_EnOut" "Default (5)" 
+      "A" "" "" "" "PROP_xilxBitgStart_Clk_RelDLL" "Default (NoWait)" 
+      "A" "" "" "" "PROP_xilxBitgStart_Clk_WrtEn" "Default (6)" 
+      "A" "" "" "" "PROP_xilxBitgStart_IntDone" "false" 
+      "A" "" "" "" "PROP_xilxMapAllowLogicOpt" "false" 
+      "A" "" "" "" "PROP_xilxMapCoverMode" "Area" 
+      "A" "" "" "" "PROP_xilxMapDisableRegOrdering" "false" 
+      "A" "" "" "" "PROP_xilxMapPackRegInto" "Off" 
+      "A" "" "" "" "PROP_xilxMapReplicateLogic" "true" 
+      "A" "" "" "" "PROP_xilxMapReportDetail" "false" 
+      "A" "" "" "" "PROP_xilxMapSliceLogicInUnusedBRAMs" "false" 
+      "A" "" "" "" "PROP_xilxMapTimingDrivenPacking" "false" 
+      "A" "" "" "" "PROP_xilxMapTrimUnconnSig" "true" 
+      "A" "" "" "" "PROP_xilxNgdbldIOPads" "false" 
+      "A" "" "" "" "PROP_xilxNgdbldMacro" "" 
+      "A" "" "" "" "PROP_xilxNgdbldNTType" "Timestamp" 
+      "A" "" "" "" "PROP_xilxNgdbldUR" "" 
+      "A" "" "" "" "PROP_xilxNgdbldUnexpBlks" "false" 
+      "A" "" "" "" "PROP_xilxNgdbld_AUL" "false" 
+      "A" "" "" "" "PROP_xilxPARplacerCostTable" "1" 
+      "A" "" "" "" "PROP_xilxPARplacerEffortLevel" "None" 
+      "A" "" "" "" "PROP_xilxPARrouterEffortLevel" "None" 
+      "A" "" "" "" "PROP_xilxPARstrat" "Normal Place and Route" 
+      "A" "" "" "" "PROP_xilxPARuseBondedIO" "false" 
+      "A" "" "" "" "PROP_xilxPostTrceAdvAna" "false" 
+      "A" "" "" "" "PROP_xilxPostTrceEndpointPath" "" 
+      "A" "" "" "" "PROP_xilxPostTrceRpt" "Error Report" 
+      "A" "" "" "" "PROP_xilxPostTrceRptLimit" "3" 
+      "A" "" "" "" "PROP_xilxPostTrceStamp" "" 
+      "A" "" "" "" "PROP_xilxPostTrceTSIFile" "" 
+      "A" "" "" "" "PROP_xilxPostTrceUncovPath" "" 
+      "A" "" "" "" "PROP_xilxPreTrceAdvAna" "false" 
+      "A" "" "" "" "PROP_xilxPreTrceEndpointPath" "" 
+      "A" "" "" "" "PROP_xilxPreTrceRpt" "Verbose Report" 
+      "A" "" "" "" "PROP_xilxPreTrceRptLimit" "3" 
+      "A" "" "" "" "PROP_xilxPreTrceUncovPath" "" 
+      "A" "" "" "" "PROP_xilxSynthAddIObuf" "true" 
+      "A" "" "" "" "PROP_xilxSynthGlobOpt" "AllClockNets" 
+      "A" "" "" "" "PROP_xilxSynthKeepHierarchy" "No" 
+      "A" "" "" "" "PROP_xilxSynthKeepHierarchy_CPLD" "Yes" 
+      "A" "" "" "" "PROP_xilxSynthMacroPreserve" "true" 
+      "A" "" "" "" "PROP_xilxSynthRegBalancing" "No" 
+      "A" "" "" "" "PROP_xilxSynthRegDuplication" "true" 
+      "A" "" "" "" "PROP_xilxSynthXORPreserve" "true" 
+      "A" "" "" "" "PROP_xstAsynToSync" "false" 
+      "A" "" "" "" "PROP_xstAutoBRAMPacking" "false" 
+      "A" "" "" "" "PROP_xstBRAMUtilRatio" "100" 
+      "A" "" "" "" "PROP_xstBusDelimiter" "<>" 
+      "A" "" "" "" "PROP_xstCase" "Maintain" 
+      "A" "" "" "" "PROP_xstCoresSearchDir" "" 
+      "A" "" "" "" "PROP_xstCrossClockAnalysis" "false" 
+      "A" "" "" "" "PROP_xstEquivRegRemoval" "true" 
+      "A" "" "" "" "PROP_xstFsmStyle" "LUT" 
+      "A" "" "" "" "PROP_xstGenerateRTLNetlist" "Yes" 
+      "A" "" "" "" "PROP_xstGenericsParameters" "" 
+      "A" "" "" "" "PROP_xstHierarchySeparator" "/" 
+      "A" "" "" "" "PROP_xstIniFile" "" 
+      "A" "" "" "" "PROP_xstLibSearchOrder" "" 
+      "A" "" "" "" "PROP_xstNetlistHierarchy" "As Optimized" 
+      "A" "" "" "" "PROP_xstOptimizeInsPrimtives" "false" 
+      "A" "" "" "" "PROP_xstPackIORegister" "Auto" 
+      "A" "" "" "" "PROP_xstReadCores" "true" 
+      "A" "" "" "" "PROP_xstSlicePacking" "true" 
+      "A" "" "" "" "PROP_xstSliceUtilRatio" "100" 
+      "A" "" "" "" "PROP_xstUseClockEnable" "Yes" 
+      "A" "" "" "" "PROP_xstUseSyncReset" "Yes" 
+      "A" "" "" "" "PROP_xstUseSyncSet" "Yes" 
+      "A" "" "" "" "PROP_xstUseSynthConstFile" "true" 
+      "A" "" "" "" "PROP_xstUserCompileList" "" 
+      "A" "" "" "" "PROP_xstVeriIncludeDir_Global" "" 
+      "A" "" "" "" "PROP_xstVerilog2001" "true" 
+      "A" "" "" "" "PROP_xstVerilogMacros" "" 
+      "A" "" "" "" "PROP_xstWorkDir" "./xst" 
+      "A" "" "" "" "PROP_xstWriteTimingConstraints" "false" 
+      "A" "" "" "" "PROP_xst_otherCmdLineOptions" "" 
+      "A" "AutoGeneratedView" "VIEW_AnnotatedPreSimulation" "" "PROP_ISimIncreCompilation" "true" 
+      "A" "AutoGeneratedView" "VIEW_AnnotatedPreSimulation" "" "PROP_ISimSpecifyDefMacroAndValue" "" 
+      "A" "AutoGeneratedView" "VIEW_AnnotatedPreSimulation" "" "PROP_ISimSpecifySearchDirectory" "" 
+      "A" "AutoGeneratedView" "VIEW_AnnotatedPreSimulation" "" "PROP_ISimValueRangeCheck" "false" 
+      "A" "AutoGeneratedView" "VIEW_AnnotatedPreSimulation" "" "PROP_TopDesignUnit" "" 
+      "A" "AutoGeneratedView" "VIEW_BehavioralFuse" "" "PROP_TopDesignUnit" "" 
+      "A" "AutoGeneratedView" "VIEW_Post-ParFuse" "" "PROP_TopDesignUnit" "" 
+      "A" "AutoGeneratedView" "VIEW_Post-ParPreSimulation" "" "PROP_ISimCompileForHdlDebug" "true" 
+      "A" "AutoGeneratedView" "VIEW_Post-ParPreSimulation" "" "PROP_ISimIncreCompilation" "true" 
+      "A" "AutoGeneratedView" "VIEW_Post-ParPreSimulation" "" "PROP_ISimSpecifyDefMacroAndValue" "" 
+      "A" "AutoGeneratedView" "VIEW_Post-ParPreSimulation" "" "PROP_ISimSpecifySearchDirectory" "" 
+      "A" "AutoGeneratedView" "VIEW_Post-ParPreSimulation" "" "PROP_ISimValueRangeCheck" "false" 
+      "A" "AutoGeneratedView" "VIEW_Post-ParPreSimulation" "" "PROP_TopDesignUnit" "" 
+      "A" "AutoGeneratedView" "VIEW_PostAbstractSimulation" "" "PROP_TopDesignUnit" "" 
+      "A" "AutoGeneratedView" "VIEW_PreSimulation" "" "PROP_ISimCompileForHdlDebug" "true" 
+      "A" "AutoGeneratedView" "VIEW_PreSimulation" "" "PROP_ISimIncreCompilation" "true" 
+      "A" "AutoGeneratedView" "VIEW_PreSimulation" "" "PROP_ISimSpecifyDefMacroAndValue" "" 
+      "A" "AutoGeneratedView" "VIEW_PreSimulation" "" "PROP_ISimSpecifySearchDir" "" 
+      "A" "AutoGeneratedView" "VIEW_PreSimulation" "" "PROP_ISimSpecifySearchDirectory" "" 
+      "A" "AutoGeneratedView" "VIEW_PreSimulation" "" "PROP_ISimValueRangeCheck" "false" 
+      "A" "AutoGeneratedView" "VIEW_PreSimulation" "" "PROP_TopDesignUnit" "" 
+      "A" "AutoGeneratedView" "VIEW_TBWPost-ParPreSimulation" "" "PROP_ISimCompileForHdlDebug" "true" 
+      "A" "AutoGeneratedView" "VIEW_TBWPost-ParPreSimulation" "" "PROP_ISimIncreCompilation" "true" 
+      "A" "AutoGeneratedView" "VIEW_TBWPost-ParPreSimulation" "" "PROP_ISimSpecifyDefMacroAndValue" "" 
+      "A" "AutoGeneratedView" "VIEW_TBWPost-ParPreSimulation" "" "PROP_ISimSpecifySearchDirectory" "" 
+      "A" "AutoGeneratedView" "VIEW_TBWPost-ParPreSimulation" "" "PROP_ISimValueRangeCheck" "false" 
+      "A" "AutoGeneratedView" "VIEW_TBWPreSimulation" "" "PROP_ISimCompileForHdlDebug" "true" 
+      "A" "AutoGeneratedView" "VIEW_TBWPreSimulation" "" "PROP_ISimIncreCompilation" "true" 
+      "A" "AutoGeneratedView" "VIEW_TBWPreSimulation" "" "PROP_ISimSpecifyDefMacroAndValue" "" 
+      "A" "AutoGeneratedView" "VIEW_TBWPreSimulation" "" "PROP_ISimSpecifySearchDirectory" "" 
+      "A" "AutoGeneratedView" "VIEW_TBWPreSimulation" "" "PROP_ISimValueRangeCheck" "false" 
+      "A" "AutoGeneratedView" "VIEW_TBWPreSimulation" "" "PROP_TopDesignUnit" "" 
+      "A" "AutoGeneratedView" "VIEW_XSTPreSynthesis" "" "PROP_TopDesignUnit" "" 
+      "A" "AutoGeneratedView" "VIEW_XSTPreSynthesis" "" "PROP_xstVeriIncludeDir" "" 
+      "B" "" "" "" "PROP_DevFamily" "Spartan3E" 
+      "B" "" "" "" "PROP_FitterOptimization_xpla3" "Density" 
+      "B" "" "" "" "PROP_ISimCustomCompilationOrderFile" "" 
+      "B" "" "" "" "PROP_ISimCustomSimCmdFileName_behav_tb" "" 
+      "B" "" "" "" "PROP_ISimCustomSimCmdFileName_behav_tbw" "" 
+      "B" "" "" "" "PROP_ISimCustomSimCmdFileName_gen_tbw" "" 
+      "B" "" "" "" "PROP_ISimCustomSimCmdFileName_par_tb" "" 
+      "B" "" "" "" "PROP_ISimCustomSimCmdFileName_par_tbw" "" 
+      "B" "" "" "" "PROP_ISimGenVCDFile_par_tb" "false" 
+      "B" "" "" "" "PROP_ISimGenVCDFile_par_tbw" "false" 
+      "B" "" "" "" "PROP_ISimSimulationRun_behav_tb" "true" 
+      "B" "" "" "" "PROP_ISimSimulationRun_behav_tbw" "true" 
+      "B" "" "" "" "PROP_ISimSimulationRun_par_tb" "true" 
+      "B" "" "" "" "PROP_ISimSimulationRun_par_tbw" "true" 
+      "B" "" "" "" "PROP_ISimStoreAllSignalTransitions_behav_tb" "false" 
+      "B" "" "" "" "PROP_ISimStoreAllSignalTransitions_behav_tbw" "false" 
+      "B" "" "" "" "PROP_ISimStoreAllSignalTransitions_par_tb" "false" 
+      "B" "" "" "" "PROP_ISimStoreAllSignalTransitions_par_tbw" "false" 
+      "B" "" "" "" "PROP_MapEffortLevel" "Medium" 
+      "B" "" "" "" "PROP_MapLogicOptimization" "false" 
+      "B" "" "" "" "PROP_MapPlacerCostTable" "1" 
+      "B" "" "" "" "PROP_MapPowerReduction" "false" 
+      "B" "" "" "" "PROP_MapRegDuplication" "false" 
+      "B" "" "" "" "PROP_SimModelRenTopLevInstTo" "UUT" 
+      "B" "" "" "" "PROP_Simulator" "ISE Simulator (VHDL/Verilog)" 
+      "B" "" "" "" "PROP_SmartGuideFileName" "_guide.ncd" 
+      "B" "" "" "" "PROP_SynthConstraintsFile" "" 
+      "B" "" "" "" "PROP_SynthMuxStyle" "Auto" 
+      "B" "" "" "" "PROP_SynthRAMStyle" "Auto" 
+      "B" "" "" "" "PROP_XPowerOptAdvancedVerboseRpt" "false" 
+      "B" "" "" "" "PROP_XPowerOptMaxNumberLines" "1000" 
+      "B" "" "" "" "PROP_impactPort" "Auto - default" 
+      "B" "" "" "" "PROP_mapTimingMode" "Non Timing Driven" 
+      "B" "" "" "" "PROP_parGenAsyDlyRpt" "false" 
+      "B" "" "" "" "PROP_parGenClkRegionRpt" "false" 
+      "B" "" "" "" "PROP_parGenSimModel" "false" 
+      "B" "" "" "" "PROP_parGenTimingRpt" "true" 
+      "B" "" "" "" "PROP_parMpprNodelistFile" "" 
+      "B" "" "" "" "PROP_parMpprParIterations" "3" 
+      "B" "" "" "" "PROP_parMpprResultsDirectory" "" 
+      "B" "" "" "" "PROP_parMpprResultsToSave" "" 
+      "B" "" "" "" "PROP_parPowerReduction" "false" 
+      "B" "" "" "" "PROP_parTimingMode" "Performance Evaluation" 
+      "B" "" "" "" "PROP_xcpldFitDesInReg_xbr" "true" 
+      "B" "" "" "" "PROP_xcpldFitDesPtermLmt_xbr" "28" 
+      "B" "" "" "" "PROP_xilxBitgCfg_GenOpt_DbgBitStr" "false" 
+      "B" "" "" "" "PROP_xilxBitgCfg_GenOpt_LogicAllocFile" "false" 
+      "B" "" "" "" "PROP_xilxBitgCfg_GenOpt_MaskFile" "false" 
+      "B" "" "" "" "PROP_xilxBitgReadBk_GenBitStr" "false" 
+      "B" "" "" "" "PROP_xilxMapPackfactor" "100" 
+      "B" "" "" "" "PROP_xilxPAReffortLevel" "Standard" 
+      "B" "" "" "" "PROP_xstMoveFirstFfStage" "true" 
+      "B" "" "" "" "PROP_xstMoveLastFfStage" "true" 
+      "B" "" "" "" "PROP_xstROMStyle" "Auto" 
+      "B" "" "" "" "PROP_xstSafeImplement" "No" 
+      "B" "AutoGeneratedView" "VIEW_Map" "" "PROP_ParSmartGuideFileName" "_guide.ncd" 
+      "B" "AutoGeneratedView" "VIEW_Translation" "" "PROP_MapSmartGuideFileName" "_guide.ncd" 
+      "C" "" "" "" "PROP_CompxlibLang" "VHDL" 
+      "C" "" "" "" "PROP_CompxlibSimPath" "Search in Path" 
+      "C" "" "" "" "PROP_DevDevice" "xc3s500e" 
+      "C" "" "" "" "PROP_DevFamilyPMName" "spartan3e" 
+      "C" "" "" "" "PROP_ISimSimulationRunTime_behav_tb" "1000 ns" 
+      "C" "" "" "" "PROP_ISimSimulationRunTime_behav_tbw" "1000 ns" 
+      "C" "" "" "" "PROP_ISimSimulationRunTime_par_tb" "1000 ns" 
+      "C" "" "" "" "PROP_ISimSimulationRunTime_par_tbw" "1000 ns" 
+      "C" "" "" "" "PROP_ISimVCDFileName_par_tb" "xpower.vcd" 
+      "C" "" "" "" "PROP_ISimVCDFileName_par_tbw" "xpower.vcd" 
+      "C" "" "" "" "PROP_MapExtraEffort" "None" 
+      "C" "" "" "" "PROP_MapPowerActivityFile" "" 
+      "C" "" "" "" "PROP_SimModelGenMultiHierFile" "false" 
+      "C" "" "" "" "PROP_parPowerActivityFile" "" 
+      "C" "" "" "" "PROP_xilxPARextraEffortLevel" "None" 
+      "D" "" "" "" "PROP_CompxlibUni9000Lib" "true" 
+      "D" "" "" "" "PROP_CompxlibUniSimLib" "true" 
+      "D" "" "" "" "PROP_DevPackage" "fg320" 
+      "D" "" "" "" "PROP_Synthesis_Tool" "XST (VHDL/Verilog)" 
+      "E" "" "" "" "PROP_DevSpeed" "-5" 
+      "E" "" "" "" "PROP_PreferredLanguage" "VHDL" 
+      "F" "" "" "" "PROP_ChangeDevSpeed" "-5" 
+      "F" "" "" "" "PROP_SimModelTarget" "VHDL" 
+      "F" "" "" "" "PROP_tbwTestbenchTargetLang" "VHDL" 
+      "F" "" "" "" "PROP_xilxPostTrceSpeed" "-5" 
+      "F" "" "" "" "PROP_xilxPreTrceSpeed" "-5" 
+      "G" "" "" "" "PROP_SimModelAutoInsertGlblModuleInNetlist" "true" 
+      "G" "" "" "" "PROP_SimModelGenArchOnly" "false" 
+      "G" "" "" "" "PROP_SimModelIncSdfAnnInVerilogFile" "true" 
+      "G" "" "" "" "PROP_SimModelIncSimprimInVerilogFile" "false" 
+      "G" "" "" "" "PROP_SimModelIncUnisimInVerilogFile" "false" 
+      "G" "" "" "" "PROP_SimModelIncUselibDirInVerilogFile" "false" 
+      "G" "" "" "" "PROP_SimModelNoEscapeSignal" "false" 
+      "G" "" "" "" "PROP_SimModelOutputExtIdent" "false" 
+      "G" "" "" "" "PROP_SimModelRenTopLevArchTo" "Structure" 
+      "G" "" "" "" "PROP_SimModelRenTopLevMod" "" 
+      "G" "" "" "" "PROP_bencherPostMapTestbenchName" "" 
+      "G" "" "" "" "PROP_bencherPostParTestbenchName" "" 
+      "G" "" "" "" "PROP_bencherPostXlateTestbenchName" "" 
+      "G" "" "" "" "PROP_netgenPostMapSimModelName" "_map.vhd" 
+      "G" "" "" "" "PROP_netgenPostParSimModelName" "_timesim.vhd" 
+      "G" "" "" "" "PROP_netgenPostSynthesisSimModelName" "_synthesis.vhd" 
+      "G" "" "" "" "PROP_netgenPostXlateSimModelName" "_translate.vhd" 
+      "G" "AutoGeneratedView" "VIEW_Map" "" "PROP_PostMapSimModelName" "_map.vhd" 
+      "G" "AutoGeneratedView" "VIEW_Par" "" "PROP_PostParSimModelName" "_timesim.vhd" 
+      "G" "AutoGeneratedView" "VIEW_Post-MapAbstractSimulation" "" "PROP_tbwPostMapTestbenchName" "" 
+      "G" "AutoGeneratedView" "VIEW_Post-ParAbstractSimulation" "" "PROP_tbwPostParTestbenchName" "" 
+      "G" "AutoGeneratedView" "VIEW_Post-TranslateAbstractSimulation" "" "PROP_tbwPostXlateTestbenchName" "" 
+      "G" "AutoGeneratedView" "VIEW_Structural" "" "PROP_PostSynthesisSimModelName" "_synthesis.vhd" 
+      "G" "AutoGeneratedView" "VIEW_Translation" "" "PROP_PostXlateSimModelName" "_translate.vhd" 
+      "H" "" "" "" "PROP_SimModelBringOutGsrNetAsAPort" "false" 
+      "H" "" "" "" "PROP_SimModelBringOutGtsNetAsAPort" "false" 
+      "H" "" "" "" "PROP_SimModelPathUsedInSdfAnn" "Default" 
+      "H" "" "" "" "PROP_netgenRenameTopLevEntTo" "" 
+      "I" "" "" "" "PROP_SimModelGsrPortName" "GSR_PORT" 
+      "I" "" "" "" "PROP_SimModelGtsPortName" "GTS_PORT" 
+      "I" "" "" "" "PROP_SimModelRocPulseWidth" "100" 
+      "I" "" "" "" "PROP_SimModelTocPulseWidth" "0"}
+
+  HandleException {
+    RestoreProcessProperties $iProjHelper $process_props
+  } "A problem occured while restoring process properties."
+
+   # library names and their members
+   set libraries {
+   }
+
+  HandleException {
+    RestoreSourceLibraries $iProjHelper $libraries
+  } "A problem occured while restoring source libraries."
+
+   # partition names for recreation
+   set partition_names {
+   }
+
+  HandleException {
+    RestorePartitions $partition_names
+  } "A problem occured while restoring partitions."
+
+   # Close the facilitator project.
+   CloseFacilProject $iProjHelper
+
+   # cd into the project directory before trying to open thr project
+   cd $project_dir
+
+   set proj_file_full_path [file join $project_dir $project_file]
+   INFO "Opening restored project file \"$proj_file_full_path\" ..."
+
+   # Open the restored project in the user's client application,
+   # which will either be the Projnav GUI or xtclsh.
+   project open $project_file
+
+   # Let the user know about the backed up project file.
+   INFO "The project \"$project_file\" was successfully recovered and opened."
+   if {$wasBackedUp} {
+      INFO ""
+      INFO "The original project was renamed as \"$backup_file\"."
+      INFO "Please open a Technical Support WebCase at"
+      INFO "www.xilinx.com/support/clearexpress/websupport.htm"
+      INFO "and submit this file, along with the project source files, for evaluation."
+   }
+}
+