PING TOOL LB-Technologie for A-B-C Class Network

rem @echo off
title PING TOOL LB-Technologie for A-B-C Class Network                      Final 1.1
:Loop1

  echo.
  echo.Ip angeben: syntax (  172.16.3.3  )
  echo.
  @set /P A=

Rem ** Check Range **

  for /L %%r in (16,1,32) do if %A:~0,6% == 172.%%r goto:ne
  for /L %%r in (1,1,255) do if %A:~0,6% == 10.%%r goto:ne
  if %A:~0,6% == 192.168 goto:ne
 
  echo. fehhler
  pause>nul
  cls

goto:Loop1

:ne

echo.
  cls & echo. & Echo.Ip angeben syntax (  172.16.3.3  )
  ping -n 1 %A% >nul
  ping -n 3 localhost>nul
  arp -a | findstr "dynamisch"> test.txt  
  if errorlevel 1 goto:loop2
  @for /F "delims=" %%a in (test.txt) do @Set VARIP=%%a  
  set On=%VARIP:~2,12% = Online
echo. & echo. & echo.%On%
echo. & echo. & echo. & echo.
  pause>nul
  del test.txt
  cls

goto:loop3

:loop2

echo.

  echo.%A% = Offline
  pause>nul
  del test.txt>nul
  cls

:loop3

  set On=
  set A=
  set VARIP=
  @arp -d >nul
  cls

goto:Loop1