@ricardo_br assim né?
@echo off
CLS
set terra=terra.com.br
set inexistente=xaswedf.com.br
set verde=call:color_ir 0A " verde"
set lilas=call:color_ir 0D " lilas"
echo.
echo.
echo Verificando sites Online fica
%verde%
echo e offline fica
%lilas%
echo.
echo Verificando Site Terra
ping %terra% | find "TTL=" >nul
if errorlevel 1 (
echo ==============================================
call :Color_ir 0D " =Site %terra% - Esta Offline ="
echo ==============================================
echo.
echo.
) else (
echo =============================================
call :Color_ir 0A " = Site %terra% - Esta Online ="
echo =============================================
)
echo.
echo.
echo Verificando site Qualquer
ping %inexistente% | find "TTL=" >nul
if errorlevel 1 (
echo =================================================
call :Color_ir 0D " = Site %inexistente% - Esta Offline ="
echo =================================================
echo.
echo.
) else (
echo =============================================
call :Color_ir 0A " = Site %inexistente% - Esta Online ="
echo =================================================
)
CALL :Color_ir 0B " Pressione qualquer tecla para sair.... -"
PAUSE > NUL
goto :EOF
:Color_ir
mkdir $temp1 || (Exit /b 2)
pushd $temp1 || (rmdir $temp1 & Exit /b 1)
for /f "delims=" %%. in ('
"%ComsPec% /K Prompt $h$h <&1"
') do >o_o Echo %%.
Call:Tex_to %1 %2
popd
rmdir /S /Q $temp1
Endlocal & Exit /b 0
:Tex_to
>%2 (set/P=+) <&1
findstr /a:%1 + %2 con
type o_o
GOTO :EOF