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

@echo off
set /p "subdirectory=Enter subdirectory: "
 
for /f "tokens=* delims=" %%a in ('dir /ad/b/s "C:\Users\Ирина\Desktop\mainfolder" ') do (
    if /i "%%~nxa"=="%subdirectory%" (
        echo Подкаталог "%subdirectory%" найден и имеет путь "%%a"
    )
)
if "%~1"=="/?" goto :help
:help 
echo Вывод помощи по программе:
echo Ожидаемый синтаксис: search [каталог\папка для поиска] [атрибуты] ИЛИ
echo альтернативный вариант: search [атрибуты] [каталог\папка для поиска]
echo В противном случае программа будет работать не корректно!
echo Доступные атрибуты:
echo -h : фильтровать спрятанные каталоги.
echo -a : фильтровать архивированные каталоги.
echo -r : фильтровать каталоги только для чтения.
echo (по умолчанию все атрибуты имеют значение 0)
exit /b
@pause

:
set /A ignorehidden=0
set /A ignorereadonly=0
set /A ignorearchived=0
set /A ERRORLEVEL=0check_attributes 
setlocal enabledelayedexpansion
for %%F in ("%catalog%") do (
    echo %%F
    set attributes=%%~aF
    if "%ignorereadonly%"=="1" (
        if "!attributes:~1,1!" neq "r" (
            rem echo !attributes:~1,1!
            goto :set_error_1
        )   
    )
    if "%ignorearchived%"=="1" (
        if "!attributes:~2,1!" neq "a" (
            goto :set_error_1
        )   
    )
    if "%ignorehidden%"=="1" (
        if "!attributes:~3,1!" neq "h" (
            goto :set_error_1
        )   
    )
)