System Benchmark Retriever Alpha 1.6

@echo on
setlocal enabledelayedexpansion
set version=Alpha 1.6


:: This is still being worked on. The base of it is done.
:: Script Version: Alpha 1.6
:: by Wesley J. B.


:: GPU Modifier. For seeing which GPU is more worth it.
set modecustom=0
if %modecustom% EQU 0 goto :modecustom
set gpumodelname=GeForce+GTX+980+Ti
::set gpumodelname=GeForce+GTX+TITAN+X
::set gpumodelname=Quadro+M6000
:modecustom



:: I should also mention that this is compatible with any amount of HD's or RAM Sticks. You could have 64 hard drives and it would look through all of them. I only have 2 to test with,
:: but when messing with the information files (disabling the script from rewriting them of course), it will display all of them with their proper info in system order.
:: Example: My main drive is on line 6 when it should be on line 3. Based on the DeviceID, I can put them in the correct order.



title Benchmark Retriever %version%

rem type testing.temp > hdsize.temp
mkdir "%CD%\sbr_a16"
set maindir="%CD%"
set directory="%CD%\sbr_a16"
CD /D "%directory%"

:hdstartcust

::goto :gpustart
::Start HD Section
echo Start HD Section
echo.
echo.
wmic diskdrive list full /format:list >testing.temp

wmic diskdrive get model /format:list >hdmodel.temp

wmic diskdrive get size /format:list >hdsize.temp

wmic diskdrive get deviceid /format:list >hddevid.temp


setlocal EnableDelayedExpansion
set "cmd=findstr /R /N "^^" hdmodel.temp | find /C ":""

for /f %%a in ('!cmd!') do set number=%%a

set /a number=%number%/4
set /a numofhdrives=%number%
echo Number of Hard Drives: %number%

set number=0
:separatehdinfo0
set /a numbers=%number%-1
type hddevid.temp>hddevid%number%.temp
type hdmodel.temp>hdmodel%number%.temp
type hdsize.temp>hdsize%number%.temp
for /f "tokens=1 delims=:" %%a in ('
findstr /n /c:"%number%" hddevid%number%.temp
') do set hdnumline=%%a
echo ----------------------------------------
echo Line in Data: %hdnumline%
set /a hdnumline=%hdnumline%-1

for %%x in (hddevid%number%.temp) do (more +%hdnumline% "%%x">tmp & move /y tmp "%%x")
for %%x in (hdmodel%number%.temp) do (more +%hdnumline% "%%x">tmp & move /y tmp "%%x")
for %%x in (hdsize%number%.temp) do (more +%hdnumline% "%%x">tmp & move /y tmp "%%x")

set /p hddevidnum%number%=<hddevid%number%.temp
echo !hddevidnum%number%! >hddevid%number%.temp

set /p hdmodelnum%number%=<hdmodel%number%.temp
echo !hdmodelnum%number%! >hdmodel%number%.temp

set /p hdsizenum%number%=<hdsize%number%.temp
echo !hdsizenum%number%! >hdsize%number%.temp

echo !hddevidnum%number%!
echo !hdmodelnum%number%!
echo !hdsizenum%number%!

for /f "tokens=*" %%a in (hddevid%number%.temp) do (
set xx=%%a
set xx=!xx:~13!
echo.!xx!
) >hddevid%number%.temp
set /p hddevidname%number%=<hddevid%number%.temp
echo !hddevidname%number%!
echo.

for /f "tokens=*" %%a in (hdmodel%number%.temp) do (
set xx=%%a
set xx=!xx:~6!
echo.!xx!
) >hdmodel%number%.temp
echo.


for /f "tokens=*" %%a in (hdsize%number%.temp) do (
set xx=%%a
set xx=!xx:~5!
echo.!xx!
) >hdsize%number%.temp
set /p hdsizename%number%=<hdsize%number%.temp
echo !hdsizename%number%!
echo.

for /f "tokens=1 delims=-" %%a in (hdmodel%number%.temp) do (echo %%a > hdmodelname%number%.temp)
for /f "tokens=*" %%a in (hdmodelname%number%.temp) do (
set xx=%%a
set xx=!xx:~0,-1!
echo.!xx!
) >hdmodelname%number%.temp
echo.
set /p hdmodelname%number%=<hdmodelname%number%.temp
echo !hdmodelname%number%!

set hdmodelname%number%=!hdmodelname%number%: =+!

set input=!hdmodelname%number%!
for /l %%a in (1,1,100) do if "!input:~-1!"=="+" set input=!input:~0,-1!
set hdmodelname%number%=!input!
echo !hdmodelname%number%!>hdmodelname%number%.temp

echo.
echo !hdmodelname%number%!


set urlben=//www.harddrivebenchmark.net/hdd.php?hdd=!hdmodelname%number%!
echo %urlben%
 >"%temp%\geturl.vbs" echo url      = "http:%urlben%"
>>"%temp%\geturl.vbs" echo filename = "hdrating%number%.temp"
>>"%temp%\geturl.vbs" echo Set req = CreateObject("MSXML2.XMLHTTP.6.0")
>>"%temp%\geturl.vbs" echo req.open "POST", url, False
>>"%temp%\geturl.vbs" echo req.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
>>"%temp%\geturl.vbs" echo req.send "field1=foo&field2=bar&..."
>>"%temp%\geturl.vbs" echo Set fso = CreateObject("Scripting.FileSystemObject")
>>"%temp%\geturl.vbs" echo fso.OpenTextFile(filename, 2, True).WriteLine req.responseText
cscript /nologo "%temp%\geturl.vbs"
del "%temp%\geturl.vbs"
for %%i in (hdrating%number%.temp) do (
FINDSTR /C:"font-family: Arial, Helvetica, sans-serif;font-size: 35px;  font-weight: bold; color: red;" %%i > hdbench%number%.temp
)
for %%i in (hdrating%number%.temp) do (
FINDSTR /C:"Last Price Change" %%i > hdprice%number%.temp
)
for %%i in (hdrating%number%.temp) do (
FINDSTR /C:"Rank" %%i > hdrank%number%.temp
)

for %%i in (hdrating%number%.temp) do (
FINDSTR /C:"Samples" %%i > hdsamples%number%.temp
)
for %%i in (hdrating%number%.temp) do (
FINDSTR /C:"Rank" %%i > hdG3DPrice%number%.temp
)

for /f "tokens=*" %%a in (hdbench%number%.temp) do (
set xx=%%a
set xx=!xx:~104,-15!
echo.!xx! >hdbench%number%.temp
)
set /p hdbench%number%=<hdbench%number%.temp

for /f "tokens=*" %%a in (hdprice%number%.temp) do (
set xx=%%a
set xx=!xx:~71,-23!
echo.!xx! >hdprice%number%.temp
)
set /p hdprice%number%=<hdprice%number%.temp

for /f "tokens=*" %%a in (hdrank%number%.temp) do (
set xx=%%a
set xx=!xx:~171,-6!
echo.!xx! >hdrank%number%.temp
)
set /p hdrank%number%=<hdrank%number%.temp

for /f "tokens=*" %%a in (hdsamples%number%.temp) do (
set xx=%%a
set xx=!xx:~9,-8!
echo.!xx! >hdsamples%number%.temp
)
set /p hdsamples%number%=<hdsamples%number%.temp

for /f "tokens=*" %%a in (hdG3DPrice%number%.temp) do (
set xx=%%a
set xx=!xx:~72,-105!
echo.!xx! >hdG3DPrice%number%.temp
)
set /p hdG3DPrice%number%=<hdG3DPrice%number%.temp
set hdG3DPrice%number%=!hdG3DPrice%number%:NA=0!
echo !hdG3DPrice%number%!


 >"sbr_math.vbs" echo     a = !hdbench%number%!
>>"sbr_math.vbs" echo     b = !hdsamples%number%!
>>"sbr_math.vbs" echo     c = !hdG3DPrice%number%!
>>"sbr_math.vbs" echo     MathFunc = a * b / c
>>"sbr_math.vbs" echo     Wscript.Echo MathFunc
cscript /nologo sbr_math.vbs > hdmath%number%.temp

if !number! == 0 set /a hdmathtotal=0
 :: >"hdmathtotal.temp" echo 0

set /p hdmath%number%=<hdmath%number%.temp
echo    !hdmath%number%!

 >"sbr_math.vbs" echo     a = !hdmathtotal!
>>"sbr_math.vbs" echo     b = !hdmath%number%!
>>"sbr_math.vbs" echo     MathFunc = a + b
>>"sbr_math.vbs" echo     Wscript.Echo MathFunc
cscript /nologo sbr_math.vbs > hdmathtotal.temp
set /p hdmathtotal=<hdmathtotal.temp

echo    !hdmathtotal!

echo !hddevidnum%number%!
echo !hdmodelnum%number%!
echo !hdsizenum%number%!



set /a number=%number%+1
if /i %number% == %numofhdrives% goto :leave0
goto :separatehdinfo0
:leave0
set hderroroccured=0
if %ERRORLEVEL% GTR 0 goto :hdmathtotalavgskip
 >"sbr_math.vbs" echo     a = !hdmathtotal!
>>"sbr_math.vbs" echo     b = !numofhdrives!
>>"sbr_math.vbs" echo     MathFunc = a / b
>>"sbr_math.vbs" echo     Wscript.Echo MathFunc
cscript /nologo sbr_math.vbs > hdmathtotalavg.temp

set /p hdmathtotalavg=<hdmathtotalavg.txt
echo    !hdmathtotalavg!
:hdmathtotalavgskip
if %ERRORLEVEL% GTR 0 set hderroroccured=1
if %ERRORLEVEL% GTR 0 set errorsoccured=1
echo %ERRORLEVEL%
ver > nul
echo.
echo.


if %modecustom% EQU 1 goto :gpucustom




:: Start RAM Section
echo Start of RAM Section
echo Grabbing Number of sticks

wmic memphysical get memorydevices >ramsticks.temp
wmic memphysical get MaxCapacity >ramsize.temp
wmic memphysical get tag >rammodel.temp

for %%x in (ramsticks.temp) do (more +1 "%%x">tmp & move /y tmp "%%x")
set "cmd=findstr /R /N "^^" ramsticks.temp | find /C ":""
for /f %%a in ('!cmd!') do set number=%%a
set numoframsticklines=%number%
echo %number%

set number=0
:ramsticknumber
set /p ramsticksnum%number%=<ramsticks.temp
for %%x in (ramsticks.temp) do (more +1 "%%x">tmp & move /y tmp "%%x")

echo !ramsticksnum%number%!

echo %numoframsticklines%

set /a numbers=number-1
set /a totalsticks=!ramsticksnum%number%!+!ramsticksnum%numbers%!

echo Total: %totalsticks%


set /a number=%number%+1
if /i %number% == %numoframsticklines% goto :leave1
goto :ramsticknumber
:leave1

echo.
echo.

echo Grabbing RAM Information

set "cmd=findstr /R /N "^^" rammodel.temp | find /C ":""

for /f %%a in ('!cmd!') do set number=%%a
set /a number=%number%-2
set /a numoframem=%number%
echo Number of Stick Arrays: %number%


set number=0
:separateraminfo0
type ramsticks.temp>ramsticks%number%.temp
type rammodel.temp>rammodel%number%.temp
type ramsize.temp>ramsize%number%.temp
for /f "tokens=1 delims=:" %%a in ('
findstr /n /c:"%number%" rammodel%number%.temp
') do set ramnumline=%%a
echo ----------------------------------------
echo Line in Data: %ramnumline%
set /a ramnumline=%ramnumline%-1

for %%x in (ramsticks%number%.temp) do (more +%ramnumline% "%%x">tmp & move /y tmp "%%x")
for %%x in (rammodel%number%.temp) do (more +%ramnumline% "%%x">tmp & move /y tmp "%%x")
for %%x in (ramsize%number%.temp) do (more +%ramnumline% "%%x">tmp & move /y tmp "%%x")



set /p ramsticksnum%number%=<ramsticks%number%.temp
set /p rammodelnum%number%=<rammodel%number%.temp
set /p ramsizenum%number%=<ramsize%number%.temp

set /a numbers=number-1


echo Number of Sticks: !ramsticksnum%number%!
echo Array Number: !rammodelnum%number%!
echo Combined Sizes: !ramsizenum%number%!
echo Total RAM Size: %total%

set /a number=%number%+1
if /i %number% == %numoframem% goto :leave2
goto :separateraminfo0
:leave2

echo.
echo.
:gpustart

echo Start GPU Section

wmic path Win32_VideoController >gputesting.temp

wmic path Win32_VideoController get AdapterCompatibility /format:list >gpumanu.temp

wmic path Win32_VideoController get VideoProcessor /format:list >gpumodel.temp

wmic path Win32_VideoController get AdapterRAM /format:list >gpuram.temp

wmic path Win32_VideoController get deviceid /format:list >gpudevid.temp

setlocal EnableDelayedExpansion
set "cmd=findstr /R /N "^^" gpumodel.temp | find /C ":""

for /f %%a in ('!cmd!') do set number=%%a
setlocal EnableDelayedExpansion
set /a number=%number%/4
set /a numofgpus=%number%
echo Number of GPU's: %number%

ver > nul
set number=1
:separategpuinfo0
set /a numbers=%number%-1
type gpudevid.temp>gpudevid%number%.temp
type gpumodel.temp>gpumodel%number%.temp
type gpumanu.temp>gpumanu%number%.temp
type gpuram.temp>gpuram%number%.temp
for /f "tokens=1 delims=:" %%a in ('
findstr /n /c:"%number%" gpudevid%number%.temp
') do set gpunumline=%%a
echo ----------------------------------------
echo Line in Data: %gpunumline%
set /a gpunumline=%gpunumline%-1


for %%x in (gpudevid%number%.temp) do (more +%gpunumline% "%%x">tmp & move /y tmp "%%x")
for %%x in (gpumodel%number%.temp) do (more +%gpunumline% "%%x">tmp & move /y tmp "%%x")
for %%x in (gpumanu%number%.temp) do (more +%gpunumline% "%%x">tmp & move /y tmp "%%x")
for %%x in (gpuram%number%.temp) do (more +%gpunumline% "%%x">tmp & move /y tmp "%%x")

for /f "tokens=*" %%a in (gpumodel%number%.temp) do (
set xx=%%a
set xx=!xx:~15!
echo.!xx!
) >gpumodel%number%.temp
set /p gpumodelname=<gpumodel%number%.temp
set gpumodelname=%gpumodelname: =+%
echo %gpumodelname%
echo.
for /f "tokens=*" %%a in (gpudevid%number%.temp) do (
set xx=%%a
set xx=!xx:~9!
echo.!xx!
) >gpudevid%number%.temp
echo.
for /f "tokens=*" %%a in (gpumanu%number%.temp) do (
set xx=%%a
set xx=!xx:~21!
echo.!xx!
) >gpumanu%number%.temp
echo.
for /f "tokens=*" %%a in (gpuram%number%.temp) do (
set xx=%%a
set xx=!xx:~11!
echo.!xx!
) >gpuram%number%.temp
echo.
:gpucustom
if %modecustom% EQU 1 set number=1
set urlben=//www.videocardbenchmark.net/gpu.php?gpu=%gpumodelname%
echo %urlben%
 >"%temp%\geturl.vbs" echo url      = "http:%urlben%"
>>"%temp%\geturl.vbs" echo filename = "gpurating%number%.temp"
>>"%temp%\geturl.vbs" echo Set req = CreateObject("MSXML2.XMLHTTP.6.0")
>>"%temp%\geturl.vbs" echo req.open "POST", url, False
>>"%temp%\geturl.vbs" echo req.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
>>"%temp%\geturl.vbs" echo req.send "field1=foo&field2=bar&..."
>>"%temp%\geturl.vbs" echo Set fso = CreateObject("Scripting.FileSystemObject")
>>"%temp%\geturl.vbs" echo fso.OpenTextFile(filename, 2, True).WriteLine req.responseText
cscript /nologo "%temp%\geturl.vbs"
del "%temp%\geturl.vbs"
for %%i in (gpurating%number%.temp) do (
FINDSTR /C:"font-family: Arial, Helvetica, sans-serif;font-size: 35px;  font-weight: bold; color: red;" %%i > gpubench%number%.temp
)
for %%i in (gpurating%number%.temp) do (
FINDSTR /C:"Last Price Change" %%i > gpuprice%number%.temp
)
for %%i in (gpurating%number%.temp) do (
FINDSTR /C:"Rank" %%i > gpurank%number%.temp
)
for %%i in (gpurating%number%.temp) do (
FINDSTR /C:"Samples" %%i > gpusamples%number%.temp
)
for %%i in (gpurating%number%.temp) do (
FINDSTR /C:"Rank" %%i > gpuG3DPrice%number%.temp
)
for /f "tokens=*" %%a in (gpubench%number%.temp) do (
set xx=%%a
set xx=!xx:~104,-15!
echo.!xx! >gpubench%number%.temp
)
for /f "tokens=*" %%a in (gpuprice%number%.temp) do (
set xx=%%a
set xx=!xx:~71,-23!
echo.!xx! >gpuprice%number%.temp
)
for /f "tokens=*" %%a in (gpurank%number%.temp) do (
set xx=%%a
set xx=!xx:~168,-6!
echo.!xx! >gpurank%number%.temp
)
for /f "tokens=*" %%a in (gpusamples%number%.temp) do (
set xx=%%a
set xx=!xx:~9,-8!
echo.!xx! >gpusamples%number%.temp
)
for /f "tokens=*" %%a in (gpuG3DPrice%number%.temp) do (
set xx=%%a
set xx=!xx:~68,-104!
echo.!xx! >gpuG3DPrice%number%.temp
)
set /p gpubench%number%=<gpubench%number%.temp
set /p gpuprice%number%=<gpuprice%number%.temp
set /p gpurank%number%=<gpurank%number%.temp
set /p gpusamples%number%=<gpusamples%number%.temp
set /p gpuG3DPrice%number%=<gpuG3DPrice%number%.temp


 >"sbr_math.vbs" echo     a = !gpubench%number%!
>>"sbr_math.vbs" echo     b = !gpusamples%number%!
>>"sbr_math.vbs" echo     c = !gpuG3DPrice%number%!
>>"sbr_math.vbs" echo     MathFunc = a * b / c
>>"sbr_math.vbs" echo     Wscript.Echo MathFunc
cscript /nologo sbr_math.vbs > gpumath%number%.temp

set /p gpumath%number%=<gpumath%number%.temp
if !number! == 1 set /a gpumathtotal=0
echo    !gpumath%number%!

 >"sbr_math.vbs" echo     a = !gpumathtotal!
>>"sbr_math.vbs" echo     b = !gpumath%number%!
>>"sbr_math.vbs" echo     MathFunc = a + b
>>"sbr_math.vbs" echo     Wscript.Echo MathFunc
cscript /nologo sbr_math.vbs > gpumathtotal.temp

set /p gpumathtotal=<gpumathtotal.temp
echo    !gpumathtotal!

:: :gputotalskip

if %modecustom% EQU 1 goto :gpuexit

set /p gpudevidnum%number%=<gpudevid%number%.temp
set /p gpumodelnum%number%=<gpumodel%number%.temp
set /p gpumanunum%number%=<gpumanu%number%.temp
set /p gpuramnum%number%=<gpuram%number%.temp

echo !gpudevidnum%number%!
echo !gpumodelnum%number%!
echo !gpumanunum%number%!
echo !gpuramnum%number%!


set /a numbers=%number%
set /a number=%number%+1
if /i %numbers% == %numofgpus% goto :gpuexit
goto :separategpuinfo0
:gpuexit
set gpuerroroccured=0
if %ERRORLEVEL% GTR 0 goto :gpumathtotalavgskip
:: if %numofgpus% LEQ 1 goto :gpumathtotalavgskip
 >"sbr_math.vbs" echo     a = !gpumathtotal!
>>"sbr_math.vbs" echo     b = !numofgpus!
>>"sbr_math.vbs" echo     MathFunc = a / b
>>"sbr_math.vbs" echo     Wscript.Echo MathFunc
cscript /nologo sbr_math.vbs > gpumathtotalavg.temp

set /p gpumathtotalavg=<gpumathtotalavg.temp
echo    !gpumathtotalavg!

:gpumathtotalavgskip
if %ERRORLEVEL% GTR 0 set gpuerroroccured=1
if %ERRORLEVEL% GTR 0 set errorsoccured=1
:: if %numofgpus% LEQ 1 set gpuerroroccured=1
echo %ERRORLEVEL%

if %modecustom% EQU 1 goto :errors

goto :bytes




:pcaverage
echo off
if %gpuerroroccured% GEQ 1 echo     a = !gpumath1! / 16  >"sbr_math.vbs"
if %gpuerroroccured% EQU 0 echo     a = !gpumathtotalavg! / 16  >"sbr_math.vbs"
if %hderroroccured% GEQ 1 echo     b = !hdmath0! / 16 >>"sbr_math.vbs"
if %hderroroccured% EQU 0 echo     b = !hdmathtotalavg! / 16 >>"sbr_math.vbs"
>>"sbr_math.vbs" echo     c = a + b
>>"sbr_math.vbs" echo     MathFunc = c / 16
>>"sbr_math.vbs" echo     Wscript.Echo MathFunc

cscript /nologo sbr_math.vbs > pcaverage.temp
set /p pcaverage=<pcaverage.temp
echo    !pcaverage!


goto :errorscount




:errors
@echo off
cls
set hderrorintended=0
set gpuerrorintended=0
if %modecustom% EQU 1 set hderroroccured=1
if %modecustom% EQU 1 set errorleave=1
if %modecustom% EQU 1 goto :errorskip
if %numofgpus% LEQ 1 set gpuerroroccured=1
if %gpuerroroccured% EQU 1 set gpuerrorintended=1
if %numofhdrives% LEQ 1 set hderroroccured=1
if %hderroroccured% EQU 1 set hderrorintended=1
if %modecustom% EQU 1 goto :errorskip
if %errorsoccured% GTR 0 set errorleave=10
:errorskip
echo %errorleave%
goto :pcaverage

:errorscount
cls
echo.
echo.
echo.
if %gpuerroroccured% GTR 0 echo           Errors in the GPU section have occured. Using Main Device.
echo.
if %gpuerrorintended% GTR 0 echo             This error was thrown because you only have 1 device.
echo.
echo.
echo.
if %hderroroccured% GTR 0 echo           Errors in the HDD section have occured. Using Main Device.
echo.
if %hderrorintended% GTR 0 echo              This error was thrown because you only have 1 device.
if %hderrorintended% GTR 0 echo                 The above line is being displayed incorrectly.
if %hderrorintended% GTR 0 echo                               Just ignore it.
echo.
echo.
echo.
if %errorsoccured% GTR 0 echo                            Resuming in %errorleave% seconds.
echo.
echo.
echo.
echo.
if %errorsoccured% GTR 0 PING -n 2 127.0.0.1>nul
cls


set /a errorleave=%errorleave%-1
echo %errorleave%
if %errorleave% == 0 goto :deltemp
goto :errorscount





:deltemp
::Delete temp files.
@echo off
cls
for /f %%A in ('dir ^| find "File(s)"') do set cnt=%%A
echo.
echo   Temporary folders created: 1
echo   Temporary files created: %cnt%
echo   Deleting all %cnt% files . . .

CD /D "%maindir%"
rmdir /s /q %directory%

echo.
echo   All %cnt% files were successfully deleted

echo.
echo.
:: echo Press any key to continue . . .


::And done.
goto :finish



::Comments
::This will be incorporated into the main PassMark script soon.
::I need to add GPU to this and then do some VBScript/Powershell
::math to convert the bytes to an understandable format. (below)
::RAM will not be able to be pulled from PassMark due
::to the fact that the Operating System does not
::provide me with the stick manufacturers or
::model numbers. That's all for now.


::For those wondering, there is a 32-bit precision limit in batch.
::Therefore to do an Average CPU rating I need to use something
::like VBScript or Powershell. 10 digits is the 32-bit limit.

:bytes

:: Unused code that will be used in the future.
:: Currently the code gets skipped over.
set number=0
:separatebyteinfo0

 >"byteconv.ps1" echo "Get-WMIObject Win32_LogicalDisk | ForEach-Object {$_.freespace / 1GB}"

 >"by1econv.ps1" echo "Get-WMIObject Win32_PhysicalMemory | ForEach-Object {$_.capacity / 1GB}"
:: >>"byteconv.ps1" echo $HOST.UI.RawUI.ReadKey("NoEcho,IncludeKeyDown")
for /f "tokens=*" %%a in (byteconv.ps1) do (
set xx=%%a
set xx=!xx:~1,-1!
echo.!xx! >byteconv.ps1
)
(
Powershell.exe -executionpolicy remotesigned -File  byteconv.ps1
)>byteconv.txt
for /f "tokens=*" %%a in (by1econv.ps1) do (
set xx=%%a
set xx=!xx:~1,-1!
echo.!xx! >by1econv.ps1
)
(
Powershell.exe -executionpolicy remotesigned -File  by1econv.ps1
)>by1econv.txt
::del "byteconv.ps1"
title Benchmark Retriever %version%

:: HD Total
setlocal EnableDelayedExpansion
set "cmd=findstr /R /N "^^" byteconv.txt | find /C ":""
for /f %%a in ('!cmd!') do set numlines=%%a
echo %numlines%
set number=0
set total=0
:lasthdloop

set /p byteconv%number%=<byteconv.txt
for %%x in (byteconv.txt) do (more +1 "%%x">tmp & move /y tmp "%%x")
echo !byteconv%number%!

if /i !byteconv%number%! == 0 goto :skiphdroundend

for /f "tokens=1,2 delims=." %%a  in ("!byteconv%number%!") do (
  set first_part=%%a
  set second_part=%%b
)

set second_part=%second_part:~0,1%
echo %second_part%
if defined second_part if %second_part% GEQ 5 (

    set /a rounded=%first_part%+1
) else (
    set /a rounded=%first_part%
)

echo %rounded%

:skiphdroundend

set /a totalhd+=%rounded%
echo %totalhd%


set /a number=%number%+1
if /i %number% == %numlines% goto :leave3
:: &&
:: if /i %number% == %numoframem%
::  &&
::  goto :leave3
goto :lasthdloop
:leave3

:: RAM Total

set "cmd=findstr /R /N "^^" by1econv.txt | find /C ":""
for /f %%a in ('!cmd!') do set numlines=%%a
echo %numlines%
set number=0
:lastramloop

set /p byteconv%number%=<by1econv.txt
for %%x in (by1econv.txt) do (more +1 "%%x">tmp & move /y tmp "%%x")
echo !byteconv%number%!

if /i !byteconv%number%! == 0 goto :skipramroundend
if /i !byteconv%number%! == 1 goto :skipramroundend
if /i !byteconv%number%! == 2 goto :skipramroundend
if /i !byteconv%number%! == 3 goto :skipramroundend
if /i !byteconv%number%! == 4 goto :skipramroundend
if /i !byteconv%number%! == 5 goto :skipramroundend
if /i !byteconv%number%! == 6 goto :skipramroundend
if /i !byteconv%number%! == 7 goto :skipramroundend
if /i !byteconv%number%! == 8 goto :skipramroundend
if /i !byteconv%number%! == 9 goto :skipramroundend

for /f "tokens=1,2 delims=." %%a  in ("!byteconv%number%!") do (
  set first_part=%%a
  set second_part=%%b
)

set second_part=%second_part:~0,1%
echo %second_part%
if defined second_part if %second_part% GEQ 5 (

    set /a rounded=%first_part%+1
) else (
    set /a rounded=%first_part%
)

echo %rounded% rounded

set /a totalram+=%rounded%
echo %totalram% total
goto :skipramskip
:skipramroundend
set /a totalram+=!byteconv%number%!
:skipramskip
echo %totalram% total


set /a number=%number%+1
if /i %number% == %numlines% goto :errors
goto :lastramloop




















:finish
@echo off
:: cls
echo      Free Disk Space across all Drives is %totalhd% Gigabytes.
echo      Random Access Memory across all Sticks is %totalram% Gigabytes.
echo.
echo.
if %gpuerroroccured% GTR 0 echo      Main GPU Average Rating: !gpumath1!
if %gpuerroroccured% EQU 0 echo      All GPU Average Ratings: !gpumathtotalavg!

if %hderroroccured% GTR 0 echo      Main HDD Average Rating: !hdmath0!
if %hderroroccured% EQU 0 echo      All HDD Average Ratings: !hdmathtotalavg!
echo.
echo      Your Average PC Rating: !pcaverage!
echo.
echo.
echo      The higher the number, the more the device's together are worth.
echo      Read below for more information.
echo.
echo      These are calculated using "DevRating * DevSamples / G3DMark|Price"
echo      For each Device and then "DevTotal / DevCount" for all Devices together.
echo.
::echo.
title Benchmark Retriever %version%  ^|  Done
goto :end
goto :deltemp

   :skiphdroundbeg
   set numlines=%numlines%-1
   goto :skiphdroundend

   :skipramroundbeg
   set numlines=%numlines%-1
   goto :skipramroundend

   :end

























pause >nul