www.makemkv.com

Code: Select all

@if "%EMode%"=="" Set EMode=OFF
@ECHO %EMode%
SetLocal DisableDelayedExpansion

Set "EXTLIST=*.mkv"
Set "DoPop="

if [%1]==[] (
	Set "Pattern=%EXTLIST%"
	CALL :START %1
)

:ARGS

	if [%1]==[] (
		EndLocal
		pause
		goto :eof
	)
	if NOT EXIST %1 (
		SHIFT
		goto :ARGS
	)
	Set "Pattern=%EXTLIST%"
	if "%~f1"=="%CD%" (
		CALL :START %1
		SHIFT
		goto :ARGS
	)
	Type NUL
	pushd "%~f1" 2> nul
	if NOT "%errorlevel%"=="0" (
		if NOT "%CD%\"=="%~dp1" (
			pushd "%~dp1"
			Set "DoPop=1"
		)
		Set Pattern="%~nx1"
	) else (
		Set "DoPop=1"
	)
	CALL :START %1
	if "%DoPop%"=="1" (
		popd
		Set "DoPop="
	)
	SHIFT

goto :ARGS

:START

	Set "Count=0"
	for %%y in (%Pattern%) do (
		CALL :Process_File "%%~fy"
	)
	if "%Count%"=="0" (
		for /d %%b in (*) do (
			pushd "%%~fb"
			CALL :START "%%~fb"
			popd
		)
	)

goto :eof

:Process_File

	Set /a Count+=1
	
	SetLocal DisableDelayedExpansion
	echo Processing; "%~nx1"
	Set "Work=%~n1"
	if "%Work:~-4,1%"=="_" if "%Work:~-3,1%"=="t" (
		Set "Work=%Work:~0,-4%"
	)
	Set "Work=%Work:_= %"
	if NOT "%~n1"=="%Work%" (
		echo Renaming "%~nx1" to "%Work%%~x1"
		ren "%~f1" "%Work%%~x1"
	)
	EndLocal

goto :eof