feat: Reducing Turtle Verbosity ( Fixes #160 )

Author: StartAutomating

Types/Turtle/get_Heading.ps1

@@ -5,8 +5,8 @@
     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'
 

Types/Turtle/set_Heading.ps1

@@ -15,10 +15,4 @@ $Heading
 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"
-}
+$this.'.TurtleHeading' = $Heading

Types/Turtle/set_IsPenDown.ps1

@@ -2,10 +2,8 @@ param(
 [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
+}