Инсульт,
Размеры файлов у вас фиксированы примерно как погляжу. Могу предложить вариант до RAR, с количественным распределением файлов по папкам, может и так устроит:
Код:
@echo off
set kf=10 &: Число файлов в папке
:l
set/a m+=1
setlocal enabledelayedexpansion
2>nul dir/a-d/b "papka"|>nul find/v "" || goto :eof
for /f "delims=" %%a in ('2^>nul dir/a-d/b "papka"') do (
if not exist "papka_%m%" md "papka_%m%"
set/a n+=1& if !n! leq %kf% >nul move/y "papka\%%a" "papka_%m%\%%a"
)
endlocal
goto l
exit.
