Serverliste nach Ping Sortieren und in eine TXT Ausgeben ?

@echo off &setlocal

call :Xping 85.25.140.178 &&(
  echo wird beachtet
)||(
  echo wird nicht beachtet
)
pause
goto :eof

:: ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
:Xping IPAdr
setlocal
set "Anz_Pings=20"  
set "Max_ms=80"  

set "x=0"  
set "MW=1001ms"  
for /f "tokens=9" %%a in ('ping -n %Anz_Pings% %~1 ^|findstr /i /c:"mittelwert"') do (  
  set "MW=%%a"  
)
if %MW:ms=% leq %Max_ms% set "x=1"  
endlocal &echo %x%|find "1">nul  
goto :eof

@echo off &setlocal
:: main ------------------------------------------------------------------------
set n=0

:: "serverliste_formatiert.txt" anlegen/überschreiben, damit bei mehrmaligem 
:: Aufruf des Batchfiles nicht ständig hinten angehängt wird
type nul>"serverliste_formatiert.txt"  

:: Schleife für jede Zeile in serverliste.txt
for /f "delims=: tokens=1*" %%a in (serverliste.txt) do (  
  set "IP=%%a"  
  set "line=%%a:%%b"  
  call :write
)

pause
goto :eof
::------------------------------------------------------------------------------

:: write -----------------------------------------------------------------------
:write
:: :Xping aufrufen. Wenn Durchschnittswert >80ms, verlasse :write und 
:: kehre zur Schleife zurück
call :Xping %IP% ||goto :eof

:: ansonsten zähle hoch und schreibe in "serverliste_formatiert.txt" 
set /a n+=1
(
echo "%n%"  
echo {
echo "name" "%line%"  
echo "address" "%line%"  
echo "lastplayed" "123456789"  
echo "appID" "0" ;  
echo }
echo.
)>>"serverliste_formatiert.txt"  

goto :eof
::------------------------------------------------------------------------------

:: Xping -----------------------------------------------------------------------
:: Pingt die IP Adresse und wenn Ping >80ms dann Errorlevel größer 0

:Xping IPAdr
setlocal

set "Anz_Pings=20"  
set "Max_ms=80"  
set "x=0"  
set "MW=1001ms"  

for /f "tokens=9" %%a in ('ping -n %Anz_Pings% %~1 ^|findstr /i /c:"mittelwert"') do (  
  set "MW=%%a"  
)
if %MW:ms=% leq %Max_ms% set "x=1"  
endlocal &echo %x%|findstr /c:"1">nul  
goto :eof
::------------------------------------------------------------------------------

endlocal &echo %x%|findstr /c:"1">nul   

echo text|find "suchwort"
-bzw. konkreter mit den beiden möglichen Gefunden/Nicht gefunden-Ergebnissen
echo 23|find "1"
[keine Ausgabe, nicht gefunden]

echo 13|find "1"
13 [Gefunden-Ausgabe]

>echo 23|findx "1"
Der Befehl "findx" ist entweder falsch geschrieben oder
konnte nicht gefunden werden.
Ein Prozess hat versucht, zu einer nicht bestehenden Pipe zu schreiben.

# jedenfalls beim ersten Mal. ein Versuch der Reproduktion...
>echo 23|findx "1"
Der Befehl "findx" ist entweder falsch geschrieben oder
konnte nicht gefunden werden.

[ beim 2ten, 3ten, xten Mal kommt die "nicht bestehende Pipe" nicht wieder. 
*seufz*....Redmond....]

>for /f "tokens=*" %a in ('ping -n 2 localhost^|find /i "mittelwert"') do @echo [%a]
]Minimum = 0ms, Maximum = 0ms, Mittelwert = 0ms


>for /f "tokens=7-9" %a in ('ping -n 2 localhost^|find /i "mittelwert"') do @echo [%a] b[%b] c[%c]
]Mittelwert] b[=] c[0ms