feat: Lucky turtle and random defaults ( Fixes #363, Fixes #366 )

Randomizing sierpinski curve ans square curve

Author: StartAutomating

Types/Turtle/Lucky.ps1

@@ -7,12 +7,15 @@ $luckyArgs = @(
         "arcygon", "polygon", 
         "square", "circle", "rectangle", 'righttriangle',
         "sierpinskitriangle","sierpinskiarrowheadcurve",
+        "sierpinskicurve","sierpinskisquarecurve",
         "hilbertcurve", "moorecurve", "flowerpetal",    
         'Spiderweb','pentaplexity',"kochsnowflake",
+        'StepSpiral',
         'TurtleMonotile','HatMonotile',
         'bargraph','piegraph'
     )
     $shapes | 
+        Select-Object -Unique |
         Get-Random
     if ($true, $true, $false | Get-Random) {
         'fill'    

Types/Turtle/SierpinskiSquareCurve.ps1

@@ -21,8 +21,8 @@
     $turtle.Pattern.Save("$pwd/SierpinskiSquareCurve2.svg")
 #>
 param(
-    [double]$Size = 20,
-    [int]$Order = 5,
+    [double]$Size = (Get-Random -Min 21 -Max 42),
+    [int]$Order = (2,3,4,5 | Get-Random),
     [double]$Angle = 90
 )
 return $this.LSystem('X',  [Ordered]@{