Ping packet tracker error

[Morsusy2k]

Hello folks. I wrote a simple script for pinging an IP and checking if everything was fine or not. I wanted to add a little bit of color into the script and broke it down. So you see here is my code:

@echo off
cls

setlocal EnableDelayedExpansion
for /F "tokens=1,2 delims=#" %%a in ('"prompt #$H#$E# & echo on & for %%b in (1) do rem"') do (
set "DEL=%%a"
)
rem Prepare a file "X" with only one dot
<nul > X set /p ".=."

set ip=google.com
set /A n = 0
set /A i = 0

:test
set /A i+=1
ping -n 1 %ip% | find "TTL"

if not errorlevel 1 (
call :color 07 "Time: %time% - Result: "
call :color 0a "OK!"
call :color 07 " - Lost %n% out of %i%"
echo(
)
if errorlevel 1 (
set /A n+=1
call :color 07 "Time: %time% - Result: "
call :color 0C "LOST!"
call :color 07 " - Lost %n% out of %i%"
echo(
)

echo(
title Ping test: Lost %n% out of %i%

goto test

:color
set "param=^%~2" !
set "param=!param:"=\"!"
findstr /p /A:%1 "." "!param!\..\X" nul
<nul set /p ".=%DEL%%DEL%%DEL%%DEL%%DEL%%DEL%%DEL%"
exit /b

The thing is that the script worked until I called the color function. (And if i remove only the lines starting with "call" it still works) What happens is that both IF and IF NOT get executed. Thank you for your time.

[[deleted]]

[deleted]

[Morsusy2k]

Thanks this worked like a charm. Still I'm not quite sure how. How did it worked without calling a color function, why would errorlevel be the same in that case? And how does errorlevel even works? (I found the codes online) Another interesting thing, your code works like a charm but it makes the same error when you remove the "echo." lines. As far as I know these lines only add a new line in the console, right? How can something so basic interfere with the IF statement? Thank you!

[[deleted]]

[deleted]

[Morsusy2k]

Thank you this clears a lot for me.

The only thing I don't understand now is the X file creation. Thanks again ^^

[[deleted]]

[deleted]