Обработка вывода в одной строке

While ($true) {
$Array = @('H', 'e', 'l', 'l','o', ',', ' ', 'W', 'o', 'r','l','d','!')
$eArray = @('','','','','', '','','','','','','','')
$i = 0 
 
while ($i -lt $Array.Count)
{
    if ($eArray[$i] -ne $Array[$i])
    {
    $eArray[$i] = Get-Random -InputObject $Array
    }
    if ($eArray[$i] -eq $Array[$i])
    {
    $i++
    }
    $x = 0 
    Write-Host
    while ($x -lt $eArray.Count)
    {
    Write-Host $eArray[$x] -NoNewline
    $x++
    }
    Start-Sleep -Milliseconds 100
}
Start-Sleep 2
cls
}

$arr='Привет мир!'
$num = 32..126;$num+= 1040..1103
for($i=0;$i -lt $arr.length;$i++){
    do {
        $b = $num|get-random
        $m = [char]$b
        write-host "`b$m" -nonew
        sleep -m 10
    } while($arr[$i] -cne $m)
    write-host $(if($arr[-1] -eq $m){"`b$m"}else{$m}) -nonew
}

for ($s, $i, $m = "Hello, world!", 0, -join[Char[]](32..126+1040..1103);;) { # цикл бесконечен
  switch (($c = $m[(Get-Random -Min 0 -Max $m.Length)]) -ceq $s[$i]) {
    $true  { $r += $c; $i++; Start-Sleep -Milliseconds 500 }
    $false { [Console]::Write("`r$r$c`b") }
  }
  if ($i -eq $s.Length) { [Console]::Write("`r$r "); break } # условие выхода из цикла
}

for ($s, $i, $m = "Hello, world!", 0, -join[Char[]](32..126+1040..1103); $i -ne $s.Length;) {
  switch (($c = $m[(Get-Random -Min 0 -Max $m.Length)]) -ceq $s[$i]) {
    $true  { $r += $c; $i++ }
    $false { [Console]::Write("`r$r$c`b") }
  }
  Start-Sleep -Milliseconds 100
  [Console]::Write("`r$r")
}