22/11/28 23:31:47.71 YeZSlVdS.net
PowerShell を使っていいなら
for /F "tokens=2 delims=[;" %%L in ('pwsh -nop -c "[console]::Error.Write(\"`e7`e[999^;999H`e[6n`e8\"); [console]::Error.Flush(); do { $k = [console]::ReadKey().KeyChar; } until ($k -eq \"R\"); \"\""') do echo LINES: %%L
Windows PowerShell だと `e が使えないからもう少しごちゃっとする