TestEIn 1.6a2 :

- aggiunta possibilità di inserire un progetto in un altro - aggiunta definizione testi - migliorie varie.
2015-01-14 21:59:58 +00:00
parent 2f0429f03c
commit eb69af9280
17 changed files with 1217 additions and 364 deletions
@@ -37,7 +37,7 @@ Partial Class AboutBox1
      'LogoPictureBox
      '
      Me.LogoPictureBox.Image = CType(resources.GetObject("LogoPictureBox.Image"), System.Drawing.Image)
-      Me.LogoPictureBox.Location = New System.Drawing.Point(23, 40)
+      Me.LogoPictureBox.Location = New System.Drawing.Point(23, 33)
      Me.LogoPictureBox.Name = "LogoPictureBox"
      Me.LogoPictureBox.Size = New System.Drawing.Size(52, 52)
      Me.LogoPictureBox.SizeMode = System.Windows.Forms.PictureBoxSizeMode.CenterImage
@@ -69,7 +69,7 @@ Partial Class AboutBox1
      '
      'LabelCopyright
      '
-      Me.LabelCopyright.Location = New System.Drawing.Point(108, 60)
+      Me.LabelCopyright.Location = New System.Drawing.Point(108, 59)
      Me.LabelCopyright.Margin = New System.Windows.Forms.Padding(6, 0, 3, 0)
      Me.LabelCopyright.MaximumSize = New System.Drawing.Size(152, 17)
      Me.LabelCopyright.MinimumSize = New System.Drawing.Size(152, 17)
@@ -81,7 +81,7 @@ Partial Class AboutBox1
      '
      'LabelVersion
      '
-      Me.LabelVersion.Location = New System.Drawing.Point(108, 43)
+      Me.LabelVersion.Location = New System.Drawing.Point(108, 41)
      Me.LabelVersion.Margin = New System.Windows.Forms.Padding(6, 0, 3, 0)
      Me.LabelVersion.MaximumSize = New System.Drawing.Size(152, 17)
      Me.LabelVersion.MinimumSize = New System.Drawing.Size(152, 17)
@@ -93,7 +93,7 @@ Partial Class AboutBox1
      '
      'LabelProductName
      '
-      Me.LabelProductName.Location = New System.Drawing.Point(108, 26)
+      Me.LabelProductName.Location = New System.Drawing.Point(108, 23)
      Me.LabelProductName.Margin = New System.Windows.Forms.Padding(6, 0, 3, 0)
      Me.LabelProductName.MaximumSize = New System.Drawing.Size(152, 17)
      Me.LabelProductName.MinimumSize = New System.Drawing.Size(152, 17)
@@ -16,21 +16,23 @@ Structure Vector3d
      y = VtV.y
      z = VtV.z
   End Sub
-   ' Inizializzatori da componenti polari / sferici
-   Sub FromSpherical(ByVal dLen As Double, ByVal dAngVertDeg As Double, ByVal dAngOrizzDeg As Double)
+   ' Calcolatori da componenti polari / sferici
+   Shared Function FromSpherical(ByVal dLen As Double, ByVal dAngVertDeg As Double, ByVal dAngOrizzDeg As Double) As Vector3d
      Dim dAngVertRad As Double = dAngVertDeg * Math.PI / 180
      Dim dAngOrizzRad As Double = dAngOrizzDeg * Math.PI / 180
      Dim dSinAngVert As Double = Math.Sin(dAngVertRad)
-      x = dLen * dSinAngVert * Math.Cos(dAngOrizzRad)
-      y = dLen * dSinAngVert * Math.Sin(dAngOrizzRad)
-      z = dLen * Math.Cos(dAngVertRad)
-   End Sub
-   Sub FromPolar(ByVal dLen As Double, ByVal dAngOrizzDeg As Double)
+      Dim vtV As New Vector3d(dLen * dSinAngVert * Math.Cos(dAngOrizzRad),
+                              dLen * dSinAngVert * Math.Sin(dAngOrizzRad),
+                              dLen * Math.Cos(dAngVertRad))
+      Return vtV
+   End Function
+   Shared Function FromPolar(ByVal dLen As Double, ByVal dAngOrizzDeg As Double) As Vector3d
      Dim dAngOrizzRad As Double = dAngOrizzDeg * Math.PI / 180
-      x = dLen * Math.Cos(dAngOrizzRad)
-      y = dLen * Math.Sin(dAngOrizzRad)
-      z = 0
-   End Sub
+      Dim vtV As New Vector3d(dLen * Math.Cos(dAngOrizzRad),
+                              dLen * Math.Sin(dAngOrizzRad),
+                              0)
+      Return vtV
+   End Function
   ' Vettore opposto
   Shared Operator -(ByVal VtV1 As Vector3d) As Vector3d
      Dim vtV As New Vector3d(-VtV1.x, -VtV1.y, -VtV1.z)
@@ -254,6 +256,10 @@ Structure Point3d
   Shared Function Dist(ByRef ptP1 As Point3d, ByRef ptP2 As Point3d) As Double
      Return (ptP2 - ptP1).Len()
   End Function
+   ' Sono lo stesso punto approssimativamente
+   Shared Function SameApprox(ByRef ptP1 As Point3d, ByRef ptP2 As Point3d) As Boolean
+      Return (ptP2 - ptP1).SqLen() < EPS_SMALL * EPS_SMALL
+   End Function
   ' Traslazione
   Function Move(ByRef VtMove As Vector3d) As Boolean
      Return EgtPointTranslate(x, y, z, VtMove)
@@ -530,10 +536,44 @@ End Function
 Public Function EgtSetFont(ByVal sNfeFontDir As String, ByVal sDefaultFont As String) As Boolean
 End Function

+<DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
+Private Function EgtGetNfeFontDir(ByRef psNfeFontDir As IntPtr) As Boolean
+End Function
+Public Function EgtGetNfeFontDir(ByRef sNfeFontDir As String) As Boolean
+   Dim psNfeFontDir As IntPtr
+   Dim bOk As Boolean = EgtGetNfeFontDir(psNfeFontDir)
+   sNfeFontDir = Marshal.PtrToStringUni(psNfeFontDir)
+   EgtFreeMemory(psNfeFontDir)
+   Return bOk
+End Function
+
+<DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
+Private Function EgtGetDefaultFont(ByRef psDefaultFont As IntPtr) As Boolean
+End Function
+Public Function EgtGetDefaultFont(ByRef sDefaultFont As String) As Boolean
+   Dim psDefaultFont As IntPtr
+   Dim bOk As Boolean = EgtGetDefaultFont(psDefaultFont)
+   sDefaultFont = Marshal.PtrToStringUni(psDefaultFont)
+   EgtFreeMemory(psDefaultFont)
+   Return bOk
+End Function
+
 <DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
 Public Function EgtSetLuaLibs(ByVal sLuaLibsDir As String) As Boolean
 End Function

+<DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
+Public Function EgtSetCommandLogger(ByVal sLogFile As String) As Boolean
+End Function
+
+<DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
+Public Sub EgtEnableCommandLogger()
+End Sub
+
+<DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
+Public Sub EgtDisableCommandLogger()
+End Sub
+
 <DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
 Public Function EgtFreeMemory(ByVal sB As IntPtr) As Boolean
 End Function
@@ -707,6 +747,27 @@ Public Function EgtGetGridFrame(ByRef frRef As Frame3d) As Boolean
   End If
 End Function

+Public Function EgtGetGridOrigin() As Point3d
+   Dim PtOrig As Point3d
+   Dim VtDirX, VtDirY, VtDirZ As Vector3d
+   EgtGetGridFrame(PtOrig, VtDirX, VtDirY, VtDirZ)
+   Return PtOrig
+End Function
+
+Public Function EgtGetGridVersX() As Vector3d
+   Dim PtOrig As Point3d
+   Dim VtDirX, VtDirY, VtDirZ As Vector3d
+   EgtGetGridFrame(PtOrig, VtDirX, VtDirY, VtDirZ)
+   Return VtDirX
+End Function
+
+Public Function EgtGetGridVersY() As Vector3d
+   Dim PtOrig As Point3d
+   Dim VtDirX, VtDirY, VtDirZ As Vector3d
+   EgtGetGridFrame(PtOrig, VtDirX, VtDirY, VtDirZ)
+   Return VtDirY
+End Function
+
 Public Function EgtGetGridVersZ() As Vector3d
   Dim PtOrig As Point3d
   Dim VtDirX, VtDirY, VtDirZ As Vector3d
@@ -722,6 +783,10 @@ End Function
 Public Function EgtOpenFile(ByVal sFilePath As String) As Boolean
 End Function

+<DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
+Public Function EgtImportFile(ByVal sFilePath As String) As Boolean
+End Function
+
 <DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
 Public Function EgtSaveFile(ByVal sFilePath As String, ByVal nFlag As NGE) As Boolean
 End Function
@@ -812,12 +877,17 @@ Public Function EgtCreateCurveArc2PVN(ByVal nParentId As Integer,
 End Function

 <DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
-Public Function EgtCreateCurveCompoFromRectangle(ByVal nParentId As Integer,
-                                             ByRef PtStart As Point3d, ByRef PtEnd As Point3d) As Integer
+Public Function EgtCreateCurveCompoByChain(ByVal nParentId As Integer, ByVal nNumCrv As Integer, ByVal nCrvId() As Integer, ByRef PtNearStart As Point3d, ByVal bCrvErase As Boolean) As Integer
 End Function

 <DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
-Public Function EgtCreateCurveCompoByChain(ByVal nParentId As Integer, ByVal nNumCrv As Integer, ByVal nCrvId() As Integer, ByRef PtNearStart As Point3d, ByVal bCrvErase As Boolean) As Integer
+Public Function EgtCreateRectangle3P(ByVal nParentId As Integer,
+                                     ByRef PtStart As Point3d, ByRef PtCross As Point3d, ByRef PtDir As Point3d) As Integer
+End Function
+
+<DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
+Public Function EgtCreatePolygonFromSide(ByVal nParentId As Integer,
+                                         ByVal nNumSides As Integer, ByRef PtStart As Point3d, ByRef PtFin As Point3d) As Integer
 End Function

 <DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
@@ -838,6 +908,21 @@ End Function
 Public Function EgtCreateSurfTriMeshRuled(ByVal nParentId As Integer, ByVal nCrvId1 As Integer, ByVal nCrvId2 As Integer, ByVal dLinTol As Double) As Integer
 End Function

+<DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
+Public Function EgtCreateText(ByVal nParentId As Integer, ByRef ptP As Point3d, ByVal dAngRotDeg As Double,
+                              ByVal sText As String, ByVal dH As Double) As Integer
+End Function
+
+<DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
+Public Function EgtCreateTextEx(ByVal nParentId As Integer, ByRef ptP As Point3d, ByRef vtN As Vector3d, ByRef vtD As Vector3d,
+                                ByVal sText As String, ByVal sFont As String, ByVal bItalic As Boolean, ByVal dH As Double) As Integer
+End Function
+
+<DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
+Public Function EgtCreateTextAdv(ByVal nParentId As Integer, ByRef ptP As Point3d, ByRef vtN As Vector3d, ByRef vtD As Vector3d,
+                                ByVal sText As String, ByVal sFont As String, ByVal nW As Integer, ByVal bItalic As Boolean,
+                                ByVal dH As Double, ByVal dRat As Double, ByVal dAddAdv As Double, ByVal nInsPos As Integer) As Integer
+End Function

 '---------- GeomDb Objects Modify ----------------------------------------------
 <DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
@@ -882,6 +967,10 @@ End Function
 Public Function EgtModifyCurveExtrusion(ByVal nId As Integer, ByRef VtExtr As Vector3d) As Boolean
 End Function

+<DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
+Public Function EgtSetCurveExtrusionFromGrid(ByVal nId As Integer) As Boolean
+End Function
+
 <DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
 Public Function EgtModifyCurveThickness(ByVal nId As Integer, ByVal bTh As Double) As Boolean
 End Function
@@ -923,7 +1012,7 @@ Public Function EgtModifyCurveArc3P(ByVal nId As Integer, ByRef PtMid As Point3d
 End Function

 <DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
-Public Function EgtSeparateCurveCompo(ByVal nId As Integer) As Boolean
+Public Function EgtExplodeCurveCompo(ByVal nId As Integer) As Boolean
 End Function

 <DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
@@ -1028,12 +1117,12 @@ End Function

 <DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
 Public Function EgtGetBBox(ByVal nId As Integer, ByVal nFlag As Integer,
-                                  ByRef PtMin As Point3d, ByRef PtMax As Point3d) As Boolean
+                           ByRef PtMin As Point3d, ByRef PtMax As Point3d) As Boolean
 End Function

 <DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
 Public Function EgtGetBBoxGlob(ByVal nId As Integer, ByVal nFlag As Integer,
-                                      ByRef PtMin As Point3d, ByRef PtMax As Point3d) As Boolean
+                               ByRef PtMin As Point3d, ByRef PtMax As Point3d) As Boolean
 End Function

 <DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
@@ -1699,13 +1788,32 @@ End Function

 '---------- LUA Executor -------------------------------------------------------
 <DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
-Public Function EgtLuaExecFile(ByVal sFilePath As String) As Boolean
+Public Function EgtLuaEvalNumExpr(ByVal sLine As String, ByRef dVal As Double) As Boolean
+End Function
+
+<DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
+Private Function EgtLuaEvalStringExpr(ByVal sLine As String, ByRef psVal As IntPtr) As Boolean
+End Function
+Public Function EgtLuaEvalStringExpr(ByVal sLine As String, ByRef sVal As String) As Boolean
+   Dim psVal As IntPtr
+   Dim bOk As Boolean = EgtLuaEvalStringExpr(sLine, psVal)
+   sVal = Marshal.PtrToStringUni(psVal)
+   EgtFreeMemory(psVal)
+   Return bOk
 End Function

 <DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
 Public Function EgtLuaExecLine(ByVal sLine As String) As Boolean
 End Function

+<DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
+Public Function EgtLuaExecFile(ByVal sFilePath As String) As Boolean
+End Function
+
+<DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
+Public Function EgtLuaRequire(ByVal sFilePath As String) As Boolean
+End Function
+
 <DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
 Private Function EgtLuaGetLastError(ByRef psError As IntPtr) As Boolean
 End Function
@@ -1848,5 +1956,19 @@ Public Enum OFF_TYPE As Integer
   FORCE_OPEN = 8
   NO_VERTLINE = 16
 End Enum
+'Costanti : posizione di inserimento per testi
+Public Enum INS_POS As Integer
+   TL = 1
+   TC = 2
+   TR = 3
+   ML = 4
+   MC = 5
+   MR = 6
+   BL = 7
+   BC = 8
+   BR = 9
+End Enum
+'Costanti : interruzione di riga
+Public Const LINE_BREAK As String = "<br/>"

 End Module
@@ -26,16 +26,9 @@ Partial Class Form1
      Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form1))
      Me.TableLayoutPanel1 = New System.Windows.Forms.TableLayoutPanel()
      Me.Scene1 = New TestEIn.Scene()
-      Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
-      Me.tsStatusOnL = New System.Windows.Forms.ToolStripStatusLabel()
-      Me.tsStatusOutput = New System.Windows.Forms.ToolStripStatusLabel()
-      Me.tsStatusOnR = New System.Windows.Forms.ToolStripStatusLabel()
-      Me.tsStatusSnapPointType = New System.Windows.Forms.ToolStripStatusLabel()
-      Me.tsStatusGrid = New System.Windows.Forms.ToolStripStatusLabel()
-      Me.tsStatusCurPosType = New System.Windows.Forms.ToolStripStatusLabel()
-      Me.tsStatusCursorPos = New System.Windows.Forms.ToolStripStatusLabel()
      Me.TabControl1 = New System.Windows.Forms.TabControl()
      Me.TabHome = New System.Windows.Forms.TabPage()
+      Me.btnInsert = New System.Windows.Forms.Button()
      Me.btnSaveAs = New System.Windows.Forms.Button()
      Me.PictureBox1 = New System.Windows.Forms.PictureBox()
      Me.btnNew = New System.Windows.Forms.Button()
@@ -102,6 +95,7 @@ Partial Class Form1
      Me.InputCombo = New System.Windows.Forms.ComboBox()
      Me.TabControl2 = New System.Windows.Forms.TabControl()
      Me.TabDraw = New System.Windows.Forms.TabPage()
+      Me.btnText = New System.Windows.Forms.Button()
      Me.btnRectangle2P = New System.Windows.Forms.Button()
      Me.btnCircleCD = New System.Windows.Forms.Button()
      Me.btnLinePDL = New System.Windows.Forms.Button()
@@ -117,6 +111,7 @@ Partial Class Form1
      Me.btnExtrude = New System.Windows.Forms.Button()
      Me.btnPlane = New System.Windows.Forms.Button()
      Me.TabEdit = New System.Windows.Forms.TabPage()
+      Me.btnInvertSurf = New System.Windows.Forms.Button()
      Me.btnChangeLayer = New System.Windows.Forms.Button()
      Me.btnSetCurveTh = New System.Windows.Forms.Button()
      Me.btnExtendCurve = New System.Windows.Forms.Button()
@@ -136,6 +131,15 @@ Partial Class Form1
      Me.XbtnRotM90 = New System.Windows.Forms.Button()
      Me.XbtnRotP90 = New System.Windows.Forms.Button()
      Me.XbtnMirror = New System.Windows.Forms.Button()
+      Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
+      Me.tsStatusOnL = New System.Windows.Forms.ToolStripStatusLabel()
+      Me.tsStatusOutput = New System.Windows.Forms.ToolStripStatusLabel()
+      Me.tsStatusSnapPointType = New System.Windows.Forms.ToolStripStatusLabel()
+      Me.tsStatusGrid = New System.Windows.Forms.ToolStripStatusLabel()
+      Me.tsStatusCurPosType = New System.Windows.Forms.ToolStripStatusLabel()
+      Me.tsStatusCursorPos = New System.Windows.Forms.ToolStripStatusLabel()
+      Me.tsStatusUnits = New System.Windows.Forms.ToolStripStatusLabel()
+      Me.tsStatusOnR = New System.Windows.Forms.ToolStripStatusLabel()
      Me.ContextMenuTreeView1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
      Me.cmdSelectPartLayObj = New System.Windows.Forms.ToolStripMenuItem()
      Me.cmdDeselectPartLayObj = New System.Windows.Forms.ToolStripMenuItem()
@@ -153,7 +157,6 @@ Partial Class Form1
      Me.ColorDialog1 = New System.Windows.Forms.ColorDialog()
      Me.FormTimer = New System.Windows.Forms.Timer(Me.components)
      Me.TableLayoutPanel1.SuspendLayout()
-      Me.StatusStrip1.SuspendLayout()
      Me.TabControl1.SuspendLayout()
      Me.TabHome.SuspendLayout()
      CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -172,6 +175,7 @@ Partial Class Form1
      Me.TabEdit.SuspendLayout()
      Me.TabTransform.SuspendLayout()
      Me.TabTest.SuspendLayout()
+      Me.StatusStrip1.SuspendLayout()
      Me.ContextMenuTreeView1.SuspendLayout()
      Me.SuspendLayout()
      '
@@ -180,22 +184,22 @@ Partial Class Form1
      Me.TableLayoutPanel1.ColumnCount = 3
      Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 89.0!))
      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())
+      Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 220.0!))
      Me.TableLayoutPanel1.Controls.Add(Me.Scene1, 1, 1)
-      Me.TableLayoutPanel1.Controls.Add(Me.StatusStrip1, 0, 2)
      Me.TableLayoutPanel1.Controls.Add(Me.TabControl1, 0, 0)
      Me.TableLayoutPanel1.Controls.Add(Me.TableLayoutPanel3, 2, 1)
      Me.TableLayoutPanel1.Controls.Add(Me.TabControl2, 0, 1)
+      Me.TableLayoutPanel1.Controls.Add(Me.StatusStrip1, 0, 3)
      Me.TableLayoutPanel1.Dock = System.Windows.Forms.DockStyle.Fill
      Me.TableLayoutPanel1.Location = New System.Drawing.Point(0, 0)
      Me.TableLayoutPanel1.Margin = New System.Windows.Forms.Padding(2)
      Me.TableLayoutPanel1.Name = "TableLayoutPanel1"
      Me.TableLayoutPanel1.RowCount = 4
-      Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 80.0!))
+      Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 82.0!))
      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())
-      Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 20.0!))
-      Me.TableLayoutPanel1.Size = New System.Drawing.Size(1096, 561)
+      Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 22.0!))
+      Me.TableLayoutPanel1.Size = New System.Drawing.Size(1096, 601)
      Me.TableLayoutPanel1.TabIndex = 0
      '
      'Scene1
@@ -203,97 +207,12 @@ Partial Class Form1
      Me.Scene1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
      Me.Scene1.Cursor = System.Windows.Forms.Cursors.Default
      Me.Scene1.Dock = System.Windows.Forms.DockStyle.Fill
-      Me.Scene1.Location = New System.Drawing.Point(92, 83)
+      Me.Scene1.Location = New System.Drawing.Point(89, 82)
+      Me.Scene1.Margin = New System.Windows.Forms.Padding(0)
      Me.Scene1.Name = "Scene1"
-      Me.Scene1.Size = New System.Drawing.Size(795, 433)
+      Me.Scene1.Size = New System.Drawing.Size(787, 497)
      Me.Scene1.TabIndex = 1
      '
-      'StatusStrip1
-      '
-      Me.StatusStrip1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
-            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-      Me.TableLayoutPanel1.SetColumnSpan(Me.StatusStrip1, 3)
-      Me.StatusStrip1.Dock = System.Windows.Forms.DockStyle.None
-      Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsStatusOnL, Me.tsStatusOutput, Me.tsStatusOnR, Me.tsStatusSnapPointType, Me.tsStatusGrid, Me.tsStatusCurPosType, Me.tsStatusCursorPos})
-      Me.StatusStrip1.Location = New System.Drawing.Point(0, 519)
-      Me.StatusStrip1.MaximumSize = New System.Drawing.Size(0, 22)
-      Me.StatusStrip1.MinimumSize = New System.Drawing.Size(0, 22)
-      Me.StatusStrip1.Name = "StatusStrip1"
-      Me.StatusStrip1.Size = New System.Drawing.Size(1096, 22)
-      Me.StatusStrip1.TabIndex = 6
-      Me.StatusStrip1.Text = "StatusStrip1"
-      '
-      'tsStatusOnL
-      '
-      Me.tsStatusOnL.AutoSize = False
-      Me.tsStatusOnL.Name = "tsStatusOnL"
-      Me.tsStatusOnL.Size = New System.Drawing.Size(205, 17)
-      '
-      'tsStatusOutput
-      '
-      Me.tsStatusOutput.BorderSides = CType((((System.Windows.Forms.ToolStripStatusLabelBorderSides.Left Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Top) _
-            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Right) _
-            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides)
-      Me.tsStatusOutput.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text
-      Me.tsStatusOutput.MergeIndex = 1
-      Me.tsStatusOutput.Name = "tsStatusOutput"
-      Me.tsStatusOutput.Size = New System.Drawing.Size(293, 17)
-      Me.tsStatusOutput.Spring = True
-      Me.tsStatusOutput.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
-      '
-      'tsStatusOnR
-      '
-      Me.tsStatusOnR.AutoSize = False
-      Me.tsStatusOnR.Name = "tsStatusOnR"
-      Me.tsStatusOnR.Size = New System.Drawing.Size(190, 17)
-      Me.tsStatusOnR.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
-      '
-      'tsStatusSnapPointType
-      '
-      Me.tsStatusSnapPointType.AutoSize = False
-      Me.tsStatusSnapPointType.BorderSides = CType((((System.Windows.Forms.ToolStripStatusLabelBorderSides.Left Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Top) _
-            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Right) _
-            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides)
-      Me.tsStatusSnapPointType.Name = "tsStatusSnapPointType"
-      Me.tsStatusSnapPointType.Size = New System.Drawing.Size(80, 17)
-      Me.tsStatusSnapPointType.Text = "Grid Point"
-      '
-      'tsStatusGrid
-      '
-      Me.tsStatusGrid.AutoSize = False
-      Me.tsStatusGrid.BackColor = System.Drawing.SystemColors.Control
-      Me.tsStatusGrid.BorderSides = CType((((System.Windows.Forms.ToolStripStatusLabelBorderSides.Left Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Top) _
-            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Right) _
-            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides)
-      Me.tsStatusGrid.BorderStyle = System.Windows.Forms.Border3DStyle.Raised
-      Me.tsStatusGrid.Name = "tsStatusGrid"
-      Me.tsStatusGrid.Size = New System.Drawing.Size(64, 17)
-      Me.tsStatusGrid.Text = " GRID ON "
-      '
-      'tsStatusCurPosType
-      '
-      Me.tsStatusCurPosType.AutoSize = False
-      Me.tsStatusCurPosType.BackColor = System.Drawing.SystemColors.Control
-      Me.tsStatusCurPosType.BorderSides = CType((((System.Windows.Forms.ToolStripStatusLabelBorderSides.Left Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Top) _
-            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Right) _
-            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides)
-      Me.tsStatusCurPosType.BorderStyle = System.Windows.Forms.Border3DStyle.Raised
-      Me.tsStatusCurPosType.Name = "tsStatusCurPosType"
-      Me.tsStatusCurPosType.Size = New System.Drawing.Size(55, 17)
-      Me.tsStatusCurPosType.Text = "CPLANE"
-      '
-      'tsStatusCursorPos
-      '
-      Me.tsStatusCursorPos.AutoSize = False
-      Me.tsStatusCursorPos.BorderSides = CType((((System.Windows.Forms.ToolStripStatusLabelBorderSides.Left Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Top) _
-            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Right) _
-            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides)
-      Me.tsStatusCursorPos.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text
-      Me.tsStatusCursorPos.MergeIndex = 2
-      Me.tsStatusCursorPos.Name = "tsStatusCursorPos"
-      Me.tsStatusCursorPos.Size = New System.Drawing.Size(194, 17)
-      Me.tsStatusCursorPos.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
-      '
      'TabControl1
      '
      Me.TableLayoutPanel1.SetColumnSpan(Me.TabControl1, 3)
@@ -303,15 +222,17 @@ Partial Class Form1
      Me.TabControl1.Dock = System.Windows.Forms.DockStyle.Fill
      Me.TabControl1.HotTrack = True
      Me.TabControl1.ItemSize = New System.Drawing.Size(60, 18)
-      Me.TabControl1.Location = New System.Drawing.Point(3, 3)
+      Me.TabControl1.Location = New System.Drawing.Point(0, 0)
+      Me.TabControl1.Margin = New System.Windows.Forms.Padding(0)
      Me.TabControl1.Name = "TabControl1"
      Me.TabControl1.SelectedIndex = 0
-      Me.TabControl1.Size = New System.Drawing.Size(1090, 74)
+      Me.TabControl1.Size = New System.Drawing.Size(1096, 82)
      Me.TabControl1.TabIndex = 8
      '
      'TabHome
      '
      Me.TabHome.BackColor = System.Drawing.SystemColors.Control
+      Me.TabHome.Controls.Add(Me.btnInsert)
      Me.TabHome.Controls.Add(Me.btnSaveAs)
      Me.TabHome.Controls.Add(Me.PictureBox1)
      Me.TabHome.Controls.Add(Me.btnNew)
@@ -321,12 +242,29 @@ Partial Class Form1
      Me.TabHome.Controls.Add(Me.btnExport)
      Me.TabHome.Controls.Add(Me.btnExec)
      Me.TabHome.Location = New System.Drawing.Point(4, 22)
+      Me.TabHome.Margin = New System.Windows.Forms.Padding(0)
      Me.TabHome.Name = "TabHome"
-      Me.TabHome.Padding = New System.Windows.Forms.Padding(3)
-      Me.TabHome.Size = New System.Drawing.Size(1082, 48)
+      Me.TabHome.Size = New System.Drawing.Size(1088, 56)
      Me.TabHome.TabIndex = 0
      Me.TabHome.Text = "Home"
      '
+      'btnInsert
+      '
+      Me.btnInsert.FlatAppearance.BorderColor = System.Drawing.SystemColors.Control
+      Me.btnInsert.FlatAppearance.BorderSize = 0
+      Me.btnInsert.FlatAppearance.MouseDownBackColor = System.Drawing.SystemColors.Control
+      Me.btnInsert.FlatAppearance.MouseOverBackColor = System.Drawing.SystemColors.GradientInactiveCaption
+      Me.btnInsert.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+      Me.btnInsert.Image = CType(resources.GetObject("btnInsert.Image"), System.Drawing.Image)
+      Me.btnInsert.ImageAlign = System.Drawing.ContentAlignment.TopCenter
+      Me.btnInsert.Location = New System.Drawing.Point(112, 0)
+      Me.btnInsert.Name = "btnInsert"
+      Me.btnInsert.Size = New System.Drawing.Size(56, 48)
+      Me.btnInsert.TabIndex = 28
+      Me.btnInsert.Text = "Insert"
+      Me.btnInsert.TextAlign = System.Drawing.ContentAlignment.BottomCenter
+      Me.btnInsert.UseVisualStyleBackColor = True
+      '
      'btnSaveAs
      '
      Me.btnSaveAs.FlatAppearance.BorderColor = System.Drawing.SystemColors.Control
@@ -336,7 +274,7 @@ Partial Class Form1
      Me.btnSaveAs.FlatStyle = System.Windows.Forms.FlatStyle.Flat
      Me.btnSaveAs.Image = CType(resources.GetObject("btnSaveAs.Image"), System.Drawing.Image)
      Me.btnSaveAs.ImageAlign = System.Drawing.ContentAlignment.TopCenter
-      Me.btnSaveAs.Location = New System.Drawing.Point(168, 0)
+      Me.btnSaveAs.Location = New System.Drawing.Point(224, 0)
      Me.btnSaveAs.Margin = New System.Windows.Forms.Padding(2)
      Me.btnSaveAs.Name = "btnSaveAs"
      Me.btnSaveAs.Size = New System.Drawing.Size(56, 48)
@@ -348,7 +286,7 @@ Partial Class Form1
      'PictureBox1
      '
      Me.PictureBox1.BackColor = System.Drawing.SystemColors.ActiveBorder
-      Me.PictureBox1.Location = New System.Drawing.Point(337, 4)
+      Me.PictureBox1.Location = New System.Drawing.Point(393, 4)
      Me.PictureBox1.Name = "PictureBox1"
      Me.PictureBox1.Size = New System.Drawing.Size(2, 40)
      Me.PictureBox1.TabIndex = 26
@@ -400,7 +338,7 @@ Partial Class Form1
      Me.btnSave.FlatStyle = System.Windows.Forms.FlatStyle.Flat
      Me.btnSave.Image = CType(resources.GetObject("btnSave.Image"), System.Drawing.Image)
      Me.btnSave.ImageAlign = System.Drawing.ContentAlignment.TopCenter
-      Me.btnSave.Location = New System.Drawing.Point(112, 0)
+      Me.btnSave.Location = New System.Drawing.Point(168, 0)
      Me.btnSave.Margin = New System.Windows.Forms.Padding(2)
      Me.btnSave.Name = "btnSave"
      Me.btnSave.Size = New System.Drawing.Size(56, 48)
@@ -418,7 +356,7 @@ Partial Class Form1
      Me.btnImport.FlatStyle = System.Windows.Forms.FlatStyle.Flat
      Me.btnImport.Image = CType(resources.GetObject("btnImport.Image"), System.Drawing.Image)
      Me.btnImport.ImageAlign = System.Drawing.ContentAlignment.TopCenter
-      Me.btnImport.Location = New System.Drawing.Point(224, 0)
+      Me.btnImport.Location = New System.Drawing.Point(280, 0)
      Me.btnImport.Name = "btnImport"
      Me.btnImport.Size = New System.Drawing.Size(56, 48)
      Me.btnImport.TabIndex = 6
@@ -435,7 +373,7 @@ Partial Class Form1
      Me.btnExport.FlatStyle = System.Windows.Forms.FlatStyle.Flat
      Me.btnExport.Image = CType(resources.GetObject("btnExport.Image"), System.Drawing.Image)
      Me.btnExport.ImageAlign = System.Drawing.ContentAlignment.TopCenter
-      Me.btnExport.Location = New System.Drawing.Point(280, 0)
+      Me.btnExport.Location = New System.Drawing.Point(336, 0)
      Me.btnExport.Name = "btnExport"
      Me.btnExport.Size = New System.Drawing.Size(56, 48)
      Me.btnExport.TabIndex = 4
@@ -452,7 +390,7 @@ Partial Class Form1
      Me.btnExec.FlatStyle = System.Windows.Forms.FlatStyle.Flat
      Me.btnExec.Image = CType(resources.GetObject("btnExec.Image"), System.Drawing.Image)
      Me.btnExec.ImageAlign = System.Drawing.ContentAlignment.TopCenter
-      Me.btnExec.Location = New System.Drawing.Point(340, 0)
+      Me.btnExec.Location = New System.Drawing.Point(396, 0)
      Me.btnExec.Name = "btnExec"
      Me.btnExec.Size = New System.Drawing.Size(56, 48)
      Me.btnExec.TabIndex = 2
@@ -488,7 +426,7 @@ Partial Class Form1
      Me.TabView.Location = New System.Drawing.Point(4, 22)
      Me.TabView.Name = "TabView"
      Me.TabView.Padding = New System.Windows.Forms.Padding(3)
-      Me.TabView.Size = New System.Drawing.Size(1082, 48)
+      Me.TabView.Size = New System.Drawing.Size(1088, 56)
      Me.TabView.TabIndex = 3
      Me.TabView.Text = "View"
      '
@@ -888,7 +826,7 @@ Partial Class Form1
      Me.TabCPlane.ForeColor = System.Drawing.SystemColors.ControlText
      Me.TabCPlane.Location = New System.Drawing.Point(4, 22)
      Me.TabCPlane.Name = "TabCPlane"
-      Me.TabCPlane.Size = New System.Drawing.Size(1082, 48)
+      Me.TabCPlane.Size = New System.Drawing.Size(1088, 56)
      Me.TabCPlane.TabIndex = 4
      Me.TabCPlane.Text = "CPlane"
      '
@@ -1115,39 +1053,43 @@ Partial Class Form1
      Me.TableLayoutPanel3.Controls.Add(Me.Panel1, 0, 0)
      Me.TableLayoutPanel3.Controls.Add(Me.InputBox, 0, 3)
      Me.TableLayoutPanel3.Dock = System.Windows.Forms.DockStyle.Fill
-      Me.TableLayoutPanel3.Location = New System.Drawing.Point(893, 83)
+      Me.TableLayoutPanel3.Location = New System.Drawing.Point(876, 82)
+      Me.TableLayoutPanel3.Margin = New System.Windows.Forms.Padding(0)
      Me.TableLayoutPanel3.Name = "TableLayoutPanel3"
      Me.TableLayoutPanel3.RowCount = 5
      Me.TableLayoutPanel3.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 50.0!))
      Me.TableLayoutPanel3.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 70.0!))
      Me.TableLayoutPanel3.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 30.0!))
      Me.TableLayoutPanel3.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 160.0!))
-      Me.TableLayoutPanel3.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 50.0!))
-      Me.TableLayoutPanel3.Size = New System.Drawing.Size(200, 433)
+      Me.TableLayoutPanel3.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 70.0!))
+      Me.TableLayoutPanel3.Size = New System.Drawing.Size(220, 497)
      Me.TableLayoutPanel3.TabIndex = 9
      '
      'tBoxInfo
      '
      Me.tBoxInfo.BackColor = System.Drawing.SystemColors.ControlLightLight
      Me.tBoxInfo.Dock = System.Windows.Forms.DockStyle.Fill
-      Me.tBoxInfo.Location = New System.Drawing.Point(3, 172)
-      Me.tBoxInfo.Margin = New System.Windows.Forms.Padding(3, 1, 3, 3)
+      Me.tBoxInfo.Location = New System.Drawing.Point(1, 201)
+      Me.tBoxInfo.Margin = New System.Windows.Forms.Padding(1, 0, 1, 0)
      Me.tBoxInfo.Multiline = True
      Me.tBoxInfo.Name = "tBoxInfo"
      Me.tBoxInfo.ReadOnly = True
      Me.tBoxInfo.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
-      Me.tBoxInfo.Size = New System.Drawing.Size(194, 47)
+      Me.tBoxInfo.Size = New System.Drawing.Size(218, 65)
      Me.tBoxInfo.TabIndex = 24
      '
      'tboxCmd
      '
      Me.tboxCmd.Dock = System.Windows.Forms.DockStyle.Fill
-      Me.tboxCmd.Location = New System.Drawing.Point(3, 385)
+      Me.tboxCmd.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+      Me.tboxCmd.Location = New System.Drawing.Point(1, 426)
+      Me.tboxCmd.Margin = New System.Windows.Forms.Padding(1, 0, 1, 0)
      Me.tboxCmd.Multiline = True
      Me.tboxCmd.Name = "tboxCmd"
      Me.tboxCmd.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
-      Me.tboxCmd.Size = New System.Drawing.Size(194, 45)
+      Me.tboxCmd.Size = New System.Drawing.Size(218, 71)
      Me.tboxCmd.TabIndex = 23
+      Me.tboxCmd.WordWrap = False
      '
      'TreeView1
      '
@@ -1157,11 +1099,11 @@ Partial Class Form1
      Me.TreeView1.HideSelection = False
      Me.TreeView1.ImageIndex = 0
      Me.TreeView1.ImageList = Me.ImageList1
-      Me.TreeView1.Location = New System.Drawing.Point(3, 53)
-      Me.TreeView1.Margin = New System.Windows.Forms.Padding(3, 3, 3, 0)
+      Me.TreeView1.Location = New System.Drawing.Point(1, 50)
+      Me.TreeView1.Margin = New System.Windows.Forms.Padding(1, 0, 1, 0)
      Me.TreeView1.Name = "TreeView1"
      Me.TreeView1.SelectedImageIndex = 0
-      Me.TreeView1.Size = New System.Drawing.Size(194, 118)
+      Me.TreeView1.Size = New System.Drawing.Size(218, 151)
      Me.TreeView1.StateImageList = Me.ImageList2
      Me.TreeView1.TabIndex = 0
      '
@@ -1202,30 +1144,30 @@ Partial Class Form1
      Me.Panel1.Location = New System.Drawing.Point(0, 0)
      Me.Panel1.Margin = New System.Windows.Forms.Padding(0)
      Me.Panel1.Name = "Panel1"
-      Me.Panel1.Size = New System.Drawing.Size(200, 50)
+      Me.Panel1.Size = New System.Drawing.Size(220, 50)
      Me.Panel1.TabIndex = 25
      '
      'txtColor
      '
      Me.txtColor.BackColor = System.Drawing.SystemColors.ControlLightLight
-      Me.txtColor.Location = New System.Drawing.Point(171, 0)
+      Me.txtColor.Location = New System.Drawing.Point(175, 0)
      Me.txtColor.Name = "txtColor"
      Me.txtColor.ReadOnly = True
-      Me.txtColor.Size = New System.Drawing.Size(26, 20)
+      Me.txtColor.Size = New System.Drawing.Size(41, 20)
      Me.txtColor.TabIndex = 1
      '
      'btnColor
      '
-      Me.btnColor.Location = New System.Drawing.Point(146, 23)
+      Me.btnColor.Location = New System.Drawing.Point(147, 23)
      Me.btnColor.Name = "btnColor"
-      Me.btnColor.Size = New System.Drawing.Size(51, 24)
+      Me.btnColor.Size = New System.Drawing.Size(70, 24)
      Me.btnColor.TabIndex = 28
      Me.btnColor.Text = "Color"
      Me.btnColor.UseVisualStyleBackColor = True
      '
      'btnNewLayer
      '
-      Me.btnNewLayer.Location = New System.Drawing.Point(73, 23)
+      Me.btnNewLayer.Location = New System.Drawing.Point(74, 23)
      Me.btnNewLayer.Margin = New System.Windows.Forms.Padding(2)
      Me.btnNewLayer.Name = "btnNewLayer"
      Me.btnNewLayer.Size = New System.Drawing.Size(70, 24)
@@ -1236,7 +1178,7 @@ Partial Class Form1
      'txtPartLay
      '
      Me.txtPartLay.BackColor = System.Drawing.SystemColors.ControlLightLight
-      Me.txtPartLay.Location = New System.Drawing.Point(0, 0)
+      Me.txtPartLay.Location = New System.Drawing.Point(3, 0)
      Me.txtPartLay.Margin = New System.Windows.Forms.Padding(2, 0, 2, 2)
      Me.txtPartLay.Name = "txtPartLay"
      Me.txtPartLay.ReadOnly = True
@@ -1245,7 +1187,7 @@ Partial Class Form1
      '
      'btnNewPart
      '
-      Me.btnNewPart.Location = New System.Drawing.Point(0, 23)
+      Me.btnNewPart.Location = New System.Drawing.Point(2, 23)
      Me.btnNewPart.Margin = New System.Windows.Forms.Padding(2)
      Me.btnNewPart.Name = "btnNewPart"
      Me.btnNewPart.Size = New System.Drawing.Size(70, 24)
@@ -1264,15 +1206,16 @@ Partial Class Form1
      Me.InputBox.Controls.Add(Me.InputCombo)
      Me.InputBox.Dock = System.Windows.Forms.DockStyle.Fill
      Me.InputBox.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-      Me.InputBox.Location = New System.Drawing.Point(3, 225)
+      Me.InputBox.Location = New System.Drawing.Point(1, 269)
+      Me.InputBox.Margin = New System.Windows.Forms.Padding(1, 3, 1, 3)
      Me.InputBox.Name = "InputBox"
-      Me.InputBox.Size = New System.Drawing.Size(194, 154)
+      Me.InputBox.Size = New System.Drawing.Size(218, 154)
      Me.InputBox.TabIndex = 26
      Me.InputBox.TabStop = False
      '
      'btnDone
      '
-      Me.btnDone.Location = New System.Drawing.Point(112, 125)
+      Me.btnDone.Location = New System.Drawing.Point(123, 125)
      Me.btnDone.Name = "btnDone"
      Me.btnDone.Size = New System.Drawing.Size(75, 23)
      Me.btnDone.TabIndex = 4
@@ -1281,7 +1224,7 @@ Partial Class Form1
      '
      'btnShow
      '
-      Me.btnShow.Location = New System.Drawing.Point(8, 125)
+      Me.btnShow.Location = New System.Drawing.Point(19, 125)
      Me.btnShow.Name = "btnShow"
      Me.btnShow.Size = New System.Drawing.Size(75, 23)
      Me.btnShow.TabIndex = 3
@@ -1291,9 +1234,9 @@ Partial Class Form1
      'InputCheck
      '
      Me.InputCheck.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-      Me.InputCheck.Location = New System.Drawing.Point(17, 69)
+      Me.InputCheck.Location = New System.Drawing.Point(9, 69)
      Me.InputCheck.Name = "InputCheck"
-      Me.InputCheck.Size = New System.Drawing.Size(170, 23)
+      Me.InputCheck.Size = New System.Drawing.Size(205, 23)
      Me.InputCheck.TabIndex = 2
      Me.InputCheck.UseVisualStyleBackColor = True
      Me.InputCheck.Visible = False
@@ -1301,10 +1244,10 @@ Partial Class Form1
      'InputText
      '
      Me.InputText.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-      Me.InputText.Location = New System.Drawing.Point(3, 42)
+      Me.InputText.Location = New System.Drawing.Point(5, 42)
      Me.InputText.MinimumSize = New System.Drawing.Size(188, 26)
      Me.InputText.Name = "InputText"
-      Me.InputText.Size = New System.Drawing.Size(188, 23)
+      Me.InputText.Size = New System.Drawing.Size(209, 23)
      Me.InputText.TabIndex = 1
      Me.InputText.Visible = False
      '
@@ -1324,7 +1267,7 @@ Partial Class Form1
      Me.InputCombo.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
      Me.InputCombo.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
      Me.InputCombo.FormattingEnabled = True
-      Me.InputCombo.Location = New System.Drawing.Point(16, 95)
+      Me.InputCombo.Location = New System.Drawing.Point(26, 95)
      Me.InputCombo.Margin = New System.Windows.Forms.Padding(0)
      Me.InputCombo.MaxDropDownItems = 4
      Me.InputCombo.Name = "InputCombo"
@@ -1341,16 +1284,18 @@ Partial Class Form1
      Me.TabControl2.Controls.Add(Me.TabTest)
      Me.TabControl2.Dock = System.Windows.Forms.DockStyle.Fill
      Me.TabControl2.HotTrack = True
-      Me.TabControl2.Location = New System.Drawing.Point(3, 83)
+      Me.TabControl2.Location = New System.Drawing.Point(0, 82)
+      Me.TabControl2.Margin = New System.Windows.Forms.Padding(0)
      Me.TabControl2.Multiline = True
      Me.TabControl2.Name = "TabControl2"
      Me.TabControl2.SelectedIndex = 0
-      Me.TabControl2.Size = New System.Drawing.Size(83, 433)
+      Me.TabControl2.Size = New System.Drawing.Size(89, 497)
      Me.TabControl2.TabIndex = 10
      '
      'TabDraw
      '
      Me.TabDraw.BackColor = System.Drawing.SystemColors.Control
+      Me.TabDraw.Controls.Add(Me.btnText)
      Me.TabDraw.Controls.Add(Me.btnRectangle2P)
      Me.TabDraw.Controls.Add(Me.btnCircleCD)
      Me.TabDraw.Controls.Add(Me.btnLinePDL)
@@ -1363,10 +1308,27 @@ Partial Class Form1
      Me.TabDraw.Location = New System.Drawing.Point(23, 4)
      Me.TabDraw.Name = "TabDraw"
      Me.TabDraw.Padding = New System.Windows.Forms.Padding(3)
-      Me.TabDraw.Size = New System.Drawing.Size(56, 425)
+      Me.TabDraw.Size = New System.Drawing.Size(62, 489)
      Me.TabDraw.TabIndex = 0
      Me.TabDraw.Text = "Draw"
      '
+      'btnText
+      '
+      Me.btnText.FlatAppearance.BorderColor = System.Drawing.SystemColors.Control
+      Me.btnText.FlatAppearance.BorderSize = 0
+      Me.btnText.FlatAppearance.MouseDownBackColor = System.Drawing.SystemColors.Control
+      Me.btnText.FlatAppearance.MouseOverBackColor = System.Drawing.SystemColors.GradientInactiveCaption
+      Me.btnText.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+      Me.btnText.Image = CType(resources.GetObject("btnText.Image"), System.Drawing.Image)
+      Me.btnText.ImageAlign = System.Drawing.ContentAlignment.TopCenter
+      Me.btnText.Location = New System.Drawing.Point(0, 432)
+      Me.btnText.Name = "btnText"
+      Me.btnText.Size = New System.Drawing.Size(56, 48)
+      Me.btnText.TabIndex = 39
+      Me.btnText.Text = "Text"
+      Me.btnText.TextAlign = System.Drawing.ContentAlignment.BottomCenter
+      Me.btnText.UseVisualStyleBackColor = False
+      '
      'btnRectangle2P
      '
      Me.btnRectangle2P.FlatAppearance.BorderColor = System.Drawing.SystemColors.Control
@@ -1529,7 +1491,7 @@ Partial Class Form1
      Me.TabConstruct.Controls.Add(Me.btnPlane)
      Me.TabConstruct.Location = New System.Drawing.Point(23, 4)
      Me.TabConstruct.Name = "TabConstruct"
-      Me.TabConstruct.Size = New System.Drawing.Size(56, 425)
+      Me.TabConstruct.Size = New System.Drawing.Size(62, 489)
      Me.TabConstruct.TabIndex = 4
      Me.TabConstruct.Text = "Construct"
      '
@@ -1604,6 +1566,7 @@ Partial Class Form1
      'TabEdit
      '
      Me.TabEdit.BackColor = System.Drawing.SystemColors.Control
+      Me.TabEdit.Controls.Add(Me.btnInvertSurf)
      Me.TabEdit.Controls.Add(Me.btnChangeLayer)
      Me.TabEdit.Controls.Add(Me.btnSetCurveTh)
      Me.TabEdit.Controls.Add(Me.btnExtendCurve)
@@ -1615,10 +1578,28 @@ Partial Class Form1
      Me.TabEdit.Controls.Add(Me.btnDelete)
      Me.TabEdit.Location = New System.Drawing.Point(23, 4)
      Me.TabEdit.Name = "TabEdit"
-      Me.TabEdit.Size = New System.Drawing.Size(56, 425)
+      Me.TabEdit.Size = New System.Drawing.Size(62, 489)
      Me.TabEdit.TabIndex = 3
      Me.TabEdit.Text = "Edit"
      '
+      'btnInvertSurf
+      '
+      Me.btnInvertSurf.FlatAppearance.BorderColor = System.Drawing.SystemColors.Control
+      Me.btnInvertSurf.FlatAppearance.BorderSize = 0
+      Me.btnInvertSurf.FlatAppearance.MouseDownBackColor = System.Drawing.SystemColors.Control
+      Me.btnInvertSurf.FlatAppearance.MouseOverBackColor = System.Drawing.SystemColors.GradientInactiveCaption
+      Me.btnInvertSurf.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+      Me.btnInvertSurf.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+      Me.btnInvertSurf.Image = CType(resources.GetObject("btnInvertSurf.Image"), System.Drawing.Image)
+      Me.btnInvertSurf.ImageAlign = System.Drawing.ContentAlignment.TopCenter
+      Me.btnInvertSurf.Location = New System.Drawing.Point(0, 432)
+      Me.btnInvertSurf.Name = "btnInvertSurf"
+      Me.btnInvertSurf.Size = New System.Drawing.Size(56, 48)
+      Me.btnInvertSurf.TabIndex = 41
+      Me.btnInvertSurf.Text = "Invert S"
+      Me.btnInvertSurf.TextAlign = System.Drawing.ContentAlignment.BottomCenter
+      Me.btnInvertSurf.UseVisualStyleBackColor = False
+      '
      'btnChangeLayer
      '
      Me.btnChangeLayer.FlatAppearance.BorderColor = System.Drawing.SystemColors.Control
@@ -1785,7 +1766,7 @@ Partial Class Form1
      Me.TabTransform.Controls.Add(Me.btnMove)
      Me.TabTransform.Location = New System.Drawing.Point(23, 4)
      Me.TabTransform.Name = "TabTransform"
-      Me.TabTransform.Size = New System.Drawing.Size(56, 425)
+      Me.TabTransform.Size = New System.Drawing.Size(62, 489)
      Me.TabTransform.TabIndex = 2
      Me.TabTransform.Text = "Transform"
      '
@@ -1883,7 +1864,7 @@ Partial Class Form1
      Me.TabTest.Location = New System.Drawing.Point(23, 4)
      Me.TabTest.Name = "TabTest"
      Me.TabTest.Padding = New System.Windows.Forms.Padding(3)
-      Me.TabTest.Size = New System.Drawing.Size(56, 425)
+      Me.TabTest.Size = New System.Drawing.Size(62, 489)
      Me.TabTest.TabIndex = 1
      Me.TabTest.Text = "Test"
      '
@@ -1929,6 +1910,112 @@ Partial Class Form1
      Me.XbtnMirror.Text = "Mirror"
      Me.XbtnMirror.UseVisualStyleBackColor = False
      '
+      'StatusStrip1
+      '
+      Me.StatusStrip1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+      Me.TableLayoutPanel1.SetColumnSpan(Me.StatusStrip1, 3)
+      Me.StatusStrip1.Dock = System.Windows.Forms.DockStyle.None
+      Me.StatusStrip1.GripMargin = New System.Windows.Forms.Padding(0)
+      Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsStatusOnL, Me.tsStatusOutput, Me.tsStatusSnapPointType, Me.tsStatusGrid, Me.tsStatusCurPosType, Me.tsStatusCursorPos, Me.tsStatusUnits, Me.tsStatusOnR})
+      Me.StatusStrip1.Location = New System.Drawing.Point(0, 579)
+      Me.StatusStrip1.MaximumSize = New System.Drawing.Size(0, 22)
+      Me.StatusStrip1.MinimumSize = New System.Drawing.Size(0, 22)
+      Me.StatusStrip1.Name = "StatusStrip1"
+      Me.StatusStrip1.Size = New System.Drawing.Size(1096, 22)
+      Me.StatusStrip1.TabIndex = 6
+      Me.StatusStrip1.Text = "StatusStrip1"
+      '
+      'tsStatusOnL
+      '
+      Me.tsStatusOnL.AutoSize = False
+      Me.tsStatusOnL.Name = "tsStatusOnL"
+      Me.tsStatusOnL.Size = New System.Drawing.Size(88, 17)
+      '
+      'tsStatusOutput
+      '
+      Me.tsStatusOutput.BorderSides = CType((((System.Windows.Forms.ToolStripStatusLabelBorderSides.Left Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Top) _
+            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Right) _
+            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides)
+      Me.tsStatusOutput.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text
+      Me.tsStatusOutput.Margin = New System.Windows.Forms.Padding(1, 3, 0, 2)
+      Me.tsStatusOutput.MergeIndex = 1
+      Me.tsStatusOutput.Name = "tsStatusOutput"
+      Me.tsStatusOutput.Size = New System.Drawing.Size(356, 17)
+      Me.tsStatusOutput.Spring = True
+      Me.tsStatusOutput.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+      '
+      'tsStatusSnapPointType
+      '
+      Me.tsStatusSnapPointType.AutoSize = False
+      Me.tsStatusSnapPointType.BorderSides = CType((((System.Windows.Forms.ToolStripStatusLabelBorderSides.Left Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Top) _
+            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Right) _
+            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides)
+      Me.tsStatusSnapPointType.Margin = New System.Windows.Forms.Padding(1, 3, 0, 2)
+      Me.tsStatusSnapPointType.Name = "tsStatusSnapPointType"
+      Me.tsStatusSnapPointType.Size = New System.Drawing.Size(80, 17)
+      Me.tsStatusSnapPointType.Text = "Grid Point"
+      '
+      'tsStatusGrid
+      '
+      Me.tsStatusGrid.AutoSize = False
+      Me.tsStatusGrid.BackColor = System.Drawing.SystemColors.Control
+      Me.tsStatusGrid.BorderSides = CType((((System.Windows.Forms.ToolStripStatusLabelBorderSides.Left Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Top) _
+            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Right) _
+            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides)
+      Me.tsStatusGrid.BorderStyle = System.Windows.Forms.Border3DStyle.Raised
+      Me.tsStatusGrid.Margin = New System.Windows.Forms.Padding(1, 3, 0, 2)
+      Me.tsStatusGrid.Name = "tsStatusGrid"
+      Me.tsStatusGrid.Size = New System.Drawing.Size(64, 17)
+      Me.tsStatusGrid.Text = " GRID ON "
+      '
+      'tsStatusCurPosType
+      '
+      Me.tsStatusCurPosType.AutoSize = False
+      Me.tsStatusCurPosType.BackColor = System.Drawing.SystemColors.Control
+      Me.tsStatusCurPosType.BorderSides = CType((((System.Windows.Forms.ToolStripStatusLabelBorderSides.Left Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Top) _
+            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Right) _
+            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides)
+      Me.tsStatusCurPosType.BorderStyle = System.Windows.Forms.Border3DStyle.Raised
+      Me.tsStatusCurPosType.Margin = New System.Windows.Forms.Padding(1, 3, 0, 2)
+      Me.tsStatusCurPosType.Name = "tsStatusCurPosType"
+      Me.tsStatusCurPosType.Size = New System.Drawing.Size(55, 17)
+      Me.tsStatusCurPosType.Text = "CPLANE"
+      '
+      'tsStatusCursorPos
+      '
+      Me.tsStatusCursorPos.AutoSize = False
+      Me.tsStatusCursorPos.BorderSides = CType((((System.Windows.Forms.ToolStripStatusLabelBorderSides.Left Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Top) _
+            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Right) _
+            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides)
+      Me.tsStatusCursorPos.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text
+      Me.tsStatusCursorPos.Margin = New System.Windows.Forms.Padding(1, 3, 0, 2)
+      Me.tsStatusCursorPos.MergeIndex = 2
+      Me.tsStatusCursorPos.Name = "tsStatusCursorPos"
+      Me.tsStatusCursorPos.Size = New System.Drawing.Size(194, 17)
+      Me.tsStatusCursorPos.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+      '
+      'tsStatusUnits
+      '
+      Me.tsStatusUnits.BorderSides = CType((((System.Windows.Forms.ToolStripStatusLabelBorderSides.Left Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Top) _
+            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Right) _
+            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides)
+      Me.tsStatusUnits.Margin = New System.Windows.Forms.Padding(1, 3, 0, 2)
+      Me.tsStatusUnits.Name = "tsStatusUnits"
+      Me.tsStatusUnits.Size = New System.Drawing.Size(33, 17)
+      Me.tsStatusUnits.Text = "mm"
+      '
+      'tsStatusOnR
+      '
+      Me.tsStatusOnR.AutoSize = False
+      Me.tsStatusOnR.BorderSides = CType((((System.Windows.Forms.ToolStripStatusLabelBorderSides.Left Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Top) _
+            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Right) _
+            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides)
+      Me.tsStatusOnR.Margin = New System.Windows.Forms.Padding(1, 3, 0, 2)
+      Me.tsStatusOnR.Name = "tsStatusOnR"
+      Me.tsStatusOnR.Size = New System.Drawing.Size(204, 17)
+      Me.tsStatusOnR.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+      '
      'ContextMenuTreeView1
      '
      Me.ContextMenuTreeView1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.cmdSelectPartLayObj, Me.cmdDeselectPartLayObj, Me.ToolStripSeparator1, Me.cmdSetName, Me.cmdSetInfo, Me.ToolStripSeparator2, Me.cmdRelocatePartLayObj, Me.cmdCopyPartLayObj, Me.cmdDeletePartLayObj})
@@ -2026,22 +2113,20 @@ Partial Class Form1
      Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
      Me.AutoSize = True
      Me.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None
-      Me.ClientSize = New System.Drawing.Size(1096, 561)
+      Me.ClientSize = New System.Drawing.Size(1096, 601)
      Me.Controls.Add(Me.TableLayoutPanel1)
      Me.Cursor = System.Windows.Forms.Cursors.Arrow
      Me.ForeColor = System.Drawing.SystemColors.ControlText
      Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
      Me.KeyPreview = True
      Me.Margin = New System.Windows.Forms.Padding(2)
-      Me.MinimumSize = New System.Drawing.Size(1112, 600)
+      Me.MinimumSize = New System.Drawing.Size(1112, 640)
      Me.Name = "Form1"
      Me.SizeGripStyle = System.Windows.Forms.SizeGripStyle.Hide
      Me.StartPosition = System.Windows.Forms.FormStartPosition.Manual
      Me.Text = "Egaltech Interface Prova 1"
      Me.TableLayoutPanel1.ResumeLayout(False)
      Me.TableLayoutPanel1.PerformLayout()
-      Me.StatusStrip1.ResumeLayout(False)
-      Me.StatusStrip1.PerformLayout()
      Me.TabControl1.ResumeLayout(False)
      Me.TabHome.ResumeLayout(False)
      CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
@@ -2063,6 +2148,8 @@ Partial Class Form1
      Me.TabEdit.ResumeLayout(False)
      Me.TabTransform.ResumeLayout(False)
      Me.TabTest.ResumeLayout(False)
+      Me.StatusStrip1.ResumeLayout(False)
+      Me.StatusStrip1.PerformLayout()
      Me.ContextMenuTreeView1.ResumeLayout(False)
      Me.ResumeLayout(False)

@@ -2071,16 +2158,11 @@ End Sub
    Friend WithEvents OpenFileDialog As System.Windows.Forms.OpenFileDialog
    Friend WithEvents SaveFileDialog As System.Windows.Forms.SaveFileDialog
    Friend WithEvents Scene1 As TestEIn.Scene
-    Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip
-    Friend WithEvents tsStatusCursorPos As System.Windows.Forms.ToolStripStatusLabel
    Friend WithEvents tboxCmd As System.Windows.Forms.TextBox
    Friend WithEvents TreeView1 As System.Windows.Forms.TreeView
    Friend WithEvents ImageList1 As System.Windows.Forms.ImageList
    Friend WithEvents tBoxInfo As System.Windows.Forms.TextBox
    Friend WithEvents btnGetDist As System.Windows.Forms.CheckBox
-    Friend WithEvents tsStatusOutput As System.Windows.Forms.ToolStripStatusLabel
-    Friend WithEvents tsStatusOnL As System.Windows.Forms.ToolStripStatusLabel
-    Friend WithEvents tsStatusOnR As System.Windows.Forms.ToolStripStatusLabel
    Friend WithEvents XbtnRotM90 As System.Windows.Forms.Button
    Friend WithEvents XbtnRotP90 As System.Windows.Forms.Button
    Friend WithEvents XbtnMirror As System.Windows.Forms.Button
@@ -2152,7 +2234,6 @@ End Sub
    Friend WithEvents btnCircleCP As System.Windows.Forms.Button
    Friend WithEvents btnRevolve As System.Windows.Forms.Button
    Friend WithEvents ImageList2 As System.Windows.Forms.ImageList
-    Friend WithEvents tsStatusGrid As System.Windows.Forms.ToolStripStatusLabel
    Friend WithEvents btnCPlane As System.Windows.Forms.Button
    Friend WithEvents TabCPlane As System.Windows.Forms.TabPage
    Friend WithEvents btnCplaneFront As System.Windows.Forms.Button
@@ -2178,7 +2259,6 @@ End Sub
    Friend WithEvents cmdSetName As System.Windows.Forms.ToolStripMenuItem
    Friend WithEvents ToolStripSeparator2 As System.Windows.Forms.ToolStripSeparator
    Friend WithEvents cmdSetInfo As System.Windows.Forms.ToolStripMenuItem
-    Friend WithEvents tsStatusCurPosType As System.Windows.Forms.ToolStripStatusLabel
    Friend WithEvents btnExtendCurve As System.Windows.Forms.Button
    Friend WithEvents btnScale As System.Windows.Forms.Button
    Friend WithEvents btnDone As System.Windows.Forms.Button
@@ -2190,10 +2270,21 @@ End Sub
    Friend WithEvents btnCPlaneObj As System.Windows.Forms.Button
    Friend WithEvents btnCPlanePerpCurve As System.Windows.Forms.Button
    Friend WithEvents btnOffset As System.Windows.Forms.Button
-    Friend WithEvents tsStatusSnapPointType As System.Windows.Forms.ToolStripStatusLabel
    Friend WithEvents btnChangeLayer As System.Windows.Forms.Button
    Friend WithEvents btnRectangle2P As System.Windows.Forms.Button
    Friend WithEvents InputCombo As System.Windows.Forms.ComboBox
    Friend WithEvents FormTimer As System.Windows.Forms.Timer
+    Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip
+    Friend WithEvents tsStatusOnL As System.Windows.Forms.ToolStripStatusLabel
+    Friend WithEvents tsStatusOutput As System.Windows.Forms.ToolStripStatusLabel
+    Friend WithEvents tsStatusOnR As System.Windows.Forms.ToolStripStatusLabel
+    Friend WithEvents tsStatusSnapPointType As System.Windows.Forms.ToolStripStatusLabel
+    Friend WithEvents tsStatusGrid As System.Windows.Forms.ToolStripStatusLabel
+    Friend WithEvents tsStatusCurPosType As System.Windows.Forms.ToolStripStatusLabel
+    Friend WithEvents tsStatusCursorPos As System.Windows.Forms.ToolStripStatusLabel
+    Friend WithEvents tsStatusUnits As System.Windows.Forms.ToolStripStatusLabel
+    Friend WithEvents btnInsert As System.Windows.Forms.Button
+    Friend WithEvents btnInvertSurf As System.Windows.Forms.Button
+    Friend WithEvents btnText As System.Windows.Forms.Button

 End Class
@@ -117,10 +117,35 @@
  <resheader name="writer">
    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
  </resheader>
-  <metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>243, 14</value>
-  </metadata>
  <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
+  <data name="btnInsert.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
+        xAAADsQBlSsOGwAAAAd0SU1FB98BBBYIFFcWOwoAAAUTSURBVFhHxZZ9TFV1GMe/mTpeYrlqUcmqP2pl
+        8Vf9UctFpKUxFTVCuKRpKi/yduNyBUNBeZGX1CCuw7AcXGjzIizl+oLGFi0p3okkBKNWzZX9SVFtwtjp
+        +/y453a6neUcDNk+v+ec55x7vt/f83t+5wBN024ppsm5xDQ5l5gm5xLT5FziPbhqR/hgCnYI36QiWRiy
+        InUoHWkjVqSPZMDakYBnAMwntxkfMhPU0JeOp0d2IUlrw0taD8K1boRp/aQLz2sdPO9BhPYpIn/ag/gL
+        m7CMBvxmy4QaepNh1VqwkkKRWh9iKB6lfYW1PI/SvkYs4xs0s5n3RP+QjcT6GDxFAwtvZIJ/Uq35Ztd0
+        1NCZSAO9eFEboLgIDmCDEu9j/BJxrMgWVmK71o5t2gXEjh9E0rd27FRkImvUjmzhyk7kjKYhbzAV+77L
+        QsGlUiTSwB2+okbUwLXNoNgyzjpaVaDbQxfFuzj7TiQwptKEjceZNJvE68k8ttJoBqNdXfsMWdrn2Mnl
+        ytLOI6dxLZw0cDdZ6Cuso4aOeP5YDOjC/axCFywU2sy4jVVI0S5SuB1v8ziPFPC+EsZ3SAnFy8jBqXYc
+        mGxD+fgFcgaVTW+iiuKLib+vsI4a2rby4d1YztlY1Kx7KCjCUvqT0zvDu0NSkDKUNr07LnNnXLYi44oN
+        tmErMoffgl1flu+5FEYGklByMR4V7VtwZDBZKvOwn9dA60aWsBMrKLiRMZnitrEzyLn6EUp+zUe85qax
+        FqyfDUYqkO2MRWNgIIK9Blo2ct26uAtkxt1IZxntv7hQ1L8Xpdo59sBpVsSN/Nmgdj2OW8MQFxCAB7g0
+        85SB0xY2jVRAys7ZXzuBvOFK7J+qZ+Od5U5oxj6zh90sow4U5y5FeUgIHgkKwj004KcMuDcgm024kiYS
+        2MVZl6pQeHEPiigex9nb1AOaUeiNwmk2ojEn5+TJShwWHitCy72rMMAe8l6rWI7jKx7Hc/7+WBwcjEAa
+        CFAGmqKwix0ewU6O/9mFfOd2/uAs970YmH74P5yiMTfRz+XYcI+IP/Ee0rwGPPeet6HK/ix2U/RBcieR
+        l9QCZaDhVeSw9Os5+7SechQ1pXCrSend2E32K5pR7EXP6XnDuW6A0X3fOvRL7o8GlBWHw7UkGKEUDSbq
+        VU6me+D4GhroxKZrjdhXF8+ZtHD/n8HWyVMonRKaUaaiB5WXnE9eUEvgQIZuQHLVFtQnhSFx0SI8RNEg
+        crvoCmqoW8WZfoHY3ndR2Grn8Tm8RudFkydx8PrHODDhifqx5PWoMNyjDFQiWzfw4zEc3rsUztBHsYTC
+        0nj/eiuqofYV7Ll+DjGu7Wq9Xufs0/5qQsVEI8ol+jLhiZ5Sq6YzEurAXrO8zn8M1EQgd6gKttZMNiNn
+        Lw8fPwHHn0aafM6JlFqZkJITEfaFgtn6fYJqTF8DH7yM3E/syOXaW1j6HIpX/eYijOOMcq7jzRF5oHQ7
+        RdwGjBUw5t3eneFr4OhqlNVZ+FFpwZaxBhz53YX3PVRLHPPgm9cfKGst3B+NXhH2GHDLuX5NkHtNDdRH
+        Y0fhChwVCsJQXfACqvPC8OHucNRWrEGNwwKnIxa1jkg4D63DsUp+Zg+RUmE1j5mXHKkRA8TbhGy6G3+O
+        +beA3EXk0xkyE5QBwzZkTvb8PF9hnelh+qUgJvxnihjw7A7dwP//22aWnAm6AbOGM8M0ORPEgN5st8TA
+        zWKanEtMk3OHhr8BrFnTAdbLCrEAAAAASUVORK5CYII=
+</value>
+  </data>
  <data name="btnSaveAs.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
@@ -730,12 +755,12 @@
  <data name="btnCplaneRotate.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
-        xAAADsQBlSsOGwAAAAd0SU1FB94LChAgNrqVFMEAAAEDSURBVFhHzZLBDcIwDEVzZRsG6HAsw42VuNAj
-        QxSnaoLrvKaK2hgsPcF/KXZkGqZp+ikoPUHpCUqNlHzw2Rmg1MQL9LwEyxCGNFhjnzuDUnyHD0vuNjxS
-        CjU85fS9B6XoPNBSin+4gJD/AovUrcr9+kSvWPXTYRbmJYTzdQOb5QKrvPe8Dlkul9jw+gVdZxn+GMNr
-        89zk2elQQwrXmWlcfe5LkrANity4+uxJWqROX30+I6mRwnVmZPg7XMYa1DeBMhEHnJkJlBGp+tob8xYo
-        I1K88gaor4Wl+fHRXKMUO6tszXuUQm5/FNuzBkpPUHqC0hOUnqD0BKUnKD1B6QlKP6bwAbN5X05yNz+R
-        AAAAAElFTkSuQmCC
+        xAAADsQBlSsOGwAAAAd0SU1FB98BDAkVBRAEu0YAAAEYSURBVFhHzZJBDgIhDEXZehsPMIfzMu68khtn
+        6SGwJVMo5TNGZKpNXuj/NLTWCTHGnwJNT6DpCTQZCjrw3UygyfAAHkPUIoRFGmt0zWxKUpovmz68OVMS
+        1Vy05EdSEqeGlpL8wwBE/gssFJddruc79BXw3ZyYj9BCUT3QaBqg0m/qs1+JbQjtKV9/oLWm5rc1PLr3
+        Rmsaw0IB15kZXL0ATY19oNGDqxegKVActnoBmgwFXGeGmj/Dad0DvctQlCH1RTapwUytoeCt8I9IQ/QK
+        umv8VGu2uzQcn0mDonrVA9g3BX0veVMwUyOkJp/q4qtVW92DojtAtcYR5K09bD0s8gSankDTE2h6Ak1P
+        oOkJND2BpifQ9COGFzSFLrNupfx9AAAAAElFTkSuQmCC
 </value>
  </data>
  <data name="btnCplaneBottom.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
@@ -846,7 +871,7 @@
        AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
        LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
        ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAAC4
-        DQAAAk1TRnQBSQFMAgEBDgEAARABDQEQAQ0BEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
+        DQAAAk1TRnQBSQFMAgEBDgEAAYgBDgGIAQ4BEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
        AwABQAMAAUADAAEBAQABCAYAARAYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
        AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
        AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
@@ -915,7 +940,7 @@
        AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
        LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
        ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAADW
-        CAAAAk1TRnQBSQFMAgEBAgEAATABBAEwAQQBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
+        CAAAAk1TRnQBSQFMAgEBAgEAAagBBQGoAQUBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
        AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
        AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
        AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
@@ -953,6 +978,16 @@
        AwABQAMAARADAAEBAQABAQUAAYAXAAP/AQAE/wQABP8EAAHkASMB/AE/BAAB4AEDAfwBPwQAAWABAwH4
        AR8EAAFkAQMB+AEfBAABaAETAfgBHwQAAWgBEwH4AR8EAAFwAQsB8AEPBAABcAELAfABDwQAAXABCwHw
        AQ8EAAFwAQsB8AEPBAABYAEDAfABDwQAAWgBEwH4AR8EAAF/A/8EAAF/A/8EAAs=
+</value>
+  </data>
+  <data name="btnText.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
+        YQUAAAAJcEhZcwAADsQAAA7EAZUrDhsAAAAHdElNRQffAQwVJxsSR4hAAAAA0klEQVRYR+2W0Q2DMAxE
+        GYzhMkunY4vUlxAUzBUMRu5PLD1ozw5+4qedcs5/hYaR0LAhhcsr6Gc3aNgohz+LH7cA7gy1hOIWqMy0
+        pwTIzFzmSK9Bw8Z6+LB8610IAJz/1QM0tICHWgSuoKGFITAEhsAQGAIeAant9+XQtPJUAMuFhHv5rges
+        SN0WwFIhrZ+LBB20IPVEAEt7gUQHLUjdFgBYurv3TStS9Z+OEkDO5nukfAJSuJyiz/RI1VfveQNvQsNI
+        aBgJDSOhYSQ0jISGceTpC0M64Frj3V19AAAAAElFTkSuQmCC
 </value>
  </data>
  <data name="btnRectangle2P.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
@@ -1078,22 +1113,22 @@
  <data name="btnRevolve.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
-        wwAADsMBx2+oZAAAAAd0SU1FB94LAgkfLMlqd5cAAANkSURBVFhHxZRJTFNRFIZ/3bhw5UZ3JiYu2bnS
-        EE1coAsXxoVDHIhhKmChpRQBK5NDjGBMIC7UxJ1xpTHIQmOMUTFRawCRoGChyOQAgtSR4fX43w4E6yk0
-        xjybfH3tf+89w33nHIjIf0UVUwPL4WgbhGd0s76eGqqYCshq7Ufhe0H2J0F+5wZtTyqo4lJgz43rKHgn
-        KBsXlH8W5I0J1jtXaHuXQhUXAxudW3CgJ+rYUPl1Gt6QwDMypu1fClVcDBx6LPDy2iu/CY6RmpnP8H2f
-        RQE1Z88h7cxiqGIysPNyLnKCdP5F4PspOD4jOBsOom5uHF7ehmuY2/SzyVDFZCDz3hQ8fO++H4KqWWIJ
-        mqQbDdKLo1MCB4uy4GWGdjYZqqiB1WlrsL9bUEFHxnl1mNdPLkoHeYZy3oqLxVjUd0c7nwxV1MDua0XI
-        G4i+92pmXkOxljTJG1yQdpSHLJQyAEeA23UbGqqowb6/Cedo9PpN5vEAzskozksPX8EcvB8FmX2CjPqV
-        mg0NVdRgAO3wsNJN9nUUTpITpEHGGMRANIAPgiwW6cHmdZoNDVWMk74Wq7Dr6hXsaw4i+zkHTrspMkHh
-        K9NyfN9vBMXMuLg/HHsKjgSoByZQ1PsAhV17NbsLUUUDtp50YNstZvNEkPOCTlmAzt6oQxezdLEeSoY5
-        gDgRS5m5l91Rxhs6OsHfxM3/uVxzDUzS3DLNh0EX033bseM+s2GmxplnhEbpxIxe4+A3Ik4tVLAIK0Jh
-        wk4xsFvMpCxmYbqDIc2PQRf33uVVv2aGQ3RKA8aYqf7I8JmODiBD1ZyFOiuEBiuIRusl6q0Aaqwpjmcr
-        Oqono0Hn0E5+52HV1x9Cxqk07O7glTNzN6vazPlyVn4le/8Yq9+3gGoeOC3TaJQhXJJOPgOoDX9FGZ2X
-        0LGbwbs4nByD5hV2JfqK+PtDONCyiUXUi5JBP6/Xz8z9qJrxc/D42XaJPGUntOKM3GU3tDCY22zTh7y1
-        p/C+90coHfXD/baNBfko0VfEnybaiSraiSr+C/gxX/MkrsdRRUPsYA1J19ZTIXb+rwOYPxz7nVIgZl9s
-        /8KzXEqyXxPj8JNoLE4koBja+vyemB0+kvjQxEQWGFo0oMRzqaCKdqKKdqKKdqKKdqKKdqKKdqKK9iH4
-        BcKd4KYRgNnpAAAAAElFTkSuQmCC
+        xAAADsQBlSsOGwAAAAd0SU1FB98BCQo6G82P8CMAAAOISURBVFhHxZRLbExRGMf/bCysbNhJJJZ2VqQh
+        sSgLC7HwiFeE1rQ17Uyn05fRjnpEtCKpWCCxEysiWBAR8UowolSD1jDVVj1apePZx53P/9y5dzKm37QT
+        Ydzkdx//c873OPc7H0Tkv6KKuYHp8DzsQaB/iT6eG6qYC9h2+xXK3gm2fxSUtC/U5uSCKk4F1p47i9K3
+        gupBQe1nwY4BwXzvDG3uVKjiZGCRdyk2diYdG+q/jiAYFwTeDGjzp0IVJwOb7wiC3Pb6b4JdJDz6GaHv
+        Yyil5u3crK2ZDFXMBladLEZRjM6/CEI/BbtHBYcSMTSNDyLI3fD1cZq+NhuqmA1suTaMAP976IegYYxY
+        gqPyFC3ShZphgYdFWfqkUFubDVXUwOwFc7DhqaCOjozzxgS3nxyXR+Q+arkrPhZj+csr2vpsqKIG1pwp
+        x47u5H9vZOZhinvIUXmBY9KG2riFKgbgiXK6bkNDFTV47s/D25/cfpO5G8Bh6ccR6eQvGEfwg2DLS0Fh
+        80zNhoYqajCANgRY6Sb7Jgr7yF7SIgMMojsZwHvBNhbppgvzNBsaquhSMBezsPr0Kay/EMP2B2w4babI
+        BGXPzJHj/34hqGDGFa8SzlOwM0o9OoTyrhso61in2U1HFQ1Yts+D5ReZzV1B0WM6ZQF6u5IOfczSx3qo
+        7GMDYkesYuZBno5q7lDNEN+Jn9/FHPN1f6K5aZoPgy4WhFZg5XVmw0yNs8AbGqUT03qNg9+wnVqoYxHW
+        xROEJ8XA02I6ZQUL0x+La34MurjuKrf6OTPspVMaMMZM9dvNZyTZgAwN4xaarDharBharSdotqIIW8Ns
+        z1ayVX9KBl1EOyXtW1VfE4TC/Quw5hG3nJn7WdWmz9ey8ut59nex+kNpNHLBARlBq/TihLTzGcWexFdU
+        03klHfsZvI/NydNjfmFHpi/b3wRh46XFLKIuVPZEuL0RZh5Bw2iEjSfCY5fJPZ6E2zgoV3kaLjGYyzym
+        N7lr9xB8F7Gp6o/A//ohC/JWpi/bnyb+a3gVpN7TB/KBcU7CbhDqpL8BL3NL4Wi2c+fdDmLCQhde5paK
+        9E9w1psXfqa+0wMIT1jk4kywFzvvOQVi5jnz09dyKDWeCsB+ugMavDKNudgBOWjjqTmOHT5SNnMPwIWX
+        a2jSgDLXaThzbezvzAn5RhXziSrmE1XMJ6qYT1Qxn6hi/hD8Au26sAtyUXt6AAAAAElFTkSuQmCC
 </value>
  </data>
  <data name="btnExtrude.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
@@ -1115,6 +1150,17 @@
        Y4C55tAaQOosc+gKMMscbgvAjp18d86hEWFGgGQcv0Zr90FTwmiAwjie9KsSkv6/r4SRAJl5PLmx/Kos
        tDAYYN9x+C+5Qgu9AY5vX2UOWhgIsM/L23NdgxbGA/BR9faghTxAI/l8LVpoXFAyJcAo5c4rTNETU/TE
        FD0xRU9M0RNT9CMsP8YUDae/Iv6fAAAAAElFTkSuQmCC
+</value>
+  </data>
+  <data name="btnInvertSurf.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
+        xAAADsQBlSsOGwAAAAd0SU1FB98BCQoRC6ZIHS4AAAEaSURBVFhHxY/BkcIwEAQVACmRDsnwIAWKNPjw
+        4kEkfIlAaGSJWq1nDTaq1VX1WZ7TVbdDjHEodPSEjltJP+nB/2ZBxy1APiwgi+/hNSSgyocESLl7AGTD
+        Aqp4SICUdg8I58dBvmuoUJy/BYT98TTbPockD5dnOrYXJFZA8yT/Vwm7601HTL+KPIMzId8jAXKrAZBQ
+        EKAiWvkC0+V5wOwd96poiRIxVcgI8dUSHYCzGSC/WqLk+e7nAFH5Uosq1E8dYKHleWteypdaQCClqwOU
+        PG96WIIKf5Rb0NHCCtgqB3S0YAH/yAEdLViAvrMWOlrIgB5yQEeLGtBLDuhoAXFPOaCjRW85oKMndPSE
+        jp7Q0RM6ekJHT+joRwxv6asQzW7YWBIAAAAASUVORK5CYII=
 </value>
  </data>
  <data name="btnChangeLayer.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
@@ -1211,17 +1257,18 @@
        XTesb3QPLh88M+QwdP6m681Lt7xuXbu94vbgcOjwnZHokdE77DtTd1PuvriXeW/h/sYH6AdFD6UeVjxS
        fNTws+7PbaOWo6fHXMf6Hwc/vj/OGn/2S8Yv7ycKnpCfVEyqTDZPmU2dmnafvvF05dOJZ+nPFmYKf5X+
        tfa5zvMffnP8rX82YnbiBf/Fp99LXsq/PPRq2aueuYC5R69TXy/MF72Rf3P4LeNt37vwd5MLWe+x7ys/
-        6H7o/ujz8cGn1E+f/gUDmPP8usTo0wAAAAlwSFlzAAAOxAAADsQBlSsOGwAAAAd0SU1FB94KHwkbEB16
-        aOYAAAI8SURBVFhHzdLbTxNBGAXw49vOLn+KMV6JKDH+h77oA4kh8YbBIpaLbeldKDdRCV7inZhIoljQ
-        WlExMYzfmV1l3M5rh5L8kuE7mznfbgqt9YFyDn3i3yFX4EvHAvy/W+weq69zAf1AjkuJhqjFmJ1fg6Zz
-        D6EH78fOyDPMqA96IsLPHCk0ywrrDTL3Wj1WXy8usCjH2URF5GLMWExnZbkByalfnmFGEXbyET7USOH1
-        gsKjVTL3Wj1Wn2OBuhyLiWkxHmM2uCBvLQbkmf5S7MTd/QUUNuohXixTgJXHCtU3ZO61eqy+XlygIMfJ
-        xJi4GWN2Wn4LdGoG+rjkdPS2vcDTlQhLzyhAeV1h8iOZe60eq8+xQFaOtxI3xNUYs5N5aDo2AX0kEzss
-        zzCjAPPPAxTfxe5sBhhpk7nX6rH6enCBbrF7rD7HF0A0atuDyhCzecxrqqMhv9HYFOb+fQHkNof+92nY
-        SPVYfT2+wG/0ZXcRzRCzmhRSQUqzmDVGBTPDLs83r6OwPW2keqy+zgX2EI79gpqiH1CVNsJlYpaTYhqX
-        0hHcM4ZRtxaQt81vZYzS5yrKrTUj1WP19eACuwgL3xHOUQvh6jbUS2KWkUK6Ji6jZlwSzIyifO5Sa9Eo
-        f32FSnvLSPVYfZ0L8G2/IHhCTYRvm1DvidkVKaYhKb2YuIDq/gJ822prw6i1d1D7po1Uj9V3wAt0DP5e
-        1AXpLtPnGvrkHPrkHPrkHPrkHPrkHPrkHPrkHPrkHPrkHPqj8QedywzpExYb4AAAAABJRU5ErkJggg==
+        6H7o/ujz8cGn1E+f/gUDmPP8usTo0wAAAAlwSFlzAAAOxAAADsQBlSsOGwAAAAd0SU1FB98BCQo6M/g6
+        WNkAAAJbSURBVFhHzdJbTxNBHAXw41t3l49ijFci2hg/mt/AF30gMSTeMFjEcrEtvW2FlouoBC/xTkwk
+        USxoraiYGMb/mR1hpKNvDN3kl87OfzPn7KZQSu0r56ZPvA64Br50FOD9XrFzrLzOAuq+LOeMuogTnJ1d
+        gqIzD6DS9xKn5BnOqAdqNMKPHAVolgMs10mfa+VYed1YYFaWU0ZF5BKcMZhOS7k+mVOvPMMZRdjIR3gf
+        U4BXMwEeLpI+18qx8hwFarIsGhNiJMFZekbeWvTJM72lxLE7OwUCrNRCPJ+nFBYeBai+Jn2ulWPldWOB
+        gizHjGFxI8HZSfkv0IlJqKMyp8O37AJPFiLMPaUUyssBxj6QPtfKsfIcBbKyvGlcF1cSnB3PQ9GRUahD
+        mcRBeYYzSqHxLIXi28Tt1RQG26TPtXKsvC4ssFfsHCvP8QUQDdm2EGSIswYaimqoy380MY7p7S+A3Gr/
+        3z4OaLtyrDz/BeRKW+v/F/iFnuwmokniLJZAKkhoFlPakOBMs8PzzWsorE9oJkeutDjH338W2EI4/BPB
+        OH1HUGkjnCfOchJMIxI6iLvaAGpWAXnb/FpGK32qotxa0pK5Djc5ugQXPgsw1C5AnQU2ERa+IZymFsLF
+        dQQviLOMBNJVcQmxdlFwphXlc5das1r5y0tU2muayZFru4D57SzAt/2M1GNqInzTRPCOOLsswdQvoReM
+        86juFODbVlsrWtzeQPxVaSZHrv0v8Ie+t8PNA8lBe2B3ls5zbfrk3PTJuemTc9Mn56ZPzk2fnJs+OTd9
+        cm765Nz0R+E3yr7cPy/jIjUAAAAASUVORK5CYII=
 </value>
  </data>
  <data name="btnExplodeCurve.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
@@ -1304,10 +1351,11 @@
  <data name="btnScale.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
-        xAAADsQBlSsOGwAAAAd0SU1FB94LEQkRLWJCkv4AAAC3SURBVFhH7c7BDcJADETRFECdNJJGEG3kwplK
-        6MIwp0HLJKzXxgGJw5NGlrL5k5ntSh4ryWMleazEcVguHs+PRHDg4XmxbkkRHN4ASIjgGAmAYATHaAAE
-        IjgiATAYwRENgIEIjowAcEZwZAWAI4IjMwDw3obPB2z5B3xnwPlmXdSDXqsBp+vxrYyIUABEI8IBEIlI
-        CQB801I/bKUFtH4/IMPj8R4vAXuRx0ryWEkeK8ljJXmsY9Mdixw5EYtQsU0AAAAASUVORK5CYII=
+        xAAADsQBlSsOGwAAAAd0SU1FB98BCQsCDrYPwgQAAADWSURBVFhH7c7RDYIwEMbxDuBIzuMcJi5iXIMX
+        n53ELWo/pLGSD9vrHQcPkvwCHKT3DzHGTdGhJzr0RIeeQjgM91bsAK13wGWITVaIkAWAcYQ8AAwj+gLA
+        KKI/AAwidAGgjNAHgCLCJgA6I+wCAGctYMvBNmDJP2DfAbdnrGKHSlQDro/TT9qIWUC6jrIA0EQUAVie
+        nHNEewD0RkwBefn0PEbIAgD/z7GlpU8AlpYBCQ5gi1oJAvLi7/suArTSgpoyIBvf84et0KEnOvREh57o
+        0BMd+onhBWHZJs6j2X/WAAAAAElFTkSuQmCC
 </value>
  </data>
  <data name="btnMirror.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
@@ -1322,11 +1370,11 @@
  <data name="btnRotate.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
        iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
-        xAAADsQBlSsOGwAAAAd0SU1FB94KFQ05E0t1N8QAAADISURBVFhH7ZDdDcMgDAYzQEfqPFmki1RdIy99
-        ziTdwsUoSIbPTcyPSCpR6QS5EnzKRESnguK2vPdIz9eCggc9FlIZAVcLcL+7w23jO3JAYQwIw3mV7+eC
-        whAghgeKI1AUfIFt9Xt5lwUUxgB/dhsu97zKM0egyAhIKYlAURHAhIjU/wJFZQDDARyi/ZeCok2A+Sug
-        aBDAjAArKC4RsMfrQ7VE8+TDEf6C5zpXMQJGwP8HNCC6Uz6cgSp7osqeqLInquyJKvtB0xf7GpRbxtg5
-        LAAAAABJRU5ErkJggg==
+        xAAADsQBlSsOGwAAAAd0SU1FB98BCQsAFQ5caWoAAAD3SURBVFhH7ZPBDcIwDEU7ACMxD3NUYhHEGr1w
+        ZhK2CLEdRya4VRpbaQ5Fej/BKflPlZhCCIdCcVleW5Q/8oQCiu5LUDkFRhOIn2skbn8vaoWiUoDLYeWZ
+        FYoKAVHOuEhQNLyBtOKez1ugqBTAZ1O53MMqn9kDxQ6BEqsEhUEAYIlyXgOFUQAAARDRzrag8BFoegsU
+        DgLAKdACxRACWzw/wYoslahDCV7weN9MFALxk/+uebiGtwCUR2aW+Css8RTg8rRHCbVU4iwApVJgVksl
+        ngJ4nxDAlQ/WGEPAgXwfvPYEfueDo1CHPVGHPVGHPVGHPVGH/QjTFyIJY8AMjgskAAAAAElFTkSuQmCC
 </value>
  </data>
  <data name="btnMove.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
@@ -1339,6 +1387,9 @@
        RCtI7JdvesFiCsLgcxpA0RIoWgJFS6BoCRQtgaIdbvgCS/kFfmOvgmgAAAAASUVORK5CYII=
 </value>
  </data>
+  <metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>243, 14</value>
+  </metadata>
  <metadata name="ContextMenuTreeView1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>867, 14</value>
  </metadata>
@@ -1358,7 +1409,7 @@
    <value>568, 14</value>
  </metadata>
  <metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
-    <value>82</value>
+    <value>43</value>
  </metadata>
  <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
    <value>
@@ -38,7 +38,7 @@ Public Class Form1
      ' Impostazione path Ini file
      m_sIniFile = m_sDataRoot & "\TestEIn.ini"
      ' Inizializzazione generale di EgtInterface
-      EgtInit(0, m_sDataRoot & "\TestEngine.log")
+      EgtInit(0, m_sDataRoot & "\EInGenlog.txt")
      ' imposto chiave di protezione
      Dim sKey As String = String.Empty
      GetPrivateProfileString("General", "Key", "", sKey, m_sIniFile)
@@ -49,10 +49,13 @@ Public Class Form1
      Dim sDefFont As String = String.Empty
      GetPrivateProfileString("GeomDB", "DefaultFont", "", sDefFont, m_sIniFile)
      EgtSetFont(sNfeDir, sDefFont)
-      ' imposto direttorio di default per libreria Lua
+      ' imposto dir di default per libreria Lua e lancio libreria di base
      Dim sLuaLibsDir As String = String.Empty
      GetPrivateProfileString("Lua", "LibsDir", "", sLuaLibsDir, m_sIniFile)
      EgtSetLuaLibs(sLuaLibsDir)
+      Dim sLuaBaseLib As String = String.Empty
+      GetPrivateProfileString("Lua", "BaseLib", "EgtBase", sLuaBaseLib, m_sIniFile)
+      EgtLuaRequire(sLuaBaseLib)
      ' imposto colore di default
      Dim DefColor As New Color3d(0, 0, 0)
      GetPrivateProfileColor("GeomDB", "DefaultColor", DefColor, m_sIniFile)
@@ -148,6 +151,8 @@ Public Class Form1
      End If
      ' Impostazioni controller
      m_Controller.SetScene(Scene1)
+      Dim bLuaReg As Boolean = (GetPrivateProfileInt("General", "CommandLog", 0, m_sIniFile) <> 0)
+      m_Controller.SetCommandLog(bLuaReg, m_sDataRoot)
      ' Apro progetto vuoto
      Scene1.NewProject(True)
   End Sub
@@ -414,6 +419,14 @@ Public Class Form1
      Scene1.ExportProject(Path.ChangeExtension(m_Controller.GetCurrFile(), "dxf"))
   End Sub

+   Private Sub btnInsert_Click(sender As System.Object, e As System.EventArgs) Handles btnInsert.Click
+      ' eseguo
+      Dim sDir As String = String.Empty
+      GetPrivateProfileString("General", "LastNgeDir", "", sDir, m_sIniFile)
+      Scene1.InsertProject(sDir)
+      m_Controller.SetModified()
+   End Sub
+
   Private Sub btnExec_Click(sender As System.Object, e As System.EventArgs) Handles btnExec.Click
      Dim sDir As String = String.Empty
      GetPrivateProfileString("General", "LastLuaDir", "", sDir, m_sIniFile)
@@ -548,7 +561,11 @@ Public Class Form1
   End Sub

   Private Sub btnCplaneRotate_Click(sender As System.Object, e As System.EventArgs) Handles btnCplaneRotate.Click
-      m_Controller.ExecuteCommand(CMD.GRID_ROTATE)
+      If (ModifierKeys And Keys.Shift) <> Keys.Shift Then
+         m_Controller.ExecuteCommand(CMD.GRID_ROTATE)
+      Else
+         m_Controller.ExecuteCommand(CMD.GRID_ROTATE3D)
+      End If
   End Sub

   Private Sub btnCplane3Points_Click(sender As System.Object, e As System.EventArgs) Handles btnCplane3P.Click
@@ -585,6 +602,7 @@ Public Class Form1
      btnArc3P.Enabled = bLayerOk
      btnArcPDP.Enabled = bLayerOk
      btnRectangle2P.Enabled = bLayerOk
+      btnText.Enabled = bLayerOk
      ' Construct
      btnPlane.Enabled = bLayerOk And bSelOk
      btnExtrude.Enabled = bLayerOk And bSelOk
@@ -600,6 +618,7 @@ Public Class Form1
      btnJoinCurve.Enabled = bLayerOk And bSelOk
      btnExplodeCurve.Enabled = bSelOk
      btnSetCurveTh.Enabled = bSelOk
+      btnInvertSurf.Enabled = bSelOk
      ' Transform
      btnMove.Enabled = bSelOk
      btnRotate.Enabled = bSelOk
@@ -646,6 +665,14 @@ Public Class Form1
      m_Controller.ExecuteCommand(CMD.RECTANGLE2P)
   End Sub

+   Private Sub btnText_Click(sender As System.Object, e As System.EventArgs) Handles btnText.Click
+      If (ModifierKeys And Keys.Shift) <> Keys.Shift Then
+         m_Controller.ExecuteCommand(CMD.TEXT)
+      Else
+         m_Controller.ExecuteCommand(CMD.TEXTPLUS)
+      End If
+   End Sub
+
   Private Sub btnPlane_Click(sender As System.Object, e As System.EventArgs) Handles btnPlane.Click
      m_Controller.ExecuteCommand(CMD.PLANE)
   End Sub
@@ -684,7 +711,7 @@ Public Class Form1
   End Sub

   Private Sub btnInvertCurve_Click(sender As System.Object, e As System.EventArgs) Handles btnInvertCurve.Click
-      m_Controller.ExecuteCommand(CMD.INVERTCRVSURF)
+      m_Controller.ExecuteCommand(CMD.INVERTCURVE)
   End Sub

   Private Sub btnExtendCurve_Click(sender As System.Object, e As System.EventArgs) Handles btnExtendCurve.Click
@@ -707,6 +734,10 @@ Public Class Form1
      m_Controller.ExecuteCommand(CMD.SETCURVETHICKNESS)
   End Sub

+   Private Sub btnInvertSurf_Click(sender As System.Object, e As System.EventArgs) Handles btnInvertSurf.Click
+      m_Controller.ExecuteCommand(CMD.INVERTSURF)
+   End Sub
+
   Private Sub btnMove_Click(sender As System.Object, e As System.EventArgs) Handles btnMove.Click
      m_Controller.ExecuteCommand(CMD.MOVE)
   End Sub
@@ -881,11 +912,8 @@ Public Class Form1
   End Function

   Private Sub InputText_KeyDown(ByVal sender As System.Object, ByVal e As KeyEventArgs) Handles InputText.KeyDown
-      ' Con SHIFT aggiorno la grafica con i dati correnti
-      If (e.KeyData And Keys.Shift) = Keys.Shift Then
-         m_Controller.Show(InputText.Text)
      ' Con RETURN avanzo di un passo
-      ElseIf e.KeyData = Keys.Return Then
+      If e.KeyData = Keys.Return Then
         m_Controller.Done(InputText.Text)
      End If
   End Sub
@@ -915,14 +943,23 @@ Public Class Form1
            ' ripristino stato oggetto marcato
            Dim nIdOld As Integer = RevertOldIdInObjTree()
            ' eseguo comando
-            If EgtTscExecLine(sCmd) Then
-               Scene1.Invalidate()
+            m_Controller.SetLastString(sCmd)
+            If m_Controller.ExecuteCommand(CMD.EXECLINE) Then
               tsStatusOnR.Text = "   "
            Else
               tsStatusOnR.Text = "Error executing command"
            End If
+
+            'EgtEnableCommandLogger()
+            'If EgtLuaExecLine(sCmd) Then
+            '   Scene1.Invalidate()
+            '   tsStatusOnR.Text = "   "
+            'Else
+            '   tsStatusOnR.Text = "Error executing command"
+            'End If
+            'EgtDisableCommandLogger()
            ' ricarico albero degli oggetti
-            LoadObjTree()
+            'LoadObjTree()
            SelectIdInObjTree(nIdOld)
         End If
      End If
@@ -1335,7 +1372,4 @@ Public Class Form1
      Scene1.SetGridCursorPos(m_bCPlaneTypePos)
   End Sub

-Private Sub ToolStripSnapPointType_Changed(sender As System.Object, nSpType As TestEIn.EgtInterface.SP)
-
-End Sub
 End Class
@@ -24,7 +24,7 @@ Imports System.Runtime.InteropServices
 <Assembly: AssemblyDescription("")> 
 <Assembly: AssemblyCompany("EgalTech s.r.l.")> 
 <Assembly: AssemblyProduct("TestEIn")> 
-<Assembly: AssemblyCopyright("Copyright ©  2014")> 
+<Assembly: AssemblyCopyright("Copyright ©  2014-2015 by EgalTech s.r.l.")> 
 <Assembly: AssemblyTrademark("")> 

 <Assembly: ComVisible(False)>
@@ -43,5 +43,5 @@ Imports System.Runtime.InteropServices
 ' utilizzando l'asterisco (*) come descritto di seguito:
 ' <Assembly: AssemblyVersion("1.0.*")> 

-<Assembly: AssemblyVersion("1.5.12.2")> 
-<Assembly: AssemblyFileVersion("1.5.12.2")> 
+<Assembly: AssemblyVersion("1.6.1.2")> 
+<Assembly: AssemblyFileVersion("1.6.1.2")> 
@@ -748,10 +748,14 @@ Public Class Scene
   Private Sub MenuScene_ItemClicked(sender As Object, e As ToolStripItemClickedEventArgs) Handles MenuScene.ItemClicked
      ' Per selezione
      If e.ClickedItem.Name = "cmdSelectAll" Then
+         EgtEnableCommandLogger()
         EgtSelectAll(True)
+         EgtDisableCommandLogger()
         EgtDraw()
      ElseIf e.ClickedItem.Name = "cmdDeselectAll" Then
+         EgtEnableCommandLogger()
         EgtDeselectAll()
+         EgtDisableCommandLogger()
         EgtDraw()
      ElseIf e.ClickedItem.Name = "cmdWinSelect" Then
         m_nStatus = ST.WINSEL
@@ -995,6 +999,30 @@ Public Class Scene
      Return bOk
   End Function

+   Public Function InsertProject(Optional ByVal sDir As String = "", Optional ByVal bWithDlg As Boolean = True) As Boolean
+      Dim sFile As String = sDir
+      ' Scelta file con dialogo
+      If bWithDlg Then
+         Dim OpenFileDialog As New OpenFileDialog
+         OpenFileDialog.Title = "Insert"
+         OpenFileDialog.Filter = "New geometry EgalTech(*.nge)|*.nge" &
+                                 "|New font EgalTech(*.nfe)|*.nfe" &
+                                 "|All Files (*.*)|*.*"
+         OpenFileDialog.FilterIndex = 1
+         OpenFileDialog.InitialDirectory = sDir
+         If OpenFileDialog.ShowDialog <> Windows.Forms.DialogResult.OK Then
+            Return True
+         End If
+         sFile = OpenFileDialog.FileName
+      End If
+      'Inserimento del progetto
+      Cursor = Cursors.WaitCursor
+      Dim bOk As Boolean = EgtImportFile(sFile)
+      EgtZoom(ZM.ALL)
+      Cursor = Cursors.Default
+      Return bOk
+   End Function
+
   Public Function SaveProject(Optional ByVal sFile As String = "") As Boolean
      If String.IsNullOrWhiteSpace(sFile) Or EgtGetFileType(sFile) <> FT.NGE Then
         Return SaveAsProject(sFile)
@@ -397,6 +397,99 @@
    <None Include="Resources\Rectangle2P.png" />
    <None Include="Resources\Relocate.png" />
  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\InvertSurf.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\LinePDL.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\LookFromBOTTOM.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\Insert.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\Extrude.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\ExtendCurve.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\ExplodeCurve.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\CplaneTOP.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\CplaneROTATE.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\CplaneRIGHT.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\CplanePERPCURVE.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\CplaneORIGIN.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\CplaneOBJECT.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\CplaneLEFT.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\CplaneFRONT.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\CplaneELEVATION.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\CplaneBOTTOM.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\CplaneBACK.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\Cplane3POINTS.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\CircleCP.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\CircleCD.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\ChangeColor.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\BreakCurve.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\ArcPDP.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\Offset.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\Revolve.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\Ruled.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\Scale.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\SeparateCurve.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\ThickCurve.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\Text.png" />
+  </ItemGroup>
  <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
  <PropertyGroup>
    <PostBuildEvent>IF "$(PlatformName)"=="x86" IF "$(ConfigurationName)" == "Release" copy $(TargetPath) c:\EgtProg\TestEIn\TestEInR32.exe