[Foreigner]

Код:

@echo off
setlocal

pushd "C:\Path\To\Your Folder" || goto:eof

for /f "tokens=*" %%i in (' dir /b /a-d ') do call:move "%%i"
popd
goto:eof

:move
set "dest=%~1"
2>nul md "%dest:~0,2%"

move %1 "%dest:~0,2%"