Пакетное переименование

@echo off
for /f "tokens=* delims=" %%a in ('dir /a-d/b/s C:\test\*.wav') do (
    call :step_1 "%%a"
)
pause
exit
:step_1
set "full_path=%~f1"
for /f "tokens=1-3 delims=." %%a in ("%~nx1") do (
    call :step_2 "%%a" "%%b" "%%c"
)
exit /b
:step_2
for /f "tokens=1,2 delims=-" %%a in (1.txt) do (
    if %2=="%%a" ren "%full_path%" "%~1.%%b.%~3"
)
exit /b

@echo off
for /f "tokens=* delims=" %%a in ('dir /a-d/b/s C:\test\*.wav') do (
    call :step_1 "%%a"
)
pause
exit
:step_1
set "full_path=%~f1"
for /f "tokens=1-3 delims=. " %%a in ("%~nx1") do (
    call :step_2 "%%a" "%%b" "%%c"
)
exit /b
:step_2
for /f "tokens=1,2 delims=-" %%a in (1.txt) do (
    if %2=="%%a" ren "%full_path%" "%~1.%%b.%~3"
)
exit /b

@echo off
set "d=C:\Papka"
set "f=C:\file.txt"
set "ext=wav"
 
for /f "usebackq delims=" %%a in ("%f%") do set "%%a"
for /f "tokens=1,2* delims=." %%a in ('dir /a-d/b/s "%d%\*.%ext%"') do if defined %%b call ren "%%a.%%b.%%c" "%%~na.%%%%b%%.%%c"
pause

@echo off
for /f "tokens=* delims=" %%a in ('dir /a-d/b/s *.wav') do (
    call :step_1 "%%a"
)
pause
exit
:step_1
set "full_path=%~f1"
for /f "tokens=1-3 delims=." %%a in ("%~nx1") do (
    call :step_2 "%%a" "%%b" "%%c"
)
exit /b
:step_2
for /f "tokens=1,2 delims=-" %%a in (1.txt) do (
    if %2=="%%a" ren "%full_path%" "%~1.%%b.%~3"
)
exit /b

@echo off
set "d=C:\Papka"
set "ext=wav"
 
set "SL=Ls"
set "SR=Rs"
set "SC=Cs"
set "BL=Lsr"
set "BR=Rsr"
 
for /f "tokens=1,2* delims=." %%a in ('dir /a-d/b/s "%d%\*.%ext%"') do if defined %%b call ren "%%a.%%b.%%c" "%%~na.%%%%b%%.%%c"
pause