Поиск в каталоге подкаталога с указанным именем

@echo off
setlocal enabledelayedexpansion
set "param=%*"
set /p "subdirectory=Введите название подкаталога: "
if defined param (
    for %%a in (%param%) do (
        if /i "%%a"=="a" (
            call :step_1 "%%a"
        )
        if /i "%%a"=="r" (
            call :step_1 "%%a"
        )
        if /i "%%a"=="h" (
            call :step_1 "%%a"
        )
        if "%%a"=="help" (
            call :step_3
        )
    )
) else (
    call :step_2
)
pause
exit
:step_1
for /f "tokens=* delims=" %%a in ('dir /ad/b/s "C:\test"') do (
    if /i "%%~nxa"=="%subdirectory%" (
        set /A count_1+=1
        echo Подкаталог "%subdirectory%" найден и имеет путь "%%a"
        set "full_subdirectory=%%a"
        for /f "tokens=* delims=" %%a in ('dir /a-d/b "!full_subdirectory!"') do (
            attrib "%%a" | findstr /i /c:%1
            if !errorlevel!==0 (
                echo Подкаталог "!full_subdirectory!" содержит файлы с атрибутом %1
                set /A count_2+=1
            )
        )
    )
)
if not defined count_1 (
    echo Подкаталог "!full_subdirectory!" не найден
    exit /b
)
if not defined count_2 (
    echo Подкаталог "!full_subdirectory!" не содержит файлы с атрибутом %1
        set count_1=    
        exit /b
)
set count_1=
set count_2=
exit /b
:step_2
for /f "tokens=* delims=" %%a in ('dir /ad/b/s "C:\test"') do (
    echo %%a
)
exit /b
:step_3
help
pause
exit /b