@echo off
setlocal EnableExtensions EnableDelayedExpansion
pushd %~dp0
rem thanks to cdob

set System_Root=E:\Windows
if not %1.==. set System_Root=%1

if not exist "%System_Root%\system32\config\system" set /P System_Root=Path to your SystemRoot folder on usb drive (e:\Windows):
if not exist "%System_Root%\system32\config\system" (echo Error: target not found &pause &popd &goto :eof)

copy "%System_Root%\system32\config\system" "%System_Root%\system32\config\system_%random%.sav"
reg.exe load HKLM\loaded_SYSTEM "%System_Root%\system32\config\system"

set ControlSetDefault=
call :setReg Default
call :setReg LastKnownGood

reg.exe unload HKLM\loaded_SYSTEM
popd

goto :eof

:setReg
 set ControlSet=001
 reg.exe query "HKLM\loaded_SYSTEM\Select" /v "%1" >nul 2>&1 && (
  for /f "skip=2 tokens=3" %%a in ('reg.exe query "HKLM\loaded_SYSTEM\Select" /v "%1"') do set /a ControlSet=%%a
  set ControlSet=000!ControlSet!
 )
 set ControlSetNNN=ControlSet%ControlSet:~-3%
 if %ControlSetDefault%.==%ControlSetNNN%. goto :eof
 echo. &echo ControlSet "%ControlSetNNN%" used.

 set Services=HKLM\loaded_SYSTEM\%ControlSetNNN%\Services
 set Control=HKLM\loaded_SYSTEM\%ControlSetNNN%\Control

 reg.exe add %Control%\PnP /f /v PollBootPartitionTimeout /t REG_DWORD /d 30000
 reg.exe add %Control% /f /v BootDriverFlags /t REG_DWORD /d 0x6

 set ControlSetDefault=%ControlSetNNN%
goto :eof