Koncna verzija - #2.7.0.0

.gitignore

@@ -27,7 +27,7 @@ x86/
 [Aa][Rr][Mm]/
 [Aa][Rr][Mm]64/
 bld/
-[Bb]in/
+#[Bb]in/
 [Oo]bj/
 [Oo]ut/
 [Ll]og/

App.config

@@ -1,6 +1,75 @@
 <?xml version="1.0" encoding="utf-8"?>
 <configuration>
+    <configSections>
+        <sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
+            <section name="TPS1100_Convert.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
+        </sectionGroup>
+    </configSections>
     <startup>
         <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.8"/>
     </startup>
+    <userSettings>
+        <TPS1100_Convert.My.MySettings>
+            <setting name="ZadnjaMapa" serializeAs="String">
+                <value />
+            </setting>
+            <setting name="DecimalnoLocilo" serializeAs="String">
+                <value>Pika</value>
+            </setting>
+            <setting name="KodeUporabnik" serializeAs="String">
+                <value>Da</value>
+            </setting>
+            <setting name="Datoteka" serializeAs="String">
+                <value />
+            </setting>
+            <setting name="Stolpci" serializeAs="String">
+                <value>0</value>
+            </setting>
+            <setting name="DatLogfile" serializeAs="String">
+                <value />
+            </setting>
+            <setting name="MapaShrani" serializeAs="String">
+                <value />
+            </setting>
+            <setting name="KodaQuickSet" serializeAs="String">
+                <value>10</value>
+            </setting>
+            <setting name="KodaSetAzi" serializeAs="String">
+                <value>20</value>
+            </setting>
+            <setting name="KodaResection" serializeAs="String">
+                <value>30</value>
+            </setting>
+            <setting name="KodaFreeStation" serializeAs="String">
+                <value>40</value>
+            </setting>
+            <setting name="KodaOriHtTrans" serializeAs="String">
+                <value>50</value>
+            </setting>
+            <setting name="KodaMeasOri" serializeAs="String">
+                <value>80</value>
+            </setting>
+            <setting name="KodaMeas" serializeAs="String">
+                <value>90</value>
+            </setting>
+            <setting name="KodaStake" serializeAs="String">
+                <value>91</value>
+            </setting>
+            <setting name="KodaUserImport" serializeAs="String">
+                <value>99</value>
+            </setting>
+            <setting name="KodaStojisce" serializeAs="String">
+                <value>1</value>
+            </setting>
+            <setting name="KodaStojisceInfo" serializeAs="String">
+                <value>2</value>
+            </setting>
+            <setting name="Pisava" serializeAs="String">
+                <value />
+            </setting>
+            <setting name="KodaStojisceOri" serializeAs="String">
+                <value>3</value>
+            </setting>
+        </TPS1100_Convert.My.MySettings>
+    </userSettings>
 </configuration>

ApplicationEvents.vb

@@ -0,0 +1,12 @@
+Namespace My
+    ' The following events are available for MyApplication:
+    ' Startup: Raised when the application starts, before the startup form is created.
+    ' Shutdown: Raised after all application forms are closed.  This event is not raised if the application terminates abnormally.
+    ' UnhandledException: Raised if the application encounters an unhandled exception.
+    ' StartupNextInstance: Raised when launching a single-instance application and the application is already active. 
+    ' NetworkAvailabilityChanged: Raised when the network connection is connected or disconnected.
+
+    Partial Friend Class MyApplication
+
+    End Class
+End Namespace

CHANGELOG.md

@@ -0,0 +1,82 @@
+# TPS1100 Convert: Zapisnik Razvoja
+
+Zapisnik razvoja programa TPS1100 Convert.
+
+---
+
+## v2.7.0.0 (2024/06/20)
+
+### Novo
+
+- Priprava GEO datoteke za obdelavo meritev v programu GeoPro/GeoX
+- Dodano izpisovanje klasifikacije točk uporabljenih za orientacijo (Seznamu točk)
+- Dodane kode za ročni vnos podatkov:
+	- (koda: 1) stojišče
+	- (koda: 2) temperatura in zračni pritisk pritisk
+	- (koda: 3) orientacije
+
+### Spremembe
+
+- Dodana vrstica z meniji Datoteka in Program
+- Posodobljen vmesnik v glavnem oknu aplikacije
+- Funkcije Info, Navodila in Nastavitve so prestavljene v vrstico z meniji
+- Sprememnjen način prikazovanja polj za ročni vnos podatkov za stojišče, temp./pritisk in orientacijo (Urejevalnik GSI datotek)
+- Odstranjena koda za "StakeOut" (ni uporabna)
+
+### V Delu
+
+- Delo na dokumentaciji:
+	- Navodila za uporabo programa
+	- Kodiranje podatkov (uporaba in opis kod)
+- Delo na funkcijah za uvoz in izvoz kodiranja podatkov v nastavitvah (Uvoz še ni aktiven)
+
+---
+
+## Verzija - 2.6.x
+
+Datum: 2024/06/13
+
+- Dodane koda za orientacije in podatke o stojišču
+
+---
+
+## Verzija - 2.5.x
+
+Datum: 2024/06/10
+
+- Dodan menu z nastavitvami
+
+---
+
+## Verzija - 2.4
+
+Datum: 2024/06/03
+
+- Dodan urejevalnik GSI datotek
+- Dodana opcija za izbiro decimalnega ločila (Pika/Vejica)
+- Dodana opcija za izbiro ločila med podatki (Presledek/Tabulator)
+- Izpis zapisnika meritev kot tabela
+
+---
+
+## Verzija - 2.1
+
+Datum: 2018/12/27
+
+- Združen izpis seznama koordinat točk (Merjene Točke + Vse Točke)
+
+---
+
+## Verzija - 2.0
+
+Datum: 2018/12/27
+
+- Dodano izpisovanje kodiranja v "Zapisnik Meritve"
+
+---
+
+## Verzija - 1.0
+
+Datum: 2016/06/26
+
+- Prva izdaja programa

Form1.Designer.vb

@@ -1,9 +1,9 @@
-<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
 Partial Class Form1
     Inherits System.Windows.Forms.Form
 
     'Form overrides dispose to clean up the component list.
-    <System.Diagnostics.DebuggerNonUserCode()> _
+    <System.Diagnostics.DebuggerNonUserCode()>
     Protected Overrides Sub Dispose(ByVal disposing As Boolean)
         Try
             If disposing AndAlso components IsNot Nothing Then
@@ -20,32 +20,46 @@ Partial Class Form1
     '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()> _
+    <System.Diagnostics.DebuggerStepThrough()>
     Private Sub InitializeComponent()
         Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form1))
         Me.RichTextBox1 = New System.Windows.Forms.RichTextBox()
         Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
+        Me.ToolStripProgressBar1 = New System.Windows.Forms.ToolStripProgressBar()
         Me.ToolStripStatusLabel1 = New System.Windows.Forms.ToolStripStatusLabel()
         Me.ToolStripStatusLabel2 = New System.Windows.Forms.ToolStripStatusLabel()
         Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog()
         Me.SaveFileDialog1 = New System.Windows.Forms.SaveFileDialog()
-        Me.tsbOpenFile = New System.Windows.Forms.ToolStripButton()
         Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
         Me.tsbFileName = New System.Windows.Forms.ToolStripTextBox()
-        Me.tsbConvert = New System.Windows.Forms.ToolStripButton()
-        Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator()
-        Me.tsbSaveAs = New System.Windows.Forms.ToolStripButton()
         Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
+        Me.LabelDatoteka = New System.Windows.Forms.ToolStripLabel()
+        Me.tsbOpenFile = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripSeparator5 = New System.Windows.Forms.ToolStripSeparator()
+        Me.ButtonUrediDat = New System.Windows.Forms.ToolStripButton()
+        Me.tsbConvert = New System.Windows.Forms.ToolStripButton()
         Me.tsbPointsOnly = New System.Windows.Forms.ToolStripButton()
-        Me.ToolStripComboBox2 = New System.Windows.Forms.ToolStripComboBox()
-        Me.ToolStripLabel2 = New System.Windows.Forms.ToolStripLabel()
-        Me.ToolStripComboBox1 = New System.Windows.Forms.ToolStripComboBox()
-        Me.ToolStripLabel1 = New System.Windows.Forms.ToolStripLabel()
-        Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator()
-        Me.tsbHelp = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripButtonGeo = New System.Windows.Forms.ToolStripButton()
         Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator()
+        Me.tsbSaveAs = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripButtonPripravi = New System.Windows.Forms.ToolStripButton()
+        Me.OpenFileDialogTocke = New System.Windows.Forms.OpenFileDialog()
+        Me.MenuStrip1 = New System.Windows.Forms.MenuStrip()
+        Me.MenuToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.OdpriGSIToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStripSeparator6 = New System.Windows.Forms.ToolStripSeparator()
+        Me.PripraviGSIToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.InfoOAplikacijiToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.DatotekaToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.OdpriGSIToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
+        Me.PripraviGSIToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ShraniToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.IzhodToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator()
+        Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator()
         Me.StatusStrip1.SuspendLayout()
         Me.ToolStrip1.SuspendLayout()
+        Me.MenuStrip1.SuspendLayout()
         Me.SuspendLayout()
         '
         'RichTextBox1
@@ -53,32 +67,43 @@ Partial Class Form1
         Me.RichTextBox1.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.RichTextBox1.BackColor = System.Drawing.SystemColors.ControlLightLight
-        Me.RichTextBox1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
-        Me.RichTextBox1.Font = New System.Drawing.Font("Courier New", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(238, Byte))
-        Me.RichTextBox1.Location = New System.Drawing.Point(0, 29)
-        Me.RichTextBox1.Margin = New System.Windows.Forms.Padding(0)
+        Me.RichTextBox1.BackColor = System.Drawing.SystemColors.Control
+        Me.RichTextBox1.BorderStyle = System.Windows.Forms.BorderStyle.None
+        Me.RichTextBox1.Cursor = System.Windows.Forms.Cursors.IBeam
+        Me.RichTextBox1.Font = New System.Drawing.Font("Courier New", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(238, Byte))
+        Me.RichTextBox1.Location = New System.Drawing.Point(9, 71)
+        Me.RichTextBox1.Margin = New System.Windows.Forms.Padding(0, 0, 0, 1)
         Me.RichTextBox1.Name = "RichTextBox1"
         Me.RichTextBox1.ReadOnly = True
-        Me.RichTextBox1.Size = New System.Drawing.Size(1251, 690)
+        Me.RichTextBox1.Size = New System.Drawing.Size(1233, 647)
         Me.RichTextBox1.TabIndex = 1
-        Me.RichTextBox1.Text = ""
+        Me.RichTextBox1.Text = resources.GetString("RichTextBox1.Text")
+        Me.RichTextBox1.WordWrap = False
         '
         'StatusStrip1
         '
-        Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripStatusLabel1, Me.ToolStripStatusLabel2})
+        Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripProgressBar1, Me.ToolStripStatusLabel1, Me.ToolStripStatusLabel2})
         Me.StatusStrip1.Location = New System.Drawing.Point(0, 719)
         Me.StatusStrip1.Name = "StatusStrip1"
         Me.StatusStrip1.Size = New System.Drawing.Size(1251, 22)
         Me.StatusStrip1.TabIndex = 2
         Me.StatusStrip1.Text = "StatusStrip1"
         '
+        'ToolStripProgressBar1
+        '
+        Me.ToolStripProgressBar1.ForeColor = System.Drawing.Color.LimeGreen
+        Me.ToolStripProgressBar1.Margin = New System.Windows.Forms.Padding(10, 3, 10, 3)
+        Me.ToolStripProgressBar1.Name = "ToolStripProgressBar1"
+        Me.ToolStripProgressBar1.Size = New System.Drawing.Size(100, 16)
+        Me.ToolStripProgressBar1.Step = 1
+        Me.ToolStripProgressBar1.Style = System.Windows.Forms.ProgressBarStyle.Continuous
+        '
         'ToolStripStatusLabel1
         '
         Me.ToolStripStatusLabel1.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(238, Byte))
         Me.ToolStripStatusLabel1.Name = "ToolStripStatusLabel1"
-        Me.ToolStripStatusLabel1.Size = New System.Drawing.Size(99, 17)
-        Me.ToolStripStatusLabel1.Text = "Made by Boris Bilc"
+        Me.ToolStripStatusLabel1.Size = New System.Drawing.Size(189, 17)
+        Me.ToolStripStatusLabel1.Text = "2B geoinformatika d.o.o. / Boris Bilc"
         '
         'ToolStripStatusLabel2
         '
@@ -95,128 +120,213 @@ Partial Class Form1
         Me.SaveFileDialog1.DefaultExt = "*.txt"
         Me.SaveFileDialog1.Title = "Save As..."
         '
-        'tsbOpenFile
-        '
-        Me.tsbOpenFile.Image = CType(resources.GetObject("tsbOpenFile.Image"), System.Drawing.Image)
-        Me.tsbOpenFile.ImageTransparentColor = System.Drawing.Color.Magenta
-        Me.tsbOpenFile.Name = "tsbOpenFile"
-        Me.tsbOpenFile.Size = New System.Drawing.Size(83, 26)
-        Me.tsbOpenFile.Text = "Odpri GSI"
-        Me.tsbOpenFile.ToolTipText = "Open File..."
-        '
         'ToolStripSeparator1
         '
         Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
-        Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 29)
+        Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 37)
         '
         'tsbFileName
         '
         Me.tsbFileName.AutoSize = False
-        Me.tsbFileName.Font = New System.Drawing.Font("Segoe UI", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(238, Byte))
+        Me.tsbFileName.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.tsbFileName.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(238, Byte))
+        Me.tsbFileName.Margin = New System.Windows.Forms.Padding(5, 0, 5, 0)
         Me.tsbFileName.Name = "tsbFileName"
         Me.tsbFileName.ReadOnly = True
-        Me.tsbFileName.Size = New System.Drawing.Size(160, 23)
-        Me.tsbFileName.Text = "Odpri GSI datoteko..."
-        '
-        'tsbConvert
-        '
-        Me.tsbConvert.Enabled = False
-        Me.tsbConvert.Image = CType(resources.GetObject("tsbConvert.Image"), System.Drawing.Image)
-        Me.tsbConvert.ImageTransparentColor = System.Drawing.Color.Magenta
-        Me.tsbConvert.Name = "tsbConvert"
-        Me.tsbConvert.Size = New System.Drawing.Size(77, 26)
-        Me.tsbConvert.Text = "Poročilo"
-        Me.tsbConvert.ToolTipText = "Convert"
-        '
-        'ToolStripSeparator2
-        '
-        Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
-        Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 29)
-        '
-        'tsbSaveAs
-        '
-        Me.tsbSaveAs.Enabled = False
-        Me.tsbSaveAs.Image = CType(resources.GetObject("tsbSaveAs.Image"), System.Drawing.Image)
-        Me.tsbSaveAs.ImageTransparentColor = System.Drawing.Color.Magenta
-        Me.tsbSaveAs.Name = "tsbSaveAs"
-        Me.tsbSaveAs.Size = New System.Drawing.Size(78, 26)
-        Me.tsbSaveAs.Text = "Shrani ..."
+        Me.tsbFileName.Size = New System.Drawing.Size(200, 25)
         '
         'ToolStrip1
         '
         Me.ToolStrip1.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
-        Me.ToolStrip1.ImageScalingSize = New System.Drawing.Size(22, 22)
-        Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsbOpenFile, Me.ToolStripSeparator2, Me.tsbFileName, Me.ToolStripSeparator1, Me.tsbConvert, Me.tsbPointsOnly, Me.ToolStripComboBox2, Me.ToolStripLabel2, Me.ToolStripComboBox1, Me.ToolStripLabel1, Me.ToolStripSeparator3, Me.tsbHelp, Me.ToolStripSeparator4, Me.tsbSaveAs})
-        Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
+        Me.ToolStrip1.ImageScalingSize = New System.Drawing.Size(30, 30)
+        Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.LabelDatoteka, Me.tsbFileName, Me.tsbOpenFile, Me.ToolStripButtonPripravi, Me.ToolStripSeparator5, Me.ButtonUrediDat, Me.ToolStripSeparator1, Me.tsbConvert, Me.tsbPointsOnly, Me.ToolStripButtonGeo, Me.ToolStripSeparator4, Me.tsbSaveAs})
+        Me.ToolStrip1.Location = New System.Drawing.Point(0, 24)
         Me.ToolStrip1.Name = "ToolStrip1"
-        Me.ToolStrip1.RenderMode = System.Windows.Forms.ToolStripRenderMode.System
-        Me.ToolStrip1.Size = New System.Drawing.Size(1251, 29)
+        Me.ToolStrip1.Padding = New System.Windows.Forms.Padding(10, 5, 10, 5)
+        Me.ToolStrip1.Size = New System.Drawing.Size(1251, 47)
         Me.ToolStrip1.TabIndex = 0
         Me.ToolStrip1.Text = "ToolStrip1"
         '
+        'LabelDatoteka
+        '
+        Me.LabelDatoteka.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.LabelDatoteka.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_close_window_50
+        Me.LabelDatoteka.Name = "LabelDatoteka"
+        Me.LabelDatoteka.Size = New System.Drawing.Size(30, 34)
+        Me.LabelDatoteka.Text = "Datoteka"
+        Me.LabelDatoteka.ToolTipText = "Ni datoteke"
+        '
+        'tsbOpenFile
+        '
+        Me.tsbOpenFile.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_opened_folder_50
+        Me.tsbOpenFile.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.tsbOpenFile.Name = "tsbOpenFile"
+        Me.tsbOpenFile.Size = New System.Drawing.Size(91, 34)
+        Me.tsbOpenFile.Text = "Odpri GSI"
+        Me.tsbOpenFile.ToolTipText = "Izberi GSI datoteko..."
+        '
+        'ToolStripSeparator5
+        '
+        Me.ToolStripSeparator5.Name = "ToolStripSeparator5"
+        Me.ToolStripSeparator5.Size = New System.Drawing.Size(6, 37)
+        '
+        'ButtonUrediDat
+        '
+        Me.ButtonUrediDat.Enabled = False
+        Me.ButtonUrediDat.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_edit_50
+        Me.ButtonUrediDat.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.ButtonUrediDat.Name = "ButtonUrediDat"
+        Me.ButtonUrediDat.Size = New System.Drawing.Size(69, 34)
+        Me.ButtonUrediDat.Text = "Uredi"
+        Me.ButtonUrediDat.ToolTipText = "Uredi podatke GSI datoteke..."
+        '
+        'tsbConvert
+        '
+        Me.tsbConvert.Enabled = False
+        Me.tsbConvert.Font = New System.Drawing.Font("Segoe UI Semibold", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.tsbConvert.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_land_surveying_48
+        Me.tsbConvert.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.tsbConvert.Name = "tsbConvert"
+        Me.tsbConvert.Size = New System.Drawing.Size(81, 34)
+        Me.tsbConvert.Text = "Meritve"
+        Me.tsbConvert.ToolTipText = "Izvozi zapisnik meritev."
+        '
         'tsbPointsOnly
         '
         Me.tsbPointsOnly.Enabled = False
-        Me.tsbPointsOnly.Image = CType(resources.GetObject("tsbPointsOnly.Image"), System.Drawing.Image)
+        Me.tsbPointsOnly.Font = New System.Drawing.Font("Segoe UI Semibold", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.tsbPointsOnly.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_connection_status_on_48
         Me.tsbPointsOnly.ImageTransparentColor = System.Drawing.Color.Magenta
         Me.tsbPointsOnly.Name = "tsbPointsOnly"
-        Me.tsbPointsOnly.Size = New System.Drawing.Size(63, 26)
+        Me.tsbPointsOnly.Size = New System.Drawing.Size(72, 34)
         Me.tsbPointsOnly.Text = "Točke"
-        Me.tsbPointsOnly.ToolTipText = "Points Only"
+        Me.tsbPointsOnly.ToolTipText = "Izvozi koordinate točk."
         '
-        'ToolStripComboBox2
+        'ToolStripButtonGeo
         '
-        Me.ToolStripComboBox2.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
-        Me.ToolStripComboBox2.DropDownWidth = 50
-        Me.ToolStripComboBox2.FlatStyle = System.Windows.Forms.FlatStyle.System
-        Me.ToolStripComboBox2.Items.AddRange(New Object() {"Pika", "Vejica"})
-        Me.ToolStripComboBox2.Name = "ToolStripComboBox2"
-        Me.ToolStripComboBox2.Size = New System.Drawing.Size(75, 29)
-        Me.ToolStripComboBox2.Text = "Pika"
-        '
-        'ToolStripLabel2
-        '
-        Me.ToolStripLabel2.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
-        Me.ToolStripLabel2.Name = "ToolStripLabel2"
-        Me.ToolStripLabel2.Size = New System.Drawing.Size(56, 26)
-        Me.ToolStripLabel2.Text = "Decimale"
-        '
-        'ToolStripComboBox1
-        '
-        Me.ToolStripComboBox1.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
-        Me.ToolStripComboBox1.FlatStyle = System.Windows.Forms.FlatStyle.System
-        Me.ToolStripComboBox1.Items.AddRange(New Object() {"Da", "Ne"})
-        Me.ToolStripComboBox1.Name = "ToolStripComboBox1"
-        Me.ToolStripComboBox1.Size = New System.Drawing.Size(75, 29)
-        Me.ToolStripComboBox1.Text = "Da"
-        '
-        'ToolStripLabel1
-        '
-        Me.ToolStripLabel1.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
-        Me.ToolStripLabel1.Image = CType(resources.GetObject("ToolStripLabel1.Image"), System.Drawing.Image)
-        Me.ToolStripLabel1.Name = "ToolStripLabel1"
-        Me.ToolStripLabel1.Size = New System.Drawing.Size(123, 26)
-        Me.ToolStripLabel1.Text = "Uporabi kodiranje"
-        '
-        'ToolStripSeparator3
-        '
-        Me.ToolStripSeparator3.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
-        Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
-        Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 29)
-        '
-        'tsbHelp
-        '
-        Me.tsbHelp.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
-        Me.tsbHelp.Image = CType(resources.GetObject("tsbHelp.Image"), System.Drawing.Image)
-        Me.tsbHelp.ImageTransparentColor = System.Drawing.Color.Magenta
-        Me.tsbHelp.Name = "tsbHelp"
-        Me.tsbHelp.Size = New System.Drawing.Size(71, 26)
-        Me.tsbHelp.Text = "Pomoč"
+        Me.ToolStripButtonGeo.Enabled = False
+        Me.ToolStripButtonGeo.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_drawing_compass_48
+        Me.ToolStripButtonGeo.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.ToolStripButtonGeo.Name = "ToolStripButtonGeo"
+        Me.ToolStripButtonGeo.Size = New System.Drawing.Size(64, 34)
+        Me.ToolStripButtonGeo.Text = "GEO"
         '
         'ToolStripSeparator4
         '
         Me.ToolStripSeparator4.Name = "ToolStripSeparator4"
-        Me.ToolStripSeparator4.Size = New System.Drawing.Size(6, 29)
+        Me.ToolStripSeparator4.Size = New System.Drawing.Size(6, 37)
+        '
+        'tsbSaveAs
+        '
+        Me.tsbSaveAs.Enabled = False
+        Me.tsbSaveAs.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.tsbSaveAs.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_save_as_50
+        Me.tsbSaveAs.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.tsbSaveAs.Name = "tsbSaveAs"
+        Me.tsbSaveAs.Size = New System.Drawing.Size(93, 34)
+        Me.tsbSaveAs.Text = "Shrani ..."
+        '
+        'ToolStripButtonPripravi
+        '
+        Me.ToolStripButtonPripravi.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_send_file_50
+        Me.ToolStripButtonPripravi.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.ToolStripButtonPripravi.Name = "ToolStripButtonPripravi"
+        Me.ToolStripButtonPripravi.Size = New System.Drawing.Size(101, 34)
+        Me.ToolStripButtonPripravi.Text = "Pripravi GSI"
+        Me.ToolStripButtonPripravi.ToolTipText = "Pripravi GSI iz datoteke z točkami..."
+        '
+        'OpenFileDialogTocke
+        '
+        Me.OpenFileDialogTocke.Filter = "Datoteke točk|*.koo;*.txt|All files|*.*"
+        '
+        'MenuStrip1
+        '
+        Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DatotekaToolStripMenuItem, Me.MenuToolStripMenuItem})
+        Me.MenuStrip1.Location = New System.Drawing.Point(0, 0)
+        Me.MenuStrip1.Name = "MenuStrip1"
+        Me.MenuStrip1.Size = New System.Drawing.Size(1251, 24)
+        Me.MenuStrip1.TabIndex = 3
+        Me.MenuStrip1.Text = "MenuStrip1"
+        '
+        'MenuToolStripMenuItem
+        '
+        Me.MenuToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.OdpriGSIToolStripMenuItem, Me.ToolStripSeparator6, Me.PripraviGSIToolStripMenuItem, Me.InfoOAplikacijiToolStripMenuItem})
+        Me.MenuToolStripMenuItem.Name = "MenuToolStripMenuItem"
+        Me.MenuToolStripMenuItem.Size = New System.Drawing.Size(65, 20)
+        Me.MenuToolStripMenuItem.Text = "Program"
+        Me.MenuToolStripMenuItem.TextImageRelation = System.Windows.Forms.TextImageRelation.TextBeforeImage
+        '
+        'OdpriGSIToolStripMenuItem
+        '
+        Me.OdpriGSIToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_tools_50
+        Me.OdpriGSIToolStripMenuItem.Name = "OdpriGSIToolStripMenuItem"
+        Me.OdpriGSIToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+        Me.OdpriGSIToolStripMenuItem.Text = "Nastavitve"
+        '
+        'ToolStripSeparator6
+        '
+        Me.ToolStripSeparator6.Name = "ToolStripSeparator6"
+        Me.ToolStripSeparator6.Size = New System.Drawing.Size(151, 6)
+        '
+        'PripraviGSIToolStripMenuItem
+        '
+        Me.PripraviGSIToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_question_mark_48
+        Me.PripraviGSIToolStripMenuItem.Name = "PripraviGSIToolStripMenuItem"
+        Me.PripraviGSIToolStripMenuItem.Size = New System.Drawing.Size(154, 22)
+        Me.PripraviGSIToolStripMenuItem.Text = "Navodila"
+        '
+        'InfoOAplikacijiToolStripMenuItem
+        '
+        Me.InfoOAplikacijiToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_information_50
+        Me.InfoOAplikacijiToolStripMenuItem.Name = "InfoOAplikacijiToolStripMenuItem"
+        Me.InfoOAplikacijiToolStripMenuItem.Size = New System.Drawing.Size(154, 22)
+        Me.InfoOAplikacijiToolStripMenuItem.Text = "Info o aplikaciji"
+        '
+        'DatotekaToolStripMenuItem
+        '
+        Me.DatotekaToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.OdpriGSIToolStripMenuItem1, Me.PripraviGSIToolStripMenuItem1, Me.ToolStripSeparator3, Me.ShraniToolStripMenuItem, Me.ToolStripSeparator2, Me.IzhodToolStripMenuItem})
+        Me.DatotekaToolStripMenuItem.Name = "DatotekaToolStripMenuItem"
+        Me.DatotekaToolStripMenuItem.Size = New System.Drawing.Size(66, 20)
+        Me.DatotekaToolStripMenuItem.Text = "&Datoteka"
+        '
+        'OdpriGSIToolStripMenuItem1
+        '
+        Me.OdpriGSIToolStripMenuItem1.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_opened_folder_50
+        Me.OdpriGSIToolStripMenuItem1.Name = "OdpriGSIToolStripMenuItem1"
+        Me.OdpriGSIToolStripMenuItem1.Size = New System.Drawing.Size(180, 22)
+        Me.OdpriGSIToolStripMenuItem1.Text = "&Odpri GSI"
+        '
+        'PripraviGSIToolStripMenuItem1
+        '
+        Me.PripraviGSIToolStripMenuItem1.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_send_file_50
+        Me.PripraviGSIToolStripMenuItem1.Name = "PripraviGSIToolStripMenuItem1"
+        Me.PripraviGSIToolStripMenuItem1.Size = New System.Drawing.Size(180, 22)
+        Me.PripraviGSIToolStripMenuItem1.Text = "&Pripravi GSI"
+        '
+        'ShraniToolStripMenuItem
+        '
+        Me.ShraniToolStripMenuItem.Enabled = False
+        Me.ShraniToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_save_as_50
+        Me.ShraniToolStripMenuItem.Name = "ShraniToolStripMenuItem"
+        Me.ShraniToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+        Me.ShraniToolStripMenuItem.Text = "&Shrani..."
+        '
+        'IzhodToolStripMenuItem
+        '
+        Me.IzhodToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_close_50
+        Me.IzhodToolStripMenuItem.Name = "IzhodToolStripMenuItem"
+        Me.IzhodToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+        Me.IzhodToolStripMenuItem.Text = "I&zhod"
+        '
+        'ToolStripSeparator2
+        '
+        Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
+        Me.ToolStripSeparator2.Size = New System.Drawing.Size(177, 6)
+        '
+        'ToolStripSeparator3
+        '
+        Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
+        Me.ToolStripSeparator3.Size = New System.Drawing.Size(177, 6)
         '
         'Form1
         '
@@ -226,15 +336,20 @@ Partial Class Form1
         Me.Controls.Add(Me.StatusStrip1)
         Me.Controls.Add(Me.RichTextBox1)
         Me.Controls.Add(Me.ToolStrip1)
+        Me.Controls.Add(Me.MenuStrip1)
         Me.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(238, Byte))
         Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.MainMenuStrip = Me.MenuStrip1
         Me.MinimumSize = New System.Drawing.Size(1000, 480)
         Me.Name = "Form1"
-        Me.Text = "TPS1100 Converter"
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
+        Me.Text = "TPS1100 Convert"
         Me.StatusStrip1.ResumeLayout(False)
         Me.StatusStrip1.PerformLayout()
         Me.ToolStrip1.ResumeLayout(False)
         Me.ToolStrip1.PerformLayout()
+        Me.MenuStrip1.ResumeLayout(False)
+        Me.MenuStrip1.PerformLayout()
         Me.ResumeLayout(False)
         Me.PerformLayout()
 
@@ -247,17 +362,30 @@ Partial Class Form1
     Friend WithEvents ToolStripSeparator1 As ToolStripSeparator
     Friend WithEvents tsbFileName As ToolStripTextBox
     Friend WithEvents tsbConvert As ToolStripButton
-    Friend WithEvents ToolStripSeparator2 As ToolStripSeparator
     Friend WithEvents tsbSaveAs As ToolStripButton
     Friend WithEvents ToolStrip1 As ToolStrip
-    Friend WithEvents ToolStripSeparator3 As ToolStripSeparator
-    Friend WithEvents ToolStripLabel1 As ToolStripLabel
-    Friend WithEvents ToolStripComboBox1 As ToolStripComboBox
-    Friend WithEvents ToolStripLabel2 As ToolStripLabel
-    Friend WithEvents ToolStripComboBox2 As ToolStripComboBox
     Friend WithEvents ToolStripStatusLabel1 As ToolStripStatusLabel
     Friend WithEvents ToolStripStatusLabel2 As ToolStripStatusLabel
     Friend WithEvents tsbPointsOnly As ToolStripButton
-    Friend WithEvents tsbHelp As ToolStripButton
     Friend WithEvents ToolStripSeparator4 As ToolStripSeparator
+    Friend WithEvents ButtonUrediDat As ToolStripButton
+    Friend WithEvents LabelDatoteka As ToolStripLabel
+    Friend WithEvents ToolStripProgressBar1 As ToolStripProgressBar
+    Friend WithEvents ToolStripButtonPripravi As ToolStripButton
+    Friend WithEvents OpenFileDialogTocke As OpenFileDialog
+    Friend WithEvents ToolStripButtonGeo As ToolStripButton
+    Friend WithEvents ToolStripSeparator5 As ToolStripSeparator
+    Friend WithEvents MenuStrip1 As MenuStrip
+    Friend WithEvents MenuToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents OdpriGSIToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents PripraviGSIToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents ToolStripSeparator6 As ToolStripSeparator
+    Friend WithEvents InfoOAplikacijiToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents DatotekaToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents OdpriGSIToolStripMenuItem1 As ToolStripMenuItem
+    Friend WithEvents PripraviGSIToolStripMenuItem1 As ToolStripMenuItem
+    Friend WithEvents ToolStripSeparator3 As ToolStripSeparator
+    Friend WithEvents ShraniToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents ToolStripSeparator2 As ToolStripSeparator
+    Friend WithEvents IzhodToolStripMenuItem As ToolStripMenuItem
 End Class

Form1.resx

@@ -117,6 +117,29 @@
   <resheader name="writer">
     <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
   </resheader>
+  <data name="RichTextBox1.Text" xml:space="preserve">
+    <value>-------------------------
+Pretvori GSI
+
+1. Odpri GSI datoteko.
+2. Preveri podatke in po potrebi uredi datoteko (gumb "Uredi").
+3A. Za pripravo Zapisnika Meritev klikni gumb "Meritve".
+3B. Za pripravo seznama koordinat točk klikni gumb "Točke".
+4. Shrani podatke z klikom na gumb "Shrani...".
+
+-------------------------
+Pripravi GSI datoteko
+
+A. Uvozi datoteko z koordinatami točk z klikom na "Pripravi GSI".
+   Format datoteke: Pt E N H (Med podatki je presledek ali tabulator)
+B. Izdelana bo GSI datoteka, ki jo nato shranimo z klikom na "Shrani GSI".
+C. Prenesi novo GSI datoeko na instrument v mapo \GSI.
+
+
+
+Zgodovina obdelanih podatkov je zapisana v datoteko...
+Lokacija zapisnika = </value>
+  </data>
   <metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>124, 17</value>
   </metadata>
@@ -126,239 +149,16 @@
   <metadata name="SaveFileDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>383, 17</value>
   </metadata>
-  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
-  <data name="tsbOpenFile.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAADIAAAAyCAYAAAAeP4ixAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAALPSURBVGhD7ZZdSFNhGMefAusmgqS6zCwI3DJQw0pDyAuR
-        AqOClAy8EAm6qQvvu5BqloRYUSanaeqdVPgRgdBN82y6Led0LnN18mM6bfZBVBDb+/QeeuSQZ93U2dwL
-        5wc/HOP17PcfGztgYmJiYrLuRDth63IXXF/uhOf87+C/GOmC/qVuaAh3w3a6bOqJPIL2SCegES50wMJi
-        O1jp0qkl3AEhHqBGGOK8HZbWZcycBMqcHdBIZyVYmn0IufQSqWGmDZQZCdBoFQm+vZfAzh/bjJBf6zxe
-        gY2UrSfEh7xrAxTBtw+gkbL1TLeCEmoFFMHp+xCkbD1Td0GZugcohLyVsvUEboMSvAMogmorZesZbwEl
-        0MIPCaDaStl6/M2gcFEQ/z7E1wSK7xagEPJWytbjvgmKtwkw2U62ZmKwbcd/+VraGcaJi1so/U/cN0Dh
-        YjJd7DuMGLxgiCxY95EF6g5RvobLBgoXk+VCbyHiZK2hskBtD+VrOBpAka8CJsPw0wLEQI3hsvGaZ5QP
-        wN6Ub0b/uW3OxowZl20Tf/eMdf5JHuJEdVJk49V2msGH+Cv96K9EMT1roxl8yNjpYRw7gyLKxk5dphl8
-        yGhFD/pOoogyX0UVzVCHHG/G0RMoorz9GM3gQzxl9cxbhkL6qtxCM/iQkdIq5ilFIZXLMmkGH+I+Wszc
-        JSiaseGSn4iwgWbwId4jWWykCEUzNlI0RxN+g56CjJjrYIy5ClEkebOHJmjEnPlh5sxHkYzLeQOUrxFz
-        7B9m8gH+5RHHuJwrUb5GfCinhw1ZUSTjQ9ZrlK8Rd1iaEx1Ocy9RvgZ/sn7NIRHUbk9WUZ9ccyj9dVi1
-        25NVmGwtTng4nXVacyhfA19adiU8nM7KFu32ZBX1p/7Hi32fE/5DGvp9cO8HStfzdSA7N9q7e/TTQHb0
-        S/+elXRUbVvpy/JGH2fpP1YmJiYmJqkF4BfnTMFL1luHfwAAAABJRU5ErkJggg==
-</value>
-  </data>
-  <data name="tsbConvert.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAADAAAAAwCAYAAABXAvmHAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAV1SURBVGhD7VhbbBRVGN7oi9FoTCy+UKLFN4wvylVae++2
-        lG1LITExMTEsoD5UWlAwbMv0AqVl2+5tZnd2ZvYye2u3tLRYgjFRRAgPxkSfG14E0Zh0tzei0bTwe87M
-        P9NBHhTY0mnSL/my2/87c+Y7//n/ObO1rGENJsXFvILaC+sKbhP+8kXexhoMrx5Q4xPrXgOVBbcwvHqw
-        ZF4lhlcPhvIKIPbSqwrT5DuGVwfmd71bP1lohWlrI0xX7YHJHZUwV9loQ9ncmKvZ1zNfvQ/mq/fCnJWw
-        qpGY3wOzFQ0wU95wGoeZE/PWvfX3m1aNz5bXw2xZHcyU1sF0sW03DjcfZisbr+jZLqu/mCmrXZ8p3pM/
-        U2K7NFOyG2aKd0O2sPYyDjcfZsttd2bL1GxniqvzMWzJFtVvmC7aBdOFhDut8xg2H2ZKa++QbCuZvn8B
-        VRuyO6sh+7YVstsqzLuAbFHNt9Pv1IKabeulzNbqfGp+akfll5ntlZDZVgGZzeXf4HDz4ffCmgY90zuq
-        QDVNuLUCpraUw9TmMri9ubQOh5sP/X5p71fvf6ybzqDpqbdKYerNErj03kHwBOR6HG4+RIbGJ/o5CSJN
-        x+Enchb8trUcft1SBj+SAy3cdAwG/GGQUmPjONxcEOKj+VJyfDE8OA6B6CD0sSI4uga+dnS7LtNF8dEh
-        CKfGIJQYXYimJ9bjZeZBaHCsPTw4ppokFJPnoXNAeP20J7BJIt9pLJSin4TJ0Ta8zBwYHh5+OpQ8f9No
-        coCP/oyyxRWUbxEd6EKk5CgI8XO36DUorzzE5JhNzaxm8jx0u/hPULacdgdbqHGFCZVicmQXyisPKTky
-        oWWXkhUTfzMM8xTKClgp+ZeYGAGd8RFzNDNtXsJFPbPEXLc7OIqyjjMeYQyNE54DQU4vBKLplW9mMT7a
-        bsxsUB6GMwMDG1HW0eVkX+HlNK1/lbFzQP5e2WamjUhM39QyS42d5UKTKD+As1z4hhAbhuASV7aZxdiI
-        Tc8oZvXUWfYDqpEz4To9E5DXaKy9n7MrxskuBcluUAbkoZVrZj6WntCM08y6BflPlCz0iWQkhi0uXv6D
-        lpJOcnyj9GRBm5ePphf1ciBZJc0ro2wRDX1BiWHySOUT9FSmDFBGUsvfzPubW68faGkFI5leHxpXS4GL
-        pODDo4yu0x0xUosf+vQksKEUmh9U2Nbj0XWN9uZWpexyAjqZcfKDR9rAJyaWyoCws89/nwGjRmnUOvs5
-        xbhfYQrIxilzGsfsb3FcxdvnHnxsyKYYM5RCZw/XiLIC1dwSMayAcXkbqHF/eIlsOPnkmpk03oRew+TN
-        0+kPzaGkgwslwUgM6+hjw/NcmGiUdAx5bKG0vBDi8XwunFrU6peyo5/zo6zDK8av+aQ4qJQfKIcOJ8dr
-        i2NDCcIYaebo8p/MxHC7sX49wdg9xuV6EeX/DYbxvOARondZiZjXKMaX92SmpyYbSt401m63m/8e5YdG
-        t8v/A6vtkhinyVjek5nUq42aJiWk1C7NWkePuxLlh0Zbr6fUK8QU8z6RfsbALcrL18zE9GGtbil7WSGD
-        0iPjjJfPeolxuhCvIINHkJtQyj38UryOUxpOrdl2p68XpUfGyV6vkxpH8+DlI7Uo5R6+cOINreFcfOQu
-        +dHyLEqPDIaJPOP0SYueYJT0AGEgtAml3EOSpOe1huty+q9g+LHR2cdepebdfBScsdhzGM49Dh1h8o51
-        9S30eoV7J071b8fwY6Ot27WNPM3ufdbhXPjoKPMyhnMPe7Pjc/U9pTXnp6a9+cQFfA86jqHc48Bhxw16
-        E3uLoxpDOQOdU1kAuQeGcg9yg+/shx1X/v0fh1yAzqnNj6E1rGEN/wmL5R8pbWslvt5YFwAAAABJRU5E
-        rkJggg==
-</value>
-  </data>
-  <data name="tsbSaveAs.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAADIAAAAyCAYAAAAeP4ixAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAbfSURBVGhD7ddJbBvXGQdwH422l5yMBnHoSrYcu/Wi9NhD
-        br32lC5xb22RLmlRt0bRJW3SLXWCuumCHuo0cSTZsmTtEmWJi8w4sdN4k0RS3DkcbkPOSpGS4mVg4N/3
-        3gzlITkF5GEJqIU+4A+JF+n7zffevMddO7VTO7VT/x/1XIDf/ezC6u96FyreXn/FR/PMpBTtHhS1LpoL
-        Ze3r7uy6l1N1H03G+OnlFN2blnVPStLnk5I+lxT12XhZd8dK+kxU0KcjJCuCPhUq6BPBgj6+nNNHl7L6
-        yJ2MPnyT0781FS0cHhd8h6bl1z4/LXzCbMd5UQQJev1mfBUcnJDgOl/azEu+PGq1ddTWNsyso0o+r1bX
-        UFmtQatUoWqrkJUKRFlFWVQglGUUBRH5YhnZvIBMtoB0Jo9EOotYKoNT83EcGi/i0JRMIgWOesqfNFty
-        Vs/6Nb8VYQvx5lnTjak1ItQKJFlDWVJREmW8NPQhXnjnPXyN5KtvBzB3K45UJkcgPGJJDqfm4nhmzIRM
-        yiCroD1Mr18LWBHHKWS8EfI9b441zGI2XwcoFoTIEHQaEo6/7sael8c20381jCSXRTzFI5rg8OO5mAFh
-        CDMT5Q8OX5I+Zbb2eMUgFsRxbyvku54cFHWVNV5vnn6mAFnRmhBkSZVEHGuBhMxpZBBJpA3IaNGCkFgO
-        jEkBR3um12NA6ghbyHwWEmmYNl0P/cwAdE9ICltOBkJCgeyLZkjfe8HNaazEU/jR5RgO1iEmgi5p+r97
-        xqXfm+1tvSjEirCDfGeeZ0/cGroXDAAJAQgEUN/cuUIJx043Qt4NLG9OIxxLPoI0IWj2j0gLZntbr+MU
-        YkEc82gtkG/P8eyJN4Q2XwfQKVgQPHlLNUPOEQibRiyFUDSBk7NRHBwxIFZEz5ixvMz2tl5WCEXYQzKs
-        2ebQ5q2AbJ4gckX2qj12eqYB8s7CEltS4WgSwUgcJ90RBmlGGBDROaSOoKF/zAp58XKGNWuXTQA9KwiC
-        o+cFn2+BvO1fZEsqGElgeSWGkzMr6KGQJkTPmIgDow4hVsTR+VbIN90cO9Row0bo7wJrnk3AAqBnBX3N
-        vjjwPr781gKepznrx8T1IEIMEcdiKIrvU8glA2JF9Iw6hByxQCiCQUblBsgXBjnSYJ41zJI1lg9tnuOt
-        AHrgGWcF3djGG8rY3JuIcBS3gxF8cThKJiLYIdqD1BFH5zRySCkNEFd/AV+ZSKH/Jo/hO2Zu02RYhm5x
-        uHiTwyBLGhdupHD+oyQG/kWTQN/1OPquxXDuWhT/uBrFibEYuga4/4TAgWGHECuC5sicSkYuo3tIRNfF
-        spELAvYN5ElyRvofPy4z3YNF1rgtYsQpZN6EWBBHLj/K52bNuFV81q0YmTFymGaaRmYxLoD1u1PjiW33
-        drJFkOwfFhxCthNipOwQMmtAtg3iUhuQbYUg+YwziBrYToju4f8CZDsg2oZsFwSDDDmE2CGOkLyb/hjC
-        hg714wdQNu5DXr/HIq3dRbm6gdLqOoTKGopaDQW1ipxcQVbSwIsqMmUFXElGmlwq00URCXK1iecExMit
-        YJEr4MwNcpaYECuie8ghhAAMSNMkTt6u4eHDh9B1HQ8ePMD9+/dx79493L17FxsbG1hfX8fa2hpqtRqq
-        1SoqlQo0TYOqqlAUBbIsQ5IkiKKIUqkEQRBQLBZRKBSQz+eRy+XwDb/QgugaKrUBsVlOf4tvdBSRzWbx
-        62uFFgSDXHACcauBZgTdE3+NrnUUwfM8Xv0g34LouugQcsgtGRALgm5sCukkguM4vPI+uXc1IdqDNCHo
-        m+kvkVpHEel0mkFaEINOIVMGpPkV++eVWkcRqVQKv7qabUW0A7E7J94MVzuKSCaTBqQZQbLPMcTmsPtT
-        aLWjiEQigV8GeDtEO5DWE5tCOomIx+MMYoNoD2JF0CvHmWClo4hYLIZfXMnYIbDvvENIM4JBlrWOIiKR
-        CH6+wNkhsLcdSNfZOPaeuY39/Ry7/P1xSe0oYmVlhUFo80+dTeLTf7iBp95chqstCJnAnp968cQLb8H1
-        xnUGeWNR6SgiHA7jZ74Ug1DEEyf+iT0/nDQgfcXHhxyclP10KT39+od48tQkuv++xK7ip+8oHUWEQiH8
-        xGtA6CQo4slXA3ANFOHqy/vN9rZe5On/1u77xIkrckcRwWAQX5rKsj1Bp8BCESR7+wu/MdvberkC/G6K
-        6ZkoewjAVw/5QuR7+YYU8aRE5UqqrC0kS5o/IWi+WFHzRgssngivzQYzLDNLaW16McUydaeeJMv4rbg2
-        djPGMvpRVBu6HlZ+MJeKuAYE36PkfU/3FzwU4TrH7zbb26md2qmd+p+uXbv+DbJ3cbrvrqBwAAAAAElF
-        TkSuQmCC
-</value>
-  </data>
   <metadata name="ToolStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>17, 17</value>
   </metadata>
-  <data name="tsbPointsOnly.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAADIAAAAyCAYAAAAeP4ixAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAYgSURBVGhD7VpdTBxVFEZ88QdZFqSzsyyaNMaHWpPaLn3y
-        xWiUVCiU8tMiaP19McYYk9Yni0/a2lIxBZ2ZLbuF1qSlWuVNURcwKn3zJ8afpDozS2M0RlgSV7NIx3Nm
-        D+ydmbuzP+yK1H7JCXDvueecb+7fuSeUXcX/BoZRvm0y/mEwGv8dpWEqPoFt1Lt+sGV6oRaCN1jBNupe
-        P1jXRAJH9ev9knafqGgv1IVjb9mJYJsoqwf8IfVe1KVh/xEcNMrFkN4qyOp5QdH/EhXdQKkbjllImESg
-        bbkfdQVFe0eUtRa0QdbWAIZxjU+J9QiK+v1ycKxkI8KKIGnfwc9utEnW/x345dnb4YtO2wNiJR8iaVEn
-        A4p+G7kpLfyK1iVK2gI/EBR10afon9ZFYmEHEWjzydpnqMMfCyLrcV9I6yB3pQEE+LwoqZd5AUCAX/gV
-        /dHq0R8qUdft1PJKFz3+kP6YT1K/5NlCHz5Few51iw74Us/wnAqSqsMp9VTZWeNaUjWxfea3yobo3NIK
-        Efgd26g7Bdjk+PVFSb/Is40fjjSLg9Ry4s7EGVG6dAOpOdAwubArOBV/BWX79EIrNTsgjPx8I9gas9lO
-        zYystpPa6oAb27EnzKnXXyzqKYOnoKwfdHww2DOrPwDAOJCIWgyDmCRKBFimfXZ/eEKu6qPhPWE3CnKm
-        pOc9fjzeMpP1vaSRJ2DzOi47SVfd9kSxgD7g1tdY3zAr3xaUAWDawRpC8YXUXuouOeD4fcTuH/K4ndSd
-        OzB3Yo3gPZHvF9l4tsMjRrq3oXilDg815wY8mh33jHaOenMDZqZsAoiClx11Z0Xg1L47A6O943WRhxb9
-        J7sNMbzX8J3oTNaG2seFUOdmUssK8PsEG4Mg6X/eGv7pOurOjlQqnjYAkly+sbMhcLqn1T/Sm6gb6THS
-        JPYYQMDYIHcYNW+2JWoG2zLeKSwg6Cp7OiOEYvdQd3bge4IdjPkRdbkCZ8KNRK3Ubtz8xm7DO9iS8B5v
-        voOGuQKIzLCxgOynrgyA9/Tdn8x7Ueojs6cxU12W+kgshO2bor9UkDYX5nLKQqJmcJdRfbzV8A60vEfD
-        uEBf6BP8h9lYAmFtdDlOjJnU08BCAZvgcSU6dzk4OddGQywwN/ZId3KFxLALiddbjKr+pmT1QCN3uQan
-        5najL24MVpmgIWnAwF85ijzpoyEW1J/sDeZM4rVmw3OsyfD0N22l4RagD5tPvkDMNCSN1RIxj9kVEl2Z
-        SQw0G1VI4uiDhudI41003AL0YfPJFy4RmCaHol0wLYeMloZYgPeEb7gz6U5i5wqJysM7Mi8tWL6mL14M
-        jASj8fdpCIMibPbaUNe4hcRQmoSXJXFkh3HTocZ3aRgXBW92FvbjF/7+nLpcAftic43UlshGouLw/X9U
-        vNq4iYa5AtL6C9ZYsh2/DLDuZB2sLuLzlLpdgZedd6g1gSSqM5F4+YEWUnfFLUOaF4j8zcaS14VopiiQ
-        DrAG8I1N3VmBlx3eE95jTUmTRH9qT+ByynUmEKIce5KNAbLxRF4pCsIsnjFGMIHLN2nEzYxHrOdQ09ZM
-        Gzsj4BkBK+ErNgaQMerNHVgBtBnBVOVh6i45BFnbZ/fvV7Rm6s4D+LBKVQBXDOFjBwsFpFEyoI9UdYYh
-        IuvfFPSwQoCBbouxlIzhc5RUig/zqauds/vFSg5pFAA0Kmsf241itYM0ig7w95LdnyirU6v+eFiKwZKM
-        xbBZbwIyxZyZ1Ez0OcpBij6/4YS2kbRWh1Q1kFugG3PbM2aqMTl3ICX81AaRKtA5lxOcWks+JcbNtguG
-        IOtPOx2ZZ3sMgshUMk2n4m4lU0X/0W4XpWT1XzScYWZA4MyX9cfxeYq6W1yK2OaNjZedpH6dwdaSKGnP
-        om7JgLVYx56xCL6x1ZlA+FLETgTbIPgLIJa0wybzYD/jMiwqzAOAU0plBTNVOxFs4+ky8lHRNnbOgFPG
-        L+l7sALICSg/InDZwU3eSZbXCLBhsQIIM/Q2m2hmI4IJIPwcM9OOQm/sUgEzU0yzIcD9/sjsKTsRbMM+
-        1Mk7i10ruJ1a6wpXDBE4DMoh+Anmn2o+wDbqvYorHGVl/wCgZhyIAWVdbAAAAABJRU5ErkJggg==
-</value>
-  </data>
-  <data name="ToolStripLabel1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAAIAAAACACAYAAADDPmHLAAAABGdBTUEAALGPC/xhBQAAEZJJREFUeF7t
-        nQuMXFUdxttuaZECxUR5BBKFRGxLMDwEBUoohOCDxJjIS6SVGuUhSRFQDG8hGCMhUZOCCj6QlzUBBERB
-        aKGQmbl33u/tdhfasu22tgRbHgVDS9fvu3Pu7p07Z3ZmZ849996Z+yW/7HY7d+45//95P2dEihTJoXXr
-        3hoAR4KTwRJwIVgBbgNPgAXio5GCrngiORA3UsfG4uYZsYS5xEzmlmWygzdWKltvHRzccS+c+Tj4N0iA
-        N8EHYB8Yn4JrxddHCqoMMzvTMDPlWDwx7iabG5I5dTrcKV4TKahKpkonyZxPiqU3ZU6dDo+K10woYaTn
-        o7RZnDBSF+HninjCvAW/32Em83eitPkVSpsHwZfFxyN5LRj+WpnzyeDgdplTp8Na8RpLVjWTSA7J3pXL
-        DTuf2wvuAfuLRyN5JdT1T8ocgmrB6ZBOGRavsYQ2xnLZuxAGJLYdsueHQFQatCsYcz4acKticWMNiSdI
-        cg2cuaZQ3PAcithF/ByMPSuff30mf4fxd7gdQtKZqswh02UvShHrPRSK+5HGdxnjCJfsWZuoNGhHMOZ8
-        kKs3bs3AxdImy5hw/EY4ZD5+zsznRwZS6fKixs/XyBfecDuiI6rVbYczfEiIl0rfkx+RPichKg2aCYak
-        87NOwxLkuPFSabTOkHD+M+KxGal05Ur3MzaVyljdc51SroydyXchLOvc70imCtJnpiAqDdyCIeF8Q+r8
-        cnmzzIhs3F3DZ1Pp0u/cz9nPyp7rhFLpzUvxntNk76hUt0mfaYOoNKDg+INBptG4SeS8LTLD2bxbKG78
-        POp/af8/mSrKnumIbG59Gt28gvsdhe6rGJYGPxam6D8J56fdhoWx2yq+UQqk8Hzdsza53HrpM52ABNDw
-        /am0sgR2mzBHfwmOOygWN5NuwyaMdKsW9QSsHtzP27jbDd2A3kfdd7N0qlb/I/1sB5wgTNI/spyfME2n
-        UQn77Whxy4wkpVzeYpUW7u8hCgaAJnAnNFQ90s91wKgwSf8Izj8Qzk84DUpMM9tRrqKja0X0ZFVg4Ltk
-        n+0UDvDY341up/QzHfJbYZb+EBw/Dy3nmG1Mm9ooWnc5liUHncPvy2QGpZ/pBoaRpU11UFnRT84Xpul9
-        Cee/6nZ+MpVXXlyXyurqf5tsdkjFxJKT3WCuME9vC44/ALzidj5R2JjyFMU5n/xdmKf3haJzpcz5hPWr
-        xDj9wPeEeXpfcSP1V5nzCbtYEuMEEoWJ9WNgzS/0heJG8vsy55MOxtJDDxJSSphmQrG4OQfV5A2wVSae
-        SG6DbfahZ7MXv+9ECVpMZ6pfFx8Nn9AAnIvIMFLSRNDuwE+vUB3cXjf6B8dfBDa67YK/oWdTsoacK9Vt
-        w+XyljnikfAJKfkudwRtstl1UkP1KnDkGbSJmcwvhl1STltwMCwDe3Ak013loLf0U8uYYRRKgcNQCnzo
-        jKwN+9f91BisVLe+ZCZz/7DinzCsiat84fV2ZhbfA0cKk4ZPKNL+4Ha+TVHd8Gqg4ZgHHZ7JDlrjCh0k
-        /FXCnOETGjgL4ey9bucTldO3PQ73MSwRJg2fUNw/LUsAZDoTQX1OGcwWJg2XkNNPhbP/53Y+4aSOK6IR
-        zfmRMKn/QoPmUuTsx9GifRr1/D/x84WEmV6dzQ09iy7PY6jnHgYPVCpjp/Pz+P+G1TWEjUFJRCPk7AKH
-        WQ7wU3DmSWjdf9ToUEPWqt2NRlAOfdt96AJZXZ445/PRErafs1f/RrTFw8IN/gk5/rl6x9foZE8eW8Qq
-        Zwb7ADYIrVLVF6Fvfwqcvc/tfJQKkSP18apwh34hAUhzv6oNGR6yB4yCEQF/599knw06dXsXtalZ7udy
-        rMF1gRvVY4NpFVgKFoH9RDQmxL+hCloElpYrY6tKpdFdHqwBUM0YOEpEQa+a5X6Vq3EVUATLwbQnUYrF
-        TXNSqdJyNFSL6UzFapyyjeL4br95H/izorhZ7le4Vr5bNoMLRHC7Fkq1CxC/zWzbcKwiACUD1xN8QwRP
-        v5rl/gBM67JVvBLME0FVpoSRmoeuLVc2cZ7e2njiY4lwnQiWfjXL/ZzClARUJzzv52IRTM+EuF4MPmCc
-        2d7h3gRXOLzmfhEUfyTL/SwafS4Wt4ETRRA9F+J8IhALXIzxQkHbsjYecDUggqFfzXL/NPbHe8EOsFAE
-        UZsQb85sThxMoeAwqlZwAuhA8fqmwme8SyCy3M/hXB/rQi6QOEUET7sQf2aI92xbeJgIWMJ9Vry2qfAZ
-        T50vzf0+jt2zwed5nd9KsAHbBBN28WBGs61Ejs94WzXIcr/PK3r9bQw5BFvc77SLws2j5AbxmqbCZzx3
-        vjT3tzjAwUvWg8AcsQJb7A/WT9qm5aFR06FVApglfnonJIBnJyM3iSSwOmDRf54IWmAEe5wHJjKJNSSu
-        pm3UsgTwVHEjdQBS9ERDx4kPfWDyhAha4ASbPOG0j6Le0U3i6/0T+vknI0JvOyNH2P8vNTnEySM4BKq9
-        y9euYBN2DT+etI+pYp3jBnANOBcsBP6sBUQ1cBxKgq125CYxdE7/PiWCE1jBJk857cPl35J4dAMzAWcB
-        14JHwO3gcnAm8HbPAFL00aDhrDwropmq1+MBrPtPE0EJrGALHifnaDAbOrfA00ZfFEHxRigJDkGkGo51
-        I1zn52FkSyIIgRdsUXLaRfNqZ+tQS0+FRHAQSoK1zkjacGWvR43DW8TrAy/Y4Ra3TTSOlp4lguGtkAjm
-        ohG4yhnRSZRPkLBoO0a8OvCCDY4BdeMmJbXHy0zF2SIYeoSE8IAzojbsIag6qxcMideFRrBB3Z0CXFUk
-        iZcXfFUEQZ+Q4/dMRtawJkXcq4K7LAIfEK8KjWCLuozB/Q+a1kp+UwRBjxJG+no7kjymzaP9fZeJ14VG
-        sMdltl1sNK2YukQEwTvB6bMTZmaZ3SVk67/Zqd6KCN3VbbDLAqfzCc8AkMRNNZeLIKgX6vV5cP5V+DnM
-        CCXM9Hix6Pl08EcgdDthYZ/ZoG7LnKIbTFpxlQiCOsXi5qGow25G/W4tg2IDj+Pcmro2G0UwQifYqu7c
-        H5aUkvipZoV4ffeCw49CMb8SPyeOduHQZlXvtq/nRXBCJ9jredtuRNPu5+7vH0BuX4hc/ggCXXeah+pD
-        mNsksLN/rQSb1c0OEg2lZvezh0gAj7kDTnxaAfSQCFboBJs95LahhnmBW8XrOxdy/y/dASea6jA3K0Ww
-        QifYrOGI3ErV867gHeL1nQsBvcMdcMIVwJIXek1PJYCyutFRGbyDqPsziNHou9UdcIIGoeylXtNTVYDC
-        4XEnH4L7gJr5ElQB17kDbuN4qS56qhHYxTVzMnaCX4BDxSvVCI1A6Q2ZROO0pk3PdAOJoi10W8FPwMHi
-        VWqFKuBsd8BtFKfgduiZgSDSZQbiaSZXAG9vGkECOMsdcBsfVgL3zFAwh85dcWuX18AFYOISa08VS5gN
-        16Ta+HQCSE9MBnU4jvKO+Ep9QhugIfA2Pu0F7Inp4A5XCL/F78NPPbmfQgKY5w68jU8ngIV+QQjpcM/g
-        mPhKvUKAG/YCklxuWBZIrwn9kjDS4TDwJvGVeoWGoPRYdw0HIcgI/aLQLkZR2eXTf1VMPGG+64yAjQc7
-        XdoltMvCSZcZJwYOEl+vRwkjJd0BxEuMXIHTRWg3hhAFW+lzQO2I31RCFSDd+OHTjCAJ6dYwpesohsFn
-        xKu8FRLAamcknCg+AWM6hG5zKFHcc+K5xseK13mnWNw8HO2AFaDojhCJG8nxdLps3Wmn8aqXUG0Pt+yU
-        4MnpyudPtoPjxWu9FxLDAkTkHpQKm52Rc8JWbhc3YU2H0BwQQXJ5z7rNnAlcLF6tT0gI56BU+CMSg7SX
-        UIN34RWsMQMP5g7YFgj8ETFEwxF6vIL+ayIIeoVSYf9YwrwECeIZRFY6ZmDDYpC7hhSuhgn4IVE1WBq6
-        wu0FL4tgqFc2PzQLtByDRkI4FKXC1cj5LwHrHF03bDMovkUksMfEESZ4SZi94F8iGN4ICWA2mMuf4k9T
-        Kp5I3eA2BvFgDoFVQeAOiiQJI606sU/Fz0VQvBcSwcBUJQJKAh6pnnYag3i4nyBQR8XWMHSen8gjZL1Z
-        FdSJUA1Il5OXyp6uIQjEYdE1DF31vs0yERz/ZCRzVomAhh5zQ10fmGgaOvbxuPhJNGyUdRITwfFfyPkD
-        KP4lA0ZKj0xthfYLI5zx1LxQhuv//bkvSCbk/pvrDVIjq/8WETYMPbkyBvHhIhlxZcxkHNng82it/1QE
-        Z7MMcv6xMETDZdDs+0/VEvZ4gETppVGIj3VplDN+hPv9fbggk8PAnxRB818o/l9zG4ZoOg2jFR1fG4c4
-        zAHLQUPVZiZzuo/IdfIDEUT/hVz+Q7dxiM+3iMjYhfCsAkvRJlkE5zVcHGkm8/uhOF+EOC1FHHj83S5n
-        nEgyVfS6R9OKlAiu/0LRfwQaPzvdRiI+rRtsm3JlbE8uPzKaShVHEkZqBGEeBY6Tzmpw/IIjetaMp0eX
-        YjGj8LSVNrqPnAn1bcyjQSj6OQdQZzAbn9YNdgydwB1PnKvg9m1Ob+sowbjHgqWlbTdOoE0xiPSgML3/
-        QjE5EwmAuabO8TZsAGo8IDmM7Mlmh+p2DTlh49K1xuJt8Clh/mAobiTZMpZGgLC+dEQgYpK9cO4pufzw
-        0ah+ZMvuPkYG2o6S4TVUC8+hl3EvSqOvCLMHSygFXpZEYIKA9ASCxkdIAIcIE3Lx7ddjcXMJnP4lMPH3
-        UAgBPh6Obhj+nYQjgdoHSQIPcvTVwoThFxLBr+XOryG7PEnTmblBJifMF25xIgh95/nI6W/JnG/jw5Bw
-        GNA2eeWZ0tmqNaCCRHClzPFOfNpWHmTus4wYZmVyQwOpTNm60BgNwqzM8TY8JVM2mMKxdF6mwLEDH7ed
-        +QFX9QZmXWPHQiKYZ6YKrAoadsS44a4ilgScOs2gWuCYuvP/fdx25hehO/egQUgAs1AVWMuSkMv/4nRo
-        M9BwXAtedP89mw3XCKICVltGDLuQCD7Bn3EjdTgahFwZvEYGnP57cI712UTy0+4E0IfjBltoi74U2gwN
-        J2hovFgpKAwLc/SXajOJjbNvGpePBYWCMEl/CcX/XW7nEx0zcK2ozQRqW+XT/cneYRNy/xy0B7a7nc+1
-        dRIDBQrOcCpKpFy7eKMwSW/LvZEEuX+Z2/kk6d/BE23DaVrO2XdZQnBhR/cneodBsu1k6CpKF5JoulCp
-        Y7jL2Q4rxzM6TAQ89fRCYYr+U8JM8/Zx6bZyFRcs0ykcTOKefNULUuh0Z3g5iDXNRMB9C+cLU/SnDDMj
-        bfyRboeBWTdzEcrkdxrSz3VCobjB8b2TmMlsu2sF3wF6LnUOsmqLH4x3ZMakw7oZCGIV4v5OFQ025nLO
-        Y7i/24bT3S1KG+5dDP/MnyqhEbggljCk5w4RFrXTXUTC6kP2XSqut+O8BRp+P0MvhbeoSd9jmOlmx+hv
-        AaE76NpzoSt4ANoCf5IZs4YxnoNTW+Vg/P8mOOjPeEY6CaWoHbC3UNgwE4mAg1f/db/Dht1Y10DWGyA0
-        p5v6IpQG34Wzd8sMSrhkeoo7iT8oV8bOFN+Tkj2v6IauUSuwEN7zHSTc3fi5RbzzFfAy/vYCGrh/S6XL
-        v0EiuB3Vxk147gjxWKSpFIubxyERVJ2Oc8MGoqvF/T5yvzWpROF56RlFitYjBv5swtALVcKByFGPypxo
-        w4aY2H+/q1rddrp41FKzBKDopI7ub+KM1J7iRvIKOK5hp/Ekxk609k8VH59Q0wSgZgPnueI1kXQI9ekJ
-        gItFUL8aq1EyPBM3Ug/i9ztRCnxBfKxOzRKAgvUFHLOfL14TKahCgmnYyVuDBzZNux1Ap/PwqSpYJV4R
-        KchCQ5Jn9ki7aLn8iNOxu0ABvAgeAXeD68G3wGLwOaD/coZI3Qu5/Xg0JuHz5JMoEe7G7zcbZu7baDMs
-        LpVGj64Obh8QH40UZGXz62eCWeKfkfpRTABMCOKfUmXzQ1FRHSlSJIdQakT1/JSaMeP/yToI3IKwINIA
-        AAAASUVORK5CYII=
-</value>
-  </data>
-  <data name="tsbHelp.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAYWSURBVEhLjVV5TNN3FC/qFmYy8QiBP0aiQmZcPcphwQYK
-        QhVHIkXBokSosEzOcgaEESyhIJajayYeEwlDAiog8SAQ5wDBecBg0hZajpZDZLp5Ts7CzNt7v3bZFkfm
-        Sz7w+H3f9/Pe912w/k96d+1arQ4O3q+OiJBqYmPPauLizqjDw4+pgoKCRoTClWaz95OcnJwNKYWFoelF
-        RcEVCQnJaomkQldWZhxqb4exoSF4PDHBgPShtjbQlJfPaeLjy8sSE5PoTlJxcRhxmOn+LZn5+fzs3Nys
-        y2lp3KaDB2/e3roVVAoFTALAHGIesWAG6fTtDUKVnQ132GxoEosbL6Wnb0MOaVZenoeZ1iTkFQ9kpBsE
-        gm863N1BtWcPDAYGwlRfH9IAGOfmwGg0moD6W/w2pVaDYfdu6PPxgW4eD4a9vRXEcVQuz5UeP/4p6Yxg
-        WsKrUlM9+728Cm+jcZ9IBAaxGAaCg2E0IwOMs7PwBzkxO6BXGKenYTw1FcYOHYJxtB3cuxfueniAyssr
-        83RWlkcacjLkmLePvlIohFf9/b/9kcsFjVAIg0isj4mB4eRkGERnE8XFTFpmzTAinsjlMIJn42jzSCJh
-        HPXj3Q4OB64LhScziooCiJtxoszISG8OCIBOFxfQCgRgiI4GQ0IC81u7bx+0b9kCHZmZ0FVRMdlVXT31
-        U3o6dGzaBHpM4aOoKBglBxSQry88xO/Nfn6gyMxMY8hJGgICcnRaLby4cwcGQkNBFxQE+iNHQOPvD7fw
-        VQ3e3jdvuru7djk7f1Dz2WcfNvF42xs9PZvb8GwAox6LjAQDOhsOCYGXLS2g6+mBG0JhtoncxWX9DwkJ
-        95+9pbIBzLx6BWP5+dCDRbvl5ATXzIX7L7m2Y0dJu7Mz9KPthEwG08+fMxzP5uehOTq6tZHL/YRV7+Eh
-        vFtSMjeFB3PYHZRrKqiuoABqOJxuM9eiUs/h9A7m5f3dvtgE1NqtxcXTdTyeH6vO1ze18/Jlpnhz2C2z
-        2B3kYGRsDOoEghQzz6JSKxAcHRkfZ+7QXeKYQf1BVRXU+PhIWBf9/I53Xb/ODM4sOUBQNOrWVqjg8YRm
-        nkWl0t39YN+9e8wdIqcsULAddXVw0dc3i1Xp45P1oLaWaT3GAUZB0q/RwPlt27408ywq593cJEMDA8yd
-        v15Awd6rroYKT89UVqmTU0jr2bNv6SPljyJZWFgATUoKlDo41Jt5FpVz9vYNKmxhShHdnUUO4vpeqZw/
-        x+EEsU6uX+9yJTFxmApDfTSJuR/FCe3DDrq6eTN87ei4z8z1jhQ7Oh6ow77vxk7S48S/efwYGQB+R9TG
-        xmqV69ZtYQxPu7kph0dH4UVDAwzgDBAM4eHQg2ujGgkK2ewYxvAfUsRmJ1RiAJ07d4IObdU4Bxqc7OdN
-        TWAYGYFTXG6R2ZTFkoWGZlfj0Kjs7KAfh4vWhB6nWI87Ro1ObtjbQ2Vg4EhpcHB16YEDF6tEotF6Bwfo
-        wjMd2mjRXof2tCDvI8cFNzeQicWmQSM5JpcH59rYqButrKAfLw2GhZkc0EXcluO4kqn0v01NMSB9NDcX
-        evCMyLW4LnpxA6i8veHKihWQY23dKS0sFEml0iUs/LE8W6n8QhoSwi9fvfouRdCPzx7EyGhl0E6aw+5g
-        io/TTqCCUrf0JyWBClPTiwGpcIc14135kiVtUpHITXbyZDhxMy84oVCIjmZkHGL05csf/Ywp0bq6ghZf
-        8xp3Pk3oNEY+MzPDgHRy+Kq3Fx6iTTemt23tWpBbWhqII7egICw3P38/6YzU1NQsVZ45I9vu789ftWqV
-        VaSFRcs1FguelZQgjWkFGLF1qY0JpJMDkl9OnYJLaBtlYXEVqSxSZDJ+gVIpI04Tu1nEYrFlZExMUqhE
-        kszl8U5Eubq+LouPBz1u2MmnT5n+pjYmkP7myRPQ4/9lsol2cfmVz+enhMXFRX534UJSeXm5pZn2XVmz
-        Zs0GGzu7PUutrXfhn/s3WlgoDrPZbflBQaPKiIiXBBl21OGNG1vw7ATafL7M1tZlpa0t38bKah1D8p5C
-        T6QiLUN8jLBHbEKwEURk+m9lsltEWKw/AT0RdASsd2/NAAAAAElFTkSuQmCC
-</value>
-  </data>
+  <metadata name="OpenFileDialogTocke.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>519, 17</value>
+  </metadata>
+  <metadata name="MenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>684, 17</value>
+  </metadata>
+  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
   <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
         AAABAAkAAAAAAAEAIACAOAAAlgAAAICAAAABACAAKAgBABY5AABgYAAAAQAgAKiUAAA+QQEASEgAAAEA

Form1.vb

@@ -1,31 +1,131 @@
 Imports System.IO
+Imports System.Runtime.InteropServices.ComTypes
 
 Public Class Form1
-    Private Sub tsbOpenFile_Click(sender As Object, e As EventArgs) Handles tsbOpenFile.Click
+    Public DatotekaLogfile As String = My.Settings.DatLogfile
+    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
+        If DatotekaLogfile = "" Then
+            DatotekaLogfile = System.IO.Path.Combine(My.Computer.FileSystem.SpecialDirectories.MyDocuments, "tps1100_log.txt")
+            My.Settings.DatLogfile = DatotekaLogfile
+            My.Settings.Save()
+        End If
+        My.Forms.Form1.Text = My.Application.Info.Title + " " + My.Application.Info.Version.Major.ToString + "." + My.Application.Info.Version.Minor.ToString
+        RichTextBox1.AppendText(My.Settings.DatLogfile.ToString)
+
+        If My.Settings.Pisava = "" Then
+            My.Settings.Pisava = RichTextBox1.Font.Name
+            My.Settings.PisavaVelikost = RichTextBox1.Font.Size
+            My.Settings.Save()
+        End If
+        RichTextBox1.Font = New Font(My.Settings.Pisava, My.Settings.PisavaVelikost)
+    End Sub
+
+    Public Sub OdpriDatotekoGsi()
+        OpenFileDialog1.ReadOnlyChecked = False
         If OpenFileDialog1.ShowDialog = DialogResult.OK Then
-            tsbFileName.Text = OpenFileDialog1.SafeFileName
             RichTextBox1.Clear()
+            ToolStripProgressBar1.Value = 0
+            streamLines = 0
+            Dim streamReader As StreamReader = New StreamReader(OpenFileDialog1.FileName)
+            Do Until streamReader.EndOfStream
+                RichTextBox1.AppendText(streamReader.ReadLine + vbCrLf)
+                streamLines = streamLines + 1
+            Loop
+            ToolStripProgressBar1.Maximum = streamLines
+            streamReader.Close()
+            streamReader.Dispose()
+
+            My.Settings.Datoteka = OpenFileDialog1.SafeFileName
+            My.Settings.ZadnjaMapa = Path.GetDirectoryName(OpenFileDialog1.FileName)
+            tsbFileName.Text = My.Settings.Datoteka
+            ToolStripStatusLabel1.Text = My.Settings.ZadnjaMapa
             tsbSaveAs.Text = "Shrani ..."
             tsbSaveAs.Enabled = False
+            ShraniToolStripMenuItem.Enabled = False
             tsbConvert.Enabled = True
             tsbPointsOnly.Enabled = True
+            ToolStripButtonGeo.Enabled = True
+            ButtonUrediDat.Enabled = True
+            RichTextBox1.BackColor = SystemColors.Info
+            LabelDatoteka.Image = My.Resources.icons8_ok_50
+            My.Settings.Save()
         Else
             tsbFileName.Text = "Odpri GSI datoteko..."
             RichTextBox1.Clear()
             tsbSaveAs.Text = "Shrani ..."
             tsbSaveAs.Enabled = False
+            ShraniToolStripMenuItem.Enabled = False
             tsbConvert.Enabled = False
             tsbPointsOnly.Enabled = False
         End If
+        OpenFileDialog1.Dispose()
     End Sub
 
-    Private Sub tsbConvert_Click(sender As Object, e As EventArgs) Handles tsbConvert.Click
-        RichTextBox1.Clear()
-        RichTextBox1.AppendText("TPS 1100 GSI Conversion" + vbCrLf + "++++++++++++++++++++++++++++++++" + vbCrLf)
+    Public Sub PripraviDatotekoGsi()
+        If OpenFileDialogTocke.ShowDialog = DialogResult.OK Then
+            RichTextBox1.Clear()
+            Dim streamReader As StreamReader = New StreamReader(OpenFileDialogTocke.FileName)
+            Do Until streamReader.EndOfStream
+                streamLines = streamLines + 1
+                Dim readLine As String = streamReader.ReadLine().Replace(" ", vbTab)
+                readLine = readLine.Replace(";", vbTab)
+                readLine = readLine.Replace(".", ",")
+                Dim line() As String = readLine.Split(vbTab)
+                Dim podPtId As String = "*11" + Format(streamLines, "0000") + "+" + line(0).PadLeft(16, "0") + " "
+                Dim izrE As Double = line(1) * 1000
+                Dim podE As String = "81..00+" + Format(izrE, "#0000000000000000") + " "
+                Dim izrN As Double = line(2) * 1000
+                Dim podN As String = "82..00+" + Format(izrN, "#0000000000000000") + " "
+                Dim izrH As Double = line(3) * 1000
+                Dim podH As String = "83..00+" + Format(izrH, "#0000000000000000") + " "
+                ' Dim podE As String = "81..00+" + izrE2.PadLeft(16, "0") + " "
+                RichTextBox1.AppendText(podPtId + podE + podN + podH + vbCrLf)
+            Loop
+            ToolStripProgressBar1.Maximum = streamLines
+            streamReader.Close()
+            streamReader.Dispose()
+            ToolStripStatusLabel1.Text = "Prebrano: " + streamLines.ToString + "/" + ToolStripProgressBar1.Maximum.ToString + " vrstic"
+            SaveFileDialog1.Filter = "GSI datoteka|*.GSI"
+            SaveFileDialog1.FileName = Path.GetFileNameWithoutExtension(OpenFileDialogTocke.FileName)
+            tsbSaveAs.Enabled = True
+            ShraniToolStripMenuItem.Enabled = True
+            tsbSaveAs.Text = "Shrani GSI"
+        End If
+    End Sub
 
+    Public Sub ShraniDatoteko()
+        SaveFileDialog1.FileName = Path.GetFileNameWithoutExtension(OpenFileDialog1.FileName)
+        SaveFileDialog1.InitialDirectory = My.Settings.MapaShrani
+        If SaveFileDialog1.ShowDialog = DialogResult.OK Then
+            RichTextBox1.SaveFile(SaveFileDialog1.FileName, RichTextBoxStreamType.PlainText)
+            My.Computer.FileSystem.WriteAllText(DatotekaLogfile, System.DateTime.Now.ToString("yyyy/MM/dd HH:mm:ss") + " | " + OpenFileDialog1.FileName.ToString + " -> " + SaveFileDialog1.FileName.ToString + vbCrLf, True)
+            My.Settings.MapaShrani = Path.GetDirectoryName(SaveFileDialog1.FileName)
+            My.Settings.Save()
+            ToolStripStatusLabel1.Text = "Datoteka shranjena >>> " + SaveFileDialog1.FileName.ToString
+            RichTextBox1.BackColor = SystemColors.ControlLightLight
+            ShraniToolStripMenuItem.Enabled = False
+        End If
+    End Sub
+
+    Public streamLines As Integer = 0
+
+    Private Sub tsbConvert_Click(sender As Object, e As EventArgs) Handles tsbConvert.Click
+        ToolStripStatusLabel1.Text = "Procesiranje..."
+        RichTextBox1.Clear()
+        RichTextBox1.BackColor = SystemColors.Info
+        RichTextBox1.AppendText("TPS 1100 Zapisnik" + vbCrLf + "++++++++++++++++++++++" + vbCrLf)
+        ToolStripProgressBar1.Maximum = streamLines
         ' prepare StreamReader
         Dim streamReader As StreamReader = New StreamReader(OpenFileDialog1.FileName)
         Dim i As Integer = 0
+        Dim PodatkiStojisce As Boolean = False
+        Dim dataStolpci As String = ""
+        If My.Settings.Stolpci = 0 Then
+            dataStolpci = " "
+        ElseIf My.Settings.Stolpci = 1 Then
+            dataStolpci = vbTab
+        End If
+        Dim dataKoda As String = ""
 
         ' loop untill end of stream
         Do Until streamReader.EndOfStream
@@ -33,16 +133,16 @@ Public Class Form1
             Dim line() As String = streamReader.ReadLine().Split(" ")
             ' Remove * sign from index line
             line(0) = Replace(line(0), "*", "")
-
+            ToolStripProgressBar1.Value = i
             ' Check if it's a new station setup
             If Microsoft.VisualBasic.Left(line(1), 2) = "25" Then
-                RichTextBox1.AppendText(vbCrLf + "Station:" + vbCrLf + "*************" + vbCrLf)
-                'RichTextBox1.AppendText("PtName:" + vbTab + "Hz.Corr.:" + vbTab + "StnE:" + vbTab + "StnN:" + vbTab + "StnH:" + vbTab + "Refl.h.: " + vbTab + "Inst.h.: " + vbCrLf)
+                RichTextBox1.AppendText(vbCrLf + "Station:" + vbCrLf + "****************" + vbCrLf)
+                RichTextBox1.AppendText("PtID" + dataStolpci + "HzCor" + dataStolpci + "StnE" + dataStolpci + "StnN" + dataStolpci + "StnH" + dataStolpci + "RefHt" + dataStolpci + "InstHt" + vbCrLf)
             End If
 
             If Microsoft.VisualBasic.Left(line(1), 2) = "84" Then
-                RichTextBox1.AppendText(vbCrLf + "Station:" + vbCrLf + "*************" + vbCrLf)
-                'RichTextBox1.AppendText("PtName:" + vbTab + "StnE:" + vbTab + "StnN:" + vbTab + "StnH:" + vbTab + "Refl.h.: " + vbTab + "Inst.h.: " + vbCrLf)
+                RichTextBox1.AppendText(vbCrLf + "Station:" + vbCrLf + "****************" + vbCrLf)
+                RichTextBox1.AppendText("PtID" + dataStolpci + "StnE" + dataStolpci + "StnN" + dataStolpci + "StnH" + dataStolpci + "RefHt" + dataStolpci + "InstHt" + vbCrLf)
             End If
             ' Seaparate word index and data
             For Each readLine As String In line
@@ -55,151 +155,222 @@ Public Class Form1
 
                     ' data is always 17 characters long and is read from right to left and has a +/- sign in first place
                     Dim data As String
+                    Dim dataTmp As String
                     Dim numData As Double
                     data = Microsoft.VisualBasic.Right(readLine, 17)
 
                     If wordIndex = "11" Then
                         data = Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
                     ElseIf wordIndex = "19" Then    ' Date/Time
-                        data = "DateTime= " + Microsoft.VisualBasic.Right(data, 8)
+                        data = dataStolpci + "DateTime= " + Microsoft.VisualBasic.Right(data, 8)
                     ElseIf wordIndex = "21" Then    ' Horizontal angle
                         numData = data / 100000
-                        data = Format(numData, "0.0000")
+                        data = dataStolpci + Format(numData, "0.0000")
                     ElseIf wordIndex = "22" Then    ' Vertical angle
                         numData = data / 100000
-                        data = Format(numData, "0.0000")
+                        data = dataStolpci + Format(numData, "0.0000")
                     ElseIf wordIndex = "25" Then    ' Hz. Orientation correction
                         numData = data / 100000
-                        data = "HzCor= " + Format(numData, "0.0000")
+                        data = dataStolpci + Format(numData, "0.0000")
                     ElseIf wordIndex = "31" Then    ' Slope distance
                         numData = data / 1000
-                        data = Format(numData, "0.000")
+                        data = dataStolpci + Format(numData, "0.000")
                     ElseIf wordIndex = "32" Then    ' Horizontal distance
                         numData = data / 1000
-                        data = Format(numData, "0.000")
+                        data = dataStolpci + Format(numData, "0.000")
                     ElseIf wordIndex = "33" Then    ' Height difference
                         numData = data / 1000
-                        data = Format(numData, "0.000")
+                        data = dataStolpci + Format(numData, "0.000")
                     ElseIf wordIndex = "34" Then    ' Stationing
                         numData = data / 1000
-                        data = "Station= " + Format(numData, "0.000")
+                        data = dataStolpci + "Station= " + Format(numData, "0.000")
                     ElseIf wordIndex = "35" Then    ' Info za offset???
                         numData = data / 1000
-                        data = "Offset= " + Format(numData, "0.000")
+                        data = dataStolpci + "Offset= " + Format(numData, "0.000")
                     ElseIf wordIndex = "41" Then    ' Code
                         'numData = data
-                        'data = "Code= " + numData.ToString
-                        If ToolStripComboBox1.Text = "Da" Then
-                            If data = "+0000000000000010" Then
-                                data = vbCrLf + "Setup: Quick Set" + vbCrLf + "============================="
+                        dataKoda = Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
+                        If My.Settings.KodeUporabnik = "Da" Then
+                            If dataKoda = My.Settings.KodaQuickSet Then
+                                data = vbCrLf + "Setup: Quick Set" + vbCrLf + "======================" + vbCrLf + "Hz" + dataStolpci + "V" + dataStolpci + "SD"
+                                PodatkiStojisce = True
                             End If
-                            If data = "+0000000000000020" Then
-                                data = vbCrLf + "Setup: Set Hz" + vbCrLf + "=============================" + vbCrLf + "PtID    HZ    V    SD    HD    RefHt    PrCon    HtDif    E        N        H        PtCode"
+                            If dataKoda = My.Settings.KodaSetAzi Then
+                                data = vbCrLf + "Setup: Set Hz" + vbCrLf + "======================" + vbCrLf + "PtID" + dataStolpci + "HZ" + dataStolpci + "V" + dataStolpci + "SD" + dataStolpci + "HD" + dataStolpci + "RefHt" + dataStolpci + "PrCons" + dataStolpci + "HtDif" + dataStolpci + "PtCode"
+                                PodatkiStojisce = True
                             End If
-                            If data = "+0000000000000030" Then
-                                data = vbCrLf + "Setup: Resection" + vbCrLf + "=============================" + vbCrLf + "PtID    HZ    V    SD    HD    RefHt    PrCon    HtDif    E        N        H        PtCode"
+                            If dataKoda = My.Settings.KodaResection Then
+                                data = vbCrLf + "Setup: Resection" + vbCrLf + "======================" + vbCrLf + "PtID" + dataStolpci + "HZ" + dataStolpci + "V" + dataStolpci + "SD" + dataStolpci + "HD" + dataStolpci + "RefHt" + dataStolpci + "PrCons" + dataStolpci + "HtDif" + dataStolpci + "PtCode"
+                                PodatkiStojisce = True
                             End If
-                            If data = "+0000000000000040" Then
-                                data = vbCrLf + "Setup: Free Station" + vbCrLf + "=============================" + vbCrLf + "PtID    HZ    V    SD    HD    RefHt    PrCon    HtDif    E        N        H        PtCode"
+                            If dataKoda = My.Settings.KodaFreeStation Then
+                                data = vbCrLf + "Setup: Free Station" + vbCrLf + "======================" + vbCrLf + "PtID" + dataStolpci + "HZ" + dataStolpci + "V" + dataStolpci + "SD" + dataStolpci + "HD" + dataStolpci + "RefHt" + dataStolpci + "PrCons" + dataStolpci + "HtDif" + dataStolpci + "PtCode"
+                                PodatkiStojisce = True
                             End If
-                            If data = "+0000000000000050" Then
-                                data = vbCrLf + "Setup: Orientation & Ht. transfer" + vbCrLf + "=============================" + vbCrLf + "PtID    HZ    V    SD    HD    RefHt    PrCon    HtDif    E        N        H        PtCode"
+                            If dataKoda = My.Settings.KodaOriHtTrans Then
+                                data = vbCrLf + "Setup: Orientation & Ht. transfer" + vbCrLf + "======================" + vbCrLf + "PtID" + dataStolpci + "HZ" + dataStolpci + "V" + dataStolpci + "SD" + dataStolpci + "HD" + dataStolpci + "RefHt" + dataStolpci + "PrCons" + dataStolpci + "HtDif" + dataStolpci + "PtCode"
+                                PodatkiStojisce = True
                             End If
-                            If data = "+0000000000000090" Then
-                                data = vbCrLf + "Measured:" + vbCrLf + "-------------------" + vbCrLf + "PtID    HZ    V    SD    HD    RefHt    PrCon    HtDif    E        N        H        PtCode"
+                            If dataKoda = My.Settings.KodaMeasOri Then
+                                data = vbCrLf + "Orientacija:" + vbCrLf + "----------------------" + vbCrLf + "PtID" + dataStolpci + "Azi" + dataStolpci + "V" + dataStolpci + "SD" + dataStolpci + "HD" + dataStolpci + "RefHt" + dataStolpci + "PrCons" + dataStolpci + "HtDif" + dataStolpci + "E" + dataStolpci + "N" + dataStolpci + "H" + dataStolpci + "PtCode"
+                                PodatkiStojisce = False
                             End If
-                            If data = "+0000000000000099" Then
-                                data = "Imported:" + vbCrLf + "-------------------"
+                            If dataKoda = My.Settings.KodaMeas Then
+                                data = vbCrLf + "Merjeno:" + vbCrLf + "----------------------" + vbCrLf + "PtID" + dataStolpci + "Azi" + dataStolpci + "V" + dataStolpci + "SD" + dataStolpci + "HD" + dataStolpci + "RefHt" + dataStolpci + "PrCons" + dataStolpci + "HtDif" + dataStolpci + "E" + dataStolpci + "N" + dataStolpci + "H" + dataStolpci + "PtCode"
+                                PodatkiStojisce = False
                             End If
-                            If data = "+00000000STA_OFFS" Then
-                                data = "Offsets: " + vbCrLf
+                            If dataKoda = My.Settings.KodaUserImport Then
+                                data = vbCrLf + "Imported/User-Entered:" + vbCrLf + "----------------------" + vbCrLf + "PtID" + dataStolpci + "E" + dataStolpci + "N" + dataStolpci + "H"
+                                PodatkiStojisce = False
+                            End If
+                            If dataKoda = My.Settings.KodaStojisce Then
+                                data = vbCrLf + "Stojišče Info:" + vbCrLf + "----------------------" + vbCrLf + "StID" + dataStolpci + "InstHt" + vbCrLf
+                                PodatkiStojisce = False
+                            End If
+                            If dataKoda = My.Settings.KodaStojisceInfo Then
+                                data = vbCrLf + "Temp./Pritisk:" + vbCrLf + "----------------------" + vbCrLf + "Temp" + dataStolpci + "Pritisk" + vbCrLf
+                                PodatkiStojisce = False
+                            End If
+                            If dataKoda = My.Settings.KodaStojisceOri Then
+                                data = vbCrLf + "Orientacija:" + vbCrLf + "----------------------" + vbCrLf + "OrID" + dataStolpci + "Hz" + vbCrLf
+                                PodatkiStojisce = False
+                            End If
+                            If dataKoda = "STA_OFFS" Then
+                                data = "Offsets:" + vbCrLf
+                                PodatkiStojisce = False
                             End If
                         End If
                     ElseIf wordIndex = "42" Then    ' Code: Info 1
-                        data = "Info1= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
+                        data = dataStolpci + "Info1= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
                     ElseIf wordIndex = "43" Then    ' Code: Info 2
-                        data = "Info2= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
+                        data = dataStolpci + "Info2= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
                     ElseIf wordIndex = "44" Then    ' Code: Info 3
-                        data = "Info3= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
+                        data = dataStolpci + "Info3= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
                     ElseIf wordIndex = "45" Then    ' Code: Info 4
-                        data = "Info4= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
+                        data = dataStolpci + "Info4= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
                     ElseIf wordIndex = "47" Then    ' Code: Info 6
-                        data = "Info6= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
+                        data = dataStolpci + "Info6= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
                     ElseIf wordIndex = "58" Then    ' Prism constant
                         numData = data / 10000
-                        data = numData.ToString
+                        data = dataStolpci + Format(numData, "0.0000")
                     ElseIf wordIndex = "71" Then    ' Point Code
-                        numData = data
-                        data = numData.ToString
-                    ElseIf wordIndex = "81" Then    ' Target Easting
+                        dataTmp = Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
+                        If dataKoda = My.Settings.KodaStojisce Then
+                            data = dataTmp
+                        End If
+                        If dataKoda = My.Settings.KodaStojisceInfo Then
+                            data = dataTmp
+                        End If
+                        If dataKoda = My.Settings.KodaStojisceOri Then
+                            data = dataTmp
+                        End If
+                        If dataTmp = "" Then
+                            data = ""
+                        End If
+                    ElseIf wordIndex = "72" Then    ' Point Code
+                        dataTmp = Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
+                        If dataKoda = My.Settings.KodaStojisce Then
+                            Dim dataNum As Double
+                            dataNum = dataTmp / 1000
+                            data = dataStolpci + Format(dataNum, "0.000")
+                        End If
+                        If dataKoda = My.Settings.KodaStojisceInfo Then
+                            data = dataStolpci + dataTmp
+                        End If
+                        If dataKoda = My.Settings.KodaStojisceOri Then
+                            Dim dataNum As Double
+                            dataNum = dataTmp / 100000
+                            data = dataStolpci + Format(dataNum, "0.0000")
+                        End If
+                    ElseIf wordIndex = "79" Then    ' Point Code
+                        dataTmp = Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
+                        If dataTmp = "" Then
+                            data = ""
+                        Else
+                            data = dataStolpci + dataTmp
+                        End If
+                    ElseIf wordIndex = "81" And PodatkiStojisce = False Then    ' Target Easting
                         numData = data / 1000
-                        data = Format(numData, "0.000")
-                    ElseIf wordIndex = "82" Then    ' Target Northing
+                        data = dataStolpci + Format(numData, "0.000")
+                    ElseIf wordIndex = "82" And PodatkiStojisce = False Then    ' Target Northing
                         numData = data / 1000
-                        data = Format(numData, "0.000")
-                    ElseIf wordIndex = "83" Then    ' Target Height
+                        data = dataStolpci + Format(numData, "0.000")
+                    ElseIf wordIndex = "83" And PodatkiStojisce = False Then    ' Target Height
                         numData = data / 1000
-                        data = Format(numData, "0.000")
+                        data = dataStolpci + Format(numData, "0.000")
                     ElseIf wordIndex = "84" Then    ' Station Easting
                         numData = data / 1000
-                        data = "StE= " + Format(numData, "0.000")
+                        data = dataStolpci + Format(numData, "0.000")
                     ElseIf wordIndex = "85" Then    ' Station Northing
                         numData = data / 1000
-                        data = "StN= " + Format(numData, "0.000")
+                        data = dataStolpci + Format(numData, "0.000")
                     ElseIf wordIndex = "86" Then    ' Station Height
                         numData = data / 1000
-                        data = "StH= " + Format(numData, "0.000")
+                        data = dataStolpci + Format(numData, "0.000")
                     ElseIf wordIndex = "87" Then    ' Reflector height
                         numData = data / 1000
-                        data = Format(numData, "0.000")
+                        data = dataStolpci + Format(numData, "0.000")
                     ElseIf wordIndex = "88" Then    ' Instriment height
                         numData = data / 1000
-                        data = "InstHt= " + Format(numData, "0.000")
+                        data = dataStolpci + Format(numData, "0.000")
                     ElseIf wordIndex = "18" Then    ' DATE YY.ss
                         numData = data / 1000000
-                        data = "Year.Sec= " + Format(numData, "0.00")
+                        data = dataStolpci + "Year.Sec= " + Format(numData, "0.00")
                     Else
                         numData = 0
+                        data = ""
                     End If
-                    If ToolStripComboBox2.Text = "Pika" Then
+                    If My.Settings.DecimalnoLocilo = "Pika" Then
                         If wordIndex IsNot "11" Then
                             data = data.ToString.Replace(",", ".")
                         End If
 
                     End If
-                    RichTextBox1.AppendText(data + " ")
+                    RichTextBox1.AppendText(data)
                 End If
             Next
             RichTextBox1.AppendText(vbCrLf)
+            i = i + 1
         Loop
-        ToolStripStatusLabel1.Text = "Konverzija končana. Shrani datoteko!"
-        SaveFileDialog1.Filter = "Zapisnik meritve|*.mer|Text file|*.txt|All files|*.*"
         streamReader.Close()
+        ToolStripStatusLabel1.Text = "Prebrano: " + i.ToString + "/" + ToolStripProgressBar1.Maximum.ToString + " vrstic"
+        SaveFileDialog1.Filter = "Zapisnik meritve|*.mer|Text file|*.txt|All files|*.*"
         tsbSaveAs.Enabled = True
+        ShraniToolStripMenuItem.Enabled = True
         tsbSaveAs.Text = "Shrani Zapisnik"
     End Sub
 
-    Private Sub tsbSaveAs_Click(sender As Object, e As EventArgs) Handles tsbSaveAs.Click
-        SaveFileDialog1.FileName = Path.GetFileNameWithoutExtension(OpenFileDialog1.FileName)
-        If SaveFileDialog1.ShowDialog = DialogResult.OK Then
-            RichTextBox1.SaveFile(SaveFileDialog1.FileName, RichTextBoxStreamType.PlainText)
-            ToolStripStatusLabel1.Text = "Shranjeno: " + SaveFileDialog1.FileName.ToString
-        End If
-    End Sub
-
     Private Sub tsbPointsOnly_Click(sender As Object, e As EventArgs) Handles tsbPointsOnly.Click
+        Dim dataStolpci As String = ""
+        If My.Settings.Stolpci = 0 Then
+            dataStolpci = " "
+        ElseIf My.Settings.Stolpci = 1 Then
+            dataStolpci = vbTab
+        End If
+
         RichTextBox1.Clear()
-        Dim measuredPoints As Integer = 1
-        Dim newStation As Integer = 0
+        RichTextBox1.BackColor = SystemColors.Info
+        Dim measuredPoints As Integer = 0
+        Dim dataKoda As Integer = 0
         Dim streamReader As StreamReader = New StreamReader(OpenFileDialog1.FileName)
+        Dim i As Integer = 0
+        Dim lin As Integer = 0
         Do Until streamReader.EndOfStream
             ' Read and Split each line to separate it into fields
             Dim line() As String = streamReader.ReadLine().Split(" ")
             ' Remove * sign from index line
             line(0) = Replace(line(0), "*", "")
-
-            If Microsoft.VisualBasic.Left(line(1), 2) = "25" Then
-                measuredPoints = 1
+            If Microsoft.VisualBasic.Left(line(0), 2) = "41" Then
+                dataKoda = 1
+            Else
+                dataKoda = 0
+            End If
+            ToolStripProgressBar1.Value = i
+            'If Microsoft.VisualBasic.Left(line(1), 2) = "81" Then
+            '    measuredPoints = 1
+            'Else
+            If Microsoft.VisualBasic.Left(line(1), 2) = "25" Or Microsoft.VisualBasic.Left(line(1), 2) = "84" Then
+                measuredPoints = 2
             End If
             ' Seaparate word index and data
             For Each readLine As String In line
@@ -209,174 +380,333 @@ Public Class Form1
                 Else
                     ' wordindex is always 6 characters long and is read fron left to right
                     Dim wordIndex As String
-                    wordIndex = Microsoft.VisualBasic.Left(readLine, 2)
-                    ' data is always 17 characters long and is read from right to left and has a +/- sign in first place
                     Dim data As String
                     Dim numData As Double
 
+                    wordIndex = Microsoft.VisualBasic.Left(readLine, 2)
                     data = Microsoft.VisualBasic.Right(readLine, 17)
                     If wordIndex = "41" Then
-                        If data = "+00000000STA_OFFS" Then
-                            data = "90"
-                        End If
-                        numData = data
-                        If numData >= 90 Then
+                        Dim dataInfo As String = Microsoft.VisualBasic.Right(readLine, 16).TrimStart("0"c)
+                        If dataInfo = My.Settings.KodaMeas Then
                             measuredPoints = 1
-                        ElseIf numData >= 10 < 90 Then
+                        ElseIf dataInfo = My.Settings.KodaUserImport Then
+                            measuredPoints = 2
+                        ElseIf dataInfo = My.Settings.KodaMeasOri Then
+                            measuredPoints = 3
+                        Else
                             measuredPoints = 0
                         End If
                     End If
-
-                    If wordIndex = "11" And measuredPoints = 1 Then
+                    If wordIndex = "71" And measuredPoints >= 1 Then    ' Point Code
                         data = Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
-                        RichTextBox1.AppendText(data + " ")
-                    ElseIf wordIndex = "81" And measuredPoints = 1 Then    ' Target Easting
+                        If data = "" Then
+                            ' nič
+                        Else
+                            RichTextBox1.AppendText(dataStolpci + data)
+                        End If
+                    End If
+                    If wordIndex = "11" And measuredPoints >= 1 Then
+                        data = Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
+                        RichTextBox1.AppendText(data)
+                        i = i + 1
+                    ElseIf wordIndex = "81" And measuredPoints >= 1 Then    ' Target Easting
                         numData = data / 1000
                         data = Format(numData, "0.000")
-                        If ToolStripComboBox2.Text = "Pika" Then
+                        If My.Settings.DecimalnoLocilo = "Pika" Then
                             data = data.ToString.Replace(",", ".")
                         End If
-                        RichTextBox1.AppendText(data + " ")
-                    ElseIf wordIndex = "82" And measuredPoints = 1 Then    ' Target Northing
+                        RichTextBox1.AppendText(dataStolpci + data)
+                    ElseIf wordIndex = "82" And measuredPoints >= 1 Then    ' Target Northing
                         numData = data / 1000
                         data = Format(numData, "0.000")
-                        If ToolStripComboBox2.Text = "Pika" Then
+                        If My.Settings.DecimalnoLocilo = "Pika" Then
                             data = data.ToString.Replace(",", ".")
                         End If
-                        RichTextBox1.AppendText(data + " ")
-                    ElseIf wordIndex = "83" And measuredPoints = 1 Then    ' Target Height
+                        RichTextBox1.AppendText(dataStolpci + data)
+                    ElseIf wordIndex = "83" And measuredPoints >= 1 Then    ' Target Height
                         numData = data / 1000
                         data = Format(numData, "0.000")
-                        If ToolStripComboBox2.Text = "Pika" Then
+                        If My.Settings.DecimalnoLocilo = "Pika" Then
                             data = data.ToString.Replace(",", ".")
                         End If
-                        RichTextBox1.AppendText(data + vbCrLf)
-                    ElseIf wordIndex = "84" And measuredPoints = 1 Then    ' Station Easting
+                        If measuredPoints = 1 Then
+                            RichTextBox1.AppendText(dataStolpci + data + dataStolpci + "MEAS")
+                        ElseIf measuredPoints = 2 Then
+                            RichTextBox1.AppendText(dataStolpci + data + dataStolpci + "REF")
+                        ElseIf measuredPoints = 3 Then
+                            RichTextBox1.AppendText(dataStolpci + data + dataStolpci + "ORI")
+                        End If
+                    ElseIf wordIndex = "84" And measuredPoints >= 1 Then    ' Station Easting
                         numData = data / 1000
                         data = Format(numData, "0.000")
-                        If ToolStripComboBox2.Text = "Pika" Then
+                        If My.Settings.DecimalnoLocilo = "Pika" Then
                             data = data.ToString.Replace(",", ".")
                         End If
-                        RichTextBox1.AppendText(data + " ")
-                    ElseIf wordIndex = "85" And measuredPoints = 1 Then    ' Station Northing
+                        RichTextBox1.AppendText(dataStolpci + data)
+                    ElseIf wordIndex = "85" And measuredPoints >= 1 Then    ' Station Northing
                         numData = data / 1000
                         data = Format(numData, "0.000")
-                        If ToolStripComboBox2.Text = "Pika" Then
+                        If My.Settings.DecimalnoLocilo = "Pika" Then
                             data = data.ToString.Replace(",", ".")
                         End If
-                        RichTextBox1.AppendText(data + " ")
-                    ElseIf wordIndex = "86" And measuredPoints = 1 Then    ' Station Height
+                        RichTextBox1.AppendText(dataStolpci + data)
+                    ElseIf wordIndex = "86" And measuredPoints >= 1 Then    ' Station Height
                         numData = data / 1000
                         data = Format(numData, "0.000")
-                        If ToolStripComboBox2.Text = "Pika" Then
+                        If My.Settings.DecimalnoLocilo = "Pika" Then
                             data = data.ToString.Replace(",", ".")
                         End If
-                        RichTextBox1.AppendText(data + vbCrLf)
+                        RichTextBox1.AppendText(dataStolpci + data + dataStolpci + "STA")
                     Else
                         numData = 0
                         data = ""
                     End If
                 End If
             Next
-        Loop
-        ToolStripStatusLabel1.Text = "Konverzija končana. Shrani datoteko!"
-        SaveFileDialog1.Filter = "KOO datoteka|*.koo|Text file|*.txt|All files|*.*"
-        streamReader.Close()
-        tsbSaveAs.Enabled = True
-        tsbSaveAs.Text = "Shrani Točke"
-    End Sub
-
-    Private Sub tsbKooConvert_Click(sender As Object, e As EventArgs)
-        RichTextBox1.Clear()
-        Dim measuredPoints As Integer = 0
-        Dim newStation As Integer = 0
-        Dim streamReader As StreamReader = New StreamReader(OpenFileDialog1.FileName)
-        Do Until streamReader.EndOfStream
-            ' Read and Split each line to separate it into fields
-            Dim line() As String = streamReader.ReadLine().Split(" ")
-            ' Remove * sign from index line
-            line(0) = Replace(line(0), "*", "")
-
-            If Microsoft.VisualBasic.Left(line(1), 2) = "25" Then
-                newStation = 1
+            If dataKoda = 0 And measuredPoints >= 1 Then
+                RichTextBox1.AppendText(vbCrLf)
             End If
-            ' Seaparate word index and data
-            For Each readLine As String In line
-
-                If readLine = "" Then
-                    ' do nothing
-                Else
-                    ' wordindex is always 6 characters long and is read fron left to right
-                    Dim wordIndex As String
-                    wordIndex = Microsoft.VisualBasic.Left(readLine, 2)
-                    ' data is always 17 characters long and is read from right to left and has a +/- sign in first place
-                    Dim data As String
-                    Dim numData As Double
-
-                    data = Microsoft.VisualBasic.Right(readLine, 17)
-
-                    If wordIndex = "11" Then
-                        data = Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
-                        RichTextBox1.AppendText(data + " ")
-                    ElseIf wordIndex = "81" Then    ' Target Easting
-                        numData = data / 1000
-                        data = Format(numData, "0.000")
-                        If ToolStripComboBox2.Text = "Pika" Then
-                            data = data.ToString.Replace(",", ".")
-                        End If
-                        RichTextBox1.AppendText(data + " ")
-                    ElseIf wordIndex = "82" Then    ' Target Northing
-                        numData = data / 1000
-                        data = Format(numData, "0.000")
-                        If ToolStripComboBox2.Text = "Pika" Then
-                            data = data.ToString.Replace(",", ".")
-                        End If
-                        RichTextBox1.AppendText(data + " ")
-                    ElseIf wordIndex = "83" Then    ' Target Height
-                        numData = data / 1000
-                        data = Format(numData, "0.000")
-                        If ToolStripComboBox2.Text = "Pika" Then
-                            data = data.ToString.Replace(",", ".")
-                        End If
-                        RichTextBox1.AppendText(data + vbCrLf)
-                    ElseIf wordIndex = "84" Then    ' Station Easting
-                        numData = data / 1000
-                        data = Format(numData, "0.000")
-                        If ToolStripComboBox2.Text = "Pika" Then
-                            data = data.ToString.Replace(",", ".")
-                        End If
-                        RichTextBox1.AppendText(data + " ")
-                    ElseIf wordIndex = "85" Then    ' Station Northing
-                        numData = data / 1000
-                        data = Format(numData, "0.000")
-                        If ToolStripComboBox2.Text = "Pika" Then
-                            data = data.ToString.Replace(",", ".")
-                        End If
-                        RichTextBox1.AppendText(data + " ")
-                    ElseIf wordIndex = "86" Then    ' Station Height
-                        numData = data / 1000
-                        data = Format(numData, "0.000")
-                        If ToolStripComboBox2.Text = "Pika" Then
-                            data = data.ToString.Replace(",", ".")
-                        End If
-                        RichTextBox1.AppendText(data + vbCrLf)
-                    Else
-                        numData = 0
-                        data = ""
-                    End If
-                End If
-            Next
-
+            lin = lin + 1
+            ToolStripProgressBar1.Value = lin
         Loop
-        ToolStripStatusLabel1.Text = "Konverzija končana. Shrani datoteko!"
-        SaveFileDialog1.Filter = "KOO datoteka|*.koo|Text file|*.txt|All files|*.*"
+        ToolStripStatusLabel1.Text = "Prebrano točk: " + i.ToString
+        SaveFileDialog1.Filter = "KOO|*.koo|TXT|*.txt|All files|*.*"
         streamReader.Close()
         tsbSaveAs.Enabled = True
+        ShraniToolStripMenuItem.Enabled = True
         tsbSaveAs.Text = "Shrani Točke"
     End Sub
 
-    Private Sub tsbHelp_Click(sender As Object, e As EventArgs) Handles tsbHelp.Click
-        MessageBox.Show("Za konvertiranje GSI datoteke najprej izberi datoteko, ki jo želiš konvertirati z ukazom 'Open File'. Nato izberi metodo konverzije (Poročilo, Merjene točke, Vse točke). Po končani knverziji shrani novo datoteko z ukazom 'Save As...'",
-"Kratka navodila")
+    ' Priprava GEO datoteke
+    Private Sub ToolStripButtonGeo_Click(sender As Object, e As EventArgs) Handles ToolStripButtonGeo.Click
+        RichTextBox1.Clear()
+        RichTextBox1.BackColor = Color.LemonChiffon
+        Dim measuredPoints As Integer = 0
+        Dim dataKoda As String = ""
+        Dim streamReader As StreamReader = New StreamReader(OpenFileDialog1.FileName)
+        Dim i As Integer = 0
+        Dim lin As Integer = 0
+        Dim infoTemp As String = "20"
+        Dim infoPress As String = "759.81"
+
+        ' Branje datoteke
+        Do Until streamReader.EndOfStream
+            ' Beri datoteko po vrsticah, razdelitev na posamezne podatke (array)
+            Dim line() As String = streamReader.ReadLine().Split(" ")
+            line(0) = Replace(line(0), "*", "") ' Odstrani * na začetku vrstice
+
+            Dim izpisText As String = ""
+
+            If Microsoft.VisualBasic.Left(line(0), 2) = "41" Then
+
+                dataKoda = Microsoft.VisualBasic.Right(line(0), 16).TrimStart("0"c)
+
+                If dataKoda = My.Settings.KodaStojisce Then
+                    Dim infoSta As String
+                    infoSta = Microsoft.VisualBasic.Right(line(1), 16).TrimStart("0"c)
+                    Dim infoStaHt As String
+                    infoStaHt = Microsoft.VisualBasic.Right(line(2), 17).TrimStart("0"c)
+                    Dim numStaHt As Double
+                    numStaHt = infoStaHt / 1000
+                    izpisText = infoSta + " " + Format(numStaHt, "0.000").ToString + vbCrLf
+                    measuredPoints = 0
+                End If
+
+                ' Nastavi podatke o temperaturi in pritisku, če je podana koda za "KodaStojisceInfo"
+                ' Sicer uporabi prednastavljene vrednosti "infoTemp" in "infoPress"
+                If dataKoda = My.Settings.KodaStojisceInfo Then
+                    infoTemp = Microsoft.VisualBasic.Right(line(1), 16).TrimStart("0"c)
+                    infoPress = Microsoft.VisualBasic.Right(line(2), 16).TrimStart("0"c)
+                    Dim numPress As Double
+                    numPress = infoPress * 0.750062
+                    infoPress = Format(numPress, "0.00").ToString
+                    If measuredPoints = 0 Then
+                        izpisText = infoTemp + " " + infoPress + vbCrLf
+                    End If
+
+                    measuredPoints = 0
+                End If
+
+                If dataKoda = My.Settings.KodaStojisceOri Then
+                    Dim infoOri As String
+                    infoOri = Microsoft.VisualBasic.Right(line(1), 16).TrimStart("0"c)
+                    Dim infoOriHz As String
+                    infoOriHz = Microsoft.VisualBasic.Right(line(2), 17).TrimStart("0"c)
+                    Dim numOriHz As Double
+                    numOriHz = infoOriHz / 100000
+                    izpisText = infoOri + " " + Format(numOriHz, "0.0000").ToString + vbCrLf
+                    measuredPoints = 0
+                End If
+
+                If dataKoda = My.Settings.KodaUserImport Then
+                    measuredPoints = 1
+                End If
+
+                If dataKoda = My.Settings.KodaMeasOri Then
+                    izpisText = infoTemp + " " + infoPress + vbCrLf
+                    measuredPoints = 0
+                End If
+
+                If dataKoda = My.Settings.KodaMeas Then
+                    izpisText = "0 0" + vbCrLf
+                    measuredPoints = 1
+                End If
+
+                If dataKoda = My.Settings.KodaQuickSet And lin > 0 And measuredPoints = 1 Then
+                    izpisText = "-1 0 0 0 0" + vbCrLf
+                    measuredPoints = 0
+                End If
+
+                If dataKoda = My.Settings.KodaSetAzi And lin > 0 And measuredPoints = 1 Then
+                    izpisText = "-1 0 0 0 0" + vbCrLf
+                    measuredPoints = 0
+                End If
+
+                If dataKoda = My.Settings.KodaResection And lin > 0 And measuredPoints = 1 Then
+                    izpisText = "-1 0 0 0 0" + vbCrLf
+                    measuredPoints = 0
+                End If
+
+                If dataKoda = My.Settings.KodaFreeStation And lin > 0 And measuredPoints = 1 Then
+                    izpisText = "-1 0 0 0 0" + vbCrLf
+                    measuredPoints = 0
+                End If
+
+                If dataKoda = My.Settings.KodaOriHtTrans And lin > 0 And measuredPoints = 1 Then
+                    izpisText = "-1 0 0 0 0" + vbCrLf
+                    measuredPoints = 0
+                End If
+            End If
+
+            If Microsoft.VisualBasic.Left(line(0), 2) = "11" Then
+                If dataKoda = My.Settings.KodaMeas Then
+                    Dim dataId As String
+                    dataId = Microsoft.VisualBasic.Right(line(0), 16).TrimStart("0"c)
+                    Dim dataAzi As String
+                    dataAzi = Microsoft.VisualBasic.Right(line(1), 17)
+                    Dim numAzi As Double
+                    numAzi = dataAzi / 100000
+                    Dim dataV As String
+                    dataV = Microsoft.VisualBasic.Right(line(2), 17)
+                    Dim numV As Double
+                    numV = dataV / 100000
+                    Dim dataSD As String
+                    dataSD = Microsoft.VisualBasic.Right(line(3), 17)
+                    Dim numSD As Double
+                    numSD = dataSD / 1000
+                    Dim dataHr As String
+                    dataHr = Microsoft.VisualBasic.Right(line(5), 17)
+                    Dim numHr As Double
+                    numHr = dataHr / 1000
+
+                    izpisText = dataId + " " + Format(numAzi, "0.0000").ToString + " " + Format(numV, "0.0000").ToString + " " + Format(numSD, "0.000").ToString + " " + Format(numHr, "0.000").ToString + vbCrLf
+                End If
+
+                If dataKoda = My.Settings.KodaMeasOri Then
+                    Dim dataId As String
+                    dataId = Microsoft.VisualBasic.Right(line(0), 16).TrimStart("0"c)
+                    Dim dataAzi As Double
+                    dataAzi = Microsoft.VisualBasic.Right(line(1), 17)
+                    Dim numAzi As Double
+                    numAzi = dataAzi / 100000
+                    izpisText = dataId + " " + Format(numAzi, "0.0000").ToString + vbCrLf
+                End If
+
+                If dataKoda = My.Settings.KodaQuickSet Then
+                    If Microsoft.VisualBasic.Left(line(1), 2) = "84" Then
+                        Dim dataSta As String
+                        dataSta = Microsoft.VisualBasic.Right(line(0), 16).TrimStart("0"c)
+                        Dim dataHi As Double
+                        dataHi = Microsoft.VisualBasic.Right(line(4), 17)
+                        Dim numHi As Double
+                        numHi = dataHi / 1000
+                        izpisText = dataSta + " " + Format(numHi, "0.000").ToString + vbCrLf
+                    End If
+                End If
+                ' ElseIf dataKoda = My.Settings.KodaSetAzi Then
+                ' 
+                ' ElseIf dataKoda = My.Settings.KodaResection Then
+                ' 
+                If dataKoda = My.Settings.KodaFreeStation Then
+                    If Microsoft.VisualBasic.Left(line(1), 2) = "25" Then
+                        Dim dataSta As String
+                        dataSta = Microsoft.VisualBasic.Right(line(0), 16).TrimStart("0"c)
+                        Dim dataHi As Double
+                        dataHi = Microsoft.VisualBasic.Right(line(6), 17)
+                        Dim numHi As Double
+                        numHi = dataHi / 1000
+                        izpisText = dataSta + " " + Format(numHi, "0.000").ToString + vbCrLf
+                    End If
+                End If
+                ' ElseIf dataKoda = My.Settings.KodaOriHtTrans Then
+            End If
+            RichTextBox1.AppendText(izpisText)
+            lin = lin + 1
+            ToolStripProgressBar1.Value = lin
+        Loop
+        RichTextBox1.AppendText("-1 0 0 0 0" + vbCrLf)
+
+        streamReader.Close()
+        streamReader.Dispose()
+        ToolStripStatusLabel1.Text = "Prebrano: " + lin.ToString + "/" + ToolStripProgressBar1.Maximum.ToString + " vrstic"
+        SaveFileDialog1.Filter = "GEO datoteka|*.GEO"
+        SaveFileDialog1.FileName = Path.GetFileNameWithoutExtension(OpenFileDialogTocke.FileName)
+        tsbSaveAs.Enabled = True
+        ShraniToolStripMenuItem.Enabled = True
+        tsbSaveAs.Text = "Shrani GEO"
+    End Sub
+
+    Private Sub InfoOAplikacijiToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles InfoOAplikacijiToolStripMenuItem.Click
+        ' MessageBox.Show("Za konvertiranje GSI datoteke najprej izberi datoteko, ki jo želiš konvertirati z ukazom 'Open File'. Nato izberi metodo konverzije (Poročilo, Merjene točke, Vse točke). Po končani knverziji shrani novo datoteko z ukazom 'Save As...'","Kratka navodila")
+        SplashScreen1.ShowDialog()
+    End Sub
+
+    Private Sub PripraviGSIToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles PripraviGSIToolStripMenuItem.Click
+        Process.Start("Navodila.pdf")
+    End Sub
+
+    Private Sub OdpriGSIToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles OdpriGSIToolStripMenuItem.Click
+        FormNastavitve.ShowDialog()
+    End Sub
+
+    Private Sub OdpriGSIToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles OdpriGSIToolStripMenuItem1.Click
+        OdpriDatotekoGsi()
+
+    End Sub
+    Private Sub tsbOpenFile_Click(sender As Object, e As EventArgs) Handles tsbOpenFile.Click
+        OdpriDatotekoGsi()
+
+    End Sub
+    Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ButtonUrediDat.Click
+        Form2.ShowDialog()
+    End Sub
+
+    Private Sub ToolStripButtonNast_Click(sender As Object, e As EventArgs)
+        FormNastavitve.ShowDialog()
+    End Sub
+
+    Private Sub ToolStripButtonPripravi_Click(sender As Object, e As EventArgs) Handles ToolStripButtonPripravi.Click
+        PripraviDatotekoGsi()
+
+    End Sub
+
+    Private Sub PripraviGSIToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles PripraviGSIToolStripMenuItem1.Click
+        PripraviDatotekoGsi()
+
+    End Sub
+    Private Sub tsbSaveAs_Click(sender As Object, e As EventArgs) Handles tsbSaveAs.Click
+        ShraniDatoteko()
+
+    End Sub
+
+    Private Sub ShraniToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ShraniToolStripMenuItem.Click
+        ShraniDatoteko()
+
+    End Sub
+
+    Private Sub IzhodToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles IzhodToolStripMenuItem.Click
+        Me.Close()
+        Application.Exit()
+
     End Sub
 End Class

Form2.Designer.vb

@@ -0,0 +1,301 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class Form2
+    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.components = New System.ComponentModel.Container()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form2))
+        Me.RichTextBoxEdit = New System.Windows.Forms.RichTextBox()
+        Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
+        Me.ToolStripButton3 = New System.Windows.Forms.ToolStripButton()
+        Me.BtnShraniF2 = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator()
+        Me.ToolStripLabel1 = New System.Windows.Forms.ToolStripLabel()
+        Me.ComBoxKoda = New System.Windows.Forms.ToolStripComboBox()
+        Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripLabel2 = New System.Windows.Forms.ToolStripLabel()
+        Me.ToolStripTextBox1 = New System.Windows.Forms.ToolStripTextBox()
+        Me.ToolStripLabel3 = New System.Windows.Forms.ToolStripLabel()
+        Me.ToolStripTextBox2 = New System.Windows.Forms.ToolStripTextBox()
+        Me.ToolStripLabel6 = New System.Windows.Forms.ToolStripLabel()
+        Me.ToolStripTextBox5 = New System.Windows.Forms.ToolStripTextBox()
+        Me.ToolStripLabel4 = New System.Windows.Forms.ToolStripLabel()
+        Me.ToolStripTextBox3 = New System.Windows.Forms.ToolStripTextBox()
+        Me.ToolStripLabel5 = New System.Windows.Forms.ToolStripLabel()
+        Me.ToolStripTextBox4 = New System.Windows.Forms.ToolStripTextBox()
+        Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator()
+        Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton()
+        Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
+        Me.ToolStripStatusLabel1 = New System.Windows.Forms.ToolStripStatusLabel()
+        Me.SaveFileDialog2 = New System.Windows.Forms.SaveFileDialog()
+        Me.MyApplicationBindingSource = New System.Windows.Forms.BindingSource(Me.components)
+        Me.MyApplicationBindingSource1 = New System.Windows.Forms.BindingSource(Me.components)
+        Me.ToolStrip1.SuspendLayout()
+        Me.StatusStrip1.SuspendLayout()
+        CType(Me.MyApplicationBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.MyApplicationBindingSource1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'RichTextBoxEdit
+        '
+        Me.RichTextBoxEdit.BackColor = System.Drawing.Color.Ivory
+        Me.RichTextBoxEdit.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.RichTextBoxEdit.DetectUrls = False
+        Me.RichTextBoxEdit.EnableAutoDragDrop = True
+        Me.RichTextBoxEdit.Font = New System.Drawing.Font("Courier New", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.RichTextBoxEdit.Location = New System.Drawing.Point(12, 35)
+        Me.RichTextBoxEdit.Name = "RichTextBoxEdit"
+        Me.RichTextBoxEdit.Size = New System.Drawing.Size(1160, 581)
+        Me.RichTextBoxEdit.TabIndex = 2
+        Me.RichTextBoxEdit.Text = ""
+        Me.RichTextBoxEdit.WordWrap = False
+        '
+        'ToolStrip1
+        '
+        Me.ToolStrip1.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
+        Me.ToolStrip1.ImageScalingSize = New System.Drawing.Size(20, 20)
+        Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton3, Me.BtnShraniF2, Me.ToolStripSeparator3, Me.ToolStripLabel1, Me.ComBoxKoda, Me.ToolStripButton1, Me.ToolStripLabel2, Me.ToolStripTextBox1, Me.ToolStripLabel3, Me.ToolStripTextBox2, Me.ToolStripLabel6, Me.ToolStripTextBox5, Me.ToolStripLabel4, Me.ToolStripTextBox3, Me.ToolStripLabel5, Me.ToolStripTextBox4, Me.ToolStripSeparator2, Me.ToolStripButton2})
+        Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
+        Me.ToolStrip1.Name = "ToolStrip1"
+        Me.ToolStrip1.Padding = New System.Windows.Forms.Padding(10, 5, 10, 0)
+        Me.ToolStrip1.Size = New System.Drawing.Size(1184, 32)
+        Me.ToolStrip1.TabIndex = 3
+        Me.ToolStrip1.Text = "ToolStrip1"
+        '
+        'ToolStripButton3
+        '
+        Me.ToolStripButton3.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
+        Me.ToolStripButton3.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_close_50
+        Me.ToolStripButton3.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.ToolStripButton3.Name = "ToolStripButton3"
+        Me.ToolStripButton3.Size = New System.Drawing.Size(58, 24)
+        Me.ToolStripButton3.Text = "Zapri"
+        '
+        'BtnShraniF2
+        '
+        Me.BtnShraniF2.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
+        Me.BtnShraniF2.Enabled = False
+        Me.BtnShraniF2.Image = Global.TPS1100_Convert.My.Resources.Resources.Save_as_24
+        Me.BtnShraniF2.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.BtnShraniF2.Name = "BtnShraniF2"
+        Me.BtnShraniF2.Size = New System.Drawing.Size(73, 24)
+        Me.BtnShraniF2.Text = "Shrani..."
+        '
+        'ToolStripSeparator3
+        '
+        Me.ToolStripSeparator3.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
+        Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
+        Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 27)
+        '
+        'ToolStripLabel1
+        '
+        Me.ToolStripLabel1.Name = "ToolStripLabel1"
+        Me.ToolStripLabel1.Size = New System.Drawing.Size(37, 24)
+        Me.ToolStripLabel1.Text = "Koda:"
+        '
+        'ComBoxKoda
+        '
+        Me.ComBoxKoda.AutoSize = False
+        Me.ComBoxKoda.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
+        Me.ComBoxKoda.DropDownWidth = 200
+        Me.ComBoxKoda.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.ComBoxKoda.Items.AddRange(New Object() {" ", "1   | Setup: Quick Set", "2   | Setup: Set Azimuth", "3   | Setup: Resection", "4   | Setup: Free Station", "5   | Setup: Ori. & Ht. Transfer", "6   | Measure: Orientation", "7   | Measure: Points", "8   | Points: User/Imported", "9   | Info: Station + Ht.", "10 | Info: Temp. + Press.", "11 | Info: Orientation + Hz"})
+        Me.ComBoxKoda.MaxDropDownItems = 15
+        Me.ComBoxKoda.Name = "ComBoxKoda"
+        Me.ComBoxKoda.Size = New System.Drawing.Size(200, 25)
+        Me.ComBoxKoda.ToolTipText = "Izberi kodo..."
+        '
+        'ToolStripButton1
+        '
+        Me.ToolStripButton1.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
+        Me.ToolStripButton1.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_undo_48
+        Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.ToolStripButton1.Name = "ToolStripButton1"
+        Me.ToolStripButton1.Size = New System.Drawing.Size(65, 24)
+        Me.ToolStripButton1.Text = "Povrni"
+        '
+        'ToolStripLabel2
+        '
+        Me.ToolStripLabel2.Name = "ToolStripLabel2"
+        Me.ToolStripLabel2.Size = New System.Drawing.Size(36, 24)
+        Me.ToolStripLabel2.Text = "PntID"
+        Me.ToolStripLabel2.Visible = False
+        '
+        'ToolStripTextBox1
+        '
+        Me.ToolStripTextBox1.Name = "ToolStripTextBox1"
+        Me.ToolStripTextBox1.Size = New System.Drawing.Size(90, 27)
+        Me.ToolStripTextBox1.Text = "NAME"
+        Me.ToolStripTextBox1.ToolTipText = "Ime točke"
+        Me.ToolStripTextBox1.Visible = False
+        '
+        'ToolStripLabel3
+        '
+        Me.ToolStripLabel3.Name = "ToolStripLabel3"
+        Me.ToolStripLabel3.Size = New System.Drawing.Size(41, 24)
+        Me.ToolStripLabel3.Text = "H Inst."
+        Me.ToolStripLabel3.Visible = False
+        '
+        'ToolStripTextBox2
+        '
+        Me.ToolStripTextBox2.Name = "ToolStripTextBox2"
+        Me.ToolStripTextBox2.Size = New System.Drawing.Size(60, 27)
+        Me.ToolStripTextBox2.Text = "0.000"
+        Me.ToolStripTextBox2.ToolTipText = "Višina instrumenta (m)"
+        Me.ToolStripTextBox2.Visible = False
+        '
+        'ToolStripLabel6
+        '
+        Me.ToolStripLabel6.Name = "ToolStripLabel6"
+        Me.ToolStripLabel6.Size = New System.Drawing.Size(21, 24)
+        Me.ToolStripLabel6.Text = "Hz"
+        Me.ToolStripLabel6.Visible = False
+        '
+        'ToolStripTextBox5
+        '
+        Me.ToolStripTextBox5.Name = "ToolStripTextBox5"
+        Me.ToolStripTextBox5.Size = New System.Drawing.Size(70, 27)
+        Me.ToolStripTextBox5.Text = "0.0000"
+        Me.ToolStripTextBox5.ToolTipText = "Hz /Azimut ""D.MMSS"""
+        Me.ToolStripTextBox5.Visible = False
+        '
+        'ToolStripLabel4
+        '
+        Me.ToolStripLabel4.Name = "ToolStripLabel4"
+        Me.ToolStripLabel4.Size = New System.Drawing.Size(73, 24)
+        Me.ToolStripLabel4.Text = "Temperatura"
+        Me.ToolStripLabel4.Visible = False
+        '
+        'ToolStripTextBox3
+        '
+        Me.ToolStripTextBox3.Name = "ToolStripTextBox3"
+        Me.ToolStripTextBox3.Size = New System.Drawing.Size(50, 27)
+        Me.ToolStripTextBox3.Text = "20.0"
+        Me.ToolStripTextBox3.ToolTipText = "Temperatura (°C)"
+        Me.ToolStripTextBox3.Visible = False
+        '
+        'ToolStripLabel5
+        '
+        Me.ToolStripLabel5.Name = "ToolStripLabel5"
+        Me.ToolStripLabel5.Size = New System.Drawing.Size(39, 24)
+        Me.ToolStripLabel5.Text = "Pritisk"
+        Me.ToolStripLabel5.Visible = False
+        '
+        'ToolStripTextBox4
+        '
+        Me.ToolStripTextBox4.Name = "ToolStripTextBox4"
+        Me.ToolStripTextBox4.Size = New System.Drawing.Size(60, 27)
+        Me.ToolStripTextBox4.Text = "1013"
+        Me.ToolStripTextBox4.ToolTipText = "Pritisk (mbar)"
+        Me.ToolStripTextBox4.Visible = False
+        '
+        'ToolStripSeparator2
+        '
+        Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
+        Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 27)
+        '
+        'ToolStripButton2
+        '
+        Me.ToolStripButton2.Enabled = False
+        Me.ToolStripButton2.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_advance_48
+        Me.ToolStripButton2.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.ToolStripButton2.Name = "ToolStripButton2"
+        Me.ToolStripButton2.Size = New System.Drawing.Size(62, 24)
+        Me.ToolStripButton2.Text = "Vstavi"
+        Me.ToolStripButton2.ToolTipText = "Vstavi vrstico..."
+        '
+        'StatusStrip1
+        '
+        Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripStatusLabel1})
+        Me.StatusStrip1.Location = New System.Drawing.Point(0, 619)
+        Me.StatusStrip1.Name = "StatusStrip1"
+        Me.StatusStrip1.Size = New System.Drawing.Size(1184, 22)
+        Me.StatusStrip1.TabIndex = 4
+        Me.StatusStrip1.Text = "StatusStrip1"
+        '
+        'ToolStripStatusLabel1
+        '
+        Me.ToolStripStatusLabel1.Name = "ToolStripStatusLabel1"
+        Me.ToolStripStatusLabel1.Size = New System.Drawing.Size(69, 17)
+        Me.ToolStripStatusLabel1.Text = "Nalaganje..."
+        '
+        'SaveFileDialog2
+        '
+        Me.SaveFileDialog2.Filter = "GSI Files|*.GSI"
+        '
+        'MyApplicationBindingSource
+        '
+        Me.MyApplicationBindingSource.DataSource = GetType(TPS1100_Convert.My.MyApplication)
+        '
+        'MyApplicationBindingSource1
+        '
+        Me.MyApplicationBindingSource1.DataSource = GetType(TPS1100_Convert.My.MyApplication)
+        '
+        'Form2
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(1184, 641)
+        Me.Controls.Add(Me.StatusStrip1)
+        Me.Controls.Add(Me.ToolStrip1)
+        Me.Controls.Add(Me.RichTextBoxEdit)
+        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.Name = "Form2"
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
+        Me.Text = "TPS1100 Convert - Urejanje"
+        Me.ToolStrip1.ResumeLayout(False)
+        Me.ToolStrip1.PerformLayout()
+        Me.StatusStrip1.ResumeLayout(False)
+        Me.StatusStrip1.PerformLayout()
+        CType(Me.MyApplicationBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.MyApplicationBindingSource1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents MyApplicationBindingSource As BindingSource
+    Friend WithEvents MyApplicationBindingSource1 As BindingSource
+    Friend WithEvents RichTextBoxEdit As RichTextBox
+    Friend WithEvents ToolStrip1 As ToolStrip
+    Friend WithEvents BtnShraniF2 As ToolStripButton
+    Friend WithEvents ToolStripLabel1 As ToolStripLabel
+    Friend WithEvents ComBoxKoda As ToolStripComboBox
+    Friend WithEvents ToolStripButton2 As ToolStripButton
+    Friend WithEvents StatusStrip1 As StatusStrip
+    Friend WithEvents ToolStripStatusLabel1 As ToolStripStatusLabel
+    Friend WithEvents ToolStripSeparator2 As ToolStripSeparator
+    Friend WithEvents ToolStripButton1 As ToolStripButton
+    Friend WithEvents SaveFileDialog2 As SaveFileDialog
+    Friend WithEvents ToolStripButton3 As ToolStripButton
+    Friend WithEvents ToolStripSeparator3 As ToolStripSeparator
+    Friend WithEvents ToolStripLabel2 As ToolStripLabel
+    Friend WithEvents ToolStripTextBox1 As ToolStripTextBox
+    Friend WithEvents ToolStripTextBox2 As ToolStripTextBox
+    Friend WithEvents ToolStripLabel3 As ToolStripLabel
+    Friend WithEvents ToolStripLabel4 As ToolStripLabel
+    Friend WithEvents ToolStripTextBox3 As ToolStripTextBox
+    Friend WithEvents ToolStripLabel5 As ToolStripLabel
+    Friend WithEvents ToolStripTextBox4 As ToolStripTextBox
+    Friend WithEvents ToolStripLabel6 As ToolStripLabel
+    Friend WithEvents ToolStripTextBox5 As ToolStripTextBox
+End Class

Form2.vb

@@ -0,0 +1,214 @@
+Imports System.Collections.Specialized.BitVector32
+Imports System.IO
+Imports System.Windows.Forms.VisualStyles.VisualStyleElement
+
+Public Class Form2
+    
+    Public DatotekaSpemembe As Boolean = False
+    Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Activated
+        Form1.Hide()
+        RichTextBoxEdit.Clear()
+
+        ' prepare StreamReader
+        Dim streamReader As StreamReader = New StreamReader(My.Settings.ZadnjaMapa + "\" + My.Settings.Datoteka)
+        Dim i As Integer = 0
+
+        ' loop untill end of stream
+        Do Until streamReader.EndOfStream
+            ' Beri vrstico po vrstico
+            Dim line As String = streamReader.ReadLine()
+            RichTextBoxEdit.AppendText(line + vbCrLf)
+            i = i + 1
+        Loop
+        ToolStripStatusLabel1.Text = "Prebrano: " + i.ToString + " | Datoteka: " + My.Settings.ZadnjaMapa + "\" + My.Settings.Datoteka
+        DatotekaSpemembe = False
+        BtnShraniF2.Enabled = False
+        ComBoxKoda.SelectedIndex = 0
+        streamReader.Close()
+        streamReader.Dispose()
+    End Sub
+
+    Private Sub Form2_Close(sender As Object, e As EventArgs) Handles MyBase.Closing
+        ' If DatotekaSpemembe = True Then
+        '     MessageBox.Show("Shranim spremembe?", "Podatki spremenjeni", MessageBoxButtons.YesNo)
+        '     If MessageBoxButtons.YesNo = vbYes Then
+        '         RichTextBoxEdit.SaveFile(My.Settings.ZadnjaMapa, RichTextBoxStreamType.PlainText)
+        '         BtnShraniF2.Enabled = False
+        '         DatotekaSpemembe = False
+        '     End If
+        ' End If
+        Form1.RichTextBox1.Clear()
+        Form1.streamLines = 0
+        Dim streamReader As StreamReader = New StreamReader(Form1.OpenFileDialog1.FileName)
+        Do Until streamReader.EndOfStream
+            Form1.RichTextBox1.AppendText(streamReader.ReadLine + vbCrLf)
+            Form1.streamLines = Form1.streamLines + 1
+        Loop
+        Form1.ToolStripProgressBar1.Maximum = Form1.streamLines
+        streamReader.Close()
+        streamReader.Dispose()
+
+        Form1.Show()
+    End Sub
+
+    Private Sub RichTextBox1_TextChanged(sender As Object, e As EventArgs) Handles RichTextBoxEdit.TextChanged
+        ToolStripStatusLabel1.Text = "Spremenjeni podatki... datoteka je bila urejana."
+        BtnShraniF2.Enabled = True
+        DatotekaSpemembe = True
+    End Sub
+
+    Private Sub BtnShraniF2_Click(sender As Object, e As EventArgs) Handles BtnShraniF2.Click
+        ' SaveFileDialog2.FileName = My.Settings.ZadnjaMapa
+        ' If SaveFileDialog2.ShowDialog = DialogResult.OK Then
+        RichTextBoxEdit.SaveFile(My.Settings.ZadnjaMapa + "\" + My.Settings.Datoteka, RichTextBoxStreamType.PlainText)
+        ToolStripStatusLabel1.Text = "Shranjeno: " + SaveFileDialog2.FileName.ToString
+        BtnShraniF2.Enabled = False
+        DatotekaSpemembe = False
+        ' End If
+    End Sub
+
+
+    Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) Handles ToolStripButton2.Click
+        ' 0 ---
+        ' 1 Setup:  Quick Set
+        ' 2 Setup: Set Azimuth
+        ' 3 Setup:  Resection
+        ' 4 Setup:  Free Station
+        ' 5 Setup:  Ori. & Ht. Transfer
+        ' 6 Measure: Orientation
+        ' 7 Measure: Points
+        ' 8 Data:   User-Entered
+        ' 9 Info:   Station
+        ' 10 Info:   Temp. & Press.
+        Dim dataTekst As String = ""
+        If ComBoxKoda.SelectedIndex <= 0 Then
+
+        ElseIf ComBoxKoda.SelectedIndex = 1 Then    ' Koda Setup: Quick Set
+            dataTekst = "*410000+" + My.Settings.KodaQuickSet.PadLeft(16, "0") + " "
+            BtnShraniF2.Enabled = True
+            DatotekaSpemembe = True
+        ElseIf ComBoxKoda.SelectedIndex = 2 Then    ' Koda Setup: Set Azimut
+            dataTekst = "*410000+" + My.Settings.KodaSetAzi.PadLeft(16, "0") + " "
+            BtnShraniF2.Enabled = True
+            DatotekaSpemembe = True
+        ElseIf ComBoxKoda.SelectedIndex = 3 Then    ' Koda Setup: Resection
+            dataTekst = "*410000+" + My.Settings.KodaResection.PadLeft(16, "0") + " "
+            BtnShraniF2.Enabled = True
+            DatotekaSpemembe = True
+        ElseIf ComBoxKoda.SelectedIndex = 4 Then    ' Koda Setup: Free Station
+            dataTekst = "*410000+" + My.Settings.KodaFreeStation.PadLeft(16, "0") + " "
+            BtnShraniF2.Enabled = True
+            DatotekaSpemembe = True
+        ElseIf ComBoxKoda.SelectedIndex = 5 Then    ' Koda Setup: Ori. & Ht. Transfer
+            dataTekst = "*410000+" + My.Settings.KodaOriHtTrans.PadLeft(16, "0") + " "
+            BtnShraniF2.Enabled = True
+            DatotekaSpemembe = True
+        ElseIf ComBoxKoda.SelectedIndex = 6 Then    ' Koda Orientacija
+            dataTekst = "*410000+" + My.Settings.KodaMeasOri.PadLeft(16, "0") + " "
+            BtnShraniF2.Enabled = True
+            DatotekaSpemembe = True
+        ElseIf ComBoxKoda.SelectedIndex = 7 Then    ' Koda Meritve
+            dataTekst = "*410000+" + My.Settings.KodaMeas.PadLeft(16, "0") + " "
+            BtnShraniF2.Enabled = True
+            DatotekaSpemembe = True
+        ElseIf ComBoxKoda.SelectedIndex = 8 Then    ' Koda User-Entered/Import
+            dataTekst = "*410000+" + My.Settings.KodaUserImport.PadLeft(16, "0") + " "
+            BtnShraniF2.Enabled = True
+            DatotekaSpemembe = True
+        ElseIf ComBoxKoda.SelectedIndex = 9 Then    ' Koda Stojišče
+            Dim kodaStoj As String = ToolStripTextBox1.Text.PadLeft(16, "0")
+            Dim kodaStojVis As Double = ToolStripTextBox2.Text.Replace(",", ".") * 1000
+            dataTekst = "*410000+" + My.Settings.KodaStojisce.PadLeft(16, "0") + " 71....+" + kodaStoj.PadLeft(16, "0") + " 72....+" + Format(kodaStojVis, "0000000000000000").ToString + " "
+            BtnShraniF2.Enabled = True
+            DatotekaSpemembe = True
+        ElseIf ComBoxKoda.SelectedIndex = 10 Then    ' Koda Podatki Temp./Pritisk
+            Dim kodaVremeTemp As Double = ToolStripTextBox3.Text.Replace(",", ".")
+            Dim kodaVremePrit As Double = ToolStripTextBox4.Text.Replace(",", ".") ' 1 mbar/hPa = 0.750062 Torr
+            dataTekst = "*410000+" + My.Settings.KodaStojisceInfo.PadLeft(16, "0") + " 71....+" + Format(kodaVremeTemp, "0000000000000000").ToString + " 72....+" + Format(kodaVremePrit, "0000000000000000").ToString + " "
+            BtnShraniF2.Enabled = True
+            DatotekaSpemembe = True
+        ElseIf ComBoxKoda.SelectedIndex = 11 Then    ' Koda Orientacija
+            Dim kodaOri As String = ToolStripTextBox1.Text.PadLeft(16, "0")
+            Dim kodaOriHz As Double = ToolStripTextBox5.Text.Replace(",", ".") * 100000
+            dataTekst = "*410000+" + My.Settings.KodaStojisceOri.PadLeft(16, "0") + " 71....+" + kodaOri.PadLeft(16, "0") + " 72....+" + Format(kodaOriHz, "0000000000000000").ToString + " "
+            BtnShraniF2.Enabled = True
+            DatotekaSpemembe = True
+        End If
+        RichTextBoxEdit.Focus()
+        RichTextBoxEdit.SelectionStart = RichTextBoxEdit.GetFirstCharIndexOfCurrentLine
+        SendKeys.Send("+{HOME}")
+        RichTextBoxEdit.SelectedText = dataTekst + vbCrLf
+    End Sub
+
+    Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ToolStripButton1.Click
+        RichTextBoxEdit.Undo()
+    End Sub
+
+    Private Sub ToolStripButton3_Click(sender As Object, e As EventArgs) Handles ToolStripButton3.Click
+        Me.Close()
+    End Sub
+
+    Private Sub ComBoxKoda_Click(sender As Object, e As EventArgs) Handles ComBoxKoda.SelectedIndexChanged
+        If ComBoxKoda.SelectedIndex <= 0 Then
+            ToolStripButton2.Enabled = False
+            ToolStripLabel2.Visible = False
+            ToolStripLabel3.Visible = False
+            ToolStripLabel4.Visible = False
+            ToolStripLabel5.Visible = False
+            ToolStripLabel6.Visible = False
+            ToolStripTextBox1.Visible = False
+            ToolStripTextBox2.Visible = False
+            ToolStripTextBox3.Visible = False
+            ToolStripTextBox4.Visible = False
+            ToolStripTextBox5.Visible = False
+        ElseIf ComBoxKoda.SelectedIndex = 9 Then
+            ToolStripButton2.Enabled = True
+            ToolStripLabel2.Visible = True
+            ToolStripTextBox1.Visible = True
+            ToolStripLabel3.Visible = True
+            ToolStripTextBox2.Visible = True
+            ToolStripLabel4.Visible = False
+            ToolStripTextBox3.Visible = False
+            ToolStripLabel5.Visible = False
+            ToolStripTextBox4.Visible = False
+            ToolStripLabel6.Visible = False
+            ToolStripTextBox5.Visible = False
+        ElseIf ComBoxKoda.SelectedIndex = 10 Then
+            ToolStripButton2.Enabled = True
+            ToolStripLabel2.Visible = False
+            ToolStripTextBox1.Visible = False
+            ToolStripLabel3.Visible = False
+            ToolStripTextBox2.Visible = False
+            ToolStripLabel4.Visible = True
+            ToolStripTextBox3.Visible = True
+            ToolStripLabel5.Visible = True
+            ToolStripTextBox4.Visible = True
+            ToolStripLabel6.Visible = False
+            ToolStripTextBox5.Visible = False
+        ElseIf ComBoxKoda.SelectedIndex = 11 Then
+            ToolStripButton2.Enabled = True
+            ToolStripLabel2.Visible = True
+            ToolStripTextBox1.Visible = True
+            ToolStripLabel3.Visible = False
+            ToolStripTextBox2.Visible = False
+            ToolStripLabel4.Visible = False
+            ToolStripTextBox3.Visible = False
+            ToolStripLabel5.Visible = False
+            ToolStripTextBox4.Visible = False
+            ToolStripLabel6.Visible = True
+            ToolStripTextBox5.Visible = True
+        Else
+            ToolStripButton2.Enabled = True
+            ToolStripLabel2.Visible = False
+            ToolStripLabel3.Visible = False
+            ToolStripLabel4.Visible = False
+            ToolStripLabel5.Visible = False
+            ToolStripLabel6.Visible = False
+            ToolStripTextBox1.Visible = False
+            ToolStripTextBox2.Visible = False
+            ToolStripTextBox3.Visible = False
+            ToolStripTextBox4.Visible = False
+            ToolStripTextBox5.Visible = False
+        End If
+    End Sub
+End Class

FormKodaStojisce.Designer.vb

@@ -0,0 +1,136 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class FormKodaStojisce
+    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()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(FormKodaStojisce))
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.TextBox1 = New System.Windows.Forms.TextBox()
+        Me.TextBox2 = New System.Windows.Forms.TextBox()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.Button1 = New System.Windows.Forms.Button()
+        Me.Label3 = New System.Windows.Forms.Label()
+        Me.TableLayoutPanel1 = New System.Windows.Forms.TableLayoutPanel()
+        Me.TableLayoutPanel1.SuspendLayout()
+        Me.SuspendLayout()
+        '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.Location = New System.Drawing.Point(12, 15)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(24, 13)
+        Me.Label1.TabIndex = 0
+        Me.Label1.Text = "Ime"
+        '
+        'TextBox1
+        '
+        Me.TextBox1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.TextBox1.Location = New System.Drawing.Point(80, 12)
+        Me.TextBox1.Name = "TextBox1"
+        Me.TextBox1.Size = New System.Drawing.Size(103, 20)
+        Me.TextBox1.TabIndex = 1
+        '
+        'TextBox2
+        '
+        Me.TextBox2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.TextBox2.Location = New System.Drawing.Point(80, 38)
+        Me.TextBox2.Name = "TextBox2"
+        Me.TextBox2.Size = New System.Drawing.Size(82, 20)
+        Me.TextBox2.TabIndex = 2
+        '
+        'Label2
+        '
+        Me.Label2.AutoSize = True
+        Me.Label2.Location = New System.Drawing.Point(12, 41)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(47, 13)
+        Me.Label2.TabIndex = 3
+        Me.Label2.Text = "Vis. Inst."
+        '
+        'Button1
+        '
+        Me.Button1.Anchor = System.Windows.Forms.AnchorStyles.Bottom
+        Me.Button1.DialogResult = System.Windows.Forms.DialogResult.OK
+        Me.Button1.Location = New System.Drawing.Point(48, 9)
+        Me.Button1.Name = "Button1"
+        Me.Button1.Size = New System.Drawing.Size(75, 23)
+        Me.Button1.TabIndex = 4
+        Me.Button1.Text = "OK"
+        Me.Button1.UseVisualStyleBackColor = True
+        '
+        'Label3
+        '
+        Me.Label3.AutoSize = True
+        Me.Label3.Location = New System.Drawing.Point(168, 41)
+        Me.Label3.Name = "Label3"
+        Me.Label3.Size = New System.Drawing.Size(15, 13)
+        Me.Label3.TabIndex = 5
+        Me.Label3.Text = "m"
+        '
+        'TableLayoutPanel1
+        '
+        Me.TableLayoutPanel1.ColumnCount = 1
+        Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 100.0!))
+        Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 20.0!))
+        Me.TableLayoutPanel1.Controls.Add(Me.Button1, 0, 0)
+        Me.TableLayoutPanel1.Location = New System.Drawing.Point(12, 64)
+        Me.TableLayoutPanel1.Name = "TableLayoutPanel1"
+        Me.TableLayoutPanel1.RowCount = 1
+        Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 100.0!))
+        Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 35.0!))
+        Me.TableLayoutPanel1.Size = New System.Drawing.Size(171, 35)
+        Me.TableLayoutPanel1.TabIndex = 6
+        '
+        'FormKodaStojisce
+        '
+        Me.AcceptButton = Me.Button1
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(194, 111)
+        Me.Controls.Add(Me.TableLayoutPanel1)
+        Me.Controls.Add(Me.Label3)
+        Me.Controls.Add(Me.Label2)
+        Me.Controls.Add(Me.TextBox2)
+        Me.Controls.Add(Me.TextBox1)
+        Me.Controls.Add(Me.Label1)
+        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.MaximizeBox = False
+        Me.MinimizeBox = False
+        Me.Name = "FormKodaStojisce"
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
+        Me.Text = "Koda: Stojišče"
+        Me.TopMost = True
+        Me.TableLayoutPanel1.ResumeLayout(False)
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents Label1 As Label
+    Friend WithEvents TextBox1 As TextBox
+    Friend WithEvents TextBox2 As TextBox
+    Friend WithEvents Label2 As Label
+    Friend WithEvents Button1 As Button
+    Friend WithEvents Label3 As Label
+    Friend WithEvents TableLayoutPanel1 As TableLayoutPanel
+End Class

FormKodaStojisce.vb

@@ -0,0 +1,5 @@
+Public Class FormKodaStojisce
+    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
+        Me.Close()
+    End Sub
+End Class

FormKodaVreme.Designer.vb

@@ -0,0 +1,148 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class FormKodaVreme
+    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()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(FormKodaVreme))
+        Me.TableLayoutPanel1 = New System.Windows.Forms.TableLayoutPanel()
+        Me.Button1 = New System.Windows.Forms.Button()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.TextBox2 = New System.Windows.Forms.TextBox()
+        Me.TextBox1 = New System.Windows.Forms.TextBox()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.Label3 = New System.Windows.Forms.Label()
+        Me.Label4 = New System.Windows.Forms.Label()
+        Me.TableLayoutPanel1.SuspendLayout()
+        Me.SuspendLayout()
+        '
+        'TableLayoutPanel1
+        '
+        Me.TableLayoutPanel1.ColumnCount = 1
+        Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 100.0!))
+        Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 20.0!))
+        Me.TableLayoutPanel1.Controls.Add(Me.Button1, 0, 0)
+        Me.TableLayoutPanel1.Location = New System.Drawing.Point(12, 64)
+        Me.TableLayoutPanel1.Name = "TableLayoutPanel1"
+        Me.TableLayoutPanel1.RowCount = 1
+        Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 100.0!))
+        Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 20.0!))
+        Me.TableLayoutPanel1.Size = New System.Drawing.Size(170, 35)
+        Me.TableLayoutPanel1.TabIndex = 12
+        '
+        'Button1
+        '
+        Me.Button1.Anchor = System.Windows.Forms.AnchorStyles.Bottom
+        Me.Button1.DialogResult = System.Windows.Forms.DialogResult.OK
+        Me.Button1.Location = New System.Drawing.Point(47, 9)
+        Me.Button1.Name = "Button1"
+        Me.Button1.Size = New System.Drawing.Size(75, 23)
+        Me.Button1.TabIndex = 4
+        Me.Button1.Text = "OK"
+        Me.Button1.UseVisualStyleBackColor = True
+        '
+        'Label2
+        '
+        Me.Label2.AutoSize = True
+        Me.Label2.Location = New System.Drawing.Point(12, 41)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(35, 13)
+        Me.Label2.TabIndex = 10
+        Me.Label2.Text = "Pritisk"
+        '
+        'TextBox2
+        '
+        Me.TextBox2.Location = New System.Drawing.Point(85, 38)
+        Me.TextBox2.Name = "TextBox2"
+        Me.TextBox2.Size = New System.Drawing.Size(61, 20)
+        Me.TextBox2.TabIndex = 9
+        Me.TextBox2.Text = "970"
+        Me.TextBox2.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
+        '
+        'TextBox1
+        '
+        Me.TextBox1.Location = New System.Drawing.Point(85, 12)
+        Me.TextBox1.Name = "TextBox1"
+        Me.TextBox1.Size = New System.Drawing.Size(61, 20)
+        Me.TextBox1.TabIndex = 8
+        Me.TextBox1.Text = "20"
+        Me.TextBox1.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
+        '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.Location = New System.Drawing.Point(12, 15)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(67, 13)
+        Me.Label1.TabIndex = 7
+        Me.Label1.Text = "Temperatura"
+        '
+        'Label3
+        '
+        Me.Label3.AutoSize = True
+        Me.Label3.Location = New System.Drawing.Point(152, 15)
+        Me.Label3.Name = "Label3"
+        Me.Label3.Size = New System.Drawing.Size(18, 13)
+        Me.Label3.TabIndex = 13
+        Me.Label3.Text = "°C"
+        '
+        'Label4
+        '
+        Me.Label4.AutoSize = True
+        Me.Label4.Location = New System.Drawing.Point(152, 41)
+        Me.Label4.Name = "Label4"
+        Me.Label4.Size = New System.Drawing.Size(30, 13)
+        Me.Label4.TabIndex = 14
+        Me.Label4.Text = "mbar"
+        '
+        'FormKodaVreme
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(194, 111)
+        Me.Controls.Add(Me.Label4)
+        Me.Controls.Add(Me.Label3)
+        Me.Controls.Add(Me.TableLayoutPanel1)
+        Me.Controls.Add(Me.Label2)
+        Me.Controls.Add(Me.TextBox2)
+        Me.Controls.Add(Me.TextBox1)
+        Me.Controls.Add(Me.Label1)
+        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.MaximizeBox = False
+        Me.MinimizeBox = False
+        Me.Name = "FormKodaVreme"
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
+        Me.Text = "Koda: Vreme"
+        Me.TableLayoutPanel1.ResumeLayout(False)
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+
+    Friend WithEvents TableLayoutPanel1 As TableLayoutPanel
+    Friend WithEvents Button1 As Button
+    Friend WithEvents Label2 As Label
+    Friend WithEvents TextBox2 As TextBox
+    Friend WithEvents TextBox1 As TextBox
+    Friend WithEvents Label1 As Label
+    Friend WithEvents Label3 As Label
+    Friend WithEvents Label4 As Label
+End Class

FormKodaVreme.vb

@@ -0,0 +1,5 @@
+Public Class FormKodaVreme
+    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
+        Me.Close()
+    End Sub
+End Class

FormNastavitve.Designer.vb

@@ -0,0 +1,807 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Class FormNastavitve
+    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()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(FormNastavitve))
+        Me.GroupBox1 = New System.Windows.Forms.GroupBox()
+        Me.TableLayoutPanel1 = New System.Windows.Forms.TableLayoutPanel()
+        Me.RadioButton1 = New System.Windows.Forms.RadioButton()
+        Me.RadioButton2 = New System.Windows.Forms.RadioButton()
+        Me.GroupBox2 = New System.Windows.Forms.GroupBox()
+        Me.TableLayoutPanel2 = New System.Windows.Forms.TableLayoutPanel()
+        Me.RadioButton3 = New System.Windows.Forms.RadioButton()
+        Me.RadioButton4 = New System.Windows.Forms.RadioButton()
+        Me.GroupBox3 = New System.Windows.Forms.GroupBox()
+        Me.TextBoxLog = New System.Windows.Forms.TextBox()
+        Me.ButtonOdpriLog = New System.Windows.Forms.Button()
+        Me.OpenFileDialogLog = New System.Windows.Forms.OpenFileDialog()
+        Me.SaveFileDialogLog = New System.Windows.Forms.SaveFileDialog()
+        Me.TableLayoutPanel3 = New System.Windows.Forms.TableLayoutPanel()
+        Me.Label7 = New System.Windows.Forms.Label()
+        Me.TextBoxOriHz = New System.Windows.Forms.TextBox()
+        Me.Label14 = New System.Windows.Forms.Label()
+        Me.Label12 = New System.Windows.Forms.Label()
+        Me.Label10 = New System.Windows.Forms.Label()
+        Me.TextBoxImport = New System.Windows.Forms.TextBox()
+        Me.Label8 = New System.Windows.Forms.Label()
+        Me.TextBoxMeas = New System.Windows.Forms.TextBox()
+        Me.TextBoxMeasOri = New System.Windows.Forms.TextBox()
+        Me.Label6 = New System.Windows.Forms.Label()
+        Me.Label9 = New System.Windows.Forms.Label()
+        Me.Label15 = New System.Windows.Forms.Label()
+        Me.Label11 = New System.Windows.Forms.Label()
+        Me.TextBoxOriHt = New System.Windows.Forms.TextBox()
+        Me.TextBoxFree = New System.Windows.Forms.TextBox()
+        Me.TextBoxRes = New System.Windows.Forms.TextBox()
+        Me.TextBoxSetAzi = New System.Windows.Forms.TextBox()
+        Me.TextBoxQuickSet = New System.Windows.Forms.TextBox()
+        Me.Label5 = New System.Windows.Forms.Label()
+        Me.Label4 = New System.Windows.Forms.Label()
+        Me.Label3 = New System.Windows.Forms.Label()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.TextBoxStoj = New System.Windows.Forms.TextBox()
+        Me.TextBoxStojInfo = New System.Windows.Forms.TextBox()
+        Me.Label13 = New System.Windows.Forms.Label()
+        Me.GroupBox4 = New System.Windows.Forms.GroupBox()
+        Me.LabelFontInfo = New System.Windows.Forms.Label()
+        Me.ButtonFont = New System.Windows.Forms.Button()
+        Me.FontDialog1 = New System.Windows.Forms.FontDialog()
+        Me.SaveFileDialogNast = New System.Windows.Forms.SaveFileDialog()
+        Me.MenuStrip1 = New System.Windows.Forms.MenuStrip()
+        Me.DatotekaToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.IzvoziKodeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.UvoziKodeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
+        Me.ZapriToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ButtonShraniZapri = New System.Windows.Forms.Button()
+        Me.GroupBox1.SuspendLayout()
+        Me.TableLayoutPanel1.SuspendLayout()
+        Me.GroupBox2.SuspendLayout()
+        Me.TableLayoutPanel2.SuspendLayout()
+        Me.GroupBox3.SuspendLayout()
+        Me.TableLayoutPanel3.SuspendLayout()
+        Me.GroupBox4.SuspendLayout()
+        Me.MenuStrip1.SuspendLayout()
+        Me.SuspendLayout()
+        '
+        'GroupBox1
+        '
+        Me.GroupBox1.Controls.Add(Me.TableLayoutPanel1)
+        Me.GroupBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.GroupBox1.Location = New System.Drawing.Point(257, 27)
+        Me.GroupBox1.Name = "GroupBox1"
+        Me.GroupBox1.Size = New System.Drawing.Size(285, 87)
+        Me.GroupBox1.TabIndex = 0
+        Me.GroupBox1.TabStop = False
+        Me.GroupBox1.Text = "Ločilo med podatki"
+        '
+        'TableLayoutPanel1
+        '
+        Me.TableLayoutPanel1.ColumnCount = 1
+        Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
+        Me.TableLayoutPanel1.Controls.Add(Me.RadioButton1, 0, 0)
+        Me.TableLayoutPanel1.Controls.Add(Me.RadioButton2, 0, 1)
+        Me.TableLayoutPanel1.Location = New System.Drawing.Point(7, 22)
+        Me.TableLayoutPanel1.Name = "TableLayoutPanel1"
+        Me.TableLayoutPanel1.RowCount = 2
+        Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle())
+        Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle())
+        Me.TableLayoutPanel1.Size = New System.Drawing.Size(272, 59)
+        Me.TableLayoutPanel1.TabIndex = 3
+        '
+        'RadioButton1
+        '
+        Me.RadioButton1.AutoSize = True
+        Me.RadioButton1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.RadioButton1.Location = New System.Drawing.Point(3, 3)
+        Me.RadioButton1.Name = "RadioButton1"
+        Me.RadioButton1.Size = New System.Drawing.Size(80, 19)
+        Me.RadioButton1.TabIndex = 0
+        Me.RadioButton1.TabStop = True
+        Me.RadioButton1.Text = "Presledek"
+        Me.RadioButton1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
+        Me.RadioButton1.UseVisualStyleBackColor = True
+        '
+        'RadioButton2
+        '
+        Me.RadioButton2.AutoSize = True
+        Me.RadioButton2.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.RadioButton2.Location = New System.Drawing.Point(3, 28)
+        Me.RadioButton2.Name = "RadioButton2"
+        Me.RadioButton2.Size = New System.Drawing.Size(77, 19)
+        Me.RadioButton2.TabIndex = 1
+        Me.RadioButton2.TabStop = True
+        Me.RadioButton2.Text = "Tabulator"
+        Me.RadioButton2.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
+        Me.RadioButton2.UseVisualStyleBackColor = True
+        '
+        'GroupBox2
+        '
+        Me.GroupBox2.Controls.Add(Me.TableLayoutPanel2)
+        Me.GroupBox2.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.GroupBox2.Location = New System.Drawing.Point(257, 120)
+        Me.GroupBox2.Name = "GroupBox2"
+        Me.GroupBox2.Size = New System.Drawing.Size(285, 87)
+        Me.GroupBox2.TabIndex = 1
+        Me.GroupBox2.TabStop = False
+        Me.GroupBox2.Text = "Decimalno ločilo"
+        '
+        'TableLayoutPanel2
+        '
+        Me.TableLayoutPanel2.ColumnCount = 1
+        Me.TableLayoutPanel2.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 100.0!))
+        Me.TableLayoutPanel2.Controls.Add(Me.RadioButton3, 0, 0)
+        Me.TableLayoutPanel2.Controls.Add(Me.RadioButton4, 0, 1)
+        Me.TableLayoutPanel2.Location = New System.Drawing.Point(7, 22)
+        Me.TableLayoutPanel2.Name = "TableLayoutPanel2"
+        Me.TableLayoutPanel2.RowCount = 2
+        Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle())
+        Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle())
+        Me.TableLayoutPanel2.Size = New System.Drawing.Size(272, 59)
+        Me.TableLayoutPanel2.TabIndex = 3
+        '
+        'RadioButton3
+        '
+        Me.RadioButton3.AutoSize = True
+        Me.RadioButton3.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.RadioButton3.Location = New System.Drawing.Point(3, 3)
+        Me.RadioButton3.Name = "RadioButton3"
+        Me.RadioButton3.Size = New System.Drawing.Size(49, 19)
+        Me.RadioButton3.TabIndex = 0
+        Me.RadioButton3.TabStop = True
+        Me.RadioButton3.Text = "Pika"
+        Me.RadioButton3.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
+        Me.RadioButton3.UseVisualStyleBackColor = True
+        '
+        'RadioButton4
+        '
+        Me.RadioButton4.AutoSize = True
+        Me.RadioButton4.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.RadioButton4.Location = New System.Drawing.Point(3, 28)
+        Me.RadioButton4.Name = "RadioButton4"
+        Me.RadioButton4.Size = New System.Drawing.Size(58, 19)
+        Me.RadioButton4.TabIndex = 1
+        Me.RadioButton4.TabStop = True
+        Me.RadioButton4.Text = "Vejica"
+        Me.RadioButton4.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
+        Me.RadioButton4.UseVisualStyleBackColor = True
+        '
+        'GroupBox3
+        '
+        Me.GroupBox3.Controls.Add(Me.TextBoxLog)
+        Me.GroupBox3.Controls.Add(Me.ButtonOdpriLog)
+        Me.GroupBox3.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.GroupBox3.Location = New System.Drawing.Point(257, 296)
+        Me.GroupBox3.Name = "GroupBox3"
+        Me.GroupBox3.Size = New System.Drawing.Size(285, 56)
+        Me.GroupBox3.TabIndex = 3
+        Me.GroupBox3.TabStop = False
+        Me.GroupBox3.Text = "Zapisnik obdelave podatkov"
+        '
+        'TextBoxLog
+        '
+        Me.TextBoxLog.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.TextBoxLog.Location = New System.Drawing.Point(6, 28)
+        Me.TextBoxLog.Name = "TextBoxLog"
+        Me.TextBoxLog.Size = New System.Drawing.Size(235, 22)
+        Me.TextBoxLog.TabIndex = 0
+        '
+        'ButtonOdpriLog
+        '
+        Me.ButtonOdpriLog.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.ButtonOdpriLog.AutoSize = True
+        Me.ButtonOdpriLog.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.ButtonOdpriLog.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.ButtonOdpriLog.Location = New System.Drawing.Point(253, 25)
+        Me.ButtonOdpriLog.Name = "ButtonOdpriLog"
+        Me.ButtonOdpriLog.Size = New System.Drawing.Size(26, 26)
+        Me.ButtonOdpriLog.TabIndex = 1
+        Me.ButtonOdpriLog.Text = "..."
+        Me.ButtonOdpriLog.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageBeforeText
+        Me.ButtonOdpriLog.UseVisualStyleBackColor = True
+        '
+        'OpenFileDialogLog
+        '
+        Me.OpenFileDialogLog.CheckFileExists = False
+        Me.OpenFileDialogLog.DefaultExt = "Text File|*.txt"
+        Me.OpenFileDialogLog.FileName = "tps1100_log.txt"
+        Me.OpenFileDialogLog.Filter = "Text File|*.txt"
+        '
+        'SaveFileDialogLog
+        '
+        Me.SaveFileDialogLog.DefaultExt = "Text File|*.txt"
+        Me.SaveFileDialogLog.FileName = "tps1100_log.txt"
+        Me.SaveFileDialogLog.Filter = "Text File|*.txt"
+        '
+        'TableLayoutPanel3
+        '
+        Me.TableLayoutPanel3.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.TableLayoutPanel3.ColumnCount = 2
+        Me.TableLayoutPanel3.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 75.0!))
+        Me.TableLayoutPanel3.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle())
+        Me.TableLayoutPanel3.Controls.Add(Me.Label7, 1, 3)
+        Me.TableLayoutPanel3.Controls.Add(Me.TextBoxOriHz, 0, 3)
+        Me.TableLayoutPanel3.Controls.Add(Me.Label14, 0, 0)
+        Me.TableLayoutPanel3.Controls.Add(Me.Label12, 1, 1)
+        Me.TableLayoutPanel3.Controls.Add(Me.Label10, 1, 0)
+        Me.TableLayoutPanel3.Controls.Add(Me.TextBoxImport, 0, 12)
+        Me.TableLayoutPanel3.Controls.Add(Me.Label8, 1, 12)
+        Me.TableLayoutPanel3.Controls.Add(Me.TextBoxMeas, 0, 11)
+        Me.TableLayoutPanel3.Controls.Add(Me.TextBoxMeasOri, 0, 10)
+        Me.TableLayoutPanel3.Controls.Add(Me.Label6, 1, 11)
+        Me.TableLayoutPanel3.Controls.Add(Me.Label9, 1, 10)
+        Me.TableLayoutPanel3.Controls.Add(Me.Label15, 0, 9)
+        Me.TableLayoutPanel3.Controls.Add(Me.Label11, 1, 9)
+        Me.TableLayoutPanel3.Controls.Add(Me.TextBoxOriHt, 0, 8)
+        Me.TableLayoutPanel3.Controls.Add(Me.TextBoxFree, 0, 7)
+        Me.TableLayoutPanel3.Controls.Add(Me.TextBoxRes, 0, 6)
+        Me.TableLayoutPanel3.Controls.Add(Me.TextBoxSetAzi, 0, 5)
+        Me.TableLayoutPanel3.Controls.Add(Me.TextBoxQuickSet, 0, 4)
+        Me.TableLayoutPanel3.Controls.Add(Me.Label5, 1, 8)
+        Me.TableLayoutPanel3.Controls.Add(Me.Label4, 1, 7)
+        Me.TableLayoutPanel3.Controls.Add(Me.Label3, 1, 6)
+        Me.TableLayoutPanel3.Controls.Add(Me.Label2, 1, 5)
+        Me.TableLayoutPanel3.Controls.Add(Me.Label1, 1, 4)
+        Me.TableLayoutPanel3.Controls.Add(Me.TextBoxStoj, 0, 1)
+        Me.TableLayoutPanel3.Controls.Add(Me.TextBoxStojInfo, 0, 2)
+        Me.TableLayoutPanel3.Controls.Add(Me.Label13, 1, 2)
+        Me.TableLayoutPanel3.Location = New System.Drawing.Point(12, 27)
+        Me.TableLayoutPanel3.Name = "TableLayoutPanel3"
+        Me.TableLayoutPanel3.RowCount = 13
+        Me.TableLayoutPanel3.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 30.0!))
+        Me.TableLayoutPanel3.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 30.0!))
+        Me.TableLayoutPanel3.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 30.0!))
+        Me.TableLayoutPanel3.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 30.0!))
+        Me.TableLayoutPanel3.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 30.0!))
+        Me.TableLayoutPanel3.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 30.0!))
+        Me.TableLayoutPanel3.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 30.0!))
+        Me.TableLayoutPanel3.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 30.0!))
+        Me.TableLayoutPanel3.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 30.0!))
+        Me.TableLayoutPanel3.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 30.0!))
+        Me.TableLayoutPanel3.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 30.0!))
+        Me.TableLayoutPanel3.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 30.0!))
+        Me.TableLayoutPanel3.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 30.0!))
+        Me.TableLayoutPanel3.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 20.0!))
+        Me.TableLayoutPanel3.Size = New System.Drawing.Size(239, 390)
+        Me.TableLayoutPanel3.TabIndex = 0
+        '
+        'Label7
+        '
+        Me.Label7.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Label7.AutoSize = True
+        Me.Label7.Location = New System.Drawing.Point(78, 90)
+        Me.Label7.Name = "Label7"
+        Me.Label7.Size = New System.Drawing.Size(79, 30)
+        Me.Label7.TabIndex = 9
+        Me.Label7.Text = "Orientacija (Hz)"
+        Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'TextBoxOriHz
+        '
+        Me.TextBoxOriHz.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.TextBoxOriHz.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.TextBoxOriHz.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.TextBoxOriHz.Location = New System.Drawing.Point(3, 93)
+        Me.TextBoxOriHz.Name = "TextBoxOriHz"
+        Me.TextBoxOriHz.Size = New System.Drawing.Size(69, 22)
+        Me.TextBoxOriHz.TabIndex = 9
+        Me.TextBoxOriHz.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
+        '
+        'Label14
+        '
+        Me.Label14.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Label14.AutoSize = True
+        Me.Label14.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label14.Location = New System.Drawing.Point(3, 0)
+        Me.Label14.Name = "Label14"
+        Me.Label14.Size = New System.Drawing.Size(39, 30)
+        Me.Label14.TabIndex = 21
+        Me.Label14.Text = "Koda"
+        Me.Label14.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'Label12
+        '
+        Me.Label12.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Label12.AutoSize = True
+        Me.Label12.Location = New System.Drawing.Point(78, 30)
+        Me.Label12.Name = "Label12"
+        Me.Label12.Size = New System.Drawing.Size(47, 30)
+        Me.Label12.TabIndex = 5
+        Me.Label12.Text = "Stojišče "
+        Me.Label12.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'Label10
+        '
+        Me.Label10.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Label10.AutoSize = True
+        Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label10.Location = New System.Drawing.Point(78, 0)
+        Me.Label10.Name = "Label10"
+        Me.Label10.Size = New System.Drawing.Size(63, 30)
+        Me.Label10.TabIndex = 20
+        Me.Label10.Text = "Stojišče"
+        Me.Label10.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'TextBoxImport
+        '
+        Me.TextBoxImport.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.TextBoxImport.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.TextBoxImport.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.TextBoxImport.Location = New System.Drawing.Point(3, 363)
+        Me.TextBoxImport.Name = "TextBoxImport"
+        Me.TextBoxImport.Size = New System.Drawing.Size(69, 22)
+        Me.TextBoxImport.TabIndex = 14
+        Me.TextBoxImport.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
+        '
+        'Label8
+        '
+        Me.Label8.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Label8.AutoSize = True
+        Me.Label8.Location = New System.Drawing.Point(78, 360)
+        Me.Label8.Name = "Label8"
+        Me.Label8.Size = New System.Drawing.Size(120, 30)
+        Me.Label8.TabIndex = 7
+        Me.Label8.Text = "Imported / User-entered"
+        Me.Label8.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'TextBoxMeas
+        '
+        Me.TextBoxMeas.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.TextBoxMeas.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.TextBoxMeas.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.TextBoxMeas.Location = New System.Drawing.Point(3, 333)
+        Me.TextBoxMeas.Name = "TextBoxMeas"
+        Me.TextBoxMeas.Size = New System.Drawing.Size(69, 22)
+        Me.TextBoxMeas.TabIndex = 11
+        Me.TextBoxMeas.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
+        '
+        'TextBoxMeasOri
+        '
+        Me.TextBoxMeasOri.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.TextBoxMeasOri.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.TextBoxMeasOri.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.TextBoxMeasOri.Location = New System.Drawing.Point(3, 303)
+        Me.TextBoxMeasOri.Name = "TextBoxMeasOri"
+        Me.TextBoxMeasOri.Size = New System.Drawing.Size(69, 22)
+        Me.TextBoxMeasOri.TabIndex = 12
+        Me.TextBoxMeasOri.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
+        '
+        'Label6
+        '
+        Me.Label6.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Label6.AutoSize = True
+        Me.Label6.Location = New System.Drawing.Point(78, 330)
+        Me.Label6.Name = "Label6"
+        Me.Label6.Size = New System.Drawing.Size(54, 30)
+        Me.Label6.TabIndex = 5
+        Me.Label6.Text = "Measured"
+        Me.Label6.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'Label9
+        '
+        Me.Label9.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Label9.AutoSize = True
+        Me.Label9.Location = New System.Drawing.Point(78, 300)
+        Me.Label9.Name = "Label9"
+        Me.Label9.Size = New System.Drawing.Size(58, 30)
+        Me.Label9.TabIndex = 16
+        Me.Label9.Text = "Orientation"
+        Me.Label9.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'Label15
+        '
+        Me.Label15.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Label15.AutoSize = True
+        Me.Label15.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label15.Location = New System.Drawing.Point(3, 270)
+        Me.Label15.Name = "Label15"
+        Me.Label15.Size = New System.Drawing.Size(39, 30)
+        Me.Label15.TabIndex = 22
+        Me.Label15.Text = "Koda"
+        Me.Label15.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'Label11
+        '
+        Me.Label11.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Label11.AutoSize = True
+        Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label11.Location = New System.Drawing.Point(78, 270)
+        Me.Label11.Name = "Label11"
+        Me.Label11.Size = New System.Drawing.Size(58, 30)
+        Me.Label11.TabIndex = 19
+        Me.Label11.Text = "Meritve"
+        Me.Label11.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'TextBoxOriHt
+        '
+        Me.TextBoxOriHt.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.TextBoxOriHt.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.TextBoxOriHt.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.TextBoxOriHt.Location = New System.Drawing.Point(3, 243)
+        Me.TextBoxOriHt.Name = "TextBoxOriHt"
+        Me.TextBoxOriHt.Size = New System.Drawing.Size(69, 22)
+        Me.TextBoxOriHt.TabIndex = 10
+        Me.TextBoxOriHt.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
+        '
+        'TextBoxFree
+        '
+        Me.TextBoxFree.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.TextBoxFree.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.TextBoxFree.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.TextBoxFree.Location = New System.Drawing.Point(3, 213)
+        Me.TextBoxFree.Name = "TextBoxFree"
+        Me.TextBoxFree.Size = New System.Drawing.Size(69, 22)
+        Me.TextBoxFree.TabIndex = 9
+        Me.TextBoxFree.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
+        '
+        'TextBoxRes
+        '
+        Me.TextBoxRes.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.TextBoxRes.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.TextBoxRes.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.TextBoxRes.Location = New System.Drawing.Point(3, 183)
+        Me.TextBoxRes.Name = "TextBoxRes"
+        Me.TextBoxRes.Size = New System.Drawing.Size(69, 22)
+        Me.TextBoxRes.TabIndex = 8
+        Me.TextBoxRes.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
+        '
+        'TextBoxSetAzi
+        '
+        Me.TextBoxSetAzi.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.TextBoxSetAzi.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.TextBoxSetAzi.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.TextBoxSetAzi.Location = New System.Drawing.Point(3, 153)
+        Me.TextBoxSetAzi.Name = "TextBoxSetAzi"
+        Me.TextBoxSetAzi.Size = New System.Drawing.Size(69, 22)
+        Me.TextBoxSetAzi.TabIndex = 7
+        Me.TextBoxSetAzi.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
+        '
+        'TextBoxQuickSet
+        '
+        Me.TextBoxQuickSet.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.TextBoxQuickSet.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.TextBoxQuickSet.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.TextBoxQuickSet.Location = New System.Drawing.Point(3, 123)
+        Me.TextBoxQuickSet.Name = "TextBoxQuickSet"
+        Me.TextBoxQuickSet.Size = New System.Drawing.Size(69, 22)
+        Me.TextBoxQuickSet.TabIndex = 6
+        Me.TextBoxQuickSet.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
+        '
+        'Label5
+        '
+        Me.Label5.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Label5.AutoSize = True
+        Me.Label5.Location = New System.Drawing.Point(78, 240)
+        Me.Label5.Name = "Label5"
+        Me.Label5.Size = New System.Drawing.Size(103, 30)
+        Me.Label5.TabIndex = 4
+        Me.Label5.Text = "Ori. and Ht. Transfer"
+        Me.Label5.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'Label4
+        '
+        Me.Label4.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Label4.AutoSize = True
+        Me.Label4.Location = New System.Drawing.Point(78, 210)
+        Me.Label4.Name = "Label4"
+        Me.Label4.Size = New System.Drawing.Size(64, 30)
+        Me.Label4.TabIndex = 3
+        Me.Label4.Text = "Free Station"
+        Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'Label3
+        '
+        Me.Label3.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Label3.AutoSize = True
+        Me.Label3.Location = New System.Drawing.Point(78, 180)
+        Me.Label3.Name = "Label3"
+        Me.Label3.Size = New System.Drawing.Size(55, 30)
+        Me.Label3.TabIndex = 2
+        Me.Label3.Text = "Resection"
+        Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'Label2
+        '
+        Me.Label2.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Label2.AutoSize = True
+        Me.Label2.Location = New System.Drawing.Point(78, 150)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(63, 30)
+        Me.Label2.TabIndex = 1
+        Me.Label2.Text = "Set Azimuth"
+        Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'Label1
+        '
+        Me.Label1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Label1.AutoSize = True
+        Me.Label1.Location = New System.Drawing.Point(78, 120)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(54, 30)
+        Me.Label1.TabIndex = 0
+        Me.Label1.Text = "Quick Set"
+        Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'TextBoxStoj
+        '
+        Me.TextBoxStoj.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.TextBoxStoj.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.TextBoxStoj.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.TextBoxStoj.Location = New System.Drawing.Point(3, 33)
+        Me.TextBoxStoj.Name = "TextBoxStoj"
+        Me.TextBoxStoj.Size = New System.Drawing.Size(69, 22)
+        Me.TextBoxStoj.TabIndex = 4
+        Me.TextBoxStoj.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
+        '
+        'TextBoxStojInfo
+        '
+        Me.TextBoxStojInfo.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.TextBoxStojInfo.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.TextBoxStojInfo.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.TextBoxStojInfo.Location = New System.Drawing.Point(3, 63)
+        Me.TextBoxStojInfo.Name = "TextBoxStojInfo"
+        Me.TextBoxStojInfo.Size = New System.Drawing.Size(69, 22)
+        Me.TextBoxStojInfo.TabIndex = 5
+        Me.TextBoxStojInfo.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
+        '
+        'Label13
+        '
+        Me.Label13.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.Label13.AutoSize = True
+        Me.Label13.Location = New System.Drawing.Point(78, 60)
+        Me.Label13.Name = "Label13"
+        Me.Label13.Size = New System.Drawing.Size(88, 30)
+        Me.Label13.TabIndex = 5
+        Me.Label13.Text = "Info Temp/Pritisk"
+        Me.Label13.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'GroupBox4
+        '
+        Me.GroupBox4.Controls.Add(Me.LabelFontInfo)
+        Me.GroupBox4.Controls.Add(Me.ButtonFont)
+        Me.GroupBox4.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.GroupBox4.Location = New System.Drawing.Point(257, 213)
+        Me.GroupBox4.Name = "GroupBox4"
+        Me.GroupBox4.Size = New System.Drawing.Size(285, 77)
+        Me.GroupBox4.TabIndex = 4
+        Me.GroupBox4.TabStop = False
+        Me.GroupBox4.Text = "Prikaz Izpisa"
+        '
+        'LabelFontInfo
+        '
+        Me.LabelFontInfo.AutoSize = True
+        Me.LabelFontInfo.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.LabelFontInfo.Location = New System.Drawing.Point(6, 23)
+        Me.LabelFontInfo.Name = "LabelFontInfo"
+        Me.LabelFontInfo.Size = New System.Drawing.Size(55, 16)
+        Me.LabelFontInfo.TabIndex = 1
+        Me.LabelFontInfo.Text = "Label16"
+        '
+        'ButtonFont
+        '
+        Me.ButtonFont.Location = New System.Drawing.Point(171, 41)
+        Me.ButtonFont.Name = "ButtonFont"
+        Me.ButtonFont.Size = New System.Drawing.Size(100, 30)
+        Me.ButtonFont.TabIndex = 0
+        Me.ButtonFont.Text = "Izberi pisavo"
+        Me.ButtonFont.UseVisualStyleBackColor = True
+        '
+        'FontDialog1
+        '
+        Me.FontDialog1.ShowEffects = False
+        '
+        'SaveFileDialogNast
+        '
+        Me.SaveFileDialogNast.DefaultExt = "Config|*.cfg"
+        Me.SaveFileDialogNast.FileName = "tps1100_nastavitve.cfg"
+        Me.SaveFileDialogNast.Filter = "Config|*.cfg"
+        '
+        'MenuStrip1
+        '
+        Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DatotekaToolStripMenuItem})
+        Me.MenuStrip1.Location = New System.Drawing.Point(0, 0)
+        Me.MenuStrip1.Name = "MenuStrip1"
+        Me.MenuStrip1.Size = New System.Drawing.Size(554, 24)
+        Me.MenuStrip1.TabIndex = 7
+        Me.MenuStrip1.Text = "MenuStrip1"
+        '
+        'DatotekaToolStripMenuItem
+        '
+        Me.DatotekaToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.IzvoziKodeToolStripMenuItem, Me.UvoziKodeToolStripMenuItem, Me.ToolStripSeparator1, Me.ZapriToolStripMenuItem})
+        Me.DatotekaToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_save_as_50
+        Me.DatotekaToolStripMenuItem.Name = "DatotekaToolStripMenuItem"
+        Me.DatotekaToolStripMenuItem.Size = New System.Drawing.Size(82, 20)
+        Me.DatotekaToolStripMenuItem.Text = "&Datoteka"
+        '
+        'IzvoziKodeToolStripMenuItem
+        '
+        Me.IzvoziKodeToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_move_to_folder_50
+        Me.IzvoziKodeToolStripMenuItem.Name = "IzvoziKodeToolStripMenuItem"
+        Me.IzvoziKodeToolStripMenuItem.Size = New System.Drawing.Size(133, 22)
+        Me.IzvoziKodeToolStripMenuItem.Text = "&Izvozi Kode"
+        '
+        'UvoziKodeToolStripMenuItem
+        '
+        Me.UvoziKodeToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_send_file_50
+        Me.UvoziKodeToolStripMenuItem.Name = "UvoziKodeToolStripMenuItem"
+        Me.UvoziKodeToolStripMenuItem.Size = New System.Drawing.Size(133, 22)
+        Me.UvoziKodeToolStripMenuItem.Text = "&Uvozi Kode"
+        '
+        'ToolStripSeparator1
+        '
+        Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
+        Me.ToolStripSeparator1.Size = New System.Drawing.Size(130, 6)
+        '
+        'ZapriToolStripMenuItem
+        '
+        Me.ZapriToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_close_50
+        Me.ZapriToolStripMenuItem.Name = "ZapriToolStripMenuItem"
+        Me.ZapriToolStripMenuItem.Size = New System.Drawing.Size(133, 22)
+        Me.ZapriToolStripMenuItem.Text = "&Zapri"
+        '
+        'ButtonShraniZapri
+        '
+        Me.ButtonShraniZapri.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.ButtonShraniZapri.AutoSize = True
+        Me.ButtonShraniZapri.Image = Global.TPS1100_Convert.My.Resources.Resources.Save_as_24
+        Me.ButtonShraniZapri.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.ButtonShraniZapri.Location = New System.Drawing.Point(473, 396)
+        Me.ButtonShraniZapri.Name = "ButtonShraniZapri"
+        Me.ButtonShraniZapri.Size = New System.Drawing.Size(69, 33)
+        Me.ButtonShraniZapri.TabIndex = 8
+        Me.ButtonShraniZapri.Text = "Shrani"
+        Me.ButtonShraniZapri.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.ButtonShraniZapri.UseVisualStyleBackColor = True
+        '
+        'FormNastavitve
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(554, 441)
+        Me.Controls.Add(Me.ButtonShraniZapri)
+        Me.Controls.Add(Me.GroupBox4)
+        Me.Controls.Add(Me.TableLayoutPanel3)
+        Me.Controls.Add(Me.GroupBox3)
+        Me.Controls.Add(Me.GroupBox2)
+        Me.Controls.Add(Me.GroupBox1)
+        Me.Controls.Add(Me.MenuStrip1)
+        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.MainMenuStrip = Me.MenuStrip1
+        Me.MaximizeBox = False
+        Me.MinimizeBox = False
+        Me.Name = "FormNastavitve"
+        Me.SizeGripStyle = System.Windows.Forms.SizeGripStyle.Hide
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
+        Me.Text = "Nastavitve"
+        Me.TopMost = True
+        Me.GroupBox1.ResumeLayout(False)
+        Me.TableLayoutPanel1.ResumeLayout(False)
+        Me.TableLayoutPanel1.PerformLayout()
+        Me.GroupBox2.ResumeLayout(False)
+        Me.TableLayoutPanel2.ResumeLayout(False)
+        Me.TableLayoutPanel2.PerformLayout()
+        Me.GroupBox3.ResumeLayout(False)
+        Me.GroupBox3.PerformLayout()
+        Me.TableLayoutPanel3.ResumeLayout(False)
+        Me.TableLayoutPanel3.PerformLayout()
+        Me.GroupBox4.ResumeLayout(False)
+        Me.GroupBox4.PerformLayout()
+        Me.MenuStrip1.ResumeLayout(False)
+        Me.MenuStrip1.PerformLayout()
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+    Friend WithEvents GroupBox1 As GroupBox
+    Friend WithEvents RadioButton2 As RadioButton
+    Friend WithEvents TableLayoutPanel1 As TableLayoutPanel
+    Friend WithEvents GroupBox2 As GroupBox
+    Friend WithEvents TableLayoutPanel2 As TableLayoutPanel
+    Friend WithEvents RadioButton3 As RadioButton
+    Friend WithEvents RadioButton4 As RadioButton
+    Friend WithEvents GroupBox3 As GroupBox
+    Friend WithEvents TextBoxLog As TextBox
+    Friend WithEvents ButtonOdpriLog As Button
+    Friend WithEvents OpenFileDialogLog As OpenFileDialog
+    Friend WithEvents SaveFileDialogLog As SaveFileDialog
+    Friend WithEvents RadioButton1 As RadioButton
+    Friend WithEvents TableLayoutPanel3 As TableLayoutPanel
+    Friend WithEvents Label1 As Label
+    Friend WithEvents Label2 As Label
+    Friend WithEvents Label3 As Label
+    Friend WithEvents Label4 As Label
+    Friend WithEvents Label5 As Label
+    Friend WithEvents Label6 As Label
+    Friend WithEvents Label8 As Label
+    Friend WithEvents TextBoxQuickSet As TextBox
+    Friend WithEvents TextBoxSetAzi As TextBox
+    Friend WithEvents TextBoxRes As TextBox
+    Friend WithEvents TextBoxFree As TextBox
+    Friend WithEvents TextBoxOriHt As TextBox
+    Friend WithEvents TextBoxMeas As TextBox
+    Friend WithEvents TextBoxImport As TextBox
+    Friend WithEvents Label9 As Label
+    Friend WithEvents TextBoxMeasOri As TextBox
+    Friend WithEvents Label11 As Label
+    Friend WithEvents Label10 As Label
+    Friend WithEvents Label13 As Label
+    Friend WithEvents Label12 As Label
+    Friend WithEvents TextBoxStojInfo As TextBox
+    Friend WithEvents TextBoxStoj As TextBox
+    Friend WithEvents Label14 As Label
+    Friend WithEvents Label15 As Label
+    Friend WithEvents GroupBox4 As GroupBox
+    Friend WithEvents LabelFontInfo As Label
+    Friend WithEvents ButtonFont As Button
+    Friend WithEvents FontDialog1 As FontDialog
+    Friend WithEvents SaveFileDialogNast As SaveFileDialog
+    Friend WithEvents MenuStrip1 As MenuStrip
+    Friend WithEvents DatotekaToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents IzvoziKodeToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents UvoziKodeToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents ToolStripSeparator1 As ToolStripSeparator
+    Friend WithEvents ZapriToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents ButtonShraniZapri As Button
+    Friend WithEvents Label7 As Label
+    Friend WithEvents TextBoxOriHz As TextBox
+End Class

FormNastavitve.vb

@@ -0,0 +1,118 @@
+Public Class FormNastavitve
+
+    Private Sub FormNastavitve_Load(sender As Object, e As EventArgs) Handles MyBase.Load
+        If My.Settings.Stolpci = 0 Then
+            RadioButton1.Checked = True
+        ElseIf My.Settings.Stolpci = 1 Then
+            RadioButton2.Checked = True
+        End If
+
+        If My.Settings.DecimalnoLocilo = "Pika" Then
+            RadioButton3.Checked = True
+        ElseIf My.Settings.DecimalnoLocilo = "Vejica" Then
+            RadioButton4.Checked = True
+        End If
+
+        TextBoxStoj.Text = My.Settings.KodaStojisce.ToString
+        TextBoxStojInfo.Text = My.Settings.KodaStojisceInfo.ToString
+        TextBoxOriHz.Text = My.Settings.KodaStojisceOri.ToString
+        TextBoxQuickSet.Text = My.Settings.KodaQuickSet.ToString
+        TextBoxSetAzi.Text = My.Settings.KodaSetAzi.ToString
+        TextBoxRes.Text = My.Settings.KodaResection.ToString
+        TextBoxFree.Text = My.Settings.KodaFreeStation.ToString
+        TextBoxOriHt.Text = My.Settings.KodaOriHtTrans.ToString
+        TextBoxMeasOri.Text = My.Settings.KodaMeasOri.ToString
+        TextBoxMeas.Text = My.Settings.KodaMeas.ToString
+        TextBoxImport.Text = My.Settings.KodaUserImport.ToString
+        TextBoxLog.Text = My.Settings.DatLogfile.ToString
+
+        LabelFontInfo.Text = My.Settings.Pisava + " / " + My.Settings.PisavaVelikost.ToString
+
+    End Sub
+    Private Sub FormNastavitve_Closing(sender As Object, e As EventArgs) Handles MyBase.Closing
+
+        If RadioButton1.Checked = True Then
+            My.Settings.Stolpci = 0
+        End If
+
+        If RadioButton2.Checked = True Then
+            My.Settings.Stolpci = 1
+        End If
+
+        If RadioButton3.Checked = True Then
+            My.Settings.DecimalnoLocilo = "Pika"
+        End If
+
+        If RadioButton4.Checked = True Then
+            My.Settings.DecimalnoLocilo = "Vejica"
+        End If
+
+        My.Settings.KodaStojisce = TextBoxStoj.Text
+        My.Settings.KodaStojisceInfo = TextBoxStojInfo.Text
+        My.Settings.KodaStojisceOri = TextBoxOriHz.Text
+        My.Settings.KodaQuickSet = TextBoxQuickSet.Text
+        My.Settings.KodaSetAzi = TextBoxSetAzi.Text
+        My.Settings.KodaResection = TextBoxRes.Text
+        My.Settings.KodaFreeStation = TextBoxFree.Text
+        My.Settings.KodaOriHtTrans = TextBoxOriHt.Text
+        My.Settings.KodaMeasOri = TextBoxMeasOri.Text
+        My.Settings.KodaMeas = TextBoxMeas.Text
+        My.Settings.KodaUserImport = TextBoxImport.Text
+        My.Settings.DatLogfile = TextBoxLog.Text
+
+        My.Settings.Save()
+
+        Form1.DatotekaLogfile = My.Settings.DatLogfile
+        Form1.RichTextBox1.Font = New Font(My.Settings.Pisava, My.Settings.PisavaVelikost)
+    End Sub
+    Private Sub ButtonOdpriLog_Click(sender As Object, e As EventArgs) Handles ButtonOdpriLog.Click
+        If SaveFileDialogLog.ShowDialog = DialogResult.OK Then
+            TextBoxLog.Text = SaveFileDialogLog.FileName.ToString
+            My.Settings.DatLogfile = SaveFileDialogLog.FileName.ToString
+        End If
+    End Sub
+
+    Private Sub ButtonFont_Click(sender As Object, e As EventArgs) Handles ButtonFont.Click
+        Dim fontdia1 = FontDialog1.Font.Name = My.Settings.Pisava
+        Dim fontdia2 = FontDialog1.Font.Size = My.Settings.PisavaVelikost
+
+        If FontDialog1.ShowDialog = DialogResult.OK Then
+            My.Settings.Pisava = FontDialog1.Font.Name
+            My.Settings.PisavaVelikost = FontDialog1.Font.Size
+            LabelFontInfo.Text = My.Settings.Pisava + " / " + My.Settings.PisavaVelikost.ToString
+        End If
+    End Sub
+
+    Private Sub IzvoziKodeToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles IzvoziKodeToolStripMenuItem.Click
+        Dim dataNast As String = ""
+
+        dataNast = dataNast + "KodaStojisce = " + My.Settings.KodaStojisce + vbCrLf
+        dataNast = dataNast + "KodaStojisceInfo = " + My.Settings.KodaStojisceInfo + vbCrLf
+        dataNast = dataNast + "KodaStojisceOri = " + My.Settings.KodaStojisceOri + vbCrLf
+        dataNast = dataNast + "KodaQuickSet = " + My.Settings.KodaQuickSet + vbCrLf
+        dataNast = dataNast + "KodaSetAzi = " + My.Settings.KodaSetAzi + vbCrLf
+        dataNast = dataNast + "KodaResection = " + My.Settings.KodaResection + vbCrLf
+        dataNast = dataNast + "KodaFreeStation = " + My.Settings.KodaFreeStation + vbCrLf
+        dataNast = dataNast + "KodaOriHtTrans = " + My.Settings.KodaOriHtTrans + vbCrLf
+        dataNast = dataNast + "KodaMeasOri = " + My.Settings.KodaMeasOri + vbCrLf
+        dataNast = dataNast + "KodaMeas = " + My.Settings.KodaMeas + vbCrLf
+        dataNast = dataNast + "KodaUserImport = " + My.Settings.KodaUserImport + vbCrLf
+
+        If SaveFileDialogNast.ShowDialog = DialogResult.OK Then
+            My.Computer.FileSystem.WriteAllText(SaveFileDialogNast.FileName, dataNast, False)
+        End If
+    End Sub
+
+    Private Sub ZapriToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ZapriToolStripMenuItem.Click
+        Me.Close()
+
+    End Sub
+
+    Private Sub UvoziKodeToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles UvoziKodeToolStripMenuItem.Click
+        ' TODO: Uvoz nastavitev iz datototeke
+    End Sub
+
+    Private Sub ButtonShraniZapri_Click(sender As Object, e As EventArgs) Handles ButtonShraniZapri.Click
+        Me.Close()
+    End Sub
+End Class

My Project/Application.Designer.vb

@@ -25,9 +25,9 @@ Namespace My
         Public Sub New()
             MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
             Me.IsSingleInstance = false
-            Me.EnableVisualStyles = true
+            Me.EnableVisualStyles = false
             Me.SaveMySettingsOnExit = true
-            Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
+            Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterAllFormsClose
         End Sub
         
         <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _

My Project/Application.myapp

@@ -3,8 +3,8 @@
   <MySubMain>true</MySubMain>
   <MainForm>Form1</MainForm>
   <SingleInstance>false</SingleInstance>
-  <ShutdownMode>0</ShutdownMode>
-  <EnableVisualStyles>true</EnableVisualStyles>
+  <ShutdownMode>1</ShutdownMode>
+  <EnableVisualStyles>false</EnableVisualStyles>
   <AuthenticationMode>0</AuthenticationMode>
   <MinimumSplashScreenDisplayTime>0</MinimumSplashScreenDisplayTime>
   <SaveMySettingsOnExit>true</SaveMySettingsOnExit>

My Project/AssemblyInfo.vb

@@ -1,4 +1,5 @@
-Imports System
+Imports System.Resources
+Imports System
 Imports System.Reflection
 Imports System.Runtime.InteropServices
 
@@ -9,10 +10,10 @@ Imports System.Runtime.InteropServices
 ' Review the values of the assembly attributes
 
 <Assembly: AssemblyTitle("TPS1100 Convert")>
-<Assembly: AssemblyDescription("")>
-<Assembly: AssemblyCompany("")>
+<Assembly: AssemblyDescription("Program za konvertiranje GSI datotek")>
+<Assembly: AssemblyCompany("2B geoinformatika, d.o.o.")>
 <Assembly: AssemblyProduct("TPS1100 Convert")>
-<Assembly: AssemblyCopyright("Copyright ©  2016")>
+<Assembly: AssemblyCopyright("Copyright © 2024")>
 <Assembly: AssemblyTrademark("")>
 
 <Assembly: ComVisible(False)>
@@ -31,5 +32,6 @@ Imports System.Runtime.InteropServices
 ' by using the '*' as shown below:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("1.0.0.0")>
-<Assembly: AssemblyFileVersion("1.0.0.0")>
+<Assembly: AssemblyVersion("2.7.0.0")>
+<Assembly: AssemblyFileVersion("2.7.0.0")>
+<Assembly: NeutralResourcesLanguage("sl-SI")>

My Project/Data/GSI_DataCodes.cfg

@@ -0,0 +1,67 @@
+[WORD_INDEX]
+11 = Pointnumber
+12 = Serial number
+13 = Instrument type
+19 = Time
+21 = Horizontal Angle
+22 = Vertical Angle
+25 = Horizontal Angle Correction
+31 = Slope distance
+32 = Horizontal distance
+33 = Height difference
+41 = Code-Block ID
+42 = Information 1
+43 = Information 2
+44 = Information 3
+45 = Information 4
+46 = Information 5
+47 = Information 6
+48 = Information 7
+49 = Information 8
+51 = PPM/mm
+58 = Prism constant
+59 = PPM
+71 = Remark 1
+72 = Remark 2
+73 = Remark 3
+74 = Remark 4
+75 = Remark 5
+76 = Remark 6
+77 = Remark 7
+78 = Remark 8
+79 = Remark 9
+81 = Easting
+82 = Northing
+83 = Elevation
+84 = St. Easting
+85 = St. Northing
+86 = St. Height
+87 = Reflector height
+88 = Instrument height
+
+[AUTOMATIC_INDEX_INFORMATION]
+# POS : 4
+0 = Automatic index OFF
+1 = Automatic index OPERATING
+3 = Automatic index OPERATING
+
+[INPUT_MODE]
+# POS : 5
+0 = Original measured values transferred from the instrument
+1 = Manual input from keyboard
+2 = Measured value, Hz-Correction ON
+3 = Measured value, Hz-Correction OFF
+4 = Result of special function
+
+[UNITS]
+# POS : 6
+0 = Meter # (last digit: 1mm / 0.000m)
+1 = Feet # (last digit: 1/1000ft / 0.000ft)
+2 = 400 gon
+3 = 360° decimal # (DDD.DDDDD)
+4 = 360° sexagesimal # (DDD.MMSSS)
+5 = 6400 mil
+6 = Meter # (last digit: 1/10mm)
+7 = Feet # (last digit: 1/10‘000ft)
+8 = Meter # (last digit: 1/100mm)
+

My Project/Data/GSI_DataCodes.ini

@@ -0,0 +1,139 @@
+[WORD_INDEX]
+11 = Pointnumber # 11 / block: 11....+00000H66
+# PtNo=“H66“
+12 = Serial number # 12 / block: 12....+00640054
+# S.No. “640054”
+13 = Instrument type # 13; 13....+00TCR305
+# Instr. “TCR305”
+19 = Time # 19 / block: 19....+02081029
+# [MM.DD.hh.mm]
+21 = Horizontal Angle # 21 / block: 21.102+17920860
+# Hz „179.086“ gon
+22 = Vertical Angle # 22 / block: 22.102+07567500
+# V: „75.675“ gon
+25 = Horizontal Angle Delta Azimuth # 22 / block: 22.102+07567500
+# V: „75.675“ gon
+31 = Slope distance # 31; e-g. 31..00+00003387
+# Sdist: „3.387“ m
+32 = Horizontal distance # 32 / block: 32..00+00003198
+# Hdist: „3.198“ m
+33 = Height difference # 33 / block: 33..00+00001119
+# Hdiff: „1.119“ m
+41 = Code-Block ID # 41 / block: 41....+00000013
+# Code: „13“ m
+42 = Information 1 # 42 / block: 42....+000TREES
+# Info1: „TREES“
+43 = Information 2 # 43 / block: 43....+000004.5
+# Info2: „4.5“
+44 = Information 3 # 44 / block: 44....+00CAT.02
+# Info3: „CAT.02“
+45 = Information 4 # 45 / block: 45....+000000NN
+# Info4: „NN“
+46 = Information 5 # 46 / block: 46....+000000NN
+# Info5: „NN“
+47 = Information 6 # 47 / block: 47....+000000NN
+# Info6: „NN“
+48 = Information 7 # 48 / block: 48....+000000NN
+# Info7: „NN“
+49 = Information 8 # 49 / block: 49....+000000NN
+# Info8: „NN“
+51 = PPM/mm # 51 / block: 51..1.+0000+034
+# “0”ppm; “34”mm
+58 = Prism constant # 58 / block: 58..16+00000020
+# Prism „2“ mm
+59 = PPM # 59 / block: 59..16+02200000
+# PPM „220“
+71 = Remark 1
+# (or Attribute 1)
+# 71 / block: 71....+0000REM1
+# “REM1”
+72 = Remark 2
+# (or Attribute 2)
+# 72 / block: 72....+0000REM2
+# “REM2”
+73 = Remark 3
+# (or Attribute 3)
+# 73 / block: 73....+0000REM3
+# “REM3”
+74 = Remark 4
+# (or Attribute 4)
+# 74 / block: 74....+0000REM4
+# “REM4”
+75 = Remark 5
+# (or Attribute 5)
+# 75 / block: 75....+0000REM5
+# “REM5”
+76 = Remark 6
+# (or Attribute 6)
+# 76 / block: 76....+0000REM6
+# “REM6”
+77 = Remark 7
+# (or Attribute 7)
+# 77 / block: 77....+0000REM7
+# “REM7”
+78 = Remark 8 # (or Attribute 8)
+# 78 / block: 78....+0000REM8
+# “REM8”
+79 = Remark 9
+# (or Attribute 9)
+# 79 / block: 79....+0000REM9
+# “REM9”
+81 = Easting
+# (E)
+# 81 / block: 81..00+01999507
+# E: “1999.507”m
+82 = Northing
+# (N)
+# 82 / block: 82..00+00213159
+# N: “2139.159”m
+83 = Elevation
+# (H)
+# 83 / block: 83..00-00032881
+# H: “32.881”m
+84 = St. Easting
+# (E0)
+# 84 / block: 84..11+00393700
+# E: “393.700”m
+85 = St. Northing
+# (N0)
+# 85 / block: 85..11+06561220
+# N: “6561.220”m
+86 = St. Height
+# (H0)
+# 86 / block: 86..11+00065618
+# H: “65.618”m
+87 = Reflector height
+# (hr)
+# 87 / block: 87..11+00001700
+# hr: “1.700” m
+88 = Instrument height
+# (hi)
+# 88 / block: 88..11+00001550
+# hi: “1.550” m
+
+[AUTOMATIC_INDEX_INFORMATION]
+# POS : 4
+0 = Automatic index OFF
+1 = Automatic index OPERATING
+3 = Automatic index OPERATING
+
+[INPUT_MODE]
+# POS : 5
+0 = Original measured values transferred from the instrument
+1 = Manual input from keyboard
+2 = Measured value, Hz-Correction ON
+3 = Measured value, Hz-Correction OFF
+4 = Result of special function
+
+[UNITS]
+# POS : 6
+0 = Meter # (last digit: 1mm / 0.000m)
+1 = Feet # (last digit: 1/1000ft / 0.000ft)
+2 = 400 gon
+3 = 360° decimal # (DDD.DDDDD)
+4 = 360° sexagesimal # (DDD.MMSSS)
+5 = 6400 mil
+6 = Meter # (last digit: 1/10mm)
+7 = Feet # (last digit: 1/10‘000ft)
+8 = Meter # (last digit: 1/100mm)
+

My Project/Data/GSI_UserCodes.ini

@@ -0,0 +1,8 @@
+[CODE]
+10 = Quick Set
+20 = Set Azimuth
+30 = Resection
+40 = Free Station
+90 = Measured Data
+99 = Imported Data
+

My Project/Data/GSI_data.ini

@@ -0,0 +1,139 @@
+[WORD_INDEX]
+11 = Pointnumber # 11 / block: 11....+00000H66
+# PtNo=“H66“
+12 = Serial number # 12 / block: 12....+00640054
+# S.No. “640054”
+13 = Instrument type # 13; 13....+00TCR305
+# Instr. “TCR305”
+19 = Time # 19 / block: 19....+02081029
+# [MM.DD.hh.mm]
+21 = Horizontal Angle # 21 / block: 21.102+17920860
+# Hz „179.086“ gon
+22 = Vertical Angle # 22 / block: 22.102+07567500
+# V: „75.675“ gon
+25 = Horizontal Angle Delta Azimuth # 22 / block: 22.102+07567500
+# V: „75.675“ gon
+31 = Slope distance # 31; e-g. 31..00+00003387
+# Sdist: „3.387“ m
+32 = Horizontal distance # 32 / block: 32..00+00003198
+# Hdist: „3.198“ m
+33 = Height difference # 33 / block: 33..00+00001119
+# Hdiff: „1.119“ m
+41 = Code-Block ID # 41 / block: 41....+00000013
+# Code: „13“ m
+42 = Information 1 # 42 / block: 42....+000TREES
+# Info1: „TREES“
+43 = Information 2 # 43 / block: 43....+000004.5
+# Info2: „4.5“
+44 = Information 3 # 44 / block: 44....+00CAT.02
+# Info3: „CAT.02“
+45 = Information 4 # 45 / block: 45....+000000NN
+# Info4: „NN“
+46 = Information 5 # 46 / block: 46....+000000NN
+# Info5: „NN“
+47 = Information 6 # 47 / block: 47....+000000NN
+# Info6: „NN“
+48 = Information 7 # 48 / block: 48....+000000NN
+# Info7: „NN“
+49 = Information 8 # 49 / block: 49....+000000NN
+# Info8: „NN“
+51 = PPM/mm # 51 / block: 51..1.+0000+034
+# “0”ppm; “34”mm
+58 = Prism constant # 58 / block: 58..16+00000020
+# Prism „2“ mm
+59 = PPM # 59 / block: 59..16+02200000
+# PPM „220“
+71 = Remark 1
+# (or Attribute 1)
+# 71 / block: 71....+0000REM1
+# “REM1”
+72 = Remark 2
+# (or Attribute 2)
+# 72 / block: 72....+0000REM2
+# “REM2”
+73 = Remark 3
+# (or Attribute 3)
+# 73 / block: 73....+0000REM3
+# “REM3”
+74 = Remark 4
+# (or Attribute 4)
+# 74 / block: 74....+0000REM4
+# “REM4”
+75 = Remark 5
+# (or Attribute 5)
+# 75 / block: 75....+0000REM5
+# “REM5”
+76 = Remark 6
+# (or Attribute 6)
+# 76 / block: 76....+0000REM6
+# “REM6”
+77 = Remark 7
+# (or Attribute 7)
+# 77 / block: 77....+0000REM7
+# “REM7”
+78 = Remark 8 # (or Attribute 8)
+# 78 / block: 78....+0000REM8
+# “REM8”
+79 = Remark 9
+# (or Attribute 9)
+# 79 / block: 79....+0000REM9
+# “REM9”
+81 = Easting
+# (E)
+# 81 / block: 81..00+01999507
+# E: “1999.507”m
+82 = Northing
+# (N)
+# 82 / block: 82..00+00213159
+# N: “2139.159”m
+83 = Elevation
+# (H)
+# 83 / block: 83..00-00032881
+# H: “32.881”m
+84 = St. Easting
+# (E0)
+# 84 / block: 84..11+00393700
+# E: “393.700”m
+85 = St. Northing
+# (N0)
+# 85 / block: 85..11+06561220
+# N: “6561.220”m
+86 = St. Height
+# (H0)
+# 86 / block: 86..11+00065618
+# H: “65.618”m
+87 = Reflector height
+# (hr)
+# 87 / block: 87..11+00001700
+# hr: “1.700” m
+88 = Instrument height
+# (hi)
+# 88 / block: 88..11+00001550
+# hi: “1.550” m
+
+[AUTOMATIC_INDEX_INFORMATION]
+# POS : 4
+0 = Automatic index OFF
+1 = Automatic index OPERATING
+3 = Automatic index OPERATING
+
+[INPUT_MODE]
+# POS : 5
+0 = Original measured values transferred from the instrument
+1 = Manual input from keyboard
+2 = Measured value, Hz-Correction ON
+3 = Measured value, Hz-Correction OFF
+4 = Result of special function
+
+[UNITS]
+# POS : 6
+0 = Meter # (last digit: 1mm / 0.000m)
+1 = Feet # (last digit: 1/1000ft / 0.000ft)
+2 = 400 gon
+3 = 360° decimal # (DDD.DDDDD)
+4 = 360° sexagesimal # (DDD.MMSSS)
+5 = 6400 mil
+6 = Meter # (last digit: 1/10mm)
+7 = Feet # (last digit: 1/10‘000ft)
+8 = Meter # (last digit: 1/100mm)
+

My Project/Data/GSI_user.ini

@@ -0,0 +1,8 @@
+[CODE]
+10 = Quick Set
+20 = Set Azimuth
+30 = Resection
+40 = Free Station
+90 = Measured Data
+99 = Imported Data
+

My Project/Data/TEST.GSI

@@ -1,3 +1,4 @@
+*410000+0000000000000099 
 *110001+00000000000GS001 81..00+0000000465423089 82..00+0000000110526243 83..00+0000000000301586 
 *110002+00000000000GS002 81..00+0000000465437688 82..00+0000000110547569 83..00+0000000000302107 
 *110003+00000000000GS003 81..00+0000000465472908 82..00+0000000110527226 83..00+0000000000302945 

My Project/Data/TEST.koo

@@ -0,0 +1,44 @@
+GS001	465423.089	110526.243	301.586	REF
+GS002	465437.688	110547.569	302.107	REF
+GS003	465472.908	110527.226	302.945	REF
+11111	465444.529	110546.554	302.353	STA
+GS003	465472.895	110527.228	302.954	MEAS
+GS001	465423.100	110526.246	301.598	MEAS
+GS002	465437.693	110547.564	302.084	MEAS
+1	465474.729	110533.795	303.558	MEAS
+2	465463.403	110539.024	302.973	MEAS
+3	465455.561	110542.757	302.689	MEAS
+4	465446.424	110547.098	302.354	MEAS
+5	465447.834	110549.258	302.521	MEAS
+6	465447.013	110549.645	302.470	MEAS
+7	465447.133	110549.911	302.484	MEAS
+8	465442.260	110552.180	302.590	MEAS
+9	465439.917	110549.069	302.276	MEAS
+10	465434.013	110548.886	302.034	MEAS
+11	465447.924	110549.193	303.527	MEAS
+12	465448.112	110549.481	303.244	MEAS
+13	465452.362	110554.843	304.664	MEAS
+14	465454.504	110557.544	305.149	MEAS
+15	465453.962	110560.654	305.190	MEAS
+16	465451.792	110572.598	306.363	MEAS
+17	465452.236	110573.476	307.192	MEAS
+18	465451.552	110573.751	306.829	MEAS
+19	465460.165	110569.493	306.147	MEAS
+20	465460.732	110564.366	308.875	MEAS
+21	465456.144	110555.142	308.718	MEAS
+22	465466.357	110550.055	310.853	MEAS
+23	465457.019	110582.726	312.411	MEAS
+24	465471.010	110580.229	312.548	MEAS
+31	465443.141	110551.729	303.779	MEAS
+32	465440.407	110548.265	302.097	MEAS
+33	465438.211	110547.118	302.072	MEAS
+34	465434.570	110547.693	301.894	MEAS
+35	465436.599	110547.165	301.948	MEAS
+36	465439.124	110546.897	302.006	MEAS
+37	465441.653	110546.549	302.094	MEAS
+38	465446.526	110544.850	302.298	MEAS
+39	465454.849	110541.033	302.554	MEAS
+40	465460.359	110538.438	302.711	MEAS
+41	465472.352	110532.887	302.986	MEAS
+42	465473.669	110532.696	303.036	MEAS
+43	465474.578	110533.313	303.177	MEAS

My Project/Data/TEST.mer

@@ -0,0 +1,65 @@
+TPS 1100 Zapisnik
+++++++++++++++++++++++++++++++++
+
+Imported/User-Entered:
+----------------------
+PtID	E	N	H
+GS001	465423.089	110526.243	301.586
+GS002	465437.688	110547.569	302.107
+GS003	465472.908	110527.226	302.945
+
+Setup: Free Station
+=============================
+PtID	HZ	V	SD	HD	ReflHt	PrCon	HtDif	PtCode
+GS001	138.3101	89.3234	29.523	29.522	2.500	0.0175	-0.754
+GS002	190.2304	103.3841	7.115	6.914	0.100	0.0175	-0.268
+GS003	36.1441	91.2102	34.333	34.324	0.100	0.0175	0.601
+
+Station:
+****************
+PtID	HzCor	StnE	StnN	StnH	ReflHt	InstHt
+11111	88.0119	465444.529	110546.554	302.353	0.100	1.510
+
+Measured:
+----------------------
+PtID	HZ	V	SD	HD	ReflHt	PrCon	HtDif	E	N	H	PtCode
+GS003	124.1559	91.2102	34.332	34.323	0.100	0.0175	0.601	465472.895	110527.228	302.954
+GS001	226.3226	89.3239	29.524	29.523	2.500	0.0175	-0.755	465423.100	110526.246	301.598
+GS002	278.2430	103.3939	7.112	6.911	0.100	0.0175	-0.270	465437.693	110547.564	302.084
+1	112.5409	88.1545	32.800	32.785	1.300	0.0175	1.205	465474.729	110533.795	303.558
+2	111.4452	88.5039	20.325	20.321	1.300	0.0175	0.620	465463.403	110539.024	302.973
+3	108.5920	89.2251	11.668	11.667	1.300	0.0175	0.336	465455.561	110542.757	302.689
+4	73.5833	96.0303	1.983	1.972	1.300	0.0175	0.001	465446.424	110547.098	302.354
+5	50.4246	107.2703	4.476	4.270	0.000	0.0344	0.168	465447.834	110549.258	302.521
+6	38.4642	109.2145	4.204	3.966	0.000	0.0344	0.116	465447.013	110549.645	302.470
+7	37.4746	107.5859	4.468	4.249	0.000	0.0344	0.131	465447.133	110549.911	302.484
+8	338.0216	101.5057	6.199	6.067	0.000	0.0344	0.237	465442.260	110552.180	302.590
+9	298.3616	106.4853	5.488	5.254	0.000	0.0344	-0.078	465439.917	110549.069	302.276
+10	282.3022	92.4844	10.785	10.772	1.300	0.0175	-0.319	465434.013	110548.886	302.034
+11	52.0802	94.2821	4.313	4.300	0.000	0.0344	1.174	465447.924	110549.193	303.527
+12	50.4445	81.3752	4.677	4.627	1.300	0.0175	0.891	465448.112	110549.481	303.244
+13	43.2242	79.3342	11.597	11.405	1.300	0.0175	2.311	465452.362	110554.843	304.664
+14	42.1339	80.0701	15.065	14.842	1.300	0.0175	2.796	465454.504	110557.544	305.149
+15	33.4646	81.1159	17.167	16.965	1.300	0.0175	2.836	465453.962	110560.654	305.190
+16	15.3456	82.0003	27.304	27.038	1.300	0.0175	4.010	465451.792	110572.598	306.363
+17	15.5830	80.3654	28.384	28.004	1.300	0.0175	4.838	465452.236	110573.476	307.192
+18	14.2841	81.2154	28.412	28.090	1.300	0.0175	4.476	465451.552	110573.751	306.829
+19	34.1646	82.3838	27.992	27.761	1.300	0.0175	3.794	465460.165	110569.493	306.147
+20	42.1727	78.1433	24.595	24.079	0.000	0.0344	6.522	465460.732	110564.366	308.875
+21	53.3104	71.2531	15.239	14.445	0.000	0.0344	6.364	465456.144	110555.142	308.718
+22	80.5316	72.2717	23.186	22.107	0.000	0.0344	8.500	465466.357	110550.055	310.853
+23	19.0258	77.2433	39.212	38.269	0.000	0.0344	10.058	465457.019	110582.726	312.411
+24	38.1048	78.3224	43.712	42.840	0.000	0.0344	10.195	465471.010	110580.229	312.548
+31	344.5857	90.5405	5.359	5.358	0.000	0.0344	1.426	465443.141	110551.729	303.779
+32	292.3305	95.5811	4.488	4.464	1.300	0.0175	-0.257	465440.407	110548.265	302.097
+33	275.0604	94.2552	6.362	6.343	1.300	0.0175	-0.282	465438.211	110547.118	302.072
+34	276.3140	93.4917	10.047	10.024	1.300	0.0175	-0.460	465434.570	110547.693	301.894
+35	274.2437	94.2524	7.978	7.954	1.300	0.0175	-0.405	465436.599	110547.165	301.948
+36	273.3758	95.5230	5.445	5.416	1.300	0.0175	-0.347	465439.124	110546.897	302.006
+37	269.5406	99.1634	2.914	2.876	1.300	0.0175	-0.260	465441.653	110546.549	302.094
+38	130.2741	95.4557	2.638	2.625	1.300	0.0175	-0.055	465446.526	110544.850	302.298
+39	118.0836	90.0246	11.703	11.703	1.300	0.0175	0.201	465454.849	110541.033	302.554
+40	117.0839	89.3129	17.790	17.789	1.300	0.0175	0.358	465460.359	110538.438	302.711
+41	116.0938	89.1307	31.001	30.998	1.300	0.0175	0.633	465472.352	110532.887	302.986
+42	115.2603	89.0942	32.271	32.268	1.300	0.0175	0.682	465473.669	110532.696	303.036
+43	113.4649	88.5545	32.842	32.836	1.300	0.0175	0.824	465474.578	110533.313	303.177

My Project/Data/TEST.txt

@@ -0,0 +1,44 @@
+GS001 465423.089 110526.243 301.586
+GS002 465437.688 110547.569 302.107
+GS003 465472.908 110527.226 302.945
+11111 465444.529 110546.554 302.353
+GS003 465472.895 110527.228 302.954
+GS001 465423.100 110526.246 301.598
+GS002 465437.693 110547.564 302.084
+1 465474.729 110533.795 303.558
+2 465463.403 110539.024 302.973
+3 465455.561 110542.757 302.689
+4 465446.424 110547.098 302.354
+5 465447.834 110549.258 302.521
+6 465447.013 110549.645 302.470
+7 465447.133 110549.911 302.484
+8 465442.260 110552.180 302.590
+9 465439.917 110549.069 302.276
+10 465434.013 110548.886 302.034
+11 465447.924 110549.193 303.527
+12 465448.112 110549.481 303.244
+13 465452.362 110554.843 304.664
+14 465454.504 110557.544 305.149
+15 465453.962 110560.654 305.190
+16 465451.792 110572.598 306.363
+17 465452.236 110573.476 307.192
+18 465451.552 110573.751 306.829
+19 465460.165 110569.493 306.147
+20 465460.732 110564.366 308.875
+21 465456.144 110555.142 308.718
+22 465466.357 110550.055 310.853
+23 465457.019 110582.726 312.411
+24 465471.010 110580.229 312.548
+31 465443.141 110551.729 303.779
+32 465440.407 110548.265 302.097
+33 465438.211 110547.118 302.072
+34 465434.570 110547.693 301.894
+35 465436.599 110547.165 301.948
+36 465439.124 110546.897 302.006
+37 465441.653 110546.549 302.094
+38 465446.526 110544.850 302.298
+39 465454.849 110541.033 302.554
+40 465460.359 110538.438 302.711
+41 465472.352 110532.887 302.986
+42 465473.669 110532.696 303.036
+43 465474.578 110533.313 303.177

My Project/DataSources/TPS1100_Convert.My.MyApplication.datasource

@@ -0,0 +1,10 @@
+<?xml version="1.0" encoding="utf-8"?>
+<!--
+    This file is automatically generated by Visual Studio .Net. It is 
+    used to store generic object data source configuration information.  
+    Renaming the file extension or editing the content of this file may   
+    cause the file to be unrecognizable by the program.
+-->
+<GenericObjectDataSource DisplayName="MyApplication" Version="1.0" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
+   <TypeInfo>TPS1100_Convert.My.MyApplication, My Project.Resources.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</TypeInfo>
+</GenericObjectDataSource>

My Project/DataSources/TPS1100_Convert.My.MySettings.datasource

@@ -0,0 +1,10 @@
+<?xml version="1.0" encoding="utf-8"?>
+<!--
+    This file is automatically generated by Visual Studio .Net. It is 
+    used to store generic object data source configuration information.  
+    Renaming the file extension or editing the content of this file may   
+    cause the file to be unrecognizable by the program.
+-->
+<GenericObjectDataSource DisplayName="MySettings" Version="1.0" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
+   <TypeInfo>TPS1100_Convert.My.MySettings, My Project.Resources.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</TypeInfo>
+</GenericObjectDataSource>

My Project/MadMilkman.Ini.xml

@@ -0,0 +1,755 @@
+<?xml version="1.0" encoding="utf-8"?>
+<doc>
+  <assembly>
+    <name>MadMilkman.Ini</name>
+  </assembly>
+  <members>
+    <member name="T:MadMilkman.Ini.IniComment">
+      <summary>
+            Represents a comment object used by <see cref="T:MadMilkman.Ini.IniItem" /> objects, <see cref="T:MadMilkman.Ini.IniSection" /> and <see cref="T:MadMilkman.Ini.IniKey" />.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniComment.EmptyLinesBefore">
+      <summary>
+            Gets or sets the amount of empty lines before this <see cref="P:MadMilkman.Ini.IniComment.Text">comment's text</see>.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniComment.LeftIndentation">
+      <summary>
+            Gets or sets the amount of whitespace characters before this <see cref="P:MadMilkman.Ini.IniComment.Text">comment's text</see>.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniComment.Text">
+      <summary>
+            Gets or sets a text of this <see cref="T:MadMilkman.Ini.IniComment" /> instance.
+            </summary>
+    </member>
+    <member name="T:MadMilkman.Ini.IniCommentStarter">
+      <summary>
+            Defines <see cref="T:MadMilkman.Ini.IniComment">comment's</see> starting character.
+            </summary>
+    </member>
+    <member name="F:MadMilkman.Ini.IniCommentStarter.Semicolon">
+      <summary>
+            Use ';' as <see cref="T:MadMilkman.Ini.IniComment">comment's</see> starting character.
+            </summary>
+    </member>
+    <member name="F:MadMilkman.Ini.IniCommentStarter.Hash">
+      <summary>
+            Use '#' as <see cref="T:MadMilkman.Ini.IniComment">comment's</see> starting character.
+            </summary>
+    </member>
+    <member name="T:MadMilkman.Ini.IniDuplication">
+      <summary>
+            Defines a behaviour for duplicate <see cref="P:MadMilkman.Ini.IniItem.Name" /> occurences.
+            </summary>
+    </member>
+    <member name="F:MadMilkman.Ini.IniDuplication.Allowed">
+      <summary>
+            Allow duplicate names in <see cref="T:MadMilkman.Ini.IniItemCollection`1" />.
+            </summary>
+    </member>
+    <member name="F:MadMilkman.Ini.IniDuplication.Disallowed">
+      <summary>
+            Disallow duplicate names in <see cref="T:MadMilkman.Ini.IniItemCollection`1" />.
+            </summary>
+    </member>
+    <member name="F:MadMilkman.Ini.IniDuplication.Ignored">
+      <summary>
+            Ignore duplicate names.
+            </summary>
+    </member>
+    <member name="T:MadMilkman.Ini.IniFile">
+      <summary>
+            In-memory representation of an INI file.
+            </summary>
+    </member>
+    <member name="M:MadMilkman.Ini.IniFile.#ctor">
+      <summary>
+            Initializes a new instance of <see cref="T:MadMilkman.Ini.IniFile" /> class.
+            </summary>
+    </member>
+    <member name="M:MadMilkman.Ini.IniFile.#ctor(MadMilkman.Ini.IniOptions)">
+      <summary>
+            Initializes a new instance of <see cref="T:MadMilkman.Ini.IniFile" /> class.
+            </summary>
+      <param name="options">
+        <see cref="T:MadMilkman.Ini.IniOptions" /> object that defines INI file's format, settings for both <see cref="O:MadMilkman.Ini.IniFile.Load">Load</see> and <see cref="O:MadMilkman.Ini.IniFile.Save">Save</see> methods.</param>
+    </member>
+    <member name="M:MadMilkman.Ini.IniFile.Load(System.IO.Stream)">
+      <summary>
+            Loads a file from a stream.
+            </summary>
+      <param name="fileStream">Stream from which to load a file.</param>
+    </member>
+    <member name="M:MadMilkman.Ini.IniFile.Load(System.IO.TextReader)">
+      <summary>
+            Loads a file from a reader.
+            </summary>
+      <param name="fileReader">Reader from which to load a file.</param>
+    </member>
+    <member name="M:MadMilkman.Ini.IniFile.Load(System.String)">
+      <summary>
+            Loads a file from a path.
+            </summary>
+      <param name="filePath">Path from which to load a file.</param>
+    </member>
+    <member name="M:MadMilkman.Ini.IniFile.Save(System.IO.Stream)">
+      <summary>
+            Saves a file to a stream.
+            </summary>
+      <param name="fileStream">Stream to which to save a file.</param>
+    </member>
+    <member name="M:MadMilkman.Ini.IniFile.Save(System.IO.TextWriter)">
+      <summary>
+            Saves a file to a writer.
+            </summary>
+      <param name="fileWriter">Writer to which to save a file.</param>
+    </member>
+    <member name="M:MadMilkman.Ini.IniFile.Save(System.String)">
+      <summary>
+            Saves a file to a path.
+            </summary>
+      <param name="filePath">Path to which to save a file.</param>
+    </member>
+    <member name="P:MadMilkman.Ini.IniFile.Sections">
+      <summary>
+            Gets file's sections.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniFile.ValueBinding">
+      <summary>
+            Gets the object that exposes binding operations, which are executed with <see cref="O:MadMilkman.Ini.IniValueBinding.Bind" /> methods.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniFile.ValueMappings">
+      <summary>
+            Gets the mappings of <see cref="P:MadMilkman.Ini.IniKey.Value" />s and their results, used in <see cref="O:MadMilkman.Ini.IniKey.TryParseValue" /> methods.
+            </summary>
+    </member>
+    <member name="T:MadMilkman.Ini.IniItem">
+      <summary>
+            Represents a base class for INI content items, <see cref="T:MadMilkman.Ini.IniSection" /> and <see cref="T:MadMilkman.Ini.IniKey" />.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniItem.LeadingComment">
+      <summary>
+            Gets the <see cref="T:MadMilkman.Ini.IniComment" /> object that represents a comment that follows this <see cref="T:MadMilkman.Ini.IniItem" /> on the same line.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniItem.LeftIndentation">
+      <summary>
+            Gets or sets the amount of whitespace characters before this <see cref="P:MadMilkman.Ini.IniItem.Name">item's name</see>.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniItem.Name">
+      <summary>
+            Gets and sets the name of the current <see cref="T:MadMilkman.Ini.IniItem" />.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniItem.ParentFile">
+      <summary>
+            Gets the <see cref="T:MadMilkman.Ini.IniFile" /> to which this <see cref="T:MadMilkman.Ini.IniItem" /> belongs to.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniItem.TrailingComment">
+      <summary>
+            Gets the <see cref="T:MadMilkman.Ini.IniComment" /> object that represents a comments that occur before this <see cref="T:MadMilkman.Ini.IniItem" />.
+            </summary>
+    </member>
+    <member name="T:MadMilkman.Ini.IniItemCollection`1">
+      <summary>
+            Represents a base generic class for INI content item collections, <see cref="T:MadMilkman.Ini.IniSectionCollection" /> and <see cref="T:MadMilkman.Ini.IniKeyCollection" />.
+            </summary>
+      <typeparam name="T">
+        <see cref="T:MadMilkman.Ini.IniItem" /> derived type.</typeparam>
+    </member>
+    <member name="M:MadMilkman.Ini.IniItemCollection`1.Add(`0)">
+      <summary>
+            Adds an item to the end of this collection.
+            </summary>
+      <param name="item">Item to add to this collection.</param>
+    </member>
+    <member name="M:MadMilkman.Ini.IniItemCollection`1.Clear">
+      <summary>
+            Removes all items from this collection.
+            </summary>
+    </member>
+    <member name="M:MadMilkman.Ini.IniItemCollection`1.Contains(System.String)">
+      <summary>
+            Determines whether an item is in this collection.
+            </summary>
+      <param name="name">Name of the item to locate in this collection.</param>
+      <returns>
+        <see langword="true" /> if the item with specified name is in the collection.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniItemCollection`1.Contains(`0)">
+      <summary>
+            Determines whether an item is in this collection.
+            </summary>
+      <param name="item">Item to locate in this collection.</param>
+      <returns>
+        <see langword="true" /> if the specified item is in the collection.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniItemCollection`1.CopyTo(`0[],System.Int32)">
+      <summary>
+            Shallow copies the items of this collection to an array.
+            </summary>
+      <param name="array">One-dimensional array that is the destination of the items copied from this collection.</param>
+      <param name="arrayIndex">Zero-based index in array at which copying begins.</param>
+    </member>
+    <member name="P:MadMilkman.Ini.IniItemCollection`1.Count">
+      <summary>
+            Gets the number of items in this collection.
+            </summary>
+    </member>
+    <member name="M:MadMilkman.Ini.IniItemCollection`1.GetEnumerator">
+      <summary>
+            Returns an enumerator that iterates through the collection.
+            </summary>
+      <returns>
+        <see cref="T:System.Collections.Generic.IEnumerator`1" /> object that can be used to iterate through the collection.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniItemCollection`1.IndexOf(System.String)">
+      <summary>
+            Searches for the specified item and returns the zero-based index of the first occurrence within this collection.
+            </summary>
+      <param name="name">Name of the item to locate in this collection.</param>
+      <returns>Index of the first occurrence of the item with specified name in the collection.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniItemCollection`1.IndexOf(`0)">
+      <summary>
+            Searches for the specified item and returns the zero-based index of the first occurrence within this collection.
+            </summary>
+      <param name="item">Item to locate in this collection.</param>
+      <returns>Index of the first occurrence of specified item in the collection.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniItemCollection`1.Insert(System.Int32,`0)">
+      <summary>
+            Inserts an item to this collection at the specified index.
+            </summary>
+      <param name="index">Zero-based index at which item should be inserted.</param>
+      <param name="item">Item to insert to this collection.</param>
+    </member>
+    <member name="P:MadMilkman.Ini.IniItemCollection`1.Item(System.Int32)">
+      <summary>
+            Gets or sets the item at the specified index.
+            </summary>
+      <param name="index">Zero-based index of the item to get or set.</param>
+    </member>
+    <member name="P:MadMilkman.Ini.IniItemCollection`1.Item(System.String)">
+      <summary>
+            Gets the first item of the specified name.
+            </summary>
+      <param name="name">Name of the item to get.</param>
+    </member>
+    <member name="P:MadMilkman.Ini.IniItemCollection`1.Item(System.String[])">
+      <summary>
+            Gets the first items of the specified names.
+            </summary>
+      <param name="names">Names of the items to get.</param>
+    </member>
+    <member name="M:MadMilkman.Ini.IniItemCollection`1.Remove(System.String)">
+      <summary>
+            Removes the first occurrence of specific item from this collection.
+            </summary>
+      <param name="name">Name of the item to remove from this collection.</param>
+      <returns>
+        <see langword="true" /> if the item with specified name is removed from the collection.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniItemCollection`1.Remove(`0)">
+      <summary>
+            Removes the first occurrence of specific item from this collection.
+            </summary>
+      <param name="item">Item to remove from this collection.</param>
+      <returns>
+        <see langword="true" /> if the specified item is removed from the collection.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniItemCollection`1.RemoveAt(System.Int32)">
+      <summary>
+            Removes an item at the specified index from this collection.
+            </summary>
+      <param name="index">Zero-based index at which item should be inserted.</param>
+    </member>
+    <member name="T:MadMilkman.Ini.IniKey">
+      <summary>
+            Represents a key item of the INI file with name and value content.
+            </summary>
+    </member>
+    <member name="M:MadMilkman.Ini.IniKey.#ctor(MadMilkman.Ini.IniFile,System.Collections.Generic.KeyValuePair{System.String,System.String})">
+      <summary>
+            Initializes a new instance of the <see cref="T:MadMilkman.Ini.IniKey" /> class.
+            </summary>
+      <param name="parentFile">The owner file.</param>
+      <param name="nameValuePair">The key's data, pair of key's name and key's value.</param>
+    </member>
+    <member name="M:MadMilkman.Ini.IniKey.#ctor(MadMilkman.Ini.IniFile,System.String)">
+      <summary>
+            Initializes a new instance of the <see cref="T:MadMilkman.Ini.IniKey" /> class.
+            </summary>
+      <param name="parentFile">The owner file.</param>
+      <param name="name">The key's name.</param>
+    </member>
+    <member name="M:MadMilkman.Ini.IniKey.#ctor(MadMilkman.Ini.IniFile,System.String,System.String)">
+      <summary>
+            Initializes a new instance of the <see cref="T:MadMilkman.Ini.IniKey" /> class.
+            </summary>
+      <param name="parentFile">The owner file.</param>
+      <param name="name">The key's name.</param>
+      <param name="value">The key's value.</param>
+    </member>
+    <member name="M:MadMilkman.Ini.IniKey.Copy">
+      <summary>
+            Copies this <see cref="T:MadMilkman.Ini.IniKey" /> instance.
+            </summary>
+      <returns>Copied <see cref="T:MadMilkman.Ini.IniKey" />.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniKey.Copy(MadMilkman.Ini.IniFile)">
+      <summary>
+            Copies this <see cref="T:MadMilkman.Ini.IniKey" /> instance and sets copied instance's <see cref="P:MadMilkman.Ini.IniItem.ParentFile">ParentFile</see>.
+            </summary>
+      <param name="destinationFile">Copied key's parent file.</param>
+      <returns>Copied <see cref="T:MadMilkman.Ini.IniKey" /> that belongs to a specified <see cref="T:MadMilkman.Ini.IniFile" />.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniKey.IsSupportedValueType(System.Type)">
+      <summary>
+            Indicates whether the <see cref="P:MadMilkman.Ini.IniKey.Value" /> can be converted to specified type.
+            </summary>
+      <param name="type">Type of the object to convert the <see cref="P:MadMilkman.Ini.IniKey.Value" /> to.</param>
+      <returns>
+        <see langword="true" /> if the specified type is supported.</returns>
+    </member>
+    <member name="P:MadMilkman.Ini.IniKey.ParentCollection">
+      <summary>
+            Gets the <see cref="T:MadMilkman.Ini.IniKeyCollection" /> to which this <see cref="T:MadMilkman.Ini.IniKey" /> belongs to.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniKey.ParentSection">
+      <summary>
+            Gets the <see cref="T:MadMilkman.Ini.IniSection" /> to which this <see cref="T:MadMilkman.Ini.IniKey" /> belongs to.
+            </summary>
+    </member>
+    <member name="M:MadMilkman.Ini.IniKey.TryParseValue``1(System.Collections.Generic.List{``0}@)">
+      <summary>
+            Converts the <see cref="P:MadMilkman.Ini.IniKey.Value" /> to a list of the specified type.
+            </summary>
+      <param name="results">Uninitialized list of a specific type which will hold the converted values if the conversion succeeds.</param>
+      <typeparam name="T">Type of the objects in list to convert the <see cref="P:MadMilkman.Ini.IniKey.Value" /> to.</typeparam>
+      <returns>Value that indicates whether the conversion succeeded.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniKey.TryParseValue``1(``0@)">
+      <summary>
+            Converts the <see cref="P:MadMilkman.Ini.IniKey.Value" /> to an instance of the specified type.
+            </summary>
+      <param name="result">Uninitialized instance of a specific type which will hold the converted value if the conversion succeeds.</param>
+      <typeparam name="T">Type of the object to convert the <see cref="P:MadMilkman.Ini.IniKey.Value" /> to.</typeparam>
+      <returns>Value that indicates whether the conversion succeeded.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniKey.TryParseValue``1(``0[]@)">
+      <summary>
+            Converts the <see cref="P:MadMilkman.Ini.IniKey.Value" /> to an array of the specified type.
+            </summary>
+      <param name="results">Uninitialized array of a specific type which will hold the converted values if the conversion succeeds.</param>
+      <typeparam name="T">Type of the objects in array to convert the <see cref="P:MadMilkman.Ini.IniKey.Value" /> to.</typeparam>
+      <returns>Value that indicates whether the conversion succeeded.</returns>
+    </member>
+    <member name="P:MadMilkman.Ini.IniKey.Value">
+      <summary>
+            Gets and sets <see cref="T:MadMilkman.Ini.IniKey" /> value.
+            </summary>
+    </member>
+    <member name="T:MadMilkman.Ini.IniKeyCollection">
+      <summary>
+            Represents a collection of <see cref="T:MadMilkman.Ini.IniKey" /> items.
+            </summary>
+    </member>
+    <member name="M:MadMilkman.Ini.IniKeyCollection.Add(System.Collections.Generic.KeyValuePair{System.String,System.String})">
+      <summary>
+            Adds an item to the end of this collection.
+            </summary>
+      <param name="nameValuePair">The key's data, pair of key's name and key's value, to add to this collection.</param>
+      <returns>
+        <see cref="T:MadMilkman.Ini.IniKey" /> that was added to this collection.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniKeyCollection.Add(System.String)">
+      <summary>
+            Adds an item to the end of this collection.
+            </summary>
+      <param name="name">Name of the <see cref="T:MadMilkman.Ini.IniKey" /> to add to this collection.</param>
+      <returns>
+        <see cref="T:MadMilkman.Ini.IniKey" /> that was added to this collection.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniKeyCollection.Add(System.String,System.String)">
+      <summary>
+            Adds an item to the end of this collection.
+            </summary>
+      <param name="name">Name of the <see cref="T:MadMilkman.Ini.IniKey" /> to add to this collection.</param>
+      <param name="value">Value of the <see cref="T:MadMilkman.Ini.IniKey" /> to add to this collection.</param>
+      <returns>
+        <see cref="T:MadMilkman.Ini.IniKey" /> that was added to this collection.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniKeyCollection.Insert(System.Int32,System.Collections.Generic.KeyValuePair{System.String,System.String})">
+      <summary>
+            Inserts an item to this collection at the specified index.
+            </summary>
+      <param name="index">Zero-based index at which item should be inserted.</param>
+      <param name="nameValuePair">The key's data, pair of key's name and key's value, to insert to this collection.</param>
+      <returns>
+        <see cref="T:MadMilkman.Ini.IniKey" /> that was inserted to this collection.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniKeyCollection.Insert(System.Int32,System.String)">
+      <summary>
+            Inserts an item to this collection at the specified index.
+            </summary>
+      <param name="index">Zero-based index at which item should be inserted.</param>
+      <param name="name">Name of the <see cref="T:MadMilkman.Ini.IniKey" /> to insert to this collection.</param>
+      <returns>
+        <see cref="T:MadMilkman.Ini.IniKey" /> that was inserted to this collection.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniKeyCollection.Insert(System.Int32,System.String,System.String)">
+      <summary>
+            Inserts an item to this collection at the specified index.
+            </summary>
+      <param name="index">Zero-based index at which item should be inserted.</param>
+      <param name="name">Name of the <see cref="T:MadMilkman.Ini.IniKey" /> to insert to this collection.</param>
+      <param name="value">Value of the <see cref="T:MadMilkman.Ini.IniKey" /> to insert to this collection.</param>
+      <returns>
+        <see cref="T:MadMilkman.Ini.IniKey" /> that was inserted to this collection.</returns>
+    </member>
+    <member name="T:MadMilkman.Ini.IniKeyDelimiter">
+      <summary>
+            Defines <see cref="T:MadMilkman.Ini.IniKey">key's</see> name and value delimiter character.
+            </summary>
+    </member>
+    <member name="F:MadMilkman.Ini.IniKeyDelimiter.Equal">
+      <summary>
+            Use '=' as <see cref="T:MadMilkman.Ini.IniKey">key's</see> name and value delimiter character.
+            </summary>
+    </member>
+    <member name="F:MadMilkman.Ini.IniKeyDelimiter.Colon">
+      <summary>
+            Use ':' as <see cref="T:MadMilkman.Ini.IniKey">key's</see> name and value delimiter character.
+            </summary>
+    </member>
+    <member name="T:MadMilkman.Ini.IniOptions">
+      <summary>
+            Represents a class that defines INI file's format, stores properties used for both reading and writing a file.
+            </summary>
+    </member>
+    <member name="M:MadMilkman.Ini.IniOptions.#ctor">
+      <summary>
+            Initializes a new instance of the <see cref="T:MadMilkman.Ini.IniOptions" /> class.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniOptions.CommentStarter">
+      <summary>
+            Gets or sets comments starting character.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniOptions.Compression">
+      <summary>
+        <para>Gets or sets a value indicating if file's size is reduced.</para>
+        <para>If <see langword="true" /> file is decompressed on Load and compressed on Save.</para>
+      </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniOptions.Encoding">
+      <summary>
+            Gets or sets encoding for reading and writing an INI file.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniOptions.EncryptionPassword">
+      <summary>
+        <para>Gets or sets an INI file's protection password.</para>
+        <para>File is decrypted on Load and encrypted on Save if a password is not <see langword="null" /> or <see cref="F:System.String.Empty" />.</para>
+      </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniOptions.KeyDelimiter">
+      <summary>
+            Gets or sets keys name and value delimiter character.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniOptions.KeyDuplicate">
+      <summary>
+            Gets or sets a value indicating whether keys with same name are allowed, disallowed or ignored.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniOptions.KeyNameCaseSensitive">
+      <summary>
+            Gets or sets a value indicating whether keys name are case sensitive.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniOptions.KeySpaceAroundDelimiter">
+      <summary>
+            Gets or sets a value indicating whether space is written around the keys delimiter.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniOptions.SectionDuplicate">
+      <summary>
+            Gets or sets a value indicating whether sections with same name are allowed, disallowed or ignored.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniOptions.SectionNameCaseSensitive">
+      <summary>
+            Gets or sets a value indicating whether sections name are case sensitive.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniOptions.SectionWrapper">
+      <summary>
+            Gets or sets wrapper characters of sections name.
+            </summary>
+    </member>
+    <member name="T:MadMilkman.Ini.IniSection">
+      <summary>
+            Represents a section item of the INI file with name and keys content.
+            </summary>
+    </member>
+    <member name="M:MadMilkman.Ini.IniSection.#ctor(MadMilkman.Ini.IniFile,System.String)">
+      <summary>
+            Initializes a new instance of the <see cref="T:MadMilkman.Ini.IniSection" /> class.
+            </summary>
+      <param name="parentFile">The owner file.</param>
+      <param name="name">The section's name.</param>
+    </member>
+    <member name="M:MadMilkman.Ini.IniSection.#ctor(MadMilkman.Ini.IniFile,System.String,MadMilkman.Ini.IniKey[])">
+      <summary>
+            Initializes a new instance of the <see cref="T:MadMilkman.Ini.IniSection" /> class.
+            </summary>
+      <param name="parentFile">The owner file.</param>
+      <param name="name">The section's name.</param>
+      <param name="keys">The section's keys.</param>
+    </member>
+    <member name="M:MadMilkman.Ini.IniSection.#ctor(MadMilkman.Ini.IniFile,System.String,System.Collections.Generic.IEnumerable{MadMilkman.Ini.IniKey})">
+      <summary>
+            Initializes a new instance of the <see cref="T:MadMilkman.Ini.IniSection" /> class.
+            </summary>
+      <param name="parentFile">The owner file.</param>
+      <param name="name">The section's name.</param>
+      <param name="keys">The section's keys.</param>
+    </member>
+    <member name="M:MadMilkman.Ini.IniSection.#ctor(MadMilkman.Ini.IniFile,System.String,System.Collections.Generic.IEnumerable{System.Collections.Generic.KeyValuePair{System.String,System.String}})">
+      <summary>
+            Initializes a new instance of the <see cref="T:MadMilkman.Ini.IniSection" /> class.
+            </summary>
+      <param name="parentFile">The owner file.</param>
+      <param name="name">The section's name.</param>
+      <param name="nameValuePairs">The section's keys data, pairs of key's name and key's value.</param>
+    </member>
+    <member name="M:MadMilkman.Ini.IniSection.Copy">
+      <summary>
+            Copies this <see cref="T:MadMilkman.Ini.IniSection" /> instance.
+            </summary>
+      <returns>Copied <see cref="T:MadMilkman.Ini.IniSection" />.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniSection.Copy(MadMilkman.Ini.IniFile)">
+      <summary>
+            Copies this <see cref="T:MadMilkman.Ini.IniSection" /> instance and sets copied instance's <see cref="P:MadMilkman.Ini.IniItem.ParentFile">ParentFile</see>.
+            </summary>
+      <param name="destinationFile">Copied section's parent file.</param>
+      <returns>Copied <see cref="T:MadMilkman.Ini.IniSection" /> that belongs to a specified <see cref="T:MadMilkman.Ini.IniFile" />.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniSection.Deserialize``1">
+      <summary>
+            Deserializes this <see cref="T:MadMilkman.Ini.IniSection" /> into an object of specified type.
+            </summary>
+      <typeparam name="T">The type of deserialized object.</typeparam>
+      <returns>The object being deserialized.</returns>
+    </member>
+    <member name="F:MadMilkman.Ini.IniSection.GlobalSectionName">
+      <summary>
+            Represents a section name which is used to define a global section, used for storing first keys series that don't belong to any section.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniSection.Keys">
+      <summary>
+            Gets the <see cref="T:MadMilkman.Ini.IniSection">section's</see> key collection.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniSection.ParentCollection">
+      <summary>
+            Gets the <see cref="T:MadMilkman.Ini.IniSectionCollection" /> to which this <see cref="T:MadMilkman.Ini.IniSection" /> belongs to.
+            </summary>
+    </member>
+    <member name="M:MadMilkman.Ini.IniSection.Serialize``1(``0)">
+      <summary>
+            Serializes the specified object into this <see cref="T:MadMilkman.Ini.IniSection" />.
+            </summary>
+      <param name="source">The object to serialize.</param>
+      <typeparam name="T">The type of serialized object.</typeparam>
+    </member>
+    <member name="T:MadMilkman.Ini.IniSectionCollection">
+      <summary>
+            Represents a collection of <see cref="T:MadMilkman.Ini.IniSection" /> items.
+            </summary>
+    </member>
+    <member name="M:MadMilkman.Ini.IniSectionCollection.Add(System.String)">
+      <summary>
+            Adds an item to the end of this collection.
+            </summary>
+      <param name="name">Name of the <see cref="T:MadMilkman.Ini.IniSection" /> to add to this collection.</param>
+      <returns>
+        <see cref="T:MadMilkman.Ini.IniSection" /> that was added to this collection.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniSectionCollection.Add(System.String,System.Collections.Generic.IEnumerable{System.Collections.Generic.KeyValuePair{System.String,System.String}})">
+      <summary>
+            Adds an item to the end of this collection.
+            </summary>
+      <param name="name">Name of the <see cref="T:MadMilkman.Ini.IniSection" /> to add to this collection.</param>
+      <param name="nameValuePairs">The section's keys data, pairs of key's name and key's value, to add to this collection.</param>
+      <returns>
+        <see cref="T:MadMilkman.Ini.IniSection" /> that was added to this collection.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniSectionCollection.Insert(System.Int32,System.String)">
+      <summary>
+            Inserts an item to this collection at the specified index.
+            </summary>
+      <param name="index">Zero-based index at which item should be inserted.</param>
+      <param name="name">Name of the <see cref="T:MadMilkman.Ini.IniSection" /> to insert to this collection.</param>
+      <returns>
+        <see cref="T:MadMilkman.Ini.IniSection" /> that was inserted to this collection.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniSectionCollection.Insert(System.Int32,System.String,System.Collections.Generic.IEnumerable{System.Collections.Generic.KeyValuePair{System.String,System.String}})">
+      <summary>
+            Inserts an item to this collection at the specified index.
+            </summary>
+      <param name="index">Zero-based index at which item should be inserted.</param>
+      <param name="name">Name of the <see cref="T:MadMilkman.Ini.IniSection" /> to insert to this collection.</param>
+      <param name="nameValuePairs">The section's keys data, pairs of key's name and key's value, to insert to this collection.</param>
+      <returns>
+        <see cref="T:MadMilkman.Ini.IniSection" /> that was inserted to this collection.</returns>
+    </member>
+    <member name="T:MadMilkman.Ini.IniSectionWrapper">
+      <summary>
+            Defines <see cref="T:MadMilkman.Ini.IniSection">section's</see> wrapper characters around its name.
+            </summary>
+    </member>
+    <member name="F:MadMilkman.Ini.IniSectionWrapper.SquareBrackets">
+      <summary>
+            Use '[' and ']' as <see cref="T:MadMilkman.Ini.IniSection">section's</see> wrapper characters.
+            </summary>
+    </member>
+    <member name="F:MadMilkman.Ini.IniSectionWrapper.AngleBrackets">
+      <summary>
+            Use '&lt;' and '&gt;' as <see cref="T:MadMilkman.Ini.IniSection">section's</see> wrapper characters.
+            </summary>
+    </member>
+    <member name="F:MadMilkman.Ini.IniSectionWrapper.CurlyBrackets">
+      <summary>
+            Use '{' and '}' as <see cref="T:MadMilkman.Ini.IniSection">section's</see> wrapper characters.
+            </summary>
+    </member>
+    <member name="F:MadMilkman.Ini.IniSectionWrapper.Parentheses">
+      <summary>
+            Use '(' and ')' as <see cref="T:MadMilkman.Ini.IniSection">section's</see> wrapper characters.
+            </summary>
+    </member>
+    <member name="T:MadMilkman.Ini.IniSerializationAttribute">
+      <summary>
+            Indicates the behavior of public property when serializing or deserializing the object that contains it.
+            </summary>
+    </member>
+    <member name="M:MadMilkman.Ini.IniSerializationAttribute.#ctor(System.Boolean)">
+      <summary>
+            Initializes a new instance of the IniSerializationAttribute class and specifies if serialization is ignored.
+            </summary>
+      <param name="ignore">The value indicating whether serialization is ignored.</param>
+    </member>
+    <member name="M:MadMilkman.Ini.IniSerializationAttribute.#ctor(System.String)">
+      <summary>
+            Initializes a new instance of the IniSerializationAttribute class and specifies the <see cref="T:MadMilkman.Ini.IniKey" />'s name.
+            </summary>
+      <param name="alias">The name of the generated <see cref="T:MadMilkman.Ini.IniKey" />.</param>
+    </member>
+    <member name="P:MadMilkman.Ini.IniSerializationAttribute.Alias">
+      <summary>
+            Gets the <see cref="T:MadMilkman.Ini.IniKey" /> name of serialized the property.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniSerializationAttribute.Ignore">
+      <summary>
+            Gets the value indicating whether serialization is ignored.
+            </summary>
+    </member>
+    <member name="T:MadMilkman.Ini.IniValueBinding">
+      <summary>
+            Represents a class that is used for binding operations, an operation in which the <see cref="T:MadMilkman.Ini.IniKey">placeholder keys</see> values are replaced with an internal or external data.
+            </summary>
+    </member>
+    <member name="M:MadMilkman.Ini.IniValueBinding.Bind">
+      <summary>
+            Executes a binding operation with internal data source.
+            </summary>
+    </member>
+    <member name="M:MadMilkman.Ini.IniValueBinding.Bind(System.Object)">
+      <summary>
+            Executes a binding operation with external data source.
+            </summary>
+      <param name="dataSource">The binding data source.</param>
+    </member>
+    <member name="M:MadMilkman.Ini.IniValueBinding.Bind(System.Object,System.String)">
+      <summary>
+            Executes a binding operation with external data source, only on specified section.
+            </summary>
+      <param name="dataSource">The binding data source.</param>
+      <param name="sectionName">The <see cref="T:MadMilkman.Ini.IniSection" />'s name.</param>
+    </member>
+    <member name="E:MadMilkman.Ini.IniValueBinding.Binding">
+      <summary>
+            Occurs when a placeholder is binding with data source value and can be used to customize the binding operation.
+            </summary>
+    </member>
+    <member name="T:MadMilkman.Ini.IniValueBindingEventArgs">
+      <summary>
+            Provides data for <see cref="E:MadMilkman.Ini.IniValueBinding.Binding" /> event.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniValueBindingEventArgs.IsValueFound">
+      <summary>
+            Gets a value indicating whether value was found in the data source.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniValueBindingEventArgs.PlaceholderKey">
+      <summary>
+            Gets the placeholder's <see cref="T:MadMilkman.Ini.IniKey" />.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniValueBindingEventArgs.PlaceholderName">
+      <summary>
+            Gets the placeholder's name.
+            </summary>
+    </member>
+    <member name="P:MadMilkman.Ini.IniValueBindingEventArgs.Value">
+      <summary>
+            Gets or sets the data source value that will replace the placeholder.
+            </summary>
+    </member>
+    <member name="T:MadMilkman.Ini.IniValueMappings">
+      <summary>
+            Represents a class of mapped <see cref="P:MadMilkman.Ini.IniKey.Value" />s and their results, used in <see cref="O:MadMilkman.Ini.IniKey.TryParseValue" /> methods.
+            </summary>
+    </member>
+    <member name="M:MadMilkman.Ini.IniValueMappings.Add``1(System.String,``0)">
+      <summary>
+            Adds a new mapping of <see cref="P:MadMilkman.Ini.IniKey.Value" /> to resulting object of parse methods.
+            </summary>
+      <param name="value">The key's value.</param>
+      <param name="mappedResult">The object that represents parsed <see cref="P:MadMilkman.Ini.IniKey.Value" />.</param>
+      <typeparam name="T">Type of the object that represents parsed <see cref="P:MadMilkman.Ini.IniKey.Value" />.</typeparam>
+    </member>
+    <member name="M:MadMilkman.Ini.IniValueMappings.Contains(System.String)">
+      <summary>
+            Determines whether the collection contains a mapping for a specified key's value.
+            </summary>
+      <param name="value">The key's value to locate in the collection.</param>
+      <returns>
+        <see langword="true" /> if the collection contains a mapping for a specified key's value.</returns>
+    </member>
+    <member name="M:MadMilkman.Ini.IniValueMappings.Remove(System.String)">
+      <summary>
+            Removes a mapping for a specified key's value in the collection.
+            </summary>
+      <param name="value">The key's value to remove in the collection.</param>
+      <returns>
+        <see langword="true" /> if a mapping for a specified key's value is successfully found and removed.</returns>
+    </member>
+  </members>
+</doc>

My Project/Resources.Designer.vb

@@ -59,5 +59,757 @@ Namespace My.Resources
                 resourceCulture = value
             End Set
         End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Point number.
+        '''</summary>
+        Friend ReadOnly Property _11() As String
+            Get
+                Return ResourceManager.GetString("11", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Serial number.
+        '''</summary>
+        Friend ReadOnly Property _12() As String
+            Get
+                Return ResourceManager.GetString("12", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Instrument type.
+        '''</summary>
+        Friend ReadOnly Property _13() As String
+            Get
+                Return ResourceManager.GetString("13", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Time.
+        '''</summary>
+        Friend ReadOnly Property _19() As String
+            Get
+                Return ResourceManager.GetString("19", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Horizontal Angle.
+        '''</summary>
+        Friend ReadOnly Property _21() As String
+            Get
+                Return ResourceManager.GetString("21", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Vertical Angle.
+        '''</summary>
+        Friend ReadOnly Property _22() As String
+            Get
+                Return ResourceManager.GetString("22", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Horizontal Angle Correction.
+        '''</summary>
+        Friend ReadOnly Property _25() As String
+            Get
+                Return ResourceManager.GetString("25", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Slope distance.
+        '''</summary>
+        Friend ReadOnly Property _31() As String
+            Get
+                Return ResourceManager.GetString("31", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Horizontal distance.
+        '''</summary>
+        Friend ReadOnly Property _32() As String
+            Get
+                Return ResourceManager.GetString("32", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Height difference.
+        '''</summary>
+        Friend ReadOnly Property _33() As String
+            Get
+                Return ResourceManager.GetString("33", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Code-Block ID.
+        '''</summary>
+        Friend ReadOnly Property _41() As String
+            Get
+                Return ResourceManager.GetString("41", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Information 1.
+        '''</summary>
+        Friend ReadOnly Property _42() As String
+            Get
+                Return ResourceManager.GetString("42", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Information 2.
+        '''</summary>
+        Friend ReadOnly Property _43() As String
+            Get
+                Return ResourceManager.GetString("43", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Information 3.
+        '''</summary>
+        Friend ReadOnly Property _44() As String
+            Get
+                Return ResourceManager.GetString("44", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Information 4.
+        '''</summary>
+        Friend ReadOnly Property _45() As String
+            Get
+                Return ResourceManager.GetString("45", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Information 5.
+        '''</summary>
+        Friend ReadOnly Property _46() As String
+            Get
+                Return ResourceManager.GetString("46", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Information 6.
+        '''</summary>
+        Friend ReadOnly Property _47() As String
+            Get
+                Return ResourceManager.GetString("47", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Information 7.
+        '''</summary>
+        Friend ReadOnly Property _48() As String
+            Get
+                Return ResourceManager.GetString("48", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Information 8.
+        '''</summary>
+        Friend ReadOnly Property _49() As String
+            Get
+                Return ResourceManager.GetString("49", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to PPM/mm.
+        '''</summary>
+        Friend ReadOnly Property _51() As String
+            Get
+                Return ResourceManager.GetString("51", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Prism constant.
+        '''</summary>
+        Friend ReadOnly Property _58() As String
+            Get
+                Return ResourceManager.GetString("58", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to PPM.
+        '''</summary>
+        Friend ReadOnly Property _59() As String
+            Get
+                Return ResourceManager.GetString("59", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Remark 1.
+        '''</summary>
+        Friend ReadOnly Property _71() As String
+            Get
+                Return ResourceManager.GetString("71", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Remark 2.
+        '''</summary>
+        Friend ReadOnly Property _72() As String
+            Get
+                Return ResourceManager.GetString("72", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Remark 3.
+        '''</summary>
+        Friend ReadOnly Property _73() As String
+            Get
+                Return ResourceManager.GetString("73", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Remark 4.
+        '''</summary>
+        Friend ReadOnly Property _74() As String
+            Get
+                Return ResourceManager.GetString("74", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Remark 5.
+        '''</summary>
+        Friend ReadOnly Property _75() As String
+            Get
+                Return ResourceManager.GetString("75", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Remark 6.
+        '''</summary>
+        Friend ReadOnly Property _76() As String
+            Get
+                Return ResourceManager.GetString("76", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Remark 7.
+        '''</summary>
+        Friend ReadOnly Property _77() As String
+            Get
+                Return ResourceManager.GetString("77", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Remark 8.
+        '''</summary>
+        Friend ReadOnly Property _78() As String
+            Get
+                Return ResourceManager.GetString("78", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Remark 9.
+        '''</summary>
+        Friend ReadOnly Property _79() As String
+            Get
+                Return ResourceManager.GetString("79", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Easting.
+        '''</summary>
+        Friend ReadOnly Property _81() As String
+            Get
+                Return ResourceManager.GetString("81", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Northing.
+        '''</summary>
+        Friend ReadOnly Property _82() As String
+            Get
+                Return ResourceManager.GetString("82", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Elevation.
+        '''</summary>
+        Friend ReadOnly Property _83() As String
+            Get
+                Return ResourceManager.GetString("83", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to St. Easting.
+        '''</summary>
+        Friend ReadOnly Property _84() As String
+            Get
+                Return ResourceManager.GetString("84", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to St. Northing.
+        '''</summary>
+        Friend ReadOnly Property _85() As String
+            Get
+                Return ResourceManager.GetString("85", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to St. Height.
+        '''</summary>
+        Friend ReadOnly Property _86() As String
+            Get
+                Return ResourceManager.GetString("86", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Reflector height.
+        '''</summary>
+        Friend ReadOnly Property _87() As String
+            Get
+                Return ResourceManager.GetString("87", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to Instrument height.
+        '''</summary>
+        Friend ReadOnly Property _88() As String
+            Get
+                Return ResourceManager.GetString("88", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property Circled_Right_2_24() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("Circled_Right_2_24", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property Fine_Print_24() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("Fine_Print_24", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_add_new_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_add_new_50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_advance_48() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_advance_48", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_browse_folder_50_2() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_browse_folder_50_2", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_cancel_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_cancel_50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_check_file_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8-check-file-50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_clear_symbol_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_clear_symbol_50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_close_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_close_50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_close_window_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_close_window_50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_connection_status_on_48() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_connection_status_on_48", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_design_48() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_design_48", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_do_not_disturb_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_do_not_disturb_50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_done_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_done_50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_drawing_compass_48() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_drawing_compass_48", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_edit_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_edit_50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_folder_50_2() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_folder_50_2", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_info_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_info_50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_info_squared_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_info_squared_50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_information_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_information_50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_land_surveying_48() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_land_surveying_48", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_menu_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8-menu-50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_move_to_folder_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8-move-to-folder-50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_no_entry_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_no_entry_50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_ok_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_ok_50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_open_end_wrench_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_open_end_wrench_50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_opened_folder_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_opened_folder_50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_question_mark_48() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8-question-mark-48", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_save_as_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_save_as_50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_send_file_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8-send-file-50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_support_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8-support-50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_tools_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_tools_50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_unavailable_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_unavailable_50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_undo_48() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8_undo_48", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property ModernXP_41_Settings_icon() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("ModernXP_41_Settings_icon", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized string similar to # TPS1100 Convert
+        '''
+        '''![&quot;logo&quot;](https://multibox.nohost.me/gitea/boris/TPS1100-Convert/raw/branch/main/My%20Project/Icons/TPS1100CNVRT_logo.png)
+        '''
+        '''Program za pretvorbo GSI datotek v obliko primerno za branje.
+        '''
+        '''Enostavna priprava in izvoz podatkov meritev v različnih oblikah...
+        '''
+        '''- Zapisnik Meritev (podatki meritev kot so Hz, V, SD, HD,...)
+        '''- Koordinate Točk (seznam točk v obliki E, N, Ht, koda in klasifikacija)
+        '''- Priprava GSI datoteke iz seznama točk (Uvoz TXT/KOO/... datotek)
+        '''
+        '''Program uporablja kodi [rest of string was truncated]&quot;;.
+        '''</summary>
+        Friend ReadOnly Property README() As String
+            Get
+                Return ResourceManager.GetString("README", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property Save_as_24() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("Save_as_24", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property TPS1100CNVRT() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("TPS1100CNVRT", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property TPS1100CNVRT_logo() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("TPS1100CNVRT_logo", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
     End Module
 End Namespace

My Project/Resources.resx

@@ -46,7 +46,7 @@
     
     mimetype: application/x-microsoft.net.object.binary.base64
     value   : The object must be serialized with 
-            : System.Serialization.Formatters.Binary.BinaryFormatter
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
             : and then encoded with base64 encoding.
     
     mimetype: application/x-microsoft.net.object.soap.base64
@@ -60,6 +60,7 @@
             : 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">
@@ -68,9 +69,10 @@
               <xsd:sequence>
                 <xsd:element name="value" type="xsd:string" minOccurs="0" />
               </xsd:sequence>
-              <xsd:attribute name="name" type="xsd:string" />
+              <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">
@@ -85,9 +87,10 @@
                 <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="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">
@@ -109,9 +112,250 @@
     <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>
+    <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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
   </resheader>
+  <data name="78" xml:space="preserve">
+    <value>Remark 8</value>
+  </data>
+  <assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
+  <data name="icons8_design_48" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-design-48.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="77" xml:space="preserve">
+    <value>Remark 7</value>
+  </data>
+  <data name="icons8-send-file-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-send-file-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="48" xml:space="preserve">
+    <value>Information 7</value>
+  </data>
+  <data name="58" xml:space="preserve">
+    <value>Prism constant</value>
+  </data>
+  <data name="icons8_info_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-info-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="49" xml:space="preserve">
+    <value>Information 8</value>
+  </data>
+  <data name="22" xml:space="preserve">
+    <value>Vertical Angle</value>
+  </data>
+  <data name="13" xml:space="preserve">
+    <value>Instrument type</value>
+  </data>
+  <data name="47" xml:space="preserve">
+    <value>Information 6</value>
+  </data>
+  <data name="ModernXP_41_Settings_icon" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\ModernXP-41-Settings-icon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="73" xml:space="preserve">
+    <value>Remark 3</value>
+  </data>
+  <data name="icons8_done_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-done-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="icons8_unavailable_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-unavailable-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="icons8_folder_50_2" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-folder-50-2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="TPS1100CNVRT_logo" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\TPS1100CNVRT_logo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="76" xml:space="preserve">
+    <value>Remark 6</value>
+  </data>
+  <data name="icons8_do_not_disturb_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-do-not-disturb-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="icons8_opened_folder_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-opened-folder-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="51" xml:space="preserve">
+    <value>PPM/mm</value>
+  </data>
+  <data name="icons8_browse_folder_50_2" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-browse-folder-50-2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="83" xml:space="preserve">
+    <value>Elevation</value>
+  </data>
+  <data name="icons8_ok_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-ok-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="Circled_Right_2_24" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\Circled-Right-2-24.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="icons8_open_end_wrench_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-open-end-wrench-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="12" xml:space="preserve">
+    <value>Serial number</value>
+  </data>
+  <data name="icons8_add_new_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-add-new-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="icons8_cancel_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-cancel-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="Fine_Print_24" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\Fine-Print-24.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="85" xml:space="preserve">
+    <value>St. Northing</value>
+  </data>
+  <data name="59" xml:space="preserve">
+    <value>PPM</value>
+  </data>
+  <data name="86" xml:space="preserve">
+    <value>St. Height</value>
+  </data>
+  <data name="icons8_information_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-information-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="43" xml:space="preserve">
+    <value>Information 2</value>
+  </data>
+  <data name="icons8_close_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-close-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="icons8_clear_symbol_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-clear-symbol-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="icons8_edit_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-edit-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="icons8-support-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-support-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="79" xml:space="preserve">
+    <value>Remark 9</value>
+  </data>
+  <data name="Save_as_24" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\Save-as-24.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="41" xml:space="preserve">
+    <value>Code-Block ID</value>
+  </data>
+  <data name="74" xml:space="preserve">
+    <value>Remark 4</value>
+  </data>
+  <data name="icons8_tools_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-tools-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="icons8_drawing_compass_48" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-drawing-compass-48.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="44" xml:space="preserve">
+    <value>Information 3</value>
+  </data>
+  <data name="icons8_land_surveying_48" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-land-surveying-48.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="72" xml:space="preserve">
+    <value>Remark 2</value>
+  </data>
+  <data name="11" xml:space="preserve">
+    <value>Point number</value>
+  </data>
+  <data name="icons8_info_squared_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-info-squared-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="icons8-check-file-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-check-file-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="icons8_undo_48" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-undo-48.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="TPS1100CNVRT" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\TPS1100CNVRT.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="33" xml:space="preserve">
+    <value>Height difference</value>
+  </data>
+  <data name="88" xml:space="preserve">
+    <value>Instrument height</value>
+  </data>
+  <data name="42" xml:space="preserve">
+    <value>Information 1</value>
+  </data>
+  <data name="icons8-question-mark-48" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-question-mark-48.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="19" xml:space="preserve">
+    <value>Time</value>
+  </data>
+  <data name="icons8_no_entry_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-no-entry-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="icons8_save_as_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-save-as-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="icons8_add_folder_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-add-folder-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="README" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\README.md;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
+  </data>
+  <data name="81" xml:space="preserve">
+    <value>Easting</value>
+  </data>
+  <data name="icons8_connection_status_on_48" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-connection-status-on-48.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="82" xml:space="preserve">
+    <value>Northing</value>
+  </data>
+  <data name="71" xml:space="preserve">
+    <value>Remark 1</value>
+  </data>
+  <data name="45" xml:space="preserve">
+    <value>Information 4</value>
+  </data>
+  <data name="icons8_advance_48" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-advance-48.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="46" xml:space="preserve">
+    <value>Information 5</value>
+  </data>
+  <data name="75" xml:space="preserve">
+    <value>Remark 5</value>
+  </data>
+  <data name="87" xml:space="preserve">
+    <value>Reflector height</value>
+  </data>
+  <data name="icons8-move-to-folder-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-move-to-folder-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="icons8-add-folder-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-add-folder-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="32" xml:space="preserve">
+    <value>Horizontal distance</value>
+  </data>
+  <data name="31" xml:space="preserve">
+    <value>Slope distance</value>
+  </data>
+  <data name="25" xml:space="preserve">
+    <value>Horizontal Angle Correction</value>
+  </data>
+  <data name="21" xml:space="preserve">
+    <value>Horizontal Angle</value>
+  </data>
+  <data name="84" xml:space="preserve">
+    <value>St. Easting</value>
+  </data>
+  <data name="icons8_close_window_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-close-window-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
+  <data name="icons8-menu-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-menu-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
 </root>

My Project/Settings.Designer.vb

@@ -15,7 +15,7 @@ Option Explicit On
 Namespace My
     
     <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
-     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "17.7.0.0"),  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "17.10.0.0"),  _
      Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
     Partial Friend NotInheritable Class MySettings
         Inherits Global.System.Configuration.ApplicationSettingsBase
@@ -53,6 +53,261 @@ Namespace My
                 Return defaultInstance
             End Get
         End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("")>  _
+        Public Property ZadnjaMapa() As String
+            Get
+                Return CType(Me("ZadnjaMapa"),String)
+            End Get
+            Set
+                Me("ZadnjaMapa") = value
+            End Set
+        End Property
+        
+        '''<summary>
+        '''Znak za decimalno ločilo
+        '''</summary>
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Configuration.SettingsDescriptionAttribute("Znak za decimalno ločilo"),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("Pika")>  _
+        Public Property DecimalnoLocilo() As String
+            Get
+                Return CType(Me("DecimalnoLocilo"),String)
+            End Get
+            Set
+                Me("DecimalnoLocilo") = value
+            End Set
+        End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("Da")>  _
+        Public Property KodeUporabnik() As String
+            Get
+                Return CType(Me("KodeUporabnik"),String)
+            End Get
+            Set
+                Me("KodeUporabnik") = value
+            End Set
+        End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("")>  _
+        Public Property Datoteka() As String
+            Get
+                Return CType(Me("Datoteka"),String)
+            End Get
+            Set
+                Me("Datoteka") = value
+            End Set
+        End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("0")>  _
+        Public Property Stolpci() As Integer
+            Get
+                Return CType(Me("Stolpci"),Integer)
+            End Get
+            Set
+                Me("Stolpci") = value
+            End Set
+        End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("")>  _
+        Public Property DatLogfile() As String
+            Get
+                Return CType(Me("DatLogfile"),String)
+            End Get
+            Set
+                Me("DatLogfile") = value
+            End Set
+        End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("")>  _
+        Public Property MapaShrani() As String
+            Get
+                Return CType(Me("MapaShrani"),String)
+            End Get
+            Set
+                Me("MapaShrani") = value
+            End Set
+        End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("10")>  _
+        Public Property KodaQuickSet() As String
+            Get
+                Return CType(Me("KodaQuickSet"),String)
+            End Get
+            Set
+                Me("KodaQuickSet") = value
+            End Set
+        End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("20")>  _
+        Public Property KodaSetAzi() As String
+            Get
+                Return CType(Me("KodaSetAzi"),String)
+            End Get
+            Set
+                Me("KodaSetAzi") = value
+            End Set
+        End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("30")>  _
+        Public Property KodaResection() As String
+            Get
+                Return CType(Me("KodaResection"),String)
+            End Get
+            Set
+                Me("KodaResection") = value
+            End Set
+        End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("40")>  _
+        Public Property KodaFreeStation() As String
+            Get
+                Return CType(Me("KodaFreeStation"),String)
+            End Get
+            Set
+                Me("KodaFreeStation") = value
+            End Set
+        End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("50")>  _
+        Public Property KodaOriHtTrans() As String
+            Get
+                Return CType(Me("KodaOriHtTrans"),String)
+            End Get
+            Set
+                Me("KodaOriHtTrans") = value
+            End Set
+        End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("80")>  _
+        Public Property KodaMeasOri() As String
+            Get
+                Return CType(Me("KodaMeasOri"),String)
+            End Get
+            Set
+                Me("KodaMeasOri") = value
+            End Set
+        End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("90")>  _
+        Public Property KodaMeas() As String
+            Get
+                Return CType(Me("KodaMeas"),String)
+            End Get
+            Set
+                Me("KodaMeas") = value
+            End Set
+        End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("91")>  _
+        Public Property KodaStake() As String
+            Get
+                Return CType(Me("KodaStake"),String)
+            End Get
+            Set
+                Me("KodaStake") = value
+            End Set
+        End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("99")>  _
+        Public Property KodaUserImport() As String
+            Get
+                Return CType(Me("KodaUserImport"),String)
+            End Get
+            Set
+                Me("KodaUserImport") = value
+            End Set
+        End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("1")>  _
+        Public Property KodaStojisce() As String
+            Get
+                Return CType(Me("KodaStojisce"),String)
+            End Get
+            Set
+                Me("KodaStojisce") = value
+            End Set
+        End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("2")>  _
+        Public Property KodaStojisceInfo() As String
+            Get
+                Return CType(Me("KodaStojisceInfo"),String)
+            End Get
+            Set
+                Me("KodaStojisceInfo") = value
+            End Set
+        End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("")>  _
+        Public Property Pisava() As String
+            Get
+                Return CType(Me("Pisava"),String)
+            End Get
+            Set
+                Me("Pisava") = value
+            End Set
+        End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
+        Public Property PisavaVelikost() As Integer
+            Get
+                Return CType(Me("PisavaVelikost"),Integer)
+            End Get
+            Set
+                Me("PisavaVelikost") = value
+            End Set
+        End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("3")>  _
+        Public Property KodaStojisceOri() As String
+            Get
+                Return CType(Me("KodaStojisceOri"),String)
+            End Get
+            Set
+                Me("KodaStojisceOri") = value
+            End Set
+        End Property
     End Class
 End Namespace
 

My Project/Settings.settings

@@ -1,7 +1,69 @@
 <?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>
+<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" GeneratedClassNamespace="My" GeneratedClassName="MySettings" UseMySettingsClassName="true">
+  <Profiles />
+  <Settings>
+    <Setting Name="ZadnjaMapa" Type="System.String" Scope="User">
+      <Value Profile="(Default)" />
+    </Setting>
+    <Setting Name="DecimalnoLocilo" Description="Znak za decimalno ločilo" Type="System.String" Scope="User">
+      <Value Profile="(Default)">Pika</Value>
+    </Setting>
+    <Setting Name="KodeUporabnik" Type="System.String" Scope="User">
+      <Value Profile="(Default)">Da</Value>
+    </Setting>
+    <Setting Name="Datoteka" Type="System.String" Scope="User">
+      <Value Profile="(Default)" />
+    </Setting>
+    <Setting Name="Stolpci" Type="System.Int32" Scope="User">
+      <Value Profile="(Default)">0</Value>
+    </Setting>
+    <Setting Name="DatLogfile" Type="System.String" Scope="User">
+      <Value Profile="(Default)" />
+    </Setting>
+    <Setting Name="MapaShrani" Type="System.String" Scope="User">
+      <Value Profile="(Default)" />
+    </Setting>
+    <Setting Name="KodaQuickSet" Type="System.String" Scope="User">
+      <Value Profile="(Default)">10</Value>
+    </Setting>
+    <Setting Name="KodaSetAzi" Type="System.String" Scope="User">
+      <Value Profile="(Default)">20</Value>
+    </Setting>
+    <Setting Name="KodaResection" Type="System.String" Scope="User">
+      <Value Profile="(Default)">30</Value>
+    </Setting>
+    <Setting Name="KodaFreeStation" Type="System.String" Scope="User">
+      <Value Profile="(Default)">40</Value>
+    </Setting>
+    <Setting Name="KodaOriHtTrans" Type="System.String" Scope="User">
+      <Value Profile="(Default)">50</Value>
+    </Setting>
+    <Setting Name="KodaMeasOri" Type="System.String" Scope="User">
+      <Value Profile="(Default)">80</Value>
+    </Setting>
+    <Setting Name="KodaMeas" Type="System.String" Scope="User">
+      <Value Profile="(Default)">90</Value>
+    </Setting>
+    <Setting Name="KodaStake" Type="System.String" Scope="User">
+      <Value Profile="(Default)">91</Value>
+    </Setting>
+    <Setting Name="KodaUserImport" Type="System.String" Scope="User">
+      <Value Profile="(Default)">99</Value>
+    </Setting>
+    <Setting Name="KodaStojisce" Type="System.String" Scope="User">
+      <Value Profile="(Default)">1</Value>
+    </Setting>
+    <Setting Name="KodaStojisceInfo" Type="System.String" Scope="User">
+      <Value Profile="(Default)">2</Value>
+    </Setting>
+    <Setting Name="Pisava" Type="System.String" Scope="User">
+      <Value Profile="(Default)" />
+    </Setting>
+    <Setting Name="PisavaVelikost" Type="System.Int32" Scope="User">
+      <Value Profile="(Default)" />
+    </Setting>
+    <Setting Name="KodaStojisceOri" Type="System.String" Scope="User">
+      <Value Profile="(Default)">3</Value>
+    </Setting>
+  </Settings>
+</SettingsFile>

Podatki/GSI_DataCodes.txt

@@ -0,0 +1,39 @@
+11	Pointnumber
+12	Serial number
+13	Instrument type
+19	Time
+21	Horizontal Angle
+22	Vertical Angle
+25	Horizontal Angle Correction
+31	Slope distance
+32	Horizontal distance
+33	Height difference
+41	Code-Block ID
+42	Information 1
+43	Information 2
+44	Information 3
+45	Information 4
+46	Information 5
+47	Information 6
+48	Information 7
+49	Information 8
+51	PPM/mm
+58	Prism constant
+59	PPM
+71	Remark 1
+72	Remark 2
+73	Remark 3
+74	Remark 4
+75	Remark 5
+76	Remark 6
+77	Remark 7
+78	Remark 8
+79	Remark 9
+81	Easting
+82	Northing
+83	Elevation
+84	St. Easting
+85	St. Northing
+86	St. Height
+87	Reflector height
+88	Instrument height