Вывести результат выполнения команды HELP в текстовый файл так, чтобы у каждой команды был порядковый номер

powershell -exec bypass -c "help.exe| %{[regex]::Replace($_, '(^[A-Z]{2,})', ('{0}. {1}' -f $i++, '$1'))}"

<# :
  @echo off
    pushd "%~dp0"
        powershell -nop -exec Bypass -command ^
            "&{[ScriptBlock]::Create((cat "%~f0") -join [Char]10).Invoke(@(&{$args}%*))}"
    pause
  exit /b
#>
 
$text="";help.exe|%{$text+=$_ +"`r`n"}
$m=([regex]"(?sm)(^[A-Z]+.+?)(?=`r`n[A-Z]+)").Matches($text)
0..($m.count-1)|%{
    ("[" +($_+1)+"]" + $m[$_].Groups[1].value)|out-file help.txt -enc default -append
}

@echo off
for /f "usebackq skip=1 tokens=2*" %%c in (`help`) do echo %%c %%d
pause

@echo off
Setlocal EnableDelayedExpansion
for /f "usebackq tokens=1*" %%a in (`help^|findstr /b [A-Z]`) do (
set /a b+=1
echo !b!.%%a
)
pause

vim  ^
     +"read !help" ^
     +"let c=1 | g/\v^[A-Z]{2,}/exec 'norm! I' . printf('%%02d. ', c) | let c=c+1" ^
     +"wq! nhelp.txt"

@echo off
echo Выполняем...
echo.
powershell -nologo "&{$i=0;$a=help.exe;$OFS='#';$b=([string]$a -creplace '#\s*([a-zа-яё])',' $1' -replace '#\s*#','#').split('#');$b|%%{[regex]::Replace($_, '(^[A-Z]{2,})', ('{0}. {1}' -f $i++, '$1'))}}"
echo.
echo Готово.
pause

@echo off
setlocal enabledelayedexpansion
 
set num=1
 
for /f "tokens=* delims=. eol=" %%a in ('help') do (
    for /f "tokens=1" %%b in ("%%a") do (
        set string=%%a
        for /f %%c in ('echo:%%b^|findstr /r /x "[ABCDEFGHIJKLMNOPQRSTUVWXYZ]*"') do (
            set string=^(!num!^)!string!
            set /a num+=1
        )
        echo !string!
    )
)

@echo off
>nul chcp 1251
setlocal enabledelayedexpansion
 
>"result.txt" (
    for /f "tokens=1* delims=:" %%a in ('help^| findstr /n "^"') do @(
        set /a n+=1& <nul set /p ="!n!. %%b"| findstr /r /c:"^[0-9]*\. [A-Z]"|| echo.%%b&& set /a n-=1
    )
)
 
endlocal
exit /b

powershell "help.exe|%{$i=1}{if ($_ -match'(^[A-Z]{2,})'){$_ -replace $matches[0],('[{0:d2}] {1}' -f $i++, $matches[0])}}"

powershell "help.exe| %{$i=1}{if ($_ -match'(^[A-Z]{2,})' ){$_ -replace $matches[0], ('[{0:d2}] {1}' -f $i++, $matches[0])} else {$_}}"