Robocopy cmd ohne loop und ping

@echo off

	set LOG="C:\Users\b450wyp\Desktop\LOG\AonlytoB"  
	set Quelle="C:\Users\b450wyp\Desktop\Quelle\QuellezuZiel"  
	set Ziel="C:\Users\b450wyp\Desktop\Ziel\QuellezuZiel"  

	If not Exist %Quelle% md %Quelle%
	If not Exist %Ziel% md %Ziel%

:replicate
	for /F "tokens=1-4 delims=:., " %%a in ('time/T') do set TIME=%%a%%b%%c  
	
	@For /F "tokens=1,2,3 delims=., " %%A in ('Date /t') do (   
		Set Month=%%A
		Set Day=%%B
		Set Year=%%C
		SET parsedd=%%C%%B%%A
	)
	
	ren "%LOG%\LOG.log" "%parsedd%_%TIME%_Log.log"  
	
REM Pro Sekunde 1 ping
	ping 127.0.0.1 -n 10  >nul
	
REM /MON:1 /MOT:1 /R:10 /W:2
	If not Exist %LOG% md %LOG%
	robocopy %Quelle% %Ziel%  /MIR /COPYALL /PURGE /NP /LOG+:"%LOG%\LOG.log" /MON 1 /R:10 /W:2   

goto replicate