feat: Turtle.get/set_Opacity ( Fixes #293 )

Author: StartAutomating

Types/Turtle/get_Opacity.ps1

@@ -1,14 +1,10 @@
 <#
 .SYNOPSIS
-    Gets the turtle opacity
+    Gets a Turtle's opacity
 .DESCRIPTION
-    Gets the opacity of the turtle path.
+    Gets the opacity of a Turtle
+.EXAMPLE
+    turtle opacity .5 
 #>
-if (-not $this.'.PathAttribute') {
-    $this | Add-Member -MemberType NoteProperty -Name '.PathAttribute' -Value ([Ordered]@{}) -Force
-}
-if ($this.'.PathAttribute'.'opacity') {
-    return $this.'.PathAttribute'.'opacity'
-} else {
-    return 1.0
-}
+param()
+return $this.'.Opacity'

Types/Turtle/get_SVG.ps1

@@ -15,6 +15,11 @@ $svgAttributes = [Ordered]@{
     height='100%'
 }
 
+# If opacity is set, it should apply to the entire SVG.
+if ($null -ne $this.opacity) {
+    $svgAttributes['opacity'] = $this.opacity
+}
+
 # If the viewbox would have zero width or height
 if ($this.ViewBox[-1] -eq 0 -or $this.ViewBox[-2] -eq 0) {
     # It's not much of a viewbox at all, and we will omit the attribute.
@@ -73,7 +78,7 @@ $svgElement = @(
             "$($this.Style -join (';' + [Environment]::NewLine))"
         }
         "</style>"
-    }
+    }    
 
     # Declare any SVG animations
     if ($this.SVGAnimation) {$this.SVGAnimation}

Types/Turtle/set_Opacity.ps1

@@ -1,14 +1,13 @@
 <#
 .SYNOPSIS
-    Sets the opacity
+    Sets a Turtle's opacity
 .DESCRIPTION
-    Sets the opacity of the path
+    Sets the opacity of a Turtle
 .EXAMPLE
-    turtle forward 100 opacity 0.5 save ./dimLine.svg
+    turtle opacity .5 opacity
 #>
 param(
 [double]
-$Opacity = 'nonzero'
+$Opacity
 )
-
-$this.PathAttribute = [Ordered]@{'opacity' = $Opacity}
+$this | Add-Member NoteProperty '.Opacity' $Opacity -Force