Помогите создать batник для копирования папок

[k0l9.khv]

Добрый день , помогите создать batник для копирования папок.
1 Есть структура папок(на самом деле она больше) http://www.imageup.ru/img64/thumb/snimok232493695.jpg (http://www.imageup.ru/img64/2493695/snimok23.jpg.html)
2 в папках "аа,а,б,в" лежат файлы
Нужно : чтобы все папки "аа,а,б,в" и файлы в них копировались в 1 папку "реестры готово".
т.е. чтобы в папке "реестры готово" были папки "аа,а,б,в." со всеми файлами.

[alpap]

Код сохранить в кодировке OEM 866:

@echo off
set "d=основная папка"
set "d_out=реестры готово"
for %%a in ("а","аа","б","в") do for /f "delims=" %%b in ('dir/a-d/b/s "%d%"^|findstr/rc:"\<%%~a\>"') do (
if not exist "%d_out%\%%~a" md "%d_out%\%%~a"
copy "%%b" "%d_out%\%%~a"
)
exit
.