Oracle VM VirtualBox

@echo off
color 0f
cd /d "%~dp0"
if "%1"=="" set UsbDrive=1
set VBoxName=UsbTestBox
set UsbTestDrive="%temp%\UsbTest.vmdk"
set VboxMemory=768
:_1
for /f "tokens=2,*" %%a in ('reg.exe query hklm\software\oracle\virtualbox /v InstallDir') do set VboxPath=%%b
if "%VboxPath%"=="" goto _err1
set VBoxManage="%VboxPath%VBoxManage.exe"
for /f tokens^=2^ delims^=^" %%a in ('type "%USERPROFILE%\.VirtualBox\VirtualBox.xml" ^| find /i "SystemProperties defaultMachineFolder"') do set MachineFolder=%%a
%VBoxManage% unregistervm "%VBoxName%" --delete
2>nul del /q %UsbTestDrive%
2>nul rd /s /q "%MachineFolder%\%VBoxName%"
%VBoxManage% internalcommands createrawvmdk -filename %UsbTestDrive% -rawdisk \\.\PhysicalDrive%UsbDrive%
%VBoxManage% closemedium disk %UsbTestDrive%
%VBoxManage% createvm --name "%VBoxName%" --register
%VBoxManage% modifyvm "%VBoxName%" --ostype Windows2003
%VBoxManage% storagectl "%VBoxName%" --name "IDE Controller" --add ide --controller PIIX4
%VBoxManage% modifyvm "%VBoxName%" --nictype1 82540EM --cableconnected1 on
%VBoxManage% modifyvm "%VBoxName%" --nic1 nat
%VBoxManage% modifyvm "%VBoxName%" --usb on --usbehci on
%VBoxManage% modifyvm "%VBoxName%" --audio dsound
%VBoxManage% modifyvm "%VBoxName%" --audiocontroller ac97
%VBoxManage% modifyvm "%VBoxName%" --vram 32
%VBoxManage% modifyvm "%VBoxName%" --accelerate2dvideo on
%VBoxManage% modifyvm "%VBoxName%" --accelerate3d on
%VBoxManage% modifyvm "%VBoxName%" --memory %VboxMemory%
%VBoxManage% modifyvm "%VBoxName%" --mouse usbtablet
%VBoxManage% modifyvm "%VBoxName%" --clipboard bidirectional
%VBoxManage% storageattach "%VBoxName%" --storagectl "IDE Controller" --port 0 --device 0 --type hdd --medium %UsbTestDrive%
%VBoxManage% startvm "%VBoxName%"
GoTo :eof
:_err
color 4f
echo ERROR   -   Command string:
echo.%~dpnx0 %*
echo.
echo  - Usb drive not found !!!
set /p xx=^>^>
color 0f
goto :eof
:_err1
color 4f
echo ERROR   -   Command string:
echo.%~dpnx0 %*
echo.
echo  - VirtualBox  not found !!!
set /p xx=^>^>
color 0f
goto :eof