Drams Advanced Pinger v1.1

@echo off
color 0c
title ! Drams Advanced Pinger !(Subscribe to me)

echo Would you like to subscribe to my youtube channel? (yes, no)
echo.
set /p ans=
IF "%ans%"=="yes" (start chrome.exe www.youtube.com/channel/UCVtmWA0dmsD59l9JqPFPtpQ?sub_confirmation=1
goto welcome) ELSE (goto welcome)

:welcome
title ! Drams Advanced Pinger ! (Home screen)
set /a ecount=0
set /a iviewed=0
cls
echo Welcome to the Drams Advanced IP Pinger, enter the IP address you would like to ping, or enter color if you want to change the color.
echo.
set /p ip=Enter IP:

if %ip%==color (goto color) ELSE (goto psetup)

:error
cls
title title ! Drams Advanced Pinger ! (ERROR! RETURN TO HOME SCREEN)
echo Error!
echo.
pause
goto welcome

:color
cls
title ! Drams Advanced Pinger ! (Set your preffered color)
echo Enter color. If you don't know the color commands, type "color help"
echo.
set /p clr=Color:

if "%clr%"=="color help" (goto colorhelp) ELSE (color %clr%
goto welcome)

:colorhelp
cls
title ! Drams Advanced Pinger ! (Helping you out with colors.)
echo Color commands are simple, the first digit of the color will be used as the background such as "0#" for a black background.
echo The second digit will be the text color, such as 0a for a black background and green text. Here are the colors:
echo.
echo 0 = Black
echo 8 = Gray

echo 1 = Blue
echo 9 = Light Blue

echo 2 = Green
echo A = Light Green

echo 3 = Aqua
echo B = Light Aqua

echo 4 = Red
echo C = Light Red

echo 5 = Purple
echo D = Light Purple

echo 6 = Yellow
echo E = Light Yellow

echo 7 = White
echo F = Bright White
echo.
echo Press anywhere to go back.
pause>nul
goto color

:psetup
cls
title ! Drams Advanced Pinger ! (Preparing to ping "%ip%")
echo Host: "%ip%"
echo.
set /p pa=Amount of pings:
set /a pamount=%pa%
echo.
cls
echo Host: "%ip%"
echo.
echo Amount of pings:%pa%
pause>nul

cls
goto ping

goto error

:ping
set /a pad=%pamount%-1
color %clr%
PING -n 1 %ip% | FIND "TTL="
IF ERRORLEVEL 1 (echo Offline...
set /a ecount=%ecount%+1
set onoff=Offline) ELSE (set onoff=Online)
title ! Drams Advanced Pinger ! (Host: "%ip%" Pings remaining: %pad% Error count: %ecount% Status: %onoff%)
IF "%pamount%"=="1" (echo.
goto done) ELSE (set /a pamount=%pamount%-1
goto ping)

goto error

:checkview1
IF "%iviewed%"=="0" (set /a iviewed=1
goto done2)

:done
title ! Drams Advanced Pinger ! (Successfully finished pinging "%ip%")
echo Successfully finished pinging %ip% type x to go back, type i for more info.
echo.
set /a tpa=%pa%-%ecount%
IF %tpa% GEQ %ecount% (set avg=online) ELSE (set avg=offline)
echo Host was mostly %avg%.
echo.
set /p ecmd=

IF "%ecmd%"=="x" (goto welcome)
IF "%ecmd%"=="i" (goto checkview1)

:done2
cls
title ! Drams Advanced Pinger ! (Successfully finished pinging "%ip%")
echo Successfully finished pinging %ip% press anything to go back.
echo.
set /a tpa=%pa%-%ecount%
IF %tpa% GEQ %ecount% (set avg=online) ELSE (set avg=offline)
echo Host was mostly %avg%.
echo.
echo Total successful requests:%tpa%
echo Total denied requests:%ecount%
echo Most recent status: %onoff%
pause>nul
goto welcome