@echo off
setlocal EnableDelayedExpansion
set bkp1drv=""
set bkp2drv=""
set bkpname=brisray-laptop
set BkpVol1=RayBackup3a
set BkpVol2=RayBackup3b
set n=0
set ltrs=ABCDEFGHIJKLMNOPQRSTUVWXYZ

For %%A in (%BkpVol1% %BkpVol2%) do call :fnddrv %%A

goto :eof

:fnddrv
	set n=0	
	set volName=%1
	:Loop 
	call set ltr=%%ltrs:~%n%,1%%
  	set /a n +=1
  	vol %ltr%: 2>nul|find /i " %volName%">nul||if %n% lss 26 (goto :loop)
	if %n% equ 26 (goto error)
	if %1==%BkpVol1% (
		set bkp1drv=%ltr%
		goto eof)		
	if %1==%BkpVol2% (
		set bkp2drv=%ltr%
		goto work)

:error
	echo Cannot find %1 volume
	set n=0
	echo Insert correct drive and run again
	pause
	exit

:work	
	echo Ready to Robocopy drive C: to drive %BkpVol1% (%bkp1drv%:) and then
	echo create backup of all files on %BkpVol1% (%bkp1drv%:) on %BkpVol2% (%bkp2drv%:).
	echo This process will take approx. 20 minutes on a new Windows install.
	echo.
	pause
	echo.
	echo Creating copy of current files on %BkpVol1% (%bkp1drv%:)
	robocopy %USERPROFILE% %bkp1drv%:\%bkpname%-current /s /purge /XA:ST /r:0 /XF *.bak *.bkp *.tmp /XD temp* *recycle* /LOG:"%USERPROFILE%\Documents\backup.log"
	echo.
        echo Copying fonts to %BkpVol1% (%bkp1drv%:)
	robocopy %windir%\fonts %bkp1drv%:\%bkpname%-current\Windows\Fonts /s /XA:ST /r:0 /XF *.bak *.bkp *.tmp /LOG+:"%USERPROFILE%\Documents\backup.log"
	echo.
	echo Copying current files on %BkpVol1% (%bkp1drv%:) to main backup (%BkpVol1% (%bkp1drv%:))
	robocopy %bkp1drv%:\%bkpname%-current %bkp1drv%:\%bkpname% /s /XA:ST /r:0 /XF *.bak *.bkp *.tmp /XD AppData temp* *recycle* /LOG+:"%USERPROFILE%\Documents\backup.log"
	echo.
	echo Copying current AppData files on %BkpVol1% (%bkp1drv%:) to main backup (%BkpVol1% (%bkp1drv%:))
	robocopy %bkp1drv%:\%bkpname%-current\AppData %bkp1drv%:\%bkpname%\AppData /s /purge /XA:ST /r:0 /XF *.bak *.bkp *.tmp /XD temp* *recycle* /LOG+:"%USERPROFILE%\Documents\backup.log"
	echo.
	echo Creating backup of all files on %BkpVol1% (%bkp1drv%:) on %BkpVol2% (%bkp2drv%:)
	robocopy %bkp1drv%: %bkp2drv%: /MIR /r:0 /XF *.bak *.bkp *.tmp /XD temp* $recycle* Seagate* /A-:SH /LOG+:"%USERPROFILE%\Documents\backup.log"
:eof