@echo off
:start
::================================================
set fup=fup
set pur=purge
set alt=altpr
set sec=secure
set cod=,code 100
set ccc=,"cccc"
set Infile=temp.dak
set Outfile=purge.jim
::================================================
for /f "tokens=1 delims= " %%a in ('dir /AD ^| findstr /R /V "\.\>" ^| find /c "<DIR>"') do set dirs=%%a
echo %dirs%
pause
::for /f "skip=%dirs%" %%a in ('dir /b /o:g') do echo %fup% %pur% %%a >testttt.txt& set list=%%a
for /f "skip=%dirs%" %%a in ('dir /b /o:g') do call :sub %%a
set dirs=
goto :eof
:sub %%a
set dirs=%1
for /f "skip=%dirs%" %%a in ('dir /b /o:g') do echo %%a
echo %list%
pause
::for /f "delims=" %%a in ("%list%") do echo %fup% %pur% %%a>>%Outfile%
::echo.>>%Outfile%
::for /f "delims=" %%a in ("%list%") do echo %fup% %alt% %%a %cod%>>%Outfile%
::echo.>>%Outfile%
::for /f "delims=" %%a in ("%list%") do echo %fup% %sec% %%a %ccc%>>%Outfile%
::echo.>>%Outfile%
::pause