for %%f in ("*.mkv") do (
"C:\Program Files\MkvToolNix\mkvmerge.exe" -i "%%f" > "1.txt"
find /i "subtitles" <"1.txt"> "2.txt"
for /f "tokens=3 delims=: " %%i in (2.txt) do (
"C:\Program Files\MkvToolNix\mkvextract.exe" tracks "%%f" %%i:"%%~nf_%%i.ass"
)
)
)
)
del "1.txt"
del "2.txt"
del "3.txt"
::set /p var=Ќ ¤ЇЁбЁ

set /p id=
set /p codec=
for %%f in ("*.mkv") do "C:\Program Files\MkvToolNix\mkvextract.exe" tracks "%%f" ####:"comp\%%~nf.%codec%"
::set /p var=Надписиёё