feat: Reducing Turtle Verbosity ( Fixes #160 )

Author: StartAutomating

Turtle.types.ps1xml

@@ -2428,10 +2428,10 @@ $this.PathAttribute = [Ordered]@{'fill-rule' = $fillRule.ToLower()}
     Gets the current heading of the turtle.
 #>
 param()
-if ($null -ne $this.'.TurtleHeading') {
-    return $this.'.TurtleHeading'
+if ($this -and -not $this.psobject.properties['.TurtleHeading']) {
+    $this.psobject.properties.add([PSNoteProperty]::new('.TurtleHeading', 0.0), $false)
 }
-return 0
+return $this.'.TurtleHeading'
 
 
                     </GetScriptBlock>
@@ -2454,12 +2454,6 @@ if ($this -and -not $this.psobject.properties['.TurtleHeading']) {
     $this.psobject.properties.add([PSNoteProperty]::new('.TurtleHeading', 0), $false)
 }
 $this.'.TurtleHeading' = $Heading
-
-# $this.psobject.properties.add([PSNoteProperty]::new('.TurtleHeading', $Heading), $false)
-# $this |  Add-Member -MemberType NoteProperty -Force -Name '.TurtleHeading' -Value $Heading
-if ($VerbosePreference -ne 'SilentlyContinue') {
-    Write-Verbose "Heading to $Heading"
-}
                     </SetScriptBlock>
       </ScriptProperty>
       <ScriptProperty>
@@ -2532,13 +2526,12 @@ return $true
 [bool]
 $IsDown
 )
-
-$this | 
-    Add-Member -MemberType NoteProperty -Force -Name '.IsPenDown' -Value $IsDown
-    
-if ($VerbosePreference -ne 'SilentlyContinue') {
-    Write-Verbose "Turtle is now $($IsDown ? 'down' : 'up')"
+if ($null -eq $this.'.IsPenDown') {
+    $this | Add-Member -MemberType NoteProperty -Force -Name '.IsPenDown' -Value $IsDown
+} else {
+    $this.'.IsPenDown' = $IsDown
 }
+
                     </SetScriptBlock>
       </ScriptProperty>
       <ScriptProperty>