HSPEXP+ Updates

1. The interface of HSPEXP+ was improved. 2. The Multi Simulation Manager can now look at range of operations. 3. Install scripts and texts were updated.
respec · Mar 23, 2018 · d4d3d98 · d4d3d98
1 parent 5c7c626
commit d4d3d98
Show file tree

Hide file tree

Showing 6 changed files with 205 additions and 146 deletions.
diff --git a/HSPEXP/MultiSimulatioManager.vb b/HSPEXP/MultiSimulatioManager.vb
@@ -307,6 +307,16 @@ You can edit this specification file and add more parameters and outputs.", vbOK
                                                ByRef aParm As ModelParameter,
                                                ByVal aMFactorOrParmValue As Double
                                                )
+        Dim lOperLowerRange As Integer = -1
+        Dim lOperUpperRange As Integer = -1
+        Try
+            lOperLowerRange = CInt(aParm.ParmOperationName.Split("-")(0))
+            lOperUpperRange = CInt(aParm.ParmOperationName.Split("-")(1))
+            Logger.Dbg("Range of operaion is provided")
+        Catch ex As Exception
+            Logger.Dbg("Range of Operations is not provided")
+        End Try
+
         Select Case True
             Case aParm.ParmTable.Contains("MASS-LINK")
                 Dim lMassLinkID As Integer
@@ -412,8 +422,10 @@ You can edit this specification file and add more parameters and outputs.", vbOK
                 Next
 
             Case Else
+
                 For Each lOper As HspfOperation In aUCI.OpnBlks(aParm.ParmOperationType).Ids
                     If (lOper.Id = aParm.ParmOperationNumber OrElse lOper.Description = aParm.ParmOperationName OrElse
+                            (lOper.Id >= lOperLowerRange AndAlso lOper.Id <= lOperUpperRange) OrElse
                             (aParm.ParmOperationNumber = 0 AndAlso aParm.ParmOperationName = "")) Then
                         Try
                             Dim lTable As HspfTable

diff --git a/HSPEXP/SetUpScript.iss b/HSPEXP/SetUpScript.iss
@@ -2,7 +2,7 @@
 ; SEE THE DOCUMENTATION FOR DETAILS ON CREATING INNO SETUP SCRIPT FILES!
 
 #define MyAppName "HSPEXP+"
-#define MyAppVersion "2.00beta"
+#define MyAppVersion "2.00beta1"
 #define MyAppPublisher "RESPEC"
 #define MyAppURL "http://www.respec.com/product/hspexp/"
 #define MyAppExeName "HSPEXP+.exe"
@@ -19,9 +19,11 @@ AppPublisher={#MyAppPublisher}
 AppPublisherURL={#MyAppURL}
 AppSupportURL={#MyAppURL}
 AppUpdatesURL={#MyAppURL}
-DefaultDirName={reg:HKLM\SOFTWARE\RESPEC\BASINS41,Base Directory|{pf}\HSPEXP+}
+AppContact= {#MyAppURL}
+VersionInfoCopyright=Mozilla Public License (MPL) 1.1
+DefaultDirName={reg:HKLM\SOFTWARE\RESPEC\BASINS45,Base Directory|{pf}\HSPEXP+}
 DefaultGroupName={#MyAppName}
-OutputBaseFilename=HSPEXP+2.00betaSetUp
+OutputBaseFilename=HSPEXP+2.00beta1SetUp
 Compression=lzma
 SolidCompression=yes
 InfoBeforeFile=install.txt

diff --git a/HSPEXP/SplashScreen1.vb b/HSPEXP/SplashScreen1.vb
@@ -27,7 +27,7 @@
         '    Version.Text = System.String.Format(Version.Text, My.Application.Info.Version.Major, My.Application.Info.Version.Minor, My.Application.Info.Version.Build, My.Application.Info.Version.Revision)
 
         With My.Application.Info.Version
-            Version.Text = "Version " & .Major & "." & .Minor & " beta"
+            Version.Text = "Version " & .Major & "." & .Minor & " beta1"
             If .MajorRevision > 0 OrElse .MinorRevision > 0 Then
                 Version.Text &= "." & .MajorRevision & "." & .MinorRevision
             End If