diff --git a/CHANGES.md b/CHANGES.md
index 3c2da0585ae530506dd26095fafa30c216cae4f5..44e7d3427cb2b3e07330ed72a9abf338a73a0dac 100644
--- a/CHANGES.md
+++ b/CHANGES.md
@@ -2,6 +2,11 @@
### VECTO x.x (current source)
+### VECTO 2.0.4-beta
+* AT update for 1C2C gearboxes
+* Warning when opening or running files if file was created in different mode (Declaration/Engineering Mode)
+
+
### VECTO 2.0.3-beta0
* Implemented engine-side TC inertia input parameter in GBX file
* Updated User Manual for TC inertia
diff --git a/Generic Vehicles/Declaration Mode/12t Delivery Truck/12t Delivery Truck.vecto b/Generic Vehicles/Declaration Mode/12t Delivery Truck/12t Delivery Truck.vecto
index c7920c4599cdd8822a7f6a3336f46473a18ebcb1..6b93f38a31754341338a98bcd5efc6b8b4be1d1e 100644
--- a/Generic Vehicles/Declaration Mode/12t Delivery Truck/12t Delivery Truck.vecto
+++ b/Generic Vehicles/Declaration Mode/12t Delivery Truck/12t Delivery Truck.vecto
@@ -1,14 +1,20 @@
{
"Header": {
- "CreatedBy": "Raphael Luz IVT TU-Graz (50e1b2d7-43a7-42d0-97c3-d8d48709e28c)",
- "Date": "23.04.2014 16:59:20",
- "AppVersion": "1.5.0-pre0",
- "FileVersion": 1
+ "CreatedBy": "Raphael Luz IVT TU-Graz (85407225-fc3f-48a8-acda-c84a05df6837)",
+ "Date": "29.07.2014 16:58:58",
+ "AppVersion": "2.0.4-beta",
+ "FileVersion": 2
},
"Body": {
+ "SavedInDeclMode": true,
"VehicleFile": "12t Delivery Truck.vveh",
"EngineFile": "12t Delivery Truck.veng",
"GearboxFile": "12t Delivery Truck.vgbx",
+ "Cycles": [
+ "Long Haul",
+ "Regional Delivery",
+ "Urban Delivery"
+ ],
"Aux": [
{
"ID": "FAN",
diff --git a/Generic Vehicles/Declaration Mode/12t Delivery Truck/12t Delivery Truck.veng b/Generic Vehicles/Declaration Mode/12t Delivery Truck/12t Delivery Truck.veng
index 0ffa78d016cd92228dcbbdf4b2bf6476f362fb8b..c1e59fbeae495fae19c73bd5db3e34906bc62927 100644
--- a/Generic Vehicles/Declaration Mode/12t Delivery Truck/12t Delivery Truck.veng
+++ b/Generic Vehicles/Declaration Mode/12t Delivery Truck/12t Delivery Truck.veng
@@ -1,11 +1,12 @@
{
"Header": {
- "CreatedBy": "Raphael Luz IVT TU-Graz (50e1b2d7-43a7-42d0-97c3-d8d48709e28c)",
- "Date": "23.04.2014 17:02:49",
- "AppVersion": "1.5.0-pre0",
- "FileVersion": 1
+ "CreatedBy": "Raphael Luz IVT TU-Graz (85407225-fc3f-48a8-acda-c84a05df6837)",
+ "Date": "29.07.2014 16:58:53",
+ "AppVersion": "2.0.4-beta",
+ "FileVersion": 2
},
"Body": {
+ "SavedInDeclMode": true,
"ModelName": "Generic 12t Delivery Truck",
"Displacement": 7700.0,
"IdlingSpeed": 600.0,
diff --git a/Generic Vehicles/Declaration Mode/12t Delivery Truck/12t Delivery Truck.vgbx b/Generic Vehicles/Declaration Mode/12t Delivery Truck/12t Delivery Truck.vgbx
index 78027c9a9ca5237ff3ff091794b86c9b7ae1b03b..71a6413e1fa53facffa7b50a50b8ff74023d655e 100644
--- a/Generic Vehicles/Declaration Mode/12t Delivery Truck/12t Delivery Truck.vgbx
+++ b/Generic Vehicles/Declaration Mode/12t Delivery Truck/12t Delivery Truck.vgbx
@@ -1,11 +1,12 @@
{
"Header": {
- "CreatedBy": "Raphael Luz IVT TU-Graz (50e1b2d7-43a7-42d0-97c3-d8d48709e28c)",
- "Date": "23.04.2014 16:19:18",
- "AppVersion": "1.5.0-pre0",
- "FileVersion": 2
+ "CreatedBy": "Raphael Luz IVT TU-Graz (85407225-fc3f-48a8-acda-c84a05df6837)",
+ "Date": "29.07.2014 16:58:58",
+ "AppVersion": "2.0.4-beta",
+ "FileVersion": 4
},
"Body": {
+ "SavedInDeclMode": true,
"ModelName": "Generic 12t Delivery Truck",
"Inertia": 0.0,
"TracInt": 2.0,
@@ -62,7 +63,8 @@
"TorqueConverter": {
"Enabled": false,
"File": "<NOFILE>",
- "RefRPM": 0.0
+ "RefRPM": 0.0,
+ "Inertia": 0.0
}
}
}
\ No newline at end of file
diff --git a/Generic Vehicles/Declaration Mode/12t Delivery Truck/12t Delivery Truck.vveh b/Generic Vehicles/Declaration Mode/12t Delivery Truck/12t Delivery Truck.vveh
index 86d704739b4d6ee694e3dd8f94ae77dc63228afb..7e48eda364dafced678cd2d6f6ec778d42cd7f43 100644
--- a/Generic Vehicles/Declaration Mode/12t Delivery Truck/12t Delivery Truck.vveh
+++ b/Generic Vehicles/Declaration Mode/12t Delivery Truck/12t Delivery Truck.vveh
@@ -1,11 +1,12 @@
{
"Header": {
- "CreatedBy": "Raphael Luz IVT TU-Graz (50e1b2d7-43a7-42d0-97c3-d8d48709e28c)",
- "Date": "24.04.2014 09:11:31",
- "AppVersion": "1.5.0-pre0",
- "FileVersion": 3
+ "CreatedBy": "Raphael Luz IVT TU-Graz (85407225-fc3f-48a8-acda-c84a05df6837)",
+ "Date": "29.07.2014 16:58:52",
+ "AppVersion": "2.0.4-beta",
+ "FileVersion": 5
},
"Body": {
+ "SavedInDeclMode": true,
"VehCat": "RigidTruck",
"CurbWeight": 5850.0,
"CurbWeightExtra": 0.0,
@@ -13,8 +14,6 @@
"MassMax": 11.9,
"Cd": 0.6,
"CrossSecArea": 8.8,
- "CdRigid": 0.6,
- "CrossSecAreaRigid": 8.8,
"rdyn": 406.9297,
"Rim": "15° DC Rims",
"CdCorrMode": "CdOfV",
diff --git a/Generic Vehicles/Declaration Mode/40t Long Haul Truck/40t_Long_Haul_Truck.vecto b/Generic Vehicles/Declaration Mode/40t Long Haul Truck/40t_Long_Haul_Truck.vecto
index 980dec24b6d35798d381054b832e30bab449c220..0316339b1e64b5744257132a034a60141d7c9934 100644
--- a/Generic Vehicles/Declaration Mode/40t Long Haul Truck/40t_Long_Haul_Truck.vecto
+++ b/Generic Vehicles/Declaration Mode/40t Long Haul Truck/40t_Long_Haul_Truck.vecto
@@ -1,11 +1,12 @@
{
"Header": {
"CreatedBy": "Raphael Luz IVT TU-Graz (85407225-fc3f-48a8-acda-c84a05df6837)",
- "Date": "25.04.2014 16:10:17",
- "AppVersion": "2.0.0-pre0",
- "FileVersion": 1
+ "Date": "29.07.2014 16:59:08",
+ "AppVersion": "2.0.4-beta",
+ "FileVersion": 2
},
"Body": {
+ "SavedInDeclMode": true,
"VehicleFile": "40t_Long_Haul_Truck.vveh",
"EngineFile": "40t_Long_Haul_Truck.veng",
"GearboxFile": "40t_Long_Haul_Truck.vgbx",
diff --git a/Generic Vehicles/Declaration Mode/40t Long Haul Truck/40t_Long_Haul_Truck.veng b/Generic Vehicles/Declaration Mode/40t Long Haul Truck/40t_Long_Haul_Truck.veng
index 0a43da6aa160956049d424f2e675e80815fb20f3..29f208aeeeaa81bf66fb9467ecd4077f6364bb0d 100644
--- a/Generic Vehicles/Declaration Mode/40t Long Haul Truck/40t_Long_Haul_Truck.veng
+++ b/Generic Vehicles/Declaration Mode/40t Long Haul Truck/40t_Long_Haul_Truck.veng
@@ -1,11 +1,12 @@
{
"Header": {
- "CreatedBy": "Raphael Luz IVT TU-Graz (50e1b2d7-43a7-42d0-97c3-d8d48709e28c)",
- "Date": "24.04.2014 12:58:51",
- "AppVersion": "1.5.0-pre1",
- "FileVersion": 1
+ "CreatedBy": "Raphael Luz IVT TU-Graz (85407225-fc3f-48a8-acda-c84a05df6837)",
+ "Date": "29.07.2014 16:59:04",
+ "AppVersion": "2.0.4-beta",
+ "FileVersion": 2
},
"Body": {
+ "SavedInDeclMode": true,
"ModelName": "Generic 40t Long Haul Truck",
"Displacement": 12730.0,
"IdlingSpeed": 560.0,
diff --git a/Generic Vehicles/Declaration Mode/40t Long Haul Truck/40t_Long_Haul_Truck.vgbx b/Generic Vehicles/Declaration Mode/40t Long Haul Truck/40t_Long_Haul_Truck.vgbx
index 1449b46de403388756b8b0bb820ef14e608b1a9c..3ac2c59374c2271c30f7cfb308fdc97711a08c26 100644
--- a/Generic Vehicles/Declaration Mode/40t Long Haul Truck/40t_Long_Haul_Truck.vgbx
+++ b/Generic Vehicles/Declaration Mode/40t Long Haul Truck/40t_Long_Haul_Truck.vgbx
@@ -1,14 +1,15 @@
{
"Header": {
- "CreatedBy": "Raphael Luz IVT TU-Graz (50e1b2d7-43a7-42d0-97c3-d8d48709e28c)",
- "Date": "24.04.2014 12:59:10",
- "AppVersion": "1.5.0-pre1",
- "FileVersion": 2
+ "CreatedBy": "Raphael Luz IVT TU-Graz (85407225-fc3f-48a8-acda-c84a05df6837)",
+ "Date": "29.07.2014 16:59:06",
+ "AppVersion": "2.0.4-beta",
+ "FileVersion": 4
},
"Body": {
+ "SavedInDeclMode": true,
"ModelName": "Generic 40t Long Haul Truck",
"Inertia": 0.0,
- "TracInt": 2.0,
+ "TracInt": 1.0,
"Gears": [
{
"Ratio": 2.59,
@@ -89,7 +90,7 @@
],
"TqReserve": 20.0,
"SkipGears": true,
- "ShiftTime": 3,
+ "ShiftTime": 2,
"EaryShiftUp": true,
"StartTqReserve": 20.0,
"StartSpeed": 2.0,
@@ -98,7 +99,8 @@
"TorqueConverter": {
"Enabled": false,
"File": "<NOFILE>",
- "RefRPM": 0.0
+ "RefRPM": 0.0,
+ "Inertia": 0.0
}
}
}
\ No newline at end of file
diff --git a/Generic Vehicles/Declaration Mode/40t Long Haul Truck/40t_Long_Haul_Truck.vveh b/Generic Vehicles/Declaration Mode/40t Long Haul Truck/40t_Long_Haul_Truck.vveh
index 8052c713abb6ed6541074e520005b7b484b99aa3..41d41402bb0d2ef0d8163f3dafdb1d78ed4b6704 100644
--- a/Generic Vehicles/Declaration Mode/40t Long Haul Truck/40t_Long_Haul_Truck.vveh
+++ b/Generic Vehicles/Declaration Mode/40t Long Haul Truck/40t_Long_Haul_Truck.vveh
@@ -1,11 +1,12 @@
{
"Header": {
"CreatedBy": "Raphael Luz IVT TU-Graz (85407225-fc3f-48a8-acda-c84a05df6837)",
- "Date": "25.04.2014 16:11:12",
- "AppVersion": "2.0.0-pre0",
- "FileVersion": 4
+ "Date": "29.07.2014 16:59:03",
+ "AppVersion": "2.0.4-beta",
+ "FileVersion": 5
},
"Body": {
+ "SavedInDeclMode": true,
"VehCat": "Tractor",
"CurbWeight": 7100.0,
"CurbWeightExtra": 0.0,
diff --git a/Generic Vehicles/Engineering Mode/24t Coach/24t Coach.vecto b/Generic Vehicles/Engineering Mode/24t Coach/24t Coach.vecto
index ecde8a84e80fb401a45374aa9993f006b3de58c8..b91cde410f6f37d5d08d9e530c56b9df7fa575cf 100644
--- a/Generic Vehicles/Engineering Mode/24t Coach/24t Coach.vecto
+++ b/Generic Vehicles/Engineering Mode/24t Coach/24t Coach.vecto
@@ -1,11 +1,12 @@
{
"Header": {
- "CreatedBy": "Raphael Luz IVT TU-Graz (50e1b2d7-43a7-42d0-97c3-d8d48709e28c)",
- "Date": "24.04.2014 11:32:29",
- "AppVersion": "1.5.0-pre1",
- "FileVersion": 1
+ "CreatedBy": "Raphael Luz IVT TU-Graz (85407225-fc3f-48a8-acda-c84a05df6837)",
+ "Date": "29.07.2014 16:59:17",
+ "AppVersion": "2.0.4-beta",
+ "FileVersion": 2
},
"Body": {
+ "SavedInDeclMode": false,
"VehicleFile": "24t Coach.vveh",
"EngineFile": "24t Coach.veng",
"GearboxFile": "24t Coach.vgbx",
diff --git a/Generic Vehicles/Engineering Mode/24t Coach/24t Coach.veng b/Generic Vehicles/Engineering Mode/24t Coach/24t Coach.veng
index 4028b6cb5d55aba0f4f7f4bca08e14aa847b4963..45a0b3979f2f8d29b2d3a92f12b39b456640a3a2 100644
--- a/Generic Vehicles/Engineering Mode/24t Coach/24t Coach.veng
+++ b/Generic Vehicles/Engineering Mode/24t Coach/24t Coach.veng
@@ -1,11 +1,12 @@
{
"Header": {
- "CreatedBy": "Raphael Luz IVT TU-Graz (50e1b2d7-43a7-42d0-97c3-d8d48709e28c)",
- "Date": "24.04.2014 11:35:13",
- "AppVersion": "1.5.0-pre1",
- "FileVersion": 1
+ "CreatedBy": "Raphael Luz IVT TU-Graz (85407225-fc3f-48a8-acda-c84a05df6837)",
+ "Date": "29.07.2014 16:59:15",
+ "AppVersion": "2.0.4-beta",
+ "FileVersion": 2
},
"Body": {
+ "SavedInDeclMode": false,
"ModelName": "Generic 24t Coach",
"Displacement": 12730.0,
"IdlingSpeed": 560.0,
diff --git a/Generic Vehicles/Engineering Mode/24t Coach/24t Coach.vgbx b/Generic Vehicles/Engineering Mode/24t Coach/24t Coach.vgbx
index 9b9d2dacfda66050d0b483ce9068e9d099f4cc40..4fdb98db9eb0733d6cfc34bc5690dbac238e7b57 100644
--- a/Generic Vehicles/Engineering Mode/24t Coach/24t Coach.vgbx
+++ b/Generic Vehicles/Engineering Mode/24t Coach/24t Coach.vgbx
@@ -1,11 +1,12 @@
{
"Header": {
- "CreatedBy": "Raphael Luz IVT TU-Graz (50e1b2d7-43a7-42d0-97c3-d8d48709e28c)",
- "Date": "24.04.2014 13:04:04",
- "AppVersion": "1.5.0-pre1",
- "FileVersion": 2
+ "CreatedBy": "Raphael Luz IVT TU-Graz (85407225-fc3f-48a8-acda-c84a05df6837)",
+ "Date": "29.07.2014 16:59:17",
+ "AppVersion": "2.0.4-beta",
+ "FileVersion": 4
},
"Body": {
+ "SavedInDeclMode": false,
"ModelName": "Generic 24t Coach",
"Inertia": 0.0,
"TracInt": 1.0,
@@ -74,7 +75,8 @@
"TorqueConverter": {
"Enabled": false,
"File": "<NOFILE>",
- "RefRPM": 0.0
+ "RefRPM": 0.0,
+ "Inertia": 0.0
}
}
}
\ No newline at end of file
diff --git a/Generic Vehicles/Engineering Mode/24t Coach/24t Coach.vveh b/Generic Vehicles/Engineering Mode/24t Coach/24t Coach.vveh
index c364ae87be33ff2702c5ff7af13c79f589c92abf..cf5749149de0e54e9c5f8bb2f20ac5320dd7a993 100644
--- a/Generic Vehicles/Engineering Mode/24t Coach/24t Coach.vveh
+++ b/Generic Vehicles/Engineering Mode/24t Coach/24t Coach.vveh
@@ -1,11 +1,12 @@
{
"Header": {
- "CreatedBy": "Raphael Luz IVT TU-Graz (50e1b2d7-43a7-42d0-97c3-d8d48709e28c)",
- "Date": "24.04.2014 11:35:05",
- "AppVersion": "1.5.0-pre1",
- "FileVersion": 4
+ "CreatedBy": "Raphael Luz IVT TU-Graz (85407225-fc3f-48a8-acda-c84a05df6837)",
+ "Date": "29.07.2014 16:59:13",
+ "AppVersion": "2.0.4-beta",
+ "FileVersion": 5
},
"Body": {
+ "SavedInDeclMode": false,
"VehCat": "Coach",
"CurbWeight": 15700.0,
"CurbWeightExtra": 0.0,
diff --git a/VECTO/GUI/F_ENG.vb b/VECTO/GUI/F_ENG.vb
index 435a238d6274e3d22dca7b8dc0c3d70bf170660b..f35f921cd7b96138180ee38231fb95b0a79238bb 100644
--- a/VECTO/GUI/F_ENG.vb
+++ b/VECTO/GUI/F_ENG.vb
@@ -149,6 +149,19 @@ Public Class F_ENG
Exit Sub
End If
+ If Cfg.DeclMode <> ENG0.SavedInDeclMode Then
+ Select Case WrongMode()
+ Case 1
+ Me.Close()
+ F_MAINForm.RbDecl.Checked = Not F_MAINForm.RbDecl.Checked
+ F_MAINForm.OpenVectoFile(file)
+ Case -1
+ Exit Sub
+ Case Else '0
+ 'Continue...
+ End Select
+ End If
+
Me.TbName.Text = ENG0.ModelName
Me.TbDispl.Text = ENG0.Displ.ToString
Me.TbInertia.Text = ENG0.I_mot.ToString
diff --git a/VECTO/GUI/F_GBX.vb b/VECTO/GUI/F_GBX.vb
index 979de2aaf95da094debb00748651207779a9fe70..982abef75373a1dad027b5b77796c7d668ccc293 100644
--- a/VECTO/GUI/F_GBX.vb
+++ b/VECTO/GUI/F_GBX.vb
@@ -200,6 +200,19 @@ Public Class F_GBX
Exit Sub
End If
+ If Cfg.DeclMode <> GBX0.SavedInDeclMode Then
+ Select Case WrongMode()
+ Case 1
+ Me.Close()
+ F_MAINForm.RbDecl.Checked = Not F_MAINForm.RbDecl.Checked
+ F_MAINForm.OpenVectoFile(file)
+ Case -1
+ Exit Sub
+ Case Else '0
+ 'Continue...
+ End Select
+ End If
+
Me.TbName.Text = GBX0.ModelName
Me.TbTracInt.Text = GBX0.TracIntrSi.ToString
Me.TBI_getr.Text = GBX0.GbxInertia.ToString
diff --git a/VECTO/GUI/F_MAINForm.Designer.vb b/VECTO/GUI/F_MAINForm.Designer.vb
index e53035690ef9cccba731929d9417920a8ef225b2..777811090a6260791e4cc9e5d72125b03bd2fd5a 100644
--- a/VECTO/GUI/F_MAINForm.Designer.vb
+++ b/VECTO/GUI/F_MAINForm.Designer.vb
@@ -64,21 +64,23 @@ Partial Class F_MAINForm
Me.ButtonDRIremove = New System.Windows.Forms.Button()
Me.ButtonDRIadd = New System.Windows.Forms.Button()
Me.TabPgOptions = New System.Windows.Forms.TabPage()
- Me.GrBoxSTD = New System.Windows.Forms.GroupBox()
Me.GrBoxBATCH = New System.Windows.Forms.GroupBox()
Me.ChBoxBatchSubD = New System.Windows.Forms.CheckBox()
Me.Label2 = New System.Windows.Forms.Label()
Me.ButBObrowse = New System.Windows.Forms.Button()
Me.CbBOmode = New System.Windows.Forms.ComboBox()
Me.TbBOpath = New System.Windows.Forms.TextBox()
+ Me.GrBoxSTD = New System.Windows.Forms.GroupBox()
Me.ChBoxAutoSD = New System.Windows.Forms.CheckBox()
Me.PanelOptAllg = New System.Windows.Forms.Panel()
- Me.CbDecl = New System.Windows.Forms.CheckBox()
+ Me.ChBoxModOut = New System.Windows.Forms.CheckBox()
+ Me.GroupBox1 = New System.Windows.Forms.GroupBox()
+ Me.RbDev = New System.Windows.Forms.RadioButton()
+ Me.RbDecl = New System.Windows.Forms.RadioButton()
Me.PnDeclOpt = New System.Windows.Forms.Panel()
Me.CbBatch = New System.Windows.Forms.CheckBox()
Me.ChBoxCyclDistCor = New System.Windows.Forms.CheckBox()
Me.ChBoxUseGears = New System.Windows.Forms.CheckBox()
- Me.ChBoxModOut = New System.Windows.Forms.CheckBox()
Me.TabPageDEV = New System.Windows.Forms.TabPage()
Me.LvDEVoptions = New System.Windows.Forms.ListView()
Me.ColumnHeader4 = CType(New System.Windows.Forms.ColumnHeader(), System.Windows.Forms.ColumnHeader)
@@ -133,6 +135,7 @@ Partial Class F_MAINForm
Me.TabPgOptions.SuspendLayout()
Me.GrBoxBATCH.SuspendLayout()
Me.PanelOptAllg.SuspendLayout()
+ Me.GroupBox1.SuspendLayout()
Me.PnDeclOpt.SuspendLayout()
Me.TabPageDEV.SuspendLayout()
Me.ConMenFilelist.SuspendLayout()
@@ -466,8 +469,8 @@ Partial Class F_MAINForm
'
'TabPgOptions
'
- Me.TabPgOptions.Controls.Add(Me.GrBoxSTD)
Me.TabPgOptions.Controls.Add(Me.GrBoxBATCH)
+ Me.TabPgOptions.Controls.Add(Me.GrBoxSTD)
Me.TabPgOptions.Controls.Add(Me.ChBoxAutoSD)
Me.TabPgOptions.Controls.Add(Me.PanelOptAllg)
Me.TabPgOptions.Location = New System.Drawing.Point(4, 22)
@@ -478,18 +481,6 @@ Partial Class F_MAINForm
Me.TabPgOptions.Text = "Options"
Me.TabPgOptions.UseVisualStyleBackColor = True
'
- 'GrBoxSTD
- '
- Me.GrBoxSTD.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
- Or System.Windows.Forms.AnchorStyles.Left) _
- Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
- Me.GrBoxSTD.Location = New System.Drawing.Point(6, 182)
- Me.GrBoxSTD.Name = "GrBoxSTD"
- Me.GrBoxSTD.Size = New System.Drawing.Size(1106, 158)
- Me.GrBoxSTD.TabIndex = 14
- Me.GrBoxSTD.TabStop = False
- Me.GrBoxSTD.Text = "Standard Options"
- '
'GrBoxBATCH
'
Me.GrBoxBATCH.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
@@ -500,9 +491,9 @@ Partial Class F_MAINForm
Me.GrBoxBATCH.Controls.Add(Me.ButBObrowse)
Me.GrBoxBATCH.Controls.Add(Me.CbBOmode)
Me.GrBoxBATCH.Controls.Add(Me.TbBOpath)
- Me.GrBoxBATCH.Location = New System.Drawing.Point(6, 182)
+ Me.GrBoxBATCH.Location = New System.Drawing.Point(6, 224)
Me.GrBoxBATCH.Name = "GrBoxBATCH"
- Me.GrBoxBATCH.Size = New System.Drawing.Size(1106, 158)
+ Me.GrBoxBATCH.Size = New System.Drawing.Size(1106, 116)
Me.GrBoxBATCH.TabIndex = 5
Me.GrBoxBATCH.TabStop = False
Me.GrBoxBATCH.Text = "Batch Options"
@@ -555,10 +546,23 @@ Partial Class F_MAINForm
Me.TbBOpath.Size = New System.Drawing.Size(818, 20)
Me.TbBOpath.TabIndex = 1
'
+ 'GrBoxSTD
+ '
+ Me.GrBoxSTD.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+ Or System.Windows.Forms.AnchorStyles.Left) _
+ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+ Me.GrBoxSTD.Location = New System.Drawing.Point(6, 224)
+ Me.GrBoxSTD.Name = "GrBoxSTD"
+ Me.GrBoxSTD.Size = New System.Drawing.Size(1106, 116)
+ Me.GrBoxSTD.TabIndex = 14
+ Me.GrBoxSTD.TabStop = False
+ Me.GrBoxSTD.Text = "Standard Options"
+ '
'ChBoxAutoSD
'
+ Me.ChBoxAutoSD.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.ChBoxAutoSD.AutoSize = True
- Me.ChBoxAutoSD.Location = New System.Drawing.Point(246, 16)
+ Me.ChBoxAutoSD.Location = New System.Drawing.Point(943, 6)
Me.ChBoxAutoSD.Name = "ChBoxAutoSD"
Me.ChBoxAutoSD.Size = New System.Drawing.Size(169, 17)
Me.ChBoxAutoSD.TabIndex = 13
@@ -567,30 +571,66 @@ Partial Class F_MAINForm
'
'PanelOptAllg
'
- Me.PanelOptAllg.Controls.Add(Me.CbDecl)
- Me.PanelOptAllg.Controls.Add(Me.PnDeclOpt)
Me.PanelOptAllg.Controls.Add(Me.ChBoxModOut)
+ Me.PanelOptAllg.Controls.Add(Me.GroupBox1)
+ Me.PanelOptAllg.Controls.Add(Me.PnDeclOpt)
Me.PanelOptAllg.Location = New System.Drawing.Point(6, 6)
Me.PanelOptAllg.Name = "PanelOptAllg"
- Me.PanelOptAllg.Size = New System.Drawing.Size(220, 170)
+ Me.PanelOptAllg.Size = New System.Drawing.Size(358, 212)
Me.PanelOptAllg.TabIndex = 0
'
- 'CbDecl
+ 'ChBoxModOut
+ '
+ Me.ChBoxModOut.AutoSize = True
+ Me.ChBoxModOut.Checked = True
+ Me.ChBoxModOut.CheckState = System.Windows.Forms.CheckState.Checked
+ Me.ChBoxModOut.Location = New System.Drawing.Point(9, 180)
+ Me.ChBoxModOut.Name = "ChBoxModOut"
+ Me.ChBoxModOut.Size = New System.Drawing.Size(115, 17)
+ Me.ChBoxModOut.TabIndex = 0
+ Me.ChBoxModOut.Text = "Write modal results"
+ Me.ChBoxModOut.UseVisualStyleBackColor = True
'
- Me.CbDecl.AutoSize = True
- Me.CbDecl.Location = New System.Drawing.Point(14, 10)
- Me.CbDecl.Name = "CbDecl"
- Me.CbDecl.Size = New System.Drawing.Size(110, 17)
- Me.CbDecl.TabIndex = 15
- Me.CbDecl.Text = "Declaration Mode"
- Me.CbDecl.UseVisualStyleBackColor = True
+ 'GroupBox1
+ '
+ Me.GroupBox1.Controls.Add(Me.RbDev)
+ Me.GroupBox1.Controls.Add(Me.RbDecl)
+ Me.GroupBox1.Location = New System.Drawing.Point(3, 3)
+ Me.GroupBox1.Name = "GroupBox1"
+ Me.GroupBox1.Size = New System.Drawing.Size(121, 72)
+ Me.GroupBox1.TabIndex = 15
+ Me.GroupBox1.TabStop = False
+ Me.GroupBox1.Text = "Mode"
+ '
+ 'RbDev
+ '
+ Me.RbDev.AutoSize = True
+ Me.RbDev.Checked = True
+ Me.RbDev.Location = New System.Drawing.Point(6, 42)
+ Me.RbDev.Name = "RbDev"
+ Me.RbDev.Size = New System.Drawing.Size(111, 17)
+ Me.RbDev.TabIndex = 1
+ Me.RbDev.TabStop = True
+ Me.RbDev.Text = "Engineering Mode"
+ Me.RbDev.UseVisualStyleBackColor = True
+ '
+ 'RbDecl
+ '
+ Me.RbDecl.AutoSize = True
+ Me.RbDecl.Location = New System.Drawing.Point(6, 19)
+ Me.RbDecl.Name = "RbDecl"
+ Me.RbDecl.Size = New System.Drawing.Size(109, 17)
+ Me.RbDecl.TabIndex = 0
+ Me.RbDecl.TabStop = True
+ Me.RbDecl.Text = "Declaration Mode"
+ Me.RbDecl.UseVisualStyleBackColor = True
'
'PnDeclOpt
'
Me.PnDeclOpt.Controls.Add(Me.CbBatch)
Me.PnDeclOpt.Controls.Add(Me.ChBoxCyclDistCor)
Me.PnDeclOpt.Controls.Add(Me.ChBoxUseGears)
- Me.PnDeclOpt.Location = New System.Drawing.Point(8, 38)
+ Me.PnDeclOpt.Location = New System.Drawing.Point(3, 81)
Me.PnDeclOpt.Name = "PnDeclOpt"
Me.PnDeclOpt.Size = New System.Drawing.Size(202, 93)
Me.PnDeclOpt.TabIndex = 13
@@ -625,18 +665,6 @@ Partial Class F_MAINForm
Me.ChBoxUseGears.Text = "Use gears/rpm's form driving cycle"
Me.ChBoxUseGears.UseVisualStyleBackColor = True
'
- 'ChBoxModOut
- '
- Me.ChBoxModOut.AutoSize = True
- Me.ChBoxModOut.Checked = True
- Me.ChBoxModOut.CheckState = System.Windows.Forms.CheckState.Checked
- Me.ChBoxModOut.Location = New System.Drawing.Point(14, 137)
- Me.ChBoxModOut.Name = "ChBoxModOut"
- Me.ChBoxModOut.Size = New System.Drawing.Size(115, 17)
- Me.ChBoxModOut.TabIndex = 0
- Me.ChBoxModOut.Text = "Write modal results"
- Me.ChBoxModOut.UseVisualStyleBackColor = True
- '
'TabPageDEV
'
Me.TabPageDEV.Controls.Add(Me.LvDEVoptions)
@@ -988,6 +1016,8 @@ Partial Class F_MAINForm
Me.GrBoxBATCH.PerformLayout()
Me.PanelOptAllg.ResumeLayout(False)
Me.PanelOptAllg.PerformLayout()
+ Me.GroupBox1.ResumeLayout(False)
+ Me.GroupBox1.PerformLayout()
Me.PnDeclOpt.ResumeLayout(False)
Me.PnDeclOpt.PerformLayout()
Me.TabPageDEV.ResumeLayout(False)
@@ -1090,9 +1120,11 @@ Partial Class F_MAINForm
Friend WithEvents GrBoxSTD As System.Windows.Forms.GroupBox
Friend WithEvents PnDeclOpt As System.Windows.Forms.Panel
Friend WithEvents LbDecl As System.Windows.Forms.Label
- Friend WithEvents CbDecl As System.Windows.Forms.CheckBox
Friend WithEvents GraphToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents OpenInGraphWindowToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents CbBatch As System.Windows.Forms.CheckBox
+ Friend WithEvents RbDev As System.Windows.Forms.RadioButton
+ Friend WithEvents RbDecl As System.Windows.Forms.RadioButton
+ Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
End Class
diff --git a/VECTO/GUI/F_MAINForm.vb b/VECTO/GUI/F_MAINForm.vb
index 003bbc2dd940267b99b2c9f11c38afeb90c741ee..4e9c4f037ea934ac95fd327be5d123af0cd4a275 100644
--- a/VECTO/GUI/F_MAINForm.vb
+++ b/VECTO/GUI/F_MAINForm.vb
@@ -523,7 +523,7 @@ Public Class F_MAINForm
If Cfg.BatchMode Then
LastModeName = "Batch"
Else
- LastModeName = "Standard"
+ LastModeName = "Engineering"
End If
End If
@@ -652,7 +652,7 @@ Public Class F_MAINForm
#End Region
'Open file - Job, vehicle, engine, gearbox or signature file
- Private Sub OpenVectoFile(ByVal File As String)
+ Public Sub OpenVectoFile(ByVal File As String)
If Not IO.File.Exists(File) Then
@@ -1496,7 +1496,7 @@ lbFound:
If Cfg.DeclMode Then
LastModeName = "Declaration"
Else
- LastModeName = "STANDARD"
+ LastModeName = "Engineering"
End If
'Show mode-specific settings
@@ -1750,7 +1750,7 @@ lbFound:
'Set Mode
If Not Cfg.DeclMode Then Me.CbBatch.Checked = Cfg.BatchMode
- Me.CbDecl.Checked = Cfg.DeclMode
+ Me.RbDecl.Checked = Cfg.DeclMode
End Sub
@@ -2066,25 +2066,26 @@ lbFound:
#End Region
'Change Declaraion Mode
- Private Sub CbDecl_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles CbDecl.CheckedChanged
-
+ Private Sub RbDecl_CheckedChanged(sender As Object, e As System.EventArgs) Handles RbDecl.CheckedChanged
If CbDeclLock Then Exit Sub
If F_VECTO.Visible Or F_VEH.Visible Or F_GBX.Visible Or F_ENG.Visible Then
CbDeclLock = True
- Me.CbDecl.Checked = Not Me.CbDecl.Checked
+ Me.RbDecl.Checked = Not Me.RbDecl.Checked
CbDeclLock = False
MsgBox("Please close all dialog windows (e.g. Job Editor) before changing mode!")
Else
- Cfg.DeclMode = Me.CbDecl.Checked
+ Cfg.DeclMode = Me.RbDecl.Checked
+ Me.RbDev.Checked = Not Me.RbDecl.Checked
DeclOnOff()
End If
-
End Sub
+
+
#Region "GUI Tests"
Private GUItest0 As New GUItest(Me)
@@ -2443,4 +2444,5 @@ Lb1:
#End Region
+
End Class
diff --git a/VECTO/GUI/F_VECTO.vb b/VECTO/GUI/F_VECTO.vb
index 205c0e327d82c22fd1ded3aee44a0aa883e59ab0..e916ef0687cb145b0093837a456645d1f8b19f8b 100644
--- a/VECTO/GUI/F_VECTO.vb
+++ b/VECTO/GUI/F_VECTO.vb
@@ -353,6 +353,20 @@ Public Class F_VECTO
Exit Sub
End Try
+ If Cfg.DeclMode <> VEC0.SavedInDeclMode Then
+ Select Case WrongMode()
+ Case 1
+ Me.Close()
+ F_MAINForm.RbDecl.Checked = Not F_MAINForm.RbDecl.Checked
+ F_MAINForm.OpenVectoFile(file)
+ Case -1
+ Exit Sub
+ Case Else '0
+ 'Continue...
+ End Select
+ End If
+
+
'Update Form
'Files -----------------------------
diff --git a/VECTO/GUI/F_VEH.vb b/VECTO/GUI/F_VEH.vb
index e32ab3beef460b33f6d7dd9cb38a8b382416e9a6..9824a26062b35086c0edf13a675303cd4d4715b4 100644
--- a/VECTO/GUI/F_VEH.vb
+++ b/VECTO/GUI/F_VEH.vb
@@ -318,6 +318,19 @@ Public Class F_VEH
Exit Sub
End If
+ If Cfg.DeclMode <> VEH0.SavedInDeclMode Then
+ Select Case WrongMode()
+ Case 1
+ Me.Close()
+ F_MAINForm.RbDecl.Checked = Not F_MAINForm.RbDecl.Checked
+ F_MAINForm.OpenVectoFile(file)
+ Case -1
+ Exit Sub
+ Case Else '0
+ 'Continue...
+ End Select
+ End If
+
Me.TbMass.Text = VEH0.Mass
Me.TbMassExtra.Text = VEH0.MassExtra
Me.TbLoad.Text = VEH0.Loading
diff --git a/VECTO/GUI/GUI_Subs.vb b/VECTO/GUI/GUI_Subs.vb
index 41b538fda807f3ccaa58e495ffb765f13b12b239..dcb30d15e18bab7089deb72b14e24e2eee10b047 100644
--- a/VECTO/GUI/GUI_Subs.vb
+++ b/VECTO/GUI/GUI_Subs.vb
@@ -234,4 +234,48 @@ Module GUI_Subs
End Function
+ Public Function WrongMode() As Integer
+
+ If Cfg.DeclMode Then
+
+ Select Case MsgBox("This file was created in Engineering Mode! Opening in Declaration Mode will overwrite some parameters with generic values." & vbCrLf & vbCrLf & _
+ "Do you want to switch to Engineering Mode?" & vbCrLf & vbCrLf & _
+ "[Yes] Switch mode and open file" & vbCrLf & _
+ "[No] Open file without changing mode" & vbCrLf & _
+ "[Cancel] Abort opening file" _
+ , MsgBoxStyle.YesNoCancel, "Warning")
+ Case MsgBoxResult.Yes
+ Return 1
+
+ Case (MsgBoxResult.No)
+ Return 0
+
+ Case Else
+ Return -1
+
+ End Select
+
+ Else
+
+ Select Case MsgBox("This file was created in Declaration Mode! For use in Engineering Mode missing parameters must be defined." & vbCrLf & vbCrLf & _
+ "Do you want to switch to Declaration Mode?" & vbCrLf & vbCrLf & _
+ "[Yes] Switch mode and open file" & vbCrLf & _
+ "[No] Open file without changing mode" & vbCrLf & _
+ "[Cancel] Abort opening file" _
+ , MsgBoxStyle.YesNoCancel, "Warning")
+ Case MsgBoxResult.Yes
+ Return 1
+
+ Case (MsgBoxResult.No)
+ Return 0
+
+ Case Else
+ Return -1
+
+ End Select
+
+ End If
+
+ End Function
+
End Module
diff --git a/VECTO/Input Files/cENG.vb b/VECTO/Input Files/cENG.vb
index 77bec8b21a66d323ba13313467f4fc58630f08d5..c7875237d27b25d4445b65fbe6611a933ce6c2ec 100644
--- a/VECTO/Input Files/cENG.vb
+++ b/VECTO/Input Files/cENG.vb
@@ -20,7 +20,7 @@ Public Class cENG
''' Current format version
''' </summary>
''' <remarks></remarks>
- Private Const FormatVersion As Short = 1
+ Private Const FormatVersion As Short = 2
''' <summary>
''' Format version of input file. Defined in ReadFile.
@@ -118,6 +118,9 @@ Public Class cENG
''' <remarks></remarks>
Public Pmax As Single
+ Public SavedInDeclMode As Boolean
+
+
''' <summary>
''' Generates list of all sub input files (e.g. FC map). Sets MyFileList.
''' </summary>
@@ -172,6 +175,7 @@ Public Class cENG
WHTCrural = 0
WHTCmw = 0
+ SavedInDeclMode = False
End Sub
@@ -198,6 +202,9 @@ Public Class cENG
'Body
dic = New Dictionary(Of String, Object)
+ dic.Add("SavedInDeclMode", Cfg.DeclMode)
+ SavedInDeclMode = Cfg.DeclMode
+
dic.Add("ModelName", ModelName)
dic.Add("Displacement", Displ)
@@ -250,6 +257,12 @@ Public Class cENG
FileVersion = JSON.Content("Header")("FileVersion")
+ If FileVersion > 1 Then
+ SavedInDeclMode = JSON.Content("Body")("SavedInDeclMode")
+ Else
+ SavedInDeclMode = Cfg.DeclMode
+ End If
+
ModelName = JSON.Content("Body")("ModelName")
Displ = JSON.Content("Body")("Displacement")
diff --git a/VECTO/Input Files/cGBX.vb b/VECTO/Input Files/cGBX.vb
index c5e55a1b5b394e2195e3554badbeaacd2e056186..0340b33d0a2924adbfef13a40e597c69b56ad7f4 100644
--- a/VECTO/Input Files/cGBX.vb
+++ b/VECTO/Input Files/cGBX.vb
@@ -12,7 +12,7 @@ Imports System.Collections.Generic
Public Class cGBX
- Private Const FormatVersion As Short = 3
+ Private Const FormatVersion As Short = 4
Private FileVersion As Short
Private MyPath As String
@@ -70,6 +70,7 @@ Public Class cGBX
Private MyFileList As List(Of String)
+ Public SavedInDeclMode As Boolean
Public Function CreateFileList() As Boolean
@@ -136,6 +137,8 @@ Public Class cGBX
TCinertia = 0
+ SavedInDeclMode = False
+
End Sub
Public Function SaveFile() As Boolean
@@ -156,6 +159,9 @@ Public Class cGBX
'Body
dic = New Dictionary(Of String, Object)
+ dic.Add("SavedInDeclMode", Cfg.DeclMode)
+ SavedInDeclMode = Cfg.DeclMode
+
dic.Add("ModelName", ModelName)
dic.Add("Inertia", GbxInertia)
@@ -219,6 +225,12 @@ Public Class cGBX
FileVersion = JSON.Content("Header")("FileVersion")
+ If FileVersion > 3 Then
+ SavedInDeclMode = JSON.Content("Body")("SavedInDeclMode")
+ Else
+ SavedInDeclMode = Cfg.DeclMode
+ End If
+
ModelName = JSON.Content("Body")("ModelName")
GbxInertia = JSON.Content("Body")("Inertia")
TracIntrSi = JSON.Content("Body")("TracInt")
diff --git a/VECTO/Input Files/cVECTO.vb b/VECTO/Input Files/cVECTO.vb
index 859b4a590d4578dd03e94c19cd86b0e19d715515..f34ba3b0249152af9044124fd37f344c37b7c99f 100644
--- a/VECTO/Input Files/cVECTO.vb
+++ b/VECTO/Input Files/cVECTO.vb
@@ -13,7 +13,7 @@ Imports System.Collections.Generic
Public Class cVECTO
- Private Const FormatVersion As Short = 1
+ Private Const FormatVersion As Short = 2
Private FileVersion As Short
Private sFilePath As String
@@ -56,6 +56,8 @@ Public Class cVECTO
Private MyFileList As List(Of String)
+ Public SavedInDeclMode As Boolean
+
Public Class cAuxEntry
Public Type As String
@@ -172,6 +174,9 @@ Public Class cVECTO
'Body
dic0 = New Dictionary(Of String, Object)
+ dic0.Add("SavedInDeclMode", Cfg.DeclMode)
+ SavedInDeclMode = Cfg.DeclMode
+
'Main Files
dic0.Add("VehicleFile", stPathVEH.PathOrDummy)
dic0.Add("EngineFile", stPathENG.PathOrDummy)
@@ -266,6 +271,12 @@ Public Class cVECTO
FileVersion = JSON.Content("Header")("FileVersion")
+ If FileVersion > 1 Then
+ SavedInDeclMode = JSON.Content("Body")("SavedInDeclMode")
+ Else
+ SavedInDeclMode = Cfg.DeclMode
+ End If
+
If Not JSON.Content("Body")("VehicleFile") Is Nothing Then stPathVEH.Init(MyPath, JSON.Content("Body")("VehicleFile"))
stPathENG.Init(MyPath, JSON.Content("Body")("EngineFile"))
@@ -411,6 +422,8 @@ Public Class cVECTO
UnderSpeed = 0
vMinLA = 0
+ SavedInDeclMode = False
+
End Sub
Public Function DeclInit() As Boolean
diff --git a/VECTO/Input Files/cVEH.vb b/VECTO/Input Files/cVEH.vb
index 0c434b9ebe9063b8e152e3d2f4e8ec010554840e..9d4c046eb6486df1e8ba02afdfa22508b104ddc7 100644
--- a/VECTO/Input Files/cVEH.vb
+++ b/VECTO/Input Files/cVEH.vb
@@ -13,7 +13,7 @@ Imports System.Collections.Generic
Public Class cVEH
'V2 MassMax is now saved in [t] instead of [kg]
- Private Const FormatVersion As Short = 4
+ Private Const FormatVersion As Short = 5
Private FileVersion As Short
Private sFilePath As String
@@ -57,6 +57,9 @@ Public Class cVEH
Private MyFileList As List(Of String)
+ Public SavedInDeclMode As Boolean
+
+
Public Class cAxle
Public RRC As Single
Public Share As Single
@@ -127,6 +130,8 @@ Public Class cVEH
MassMax = 0
AxleConf = tAxleConf.Undef
+ SavedInDeclMode = False
+
End Sub
Public Function ReadFile(Optional ByVal ShowMsg As Boolean = True) As Boolean
@@ -148,6 +153,13 @@ Public Class cVEH
FileVersion = JSON.Content("Header")("FileVersion")
+ If FileVersion > 4 Then
+ SavedInDeclMode = JSON.Content("Body")("SavedInDeclMode")
+ Else
+ SavedInDeclMode = Cfg.DeclMode
+ End If
+
+
Mass = JSON.Content("Body")("CurbWeight")
MassExtra = JSON.Content("Body")("CurbWeightExtra")
Loading = JSON.Content("Body")("Loading")
@@ -256,6 +268,9 @@ Public Class cVEH
'Body
dic = New Dictionary(Of String, Object)
+ dic.Add("SavedInDeclMode", Cfg.DeclMode)
+ SavedInDeclMode = Cfg.DeclMode
+
dic.Add("VehCat", ConvVehCat(VehCat, False))
dic.Add("CurbWeight", Mass)
diff --git a/VECTO/M_MAIN.vb b/VECTO/M_MAIN.vb
index 81b74ae0083b183fb9a813e1e6314822c03806c8..4f692f3cc77ee61ec61d8ef2826f0a5939a93f73 100644
--- a/VECTO/M_MAIN.vb
+++ b/VECTO/M_MAIN.vb
@@ -20,7 +20,6 @@ Module M_MAIN
Public JobCycleList As List(Of String)
Public JobFile As String
- Public GenFile As String
Public CycleFiles As New List(Of String)
Public CurrentCycleFile As String
@@ -157,8 +156,6 @@ lbSkip0:
JobFile = fFileRepl(JobFileList(iJob))
- GenFile = JobFile
-
WorkerMsg(tMsgID.NewJob, "Job: " & (iJob * (CyclesDim + 1) + iCycle + 1) & " / " & ((FilesDim + 1) * (CyclesDim + 1)) & " | " & fFILE(JobFile, True), MsgSrc)
WorkerStatus("Current Job: " & (iJob * (CyclesDim + 1) + iCycle + 1) & " / " & ((FilesDim + 1) * (CyclesDim + 1)) & " | " & fFILE(JobFile, True))
WorkerJobStatus(iJob, "initialising... ", tJobStatus.Running)
@@ -508,7 +505,7 @@ lbAusg:
End If
'VSUM Output (first Calculation - Initialization & Header)
- If Not VSUM.WriteVSUM(iJob * (CyclesDim + 1) + iCycle + 1, fFILE(GenFile, True), fFILE(CurrentCycleFile, True), CyclAbrtedByErr) Then GoTo lbErrInJobLoop
+ If Not VSUM.WriteVSUM(iJob * (CyclesDim + 1) + iCycle + 1, fFILE(JobFile, True), fFILE(CurrentCycleFile, True), CyclAbrtedByErr) Then GoTo lbErrInJobLoop
'Data Cleanup
MODdata.CleanUp()
@@ -549,9 +546,9 @@ lbNextJob:
If JobAbortedByErr Then
If CInt(iJob * (CyclesDim + 1) + 1) = CInt((iJob + 1) * (CyclesDim + 1)) Then
- VSUM.WriteVSUM(((iJob + 1) * (CyclesDim + 1)).ToString, fFILE(GenFile, True), "-", True)
+ VSUM.WriteVSUM(((iJob + 1) * (CyclesDim + 1)).ToString, fFILE(JobFile, True), "-", True)
Else
- VSUM.WriteVSUM((iJob * (CyclesDim + 1) + 1).ToString & ".." & ((iJob + 1) * (CyclesDim + 1)).ToString, fFILE(GenFile, True), "-", True)
+ VSUM.WriteVSUM((iJob * (CyclesDim + 1) + 1).ToString & ".." & ((iJob + 1) * (CyclesDim + 1)).ToString, fFILE(JobFile, True), "-", True)
End If
End If
@@ -675,32 +672,42 @@ lbExit:
Public Function ReadFiles() As Boolean
Dim sb As cSubPath
+ Dim OtherModeString As String
Dim MsgSrc As String
MsgSrc = "Main/ReadInp"
- '----------------------------- ~GEN~ -----------------------------
- 'Read GEN
- If UCase(fEXT(GenFile)) <> ".VECTO" Then
+ If Cfg.DeclMode Then
+ OtherModeString = "Engineering"
+ Else
+ OtherModeString = "Declaration"
+ End If
+
+ '----------------------------- ~VECTO~ -----------------------------
+ 'Read Job file
+ If UCase(fEXT(JobFile)) <> ".VECTO" Then
WorkerMsg(tMsgID.Err, "Only .VECTO files are supported in this mode", MsgSrc)
Return False
End If
VEC = New cVECTO
- VEC.FilePath = GenFile
+ VEC.FilePath = JobFile
Try
If Not VEC.ReadFile() Then
- WorkerMsg(tMsgID.Err, "Cannot read .vecto file (" & GenFile & ")", MsgSrc)
+ WorkerMsg(tMsgID.Err, "Cannot read .vecto file (" & JobFile & ")", MsgSrc)
Return False
End If
Catch ex As Exception
- WorkerMsg(tMsgID.Err, "File read error! (" & GenFile & ")", MsgSrc, GenFile)
+ WorkerMsg(tMsgID.Err, "File read error! (" & JobFile & ")", MsgSrc, JobFile)
Return False
End Try
+ 'Check if file was saved in different mode
+ If Cfg.DeclMode <> VEC.SavedInDeclMode Then WorkerMsg(tMsgID.Warn, "Job file was created in " & OtherModeString & " Mode! Some parameters might be missing and cause errors.", MsgSrc, "<GUI>" & JobFile)
+
'----------------------------- ~VEH~ -----------------------------
VEH = New cVEH
@@ -715,8 +722,12 @@ lbExit:
Return False
End Try
+ 'Check if file was saved in different mode
+ If Cfg.DeclMode <> VEH.SavedInDeclMode Then WorkerMsg(tMsgID.Warn, "Vehicle file was created in " & OtherModeString & " Mode! Some parameters might be missing and cause errors.", MsgSrc, "<GUI>" & VEC.PathVEH)
+
End If
+
If Cfg.DeclMode Then
If Not Declaration.SetRef() Then
WorkerMsg(tMsgID.Err, "Vehicle Configuration not found in Segment Table!", MsgSrc)
@@ -750,6 +761,10 @@ lbExit:
Return False
End Try
+ 'Check if file was saved in different mode
+ If Cfg.DeclMode <> ENG.SavedInDeclMode Then WorkerMsg(tMsgID.Warn, "Engine file was created in " & OtherModeString & " Mode! Some parameters might be missing and cause errors.", MsgSrc, "<GUI>" & VEC.PathENG)
+
+
'----------------------------- ~GBX~ -----------------------------
GBX = New cGBX
@@ -764,6 +779,9 @@ lbExit:
Return False
End Try
+ 'Check if file was saved in different mode
+ If Cfg.DeclMode <> GBX.SavedInDeclMode Then WorkerMsg(tMsgID.Warn, "Gearbox file was created in " & OtherModeString & " Mode! Some parameters might be missing and cause errors.", MsgSrc, "<GUI>" & VEC.PathGBX)
+
End If
'Must be called after cGBX.ReadFile because cGBX.GearCount is needed
diff --git a/VECTO/cConfig.vb b/VECTO/cConfig.vb
index cb4c4f3e0252f3a10142775f25aadb49a8aac946..202ea795fb4dd0b64c644680048ab6054a15f734 100644
--- a/VECTO/cConfig.vb
+++ b/VECTO/cConfig.vb
@@ -20,7 +20,7 @@ Public Class cConfig
Public GnUfromCycle As Boolean
Public BatchMode As Boolean
Public ModOut As Boolean
- Public BATCHoutpath As String 'Ausgabepfad für BATCH-Modus: <WORKDIR>, <GENPATH> oder Pfad
+ Public BATCHoutpath As String 'Output path for BATCH Mode
Public BATCHoutSubD As Boolean
Public DistCorr As Boolean
Public LogSize As Single
diff --git a/VECTO/cVSUM.vb b/VECTO/cVSUM.vb
index 64c6621a0a55d81f7565cd1d50759b8f4f1ae552..bc45fb3f5c3a7534a237a4456c31e265c5f598be 100644
--- a/VECTO/cVSUM.vb
+++ b/VECTO/cVSUM.vb
@@ -342,7 +342,7 @@ Class cVSUM
If Cfg.DeclMode Then
- dic.Add("Cycle", Declaration.CurrentMission.NameStr)
+ If Not Declaration.CurrentMission Is Nothing Then dic.Add("Cycle", Declaration.CurrentMission.NameStr)
dic.Add("Loading", ConvLoading(Declaration.CurrentLoading))
Else
dic.Add("Cycle", CycleFilename)