Код:
@Echo Off
cls
If "%~1"=="" (Echo !!! No Input Folder &Pause &Exit /B 2)
If Not Exist "%~1" (Echo !!! Folder not found "%~1" &Pause &Exit /B 1)
Set "BoxIn=%~1"
If "%BoxIn:~-1%"=="\" Set "BoxIn=%BoxIn:~0,-1%"
Set "Def="
Set "Marg= "
rem Set "Marg="
Echo %BoxIn%
For /F "usebackq delims=" %%d IN (`2^>nul Dir "%BoxIn%" /B /A:D`) DO Call :Out "%BoxIn%\%%d" %Def%- "%Marg%"
pause
GoTo :Eof
:Out
Echo %~3%2%~nx1
For /F "usebackq delims=" %%d IN (`2^>nul Dir %1 /B /A:D`) DO Call :Out "%~1\%%d" %2- "%~3%Marg%"
GoTo :Eof
