@echo off
color 0a
mode con cols=90
sc config winmgmt start= auto >nul 2<&1
net start winmgmt 2>1nul
setlocal ENABLEDELAYEDEXPANSION

echo 请输入编号并设置时区:
:Main
cls & set "Xz="
echo 1、中国大陆
echo 2、中国台湾
echo 3、日本
echo 4、德国
echo 5、洛杉矶
echo, & set /p Xz=请输入编号并回车：
if "%Xz%"=="1" goto China Standard Time
if "%Xz%"=="2" goto Taipei Standard Time
if "%Xz%"=="3" goto Tokyo Standard Time
if "%Xz%"=="4" goto W. Europe Standard Time
if "%Xz%"=="5" goto Pacific Standard Time

:err
goto:Main

:China Standard Time
start "" tzutil /s "China Standard Time"
pause
goto time
:Taipei Standard Time
start "" tzutil /s "Taipei Standard Time"
pause
goto time
:Tokyo Standard Time
start "" tzutil /s "Tokyo Standard Time"
pause
goto time
:W. Europe Standard Time
start "" tzutil /s "W. Europe Standard Time"
pause
goto time
:Pacific Standard Time
start "" tzutil /s "Pacific Standard Time"
pause
goto time

:time
echo 开始同步时间：
net start "windows time"
w32tm /resync
echo.

echo CPU:
for /f "tokens=1,* delims==" %%a in ('wmic cpu get name^,ExtClock^,CpuStatus^,Description /value') do (
set /a tee+=1
if "!tee!" == "3" echo CPU个数 = %%b
if "!tee!" == "6" echo 型号和频率 = %%b
)
set tee=0
echo.

echo 内 存:
for /f "tokens=1,* delims==" %%a in ('systeminfo^|find "物理内存"') do (
echo %%a %%b
)
echo.

echo 硬 盘:
>DiskCalc2.vbs echo DeviceID = Wscript.Arguments(0)
>>DiskCalc2.vbs echo SizeAvail = Wscript.Arguments(1) / (1024 * 1024 * 1024)
>>DiskCalc2.vbs echo SizeTotal = Wscript.Arguments(2) / (1024 * 1024 * 1024)
>>DiskCalc2.vbs echo WSCript.Echo DeviceID ^& Chr(9) ^& Round(SizeTotal,1) ^& Chr(9)  ^& _
>>DiskCalc2.vbs echo  "G"
 

(for /f "tokens=1-3" %%a in ('wmic LogicalDisk where "DriveType='3'" get DeviceID ^, Size ^, FreeSpace ^| findstr ":"') do (
    cscript //nologo DiskCalc2.vbs %%a %%b %%c
))
del DiskCalc2.vbs
echo.
echo IP:
for /f "tokens=16" %%i in ('ipconfig ^|find /i "ipv4"') do set ip=%%i
echo ip=%ip%
echo.
echo 系统：
for /f "tokens=1,* delims==" %%a in ('systeminfo^|find "OS 名称"') do (
echo %%a  %%b
)
for /f "tokens=1,* delims==" %%a in ('systeminfo^|find "时区"') do (
echo %%a  %%b
)
echo %date%
echo %time%
echo.

echo *******************************************************************
echo * 请输入您要更改的远程桌面端口号，范围：1-65535，不能与其他端口冲突 *
echo *******************************************************************
echo.
set /p port=请输入端口号：
reg add "HKLM\SYSTEM\CurrentControlSet\Control\Terminal Server\Wds\rdpwd\Tds\tcp" /v PortNumber /t reg_dword /d %port% /f
reg add "HKLM\SYSTEM\CurrentControlSet\Control\Terminal Server\WinStations\RDP-Tcp" /v PortNumber /t reg_dword /d %port% /f
echo.
echo *******************************
echo * 重新启动远程桌面*
echo *******************************
reg add "HKLM\SYSTEM\CurrentControlSet\Control\Terminal Server" /v fDenyTSConnections /t reg_dword /d 1 /f
reg add "HKLM\SYSTEM\CurrentControlSet\Control\Terminal Server" /v fDenyTSConnections /t reg_dword /d 0 /f
gpupdate/force
echo.


pause