Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- @ECHO OFF
- :: set mediainfo=D:\Apps\MediaInfo\CLI\MediaInfo.exe
- :: set mkvextract=D:\Apps\MKVToolnix\mkvextract.exe
- mediainfo "--Inform=Audio;%%CodecID%% " %1 > acodec.txt
- FOR /F "tokens=1,2 delims= " %%e IN (acodec.txt) DO (
- IF %%e==A_DTS SET acodec1=dts
- IF %%e==A_AC3 SET acodec1=ac3
- IF %%e=="" GOTO EOF
- IF %%f==A_DTS SET acodec2=dts
- IF %%f==A_AC3 SET acodec2=ac3
- IF %%f=="" SET acodec2=
- )
- del acodec.txt
- ECHO.
- ECHO %~n1
- ECHO.
- IF "%acodec2%"=="" (
- ECHO Codec ID: %acodec1% & ECHO.
- SET track1=
- ) ELSE (
- ECHO Codec1 ID: %acodec1% & ECHO.
- ECHO Codec2 ID: %acodec2% & ECHO.
- SET track1=-t1
- SET track2=-t2
- )
- FOR /F "delims=" %%i IN ('ECHO %~n1 ^| sed -e "s/\./ /g" -e "s/\(.*\)\([0-9][0-9][0-9][0-9]\)\([[:space:]].*$\)/\1\2/" -e "s/ /\./g"') DO (
- SET target=%%i
- )
- ECHO Target: %target% & ECHO.
- mkvextract tracks "%~nx1" "1:%target%%track1%.%acodec1%"
- IF NOT "%acodec2%"=="" (
- ECHO.
- mkvextract tracks "%~nx1" "2:%target%%track2%.%acodec2%"
- )
- :EOF
Advertisement
Add Comment
Please, Sign In to add comment