Cheap Screen reader code for PowerShell

Out-Default.ps1

Function Out-Default {
    [CmdletBinding()]
    Param(
        [Parameter(ValueFromPipeline)]
        [PSObject]
        $InputObject,

        [switch]
        $Transcript
    )
    begin {
        if (-not $global:SpeechQueue) {
            $PowerShell = [PowerShell]::Create()
            $global:SpeechQueue = [System.Collections.Concurrent.BlockingCollection[String]]::new(
                [System.Collections.Concurrent.ConcurrentQueue[string]]::new())
            $Null = $PowerShell.AddScript({
                Param(
                    [System.Collections.Concurrent.BlockingCollection[String]]
                    $SpeechQueue
                )
                $Null = Add-Type -AssemblyName System.Speech
                $speech = [System.Speech.Synthesis.SpeechSynthesizer]::new()
                $speech.Rate = 5
                foreach($SpeechString in $SpeechQueue.GetConsumingEnumerable()){
                    $Null = $speech.Speak($SpeechString)
                }
            })
            $Null = $PowerShell.AddParameter('SpeechQueue',$global:SpeechQueue)
            $global:SpeechHandle = $PowerShell.BeginInvoke()
        }

        $List = [System.Collections.Generic.List[PSObject]]::New()
    }
    Process {
        $null = $List.Add($InputObject)
    }
    end {
        $SpeechString =  $List | Out-String
        $global:SpeechQueue.Add($SpeechString)
        $List | Microsoft.PowerShell.Core\Out-Default -Transcript:$($Transcript.IsPresent) 
    }
}