Переподключение 3G/4G-модема для смены IP-адреса и подтверждение подключение к интернету

@ECHO OFF
netsh mbn disconnect interface="TELE2" // отключился от интернета и подключается по новой 
 
:next
 
(ждет подтверждение подключения) 
(если подключение есть, вносит число 1 в текстовый файл, и завершает работу BAT)
(если подключения нету, ждет 2 сек)
 
timeout 2  // ждет 2 секунды
 
Goto next:

@echo off
for /f "delims=" %%a in ('powershell "[Activator]::CreateInstance([Type]::GetTypeFromCLSID([Guid]'{DCB00C01-570F-4A9B-8D69-199FDBA5723B}')).IsConnectedToInternet"') do (
 if /i %%a equ true (echo.1>"file.txt"& exit /b) else (timeout /t 2& goto next)
)
pause

@echo off
 
:next
 
ping -n 2 ya.ru |Find "TTL=">nul
 
for /f "delims=" %%a in ('powershell "[Activator]::CreateInstance([Type]::GetTypeFromCLSID([Guid]'{DCB00C01-570F-4A9B-8D69-199FDBA5723B}')).IsConnectedToInternet"') do (
 if /i %%a equ true (IF %errorlevel% gtr 0 (Goto error) else (goto ok)) else (Goto error)
)
 
Goto next
 
:ok
Echo 11>ip_yes.txt
exit
 
:error
Echo 00>ip_yes.txt
timeout 2
Goto next
exit