Minor UI improvements

morphx666 · Dec 30, 2016 · 7b7bd07 · 7b7bd07
1 parent a86b814
commit 7b7bd07
Show file tree

Hide file tree

Showing 4 changed files with 36 additions and 25 deletions.
diff --git a/LSysInt Tester/FormMain.Designer.vb b/LSysInt Tester/FormMain.Designer.vb
diff --git a/LSysInt Tester/FormMain.vb b/LSysInt Tester/FormMain.vb
@@ -19,7 +19,7 @@ Public Class FormMain
     End Class
 
     Private Sub FormMain_Load(sender As Object, e As EventArgs) Handles MyBase.Load
-        ComboBoxLSysCodeDefs.Items.Add(New LSysCodeDef("VonKochSimple",
+        ComboBoxLSysCodeDefs.Items.Add(New LSysCodeDef("Von Koch Simple",
 "VonKochSimple {
     level: 5
     axiom: -(90) f(0.5) +(90) F(1)
@@ -36,7 +36,7 @@ Public Class FormMain
                  +(25) F(x/2) [ +(25) F(x/2) X(x/2) ] -(25) X(x/2)
 }"))
 
-        ComboBoxLSysCodeDefs.Items.Add(New LSysCodeDef("SpinIt",
+        ComboBoxLSysCodeDefs.Items.Add(New LSysCodeDef("Spin It",
 "SpinIt {
     level: 60
     axiom: -(90) f(0.5) +(90) f(0.5) X(0.01)
@@ -48,7 +48,7 @@ Public Class FormMain
                        -(90) F(n) ]
 }"))
 
-        ComboBoxLSysCodeDefs.Items.Add(New LSysCodeDef("Dragon",
+        ComboBoxLSysCodeDefs.Items.Add(New LSysCodeDef("Dragon Curve",
 "Dragon {
     level: 11
     axiom: -(45) f(0.47) * F(0.6) X(0.6)
@@ -58,7 +58,7 @@ Public Class FormMain
     rule: *    = * -(45)
 }"))
 
-        ComboBoxLSysCodeDefs.Items.Add(New LSysCodeDef("VonKochColor",
+        ComboBoxLSysCodeDefs.Items.Add(New LSysCodeDef("Von Koch Color (not working ATM)",
 "VonKochColor {
     level: 5
     axiom: -(90) f(0.28) +(90) f(0.05) F(0.9,0,0.9)
@@ -71,6 +71,18 @@ Public Class FormMain
     rule: C(d) = %(0,d,0.1,1)
 }"))
 
+        ComboBoxLSysCodeDefs.Items.Add(New LSysCodeDef("Sierpinski Triangle",
+"SierpinskiTriangle  {
+    level: 5
+    angle: 60
+    offsetY: -800
+    constant: A = F
+    constant: B = F
+    axiom: %(0,0.8,1,1) A(0.03)
+    rule: A(x) = + B(x) - A(x) - B(x) +
+    rule: B(x) = - A(x) + B(x) + A(x) - 
+}"))
+
         updateCodeTimer = New Timer(New TimerCallback(Sub()
                                                           lsys = New LSysInt.LSysInt(TextBoxCode.Text)
                                                           If lsys.LDefs.Any() Then

diff --git a/LSysInt Tester/My Project/AssemblyInfo.vb b/LSysInt Tester/My Project/AssemblyInfo.vb
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' by using the '*' as shown below:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("2016.12.30.510")>
-<Assembly: AssemblyFileVersion("2016.12.30.510")>
+<Assembly: AssemblyVersion("2016.12.30.515")>
+<Assembly: AssemblyFileVersion("2016.12.30.515")>
diff --git a/LSysInt/My Project/AssemblyInfo.vb b/LSysInt/My Project/AssemblyInfo.vb
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' by using the '*' as shown below:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("2016.12.30.224")>
-<Assembly: AssemblyFileVersion("2016.12.30.224")>
+<Assembly: AssemblyVersion("2016.12.30.225")>
+<Assembly: AssemblyFileVersion("2016.12.30.225")>