Разыскивается Console.ReadKey() в вариации Console.ReadTwoKeys(delay) без эха

$out = @()
$cnt,$delay = 1,10
while ($true)
{
    if ([console]::keyavailable)
    {
        $k = [console]::readkey($true)
        if ($k.key -eq [consolekey]::enter){break}
        else {$out += $k.key}
    }
    [threading.thread]::sleep(1000)
    if ($cnt++ -gt $delay)
    {
        "Расторопность - залог здоровья"
        -join $out
        break
    }
}

sleep -s 1

$out = @()
$cnt,$delay = 1,10
while ($cnt -le $delay)
{
    if ([console]::keyavailable)
    {
        $k = [console]::readkey($true)
        if ($k.key -eq [consolekey]::enter){break}
        else 
        {
            $out += $k.keychar
            [console]::beep(4000,100)
        }
    }
    sleep -s 1
    if ($cnt++ -eq $delay)
    {
        "Расторопность - залог здоровья"
        -join $out
    }
}

function ReadKey ($key, $timeout, $script) {
    $delay = 0;
    [Console]::CursorVisible = $false
 
    while ($true) {
        if ([Console]::KeyAvailable) {
            if ([Console]::ReadKey($true).Key -eq $key) {
                & $script
                break
            } else {
                break
            }
        }
 
        if ($timeout -gt 0) {
            if ($delay -eq $timeout) {
                break
            }
 
            $delay++
            [Console]::Write(("{0,-5}`b`b`b`b`b" -f $delay))
            Start-Sleep -Milliseconds 100
        }
    }
 
    [Console]::CursorVisible = $true
}
 
. {
    Clear-Host
    'Нажмите клаившу «Home»'
    ReadKey 'Home' 0 {
        'Нажмите клаившу «Home», до счёта 30'
        ReadKey 'Home' 30 {
            Clear-Host
            'Нажата клавиша «Home» — дважды!'
        }
    }
}