[网络连接] 求助批处理自动检测DNS并设定最佳DNS的代码 这段代码出现问题

@ECHO off
ECHO.提示：netsh 需要管理员权限，请以管理员权限运行本脚本.
setlocal EnableDelayedExpansion
SET "IP1="
SET "IP2="
SET "IP3="
ECHO.请稍等...&ECHO.
CALL :PingDNS 223.5.5.5
CALL :PingDNS 114.114.114.114
CALL :PingDNS 180.76.76.76
CALL :PingDNS 119.29.29.29
CALL :PingDNS 8.8.8.8
ECHO.执行以下命令：
IF defined IP1 echo netsh int ip add dns "WLAN" %IP1% index=1
IF defined IP2 echo netsh int ip add dns "WLAN" %IP2% index=2
IF defined IP3 echo netsh int ip add dns "WLAN" %IP3% index=3
pause
GOTO:EOF

:PingDNS <dnsIP>
set "errorlevel=0"
for /f "tokens=1-9 delims==m " %%a in ('ping -n 4 %~1 ^| find "平均"') do ECHO.%~1 的平均时间:%%fms & SET %~1_time=%%f
REM 对于4次全部丢失的，不显示平均时间，故直接丢弃
IF not %errorlevel%==0 ECHO. %~1 全部丢失！&GOTO:EOF
CALL :CMP %~1
GOTO:EOF

:CMP <IP>
IF not defined IP1 SET "IP1=%~1" & EXIT /B 1
IF not defined IP2 SET "IP2=%~1" & EXIT /B 2
IF not defined IP3 SET "IP3=%~1" & EXIT /B 3
IF !%~1_time! LSS !%IP1%_time! SET "IP3=%IP2%"&SET "IP2=%IP1%"&SET "IP1=%~1"&EXIT /B 1
IF !%~1_time! LSS !%IP2%_time! SET "IP3=%IP2%"&SET "IP2=%~1"&EXIT /B 2
IF !%~1_time! LSS !%IP3%_time! SET "IP3=%~1"&EXIT /B 3
EXIT /B 0
复制代码

提示：netsh 需要管理员权限，请以管理员权限运行本脚本.
请稍等...

223.5.5.5 的平均时间:18ms
114.114.114.114 的平均时间:41ms
180.76.76.76 的平均时间:15ms
119.29.29.29 的平均时间:15ms
8.8.8.8 的平均时间:34ms
执行以下命令：
netsh int ip add dns "WLAN" 119.29.29.29 index=1
netsh int ip add dns "WLAN" 223.5.5.5 index=2
netsh int ip add dns "WLAN" 8.8.8.8 index=3
请按任意键继续. . .
复制代码

@ECHO off
ECHO □■自动检测DNS速度并设定最佳DNS

REM 获取联网设备名称并重置DNS服务器地址为自动获取(防止之后DNS写入出错)
for /f tokens^=2^ delims^=^" %%i in ('netsh interface ip show address') do (set "macname=%%i"
goto:Next)
:Next
REM %macname%
netsh int ip set dns %macname% dhcp >nul
REM 获取网关(网关可作为首选或备用DNS)
for /f "tokens=15" %%i in ('ipconfig /all ^| find /i "默认网关" ^| find /i "192"') do set gateway=%%i
REM %gateway%
setlocal EnableDelayedExpansion
SET "IP1="
SET "IP2="
SET "IP3="
ECHO.正在检测DNS...&ECHO.
echo 阿里:	223.5.5.5	腾讯:	119.29.29.29	114:	114.114.114.114		百度:	180.76.76.76
echo 360:	101.226.4.6	谷歌:	8.8.8.8		Cloudflare:	1.1.1.1
echo.
CALL :PingDNS 1.1.1.1
CALL :PingDNS 8.8.8.8
CALL :PingDNS 223.5.5.5
CALL :PingDNS 119.29.29.29
CALL :PingDNS 114.114.114.114
CALL :PingDNS 180.76.76.76
CALL :PingDNS 101.226.4.6
CALL :PingDNS 8.8.8.88
rem CALL :PingDNS %gateway%
ECHO.正在设定最佳DNS...
IF defined IP1 netsh int ip add dns %macname% %IP1% index=1
IF defined IP2 netsh int ip add dns %macname% %IP2% index=2
IF defined IP3 netsh int ip add dns %macname% %IP3% index=3 &goto:继续2●
pause
GOTO:EOF

:PingDNS <dnsIP>
set "errorlevel=0"
for /f "tokens=1-9 delims==m " %%a in ('ping -n 4 %~1 ^| find "平均"') do ECHO.%~1	的平均时间:%%fms & SET %~1_time=%%f
REM 对于4次全部丢失的，不显示平均时间，故直接丢弃
IF not %errorlevel%==0 ECHO. %~1 全部丢失！&GOTO:EOF
CALL :CMP %~1
GOTO:EOF

:CMP <IP>
IF not defined IP1 SET "IP1=%~1" & EXIT /B 1
IF not defined IP2 SET "IP2=%~1" & EXIT /B 2
IF not defined IP3 SET "IP3=%~1" & EXIT /B 3
IF !%~1_time! LSS !%IP1%_time! SET "IP3=%IP2%"&SET "IP2=%IP1%"&SET "IP1=%~1"&EXIT /B 1
IF !%~1_time! LSS !%IP2%_time! SET "IP3=%IP2%"&SET "IP2=%~1"&EXIT /B 2
IF !%~1_time! LSS !%IP3%_time! SET "IP3=%~1"&EXIT /B 3
EXIT /B 0

:继续2●
ipconfig /all|findstr "[0-9]*\.[0-9]*\."
echo                                         ↑ 本机目前DNS
echo ----------------------------------------------------------
REM 自动检测DNS速度并设定最佳DNS结束.↓下面可以放其他脚本继续执行......
pause
复制代码

ping -n 4 %~1 ^| find "平均"
复制代码