:: reset archive bit on all files in and under directory
@echo off
if .%1==.DoDir goto DoDir
if exist enter.com goto conflict
if exist new.bat goto conflict
echo Reset Archive Bits for all files?
choice /c:ny >nul
if not errorlevel 2 goto done 
if exist *.* echo Current Directory..
if exist *.* attrib *.* -a
copy c:\dos\loadfix.com enter.com > nul 
dir /s /ad /b > dirfile$
echo.>>dirfile$
type dirfile$|date|find "Enter" > dirfile$.bat
del dirfile$
echo @echo off > new.bat
echo %0 DoDir %%3 >> new.bat
call dirfile$.bat
del dirfile$.bat
del enter.com
del new.bat
goto done
:conflict
echo ENTER.COM or NEW.BAT exists - remove or rename
goto done
:DoDir
if .%2==. goto done
if not exist %2\*.* goto done
echo %2..
attrib %2\*.* -a
:done