Get Device Information

@echo off

title Device Information
cls

for /f "tokens=2 delims==" %%i in ('"WMIC cpu get name /format:list"') do set sysInfo_cpu_name=%%i
for /f "tokens=2 delims==" %%i in ('"WMIC cpu get threadcount /format:list"') do set sysInfo_cpu_threadCount=%%i
for /f "tokens=2 delims==" %%i in ('"WMIC cpu get numberofcores /format:list"') do set sysInfo_cpu_numberOfCores=%%i
for /f "tokens=2 delims==" %%i in ('"WMIC bios get SerialNumber /format:list"') do set sysInfo_bios_serialNumber=%%i
for /f "tokens=2 delims==" %%i in ('"WMIC bios get Version /format:list"') do set sysInfo_bios_version=%%i
for /f "tokens=2 delims==" %%i in ('"WMIC computersystem get name /format:list"') do set sysInfo_computerSystem_name=%%i
for /f "tokens=2 delims==" %%i in ('"WMIC computersystem get SystemFamily /format:list"') do set sysInfo_computerSystem_systemFamily=%%i
for /f "tokens=2 delims==" %%i in ('"WMIC computersystem get SystemType /format:list"') do set sysInfo_computerSystem_systemType=%%i
for /f "tokens=2 delims==" %%i in ('"WMIC os get Caption /format:list"') do set sysInfo_os_caption=%%i
for /f "tokens=2 delims==" %%i in ('"WMIC os get BuildNumber /format:list"') do set sysInfo_os_buildNumber=%%i
for /f "tokens=2 delims==" %%i in ('"WMIC os get Version /format:list"') do set sysInfo_os_version=%%i
for /f "usebackq tokens=1 delims=" %%i in (`PowerShell -command "(GWMI Win32_PhysicalMemory|Measure Capacity -Sum).Sum/1MB"`) do set sysInfo_ram_totalMB=%%i MB
for /f "tokens=2 delims==" %%i in ('"WMIC memorychip get Speed /format:list"') do set sysInfo_ram_clockSpeed=%%i MHz
for /f "tokens=1-3" %%n in ('"WMIC /node:"localhost" logicaldisk get Name,Size,FreeSpace | find /i "C:""') do (
    @SETLOCAL ENABLEEXTENSIONS
    @SETLOCAL ENABLEDELAYEDEXPANSION

    set FreeBytes=%%n & set TotalBytes=%%p
    set TotalGB=0
    set FreeGB=0
    set gbConvertVal=1074

    set /a TotalSpace=!TotalBytes:~0,-6! / !gbConvertVal!
    set /a FreeSpace=!FreeBytes:~0,-7! / !gbConvertVal!

    set TotalGB=!TotalSpace!
    set FreeGB=!FreeSpace!

    set /A TotalUsed=!TotalSpace! - !FreeSpace!
    set /A MULTIUSED=!TotalUsed!*100
    set /A PERCENTUSED=!MULTIUSED!/!TotalGB!

    set sysInfo_disk_totalSpace=!TotalGB! GB
    set sysInfo_disk_freeSpace=!FreeGB! GB
    set sysInfo_disk_percentUsed=!PERCENTUSED!%%
)


@rem Find longest Line
set /a longestLineLength=0

@rem Test Line 2
    set /a testNumber=0
    call :strlen testNumberLen sysInfo_computerSystem_name
    set /a testNumber=%testNumberLen% + 37
    if %testNumber% gtr %longestLineLength% set /a longestLineLength=%testNumber%

@rem Test Line 4
    set /a testNumber=0
    call :strlen testNumber sysInfo_computerSystem_name
    set /a testNumber=%testNumber% + 25
    if %testNumber% gtr %longestLineLength% set /a longestLineLength=%testNumber%

@rem Test Line 5
    set /a testNumber=0
    call :strlen testNumber sysInfo_computerSystem_systemFamily
    set /a testNumber=%testNumber% + 25
    if %testNumber% gtr %longestLineLength% set /a longestLineLength=%testNumber%

@rem Test Line 6
    set /a testNumber=0
    call :strlen testNumber sysInfo_bios_serialNumber
    set /a testNumber=%testNumber% + 25
    if %testNumber% gtr %longestLineLength% set /a longestLineLength=%testNumber%

@rem Test Line 7
    set /a testNumber=0
    call :strlen testNumber sysInfo_bios_version
    set /a testNumber=%testNumber% + 25
    if %testNumber% gtr %longestLineLength% set /a longestLineLength=%testNumber%

@rem Test Line 8
    set /a testNumber=0
    call :strlen testNumber sysInfo_os_caption
    set /a testNumber=%testNumber% + 25
    if %testNumber% gtr %longestLineLength% set /a longestLineLength=%testNumber%

@rem Test Line 9
    set /a testNumber=0
    call :strlen testNumber sysInfo_os_buildNumber
    set /a testNumber=%testNumber% + 25
    if %testNumber% gtr %longestLineLength% set /a longestLineLength=%testNumber%

@rem Test Line 10
    set /a testNumber=0
    call :strlen testNumber sysInfo_os_version
    set /a testNumber=%testNumber% + 25
    if %testNumber% gtr %longestLineLength% set /a longestLineLength=%testNumber%

@rem Test Line 11
    set /a testNumber=0
    call :strlen testNumber sysInfo_computerSystem_systemType
    set /a testNumber=%testNumber% + 25
    if %testNumber% gtr %longestLineLength% set /a longestLineLength=%testNumber%

@rem Test Line 12
    call set "sysInfo_cpu_name=%%sysInfo_cpu_name:(=^(%%"
    call set "sysInfo_cpu_name=%%sysInfo_cpu_name:)=^)%%"
    set /a testNumber=0
    call :strlen testNumber sysInfo_cpu_name
    set /a testNumber=%testNumber% + 25
    if %testNumber% gtr %longestLineLength% set /a longestLineLength=%testNumber%

@rem Test Line 13
    set /a testNumber=0
    call :strlen testNumber sysInfo_cpu_threadCount
    set /a testNumber=%testNumber% + 25
    if %testNumber% gtr %longestLineLength% set /a longestLineLength=%testNumber%

@rem Test Line 14
    set /a testNumber=0
    call :strlen testNumber sysInfo_cpu_numberOfCores
    set /a testNumber=%testNumber% + 25
    if %testNumber% gtr %longestLineLength% set /a longestLineLength=%testNumber%

@rem Test Line 15
    set /a testNumber=0
    call :strlen testNumber sysInfo_ram_totalMB
    set /a testNumber=%testNumber% + 25
    if %testNumber% gtr %longestLineLength% set /a longestLineLength=%testNumber%

@rem Test Line 16
    set /a testNumber=0
    call :strlen testNumber sysInfo_ram_clockSpeed
    set /a testNumber=%testNumber% + 25
    if %testNumber% gtr %longestLineLength% set /a longestLineLength=%testNumber%

@rem Test Line 17
    set /a testNumber=0
    call :strlen testNumber sysInfo_disk_totalSpace
    set /a testNumber=%testNumber% + 25
    if %testNumber% gtr %longestLineLength% set /a longestLineLength=%testNumber%

@rem Test Line 18
    set /a testNumber=0
    call :strlen testNumber sysInfo_disk_freeSpace
    set /a testNumber=%testNumber% + 25
    if %testNumber% gtr %longestLineLength% set /a longestLineLength=%testNumber%

@rem Test Line 19
    set /a testNumber=0
    call :strlen testNumber sysInfo_disk_percentUsed
    set /a testNumber=%testNumber% + 25
    if %testNumber% gtr %longestLineLength% set /a longestLineLength=%testNumber%

@rem LINE 1
    set printLine_1=----------------------------------------------------------------------------------------------------------------------------------------------------
    call set printLine_1=%%printLine_1:~0,%longestLineLength%%%
    echo +-%printLine_1%-+

@rem LINE 2
    @rem Min 37, Max 52 (before space and line on each end)
    set printLine_2=System Info ^For Device %sysInfo_computerSystem_name%
    call set printLine_2=%%printLine_2:~0,%longestLineLength%%%
    echo ^| %printLine_2% ^|

@rem LINE 3
    set printLine_3=----------------------------------------------------------------------------------------------------------------------------------------------------
    call set printLine_3=%%printLine_3:~0,%longestLineLength%%%
    echo +-%printLine_3%-+

@rem LINE 4
    set printLine_4=Device Name:             %sysInfo_computerSystem_name%
    call set printLine_4=%%printLine_4:~0,%longestLineLength%%%
    echo ^| %printLine_4% ^|

@rem LINE 5
    set printLine_5=Device Model:            %sysInfo_computerSystem_systemFamily%
    call set printLine_5=%%printLine_5:~0,%longestLineLength%%%
    echo ^| %printLine_5% ^|

@rem LINE 6
    set printLine_6=Device Serial Number:    %sysInfo_bios_serialNumber%
    call set printLine_6=%%printLine_6:~0,%longestLineLength%%%
    echo ^| %printLine_6% ^|

@rem LINE 7
    set printLine_7=BIOS Version:            %sysInfo_bios_version%
    call set printLine_7=%%printLine_7:~0,%longestLineLength%%%
    echo ^| %printLine_7% ^|

@rem LINE 8
    set printLine_8=Windows Edition:         %sysInfo_os_caption%
    call set printLine_8=%%printLine_8:~0,%longestLineLength%%%
    echo ^| %printLine_8% ^|

@rem LINE 9
    set printLine_9=Windows Build:           %sysInfo_os_buildNumber%
    call set printLine_9=%%printLine_9:~0,%longestLineLength%%%
    echo ^| %printLine_9% ^|

@rem LINE 10
    set printLine_10=Windows Version:         %sysInfo_os_version%
    call set printLine_10=%%printLine_10:~0,%longestLineLength%%%
    echo ^| %printLine_10% ^|

@rem LINE 11
    set printLine_11=System Architecture:     %sysInfo_computerSystem_systemType%
    call set printLine_11=%%printLine_11:~0,%longestLineLength%%%
    echo ^| %printLine_11% ^|

@rem LINE 12
    call set "sysInfo_cpu_name=%%sysInfo_cpu_name:^(=(%%"
    call set "sysInfo_cpu_name=%%sysInfo_cpu_name:^)=)%%"
    set printLine_12=CPU Model:               %sysInfo_cpu_name%
    call set printLine_12=%%printLine_12:~0,%longestLineLength%%%
    echo ^| %printLine_12% ^|

@rem LINE 13
    set printLine_13=CPU Threads:             %sysInfo_cpu_threadCount%
    call set printLine_13=%%printLine_13:~0,%longestLineLength%%%
    echo ^| %printLine_13% ^|

@rem LINE 14
    set printLine_14=CPU Cores:               %sysInfo_cpu_numberOfCores%
    call set printLine_14=%%printLine_14:~0,%longestLineLength%%%
    echo ^| %printLine_14% ^|

@rem LINE 15
    set printLine_15=Total RAM:               %sysInfo_ram_totalMB%
    call set printLine_15=%%printLine_15:~0,%longestLineLength%%%
    echo ^| %printLine_15% ^|

@rem LINE 16
    set printLine_16=RAM Clock Speed:         %sysInfo_ram_clockSpeed%
    call set printLine_16=%%printLine_16:~0,%longestLineLength%%%
    echo ^| %printLine_16% ^|

@rem LINE 17
    set printLine_17=Total Disk Space ^(C:^):   %sysInfo_disk_totalSpace%
    call set printLine_17=%%printLine_17:~0,%longestLineLength%%%
    echo ^| %printLine_17% ^|

@rem LINE 18
    set printLine_18=Free Disk Space ^(C:^):    %sysInfo_disk_freeSpace%
    call set printLine_18=%%printLine_18:~0,%longestLineLength%%%
    echo ^| %printLine_18% ^|

@rem LINE 19
    set printLine_19=Used Disk Space ^(C:^):    %sysInfo_disk_percentUsed%
    call set printLine_19=%%printLine_19:~0,%longestLineLength%%%
    echo ^| %printLine_19% ^|

@rem LINE 20
    set printLine_20=----------------------------------------------------------------------------------------------------------------------------------------------------
    call set printLine_20=%%printLine_20:~0,%longestLineLength%%%
    echo +-%printLine_20%-+

echo:

echo [Press any key to close this window]
pause >nul
exit /b


:toUppercase
    if not defined %~1 exit /b
    for %%a in ("a=A" "b=B" "c=C" "d=D" "e=E" "f=F" "g=G" "h=H" "i=I" "j=J" "k=K" "l=L" "m=M" "n=N" "o=O" "p=P" "q=Q" "r=R" "s=S" "t=T" "u=U" "v=V" "w=W" "x=X" "y=Y" "z=Z" "ä=Ä" "ö=Ö" "ü=Ü") do (
        call set %~1=%%%~1:%%~a%%
    )
    goto :eof

:strlen <resultVar> <stringVar>
    (
        setlocal EnableDelayedExpansion
        (set^ tmp=!%~2!)
        if defined tmp (
            set "len=1"
            for %%P in (4096 2048 1024 512 256 128 64 32 16 8 4 2 1) do (
                if "!tmp:~%%P,1!" NEQ "" (
                    set /a "len+=%%P"
                    set "tmp=!tmp:~%%P!"
                )
            )
        ) ELSE (
            set len=0
        )
    )
    (
        endlocal
        set "%~1=%len%"
        exit /b
    )