add solutions
This commit is contained in:
39
zz-solutions/01-WaveformGenerator/Scripts/start_diamond.pl
Normal file
39
zz-solutions/01-WaveformGenerator/Scripts/start_diamond.pl
Normal file
@@ -0,0 +1,39 @@
|
||||
#!/usr/bin/perl
|
||||
# filename: start_diamond.pl
|
||||
# created by: Corthay Francois & Zahno Silvan & Amand Axel
|
||||
#
|
||||
#-------------------------------------------------------------------------------
|
||||
#
|
||||
# Description:
|
||||
# Starts Diamond in the correct timezone for the Synplify License
|
||||
# Help Parameter : <?>
|
||||
# Parameter : start_diamond.pl <Diamond File Spec>
|
||||
#-------------------------------------------------------------------------------
|
||||
#
|
||||
# History:
|
||||
# V0.1 : zas 08.2019 -- Initial release
|
||||
# V0.2 : ama 02.2023 -- Adapted for Diamond
|
||||
#
|
||||
################################################################################
|
||||
|
||||
$separator = '-' x 79;
|
||||
$indent = ' ' x 2;
|
||||
$verbose = 1;
|
||||
$| = 1; # forces flush on prints
|
||||
|
||||
$ENV{TZ} = ''; # needed to be able to run Synplify avoinding license error
|
||||
my $designerExe = "$ENV{DIAMOND_HOME}\\bin\\nt64\\pnmain.exe";
|
||||
$diamondFileSpec = $ARGV[0];
|
||||
|
||||
#-------------------------------------------------------------------------------
|
||||
# Launch Diamond
|
||||
#
|
||||
|
||||
if ($verbose == 1) {
|
||||
print "$separator\n\n";
|
||||
print "Launching Diamond from $designerExe\n";
|
||||
print $indent, "* Project file spec: $diamondFileSpec\n\n";
|
||||
print "$separator\n\n";
|
||||
}
|
||||
|
||||
system("$designerExe $diamondFileSpec");
|
||||
Reference in New Issue
Block a user