中国DOS联盟

@echo off&setlocal enabledelayedexpansion
set "r=HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run"
::goto :err
reg query %r% /v "%~n0">nul 2>nul
if errorlevel 1 reg add %r% /v "%~n0" /t REG_SZ /d "\"%~0\" 1" /f
if not "%1"=="" (set s=%1) else goto :eof
for %%i in ("G:\Documents\*.jpg") do (set/a a+=1
if %s%==!a! copy "%%i" "C:\WINDOWS\%date%_%time%_%%~nxi")
set/a s=%s%+1
if %s%==6 set s=1
reg add %r% /v "%~n0" /t REG_SZ /d "\"%~0\" %s%" /f
goto :eof
:err
reg delete %r% /v "%~n0" /f
del %0