Код:

@echo off
setlocal enableextensions enabledelayedexpansion
set sSourceFolder=C:\Мои проекты\38
set sMask=*.jpg
set sFolderList=C:\Мои проекты\38\name.txt
if exist "%sSourceFolder%\." (
pushd "%sSourceFolder%"
if exist "%sFolderList%" (
for /f "usebackq delims=" %%i in ("%sFolderList%") do (
2>nul md "%%~i"
for /f "usebackq tokens=1* delims=[]" %%j in (
`2^>nul dir /b /a:-d /o:d /t:c "%sSourceFolder%\%sMask%" ^| find.exe /n /v ""`
) do if %%j leq 3 >nul move "%%~k" "%%~i\"
)
) else (
echo Can't find folder list file [%sFolderList%].
exit /b 2
)
popd
) else (
echo Can't find source folder [%sSourceFolder%].
exit /b 1
)
endlocal
exit /b 0