diff --git a/CombinedAlts/Form1.vb b/CombinedAlts/Form1.vb
deleted file mode 100644
index 417db889a3323a93e1e4cf8e5aa40f0ddbc258bb..0000000000000000000000000000000000000000
--- a/CombinedAlts/Form1.vb
+++ /dev/null
@@ -1,250 +0,0 @@
-
-imports System
-imports System.Collections.Generic
-imports System.Linq
-imports System.Text
-imports System.IO
-imports DocumentFormat.OpenXml
-imports DocumentFormat.OpenXml.Spreadsheet
-imports SpreadsheetLight
-
-Public Class Form1
-
-Private powerCalculationSheetName = "Power Calculation"
-Private combinedAlternatorETAMAPSheetName = "Combined Alternator ETA Map"
-Private alt1SheetName  = "Alt 1"
-Private aLt2SheetName  = "Alt 2"
-Private alt3SheetName  = "Alt 3"
-Private aLt4SheetName  = "Alt 4"
-
-
-private combinedSheet As  SLDocument
-Private powerCalculation As SLDocument
-Private Alt1 As SLDocument
-Private ALt2 As SLDocument
-Private Alt3 As SLDocument
-Private ALt4 As SLDocument
-
-Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
-
-
-ABC("c:\alt.xlsx")
-
-End Sub
-
-
-public sub calculate()
-
-
-
-End Sub
-
-
-Public  Sub ABC(excelPath As string)
-
-Dim fs As   FileStream
-Dim msFirstPass As  MemoryStream
-Dim combinedSheet As  SLDocument
-
-'run calculation
-
-
-
-Try
-
-  fs = New FileStream(excelPath, FileMode.Open) 
-
- ' msFirstPass = New MemoryStream()
-  combinedSheet = New SLDocument(excelPath,  combinedAlternatorETAMAPSheetName)
-  powerCalculation = New SLDocument(excelPath, powerCalculationSheetName)
-  Alt1 = New SLDocument(excelPath, alt1SheetName)
-  Alt2 = New SLDocument(excelPath, alt2SheetName)
-  Alt3 = New SLDocument(excelPath, alt3SheetName)
-  Alt4 = New SLDocument(excelPath, alt4SheetName)
-
-  ValuesAlt1()
-
-
-  'Invoke Macro
-  ValuesAlt1()
-  fs.Close
-
-  'Alt1.SaveAs(excelPath)
-
-  'Dim cell1  = combinedSheet.GetCells( New SLCellPoint(4,11))
-
-  'debug.WriteLine(String.Format("Values are {0}",cell1.NumericValue))
-
-Catch ex As Exception
-
-  Console.WriteLine( ex.Message)
-
-Finally
-
- 
-
-End Try
-
-
-
-End Sub
-
-Sub ValuesAlt1()
-
-'This macro builds the base for the calculation of the "Output Matrix" in sheet "Power Calculation". Therefore it collects the values
-'out of the user inteface in sheet "Power Calculation" (Input Alt 1) and writes it into the table P4:U19 in sheet "Alt 1". This program
-'checks out if the values are increasing or decreasing and splits it into these two cases.
-
-'If there are changes in row or column number in sheet "Power Calculation", following steps will have to be made:
-'Change in Row number:
-'1. Change the start value of a (line 25, 70, 113) into the row number of the first amps in the "Input Altenator" table.
-'2. Change the start value of the Loop Counter i (line 29, 73, 116) into the same value as a
-'3. Change the end value of the Loop Counter i (line 29, 73, 116) into its start value plus 6
-'4. Change value of a in the If-query (line 46, 89, 132 and line 55, 97, 141) into the end value of (3.) plus 1
-'5. Change the end value of the Loop Counter j (line 47, 90, 133) into the end value of (3.) plus 1
-'Change in column:
-'1. Change the number (not the letter) in all commands similar to 'Sheets("Power Calculation").'.
-'   ATTENTION: different numbers for different rpm
-
-
-
-    Dim i, j, k, l, m, n, a         'Definition of the used variables
-    
-'Calculation for 2000 rpm
-    j = 5       'Start-values
-    k = 0
-    a = 39
-    n = 1
-        
-    'Increasing values
-    For i = 39 To 45     'Loop over the rows 5 to 11 in sheet "Power Calculation"
-        If powerCalculation.GetCells(New SLCellPoint(i, 2)).NumericValue <> 0 Then 'Query whether column B, row i in sheet "Power Calculation" contains a value
-            If powerCalculation.GetCells(New SLCellPoint(i, 2)).NumericValue > k Then           'Query if the value of row i is greater than the value of row i-1
-                alt1.SetCellValue(j, 17,powerCalculation.GetCells(New SLCellPoint(i, 2)).NumericValue)        'Write the value of row i into the table P4:U19 row j in sheet "Alt 1"
-                j = j + 1           'Counter for row j in table P4:U19 (sheet "Alt 1")
-                k = powerCalculation.GetCells(New SLCellPoint(i, 2) ).NumericValue         'Compare value for the next iteration cycle
-            Else: a = j - 1 + a - 5    'Saving row-number with the greatest value of degree of efficiency
-            End If
-        Else
-            For l = j To 11         'Loop to fill empty cells in Q6 to Q8 with the existing values
-                alt1.SetCellValue(l, 17,Alt1.GetCells(New SLCellPoint(l - j + 5, 17)).NumericValue)
-            Next
-            alt1.SetCellValue(13, 17, k  )     'Write last value in the first row of the decreasing valus
-        End If
-    Next
-    
-    'Decreasing values
-    If a < 46 Then          'Query: if a>=11: no decreasing values exist
-        For j = a To 46
-            If powerCalculation.GetCells(New SLCellPoint(j + 1, 2)).NumericValue < k And powerCalculation.GetCells(New SLCellPoint(j + 1, 2)).NumericValue <> 0 Then
-                alt1.SetCellValue(13 + n, 17, powerCalculation.GetCells(New SLCellPoint(j + 1, 2)).NumericValue) 'Write decreasing values into row 13+n
-                k = powerCalculation.GetCells(New SLCellPoint(j + 1, 2)).NumericValue      'Compare value for the next iteration cycle
-                n = n + 1           'Counter for row number
-                a = a + 1           'Counter
-            End If
-        Next
-        If a < 46 Then
-            For m = 13 + n To 19            'Loop to fill empty cells in Q13 to Q19 with the existing values
-                alt1.SetCellValue(m, 17,Alt1.GetCells(New SLCellPoint(m - n, 17)).NumericValue)
-            Next
-        End If
-    Else
-        For m = 13 To 19
-             alt1.SetCellValue(m, 17, 0 )    'If decreasing values do not exist, fill Q13 to Q19 (sheet "Alt 1") with 0
-        Next
-    End If
-    
-
-'Calculation for 4000 rpm
-    j = 5
-    k = 0
-    a = 39
-    n = 1
-    
-    For i = 39 To 45
-        If powerCalculation.GetCells(New SLCellPoint(i, 3)).NumericValue <> 0 Then
-            If powerCalculation.GetCells(New SLCellPoint(i, 3)).NumericValue > k Then
-                alt1.SetCellValue(j, 19, powerCalculation.GetCells(New SLCellPoint(i, 3)).NumericValue)
-                j = j + 1
-                k = powerCalculation.GetCells(New SLCellPoint(i, 3)).NumericValue
-            Else: a = j - 1 + a - 5
-            End If
-        Else
-            For l = j To 11
-                alt1.SetCellValue(l, 19,  alt1.GetCells( New SLCellPoint(l - j + 5, 19)).NumericValue)
-            Next
-             alt1.SetCellValue(13, 19, k)
-        End If
-    Next
-        
-    If a < 46 Then
-        For j = a To 46
-            If powerCalculation.GetCells(New SLCellPoint(j + 1, 3)).NumericValue < k And powerCalculation.GetCells(New SLCellPoint(j + 1, 3)).NumericValue <> 0 Then
-                alt1.SetCellValue(13 + n, 19, powerCalculation.GetCells(New SLCellPoint(j + 1, 3)).NumericValue)
-                k = powerCalculation.GetCells(New SLCellPoint(j + 1, 3)).NumericValue
-                n = n + 1
-                a = a + 1
-            End If
-        Next
-        If a < 46 Then
-            For m = 13 + n To 19
-                alt1.SetCellValue(m, 19,  alt1.GetCells( New SLCellPoint(m - n, 19)).NumericValue)
-            Next
-        End If
-    Else
-        For m = 13 To 19
-            alt1.SetCellValue(m, 19, 0)
-        Next
-    End If
-    
-    
-'Calculation for 6000 rpm
-    j = 5
-    k = 0
-    a = 39
-    n = 1
-
-    For i = 39 To 45
-        If powerCalculation.GetCells(New SLCellPoint(i, 4)).NumericValue <> 0 Then
-            If powerCalculation.GetCells(New SLCellPoint(i, 4)).NumericValue > k Then
-                alt1.SetCellValue(j, 21,  powerCalculation.GetCells(New SLCellPoint(i, 4)).NumericValue)
-                j = j + 1
-                k = powerCalculation.GetCells(New SLCellPoint(i, 4)).NumericValue
-            Else: a = j - 1 + a - 5
-            End If
-        Else
-            For l = j To 11
-                alt1.SetCellValue(l, 21,  alt1.GetCells( New SLCellPoint(l - j + 5, 21)).NumericValue)
-            Next
-            alt1.SetCellValue(13, 21, k )
-        End If
-    Next
-    
-    If a < 46 Then
-        For j = a To 46
-            If powerCalculation.GetCells(New SLCellPoint(j + 1, 4)).NumericValue < k And powerCalculation.GetCells(New SLCellPoint(j + 1, 4)).NumericValue <> 0 Then
-                alt1.SetCellValue(13 + n, 21, powerCalculation.GetCells(New SLCellPoint(j + 1, 4)).NumericValue)
-                k = powerCalculation.GetCells(New SLCellPoint(j + 1, 4)).NumericValue
-                n = n + 1
-                a = a + 1
-            End If
-        Next
-        If a < 46 Then
-            For m = 13 + n To 19
-                alt1.SetCellValue(m, 21, alt1.GetCells( New SLCellPoint(m - n, 21)).NumericValue)
-            Next
-        End If
-    Else
-        For m = 13 To 19
-            alt1.SetCellValue(m, 21, 0)
-        Next
-    End If
-    
-    
-End Sub
-
-
-
-
-
-End Class
diff --git a/CombinedAlts/MAIN.vb b/CombinedAlts/MAIN.vb
new file mode 100644
index 0000000000000000000000000000000000000000..560ba73d67ce5aa4cf9517ab016b867f8bd077cf
--- /dev/null
+++ b/CombinedAlts/MAIN.vb
@@ -0,0 +1,12 @@
+Module MAIN
+
+
+Public  Sub Main()
+
+
+
+End Sub
+
+
+
+End Module
diff --git a/CombinedAlts/My Project/Application.Designer.vb b/CombinedAlts/My Project/Application.Designer.vb
index ab45ff784bae475a68ecfa7f1f9005c591427985..98eea6a30a354b5fc3ed332bc48a7fa6d29311dd 100644
--- a/CombinedAlts/My Project/Application.Designer.vb	
+++ b/CombinedAlts/My Project/Application.Designer.vb	
@@ -32,7 +32,7 @@ Namespace My
         
         <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
         Protected Overrides Sub OnCreateMainForm()
-            Me.MainForm = Global.VectoAuxiliaries.Form1
+            Me.MainForm = Global.VectoAuxiliaries
         End Sub
     End Class
 End Namespace
diff --git a/CombinedAlts/CombinedAlts.vbproj b/CombinedAlts/SSMTOOL.vbproj
similarity index 92%
rename from CombinedAlts/CombinedAlts.vbproj
rename to CombinedAlts/SSMTOOL.vbproj
index 84a86db0b8409c454fcc3107d15ed8989cad61c8..55c59d5b0fcfc41f27b8bf5597a11ce89b945012 100644
--- a/CombinedAlts/CombinedAlts.vbproj
+++ b/CombinedAlts/SSMTOOL.vbproj
@@ -8,7 +8,7 @@
     <OutputType>WinExe</OutputType>
     <StartupObject>VectoAuxiliaries.My.MyApplication</StartupObject>
     <RootNamespace>VectoAuxiliaries</RootNamespace>
-    <AssemblyName>CombinedAlts</AssemblyName>
+    <AssemblyName>SSMTOOL</AssemblyName>
     <FileAlignment>512</FileAlignment>
     <MyType>WindowsForms</MyType>
     <TargetFrameworkVersion>v4.0</TargetFrameworkVersion>
@@ -24,7 +24,7 @@
     <DefineDebug>true</DefineDebug>
     <DefineTrace>true</DefineTrace>
     <OutputPath>bin\Debug\</OutputPath>
-    <DocumentationFile>CombinedAlts.xml</DocumentationFile>
+    <DocumentationFile>SSMTOOL.xml</DocumentationFile>
     <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
   </PropertyGroup>
   <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
@@ -34,7 +34,7 @@
     <DefineTrace>true</DefineTrace>
     <Optimize>true</Optimize>
     <OutputPath>bin\Release\</OutputPath>
-    <DocumentationFile>CombinedAlts.xml</DocumentationFile>
+    <DocumentationFile>SSMTOOL.xml</DocumentationFile>
     <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
   </PropertyGroup>
   <PropertyGroup>
@@ -81,12 +81,7 @@
     <Import Include="System.Xml.Linq" />
   </ItemGroup>
   <ItemGroup>
-    <Compile Include="Form1.Designer.vb">
-      <DependentUpon>Form1.vb</DependentUpon>
-    </Compile>
-    <Compile Include="Form1.vb">
-      <SubType>Form</SubType>
-    </Compile>
+    <Compile Include="MAIN.vb" />
     <Compile Include="My Project\AssemblyInfo.vb" />
     <Compile Include="My Project\Application.Designer.vb">
       <AutoGen>True</AutoGen>
@@ -104,9 +99,6 @@
     </Compile>
   </ItemGroup>
   <ItemGroup>
-    <EmbeddedResource Include="Form1.resx">
-      <DependentUpon>Form1.vb</DependentUpon>
-    </EmbeddedResource>
     <EmbeddedResource Include="My Project\Resources.resx">
       <Generator>VbMyResourcesResXFileCodeGenerator</Generator>
       <LastGenOutput>Resources.Designer.vb</LastGenOutput>
diff --git a/HVACTOOL/BusDatabase.csv b/HVACTOOL/BusDatabase.csv
new file mode 100644
index 0000000000000000000000000000000000000000..99fd6fd87231ae7921d9ba935f71ca37206cbebe
--- /dev/null
+++ b/HVACTOOL/BusDatabase.csv
@@ -0,0 +1,159 @@
+Bus Model,Type,engine Type,length in m,wide in m,height in m,registered passengers
+IVECO - Arway Intercity 10.6m,raised floor,diesel,10.655,2.55,2.275,47
+IVECO - Arway Intercity 12.8m,raised floor,diesel,12.756,2.55,2.275,59
+IVECO - Arway Intercity 12m,raised floor,diesel,11.991,2.55,2.275,55
+IVECO - Bus GX 127,low floor,diesel,9.495,2.33,2.395,60
+IVECO - Citelis 10.5m,low floor,diesel,10.46,2.5,2.344,91
+IVECO - Citelis 10.5m CNG,low floor,gas,10.46,2.5,2.344,91
+IVECO - Citelis 12m,low floor,diesel,11.99,2.5,2.344,97
+IVECO - Citelis 12m CNG,low floor,gas,11.99,2.5,2.344,89
+IVECO - Citelis 12m Hybrid,low floor,hybrid,11.99,2.5,2.344,83
+IVECO - Citelis 18m  ,low floor,diesel,17.9,2.5,2.344,155
+IVECO - Citelis 18m CNG,low floor,gas,17.9,2.5,2.344,149
+IVECO - Citelis 18m Hybrid,low floor,hybrid,17.9,2.5,2.344,140
+IVECO - Crossway Intercity 10.6m,raised floor,diesel,10.655,2.55,2.275,47
+IVECO - Crossway Intercity 12.8m,raised floor,diesel,12.76,2.55,2.275,59
+IVECO - Crossway Intercity 12m,raised floor,diesel,11.995,2.55,2.275,55
+IVECO - Crossway LE City 10.8m,semi low floor,diesel,10.79,2.55,2.3,90
+IVECO - Crossway LE City 12.8m,semi low floor,diesel,12.76,2.55,2.3,105
+IVECO - Crossway LE City 12m,semi low floor,diesel,11.995,2.55,2.3,108
+IVECO - Crossway LE Intercity 10.8m,semi low floor,diesel,10.79,2.55,2.3,76
+IVECO - Crossway LE Intercity 12.8m,semi low floor,diesel,12.76,2.55,2.3,91
+IVECO - Crossway LE Intercity 12m,semi low floor,diesel,11.995,2.55,2.3,89
+IVECO - Evasys HD 12.8m,raised floor,diesel,12.76,2.55,2.036,59
+IVECO - Evasys HD 12m,raised floor,diesel,11.995,2.55,2.036,55
+IVECO - Magelys HD 12.2m,raised floor,diesel,12.2,2.55,2.1,48
+IVECO - Magelys HD 12.8m,raised floor,diesel,12.765,2.55,2.1,52
+IVECO - Magelys HDH 13.8m,raised floor,diesel,13.8,2.55,2.1,61
+IVECO - Magelys Pro 12.2m,raised floor,diesel,12.2,2.55,2.1,53
+IVECO - Magelys Pro 12.8m,raised floor,diesel,12.765,2.55,2.1,57
+MAN - Lion's City,low floor,diesel,11.98,2.5,2.3,95
+MAN - Lion's City C ,low floor,diesel,13.68,2.5,2.3,98
+MAN - Lion's City C CNG,low floor,gas,13.68,2.5,2.3,98
+MAN - Lion's City CNG,low floor,gas,11.98,2.5,2.3,95
+MAN - Lion's City G,low floor,diesel,17.98,2.5,2.3,150
+MAN - Lion's City G CNG,low floor,gas,17.98,2.5,2.3,144
+MAN - Lion's City GL,low floor,diesel,18.75,2.5,2.3,165
+MAN - Lion's City GL CNG,low floor,gas,18.75,2.5,2.3,158
+MAN - Lion's City L,low floor,diesel,14.705,2.5,2.3,120
+MAN - Lion's City L CNG,low floor,gas,14.705,2.5,2.3,114
+MAN - Lion's City LE,low floor,diesel,11.857,2.55,2.3,36
+MAN - Lion's City LE Ü,low floor,diesel,11.857,2.55,2.3,40
+MAN - Lion's City Ü,low floor,diesel,11.98,2.5,2.3,95
+MAN - Lion's City Ü CNG,low floor,gas,11.98,2.5,2.3,95
+MAN - Lion's Coach,raised floor,diesel,12,2.55,2.1,49
+MAN - Lion's Coach C,raised floor,diesel,13.26,2.55,2.1,55
+MAN - Lion's Coach L,raised floor,diesel,13.8,2.55,2.1,57
+MAN - Lion's Regio,raised floor,diesel,12.25,2.55,2.2,56
+MAN - Lion's Regio C,raised floor,diesel,13.01,2.55,2.2,60
+MAN - Lion's Regio L,raised floor,diesel,13.9,2.55,2.2,64
+Mercedes-Benz - Citaro,low floor,diesel,11.95,2.55,2.313,106
+Mercedes-Benz - Citaro CNG,low floor,gas,11.95,2.55,2.313,98
+Mercedes-Benz - Citaro D,low floor,diesel,12.105,2.55,2.313,106
+Mercedes-Benz - Citaro G,low floor,diesel,17.94,2.55,2.313,159
+Mercedes-Benz - Citaro G CNG,low floor,gas,17.94,2.55,2.313,153
+Mercedes-Benz - Citaro GÜ,semi low floor,diesel,17.94,2.55,2.313,130
+Mercedes-Benz - Citaro K,low floor,diesel,10.503,2.55,2.313,87
+Mercedes-Benz - Citaro LE,low floor,diesel,12.04,2.55,2.318,101
+Mercedes-Benz - Citaro LE MÜ,low floor,diesel,13.057,2.55,2.318,83
+Mercedes-Benz - Citaro LE Ü,low floor,diesel,12.04,2.55,2.318,83
+Mercedes-Benz - Citaro LÜ,semi low floor,diesel,14.995,2.55,2.313,110
+Mercedes-Benz - Citaro MÜ,semi low floor,diesel,13.008,2.55,2.313,89
+Mercedes-Benz - Citaro Ü,semi low floor,diesel,11.95,2.55,2.313,83
+Mercedes-Benz - Integro,raised floor,diesel,12.14,2.55,2.17,53
+Mercedes-Benz - Integro L,raised floor,diesel,14.92,2.55,2.17,69
+Mercedes-Benz - Integro M,raised floor,diesel,12.98,2.55,2.17,57
+Mercedes-Benz - Tourino,raised floor,diesel,9.35,2.4,2,34
+Mercedes-Benz - Tourismo,raised floor,diesel,12.14,2.55,2.01,51
+Mercedes-Benz - Tourismo L,raised floor,diesel,13.99,2.55,2.01,59
+Mercedes-Benz - Tourismo M,raised floor,diesel,12.96,2.55,2.01,55
+Mercedes-Benz - Tourismo M/2,raised floor,diesel,12.96,2.55,2.01,55
+Mercedes-Benz - Travego,raised floor,diesel,12.18,2.55,2.1,51
+Mercedes-Benz - Travego L,raised floor,diesel,14.03,2.55,2.1,59
+Mercedes-Benz - Travego M,raised floor,diesel,13,2.55,2.1,55
+Neoplan - Cityliner,raised floor,diesel,12.24,2.55,2.066,49
+Neoplan - Cityliner C 13m,raised floor,diesel,12.99,2.55,2.066,53
+Neoplan - Cityliner C 14m,raised floor,diesel,13.99,2.55,2.066,53
+Neoplan - Cityliner L,raised floor,diesel,12.99,2.55,2.066,57
+Neoplan - Starliner C,raised floor,diesel,12.99,2.55,2.005,53
+Neoplan - Starliner L,raised floor,diesel,13.99,2.55,2.005,57
+Neoplan - Tourliner,raised floor,diesel,12,2.55,2.153,49
+Neoplan - Tourliner C,raised floor,diesel,13.26,2.55,2.153,57
+Neoplan - Tourliner L,raised floor,diesel,13.8,2.55,2.153,57
+Scania - Irizar Century 12.9m,raised floor,diesel,12.85,2.55,2.1,57
+Scania - Irizar Century 12m,raised floor,diesel,12,2.55,2.1,53
+Scania - Irizar Century 13.8m,raised floor,diesel,13.72,2.55,2.1,61
+Scania - Irizar Century 15m,raised floor,diesel,15,2.55,2.1,65
+Scania - Irizar i4 10.7m,raised floor,diesel,10.7,2.55,2.1,47
+Scania - Irizar i4 11.48m,raised floor,diesel,11.48,2.55,2.1,51
+Scania - Irizar i4 12.2m,raised floor,diesel,12.2,2.55,2.1,55
+Scania - Irizar i4 12.9m,raised floor,diesel,12.9,2.55,2.1,53
+Scania - Irizar i4 13.64m,raised floor,diesel,13.64,2.55,2.1,63
+Scania - Irizar i4 14.36m,raised floor,diesel,14.36,2.55,2.1,67
+Scania - Irizar i4 15m,raised floor,diesel,15,2.55,2.1,71
+Scania - Irizar PB 12.9m,raised floor,diesel,12.92,2.55,2.1,53
+Scania - Irizar PB 12m,raised floor,diesel,12,2.55,2.1,49
+Scania - Irizar PB 13.9m,raised floor,diesel,13.87,2.55,2.1,57
+Scania - Irizar PB 15m,raised floor,diesel,14.98,2.55,2.1,61
+Scania - Omnicity 12m,low floor,diesel,12,2.55,2.3,106
+Scania - Omnicity 18m,low floor,diesel,18,2.55,2.3,159
+Scania - Omniexpress 12.4m,raised floor,diesel,12.4,2.55,2.2,49
+Scania - Omnilink 12.7m,low floor,diesel,12.7,2.55,2.3,112
+Scania - Omnilink 12m,low floor,diesel,12,2.55,2.3,106
+Scania - Omnilink 13.7m,low floor,diesel,13.7,2.55,2.3,120
+Scania - Omnilink 14.6m,low floor,diesel,14.6,2.55,2.3,130
+Scania - Omnilink 18.1m,low floor,diesel,18.1,2.55,2.3,159
+Scania - Touring 12m,raised floor,diesel,12.09,2.55,2.1,51
+Scania - Touring 13.7m,raised floor,diesel,13.7,2.55,2.1,59
+Setra - S 411 HD,raised floor,diesel,10.16,2.55,2.1,37
+Setra - S 412 UL,raised floor,diesel,10.805,2.55,2.17,45
+Setra - S 415 GT,raised floor,diesel,12.2,2.55,2.01,51
+Setra - S 415 GT-HD,raised floor,diesel,12.2,2.55,2.01,51
+Setra - S 415 H,raised floor,diesel,12.2,2.55,2.01,53
+Setra - S 415 HD,raised floor,diesel,12.2,2.55,2.1,49
+Setra - S 415 HDH,raised floor,diesel,12.3,2.55,2.1,51
+Setra - S 415 NF,low floor,diesel,11.95,2.55,2.313,42
+Setra - S 415 UL,raised floor,diesel,12.2,2.55,2.17,53
+Setra - S 416 GT,raised floor,diesel,13.04,2.55,2.01,55
+Setra - S 416 GT-HD ,raised floor,diesel,13.04,2.55,2.01,55
+Setra - S 416 GT-HD/2,raised floor,diesel,13.04,2.55,2.01,55
+Setra - S 416 H,raised floor,diesel,13.04,2.55,2.01,57
+Setra - S 416 HDH,raised floor,diesel,13.19,2.55,2.1,55
+Setra - S 416 NF,low floor,diesel,13.008,2.55,2.313,48
+Setra - S 416 UL,raised floor,diesel,13.04,2.55,2.17,57
+Setra - S 417 GT-HD,raised floor,diesel,14.05,2.55,2.01,59
+Setra - S 417 HDH,raised floor,diesel,14.05,2.55,2.1,59
+Setra - S 417 UL,raised floor,diesel,14.05,2.55,2.17,61
+Setra - S 419 GT-HD,raised floor,diesel,14.96,2.55,2.01,67
+Setra - S 419 UL,raised floor,diesel,14.98,2.55,2.17,69
+Solaris - Alpino,low floor,diesel,8.6,2.4,2.37,73
+Solaris - Alpino 8.9m LE,semi low floor,diesel,8.95,2.4,2.3,65
+Solaris - InterUrbino 12,raised floor,diesel,11.995,2.55,2.1,56
+Solaris - Urbino 10,low floor,diesel,9.94,2.55,2.37,78
+Solaris - Urbino 12,low floor,diesel,12,2.55,2.37,95
+Solaris - Urbino 12 CNG,low floor,gas,12,2.55,2.37,87
+Solaris - Urbino 12 Hybrid,low floor,hybrid,12,2.55,2.37,81
+Solaris - Urbino 12 LE,semi low floor,diesel,12,2.55,2.3,75
+Solaris - Urbino 12 LE CNG,semi low floor,gas,12,2.55,2.3,70
+Solaris - Urbino 15,low floor,diesel,14.59,2.55,2.37,123
+Solaris - Urbino 15 CNG,low floor,gas,14.59,2.55,2.37,115
+Solaris - Urbino 15 LE,semi low floor,diesel,14.59,2.55,2.3,120
+Solaris - Urbino 15 LE CNG,semi low floor,gas,14.59,2.55,2.3,114
+Solaris - Urbino 18,low floor,diesel,18,2.55,2.37,156
+Solaris - Urbino 18 CNG,low floor,gas,18,2.55,2.37,150
+Solaris - Urbino 18 Hybrid,low floor,hybrid,18,2.55,2.37,142
+Solaris - Urbino 18 LE CNG,semi low floor,gas,18,2.55,2.3,150
+Solaris - Vacanza 12,raised floor,diesel,12,2.55,2.1,49
+Solaris - Vacanza 13,raised floor,diesel,12.9,2.55,2.1,53
+Volvo - 7900 Articulated CNG,low floor,gas,18.084,2.55,2.3,153
+Volvo - 7900 Articulated Diesel,low floor,diesel,18.084,2.55,2.3,159
+Volvo - 7900 CNG,low floor,gas,12.084,2.55,2.3,98
+Volvo - 7900 Diesel,low floor,diesel,12.084,2.55,2.3,101
+Volvo - 7900 Hybrid,low floor,hybrid,12.084,2.55,2.3,92
+Volvo - 8900 Diesel 12.2m,raised floor,diesel,12.202,2.55,2.1,53
+Volvo - 8900 Diesel 12m LE,semi low floor,diesel,12.066,2.55,2.3,83
+Volvo - 8900 Diesel 13.7m LE Boogy,semi low floor,diesel,13.7,2.55,2.3,98
+Volvo - 8900 Diesel 13m,raised floor,diesel,13,2.55,2.1,57
+Volvo - 8900 Diesel 13m LE,semi low floor,diesel,13,2.55,2.3,89
+Volvo - 8900 Diesel 14.7m LE Boogy,semi low floor,diesel,14.766,2.55,2.3,110
+Volvo - 9700 Diesel 12.3m,raised floor,diesel,12.29,2.55,2.1,50
diff --git a/CombinedAlts/Form1.Designer.vb b/HVACTOOL/Form1.Designer.vb
similarity index 72%
rename from CombinedAlts/Form1.Designer.vb
rename to HVACTOOL/Form1.Designer.vb
index 6c8e5efdb44e6484a1fe111b1c8650b990a1ec60..96fb1e56a3451382074a3349065b0c1c4dd8bf9e 100644
--- a/CombinedAlts/Form1.Designer.vb
+++ b/HVACTOOL/Form1.Designer.vb
@@ -22,28 +22,17 @@ Partial Class Form1
     'Do not modify it using the code editor.
     <System.Diagnostics.DebuggerStepThrough()> _
     Private Sub InitializeComponent()
-        Me.Button1 = New System.Windows.Forms.Button()
         Me.SuspendLayout
         '
-        'Button1
-        '
-        Me.Button1.Location = New System.Drawing.Point(25, 34)
-        Me.Button1.Name = "Button1"
-        Me.Button1.Size = New System.Drawing.Size(75, 23)
-        Me.Button1.TabIndex = 0
-        Me.Button1.Text = "Button1"
-        Me.Button1.UseVisualStyleBackColor = true
-        '
         'Form1
         '
         Me.AutoScaleDimensions = New System.Drawing.SizeF(6!, 13!)
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
         Me.ClientSize = New System.Drawing.Size(284, 262)
-        Me.Controls.Add(Me.Button1)
         Me.Name = "Form1"
         Me.Text = "Form1"
         Me.ResumeLayout(false)
 
 End Sub
-    Friend WithEvents Button1 As System.Windows.Forms.Button
+
 End Class
diff --git a/CombinedAlts/Form1.resx b/HVACTOOL/Form1.resx
similarity index 100%
rename from CombinedAlts/Form1.resx
rename to HVACTOOL/Form1.resx
diff --git a/HVACTOOL/Form1.vb b/HVACTOOL/Form1.vb
new file mode 100644
index 0000000000000000000000000000000000000000..7b078a975cb052018bae5e90a8f90711e385e6c6
--- /dev/null
+++ b/HVACTOOL/Form1.vb
@@ -0,0 +1,6 @@
+Public Class Form1
+
+Private Sub Form1_Load( sender As Object,  e As EventArgs) Handles MyBase.Load
+
+End Sub
+End Class
diff --git a/HVACTOOL/HVACTOOL.vbproj b/HVACTOOL/HVACTOOL.vbproj
new file mode 100644
index 0000000000000000000000000000000000000000..04f07d3622bfcb30be7727022ed03996b8ae2eeb
--- /dev/null
+++ b/HVACTOOL/HVACTOOL.vbproj
@@ -0,0 +1,139 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project ToolsVersion="12.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
+  <PropertyGroup>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <ProjectGuid>{C34CFD60-2081-4EA3-AC18-6769291FBDBD}</ProjectGuid>
+    <OutputType>WinExe</OutputType>
+    <StartupObject>Sub Main</StartupObject>
+    <RootNamespace>VectoAuxiliaries</RootNamespace>
+    <AssemblyName>HVACTOOL</AssemblyName>
+    <FileAlignment>512</FileAlignment>
+    <MyType>WindowsFormsWithCustomSubMain</MyType>
+    <TargetFrameworkVersion>v4.0</TargetFrameworkVersion>
+    <SccProjectName>SAK</SccProjectName>
+    <SccLocalPath>SAK</SccLocalPath>
+    <SccAuxPath>SAK</SccAuxPath>
+    <SccProvider>SAK</SccProvider>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <PlatformTarget>AnyCPU</PlatformTarget>
+    <DebugSymbols>true</DebugSymbols>
+    <DebugType>full</DebugType>
+    <DefineDebug>true</DefineDebug>
+    <DefineTrace>true</DefineTrace>
+    <OutputPath>bin\Debug\</OutputPath>
+    <DocumentationFile>HVACTOOL.xml</DocumentationFile>
+    <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <PlatformTarget>AnyCPU</PlatformTarget>
+    <DebugType>pdbonly</DebugType>
+    <DefineDebug>false</DefineDebug>
+    <DefineTrace>true</DefineTrace>
+    <Optimize>true</Optimize>
+    <OutputPath>bin\Release\</OutputPath>
+    <DocumentationFile>HVACTOOL.xml</DocumentationFile>
+    <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionExplicit>On</OptionExplicit>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionCompare>Binary</OptionCompare>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionStrict>Off</OptionStrict>
+  </PropertyGroup>
+  <PropertyGroup>
+    <OptionInfer>On</OptionInfer>
+  </PropertyGroup>
+  <ItemGroup>
+    <Reference Include="System" />
+    <Reference Include="System.Data" />
+    <Reference Include="System.Deployment" />
+    <Reference Include="System.Drawing" />
+    <Reference Include="System.Windows.Forms" />
+    <Reference Include="System.Xml" />
+    <Reference Include="System.Core" />
+    <Reference Include="System.Xml.Linq" />
+    <Reference Include="System.Data.DataSetExtensions" />
+  </ItemGroup>
+  <ItemGroup>
+    <Import Include="Microsoft.VisualBasic" />
+    <Import Include="System" />
+    <Import Include="System.Collections" />
+    <Import Include="System.Collections.Generic" />
+    <Import Include="System.Data" />
+    <Import Include="System.Drawing" />
+    <Import Include="System.Diagnostics" />
+    <Import Include="System.Windows.Forms" />
+    <Import Include="System.Linq" />
+    <Import Include="System.Xml.Linq" />
+  </ItemGroup>
+  <ItemGroup>
+    <Compile Include="Form1.vb">
+      <SubType>Form</SubType>
+    </Compile>
+    <Compile Include="Form1.Designer.vb">
+      <DependentUpon>Form1.vb</DependentUpon>
+      <SubType>Form</SubType>
+    </Compile>
+    <Compile Include="Module1.vb" />
+    <Compile Include="My Project\AssemblyInfo.vb" />
+    <Compile Include="My Project\Application.Designer.vb">
+      <AutoGen>True</AutoGen>
+      <DependentUpon>Application.myapp</DependentUpon>
+    </Compile>
+    <Compile Include="My Project\Resources.Designer.vb">
+      <AutoGen>True</AutoGen>
+      <DesignTime>True</DesignTime>
+      <DependentUpon>Resources.resx</DependentUpon>
+    </Compile>
+    <Compile Include="My Project\Settings.Designer.vb">
+      <AutoGen>True</AutoGen>
+      <DependentUpon>Settings.settings</DependentUpon>
+      <DesignTimeSharedInput>True</DesignTimeSharedInput>
+    </Compile>
+  </ItemGroup>
+  <ItemGroup>
+    <EmbeddedResource Include="Form1.resx">
+      <DependentUpon>Form1.vb</DependentUpon>
+    </EmbeddedResource>
+    <EmbeddedResource Include="My Project\Resources.resx">
+      <Generator>VbMyResourcesResXFileCodeGenerator</Generator>
+      <LastGenOutput>Resources.Designer.vb</LastGenOutput>
+      <CustomToolNamespace>My.Resources</CustomToolNamespace>
+      <SubType>Designer</SubType>
+    </EmbeddedResource>
+  </ItemGroup>
+  <ItemGroup>
+    <Content Include="BusDatabase.csv">
+      <CopyToOutputDirectory>Always</CopyToOutputDirectory>
+    </Content>
+    <None Include="My Project\Application.myapp">
+      <Generator>MyApplicationCodeGenerator</Generator>
+      <LastGenOutput>Application.Designer.vb</LastGenOutput>
+    </None>
+    <None Include="My Project\Settings.settings">
+      <Generator>SettingsSingleFileGenerator</Generator>
+      <CustomToolNamespace>My</CustomToolNamespace>
+      <LastGenOutput>Settings.Designer.vb</LastGenOutput>
+    </None>
+  </ItemGroup>
+  <ItemGroup>
+    <ProjectReference Include="..\VECTOAux\VectoAuxiliaries\VectoAuxiliaries.vbproj">
+      <Project>{fdeee460-0b8a-4ef6-8d9e-72f203a50f65}</Project>
+      <Name>VectoAuxiliaries</Name>
+    </ProjectReference>
+  </ItemGroup>
+  <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
+  <!-- To modify your build process, add your task inside one of the targets below and uncomment it. 
+       Other similar extension points exist, see Microsoft.Common.targets.
+  <Target Name="BeforeBuild">
+  </Target>
+  <Target Name="AfterBuild">
+  </Target>
+  -->
+</Project>
\ No newline at end of file
diff --git a/HVACTOOL/Module1.vb b/HVACTOOL/Module1.vb
new file mode 100644
index 0000000000000000000000000000000000000000..f704af9f4095b8cebc89c0f383b672c81e810691
--- /dev/null
+++ b/HVACTOOL/Module1.vb
@@ -0,0 +1,15 @@
+
+module Main
+
+
+Sub main()
+
+   Dim frm As New frmHVACTool("BusDatabase.csv")
+
+   frm.ShowDialog
+
+End Sub
+
+
+End Module
+
diff --git a/HVACTOOL/My Project/Application.Designer.vb b/HVACTOOL/My Project/Application.Designer.vb
new file mode 100644
index 0000000000000000000000000000000000000000..0aecefe6649856e7f2f1917454c1aa12737d11a2
--- /dev/null
+++ b/HVACTOOL/My Project/Application.Designer.vb	
@@ -0,0 +1,13 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     This code was generated by a tool.
+'     Runtime Version:4.0.30319.18444
+'
+'     Changes to this file may cause incorrect behavior and will be lost if
+'     the code is regenerated.
+' </auto-generated>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
diff --git a/HVACTOOL/My Project/Application.myapp b/HVACTOOL/My Project/Application.myapp
new file mode 100644
index 0000000000000000000000000000000000000000..ff73056fefd244567703b92a25cd255050be2035
--- /dev/null
+++ b/HVACTOOL/My Project/Application.myapp	
@@ -0,0 +1,10 @@
+<?xml version="1.0" encoding="utf-8"?>
+<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
+  <MySubMain>false</MySubMain>
+  <MainForm>Form1</MainForm>
+  <SingleInstance>false</SingleInstance>
+  <ShutdownMode>0</ShutdownMode>
+  <EnableVisualStyles>true</EnableVisualStyles>
+  <AuthenticationMode>0</AuthenticationMode>
+  <SaveMySettingsOnExit>true</SaveMySettingsOnExit>
+</MyApplicationData>
\ No newline at end of file
diff --git a/HVACTOOL/My Project/AssemblyInfo.vb b/HVACTOOL/My Project/AssemblyInfo.vb
new file mode 100644
index 0000000000000000000000000000000000000000..194e8b79bb5f7b3e9607997e83b9d8fb7ddcc684
--- /dev/null
+++ b/HVACTOOL/My Project/AssemblyInfo.vb	
@@ -0,0 +1,35 @@
+Imports System
+Imports System.Reflection
+Imports System.Runtime.InteropServices
+
+' General Information about an assembly is controlled through the following 
+' set of attributes. Change these attribute values to modify the information
+' associated with an assembly.
+
+' Review the values of the assembly attributes
+
+<Assembly: AssemblyTitle("HVACTOOL")> 
+<Assembly: AssemblyDescription("")> 
+<Assembly: AssemblyCompany("AEA Group")> 
+<Assembly: AssemblyProduct("HVACTOOL")> 
+<Assembly: AssemblyCopyright("Copyright © AEA Group 2015")> 
+<Assembly: AssemblyTrademark("")> 
+
+<Assembly: ComVisible(False)>
+
+'The following GUID is for the ID of the typelib if this project is exposed to COM
+<Assembly: Guid("06dd36fb-478c-4c29-be25-29fc937476f7")> 
+
+' Version information for an assembly consists of the following four values:
+'
+'      Major Version
+'      Minor Version 
+'      Build Number
+'      Revision
+'
+' You can specify all the values or you can default the Build and Revision Numbers 
+' by using the '*' as shown below:
+' <Assembly: AssemblyVersion("1.0.*")> 
+
+<Assembly: AssemblyVersion("1.0.0.0")> 
+<Assembly: AssemblyFileVersion("1.0.0.0")> 
diff --git a/HVACTOOL/My Project/Resources.Designer.vb b/HVACTOOL/My Project/Resources.Designer.vb
new file mode 100644
index 0000000000000000000000000000000000000000..88b7755261c42ef2bb625d7e5e360914990afa1b
--- /dev/null
+++ b/HVACTOOL/My Project/Resources.Designer.vb	
@@ -0,0 +1,63 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     This code was generated by a tool.
+'     Runtime Version:4.0.30319.18444
+'
+'     Changes to this file may cause incorrect behavior and will be lost if
+'     the code is regenerated.
+' </auto-generated>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+Imports System
+
+Namespace My.Resources
+    
+    'This class was auto-generated by the StronglyTypedResourceBuilder
+    'class via a tool like ResGen or Visual Studio.
+    'To add or remove a member, edit your .ResX file then rerun ResGen
+    'with the /str option, or rebuild your VS project.
+    '''<summary>
+    '''  A strongly-typed resource class, for looking up localized strings, etc.
+    '''</summary>
+    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"),  _
+     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
+     Global.Microsoft.VisualBasic.HideModuleNameAttribute()>  _
+    Friend Module Resources
+        
+        Private resourceMan As Global.System.Resources.ResourceManager
+        
+        Private resourceCulture As Global.System.Globalization.CultureInfo
+        
+        '''<summary>
+        '''  Returns the cached ResourceManager instance used by this class.
+        '''</summary>
+        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
+        Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
+            Get
+                If Object.ReferenceEquals(resourceMan, Nothing) Then
+                    Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("VectoAuxiliaries.Resources", GetType(Resources).Assembly)
+                    resourceMan = temp
+                End If
+                Return resourceMan
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Overrides the current thread's CurrentUICulture property for all
+        '''  resource lookups using this strongly typed resource class.
+        '''</summary>
+        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
+        Friend Property Culture() As Global.System.Globalization.CultureInfo
+            Get
+                Return resourceCulture
+            End Get
+            Set
+                resourceCulture = value
+            End Set
+        End Property
+    End Module
+End Namespace
diff --git a/HVACTOOL/My Project/Resources.resx b/HVACTOOL/My Project/Resources.resx
new file mode 100644
index 0000000000000000000000000000000000000000..af7dbebbacef595e3089c01c05671016c21a8304
--- /dev/null
+++ b/HVACTOOL/My Project/Resources.resx	
@@ -0,0 +1,117 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+</root>
\ No newline at end of file
diff --git a/HVACTOOL/My Project/Settings.Designer.vb b/HVACTOOL/My Project/Settings.Designer.vb
new file mode 100644
index 0000000000000000000000000000000000000000..14e244d9bbf3a3c5dfd44f61f996fe1661a78895
--- /dev/null
+++ b/HVACTOOL/My Project/Settings.Designer.vb	
@@ -0,0 +1,73 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     This code was generated by a tool.
+'     Runtime Version:4.0.30319.18444
+'
+'     Changes to this file may cause incorrect behavior and will be lost if
+'     the code is regenerated.
+' </auto-generated>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+
+Namespace My
+    
+    <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "12.0.0.0"),  _
+     Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
+    Partial Friend NotInheritable Class MySettings
+        Inherits Global.System.Configuration.ApplicationSettingsBase
+        
+        Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
+        
+#Region "My.Settings Auto-Save Functionality"
+#If _MyType = "WindowsForms" Then
+    Private Shared addedHandler As Boolean
+
+    Private Shared addedHandlerLockObject As New Object
+
+    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
+    Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
+        If My.Application.SaveMySettingsOnExit Then
+            My.Settings.Save()
+        End If
+    End Sub
+#End If
+#End Region
+        
+        Public Shared ReadOnly Property [Default]() As MySettings
+            Get
+                
+#If _MyType = "WindowsForms" Then
+               If Not addedHandler Then
+                    SyncLock addedHandlerLockObject
+                        If Not addedHandler Then
+                            AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
+                            addedHandler = True
+                        End If
+                    End SyncLock
+                End If
+#End If
+                Return defaultInstance
+            End Get
+        End Property
+    End Class
+End Namespace
+
+Namespace My
+    
+    <Global.Microsoft.VisualBasic.HideModuleNameAttribute(),  _
+     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()>  _
+    Friend Module MySettingsProperty
+        
+        <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")>  _
+        Friend ReadOnly Property Settings() As Global.VectoAuxiliaries.My.MySettings
+            Get
+                Return Global.VectoAuxiliaries.My.MySettings.Default
+            End Get
+        End Property
+    End Module
+End Namespace
diff --git a/HVACTOOL/My Project/Settings.settings b/HVACTOOL/My Project/Settings.settings
new file mode 100644
index 0000000000000000000000000000000000000000..85b890b3c66b9beee248abaddd2ec71f8b1df2b2
--- /dev/null
+++ b/HVACTOOL/My Project/Settings.settings	
@@ -0,0 +1,7 @@
+<?xml version='1.0' encoding='utf-8'?>
+<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" UseMySettingsClassName="true">
+  <Profiles>
+    <Profile Name="(Default)" />
+  </Profiles>
+  <Settings />
+</SettingsFile>
diff --git a/VECTO.sln b/VECTO.sln
index 7cb172468b9f869064ad0338c276566c6efd9eb6..108ce88dc5a4dbdc9a2fa70f2d2e1c0da832f7e1 100644
--- a/VECTO.sln
+++ b/VECTO.sln
@@ -13,7 +13,7 @@ Project("{2150E333-8FDC-42A3-9474-1A3956D46DE8}") = "Solution Items", "Solution
 EndProject
 Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "AdvancedAuxiliaryInterfaces", "AdvancedAuxiliaryInterfaces\AdvancedAuxiliaryInterfaces.vbproj", "{B4B9BD2F-FD8F-4BB8-82FA-E2154D2C7FBD}"
 EndProject
-Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "CombinedAlts", "CombinedAlts\CombinedAlts.vbproj", "{96E6EE9F-1C21-4FEB-AED0-EC400AD70F1E}"
+Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "HVACTOOL", "HVACTOOL\HVACTOOL.vbproj", "{C34CFD60-2081-4EA3-AC18-6769291FBDBD}"
 EndProject
 Global
 	GlobalSection(SolutionConfigurationPlatforms) = preSolution
@@ -49,12 +49,12 @@ Global
 		{B4B9BD2F-FD8F-4BB8-82FA-E2154D2C7FBD}.Release|Any CPU.ActiveCfg = Release|Any CPU
 		{B4B9BD2F-FD8F-4BB8-82FA-E2154D2C7FBD}.Release|Any CPU.Build.0 = Release|Any CPU
 		{B4B9BD2F-FD8F-4BB8-82FA-E2154D2C7FBD}.Release|x86.ActiveCfg = Release|Any CPU
-		{96E6EE9F-1C21-4FEB-AED0-EC400AD70F1E}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
-		{96E6EE9F-1C21-4FEB-AED0-EC400AD70F1E}.Debug|Any CPU.Build.0 = Debug|Any CPU
-		{96E6EE9F-1C21-4FEB-AED0-EC400AD70F1E}.Debug|x86.ActiveCfg = Debug|Any CPU
-		{96E6EE9F-1C21-4FEB-AED0-EC400AD70F1E}.Release|Any CPU.ActiveCfg = Release|Any CPU
-		{96E6EE9F-1C21-4FEB-AED0-EC400AD70F1E}.Release|Any CPU.Build.0 = Release|Any CPU
-		{96E6EE9F-1C21-4FEB-AED0-EC400AD70F1E}.Release|x86.ActiveCfg = Release|Any CPU
+		{C34CFD60-2081-4EA3-AC18-6769291FBDBD}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+		{C34CFD60-2081-4EA3-AC18-6769291FBDBD}.Debug|Any CPU.Build.0 = Debug|Any CPU
+		{C34CFD60-2081-4EA3-AC18-6769291FBDBD}.Debug|x86.ActiveCfg = Debug|Any CPU
+		{C34CFD60-2081-4EA3-AC18-6769291FBDBD}.Release|Any CPU.ActiveCfg = Release|Any CPU
+		{C34CFD60-2081-4EA3-AC18-6769291FBDBD}.Release|Any CPU.Build.0 = Release|Any CPU
+		{C34CFD60-2081-4EA3-AC18-6769291FBDBD}.Release|x86.ActiveCfg = Release|Any CPU
 	EndGlobalSection
 	GlobalSection(SolutionProperties) = preSolution
 		HideSolutionNode = FALSE
diff --git a/VECTOAux/VectoAuxiliaries/Hvac/BusDatabase.vb b/VECTOAux/VectoAuxiliaries/Hvac/BusDatabase.vb
index c1bcaffc3db62327f70b126dc71ca2c7b14a2ce3..a42d7a99cd6fe64cadb67683a592bd9980e1e6dd 100644
--- a/VECTOAux/VectoAuxiliaries/Hvac/BusDatabase.vb
+++ b/VECTOAux/VectoAuxiliaries/Hvac/BusDatabase.vb
@@ -7,12 +7,25 @@ Public Class BusDatabase
   Implements IBusDatabase
 
   Private buses As New Dictionary(Of String, IBus)
+  Private selectListBuses As New List(Of IBus)
 
 
-        Public Function GetBuses(busModel As String) As List(Of IBus) Implements IBusDatabase.GetBuses
+        Public Function GetBuses(busModel As String, optional AsSelectList As Boolean=false) As List(Of IBus) Implements IBusDatabase.GetBuses
 
+           If AsSelectList then
+            selectListBuses = New List(Of IBus)
+            selectListBuses = buses.Select( Function(x) x.Value).Where( Function(v) v.Model="" OrElse v.Model.ToLower.Contains( busModel.ToLower)).ToList()
+            selectListBuses.Insert(0, New Bus("<Select>","low floor","gas",1,1,1,2))
+            Return selectListBuses
+
+           Else
+           
             Return buses.Select( Function(x) x.Value).Where( Function(v) v.Model="" OrElse v.Model.ToLower.Contains( busModel.ToLower)).ToList()
 
+           End If
+
+            
+
         End Function
 
         Public Function Initialise(filepath As String) As Boolean Implements IBusDatabase.Initialise
diff --git a/VECTOAux/VectoAuxiliaries/Hvac/IBusDatabase.vb b/VECTOAux/VectoAuxiliaries/Hvac/IBusDatabase.vb
index 47da58653b7cd5bf8b09e7c9e60cfffe7a49a546..189a51ba008b4f3303029128cfb2b476e4a402b9 100644
--- a/VECTOAux/VectoAuxiliaries/Hvac/IBusDatabase.vb
+++ b/VECTOAux/VectoAuxiliaries/Hvac/IBusDatabase.vb
@@ -3,7 +3,7 @@
 Public Interface IBusDatabase
 
 
-     Function  GetBuses( busModel as string ) As List(of IBus )
+     Function  GetBuses( busModel as string, Optional AsSelectList As Boolean=false ) As List(of IBus )
 
      Function Initialise( busFileCSV As String ) As Boolean
 
diff --git a/VECTOAux/VectoAuxiliaries/UI/frmHVACTool.Designer.vb b/VECTOAux/VectoAuxiliaries/UI/frmHVACTool.Designer.vb
new file mode 100644
index 0000000000000000000000000000000000000000..bfd410b6070008e0be066a61fadf074e48a27b45
--- /dev/null
+++ b/VECTOAux/VectoAuxiliaries/UI/frmHVACTool.Designer.vb
@@ -0,0 +1,89 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class frmHVACTool
+    Inherits System.Windows.Forms.Form
+
+    'Form overrides dispose to clean up the component list.
+    <System.Diagnostics.DebuggerNonUserCode()> _
+    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+        Try
+            If disposing AndAlso components IsNot Nothing Then
+                components.Dispose()
+            End If
+        Finally
+            MyBase.Dispose(disposing)
+        End Try
+    End Sub
+
+    'Required by the Windows Form Designer
+    Private components As System.ComponentModel.IContainer
+
+    'NOTE: The following procedure is required by the Windows Form Designer
+    'It can be modified using the Windows Form Designer.  
+    'Do not modify it using the code editor.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Me.TabControl1 = New System.Windows.Forms.TabControl()
+        Me.tabBusParameters = New System.Windows.Forms.TabPage()
+        Me.tabTechListInput = New System.Windows.Forms.TabPage()
+        Me.cboBuses = New System.Windows.Forms.ComboBox()
+        Me.TabControl1.SuspendLayout
+        Me.tabBusParameters.SuspendLayout
+        Me.SuspendLayout
+        '
+        'TabControl1
+        '
+        Me.TabControl1.Controls.Add(Me.tabBusParameters)
+        Me.TabControl1.Controls.Add(Me.tabTechListInput)
+        Me.TabControl1.Location = New System.Drawing.Point(53, 37)
+        Me.TabControl1.Name = "TabControl1"
+        Me.TabControl1.SelectedIndex = 0
+        Me.TabControl1.Size = New System.Drawing.Size(648, 415)
+        Me.TabControl1.TabIndex = 0
+        '
+        'tabBusParameters
+        '
+        Me.tabBusParameters.Controls.Add(Me.cboBuses)
+        Me.tabBusParameters.Location = New System.Drawing.Point(4, 22)
+        Me.tabBusParameters.Name = "tabBusParameters"
+        Me.tabBusParameters.Padding = New System.Windows.Forms.Padding(3)
+        Me.tabBusParameters.Size = New System.Drawing.Size(640, 389)
+        Me.tabBusParameters.TabIndex = 0
+        Me.tabBusParameters.Text = "INP BusParameters"
+        Me.tabBusParameters.UseVisualStyleBackColor = true
+        '
+        'tabTechListInput
+        '
+        Me.tabTechListInput.Location = New System.Drawing.Point(4, 22)
+        Me.tabTechListInput.Name = "tabTechListInput"
+        Me.tabTechListInput.Padding = New System.Windows.Forms.Padding(3)
+        Me.tabTechListInput.Size = New System.Drawing.Size(640, 389)
+        Me.tabTechListInput.TabIndex = 1
+        Me.tabTechListInput.Text = "Tech List Input"
+        Me.tabTechListInput.UseVisualStyleBackColor = true
+        '
+        'cboBuses
+        '
+        Me.cboBuses.FormattingEnabled = true
+        Me.cboBuses.Location = New System.Drawing.Point(34, 30)
+        Me.cboBuses.Name = "cboBuses"
+        Me.cboBuses.Size = New System.Drawing.Size(558, 21)
+        Me.cboBuses.TabIndex = 0
+        '
+        'frmHVACTool
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6!, 13!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(773, 510)
+        Me.Controls.Add(Me.TabControl1)
+        Me.Name = "frmHVACTool"
+        Me.Text = "frmHVACTool"
+        Me.TabControl1.ResumeLayout(false)
+        Me.tabBusParameters.ResumeLayout(false)
+        Me.ResumeLayout(false)
+
+End Sub
+    Friend WithEvents TabControl1 As System.Windows.Forms.TabControl
+    Friend WithEvents tabBusParameters As System.Windows.Forms.TabPage
+    Friend WithEvents tabTechListInput As System.Windows.Forms.TabPage
+    Friend WithEvents cboBuses As System.Windows.Forms.ComboBox
+End Class
diff --git a/VECTOAux/VectoAuxiliaries/UI/frmHVACTool.resx b/VECTOAux/VectoAuxiliaries/UI/frmHVACTool.resx
new file mode 100644
index 0000000000000000000000000000000000000000..1af7de150c99c12dd67a509fe57c10d63e4eeb04
--- /dev/null
+++ b/VECTOAux/VectoAuxiliaries/UI/frmHVACTool.resx
@@ -0,0 +1,120 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+</root>
\ No newline at end of file
diff --git a/VECTOAux/VectoAuxiliaries/UI/frmHVACTool.vb b/VECTOAux/VectoAuxiliaries/UI/frmHVACTool.vb
new file mode 100644
index 0000000000000000000000000000000000000000..cf2a5169515bc232775f161483da910d10d069ab
--- /dev/null
+++ b/VECTOAux/VectoAuxiliaries/UI/frmHVACTool.vb
@@ -0,0 +1,56 @@
+
+Imports System.Windows.Forms
+Imports VectoAuxiliaries.Hvac
+
+
+
+Public Class frmHVACTool
+
+Private filePath As string
+
+Private buses As IBusDatabase
+
+
+
+Public Sub new ( filePath As String )
+
+    ' This call is required by the designer.
+    InitializeComponent()
+    
+    ' Add any initialization after the InitializeComponent() call.
+
+    Me.filePath = filePath
+
+
+    Initlialise()
+
+    
+End Sub
+
+
+Private Sub Initlialise()
+
+  'Instantial Buses
+  buses = New BusDatabase()
+  If Not buses.Initialise( filePath ) then 
+    MessageBox.Show("Problems initialising the Bus Database, some buses may not appear")
+  End If
+
+   
+
+
+  cboBuses.DataSource=buses.GetBuses(String.Empty,True)
+  cboBuses.DisplayMember="Model"
+
+
+End Sub
+
+
+
+
+
+
+End Class
+
+
+
diff --git a/VECTOAux/VectoAuxiliaries/VectoAuxiliaries.vbproj b/VECTOAux/VectoAuxiliaries/VectoAuxiliaries.vbproj
index f19f7f4b2689ba87103e8ec6d5b7cab3d09bd125..e2902d1bc7ec7ea5e23cdcbd04028e26cb060d26 100644
--- a/VECTOAux/VectoAuxiliaries/VectoAuxiliaries.vbproj
+++ b/VECTOAux/VectoAuxiliaries/VectoAuxiliaries.vbproj
@@ -201,6 +201,12 @@
     <Compile Include="UI\frmCombinedAlternators.vb">
       <SubType>Form</SubType>
     </Compile>
+    <Compile Include="UI\frmHVACTool.Designer.vb">
+      <DependentUpon>frmHVACTool.vb</DependentUpon>
+    </Compile>
+    <Compile Include="UI\frmHVACTool.vb">
+      <SubType>Form</SubType>
+    </Compile>
     <Compile Include="UI\VECTO_Types.vb" />
   </ItemGroup>
   <ItemGroup>
@@ -223,6 +229,9 @@
     <EmbeddedResource Include="UI\frmCombinedAlternators.resx">
       <DependentUpon>frmCombinedAlternators.vb</DependentUpon>
     </EmbeddedResource>
+    <EmbeddedResource Include="UI\frmHVACTool.resx">
+      <DependentUpon>frmHVACTool.vb</DependentUpon>
+    </EmbeddedResource>
   </ItemGroup>
   <ItemGroup>
     <None Include="My Project\Application.myapp">